topic Re: Macro code in SAS Programming

Macro code

Grandhi4 — Thu, 04 Oct 2012 10:26:08 GMT

Hi,

If i have a Two datasets one has 10 variables and other one has 10 variables or may be less or more

How to compare the datasets variables names and properties (Char, numeric, format, informat, length....) if both same then it should come TRUE or If it's not same any one then it should come ERROR.....how to do can any one help on this...

Thanks,

Re: Macro code

LinusH — Thu, 04 Oct 2012 10:34:20 GMT

You should start with PROC COMPARE, and taket it from there...

http://support.sas.com/documentation/cdl/en/proc/65145/HTML/default/viewer.htm#p1l5iwaf47ma83n1euxxp10g8xh5.htm

Re: Macro code

Grandhi4 — Thu, 04 Oct 2012 10:41:43 GMT

Thanks LinusH, But i'm looking in Macro code not PROC

Re: Macro code

LinusH — Thu, 04 Oct 2012 12:37:02 GMT

Why?

Re: Macro code

Grandhi4 — Thu, 04 Oct 2012 12:40:38 GMT

req is macro

Re: Macro code

LinusH — Thu, 04 Oct 2012 12:59:12 GMT

"Macro" meaning what?. Can't you embed PROC's in the macro?

Otherwise, you can use SAS File I/O functions, which can call from %sysfunc. But I believe thatwill generate some more coding...

Re: Macro code

Patrick — Thu, 04 Oct 2012 14:05:04 GMT

Below code should give you a start. Now it's only about wrapping a macro around the code (if you must) where you pass libname and tablenames.

data have1;
set sashelp.class;
run;

data have2;
set sashelp.class;
/* label sex='Different from have1';*/
run;

%let Same_Flg=0;
proc sql noprint;
   select count(*) into :Same_Flg
   from
      (
      select name, type, length, npos, varnum,label,format,informat,notnull,precision,transcode
         from dictionary.columns where libname='WORK' and memname='HAVE1'
      outer union corr
      select name, type, length, npos, varnum,label,format,informat,notnull,precision,transcode
         from dictionary.columns where libname='WORK' and memname='HAVE2'
      )
      group by name, type, length, npos, varnum,label,format,informat,notnull,precision,transcode
      having count(*) ne 2
   ;
quit;

%let Same_Flg=%eval(&Same_Flg = 0);

/* Same_Flg: 1 if no differences, 0 if differences */
%put XXXX &Same_Flg;