如何使用JCL-SYNCSORT将PD Julian日期与（当前Julian日期-7）进行比较？

Question

我的要求如下。

在我的输入文件中，我有一个从第23个位置开始的压缩小数Julian日期（位置23，长度4）。

1. 如果输入的Julian日期小于（当前Julian日期 - 7天），则将记录写入输出File1。

2. 否则将记录写入outut File2。

有人能让我知道SyncSort中此要求的解决方案吗？

Answer 1

您可以使用此...

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

DATE3P以P'YYYYDDD'打包十进制格式显示当前日期。