Null Report - clinicalsashub.com

Null Report :

_Null_ It executes data step but won’t create a dataset.
File Writes the contents of a window to an external file.
Specify location to write information from SAS to external file.
PUT Writes line(data) in external file for specified columns..

Data My_SAS.wghtclub;
Infile Datalines;
Input idno 1-4 name $ 6-24 team $ strtwght endwght;
Loss=strtwght-endwght;
Datalines;
1023 David Shaw red 189 165
1049 Amelia Serrano yellow 145 124
1219 Alan Nance red 210 192
1246 Ravi Sinha yellow 194 177
1078 Ashley McKnight red 127 118
1221 Jim Brown yellow 220 .
1095 Susan Stewart blue 135 127
1157 Rose Collins green 155 141
1331 Jason Schock blue 187 172
1067 Kanoko Nagasaka green 135 122
1251 Richard Rose blue 181 166
1333 Li-Hwa Lee green 141 129
1192 Charlene Armstrong yellow 152 139
1352 Bette Long green 156 137
1262 Yao Chen blue 196 180
1087 Kim Blackburn red 148 135
1124 Adrienne Fink green 156 142
1197 Lynne Overby red 138 125
1133 John VanMeter blue 180 167
1036 Becky Redding green 135 123
1057 Margie Vanhoy yellow 146 132
1328 Hisashi Ito red 155 142
1243 Deanna Hicks blue 134 122
1177 Holly Choate red 141 130
1259 Raoul Sanchez green 189 172
1017 Jennifer Brooks blue 138 127
1099 Asha Garg yellow 148 132
1329 Larry Goss yellow 188 174
;
Run;

Example (1):-
Data _null_;
File ‘E:\SAS\OUTPUT\DATASTEP_REPORT\Weight_Club1.rtf’ Linesize=200;
Put @2 ‘EMP_ID’ @10 ‘EMP_NAME’ @30 ‘TEAM’ @42 ‘STRTWGHT’ @55 ‘ENDWGHT’;
Run;

Example (2):-
Data _null_;
File ‘E:\SAS\OUTPUT\DATASTEP_REPORT\Weight_Club2.rtf’ Linesize=200;
Put @2 ‘EMP_ID’ @10 ‘EMP_NAME’ @30 ‘TEAM’ @42 ‘STRTWGHT’ @55 ‘ENDWGHT’;
Run;
Data _null_;
Set My_SAS.wghtclub;
File ‘E:\SAS\TARGET_DATA\DATASTEP_REPORT\Weight_Club2.rtf’ Linesize=200 mod;
put @2 idno @10 name @30 team @42 strtwght @55 endwght;
Run;

Example (3):-
Data _null_;
d=today ();
t=time ();
File ‘E:\SAS\TARGET_DATA\DATASTEP_REPORT\Weight_Club3.rtf’ Linesize=200;
Put’ ‘;
Put ‘ ‘;
Put @2 ‘REQUEST # I11796-S’ @35 ‘NEERU TECHNOLOGIES’ @70 “PAGE 1 “;
Put @2 ‘RUN DATE:’ d ddmmyys10. @31 ‘INFORMATION CENTER REQUEST’
@70 ‘RUNTIME:’ t time8.;
Put ‘ ‘;
Put ‘ ‘;
Run;
Data _null_;
File ‘E:\SAS\TARGET_DATA\DATASTEP_REPORT\Weight_Club3.rtf’ Linesize=200 mod;
Put @2 ‘EMP_ID’ @10 ‘EMP_NAME’ @30 ‘TEAM’ @42 ‘STRTWGHT’ @55 ‘ENDWGHT’;
Run;
Data _null_;
Set My_SAS.wghtclub;
File ‘E:\SAS\TARGET_DATA\DATASTEP_REPORT\Weight_Club3.rtf’
Linesize=200 mod;
put @2 idno @10 name @30 team @42 strtwght @55 endwght;
Run;

