使用JCL-SYNCSORT比較包裝十進制Julian日期與（壓縮十進制當前Julian日期-7天）？

Question

我有一個要求如下。

在我的輸入文件中，我在第23個位置（位置23，長度4）中打包了十進制Julian日期[YYYYDDD格式]。

1. 如果我輸入Julian日期小於（當前儒略日 - 7日），然後寫入記錄到輸出文件1。

2. Else將記錄寫入Out file2。

任何人都可以讓我知道如何使用JCL- Syncsort公司（壓縮十進制當前儒略日期7天）比較壓縮十進制Julian日期？

Answer 1

您可以使用此...

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

DATE3P給出P'YYYYDDD壓縮十進制格式的當前日期」。