阿伦·拉吉（Arun Raj）
主持人
已加入：2006年10月17日
帖子：2481
位置：@我的办公桌
|
|
|
|
您好，
这是一个执行相同操作的Syncsort作业。它涉及2个步骤，
步骤1： 从计数器文件1中获取计数，递增1，将其保存回计数器文件，还为新计数创建一个Symbol-CNT。
第2步： Overlays the symbol - 碳纳米管 into the header record.
| 码： |
//步骤1 EXEC PGM=SORT
// SYSOUT DD SYSOUT=*
// SORTIN DD DSN =计数文件----------------- FB，LRECL = 6
//整理 DD DSN =计数文件----------------- FB，LRECL = 6
// C1 DD DSN=&&C1,DISP=(,PASS),UNIT=SYSDA
// SYSIN DD *
INREC BUILD=(1,6，ZD，ADD，+ 1，TO = ZDF，LENGTH = 6)
SORT FIELDS=COPY
OUTFIL FNAMES = C1，BUILD =(C'CNT，C'''，1,6，C''''，80:X)
// *
//第2步 EXEC PGM=SORT
// SYSOUT DD SYSOUT=*
//SYMNAMES DD DSN =&&C1,DISP=(OLD,PASS)
// SORTIN DD DSN= Input 文件----------------- FB，LRECL = 30
//整理 DD DSN =输出文件----------------- FB，LRECL = 30
// SYSIN DD *
INREC IFTHEN=(WHEN=(1,3,CH,EQ,C'BOF'),OVERLAY=(11:CNT))
SORT FIELDS=COPY |
|
|