Example (4):-
Data _null_;
d=today ();
t=time ();
File ‘E:\SAS\TARGET_DATA\DATASTEP_REPORT\Weight_Club4.rtf’ Linesize=200;
Put’ ‘;
Put ‘ ‘;
Put @2 ‘REQUEST # I11796-S’ @35 ‘NEERU TECHNOLOGIES’ @70 “PAGE 1 “;
Put @2 ‘RUN DATE:’ d ddmmyys10. @31 ‘INFORMATION CENTER REQUEST’
@70 ‘RUNTIME:’ t time8. ;
Put ‘ ‘;
Put ‘ ‘;
Put ‘ ‘;
Run;
Data _null_;
File ‘E:\SAS\TARGET_DATA\DATASTEP_REPORT\Weight_Club4.rtf’
Linesize=200 mod;
Put @2 ‘EMP_ID’ @10 ‘EMP_NAME’ @30 ‘TEAM’
@42 ‘STRTWGHT’ @55 ‘ENDWGHT’;
PUT ‘ ‘;
Run;
Data _null_;
Set My_SAS.wghtclub;
File ‘E:\SAS\TARGET_DATA\DATASTEP_REPORT\Weight_Club4.rtf’
Linesize=200 mod;
Put @2 idno @10 name @30 team
@42 strtwght @55 endwght;
Run;
Data _null_;
File ‘E:\SAS\TARGET_DATA\DATASTEP_REPORT\Weight_Club4.rtf’
Linesize=200 mod;
Put;
Put;
Put;
Put @2 ‘*************END OF REPORT *************************’;
Put @2 ‘**********GENERATED BY Mr.KRISHNA *******************’;
Run;

Example (5):-
Data _null_;
d=today ();
t=time ();
File ‘E:\SAS\TARGET_DATA\DATASTEP_REPORT\Weight_Club5.rtf’ Linesize=200;
Put’ ‘;
Put ‘ ‘;
Put @2 ‘REQUEST # I11796-S’ @35 ‘NEERU TECHNOLOGIES’ @70 “PAGE 1 “;
Put @2 ‘RUN DATE:’ d ddmmyys10. @31 ‘INFORMATION CENTER REQUEST’
@70 ‘RUNTIME:’ t time8. ;
Put ‘ ‘;
Put ‘ ‘;
Put ‘ ‘;
Run;
Data _null_;
File ‘E:\SAS\TARGET_DATA\DATASTEP_REPORT\Weight_Club5.rtf’ Linesize=200 mod;
Put @2 ‘EMP_ID’ @10 ‘EMP_NAME’ @30 ‘TEAM’ @42 ‘STRTWGHT’ @55 ‘ENDWGHT’;
PUT ‘ ‘;
Run;
Proc sort data=My_SAS.wghtclub;
By team;
Run;
Data _null_;
Set wghtclub;
By team;
File ‘E:\SAS\TARGET_DATA\DATASTEP_REPORT\Weight_Club5.rtf’ Linesize=200 mod;
put @2 idno @10 name @30 team @42 strtwght @55 endwght;
If first.team then do;
sw=0;
ew=0;
End;
sw+strtwght;
ew+endwght;
if last.team then do;
put @2″TOTAL” @42 sw @55 ew;
end;
Run;
Data _null_;
File ‘E:\SAS\TARGET_DATA\DATASTEP_REPORT\Weight_Club5.rtf’
Linesize=200 mod;
Put;
Put;
Put;
Put @2 ‘*************END OF REPORT *************************’;
Put @2 ‘**********GENERATED BY Mr.KRISHNA *******************’;

