Hi,
I am a new member. I am having problem with a SAS code i have encountered and cant understand what is wrong with it. The problem is that it is populating the date wrongly. Below is the SAS code i have included in my JCL.
//SASTEP02 EXEC SAS
//INPUT1 DD DSN=TRIMCARP.OUTPUT(+1),DISP=SHR
//OUTPUT1 DD DSN=foreign.file.TXXXX,DISP=(MOD,CATLG),
// SPACE=(TRK,(150,50),RLSE),UNIT=DISK,LRECL=80,
// BLKSIZE=0,RECFM=FB
//SYSOUT DD SYSOUT=*
//SYSIN DD *
DATA EXTRACT;
INFILE INPUT1 LENGTH=LEN MISSOVER;
INPUT @4 VOLS $6.
@13 JDAT $8.
@27 HH $2.
@29 MM $2.
@34 ACCT$8.;
PDAT = COMPRESS(JDAT,'/');
SELDAT = DATEJUL(PDAT);
SS = '00';

IF SELDAT = TODAY()-1 THEN OUTPUT;
ELSE DELETE;
KEEP VOLS JDAT PDAT SELDAT HH MM SS ACCT;
PROC PRINT;
DATA EXTRACT;
SET EXTRACT;
CDATE = TODAY();
LECCODES = 'XXXXXXX';
CTIME = TIME();
IF VOLS GT '5F2999' THEN TAPE = 'RFN';
ELSE TAPE = 'CFN';
FILE OUTPUT1 NOTITLES;
PUT @1 VOLS @7 LECCODES @14 TAPE @19 HH @21 MM @23 SS
@25 CDATE YYMMDD6. @32 ACCT;
/*

Why is it populating a wrong date?????? This problem also occurs randomly. The rest of the days it populates the date perfecly.
Do hope someone can help out