IBM Mainframe Forum

by **srajendran2** » Tue Jun 18, 2013 9:15 pm

I have a requirement to check if the header date is equivalent to current date. if it is not the rest of the processing should be skipped. The header date format is MM/DD/YYYY. I tried to use MD4. There is an error in the syntax. I think i have wrongly used the MD4 condition in the INCLUDE COND. PLease find below the code and error.

Select all

//ABCD1JA JOB (DWR,SYS999,TSO--TC3,TSTH,TSTH),
// MSGCLASS=X,REGION=4M,CLASS=A,NOTIFY=&SYSUID
//*
//UCC11RMS EXEC UCC11RMS,TYPRUN=P
//*
//SORT EXEC PGM=SORT
//SORTIN DD DISP=SHR,DSN=TSTH.AAAAAA.REXX.INPUT
//SYSOUT DD SYSOUT=*
//SORTOUT DD DSN=TSTH.DFSORT.OUTP,
// DISP=(NEW,CATLG),
// UNIT=SYSDA,
// SPACE=(CYL,(400,400),RLSE)
//SYSIN DD *
SORT FIELDS=COPY
INCLUDE COND=(1,10,CH,EQ,DATE=(MD4/))
/*

Input is
05/31/2013
05/31/2013,BBBB,1,0.000000000,
05/31/2013,CCCC,3,0.000000000,
05/31/2013,DDDD,1,0.000000000,
05/31/2013,AAAA,4,0.000000000,

Product is SYNCSORT FOR Z/OS 1.3.2.1R

by **Robert Sample** » Tue Jun 18, 2013 9:19 pm

Do not post on multiple fora. The same people who respond on the other forum respond to this one.

Topic locked prior to deletion later.

by **NicC** » Wed Jun 19, 2013 1:04 am

And as it is syncsort why post under DFsort - a competing product?

IBM Mainframe Forum

Check if header date is eq current date (MM/DD/YYYY)

Check if header date is eq current date (MM/DD/YYYY)

Re: Check if header date is eq current date (MM/DD/YYYY)

Re: Check if header date is eq current date (MM/DD/YYYY)