How to Compare PD Julian date with (Current Julian date-7) using JCL- SYNCSORT?
سؤال
I have a requirement as below.
In my input file, I have a packed-decimal Julian date starting in the 23rd position (position 23, length 4).
If my the input Julian date is less than (Current Julian date - 7 days) then write the records into output File1.
Else write the records into outut File2.
Can anybody let me know the solution for this requirement in SyncSort only?
المحلول
You can use this...
//SYSIN DD *
SORT FIELDS=COPY,
OUTFIL FNAMES=01,
INCLUDE=(23,4,PD,EQ,DATE3P-7)
OUTFIL FNAMES=02,SAVE
DATE3P gives the current date in P'YYYYDDD' packed-decimal format.
لا تنتمي إلى StackOverflow