zOs/JCL/SOER4
//A540769I JOB (CP00,KE50), 00010001
// MSGCLASS=T,TIME=1440,
// NOTIFY=A540769
//*MAIN CLASS=LOG
//S1 EXEC PGM=DSNUTILB,PARM='DBAF,A540769I.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 *
LOAD DATA LOG NO RESUME NO REPLACE INDDN INCAT
EBCDIC CCSID(00500,00000,00000)
SORTKEYS 10727860
INTO TABLE "OA1A"."TNI300A101A"
WHEN(00001:00002) = X'0033'
( "NI300024"
POSITION( 00003:00023) CHAR(00021)
, "NI300156"
POSITION( 00024:00024) CHAR(00001)
, "NI300174"
POSITION( 00025:00095) CHAR(00071)
, "NI300011"
POSITION( 00096:00105) DATE EXTERNAL
, "NI300150"
POSITION( 00106:00106) CHAR(00001)
, "NI300122"
POSITION( 00107:00151) CHAR(00045)
, "NI300020"
POSITION( 00152:00152) CHAR(00001)
, "NI300107"
POSITION( 00153:00177) CHAR(00025)
, "NI300175"
POSITION( 00178:00186) CHAR(00009)
, "NI300063"
POSITION( 00187:00187) CHAR(00001)
, "NI300173"
POSITION( 00188:00191) CHAR(00004)
, "NI300120"
POSITION( 00192:00195) CHAR(00004)
, "NI300181"
POSITION( 00196:00199) CHAR(00004)
, "NI300182"
POSITION( 00200:00209) DATE EXTERNAL
, "NI300169"
POSITION( 00210:00219) DATE EXTERNAL
, "NI300125"
POSITION( 00220:00229) DATE EXTERNAL
, "NI300016"
POSITION( 00230:00239) DATE EXTERNAL
, "NI300041"
POSITION( 00240:00249) DATE EXTERNAL
, "NI300124"
POSITION( 00250:00256) DECIMAL
, "NI300113"
POSITION( 00257:00272) DECIMAL
, "NI300112"
POSITION( 00273:00288) DECIMAL
, "NI300114"
POSITION( 00289:00304) DECIMAL
, "NI300171"
POSITION( 00305:00312) DECIMAL
, "NI300170"
POSITION( 00313:00320) DECIMAL
, "NI300172"
POSITION( 00321:00328) DECIMAL
, "NI300185"
POSITION( 00329:00336) DECIMAL
, "NI300184"
POSITION( 00337:00344) DECIMAL
, "NI300186"
POSITION( 00345:00352) DECIMAL
, "NI300098"
POSITION( 00353:00368) DECIMAL
, "NI300097"
POSITION( 00369:00384) DECIMAL
, "NI300099"
POSITION( 00385:00400) DECIMAL
, "NI300177"
POSITION( 00401:00416) DECIMAL
, "NI300139"
POSITION( 00417:00417) CHAR(00001)
, "NI300018"
POSITION( 00418:00418) CHAR(00001)
, "NI300109"
POSITION( 00419:00489) CHAR(00071)
, "NI300108"
POSITION( 00490:00514) CHAR(00025)
, "NI300021"
POSITION( 00515:00522) CHAR(00008)
, "NI300164"
POSITION( 00523:00548) TIMESTAMP EXTERNAL
, "NI300105"
POSITION( 00549:00558) DATE EXTERNAL
, "NI300110"
POSITION( 00559:00581) CHAR(00023)
, "NI300190"
POSITION( 00582:00582) CHAR(00001)
, "NI300191"
POSITION( 00583:00583) CHAR(00001)
, "NI300192"
POSITION( 00584:00599) CHAR(00016)
, "NI300193"
POSITION( 00600:00615) DECIMAL
, "NI300194"
POSITION( 00616:00620) CHAR(00005)
, "NI300195"
POSITION( 00621:00625) CHAR(00005)
, "NI300196"
POSITION( 00626:00629) CHAR(00004)
, "NI300197"
POSITION( 00630:00633) INTEGER
, "NI300198"
POSITION( 00634:00637) INTEGER
, "NI300199"
POSITION( 00638:00639) CHAR(00002)
, "NI300200"
POSITION( 00640:00641) CHAR(00002)
, "NI300201"
POSITION( 00642:00657) DECIMAL
, "NI300202"
POSITION( 00658:00673) DECIMAL
, "NI300203"
POSITION( 00674:00689) DECIMAL
, "NI300204"
POSITION( 00690:00705) DECIMAL
)
SORTNUM 8 SORTDEVT DISK
ENFORCE NO
//INCAT DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00001
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00002
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00003
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00004
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00005
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00006
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00007
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00008
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00009
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00010
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00011
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00012
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00013
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00014
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00015
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00016
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00017
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00018
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00019
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00020
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00021
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00022
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00023
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00024
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00025
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00026
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00027
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00028
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00029
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00030
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00031
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00032
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00033
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00034
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00035
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00036
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00037
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00038
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00039
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00040
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00041
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00042
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00043
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00044
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00045
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00046
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00047
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00048
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00049
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00050
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00051
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00052
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00053
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00054
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00055
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00056
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00057
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00058
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00059
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00060
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00061
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00062
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.P00063
// DD DISP=SHR,DSN=DSN.DBA.NI02090Q.ULD.T0003.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)