Thanks, Tom! That was a problem with the year being missing for the most recent six months, but I had a work around that was effective. I like yours also and it works except for the ls option. I guess I have an older version. 😞 Do you know why when I put the date into a macro, it changes? The actual value for moddt2 is 20170330 with a date format and moddt1 is Mar302017 with a charater format. when I use symput to put them into macros, &moddt2 is 20170209 and &moddt1 is Feb092017. 36 data dssinf1; 37 infile _dssinf1 pad recfm=v lrecl=1024 firstobs=2; 38 39 input filename $200.; 40 listinfo=compbl(filename); 41 rwa = scan(listinfo,1,' '); 42 nm = scan(listinfo,2,' '); 43 userid = scan(listinfo,3,' '); 44 dbs = scan(listinfo,4,' '); 45 size= scan(listinfo,5,' '); 46 mon= scan(listinfo,6,' '); 47 day= scan(listinfo,7,' '); 48 yr=scan(listinfo,8,' ');recnum=_n_; 49 if index(yr,':') then do; 50 time = yr; 51 year = year(today()); 52 if input(cats(day,mon,year),??date9.) > today() then year=year-1; 53 end; 54 else do ; 2 The SAS System 08:34 Thursday, March 30, 2017 55 time='00:00'; 56 year = input(yr,4.); 57 end; 58 59 60 *yr1=year(today()); 61 moddt=input(catx('-',mon,day,year),anydtdte11.); 62 call symput('moddt',moddt); 63 format moddt yymmddn8.; 64 moddt2=put(moddt,yymmddn8.); 65 moddt1=cats(mon,day,year); 66 call symputx('moddt1',moddt1); 67 call symputx('moddt2',moddt2); 68 typ= scan(scan(listinfo,9,' '),2,.); 69 fnam = scan(listinfo,9,' '); 70 if scan(fnam,1,.) IN ('filtered_odm_dss','filtered_odm_ufe'); 71 72 run; NOTE: Numeric values have been converted to character values at the places given by: (Line):(Column). 62:22 68:35 70:16 NOTE: The infile _DSSINF1 is: Pipe command="cd '/hasaspmt/fraud/facility/';ls -la " NOTE: 73 records were read from the infile _DSSINF1. The minimum record length was 59. The maximum record length was 93. NOTE: The data set WORK.DSSINF1 has 2 observations and 18 variables. NOTE: DATA statement used (Total process time): real time 0.07 seconds cpu time 0.02 seconds 73 %put &moddt. &moddt1. &moddt2.; 20859 Feb092017 20170209
... View more