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 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226
| 1 ;*';*";*/;quit;run;
2 OPTIONS PAGENO=MIN;
3 %LET _CLIENTTASKLABEL='Programme6';
4 %LET _CLIENTPROJECTPATH='C:\Users\xdonchery\Desktop\test_belgique.egp';
5 %LET _CLIENTPROJECTNAME='test_belgique.egp';
6 %LET _SASPROGRAMFILE=;
7
8 ODS _ALL_ CLOSE;
9 OPTIONS DEV=PNG;
10 GOPTIONS XPIXELS=0 YPIXELS=0;
11
12 GOPTIONS ACCESSIBLE;
13 options mprint;
14
15 %let mv_dossier_src = E:\SAS\data\users\commun\sources\NIELSEN BELGIQUE\;
16 %let mv_onglet = 'TOTAL BELGIUM';
17
18 %let mv_fic_src = Report on Box_BE_2018.xls;
19 Proc import
20 datafile="&mv_dossier_src.&mv_fic_src."
21 out=BOX
22 replace
23 dbms=xls;
24 datarow=9;
25 sheet=&mv_onglet.;
26 getnames=no;
27 run;
NOTE: The import data set has 64 observations and 25 variables.
NOTE: Compressing data set WORK.BOX increased size by 100.00 percent.
Compressed is 2 pages; un-compressed would require 1 pages.
NOTE: WORK.BOX data set was successfully created.
NOTE: PROCEDURE IMPORT used (Total process time):
real time 0.01 secondes
cpu time 0.00 secondes
28
29
30 %let mv_fic_src = Report on Pizzas fraiches_BE_2018.xls;
31 Proc import
32 datafile="&mv_dossier_src.&mv_fic_src."
33 out=PIZZAS
34 replace
35 dbms=xls;
36 datarow=9;
37 sheet=&mv_onglet.;
38 getnames=no;
39 run;
NOTE: The import data set has 404 observations and 26 variables.
NOTE: Compressing data set WORK.PIZZAS decreased size by 0.00 percent.
Compressed is 3 pages; un-compressed would require 3 pages.
NOTE: WORK.PIZZAS data set was successfully created.
NOTE: PROCEDURE IMPORT used (Total process time):
real time 0.02 secondes
cpu time 0.03 secondes
2 Le Système SAS 09:17 Friday, January 25, 2019
40
41
42 /* Création du catalogue, on garde uniquement les noms des modalités */
43 data Catalogue ;
44 Infile cards truncover;
45 input Variables: $20. ;
46 Variables=scan(Variables, 2, '=') ;
47 cards ;
NOTE: The data set WORK.CATALOGUE has 25 observations and 1 variables.
NOTE: Compressing data set WORK.CATALOGUE increased size by 100.00 percent.
Compressed is 2 pages; un-compressed would require 1 pages.
NOTE: DATA statement used (Total process time):
real time 0.00 secondes
cpu time 0.01 secondes
73 ; run ;
74
75 %Macro Rename (NomFich=, ModaVar=);
76 data _null_ ;
77 set Catalogue end=fin ;
78 length listvars $ 9999 ;
79 retain listvars ;
80 %if &NomFich.= BOX %then %Do ; if variables="&ModaVar." then delete ; %end ;
81 Obs+1 ;
82 Lettre=byte(64+Obs+1) ;
83 listvars= catx( ' ; ', listvars, cat('Rename ', Lettre, ' = ', strip(Variables)) ) ;
84 if fin then call symputx('Renames', strip(listvars), 'G');
85 run ;
86 %Mend Rename ;
87
88 *%Rename(NomFich=FichB, ModaVar=SEGMENT) ;
89
90 /* Vérification */
91
92 %Rename(NomFich=PIZZAS, ModaVar= ) ;
MPRINT(RENAME): data _null_ ;
MPRINT(RENAME): set Catalogue end=fin ;
MPRINT(RENAME): length listvars $ 9999 ;
MPRINT(RENAME): retain listvars ;
MPRINT(RENAME): Obs+1 ;
MPRINT(RENAME): Lettre=byte(64+Obs+1) ;
MPRINT(RENAME): listvars= catx( ' ; ', listvars, cat('Rename ', Lettre, ' = ', strip(Variables)) ) ;
MPRINT(RENAME): if fin then call symputx('Renames', strip(listvars), 'G');
MPRINT(RENAME): run ;
NOTE: There were 25 observations read from the data set WORK.CATALOGUE.
NOTE: DATA statement used (Total process time):
real time 0.00 secondes
cpu time 0.01 secondes
93 /* Jeu de données */
94 data TabA ; retain B C D E F G H Y Z 0 ; run ;
NOTE: The data set WORK.TABA has 1 observations and 9 variables.
3 Le Système SAS 09:17 Friday, January 25, 2019
NOTE: Compressing data set WORK.TABA increased size by 100.00 percent.
Compressed is 2 pages; un-compressed would require 1 pages.
NOTE: DATA statement used (Total process time):
real time 0.00 secondes
cpu time 0.00 secondes
95 data RTabA ; set TabA ; &Renames. ; run ;
WARNING: La variable I dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable J dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable K dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable L dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable M dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable N dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable O dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable P dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable Q dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable R dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable S dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable T dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable U dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable V dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable W dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable X dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
NOTE: There were 1 observations read from the data set WORK.TABA.
NOTE: The data set WORK.RTABA has 1 observations and 9 variables.
NOTE: Compressing data set WORK.RTABA increased size by 100.00 percent.
Compressed is 2 pages; un-compressed would require 1 pages.
NOTE: DATA statement used (Total process time):
real time 0.00 secondes
cpu time 0.00 secondes
96
97 %Rename(NomFich=BOX, ModaVar=SEGMENT) ;
MPRINT(RENAME): data _null_ ;
MPRINT(RENAME): set Catalogue end=fin ;
MPRINT(RENAME): length listvars $ 9999 ;
MPRINT(RENAME): retain listvars ;
MPRINT(RENAME): if variables="SEGMENT" then delete ;
MPRINT(RENAME): Obs+1 ;
MPRINT(RENAME): Lettre=byte(64+Obs+1) ;
MPRINT(RENAME): listvars= catx( ' ; ', listvars, cat('Rename ', Lettre, ' = ', strip(Variables)) ) ;
MPRINT(RENAME): if fin then call symputx('Renames', strip(listvars), 'G');
MPRINT(RENAME): run ;
NOTE: There were 25 observations read from the data set WORK.CATALOGUE.
NOTE: DATA statement used (Total process time):
real time 0.00 secondes
cpu time 0.00 secondes
98 /* Jeu de données */
99 data TabB ; retain B C D E F G H X Y 0 ; run ;
NOTE: The data set WORK.TABB has 1 observations and 9 variables.
NOTE: Compressing data set WORK.TABB increased size by 100.00 percent.
4 Le Système SAS 09:17 Friday, January 25, 2019
Compressed is 2 pages; un-compressed would require 1 pages.
NOTE: DATA statement used (Total process time):
real time 0.00 secondes
cpu time 0.00 secondes
100 data RTabB ; set TabB ; &Renames. ; run ;
WARNING: La variable I dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable J dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable K dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable L dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable M dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable N dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable O dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable P dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable Q dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable R dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable S dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable T dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable U dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable V dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable W dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
WARNING: La variable Z dans la liste DROP, KEEP, ou RENAME n'a jamais été référencée.
NOTE: There were 1 observations read from the data set WORK.TABB.
NOTE: The data set WORK.RTABB has 1 observations and 9 variables.
NOTE: Compressing data set WORK.RTABB increased size by 100.00 percent.
Compressed is 2 pages; un-compressed would require 1 pages.
NOTE: DATA statement used (Total process time):
real time 0.00 secondes
cpu time 0.01 secondes
101
102 GOPTIONS NOACCESSIBLE;
103 %LET _CLIENTTASKLABEL=;
104 %LET _CLIENTPROJECTPATH=;
105 %LET _CLIENTPROJECTNAME=;
106 %LET _SASPROGRAMFILE=;
107
108 ;*';*";*/;quit;run;
109 ODS _ALL_ CLOSE;
110
111
112 QUIT; RUN;
113 |
Partager