I need to check the system time in SYNCSORT to determine what date I put into the ouput file. Basically if it's between midnight and 5pm I want to put yesterdays date otherwise I want to use todays.
SYNCSORT FOR Z/OS 1.3.2.
Input Data:
INCLUDE COND=(1,1,CH,EQ,C'N',AND,184,10,CH,LE,C'CCYY-MM-DD')
Syncsort code:
SORT FIELDS=COPY
INREC IFTHEN=(WHEN=(50,10,CH,EQ,C'CCYY-MM-DD',
AND,&TIME,LT,C'17:00:00'),
OVERLAY=(50:&DATE1(-)-1),
IFTHEN=(WHEN=(50,10,CH,EQ,C'CCYY-MM-DD',
AND,&TIME,GE,C'17:00:00'),
OVERLAY=(50:&DATE1(-)))
INREC IFTHEN=(WHEN=(50,10,CH,EQ,C'CCYY-MM-DD',
AND,&TIME,LT,C'17:00:00'),
OVERLAY=(50:&DATE1(-)-1),
IFTHEN=(WHEN=(50,10,CH,EQ,C'CCYY-MM-DD',
AND,&TIME,GE,C'17:00:00'),
OVERLAY=(50:&DATE1(-)))
Error Message:
SORT FIELDS=COPY
INREC IFTHEN=(WHEN=(50,10,CH,EQ,C'CCYY-MM-DD',
AND,&TIME,LT,C'17:00:00'),
*
OVERLAY=(50:&DATE1(-)-1),
IFTHEN=(WHEN=(50,10,CH,EQ,C'CCYY-MM-DD',
AND,&TIME,GE,C'17:00:00'),
OVERLAY=(50:&DATE1(-)))
WER901I **WARNING** SYNCSORT 1.3.2.0 WILL EXPIRE IN 27 DAYS
WER268A INREC STATEMENT : SYNTAX ERROR
INREC IFTHEN=(WHEN=(50,10,CH,EQ,C'CCYY-MM-DD',
AND,&TIME,LT,C'17:00:00'),
*
OVERLAY=(50:&DATE1(-)-1),
IFTHEN=(WHEN=(50,10,CH,EQ,C'CCYY-MM-DD',
AND,&TIME,GE,C'17:00:00'),
OVERLAY=(50:&DATE1(-)))
WER901I **WARNING** SYNCSORT 1.3.2.0 WILL EXPIRE IN 27 DAYS
WER268A INREC STATEMENT : SYNTAX ERROR
Currently it doesn't like my use of &TIME. I'm assuming you can only use it as an output field or just comapare it with other fields.
Any help is much appreciate.
Thanks,
Richard