/*extraction*/
proc import datafile='C:\Documents and Settings\mobileclub\Desktop\source\xls\constraints.xls'
out=medi dbms=excel replace;
sheet='sheet6$';
run;
/*transformation cleaning*/
proc sort data=medi out=medi1 nodupkey;
by pid visit;
run;
/*loading*/
proc export outtable=mh data=medi1 dbms=access replace;
database='D:\mh.mdb';
run;
/*reporting*/
data _null_;
file 'D:\mreport.rtf' mod;
put@30'SUBJECT DOSING INFORMATION';
put' ';
put@5'date=31-08-11' @60'time:07:27:27';
put' ';
put@ 2 72 * '-';
put@15'pid' @40'visit' @60'drug';
put' ';
put@2 72 * '-';
data _null_;
set Medi1;
file 'D:\mreport.rtf' mod;
put@15pid @40visit @60 drug;
run;
data _null_;
file 'D:\mreport.rtf' mod;
put' ';
put@ 2 72 * '-';
put@5'sas version : 9.0';
put' ';
put@5'Naveen,B.Tech(BI),PGDCTM,PGDCADD';
run;
No comments:
Post a Comment