如何使用 DFSORT 按日期过滤数据

Question

我有一个平面文件，其中包含一些有用的数据以及每条记录上的时间戳。为了创建报告，我只需要上个月的数据以供进一步分析。在不使用 cobol 源代码的情况下，REXX EXECs 我需要使用 DFSORT 过滤掉上个月的数据。希望我的问题很清楚。

注意：我使用 JOBTRAC 调度程序。使用 JOBTRAC 参数，我可以动态分配值并过滤数据，但不想使用它们。

Answer 1

这是一个可能的答案：

//STEP01  EXEC PGM=SORT,REGION=0M
//SYSOUT    DD SYSOUT=*
//SORTIN    DD DSN=INPUT.DATASET,DISP=SHR
//SORTOUT   DD DSN=OUTPUT.DATASET,DISP=NEW
//SYSIN     DD *
   INCLUDE COND=(001,007,EQ,DATE2(-)-1)
/*

我假设了以下内容：

1. 时间戳从位置一开始
2. 时间戳是字母数字
3. 时间戳以 YYYY-MM-DD 开头
4. “上个月”是当前月份的上个月