FAQ SASConsultez toutes les FAQ

1
2
3
4
5
6
DATA equipe; 
INFILE "coatch.txt"; 
INPUT nom$ anneecreation nbjoueur; 
RUN; 
PROC PRINT DATA=equipe; 
RUN;

1
2
3
4
5
6
7
8
DATA equipe;  
INPUT nom$ :20. anneecreation nbjoueur; 
CARDS; 
sharks 1950 12 tigers 1951 33 lions 2000 42 zodiac 2006 11 flyers 2007 42 
; 
RUN; 
PROC PRINT DATA=equipe; 
RUN;

1
2
Obs nom anneecreation nbjoueur 
1 sharks 1950 12

1
2
3
4
5
6
7
8
DATA equipe;  
INPUT nom$ :20. anneecreation nbjoueur @@; 
CARDS; 
sharks 1950 12 tigers 1951 33 lions 2000 42 zodiac 2006 11 flyers 2007 42 
; 
RUN; 
PROC PRINT DATA=equipe; 
RUN;

1
2
3
4
5
6
Obs nom anneecreation nbjoueur 
1 sharks 1950 12 
2 tigers 1951 33 
3 lions 2000 42 
4 zodiac 2006 11 
5 flyers 2007 42

1
2
3
4
DATA VIDE; 
SET _NULL_; 
length a 3; 
run;

1
2
DATA vide; length a 3.; stop; 
run;

1
2
3
proc sql; 
CREATE TABLE tab  (a int); 
quit;

1
2
3
4
5
6
7
8
9
10
11
12
13
DATA base; 
INPUT v1 v2; 
CARDS; 
1 2 
10 3 
; 
RUN; 
DATA base; 
RETAIN v2 v1; 
SET base; 
RUN; 
PROC PRINT DATA=base2; 
RUN;

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
DATA one; 
length n 8; 
input n @@; 
y=lag1(n); 
cards; 
3 5 . 6 1 4 
; 
run; 
  
DATA _null_; 
SET One; 
IF y > x then  
put 'Y plus grand que X'; 
else 
put 'Y plus petit que X'; 
run;

1
2
3
4
5
6
Y plus petit que X 
Y plus petit que X 
Y plus grand que X 
Y plus petit que X 
Y plus grand que X 
Y plus petit que X

1
2
3
4
5
6
7
X Y 
3 . 
5 3 
. 5 
6 . 
1 6 
4 1

1
2
PROC CONTENTS; 
RUN;

1
2
3
proc datasets lib=work KILL; 
run; 
quit;

1
2
3
4
proc datasets lib=work ; 
DELETE t1; 
run; 
quit;

1
2
3
4
5
filename fichier pipe 'c:\pkunzip.exe c:\fichier.zip -c' ; 
   data a ; 
    infile fichier dlm=',' ; /* le caractère " , " est le délimiteur de champs */ 
    input A $ B $ C $ ; /* le fichier texte contient 3 champs de type caractère */ 
   run ;

1
2
3
4
5
6
7
8
9
10
%Macro M_Zero (ds=) ; 
     data &ds.2 (drop=_i); 
          set &ds ; 
          array A_VarNum[*] _NUMERIC_ ;       
  
          do _i=1 to dim( A_VarNum ) ; 
          If A_VarNum (_i)=. then A_VarNum (_i)=0 ; 
     End ; 
   run ; 
%Mend ;

Put var1 +(-1) var2;

1
2
3
4
5
6
data _null_ ; 
file "c:\temp\test.txt" ; 
var1="aaa" ; 
var2="111" ; 
put var1 +(-1) var2; 
run ;

1
2
3
4
5
6
PROC SQL ; 
   CREATE TABLE base AS 
   SELECT *,'cpt' || PUT(monotonic(), 8. -L) AS compteur 
   FROM sashelp.air 
   ; 
QUIT;

1
2
3
4
5
6
7
8
9
10
DATA equipe;  
INPUT nom$ anneecreation nbjoueur; 
CARDS; 
sharks 1950 12 
tigers 1951 33 
lions 2000 42 
zodiac 2006 11 
flyers 2007 42 
; 
RUN;

1
2
3
4
5
6
7
8
9
10
DATA equipe;  
INPUT nom$ :20. anneecreation nbjoueur; 
CARDS; 
sharks 1950 12 
tigers 1951 33 
lions 2000 42 
zodiac 2006 11 
flyers 2007 42 
; 
RUN;

