使用JCL-SYNCSORT将带包装的十进制儒略日期与(带包装的十进制当前儒略日期7天)进行比较? [英] Compare Packed decimal Julian date with (Packed decimal Current Julian date-7days) using JCL- SYNCSORT?

问题描述

我有如下要求.

在我的输入文件中，我在第23个位置(位置23，长度4)打包了十进制儒略日期[YYYYDDD格式].

In my Input file, I have Packed decimal Julian date[YYYYDDD format] in 23rd position (position 23, length 4).

1. 如果我输入的儒略日期小于(当前儒略日期-7天)，则将记录写入Out File1.

1. If my the input Julian date is less than (Current Julian date - 7 days) then write the records into Out File1.

其他将记录写入Out file2.

Else Write the records into Out file2.

有人可以让我知道如何使用JCL-SYNCSORT将带包装的十进制儒略日期与(带包装的十进制当前儒略日期7天)进行比较吗?

Can anybody let me know how to Compare Packed decimal Julian date with (Packed decimal Current Julian date-7days) using JCL- SYNCSORT?

推荐答案

您可以使用此...

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

DATE3P以P'YYYYDDD'十进制格式给出当前日期.

DATE3P gives the current date in P'YYYYDDD' packed decimal format.

这篇关于使用JCL-SYNCSORT将带包装的十进制儒略日期与(带包装的十进制当前儒略日期7天)进行比较?的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！