x cd /pub/data/sf32000/Tools;  %let pgm=invoke_sdcpro3_nbhd;  filename pgm "&pgm..sas";
 /*  Setup to invoke the sdcpro3 macro to one or more profile reports for custom-aggregated neighborhoods using
    the sdcprofile3 code
     by the national SDC.
   */
 %let lastline=; %*str(*******************************************);

options NOmprint NOsource2;
*options mprint source2;
libname user '/tmp/scratch/user';

ods listing ;  *** close;


 %macro doit;
   %let gpros=1 2 i p h je aml d ft;
   %*let gpros=i;
   %let i=1;  %let gpro=%scan(&gpros,1);
   %do %until(&gpro eq %str());
      options mprint;
     %sdcpro3(setin=sf32000.nccnaph,stab=mo,sumlev=nbh,geocomps=,
      outlib=%str(/pub/webrepts/sdcprofiles3/mo/nbhds),profiles=&gpro,outname=nccna_&gpro)
    %let i=%eval(&i+1);
    %let gpro=%scan(&gpros,&i);
     options NOmprint;
    %end;

  %put ***Profiles generated ****;
  %mend doit;

  %doit

   run;

 %include sascode(notify);