1
2
3
4
5
6
7
8
PROC SQL; 
CREATE TABLE tab  (a int); 
QUIT; 
  
PROC datasets lib=work; 
CHANGE tab=tab_new; 
run; 
quit;

1
2
3
4
5
6
7
8
9
10
11
DATA base; 
INPUT v1 v2; 
CARDS; 
9 5 
10 3 
; 
RUN; 
DATA base2; 
SET base; 
id=_N_; 
RUN;

1
2
3
4
5
data table; 
  infile "C:\exemple\extract.txt" lrecl=64000 firstobs=2 encoding=unicode ignoredoseof dsd missover dlm='09'x ; 
  input var1 var2 ; 
    Var1 =kcvt (var1,"UTF8","wlatin2");   
Run ;

1
2
3
4
5
6
DATA equipe; 
INFILE "coatch.txt"; 
INPUT nom$ 1-10 anneecreation 13-16 nbjoueur; 
RUN; 
PROC PRINT DATA=equipe; 
RUN;

1
2
3
4
5
6
7
8
9
10
11
12
DATA base; 
ATTRIB v1 LENGTH=$1. LABEL="Ma premiere variable"; 
ATTRIB v2 LENGTH=8. LABEL="Ma deuxieme variable"; 
v2=_N_; 
input v1; 
cards; 
a 
b 
c 
d 
;   
RUN;

1
2
3
PROC PRINT DATA=base LABEL; 
WHERE v2 LE 2; 
RUN;

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
DATA toto2; 
format cle $10. frequence 5. effectif 5.; 
input cle $ frequence effectif; 
cards; 
rean 10 . 
tutu 80 . 
titi 1 . 
tata 90 . 
k  . 2 
k  . 1 
; 
run; 
  
DATA toto22; SET toto2; 
IF cle='tutu' then output; 
output; 
run;

1
2
3
4
5
6
7
8
9
10
11
12
13
DATA equipe;  
INPUT nom$ :20. anneecreation nbjoueur; 
CARDS; 
sharks 1950 12 
tigers 1951 33 
lions 2000 42 
zodiac 2006 11 
flyers 2007 42 
; 
RUN; 
PROC SORT DATA=equipe OUT=equipe_triee;            
BY nom anneecreation nbjoueur; 
RUN;

1
2
3
PROC SORT DATA=equipe OUT=equipe_triee;           
BY DESCENDING nom anneecreation nbjoueur; 
RUN;

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
DATA t1; 
input a b; 
cards; 
1 2 
1 4 
2 6 
3 4 
3 3 
5 6 
4 8 
; 
run; 
/*V9*/ 
proc sort DATA=t1  out=tr_tr nodupkey dupout=tr_dup; BY a;run; 
/*V8 ou V9*/ 
proc freq DATA=t1 ; TABLES a/out=t1_fr(WHERE=(COUNT>1)); run; 
proc sql; 
CREATE TABLE t1_v9_dup AS 
SELECT al_1.* 
FROM t1 al_1,  t1_fr al_2 
WHERE al_1.a=al_2.a; 
quit;

1
2
3
4
5
6
DATA tab_boucles; 
DO i=0 TO 10 BY 1; 
v= i*10; 
OUTPUT tab_boucles; 
END; 
RUN;

1
2
3
4
5
6
7
8
9
10
11
DATA base; 
INPUT var1 var2; 
CARDS; 
10 5  
3 8 
; 
DATA base2; 
SET base; 
RENAME var1=variable1; 
RENAME var2=v2; 
RUN;

1
2
3
4
5
6
7
DATA titi; 
    dsid=open("sashelp.adomsg"); /*ouvrir la table*/ 
    pw=attrn(dsid,"NOBS ");/*obtenir le nombre d'obs, la fonction attrn peut recevoir d'autres paramètres NOBS NVARS...*/ 
    rc=close(dsid);/*ermer la table*/ 
run; 
proc contents DATA=sashelp.adomsg out=t noprint; run; 
/*Avec la proc contents on obtient beaucoup plus d'informations*/

1
2
3
4
5
6
7
8
9
10
11
12
13
14
var1 var2 
            1 . 
            2 . 
            3 y 
            4 z 
            5 r 
            6 r 
  
data test; 
  
infile 'C:\FAQ.txt' delimiter='09'x firstobs=2 truncover; 
input var1 var2 $char2. ; 
  
run;