Example (6):-
Data _null_;
d=today ();
t=time ();
File ‘E:\SAS\TARGET_DATA\DATASTEP_REPORT\Weight_Club6.rtf’ Linesize=200;
Put’ ‘;
Put ‘ ‘;
Put @2 ‘REQUEST # I11796-S’ @35 ‘NEERU TECHNOLOGIES’ @70 “PAGE 1 “;
Put @2 ‘RUN DATE:’ d ddmmyys10. @31 ‘INFORMATION CENTER REQUEST’
@70 ‘RUNTIME:’ t time8.;
Put ‘ ‘;
Put ‘ ‘;
Put ‘ ‘;
Run;
Data _null_;
File ‘E:\SAS\TARGET_DATA\DATASTEP_REPORT\Weight_Club6.rtf’ Linesize=200 mod;
Put @2 ‘EMP_ID’ @10 ‘EMP_NAME’ @30 ‘TEAM’ @42 ‘STRTWGHT’ @55 ‘ENDWGHT’;
PUT ‘ ‘;
Run;
Proc sort data=My_SAS.wghtclub;
By team;
Run;
Data _null_;
Set wghtclub;
By team;
File ‘E:\SAS\TARGET_DATA\DATASTEP_REPORT\Weight_Club6.rtf’
Linesize=200 mod;
put @2 idno @10 name @30 team @42 strtwght @55 endwght;
If first.team then do;
sw=0;
ew=0;
End;
sw+strtwght;
ew+endwght;
if last.team then do;
put @2″TOTAL” @42 sw @55 ew;
end;
Run;
Proc sql noprint;
Select sum(strtwght) into:gsw from wghtclub;
Select sum(endwght) into:gew from wghtclub;
Quit;
%put &gsw.;
%put &gew.;
Data _null_;
File ‘E:\SAS\TARGET_DATA\DATASTEP_REPORT\Weight_Club6.rtf’
Linesize=200 mod;
Put;
put @2 “Grand total” @42 “&gsw” @55 “&gew” ;
Put;
Put;
Put @2 ‘*************END OF REPORT *************************’;
Put @2 ‘**********GENERATED BY Mr.KRISHNA *******************’;
Run;

Example (7):-
Proc sql noprint;
Select distinct (team) into: empvar separated by ‘ ‘ from My_SAS.wghtclub;;
Quit; /*–created empvar macro–*/
%put &empvar.;

%macro loop(dname,var);
%global i;
%let i=1;
%let evar=%scan(&empvar,&i,%str ( ));
/*
Created i and evar macro here if
Evar=1 it will pick blue colour and gives subtotal when it comes ”. then its goes another group by value means another team
*/
%do %while(&evar ne);
Data _null_;
d=today ();
t=time ();
File ‘E:\SAS\TARGET_DATA\DATASTEP_REPORT\Weight_Club7.rtf’ Linesize=200 mod;
put’ ‘;
put ‘ ‘;
Put @2 ‘REQUEST # I11796-S’ @35 ‘NEERU TECHNOLOGIES’ @70 “PAGE 1 “;
Put @2 ‘RUN DATE:’ d ddmmyys10. @31 ‘INFORMATION CENTER REQUEST’
@70 ‘RUNTIME:’ t time8.;
put ‘ ‘;
put ‘ ‘;
put ‘ ‘;
put @2 ‘NPD VOLUMES BY GROUP NUMBER – DAYS IN HOUSE’;
put @2 ‘SUMMARY REPORT’;
put ;
put ;
Run;
Data _null_;
File ‘E:\SAS\TARGET_DATA\DATASTEP_REPORT\Weight_Club7.rtf’ Linesize=200 mod;
put @2 ‘idno’ @10 ‘name’ @30 ‘team’ @42 ‘strtwght’ @55 ‘endwght’;
Run;
Data _null_;
Set &dname;
Where &var=”&evar”;
File ‘E:\SAS\TARGET_DATA\DATASTEP_REPORT\Weight_Club7.rtf’ line size=200 mod;
put @2 idno @10 name @30 team @42 strtwght @55 endwght;
Run;
Proc sql noprint;
Select sum (strtwght) into:ssw from &dname where &var=”&evar”;
Select sum (endwght) into:ses from &dname where &var=”&evar”;
Quit;
Data _null_;
File ‘E:\SAS\TARGET_DATA\DATASTEP_REPORT\Weight_Club7.rtf’
Linesize=200 mod;
put @2 “TOTAL &evar” @42 “&ssw” @55 “&ses”;
Run;
%let i=%eval(&i+1);
%let evar=%scan(&empvar,&i,%str ( ));
%end;
%mend;
%loop(wghtclub,team);
Proc sql noprint;
Select sum (strtwght) into:gsw from My_SAS.wghtclub;
Select sum (endwght) into:gew from My_SAS.wghtclub;
Quit;
%put &gsw.;
%put &ges.;
Data _null_;
File ‘E:\SAS\TARGET_DATA\DATASTEP_REPORT\Weight_Club7.rtf’
Linesize=200 mod;
put;
put @2 “Grand total” @42 “&gsw” @55 “&ges” ;
put;
put;
put @2 ‘*******************END OF REPORT *************************’;
put @2 ‘***********GENERATED BY Mr.KRISHNA ********************’;
Run;