libname lib8 sasefame "%sysget(FAME_DATA)"
           convert=(frequency=business technique=constant)
           crosslist=(
              { IBM,SPALN,SUNW,XOM },
              { adjust, close, high, low, open, volume,
                uclose, uhigh, ulow,uopen,uvolume }
                      );
   
   data trout;
      /* eleven companies, keep only the IBM ticker this time */
      set lib8.training;
      where date between '01mar02'd and '20mar02'd;
      keep IBM: ;
   run;
   
   
   title2 'Contents of OUT=trout for BYGROUP Tick=IBM.';
   proc contents
      data=trout;
   run;
   
   title2 'TRAINING DB, Pricing Timeseries for IBM Ticker in CROSSLIST=';
   title3 'OUT=TROUT from the PRINT Procedure';
   proc print
      data=trout;
   run;