data _null_;
   set prog2.maysales end=IsLast;
   file 'export.dat';
   if _N_=1 then
      put 'Description ' 'ListDate '
          'SellDate ' 'SellPrice';
   put Description
       ListDate : date9. 
       SellDate : date9. 
       SellPrice : dollar8.;
   if IsLast=1 then 
      put 'Data: PROG2.MAYSALES';  
run;

proc fslist fileref='export.dat';
run;

data _null_; 
   set prog2.maysales; 
   file 'export.dat' dlm=',' dsd;
   put Description
       ListDate : date9. 
       SellDate : date9. 
       SellPrice : dollar8.;
run;     

proc fslist fileref='export.dat';
run;