1.

How does SAS Processing done explain briefly?

Answer»

The options nofmterr mprint mlogic symbolgen;

%macro datecompare; proc format; value $bckcolor 'Dates match No action'='green'  'PLZ CHECK'=red; RUN; %macro a; %do i=1 %to 5; data SASUSER.a&i; set sasuser.admit; run; proc copy in =sasuser out=work memtype=data; select a&i; run; %end; %mend a; %a; proc sql noprint; select count(distinct memname) into:cntwork from dictionary.columns where upcase(libname) ='WORK'; quit; %put &cntwork; proc sql noprint; select count(distinct memname) into: cntuser from dictionary.columns where upcase(libname) ='SASUSER' and upcase(memname) in ('A1','A2','A3','A4','A5'); quit; %put &cntuser; proc sql; create table wrk as select libname,memname,crdate from dictionary.tables where upcase(libname) ='WORK' and upcase(memname) in ('A1','A2','A3','A4','A5'); quit; proc sql; create table suser as select libname,memname,crdate from dictionary.tables where upcase(libname) ='SASUSER' and  upcase(memname) in ('A1','A2','A3','A4','A5'); quit; proc sort data=wrk (rename=(crdate=crdate1 libname=libname1)); by memname; run; proc sort data=suser; by memname; run; data final; merge wrk(in=a) suser(in=b); by memname; if a and b; run; data new; set final; if LEFT(TRIM(crdate))=left(trim(crdate1)) then action='Dates match No action'; else action='PLZ CHECK'; run; proc sql; create table new as select memname,libname,crdate,libname1,crdate1,action from new; quit; ods listing close; ods rtf file='\\path \new.rtf'; proc report data=new nowd headline headskip split='*'; Title1 j = center font = arial h = 4 color = blue "Creation Date comparision for"; Title2 j = center font = arial h = 4 color = blue "DATASETS of library sasuser and work"; columns memname libname crdate libname1 crdate1 action; define memname/display width=9 spacing=3 center; define libname/display width=2 spacing=3 center; define crdate/display width=2 spacing=3 center; define libname1/display width=3 spacing=3 center; define crdate1/display width=9 spacing=3 center; define action/display width=9 spacing=3 center style ={background =$bckcolor.};; run; ods rtf close; ods listing; %mend datecompare; %datecompare;


Discussion

No Comment Found