options validvarname=any;
   
   %let FAME=%sysget(FAME);
   %put(&FAME);
   %let FAMETEMP=%sysget(FAME_TEMP);
   %put(&FAMETEMP);
   
   libname lib1 sasefame "%sysget(FAME_DATA)"
           wildcard="wspca?"
           convert=(technique=constant freq=twicemonthly );
   
   libname lib2 "%sysget(FAME_TEMP)";
   
   data lib2.twild(label='Annual Series from the FAMEECON.db');
      set lib1.subecon;
      where date between '01jan93'd and '31dec93'd;
      /* keep only  */
      keep date wspca;
   run;
   
   proc contents data=lib2.twild;
   run;
   
   proc print data=lib2.twild;
   run;