Discussion :

[greybox]

Bonjour à tous,

j'ai un petit problème, j'ai par exemple cette table:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
data jojo;
input NUMCNT $ var8;
cards;
1 2
1 1
2 1
2 2
3 2
3 2
3 1
3 2
;
run;

et pour un même numéro de contrat, je ne voudrais garder que les lignes qui commence à var8=1, c'est-à-dire obtenir le tableau suivant:

1 1
2 1
2 2
3 1
3 2

Comment faire ?

Merci pour votre aide

[s_a_m]

Hello,

T'as le choix entre proc sql ou proc sort :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
proc sql;
 create table jojo1 as select DISTINCT NUMCNT , var8 from jojo;
quit;

ou sinon

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
proc sort data=jojo nodupkey /* noduplicate*/ ;
by NUMCNT  var8;
run;

[greybox]

Merci pour ta réponse rapide, mais ce n'est pas ce que je cherche!

Pour un même numéro de contrat, je veux juste les enregistrements qui se trouve derrière (et y compris) var8=1.

Je peux avoir:

NUMCNT VAR8
1 2
1 2
1 1
1 2
1 2

Et je voudrais juste récupérer:

1 1
1 2
1 2

[Butters333]

Voici une solution via des transposes et un array :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
data jojo;
input NUMCNT $ var8;
cards;
1 2
1 1
2 1
2 2
3 2
3 2
3 1
3 2
;
run;
 
proc transpose data=jojo out=transp1;by numcnt;run;
data temp;
 set transp1;
 array mes_col{*} col:;
 do i=lbound(mes_col) to hbound(mes_col);
	if mes_col(i)=1 then do;
		val_temp=i;
	end;
 end;
run;
proc transpose data=temp out=transp2;by numcnt val_temp;run;
 
data fin(drop=val_temp _NAME_);
	set transp2;
	if substr(_NAME_,4,1)<val_temp or var8=. then delete;
run;

[hossward]

Bonjour,
Je vous propose la solution suivante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
DATA jojo;
input NUMCNT $ var8;
cards;
1 2
1 1
2 1
2 2
3 2
3 2
3 1
3 2
;
run;
 
data sata (drop=grp var_) ;
set jojo ;
by NUMCNT NOTSORTED ;
retain grp var_ ; 
if first.NUMCNT or var8=1 then do ; grp+1 ; var_=var8 ; end ;
if var_> 1 then delete ;
run ;

Cordialement
Ward

[greybox]

Merci pour votre aide ! Mon problème est résolu