zOs/JCL/DB2LOAVO

//A540769L  JOB (CP00,KE50)                                             00010001
//S1       EXEC PGM=DSNUTILB,PARM='DBZF,A540769L.LOAD'                  00020001
//SYSMAP   DD SYSOUT=*
//SYSUT1   DD DISP=(,PASS),UNIT=SYSDA
//SORTOUT  DD DISP=(,PASS),UNIT=SYSDA
//SYSERR   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTEMPL  DD DSN=DBAF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
TEMPLATE IN7
     DSN('WOK.T007.UNLOAD.ALT')
     DISP(OLD,KEEP,KEEP)
LOAD DATA INDDN IN7  LOG NO RESUME NO REPLACE  COPYDDN(TCOPYD)
INTO TABLE "OA1Z"."TNZ007A1"
(MQCATEGORY              POSITION (1) SMALLINT ,
 MQSUBGROUP              POSITION (3) SMALLINT ,
 MQNAME                  POSITION (5) CHAR  (48) ,
 MQCICS                  POSITION (53) CHAR  (20) ,
 FUNCTION                POSITION (73) CHAR  (5) ,
 LUWLIMIT                POSITION (78) INTEGER ,
 CHECKLIMIT              POSITION (82) SMALLINT ,
 DESCRIPTION             POSITION (84) CHAR  (200) ,
 COMMENT                 POSITION (284) CHAR  (200) )
TEMPLATE IN8
     DSN('WOK.T008.UNLOAD.ALT')
     DISP(OLD,KEEP,KEEP)
LOAD DATA INDDN IN8  LOG NO RESUME NO REPLACE  COPYDDN(TCOPYD)
     INTO TABLE "OA1Z"."TNZ008A1"
(FROMTIMERANGE         POSITION (1) TIME EXTERNAL  (8) ,
 TOTIMERANGE           POSITION (9) TIME EXTERNAL  (8) ,
 MQPRIORITY            POSITION (17) SMALLINT ,
 MQCATEGORY            POSITION (19) SMALLINT ,
 MQSUBGROUP            POSITION (21) SMALLINT ,
 PROCESSIBLE           POSITION (23) CHAR  (1) ,
 TRIGGEROPTION         POSITION (24) CHAR  (1) ,
 TRIGGERTYPE           POSITION (25) CHAR  (20) ,
 DESCRIPTION           POSITION (45) CHAR  (200) ,
 COMMENT               POSITION (245) CHAR  (200) )