Как сравнить PD Julian date с (Current Julian date-7), используя JCL- SYNCSORT?

У меня есть требование, как показано ниже.

В моем входном файле у меня есть упакованная десятичная юлианская дата, начиная с 23-й позиции (позиция 23, длина 4).

  1. Если моя входная юлианская дата меньше, чем (текущая юлианская дата - 7 дней), тогда запишите записи в выходной файл1.

  2. Еще записать записи в выходной файл2.

Кто-нибудь может сообщить мне решение для этого требования только в SyncSort?

1 ответ

Решение

Вы можете использовать это...

//SYSIN  DD *
 SORT FIELDS=COPY,
 OUTFIL FNAMES=01,
 INCLUDE=(23,4,PD,EQ,DATE3P-7)
 OUTFIL FNAMES=02,SAVE

DATE3P предоставляет текущую дату в упакованном десятичном формате P'YYYYDDD'.

Другие вопросы по тегам