zOs/JCL/SOER2
//A540769J JOB (CP00,KE50), 00010001
// MSGCLASS=T,TIME=1440,
// NOTIFY=A540769
//*MAIN CLASS=LOG
//S1 EXEC PGM=DSNUTILB,PARM='DBAF,A540769J.LOAD' 00020001
//SYSMAP DD SYSOUT=*
//SYSUT1 DD DISP=(,PASS),UNIT=SYSDA
//SORTOUT DD DISP=(,PASS),UNIT=SYSDA
//SYSERR DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBAF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE A2Q4K2OA
DSN('DSN.DBA.NI02090Q.ULD.T0001.P&PA.') DISP(OLD, KEEP, KEEP)
LOAD DATA LOG NO RESUME NO REPLACE INDDN INCAT
EBCDIC CCSID(500, 0, 0) SORTKEYS 4789109
INTO TABLE "OA1A"."TNI201A101A"
WHEN(1:2)=X'0027'
("NI201024" POSITION(3:23) CHAR(21),
"NI201156" POSITION(24:24) CHAR(1),
"NI201122" POSITION(25:69) CHAR(45),
"NI201011" POSITION(70:79) DATE EXTERNAL,
"NI201176" POSITION(80:95) DECIMAL,
"NI201084" POSITION(97:112) DECIMAL NULLIF(96)=X'FF',
"NI201087" POSITION(114:129) DECIMAL NULLIF(113)=X'FF',
"NI201086" POSITION(131:146) DECIMAL NULLIF(130)=X'FF',
"NI201304" POSITION(148:163) DECIMAL NULLIF(147)=X'FF',
"NI201008" POSITION(165:180) DECIMAL NULLIF(164)=X'FF',
"NI201007" POSITION(182:197) DECIMAL NULLIF(181)=X'FF',
"NI201052" POSITION(198:204) DECIMAL,
"NI201316" POSITION(205:212) DECIMAL,
"NI201308" POSITION(213:213) CHAR(1),
"NI201106" POSITION(214:229) DECIMAL,
"NI201326" POSITION(230:230) CHAR(1),
"NI201124" POSITION(231:237) DECIMAL,
"NI201118" POSITION(238:247) DATE EXTERNAL,
"NI201119" POSITION(248:250) CHAR(3),
"NI201330" POSITION(251:254) CHAR(4),
"NI201352" POSITION(255:262) FLOAT(53))
SORTNUM 8 SORTDEVT DISK
ENFORCE NO
//INCAT DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00001
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00002
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00003
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00004
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00005
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00006
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00007
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00008
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00009
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00010
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00011
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00012
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00013
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00014
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00015
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00016
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00017
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00018
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00019
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00020
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00021
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00022
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00023
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00024
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00025
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00026
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00027
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00028
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00029
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00030
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00031
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00032
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00033
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00034
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00035
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00036
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00037
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00038
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00039
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00040
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00041
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00042
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00043
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00044
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00045
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00046
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00047
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00048
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00049
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00050
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00051
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00052
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00053
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00054
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00055
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00056
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00057
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00058
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00059
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00060
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00061
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00062
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00063
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0001.P00064
//
//SORTWK01 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE)
//SORTWK02 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE)
//SORTWK03 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE)
//SORTWK04 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE)
//SORTWK05 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE)
//SORTWK06 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE)
//SORTWK07 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE)
//SORTWK08 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE)
//SORTWK09 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE)
//SORTWK10 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE)
//SORTWK11 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE)
//SORTWK12 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE)
//SORTWK13 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE)
//SORTWK14 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE)
//SORTWK15 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE)
//SORTWK16 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE)
//SORTWK17 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE)
//SORTWK18 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE)
//SORTWK19 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE)
//SORTWK20 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE)
//SORTWK21 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE)
//SORTWK22 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE)
//SORTWK23 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE)
//SORTWK24 DD UNIT=DISK,SPACE=(CYL,(200,500)),DISP=(NEW,DELETE)
//DATAWK01 DD UNIT=DISK,SPACE=(CYL,(500,500)),DISP=(NEW,DELETE)
//DATAWK02 DD UNIT=DISK,SPACE=(CYL,(500,500)),DISP=(NEW,DELETE)
//DATAWK03 DD UNIT=DISK,SPACE=(CYL,(500,500)),DISP=(NEW,DELETE)
//DATAWK04 DD UNIT=DISK,SPACE=(CYL,(500,500)),DISP=(NEW,DELETE)
//DATAWK05 DD UNIT=DISK,SPACE=(CYL,(500,500)),DISP=(NEW,DELETE)
//DATAWK06 DD UNIT=DISK,SPACE=(CYL,(500,500)),DISP=(NEW,DELETE)
//DATAWK07 DD UNIT=DISK,SPACE=(CYL,(500,500)),DISP=(NEW,DELETE)
//DATAWK08 DD UNIT=DISK,SPACE=(CYL,(500,500)),DISP=(NEW,DELETE)
//DATAWK09 DD UNIT=DISK,SPACE=(CYL,(500,500)),DISP=(NEW,DELETE)
//DATAWK10 DD UNIT=DISK,SPACE=(CYL,(500,500)),DISP=(NEW,DELETE)
//DATAWK11 DD UNIT=DISK,SPACE=(CYL,(500,500)),DISP=(NEW,DELETE)
//DATAWK12 DD UNIT=DISK,SPACE=(CYL,(500,500)),DISP=(NEW,DELETE)
//DATAWK13 DD UNIT=DISK,SPACE=(CYL,(500,500)),DISP=(NEW,DELETE)
//DATAWK14 DD UNIT=DISK,SPACE=(CYL,(500,500)),DISP=(NEW,DELETE)
//DATAWK15 DD UNIT=DISK,SPACE=(CYL,(500,500)),DISP=(NEW,DELETE)
//DATAWK16 DD UNIT=DISK,SPACE=(CYL,(500,500)),DISP=(NEW,DELETE)
//DATAWK17 DD UNIT=DISK,SPACE=(CYL,(500,500)),DISP=(NEW,DELETE)
//DATAWK18 DD UNIT=DISK,SPACE=(CYL,(500,500)),DISP=(NEW,DELETE)
//DATAWK19 DD UNIT=DISK,SPACE=(CYL,(500,500)),DISP=(NEW,DELETE)
//DATAWK20 DD UNIT=DISK,SPACE=(CYL,(500,500)),DISP=(NEW,DELETE)
//DATAWK21 DD UNIT=DISK,SPACE=(CYL,(500,500)),DISP=(NEW,DELETE)
//DATAWK22 DD UNIT=DISK,SPACE=(CYL,(500,500)),DISP=(NEW,DELETE)
//DATAWK23 DD UNIT=DISK,SPACE=(CYL,(500,500)),DISP=(NEW,DELETE)
//DATAWK24 DD UNIT=DISK,SPACE=(CYL,(500,500)),DISP=(NEW,DELETE)