*--------------------------------------------*;
* The following code will setup filename ref *;
* for the LOC current months file. sizes from*;
* Unix. *;
*--------------------------------------------*;
data _null_;
filename curloc pipe
"ls -l &datdir./&testDir.data/loc&cur_file |
awk '{print $5}'";
*--------------------------------------------*;
* The following data step will retrieve and *;
* store the prior months file sizes for later*;
* use. *;
*--------------------------------------------*;
data curlocfile;
infile curloc;
input filesize $;
c_loc_filsz = filesize;
call symput('c_loc_filsz',c_loc_filsz);
run
;
*--------------------------------------------*;
* The following print step will print the *;
* file sizes for the LOC current months file.*;
*--------------------------------------------*;
proc print data=curlocfile;
title "Current Month's LCO file";
run
;