zOs/JCL/XBREPA

//XBREPA01 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 1 tb=BUA.XBFA0003HS001001 part 42
//*        load  XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.HS001001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.HS001001.PG
//LOA1   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP01.LOAD1'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFA0003HS001001 PARTLEVEL 42

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.HS001001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFA0003HS001001 PART 42
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFA0003HS001001   PART 042 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   ENID                                   POSITION(       5         )
   INTEGER                                      ,
   ENGROUPID                              POSITION(       9         )
   INTEGER                                      ,
   ENNEXTID                               POSITION(      13         )
   INTEGER
        NULLIF(      17)='?',
   EAUUIDHT                               POSITION(      18         )
   CHAR(                     35)
        NULLIF(      53)='?',
   EATRNVON                               POSITION(      54         )
   CHAR(                     20)                ,
   EATRNBIS                               POSITION(      74         )
   CHAR(                     20)                ,
   EZTREE                                 POSITION(      94         )
   SMALLINT                                     ,
   EYHASHALG                              POSITION(      96         )
   SMALLINT                                     ,
   ESTYPE                                 POSITION(      98         )
   SMALLINT                                     ,
   EZCOUNT                                POSITION(     100         )
   SMALLINT                                     ,
   EADATA                                 POSITION(     102         )
   VARCHAR
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA02 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 2 tb=BUA.XBFA0003HS001001 part 43
//*        load  XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.HS001001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.HS001001.PL
//LOA2   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP02.LOAD2'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFA0003HS001001 PARTLEVEL 43

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.HS001001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFA0003HS001001 PART 43
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFA0003HS001001   PART 043 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   ENID                                   POSITION(       5         )
   INTEGER                                      ,
   ENGROUPID                              POSITION(       9         )
   INTEGER                                      ,
   ENNEXTID                               POSITION(      13         )
   INTEGER
        NULLIF(      17)='?',
   EAUUIDHT                               POSITION(      18         )
   CHAR(                     35)
        NULLIF(      53)='?',
   EATRNVON                               POSITION(      54         )
   CHAR(                     20)                ,
   EATRNBIS                               POSITION(      74         )
   CHAR(                     20)                ,
   EZTREE                                 POSITION(      94         )
   SMALLINT                                     ,
   EYHASHALG                              POSITION(      96         )
   SMALLINT                                     ,
   ESTYPE                                 POSITION(      98         )
   SMALLINT                                     ,
   EZCOUNT                                POSITION(     100         )
   SMALLINT                                     ,
   EADATA                                 POSITION(     102         )
   VARCHAR
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA03 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 3 tb=BUA.XBFA0003IT002001 part 42
//*        load  XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.IT002001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.IT002001.PG
//LOA3   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP03.LOAD3'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFA0003IT002001 PARTLEVEL 42

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.IT002001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFA0003IT002001 PART 42
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFA0003IT002001   PART 042 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EN1STK1                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EN1STK2                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   EA1INHALT                              POSITION(      32         )
   VARCHAR
        NULLIF(    1032)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA04 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 4 tb=BUA.XBFA0003IT002001 part 43
//*        load  XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.IT002001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.IT002001.PL
//LOA4   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP04.LOAD4'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFA0003IT002001 PARTLEVEL 43

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.IT002001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFA0003IT002001 PART 43
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFA0003IT002001   PART 043 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EN1STK1                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EN1STK2                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   EA1INHALT                              POSITION(      32         )
   VARCHAR
        NULLIF(    1032)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA05 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 5 tb=BUA.XBFA0003IT003001 part 42
//*        load  XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.IT003001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.IT003001.PG
//LOA5   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP05.LOAD5'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFA0003IT003001 PARTLEVEL 42

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.IT003001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFA0003IT003001 PART 42
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFA0003IT003001   PART 042 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EN1STK1                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EN1STK2                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   EA1INHALT                              POSITION(      32         )
   VARCHAR
        NULLIF(    1032)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA06 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 6 tb=BUA.XBFA0003IT003001 part 43
//*        load  XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.IT003001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.IT003001.PL
//LOA6   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP06.LOAD6'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFA0003IT003001 PARTLEVEL 43

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.IT003001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFA0003IT003001 PART 43
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFA0003IT003001   PART 043 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EN1STK1                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EN1STK2                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   EA1INHALT                              POSITION(      32         )
   VARCHAR
        NULLIF(    1032)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA07 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 7 tb=BUA.XBFA0003PS001001 part 42
//*        load  XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.PS001001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.PS001001.PG
//LOA7   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP07.LOAD7'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFA0003PS001001 PARTLEVEL 42

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.PS001001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFA0003PS001001 PART 42
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFA0003PS001001   PART 042 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EN1OWNER                               POSITION(      64         )
   SMALLINT
        NULLIF(      66)='?',
   EA1BU                                  POSITION(      67         )
   CHAR(                      4)
        NULLIF(      71)='?',
   EN1CASEID                              POSITION(      72         )
   CHAR(                     10)
        NULLIF(      82)='?',
   EC1PORTUEBER                           POSITION(      83         )
   CHAR(                      1)
        NULLIF(      84)='?',
   EN1CIF                                 POSITION(      85         )
   CHAR(                     12)
        NULLIF(      97)='?',
   ED1CRDATE                              POSITION(      98         )
   DATE EXTERNAL(            10)
        NULLIF(     108)='?',
   EN1PIDORIG                             POSITION(     109         )
   CHAR(                     10)
        NULLIF(     119)='?',
   EN1PIDPROBOWN                          POSITION(     120         )
   CHAR(                     10)
        NULLIF(     130)='?',
   EN1PIDRM                               POSITION(     131         )
   CHAR(                     10)
        NULLIF(     141)='?',
   EN1CIFMUTFLAG                          POSITION(     142         )
   CHAR(                      1)
        NULLIF(     143)='?',
   EA1NAMEORIG                            POSITION(     144         )
   CHAR(                     65)
        NULLIF(     209)='?',
   EA1NAMEPROBOWN                         POSITION(     210         )
   CHAR(                     65)
        NULLIF(     275)='?',
   EA1NAMERM                              POSITION(     276         )
   CHAR(                     65)
        NULLIF(     341)='?',
   EN1DK                                  POSITION(     342         )
   CHAR(                      4)
        NULLIF(     346)='?',
   ET1LOGPROD                             POSITION(     347         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(     373)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA08 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 8 tb=BUA.XBFA0003PS001001 part 43
//*        load  XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.PS001001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.PS001001.PL
//LOA8   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP08.LOAD8'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFA0003PS001001 PARTLEVEL 43

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.PS001001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFA0003PS001001 PART 43
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFA0003PS001001   PART 043 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EN1OWNER                               POSITION(      64         )
   SMALLINT
        NULLIF(      66)='?',
   EA1BU                                  POSITION(      67         )
   CHAR(                      4)
        NULLIF(      71)='?',
   EN1CASEID                              POSITION(      72         )
   CHAR(                     10)
        NULLIF(      82)='?',
   EC1PORTUEBER                           POSITION(      83         )
   CHAR(                      1)
        NULLIF(      84)='?',
   EN1CIF                                 POSITION(      85         )
   CHAR(                     12)
        NULLIF(      97)='?',
   ED1CRDATE                              POSITION(      98         )
   DATE EXTERNAL(            10)
        NULLIF(     108)='?',
   EN1PIDORIG                             POSITION(     109         )
   CHAR(                     10)
        NULLIF(     119)='?',
   EN1PIDPROBOWN                          POSITION(     120         )
   CHAR(                     10)
        NULLIF(     130)='?',
   EN1PIDRM                               POSITION(     131         )
   CHAR(                     10)
        NULLIF(     141)='?',
   EN1CIFMUTFLAG                          POSITION(     142         )
   CHAR(                      1)
        NULLIF(     143)='?',
   EA1NAMEORIG                            POSITION(     144         )
   CHAR(                     65)
        NULLIF(     209)='?',
   EA1NAMEPROBOWN                         POSITION(     210         )
   CHAR(                     65)
        NULLIF(     275)='?',
   EA1NAMERM                              POSITION(     276         )
   CHAR(                     65)
        NULLIF(     341)='?',
   EN1DK                                  POSITION(     342         )
   CHAR(                      4)
        NULLIF(     346)='?',
   ET1LOGPROD                             POSITION(     347         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(     373)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA09 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 9 tb=BUA.XBFA0003PS002001 part 42
//*        load  XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.PS002001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.PS002001.PG
//LOA9   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP09.LOAD9'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFA0003PS002001 PARTLEVEL 42

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.PS002001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFA0003PS002001 PART 42
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFA0003PS002001   PART 042 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EA1ATRN                                POSITION(      64         )
   CHAR(                     20)
        NULLIF(      84)='?',
   EN1PORT                                POSITION(      85         )
   SMALLINT
        NULLIF(      87)='?',
   EY1FILETYP                             POSITION(      88         )
   CHAR(                      8)
        NULLIF(      96)='?',
   EN1EXTDSNAME                           POSITION(      97         )
   CHAR(                    200)
        NULLIF(     297)='?',
   EN1CHECK                               POSITION(     298         )
   CHAR(                     20)
        NULLIF(     318)='?',
   EA1EXREF                               POSITION(     319         )
   CHAR(                    128)
        NULLIF(     447)='?',
   EN1UUID                                POSITION(     448         )
   CHAR(                     20)
        NULLIF(     468)='?',
   EC1DSA                                 POSITION(     469         )
   SMALLINT
        NULLIF(     471)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA00 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 10 tb=BUA.XBFA0003PS002001 part 43
//*        load  XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.PS002001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.PS002001.PL
//LOA10   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP00.LOAD10'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFA0003PS002001 PARTLEVEL 43

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.PS002001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFA0003PS002001 PART 43
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFA0003PS002001   PART 043 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EA1ATRN                                POSITION(      64         )
   CHAR(                     20)
        NULLIF(      84)='?',
   EN1PORT                                POSITION(      85         )
   SMALLINT
        NULLIF(      87)='?',
   EY1FILETYP                             POSITION(      88         )
   CHAR(                      8)
        NULLIF(      96)='?',
   EN1EXTDSNAME                           POSITION(      97         )
   CHAR(                    200)
        NULLIF(     297)='?',
   EN1CHECK                               POSITION(     298         )
   CHAR(                     20)
        NULLIF(     318)='?',
   EA1EXREF                               POSITION(     319         )
   CHAR(                    128)
        NULLIF(     447)='?',
   EN1UUID                                POSITION(     448         )
   CHAR(                     20)
        NULLIF(     468)='?',
   EC1DSA                                 POSITION(     469         )
   SMALLINT
        NULLIF(     471)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA01 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 11 tb=BUA.XBFA0003PS003001 part 42
//*        load  XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.PS003001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.PS003001.PG
//LOA11   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP01.LOAD11'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFA0003PS003001 PARTLEVEL 42

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.PS003001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFA0003PS003001 PART 42
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFA0003PS003001   PART 042 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EA1ATRN                                POSITION(      64         )
   CHAR(                     20)
        NULLIF(      84)='?',
   EN1PORT                                POSITION(      85         )
   SMALLINT
        NULLIF(      87)='?',
   EY1FILETYP                             POSITION(      88         )
   CHAR(                      8)
        NULLIF(      96)='?',
   EN1EXTDSNAME                           POSITION(      97         )
   CHAR(                    200)
        NULLIF(     297)='?',
   EN1CHECK                               POSITION(     298         )
   CHAR(                     20)
        NULLIF(     318)='?',
   EA1EXREF                               POSITION(     319         )
   CHAR(                    128)
        NULLIF(     447)='?',
   EN1UUID                                POSITION(     448         )
   CHAR(                     20)
        NULLIF(     468)='?',
   EC1DSA                                 POSITION(     469         )
   SMALLINT
        NULLIF(     471)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA02 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 12 tb=BUA.XBFA0003PS003001 part 43
//*        load  XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.PS003001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.PS003001.PL
//LOA12   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP02.LOAD12'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFA0003PS003001 PARTLEVEL 43

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFA0003.PRT003.PS003001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFA0003PS003001 PART 43
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFA0003PS003001   PART 043 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EA1ATRN                                POSITION(      64         )
   CHAR(                     20)
        NULLIF(      84)='?',
   EN1PORT                                POSITION(      85         )
   SMALLINT
        NULLIF(      87)='?',
   EY1FILETYP                             POSITION(      88         )
   CHAR(                      8)
        NULLIF(      96)='?',
   EN1EXTDSNAME                           POSITION(      97         )
   CHAR(                    200)
        NULLIF(     297)='?',
   EN1CHECK                               POSITION(     298         )
   CHAR(                     20)
        NULLIF(     318)='?',
   EA1EXREF                               POSITION(     319         )
   CHAR(                    128)
        NULLIF(     447)='?',
   EN1UUID                                POSITION(     448         )
   CHAR(                     20)
        NULLIF(     468)='?',
   EC1DSA                                 POSITION(     469         )
   SMALLINT
        NULLIF(     471)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA03 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 13 tb=BUA.XBFBV006HS001001 part 2
//*        load  XB.RZ2.P0.OVRFLD.XBFBV006.PRT001.HS001001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFBV006.PRT001.HS001001.PG
//LOA13   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP03.LOAD13'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFBV006HS001001 PARTLEVEL 2

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFBV006.PRT001.HS001001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFBV006HS001001 PART 2
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFBV006HS001001   PART 002 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   ENID                                   POSITION(       5         )
   INTEGER                                      ,
   ENGROUPID                              POSITION(       9         )
   INTEGER                                      ,
   ENNEXTID                               POSITION(      13         )
   INTEGER
        NULLIF(      17)='?',
   EAUUIDHT                               POSITION(      18         )
   CHAR(                     35)
        NULLIF(      53)='?',
   EATRNVON                               POSITION(      54         )
   CHAR(                     20)                ,
   EATRNBIS                               POSITION(      74         )
   CHAR(                     20)                ,
   EZTREE                                 POSITION(      94         )
   SMALLINT                                     ,
   EYHASHALG                              POSITION(      96         )
   SMALLINT                                     ,
   ESTYPE                                 POSITION(      98         )
   SMALLINT                                     ,
   EZCOUNT                                POSITION(     100         )
   SMALLINT                                     ,
   EADATA                                 POSITION(     102         )
   VARCHAR
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA04 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 14 tb=BUA.XBFBV006HS001001 part 3
//*        load  XB.RZ2.P0.OVRFLD.XBFBV006.PRT001.HS001001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFBV006.PRT001.HS001001.PL
//LOA14   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP04.LOAD14'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFBV006HS001001 PARTLEVEL 3

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFBV006.PRT001.HS001001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFBV006HS001001 PART 3
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFBV006HS001001   PART 003 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   ENID                                   POSITION(       5         )
   INTEGER                                      ,
   ENGROUPID                              POSITION(       9         )
   INTEGER                                      ,
   ENNEXTID                               POSITION(      13         )
   INTEGER
        NULLIF(      17)='?',
   EAUUIDHT                               POSITION(      18         )
   CHAR(                     35)
        NULLIF(      53)='?',
   EATRNVON                               POSITION(      54         )
   CHAR(                     20)                ,
   EATRNBIS                               POSITION(      74         )
   CHAR(                     20)                ,
   EZTREE                                 POSITION(      94         )
   SMALLINT                                     ,
   EYHASHALG                              POSITION(      96         )
   SMALLINT                                     ,
   ESTYPE                                 POSITION(      98         )
   SMALLINT                                     ,
   EZCOUNT                                POSITION(     100         )
   SMALLINT                                     ,
   EADATA                                 POSITION(     102         )
   VARCHAR
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA05 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 15 tb=BUA.XBFBV006IT002001 part 2
//*        load  XB.RZ2.P0.OVRFLD.XBFBV006.PRT001.IT002001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFBV006.PRT001.IT002001.PG
//LOA15   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP05.LOAD15'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFBV006IT002001 PARTLEVEL 2

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFBV006.PRT001.IT002001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFBV006IT002001 PART 2
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFBV006IT002001   PART 002 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EN1STK1                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EN1STK2                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   EA1INHALT                              POSITION(      32         )
   VARCHAR
        NULLIF(    1032)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA06 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 16 tb=BUA.XBFBV006IT002001 part 3
//*        load  XB.RZ2.P0.OVRFLD.XBFBV006.PRT001.IT002001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFBV006.PRT001.IT002001.PL
//LOA16   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP06.LOAD16'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFBV006IT002001 PARTLEVEL 3

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFBV006.PRT001.IT002001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFBV006IT002001 PART 3
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFBV006IT002001   PART 003 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EN1STK1                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EN1STK2                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   EA1INHALT                              POSITION(      32         )
   VARCHAR
        NULLIF(    1032)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA07 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 17 tb=BUA.XBFBV006PS001001 part 2
//*        load  XB.RZ2.P0.OVRFLD.XBFBV006.PRT001.PS001001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFBV006.PRT001.PS001001.PG
//LOA17   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP07.LOAD17'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFBV006PS001001 PARTLEVEL 2

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFBV006.PRT001.PS001001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFBV006PS001001 PART 2
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFBV006PS001001   PART 002 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EN1OWNER                               POSITION(      64         )
   SMALLINT
        NULLIF(      66)='?',
   EA1BU                                  POSITION(      67         )
   CHAR(                      4)
        NULLIF(      71)='?',
   ET1STIME                               POSITION(      72         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      98)='?',
   EA1CHANNEL                             POSITION(      99         )
   CHAR(                     21)
        NULLIF(     120)='?',
   EA1GAOTAG                              POSITION(     121         )
   CHAR(                     21)
        NULLIF(     142)='?',
   ED1DATE                                POSITION(     143         )
   DATE EXTERNAL(            10)
        NULLIF(     153)='?',
   ET1LOGPROD                             POSITION(     154         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(     180)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA08 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 18 tb=BUA.XBFBV006PS001001 part 3
//*        load  XB.RZ2.P0.OVRFLD.XBFBV006.PRT001.PS001001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFBV006.PRT001.PS001001.PL
//LOA18   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP08.LOAD18'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFBV006PS001001 PARTLEVEL 3

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFBV006.PRT001.PS001001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFBV006PS001001 PART 3
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFBV006PS001001   PART 003 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EN1OWNER                               POSITION(      64         )
   SMALLINT
        NULLIF(      66)='?',
   EA1BU                                  POSITION(      67         )
   CHAR(                      4)
        NULLIF(      71)='?',
   ET1STIME                               POSITION(      72         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      98)='?',
   EA1CHANNEL                             POSITION(      99         )
   CHAR(                     21)
        NULLIF(     120)='?',
   EA1GAOTAG                              POSITION(     121         )
   CHAR(                     21)
        NULLIF(     142)='?',
   ED1DATE                                POSITION(     143         )
   DATE EXTERNAL(            10)
        NULLIF(     153)='?',
   ET1LOGPROD                             POSITION(     154         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(     180)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA09 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 19 tb=BUA.XBFBV006PS002001 part 2
//*        load  XB.RZ2.P0.OVRFLD.XBFBV006.PRT001.PS002001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFBV006.PRT001.PS002001.PG
//LOA19   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP09.LOAD19'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFBV006PS002001 PARTLEVEL 2

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFBV006.PRT001.PS002001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFBV006PS002001 PART 2
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFBV006PS002001   PART 002 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EA1ATRN                                POSITION(      64         )
   CHAR(                     20)
        NULLIF(      84)='?',
   EY1DUMMYSEP                            POSITION(      85         )
   CHAR(                      1)
        NULLIF(      86)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA00 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 20 tb=BUA.XBFBV006PS002001 part 3
//*        load  XB.RZ2.P0.OVRFLD.XBFBV006.PRT001.PS002001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFBV006.PRT001.PS002001.PL
//LOA20   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP00.LOAD20'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFBV006PS002001 PARTLEVEL 3

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFBV006.PRT001.PS002001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFBV006PS002001 PART 3
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFBV006PS002001   PART 003 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EA1ATRN                                POSITION(      64         )
   CHAR(                     20)
        NULLIF(      84)='?',
   EY1DUMMYSEP                            POSITION(      85         )
   CHAR(                      1)
        NULLIF(      86)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA01 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 21 tb=BUA.XBFCD005HS001001 part 22
//*        load  XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.HS001001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.HS001001.PG
//LOA21   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP01.LOAD21'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFCD005HS001001 PARTLEVEL 22

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.HS001001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFCD005HS001001 PART 22
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFCD005HS001001   PART 022 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   ENID                                   POSITION(       5         )
   INTEGER                                      ,
   ENGROUPID                              POSITION(       9         )
   INTEGER                                      ,
   ENNEXTID                               POSITION(      13         )
   INTEGER
        NULLIF(      17)='?',
   EAUUIDHT                               POSITION(      18         )
   CHAR(                     35)
        NULLIF(      53)='?',
   EATRNVON                               POSITION(      54         )
   CHAR(                     20)                ,
   EATRNBIS                               POSITION(      74         )
   CHAR(                     20)                ,
   EZTREE                                 POSITION(      94         )
   SMALLINT                                     ,
   EYHASHALG                              POSITION(      96         )
   SMALLINT                                     ,
   ESTYPE                                 POSITION(      98         )
   SMALLINT                                     ,
   EZCOUNT                                POSITION(     100         )
   SMALLINT                                     ,
   EADATA                                 POSITION(     102         )
   VARCHAR
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA02 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 22 tb=BUA.XBFCD005HS001001 part 23
//*        load  XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.HS001001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.HS001001.PL
//LOA22   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP02.LOAD22'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFCD005HS001001 PARTLEVEL 23

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.HS001001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFCD005HS001001 PART 23
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFCD005HS001001   PART 023 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   ENID                                   POSITION(       5         )
   INTEGER                                      ,
   ENGROUPID                              POSITION(       9         )
   INTEGER                                      ,
   ENNEXTID                               POSITION(      13         )
   INTEGER
        NULLIF(      17)='?',
   EAUUIDHT                               POSITION(      18         )
   CHAR(                     35)
        NULLIF(      53)='?',
   EATRNVON                               POSITION(      54         )
   CHAR(                     20)                ,
   EATRNBIS                               POSITION(      74         )
   CHAR(                     20)                ,
   EZTREE                                 POSITION(      94         )
   SMALLINT                                     ,
   EYHASHALG                              POSITION(      96         )
   SMALLINT                                     ,
   ESTYPE                                 POSITION(      98         )
   SMALLINT                                     ,
   EZCOUNT                                POSITION(     100         )
   SMALLINT                                     ,
   EADATA                                 POSITION(     102         )
   VARCHAR
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA03 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 23 tb=BUA.XBFCD005PS002001 part 22
//*        load  XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PS002001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PS002001.PG
//LOA23   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP03.LOAD23'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFCD005PS002001 PARTLEVEL 22

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PS002001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFCD005PS002001 PART 22
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFCD005PS002001   PART 022 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EA1ATRN                                POSITION(      64         )
   CHAR(                     20)
        NULLIF(      84)='?',
   EN1PORT                                POSITION(      85         )
   SMALLINT
        NULLIF(      87)='?',
   EY1FILETYP                             POSITION(      88         )
   CHAR(                      8)
        NULLIF(      96)='?',
   EC1DSA                                 POSITION(      97         )
   SMALLINT
        NULLIF(      99)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA04 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 24 tb=BUA.XBFCD005PS002001 part 23
//*        load  XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PS002001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PS002001.PL
//LOA24   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP04.LOAD24'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFCD005PS002001 PARTLEVEL 23

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PS002001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFCD005PS002001 PART 23
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFCD005PS002001   PART 023 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EA1ATRN                                POSITION(      64         )
   CHAR(                     20)
        NULLIF(      84)='?',
   EN1PORT                                POSITION(      85         )
   SMALLINT
        NULLIF(      87)='?',
   EY1FILETYP                             POSITION(      88         )
   CHAR(                      8)
        NULLIF(      96)='?',
   EC1DSA                                 POSITION(      97         )
   SMALLINT
        NULLIF(      99)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA05 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 25 tb=BUA.XBFCD005PS001001 part 22
//*        load  XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PS001001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PS001001.PG
//LOA25   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP05.LOAD25'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFCD005PS001001 PARTLEVEL 22

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PS001001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFCD005PS001001 PART 22
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFCD005PS001001   PART 022 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EN1OWNER                               POSITION(      64         )
   SMALLINT
        NULLIF(      66)='?',
   EA1BU                                  POSITION(      67         )
   CHAR(                      4)
        NULLIF(      71)='?',
   EY1DIRECTION                           POSITION(      72         )
   CHAR(                      1)
        NULLIF(      73)='?',
   EN1SENDER                              POSITION(      74         )
   CHAR(                     12)
        NULLIF(      86)='?',
   EN1RECEIVER                            POSITION(      87         )
   CHAR(                     12)
        NULLIF(      99)='?',
   ED1CREATIONDATE                        POSITION(     100         )
   DATE EXTERNAL(            10)
        NULLIF(     110)='?',
   EA1SYSTEM                              POSITION(     111         )
   CHAR(                     12)
        NULLIF(     123)='?',
   EB1SEQUENCENO                          POSITION(     124:     131)
   DECIMAL
        NULLIF(     132)='?',
   EB1SESSIONNO                           POSITION(     133:     140)
   DECIMAL
        NULLIF(     141)='?',
   EB1MSGNO                               POSITION(     142:     149)
   DECIMAL
        NULLIF(     150)='?',
   ED1SENDERDATE                          POSITION(     151         )
   DATE EXTERNAL(            10)
        NULLIF(     161)='?',
   EA1SENDERBIC12                         POSITION(     162         )
   CHAR(                      1)
        NULLIF(     163)='?',
   EN1ADDITIONAL                          POSITION(     164         )
   SMALLINT
        NULLIF(     166)='?',
   EC1PORTUEBER                           POSITION(     167         )
   CHAR(                      1)
        NULLIF(     168)='?',
   EN1OWNERX                              POSITION(     169         )
   CHAR(                     12)
        NULLIF(     181)='?',
   EN1OWNERSUB                            POSITION(     182         )
   CHAR(                      4)
        NULLIF(     186)='?',
   ED1EXTRACTDATE                         POSITION(     187         )
   DATE EXTERNAL(            10)
        NULLIF(     197)='?',
   EA1REFKEY                              POSITION(     198         )
   CHAR(                     16)
        NULLIF(     214)='?',
   EN1TRANSACTNO                          POSITION(     215         )
   CHAR(                     35)
        NULLIF(     250)='?',
   EA1MUR                                 POSITION(     251         )
   CHAR(                     16)
        NULLIF(     267)='?',
   EY1STAGE                               POSITION(     268         )
   CHAR(                      1)
        NULLIF(     269)='?',
   EY1SERVICE                             POSITION(     270         )
   CHAR(                      1)
        NULLIF(     271)='?',
   EY1SANCTIONFILTER                      POSITION(     272         )
   CHAR(                      1)
        NULLIF(     273)='?',
   ED1CURRENCY1                           POSITION(     274         )
   CHAR(                      3)
        NULLIF(     277)='?',
   ED1VALUTA                              POSITION(     278         )
   DATE EXTERNAL(            10)
        NULLIF(     288)='?',
   EB1AMOUNT1                             POSITION(     289:     296)
   DECIMAL
        NULLIF(     297)='?',
   EA1COPY                                POSITION(     298         )
   CHAR(                      3)
        NULLIF(     301)='?',
   EA1RELREF                              POSITION(     302         )
   CHAR(                     16)
        NULLIF(     318)='?',
   ED1CURRENCY2                           POSITION(     319         )
   CHAR(                      3)
        NULLIF(     322)='?',
   EB1AMOUNT2                             POSITION(     323:     330)
   DECIMAL
        NULLIF(     331)='?',
   EN1ISINX                               POSITION(     332         )
   CHAR(                     34)
        NULLIF(     366)='?',
   EY1PRIORITY                            POSITION(     367         )
   CHAR(                      1)
        NULLIF(     368)='?',
   EN1FURTHER                             POSITION(     369         )
   CHAR(                      3)
        NULLIF(     372)='?',
   ED1SETTLEMENTDATE                      POSITION(     373         )
   DATE EXTERNAL(            10)
        NULLIF(     383)='?',
   ED1TRADEDATE                           POSITION(     384         )
   DATE EXTERNAL(            10)
        NULLIF(     394)='?',
   EA1ORDERACC                            POSITION(     395         )
   CHAR(                     35)
        NULLIF(     430)='?',
   EA1RECEIVERCOR                         POSITION(     431         )
   CHAR(                     12)
        NULLIF(     443)='?',
   EA1SENDERCOR                           POSITION(     444         )
   CHAR(                     32)
        NULLIF(     476)='?',
   EA1ACCWITHINST                         POSITION(     477         )
   CHAR(                     35)
        NULLIF(     512)='?',
   EA1BENEFICACC                          POSITION(     513         )
   CHAR(                     35)
        NULLIF(     548)='?',
   EA1BENEFICARYINST                      POSITION(     549         )
   CHAR(                     11)
        NULLIF(     560)='?',
   EA1SETTLEMENTPLACE                     POSITION(     561         )
   CHAR(                     32)
        NULLIF(     593)='?',
   EA1SAFEKEEPINGPLAC                     POSITION(     594         )
   CHAR(                     12)
        NULLIF(     606)='?',
   EA1LOCATION                            POSITION(     607         )
   CHAR(                     16)
        NULLIF(     623)='?',
   EN1ROUTING                             POSITION(     624         )
   CHAR(                      8)
        NULLIF(     632)='?',
   EA1VALIDATION                          POSITION(     633         )
   CHAR(                      8)
        NULLIF(     641)='?',
   EA1QUELLE                              POSITION(     642         )
   CHAR(                      6)
        NULLIF(     648)='?',
   EA1MSGID                               POSITION(     649         )
   CHAR(                     35)
        NULLIF(     684)='?',
   EA1MXMSG                               POSITION(     685         )
   CHAR(                     35)
        NULLIF(     720)='?',
   EN1TRNORIG                             POSITION(     721         )
   CHAR(                     35)
        NULLIF(     756)='?',
   EY1MXSCHEMA                            POSITION(     757         )
   CHAR(                     80)
        NULLIF(     837)='?',
   ET1LOGPROD                             POSITION(     838         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(     864)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA06 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 26 tb=BUA.XBFCD005PS001001 part 23
//*        load  XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PS001001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PS001001.PL
//LOA26   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP06.LOAD26'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFCD005PS001001 PARTLEVEL 23

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PS001001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFCD005PS001001 PART 23
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFCD005PS001001   PART 023 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EN1OWNER                               POSITION(      64         )
   SMALLINT
        NULLIF(      66)='?',
   EA1BU                                  POSITION(      67         )
   CHAR(                      4)
        NULLIF(      71)='?',
   EY1DIRECTION                           POSITION(      72         )
   CHAR(                      1)
        NULLIF(      73)='?',
   EN1SENDER                              POSITION(      74         )
   CHAR(                     12)
        NULLIF(      86)='?',
   EN1RECEIVER                            POSITION(      87         )
   CHAR(                     12)
        NULLIF(      99)='?',
   ED1CREATIONDATE                        POSITION(     100         )
   DATE EXTERNAL(            10)
        NULLIF(     110)='?',
   EA1SYSTEM                              POSITION(     111         )
   CHAR(                     12)
        NULLIF(     123)='?',
   EB1SEQUENCENO                          POSITION(     124:     131)
   DECIMAL
        NULLIF(     132)='?',
   EB1SESSIONNO                           POSITION(     133:     140)
   DECIMAL
        NULLIF(     141)='?',
   EB1MSGNO                               POSITION(     142:     149)
   DECIMAL
        NULLIF(     150)='?',
   ED1SENDERDATE                          POSITION(     151         )
   DATE EXTERNAL(            10)
        NULLIF(     161)='?',
   EA1SENDERBIC12                         POSITION(     162         )
   CHAR(                      1)
        NULLIF(     163)='?',
   EN1ADDITIONAL                          POSITION(     164         )
   SMALLINT
        NULLIF(     166)='?',
   EC1PORTUEBER                           POSITION(     167         )
   CHAR(                      1)
        NULLIF(     168)='?',
   EN1OWNERX                              POSITION(     169         )
   CHAR(                     12)
        NULLIF(     181)='?',
   EN1OWNERSUB                            POSITION(     182         )
   CHAR(                      4)
        NULLIF(     186)='?',
   ED1EXTRACTDATE                         POSITION(     187         )
   DATE EXTERNAL(            10)
        NULLIF(     197)='?',
   EA1REFKEY                              POSITION(     198         )
   CHAR(                     16)
        NULLIF(     214)='?',
   EN1TRANSACTNO                          POSITION(     215         )
   CHAR(                     35)
        NULLIF(     250)='?',
   EA1MUR                                 POSITION(     251         )
   CHAR(                     16)
        NULLIF(     267)='?',
   EY1STAGE                               POSITION(     268         )
   CHAR(                      1)
        NULLIF(     269)='?',
   EY1SERVICE                             POSITION(     270         )
   CHAR(                      1)
        NULLIF(     271)='?',
   EY1SANCTIONFILTER                      POSITION(     272         )
   CHAR(                      1)
        NULLIF(     273)='?',
   ED1CURRENCY1                           POSITION(     274         )
   CHAR(                      3)
        NULLIF(     277)='?',
   ED1VALUTA                              POSITION(     278         )
   DATE EXTERNAL(            10)
        NULLIF(     288)='?',
   EB1AMOUNT1                             POSITION(     289:     296)
   DECIMAL
        NULLIF(     297)='?',
   EA1COPY                                POSITION(     298         )
   CHAR(                      3)
        NULLIF(     301)='?',
   EA1RELREF                              POSITION(     302         )
   CHAR(                     16)
        NULLIF(     318)='?',
   ED1CURRENCY2                           POSITION(     319         )
   CHAR(                      3)
        NULLIF(     322)='?',
   EB1AMOUNT2                             POSITION(     323:     330)
   DECIMAL
        NULLIF(     331)='?',
   EN1ISINX                               POSITION(     332         )
   CHAR(                     34)
        NULLIF(     366)='?',
   EY1PRIORITY                            POSITION(     367         )
   CHAR(                      1)
        NULLIF(     368)='?',
   EN1FURTHER                             POSITION(     369         )
   CHAR(                      3)
        NULLIF(     372)='?',
   ED1SETTLEMENTDATE                      POSITION(     373         )
   DATE EXTERNAL(            10)
        NULLIF(     383)='?',
   ED1TRADEDATE                           POSITION(     384         )
   DATE EXTERNAL(            10)
        NULLIF(     394)='?',
   EA1ORDERACC                            POSITION(     395         )
   CHAR(                     35)
        NULLIF(     430)='?',
   EA1RECEIVERCOR                         POSITION(     431         )
   CHAR(                     12)
        NULLIF(     443)='?',
   EA1SENDERCOR                           POSITION(     444         )
   CHAR(                     32)
        NULLIF(     476)='?',
   EA1ACCWITHINST                         POSITION(     477         )
   CHAR(                     35)
        NULLIF(     512)='?',
   EA1BENEFICACC                          POSITION(     513         )
   CHAR(                     35)
        NULLIF(     548)='?',
   EA1BENEFICARYINST                      POSITION(     549         )
   CHAR(                     11)
        NULLIF(     560)='?',
   EA1SETTLEMENTPLACE                     POSITION(     561         )
   CHAR(                     32)
        NULLIF(     593)='?',
   EA1SAFEKEEPINGPLAC                     POSITION(     594         )
   CHAR(                     12)
        NULLIF(     606)='?',
   EA1LOCATION                            POSITION(     607         )
   CHAR(                     16)
        NULLIF(     623)='?',
   EN1ROUTING                             POSITION(     624         )
   CHAR(                      8)
        NULLIF(     632)='?',
   EA1VALIDATION                          POSITION(     633         )
   CHAR(                      8)
        NULLIF(     641)='?',
   EA1QUELLE                              POSITION(     642         )
   CHAR(                      6)
        NULLIF(     648)='?',
   EA1MSGID                               POSITION(     649         )
   CHAR(                     35)
        NULLIF(     684)='?',
   EA1MXMSG                               POSITION(     685         )
   CHAR(                     35)
        NULLIF(     720)='?',
   EN1TRNORIG                             POSITION(     721         )
   CHAR(                     35)
        NULLIF(     756)='?',
   EY1MXSCHEMA                            POSITION(     757         )
   CHAR(                     80)
        NULLIF(     837)='?',
   ET1LOGPROD                             POSITION(     838         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(     864)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA07 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 27 tb=BUA.XBFCD005PM001007 part 22
//*        load  XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001007.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001007.PG
//LOA27   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP07.LOAD27'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFCD005PM001007 PARTLEVEL 22

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001007.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFCD005PM001007 PART 22
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFCD005PM001007   PART 022 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EN1BENEFICARY                          POSITION(      26         )
   CHAR(                     34)
        NULLIF(      60)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA08 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 28 tb=BUA.XBFCD005PM001007 part 23
//*        load  XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001007.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001007.PL
//LOA28   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP08.LOAD28'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFCD005PM001007 PARTLEVEL 23

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001007.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFCD005PM001007 PART 23
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFCD005PM001007   PART 023 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EN1BENEFICARY                          POSITION(      26         )
   CHAR(                     34)
        NULLIF(      60)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA09 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 29 tb=BUA.XBFCD005PM001006 part 22
//*        load  XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001006.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001006.PG
//LOA29   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP09.LOAD29'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFCD005PM001006 PARTLEVEL 22

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001006.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFCD005PM001006 PART 22
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFCD005PM001006   PART 022 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EA1ORDERINGINST                        POSITION(      26         )
   CHAR(                     34)
        NULLIF(      60)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA00 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 30 tb=BUA.XBFCD005PM001006 part 23
//*        load  XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001006.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001006.PL
//LOA30   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP00.LOAD30'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFCD005PM001006 PARTLEVEL 23

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001006.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFCD005PM001006 PART 23
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFCD005PM001006   PART 023 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EA1ORDERINGINST                        POSITION(      26         )
   CHAR(                     34)
        NULLIF(      60)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA01 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 31 tb=BUA.XBFCD005PM001005 part 22
//*        load  XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001005.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001005.PG
//LOA31   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP01.LOAD31'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFCD005PM001005 PARTLEVEL 22

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001005.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFCD005PM001005 PART 22
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFCD005PM001005   PART 022 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EA1ORDERINGCUST                        POSITION(      26         )
   CHAR(                     34)
        NULLIF(      60)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA02 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 32 tb=BUA.XBFCD005PM001005 part 23
//*        load  XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001005.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001005.PL
//LOA32   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP02.LOAD32'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFCD005PM001005 PARTLEVEL 23

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001005.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFCD005PM001005 PART 23
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFCD005PM001005   PART 023 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EA1ORDERINGCUST                        POSITION(      26         )
   CHAR(                     34)
        NULLIF(      60)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA03 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 33 tb=BUA.XBFCD005PM001004 part 22
//*        load  XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001004.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001004.PG
//LOA33   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP03.LOAD33'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFCD005PM001004 PARTLEVEL 22

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001004.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFCD005PM001004 PART 22
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFCD005PM001004   PART 022 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EB1SECURITYQUANT                       POSITION(      26:      33)
   DECIMAL
        NULLIF(      34)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA04 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 34 tb=BUA.XBFCD005PM001004 part 23
//*        load  XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001004.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001004.PL
//LOA34   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP04.LOAD34'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFCD005PM001004 PARTLEVEL 23

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001004.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFCD005PM001004 PART 23
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFCD005PM001004   PART 023 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EB1SECURITYQUANT                       POSITION(      26:      33)
   DECIMAL
        NULLIF(      34)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA05 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 35 tb=BUA.XBFCD005PM001003 part 22
//*        load  XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001003.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001003.PG
//LOA35   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP05.LOAD35'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFCD005PM001003 PARTLEVEL 22

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001003.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFCD005PM001003 PART 22
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFCD005PM001003   PART 022 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EA1EPID                                POSITION(      26         )
   CHAR(                      8)
        NULLIF(      34)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA06 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 36 tb=BUA.XBFCD005PM001003 part 23
//*        load  XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001003.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001003.PL
//LOA36   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP06.LOAD36'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFCD005PM001003 PARTLEVEL 23

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001003.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFCD005PM001003 PART 23
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFCD005PM001003   PART 023 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EA1EPID                                POSITION(      26         )
   CHAR(                      8)
        NULLIF(      34)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA07 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 37 tb=BUA.XBFCD005PM001002 part 22
//*        load  XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001002.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001002.PG
//LOA37   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP07.LOAD37'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFCD005PM001002 PARTLEVEL 22

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001002.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFCD005PM001002 PART 22
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFCD005PM001002   PART 022 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EY1MSGTYP                              POSITION(      26         )
   CHAR(                     32)
        NULLIF(      58)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA08 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 38 tb=BUA.XBFCD005PM001002 part 23
//*        load  XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001002.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001002.PL
//LOA38   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP08.LOAD38'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFCD005PM001002 PARTLEVEL 23

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.PM001002.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFCD005PM001002 PART 23
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFCD005PM001002   PART 023 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EY1MSGTYP                              POSITION(      26         )
   CHAR(                     32)
        NULLIF(      58)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA09 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 39 tb=BUA.XBFCD005IT002001 part 22
//*        load  XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.IT002001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.IT002001.PG
//LOA39   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP09.LOAD39'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFCD005IT002001 PARTLEVEL 22

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.IT002001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFCD005IT002001 PART 22
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFCD005IT002001   PART 022 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EN1STK1                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EN1STK2                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   EA1INHALT                              POSITION(      32         )
   VARCHAR
        NULLIF(    1032)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA00 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 40 tb=BUA.XBFCD005IT002001 part 23
//*        load  XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.IT002001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.IT002001.PL
//LOA40   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP00.LOAD40'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFCD005IT002001 PARTLEVEL 23

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFCD005.PRT001.IT002001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFCD005IT002001 PART 23
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFCD005IT002001   PART 023 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EN1STK1                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EN1STK2                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   EA1INHALT                              POSITION(      32         )
   VARCHAR
        NULLIF(    1032)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA01 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 41 tb=BUA.XBFC4009HS001001 part 282
//*        load  XB.RZ2.P0.OVRFLD.XBFC4009.PRT134.HS001001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFC4009.PRT134.HS001001.PG
//LOA41   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP01.LOAD41'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFC4009HS001001 PARTLEVEL 282

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFC4009.PRT134.HS001001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFC4009HS001001 PART 282
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFC4009HS001001   PART 282 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   ENID                                   POSITION(       5         )
   INTEGER                                      ,
   ENGROUPID                              POSITION(       9         )
   INTEGER                                      ,
   ENNEXTID                               POSITION(      13         )
   INTEGER
        NULLIF(      17)='?',
   EAUUIDHT                               POSITION(      18         )
   CHAR(                     35)
        NULLIF(      53)='?',
   EATRNVON                               POSITION(      54         )
   CHAR(                     20)                ,
   EATRNBIS                               POSITION(      74         )
   CHAR(                     20)                ,
   EZTREE                                 POSITION(      94         )
   SMALLINT                                     ,
   EYHASHALG                              POSITION(      96         )
   SMALLINT                                     ,
   ESTYPE                                 POSITION(      98         )
   SMALLINT                                     ,
   EZCOUNT                                POSITION(     100         )
   SMALLINT                                     ,
   EADATA                                 POSITION(     102         )
   VARCHAR
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA02 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 42 tb=BUA.XBFC4009HS001001 part 283
//*        load  XB.RZ2.P0.OVRFLD.XBFC4009.PRT134.HS001001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFC4009.PRT134.HS001001.PL
//LOA42   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP02.LOAD42'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFC4009HS001001 PARTLEVEL 283

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFC4009.PRT134.HS001001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFC4009HS001001 PART 283
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFC4009HS001001   PART 283 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   ENID                                   POSITION(       5         )
   INTEGER                                      ,
   ENGROUPID                              POSITION(       9         )
   INTEGER                                      ,
   ENNEXTID                               POSITION(      13         )
   INTEGER
        NULLIF(      17)='?',
   EAUUIDHT                               POSITION(      18         )
   CHAR(                     35)
        NULLIF(      53)='?',
   EATRNVON                               POSITION(      54         )
   CHAR(                     20)                ,
   EATRNBIS                               POSITION(      74         )
   CHAR(                     20)                ,
   EZTREE                                 POSITION(      94         )
   SMALLINT                                     ,
   EYHASHALG                              POSITION(      96         )
   SMALLINT                                     ,
   ESTYPE                                 POSITION(      98         )
   SMALLINT                                     ,
   EZCOUNT                                POSITION(     100         )
   SMALLINT                                     ,
   EADATA                                 POSITION(     102         )
   VARCHAR
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA03 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 43 tb=BUA.XBFC4009PS002001 part 282
//*        load  XB.RZ2.P0.OVRFLD.XBFC4009.PRT134.PS002001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFC4009.PRT134.PS002001.PG
//LOA43   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP03.LOAD43'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFC4009PS002001 PARTLEVEL 282

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFC4009.PRT134.PS002001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFC4009PS002001 PART 282
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFC4009PS002001   PART 282 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EA1ATRN                                POSITION(      64         )
   CHAR(                     20)
        NULLIF(      84)='?',
   EN1PORT                                POSITION(      85         )
   SMALLINT
        NULLIF(      87)='?',
   EC1DSA                                 POSITION(      88         )
   SMALLINT
        NULLIF(      90)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA04 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 44 tb=BUA.XBFC4009PS002001 part 283
//*        load  XB.RZ2.P0.OVRFLD.XBFC4009.PRT134.PS002001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFC4009.PRT134.PS002001.PL
//LOA44   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP04.LOAD44'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFC4009PS002001 PARTLEVEL 283

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFC4009.PRT134.PS002001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFC4009PS002001 PART 283
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFC4009PS002001   PART 283 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EA1ATRN                                POSITION(      64         )
   CHAR(                     20)
        NULLIF(      84)='?',
   EN1PORT                                POSITION(      85         )
   SMALLINT
        NULLIF(      87)='?',
   EC1DSA                                 POSITION(      88         )
   SMALLINT
        NULLIF(      90)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA05 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 45 tb=BUA.XBFC4009PS001001 part 282
//*        load  XB.RZ2.P0.OVRFLD.XBFC4009.PRT134.PS001001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFC4009.PRT134.PS001001.PG
//LOA45   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP05.LOAD45'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFC4009PS001001 PARTLEVEL 282

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFC4009.PRT134.PS001001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFC4009PS001001 PART 282
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFC4009PS001001   PART 282 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EN1OWNER                               POSITION(      64         )
   SMALLINT
        NULLIF(      66)='?',
   EA1BU                                  POSITION(      67         )
   CHAR(                      4)
        NULLIF(      71)='?',
   EN1AUFTRAGSNR                          POSITION(      72         )
   CHAR(                     17)
        NULLIF(      89)='?',
   EN1AUFTRZEIT                           POSITION(      90         )
   CHAR(                      4)
        NULLIF(      94)='?',
   ET1DZEINLIEFER                         POSITION(      95         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(     121)='?',
   EC1PORTUEBER                           POSITION(     122         )
   CHAR(                      1)
        NULLIF(     123)='?',
   EA1ID01                                POSITION(     124         )
   CHAR(                      4)
        NULLIF(     128)='?',
   EN1AUFTRNRKASS                         POSITION(     129         )
   CHAR(                     17)
        NULLIF(     146)='?',
   ED1AUFTRAG                             POSITION(     147         )
   DATE EXTERNAL(            10)
        NULLIF(     157)='?',
   EN1BKSTNR                              POSITION(     158         )
   CHAR(                      4)
        NULLIF(     162)='?',
   EN1KASSENNR                            POSITION(     163         )
   CHAR(                      4)
        NULLIF(     167)='?',
   EN1AUFTRID                             POSITION(     168         )
   CHAR(                      4)
        NULLIF(     172)='?',
   EN1LAUFNR                              POSITION(     173         )
   CHAR(                      5)
        NULLIF(     178)='?',
   EA1PID                                 POSITION(     179         )
   CHAR(                      7)
        NULLIF(     186)='?',
   EY1BELEGTYP                            POSITION(     187         )
   CHAR(                      1)
        NULLIF(     188)='?',
   EN1PAGINATOR                           POSITION(     189         )
   CHAR(                     20)
        NULLIF(     209)='?',
   ET1LOGPROD                             POSITION(     210         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(     236)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA06 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 46 tb=BUA.XBFC4009PS001001 part 283
//*        load  XB.RZ2.P0.OVRFLD.XBFC4009.PRT134.PS001001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFC4009.PRT134.PS001001.PL
//LOA46   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP06.LOAD46'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFC4009PS001001 PARTLEVEL 283

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFC4009.PRT134.PS001001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFC4009PS001001 PART 283
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFC4009PS001001   PART 283 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EN1OWNER                               POSITION(      64         )
   SMALLINT
        NULLIF(      66)='?',
   EA1BU                                  POSITION(      67         )
   CHAR(                      4)
        NULLIF(      71)='?',
   EN1AUFTRAGSNR                          POSITION(      72         )
   CHAR(                     17)
        NULLIF(      89)='?',
   EN1AUFTRZEIT                           POSITION(      90         )
   CHAR(                      4)
        NULLIF(      94)='?',
   ET1DZEINLIEFER                         POSITION(      95         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(     121)='?',
   EC1PORTUEBER                           POSITION(     122         )
   CHAR(                      1)
        NULLIF(     123)='?',
   EA1ID01                                POSITION(     124         )
   CHAR(                      4)
        NULLIF(     128)='?',
   EN1AUFTRNRKASS                         POSITION(     129         )
   CHAR(                     17)
        NULLIF(     146)='?',
   ED1AUFTRAG                             POSITION(     147         )
   DATE EXTERNAL(            10)
        NULLIF(     157)='?',
   EN1BKSTNR                              POSITION(     158         )
   CHAR(                      4)
        NULLIF(     162)='?',
   EN1KASSENNR                            POSITION(     163         )
   CHAR(                      4)
        NULLIF(     167)='?',
   EN1AUFTRID                             POSITION(     168         )
   CHAR(                      4)
        NULLIF(     172)='?',
   EN1LAUFNR                              POSITION(     173         )
   CHAR(                      5)
        NULLIF(     178)='?',
   EA1PID                                 POSITION(     179         )
   CHAR(                      7)
        NULLIF(     186)='?',
   EY1BELEGTYP                            POSITION(     187         )
   CHAR(                      1)
        NULLIF(     188)='?',
   EN1PAGINATOR                           POSITION(     189         )
   CHAR(                     20)
        NULLIF(     209)='?',
   ET1LOGPROD                             POSITION(     210         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(     236)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA07 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 47 tb=BUA.XBFC4009IT002001 part 282
//*        load  XB.RZ2.P0.OVRFLD.XBFC4009.PRT134.IT002001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFC4009.PRT134.IT002001.PG
//LOA47   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP07.LOAD47'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFC4009IT002001 PARTLEVEL 282

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFC4009.PRT134.IT002001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFC4009IT002001 PART 282
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFC4009IT002001   PART 282 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EN1STK1                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EN1STK2                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   EA1INHALT                              POSITION(      32         )
   VARCHAR
        NULLIF(    1032)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA08 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 48 tb=BUA.XBFC4009IT002001 part 283
//*        load  XB.RZ2.P0.OVRFLD.XBFC4009.PRT134.IT002001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFC4009.PRT134.IT002001.PL
//LOA48   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP08.LOAD48'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFC4009IT002001 PARTLEVEL 283

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFC4009.PRT134.IT002001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFC4009IT002001 PART 283
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFC4009IT002001   PART 283 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EN1STK1                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EN1STK2                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   EA1INHALT                              POSITION(      32         )
   VARCHAR
        NULLIF(    1032)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA09 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 49 tb=BUA.XBFIS004HS001001 part 26
//*        load  XB.RZ2.P0.OVRFLD.XBFIS004.PRT010.HS001001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFIS004.PRT010.HS001001.PG
//LOA49   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP09.LOAD49'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFIS004HS001001 PARTLEVEL 26

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFIS004.PRT010.HS001001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFIS004HS001001 PART 26
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFIS004HS001001   PART 026 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   ENID                                   POSITION(       5         )
   INTEGER                                      ,
   ENGROUPID                              POSITION(       9         )
   INTEGER                                      ,
   ENNEXTID                               POSITION(      13         )
   INTEGER
        NULLIF(      17)='?',
   EAUUIDHT                               POSITION(      18         )
   CHAR(                     35)
        NULLIF(      53)='?',
   EATRNVON                               POSITION(      54         )
   CHAR(                     20)                ,
   EATRNBIS                               POSITION(      74         )
   CHAR(                     20)                ,
   EZTREE                                 POSITION(      94         )
   SMALLINT                                     ,
   EYHASHALG                              POSITION(      96         )
   SMALLINT                                     ,
   ESTYPE                                 POSITION(      98         )
   SMALLINT                                     ,
   EZCOUNT                                POSITION(     100         )
   SMALLINT                                     ,
   EADATA                                 POSITION(     102         )
   VARCHAR
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA00 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 50 tb=BUA.XBFIS004HS001001 part 27
//*        load  XB.RZ2.P0.OVRFLD.XBFIS004.PRT010.HS001001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFIS004.PRT010.HS001001.PL
//LOA50   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP00.LOAD50'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFIS004HS001001 PARTLEVEL 27

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFIS004.PRT010.HS001001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFIS004HS001001 PART 27
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFIS004HS001001   PART 027 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   ENID                                   POSITION(       5         )
   INTEGER                                      ,
   ENGROUPID                              POSITION(       9         )
   INTEGER                                      ,
   ENNEXTID                               POSITION(      13         )
   INTEGER
        NULLIF(      17)='?',
   EAUUIDHT                               POSITION(      18         )
   CHAR(                     35)
        NULLIF(      53)='?',
   EATRNVON                               POSITION(      54         )
   CHAR(                     20)                ,
   EATRNBIS                               POSITION(      74         )
   CHAR(                     20)                ,
   EZTREE                                 POSITION(      94         )
   SMALLINT                                     ,
   EYHASHALG                              POSITION(      96         )
   SMALLINT                                     ,
   ESTYPE                                 POSITION(      98         )
   SMALLINT                                     ,
   EZCOUNT                                POSITION(     100         )
   SMALLINT                                     ,
   EADATA                                 POSITION(     102         )
   VARCHAR
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA01 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 51 tb=BUA.XBFIS004PS002001 part 26
//*        load  XB.RZ2.P0.OVRFLD.XBFIS004.PRT010.PS002001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFIS004.PRT010.PS002001.PG
//LOA51   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP01.LOAD51'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFIS004PS002001 PARTLEVEL 26

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFIS004.PRT010.PS002001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFIS004PS002001 PART 26
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFIS004PS002001   PART 026 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EA1ATRN                                POSITION(      64         )
   CHAR(                     20)
        NULLIF(      84)='?',
   EC1DSA                                 POSITION(      85         )
   SMALLINT
        NULLIF(      87)='?',
   EN1CHECK                               POSITION(      88         )
   CHAR(                     20)
        NULLIF(     108)='?',
   EN1UUID                                POSITION(     109         )
   CHAR(                     36)
        NULLIF(     145)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA02 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 52 tb=BUA.XBFIS004PS002001 part 27
//*        load  XB.RZ2.P0.OVRFLD.XBFIS004.PRT010.PS002001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFIS004.PRT010.PS002001.PL
//LOA52   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP02.LOAD52'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFIS004PS002001 PARTLEVEL 27

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFIS004.PRT010.PS002001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFIS004PS002001 PART 27
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFIS004PS002001   PART 027 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EA1ATRN                                POSITION(      64         )
   CHAR(                     20)
        NULLIF(      84)='?',
   EC1DSA                                 POSITION(      85         )
   SMALLINT
        NULLIF(      87)='?',
   EN1CHECK                               POSITION(      88         )
   CHAR(                     20)
        NULLIF(     108)='?',
   EN1UUID                                POSITION(     109         )
   CHAR(                     36)
        NULLIF(     145)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA03 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 53 tb=BUA.XBFIS004PS001001 part 26
//*        load  XB.RZ2.P0.OVRFLD.XBFIS004.PRT010.PS001001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFIS004.PRT010.PS001001.PG
//LOA53   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP03.LOAD53'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFIS004PS001001 PARTLEVEL 26

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFIS004.PRT010.PS001001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFIS004PS001001 PART 26
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFIS004PS001001   PART 026 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EN1OWNER                               POSITION(      64         )
   SMALLINT
        NULLIF(      66)='?',
   EA1BU                                  POSITION(      67         )
   CHAR(                      4)
        NULLIF(      71)='?',
   EA1DOKID                               POSITION(      72         )
   CHAR(                     20)
        NULLIF(      92)='?',
   EN1BEZKORR                             POSITION(      93         )
   CHAR(                     16)
        NULLIF(     109)='?',
   EN1CIFKORR                             POSITION(     110         )
   CHAR(                     12)
        NULLIF(     122)='?',
   EC1DOKART                              POSITION(     123         )
   CHAR(                      5)
        NULLIF(     128)='?',
   ED1GESCHF                              POSITION(     129         )
   DATE EXTERNAL(            10)
        NULLIF(     139)='?',
   EB1KORR                                POSITION(     140:     147)
   DECIMAL
        NULLIF(     148)='?',
   EA1ZUSBEGR                             POSITION(     149         )
   CHAR(                     30)
        NULLIF(     179)='?',
   EA1ERGINFO                             POSITION(     180         )
   CHAR(                     30)
        NULLIF(     210)='?',
   EA1NAMELANG                            POSITION(     211         )
   CHAR(                     70)
        NULLIF(     281)='?',
   EA1VORNAME                             POSITION(     282         )
   CHAR(                     30)
        NULLIF(     312)='?',
   EA1ORT                                 POSITION(     313         )
   CHAR(                     24)
        NULLIF(     337)='?',
   EC1KUA                                 POSITION(     338         )
   CHAR(                      3)
        NULLIF(     341)='?',
   EC1KAS                                 POSITION(     342         )
   CHAR(                      3)
        NULLIF(     345)='?',
   EC1DAS                                 POSITION(     346         )
   CHAR(                      3)
        NULLIF(     349)='?',
   ET1LOGPROD                             POSITION(     350         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(     376)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA04 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 54 tb=BUA.XBFIS004PS001001 part 27
//*        load  XB.RZ2.P0.OVRFLD.XBFIS004.PRT010.PS001001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFIS004.PRT010.PS001001.PL
//LOA54   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP04.LOAD54'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFIS004PS001001 PARTLEVEL 27

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFIS004.PRT010.PS001001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFIS004PS001001 PART 27
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFIS004PS001001   PART 027 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EN1OWNER                               POSITION(      64         )
   SMALLINT
        NULLIF(      66)='?',
   EA1BU                                  POSITION(      67         )
   CHAR(                      4)
        NULLIF(      71)='?',
   EA1DOKID                               POSITION(      72         )
   CHAR(                     20)
        NULLIF(      92)='?',
   EN1BEZKORR                             POSITION(      93         )
   CHAR(                     16)
        NULLIF(     109)='?',
   EN1CIFKORR                             POSITION(     110         )
   CHAR(                     12)
        NULLIF(     122)='?',
   EC1DOKART                              POSITION(     123         )
   CHAR(                      5)
        NULLIF(     128)='?',
   ED1GESCHF                              POSITION(     129         )
   DATE EXTERNAL(            10)
        NULLIF(     139)='?',
   EB1KORR                                POSITION(     140:     147)
   DECIMAL
        NULLIF(     148)='?',
   EA1ZUSBEGR                             POSITION(     149         )
   CHAR(                     30)
        NULLIF(     179)='?',
   EA1ERGINFO                             POSITION(     180         )
   CHAR(                     30)
        NULLIF(     210)='?',
   EA1NAMELANG                            POSITION(     211         )
   CHAR(                     70)
        NULLIF(     281)='?',
   EA1VORNAME                             POSITION(     282         )
   CHAR(                     30)
        NULLIF(     312)='?',
   EA1ORT                                 POSITION(     313         )
   CHAR(                     24)
        NULLIF(     337)='?',
   EC1KUA                                 POSITION(     338         )
   CHAR(                      3)
        NULLIF(     341)='?',
   EC1KAS                                 POSITION(     342         )
   CHAR(                      3)
        NULLIF(     345)='?',
   EC1DAS                                 POSITION(     346         )
   CHAR(                      3)
        NULLIF(     349)='?',
   ET1LOGPROD                             POSITION(     350         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(     376)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA05 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 55 tb=BUA.XBFIS004IT002001 part 26
//*        load  XB.RZ2.P0.OVRFLD.XBFIS004.PRT010.IT002001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFIS004.PRT010.IT002001.PG
//LOA55   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP05.LOAD55'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFIS004IT002001 PARTLEVEL 26

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFIS004.PRT010.IT002001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFIS004IT002001 PART 26
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFIS004IT002001   PART 026 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EN1STK1                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EN1STK2                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   EA1INHALT                              POSITION(      32         )
   VARCHAR
        NULLIF(    1032)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA06 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 56 tb=BUA.XBFIS004IT002001 part 27
//*        load  XB.RZ2.P0.OVRFLD.XBFIS004.PRT010.IT002001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFIS004.PRT010.IT002001.PL
//LOA56   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP06.LOAD56'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFIS004IT002001 PARTLEVEL 27

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFIS004.PRT010.IT002001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFIS004IT002001 PART 27
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFIS004IT002001   PART 027 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EN1STK1                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EN1STK2                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   EA1INHALT                              POSITION(      32         )
   VARCHAR
        NULLIF(    1032)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA07 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 57 tb=BUA.XBFJ3002HS001001 part 135
//*        load  XB.RZ2.P0.OVRFLD.XBFJ3002.PRT017.HS001001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFJ3002.PRT017.HS001001.PG
//LOA57   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP07.LOAD57'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFJ3002HS001001 PARTLEVEL 135

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFJ3002.PRT017.HS001001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFJ3002HS001001 PART 135
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFJ3002HS001001   PART 135 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   ENID                                   POSITION(       5         )
   INTEGER                                      ,
   ENGROUPID                              POSITION(       9         )
   INTEGER                                      ,
   ENNEXTID                               POSITION(      13         )
   INTEGER
        NULLIF(      17)='?',
   EAUUIDHT                               POSITION(      18         )
   CHAR(                     35)
        NULLIF(      53)='?',
   EATRNVON                               POSITION(      54         )
   CHAR(                     20)                ,
   EATRNBIS                               POSITION(      74         )
   CHAR(                     20)                ,
   EZTREE                                 POSITION(      94         )
   SMALLINT                                     ,
   EYHASHALG                              POSITION(      96         )
   SMALLINT                                     ,
   ESTYPE                                 POSITION(      98         )
   SMALLINT                                     ,
   EZCOUNT                                POSITION(     100         )
   SMALLINT                                     ,
   EADATA                                 POSITION(     102         )
   VARCHAR
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA08 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 58 tb=BUA.XBFJ3002HS001001 part 136
//*        load  XB.RZ2.P0.OVRFLD.XBFJ3002.PRT017.HS001001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFJ3002.PRT017.HS001001.PL
//LOA58   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP08.LOAD58'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFJ3002HS001001 PARTLEVEL 136

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFJ3002.PRT017.HS001001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFJ3002HS001001 PART 136
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFJ3002HS001001   PART 136 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   ENID                                   POSITION(       5         )
   INTEGER                                      ,
   ENGROUPID                              POSITION(       9         )
   INTEGER                                      ,
   ENNEXTID                               POSITION(      13         )
   INTEGER
        NULLIF(      17)='?',
   EAUUIDHT                               POSITION(      18         )
   CHAR(                     35)
        NULLIF(      53)='?',
   EATRNVON                               POSITION(      54         )
   CHAR(                     20)                ,
   EATRNBIS                               POSITION(      74         )
   CHAR(                     20)                ,
   EZTREE                                 POSITION(      94         )
   SMALLINT                                     ,
   EYHASHALG                              POSITION(      96         )
   SMALLINT                                     ,
   ESTYPE                                 POSITION(      98         )
   SMALLINT                                     ,
   EZCOUNT                                POSITION(     100         )
   SMALLINT                                     ,
   EADATA                                 POSITION(     102         )
   VARCHAR
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA09 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 59 tb=BUA.XBFJ3002PS002001 part 135
//*        load  XB.RZ2.P0.OVRFLD.XBFJ3002.PRT017.PS002001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFJ3002.PRT017.PS002001.PG
//LOA59   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP09.LOAD59'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFJ3002PS002001 PARTLEVEL 135

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFJ3002.PRT017.PS002001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFJ3002PS002001 PART 135
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFJ3002PS002001   PART 135 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EA1ATRN                                POSITION(      64         )
   CHAR(                     20)
        NULLIF(      84)='?',
   EN1PORT                                POSITION(      85         )
   SMALLINT
        NULLIF(      87)='?',
   EY1FILETYP                             POSITION(      88         )
   CHAR(                      8)
        NULLIF(      96)='?',
   EC1DSA                                 POSITION(      97         )
   SMALLINT
        NULLIF(      99)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA00 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 60 tb=BUA.XBFJ3002PS002001 part 136
//*        load  XB.RZ2.P0.OVRFLD.XBFJ3002.PRT017.PS002001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFJ3002.PRT017.PS002001.PL
//LOA60   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP00.LOAD60'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFJ3002PS002001 PARTLEVEL 136

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFJ3002.PRT017.PS002001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFJ3002PS002001 PART 136
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFJ3002PS002001   PART 136 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EA1ATRN                                POSITION(      64         )
   CHAR(                     20)
        NULLIF(      84)='?',
   EN1PORT                                POSITION(      85         )
   SMALLINT
        NULLIF(      87)='?',
   EY1FILETYP                             POSITION(      88         )
   CHAR(                      8)
        NULLIF(      96)='?',
   EC1DSA                                 POSITION(      97         )
   SMALLINT
        NULLIF(      99)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA01 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 61 tb=BUA.XBFJ3002PS001001 part 135
//*        load  XB.RZ2.P0.OVRFLD.XBFJ3002.PRT017.PS001001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFJ3002.PRT017.PS001001.PG
//LOA61   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP01.LOAD61'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFJ3002PS001001 PARTLEVEL 135

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFJ3002.PRT017.PS001001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFJ3002PS001001 PART 135
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFJ3002PS001001   PART 135 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EN1OWNER                               POSITION(      64         )
   SMALLINT
        NULLIF(      66)='?',
   EA1BU                                  POSITION(      67         )
   CHAR(                      4)
        NULLIF(      71)='?',
   EC1PORTUEBER                           POSITION(      72         )
   CHAR(                      1)
        NULLIF(      73)='?',
   EN1CIFBEZALT                           POSITION(      74         )
   CHAR(                     18)
        NULLIF(      92)='?',
   EN1BEZNR                               POSITION(      93         )
   CHAR(                     16)
        NULLIF(     109)='?',
   EN1CIF                                 POSITION(     110         )
   CHAR(                     12)
        NULLIF(     122)='?',
   ED1FORM                                POSITION(     123         )
   DATE EXTERNAL(            10)
        NULLIF(     133)='?',
   EA1ZUSBEGR                             POSITION(     134         )
   CHAR(                     30)
        NULLIF(     164)='?',
   ED1INAKTIV                             POSITION(     165         )
   DATE EXTERNAL(            10)
        NULLIF(     175)='?',
   EC1FORMPROD                            POSITION(     176         )
   CHAR(                      5)
        NULLIF(     181)='?',
   EA1NAME                                POSITION(     182         )
   CHAR(                     30)
        NULLIF(     212)='?',
   EA1VORNAME                             POSITION(     213         )
   CHAR(                     30)
        NULLIF(     243)='?',
   EA1ORT                                 POSITION(     244         )
   CHAR(                     24)
        NULLIF(     268)='?',
   EC1KUA                                 POSITION(     269         )
   CHAR(                      3)
        NULLIF(     272)='?',
   EC1KAS                                 POSITION(     273         )
   CHAR(                      3)
        NULLIF(     276)='?',
   EC1DAS                                 POSITION(     277         )
   CHAR(                      3)
        NULLIF(     280)='?',
   ED1SCANNINGDATE                        POSITION(     281         )
   DATE EXTERNAL(            10)
        NULLIF(     291)='?',
   EA1STATUS                              POSITION(     292         )
   CHAR(                     10)
        NULLIF(     302)='?',
   EN1PAGINATOR                           POSITION(     303         )
   CHAR(                     20)
        NULLIF(     323)='?',
   ET1LOGPROD                             POSITION(     324         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(     350)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA02 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 62 tb=BUA.XBFJ3002PS001001 part 136
//*        load  XB.RZ2.P0.OVRFLD.XBFJ3002.PRT017.PS001001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFJ3002.PRT017.PS001001.PL
//LOA62   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP02.LOAD62'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFJ3002PS001001 PARTLEVEL 136

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFJ3002.PRT017.PS001001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFJ3002PS001001 PART 136
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFJ3002PS001001   PART 136 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EN1OWNER                               POSITION(      64         )
   SMALLINT
        NULLIF(      66)='?',
   EA1BU                                  POSITION(      67         )
   CHAR(                      4)
        NULLIF(      71)='?',
   EC1PORTUEBER                           POSITION(      72         )
   CHAR(                      1)
        NULLIF(      73)='?',
   EN1CIFBEZALT                           POSITION(      74         )
   CHAR(                     18)
        NULLIF(      92)='?',
   EN1BEZNR                               POSITION(      93         )
   CHAR(                     16)
        NULLIF(     109)='?',
   EN1CIF                                 POSITION(     110         )
   CHAR(                     12)
        NULLIF(     122)='?',
   ED1FORM                                POSITION(     123         )
   DATE EXTERNAL(            10)
        NULLIF(     133)='?',
   EA1ZUSBEGR                             POSITION(     134         )
   CHAR(                     30)
        NULLIF(     164)='?',
   ED1INAKTIV                             POSITION(     165         )
   DATE EXTERNAL(            10)
        NULLIF(     175)='?',
   EC1FORMPROD                            POSITION(     176         )
   CHAR(                      5)
        NULLIF(     181)='?',
   EA1NAME                                POSITION(     182         )
   CHAR(                     30)
        NULLIF(     212)='?',
   EA1VORNAME                             POSITION(     213         )
   CHAR(                     30)
        NULLIF(     243)='?',
   EA1ORT                                 POSITION(     244         )
   CHAR(                     24)
        NULLIF(     268)='?',
   EC1KUA                                 POSITION(     269         )
   CHAR(                      3)
        NULLIF(     272)='?',
   EC1KAS                                 POSITION(     273         )
   CHAR(                      3)
        NULLIF(     276)='?',
   EC1DAS                                 POSITION(     277         )
   CHAR(                      3)
        NULLIF(     280)='?',
   ED1SCANNINGDATE                        POSITION(     281         )
   DATE EXTERNAL(            10)
        NULLIF(     291)='?',
   EA1STATUS                              POSITION(     292         )
   CHAR(                     10)
        NULLIF(     302)='?',
   EN1PAGINATOR                           POSITION(     303         )
   CHAR(                     20)
        NULLIF(     323)='?',
   ET1LOGPROD                             POSITION(     324         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(     350)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA03 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 63 tb=BUA.XBFJ3002IT002001 part 135
//*        load  XB.RZ2.P0.OVRFLD.XBFJ3002.PRT017.IT002001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFJ3002.PRT017.IT002001.PG
//LOA63   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP03.LOAD63'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFJ3002IT002001 PARTLEVEL 135

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFJ3002.PRT017.IT002001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFJ3002IT002001 PART 135
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFJ3002IT002001   PART 135 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EN1STK1                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EN1STK2                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   EA1INHALT                              POSITION(      32         )
   VARCHAR
        NULLIF(    1032)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA04 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 64 tb=BUA.XBFJ3002IT002001 part 136
//*        load  XB.RZ2.P0.OVRFLD.XBFJ3002.PRT017.IT002001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFJ3002.PRT017.IT002001.PL
//LOA64   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP04.LOAD64'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFJ3002IT002001 PARTLEVEL 136

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFJ3002.PRT017.IT002001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFJ3002IT002001 PART 136
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFJ3002IT002001   PART 136 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EN1STK1                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EN1STK2                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   EA1INHALT                              POSITION(      32         )
   VARCHAR
        NULLIF(    1032)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA05 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 65 tb=BUA.XBFA0006HS001001 part 42
//*        load  XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.HS001001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.HS001001.PG
//LOA65   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP05.LOAD65'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFA0006HS001001 PARTLEVEL 42

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.HS001001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFA0006HS001001 PART 42
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFA0006HS001001   PART 042 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   ENID                                   POSITION(       5         )
   INTEGER                                      ,
   ENGROUPID                              POSITION(       9         )
   INTEGER                                      ,
   ENNEXTID                               POSITION(      13         )
   INTEGER
        NULLIF(      17)='?',
   EAUUIDHT                               POSITION(      18         )
   CHAR(                     35)
        NULLIF(      53)='?',
   EATRNVON                               POSITION(      54         )
   CHAR(                     20)                ,
   EATRNBIS                               POSITION(      74         )
   CHAR(                     20)                ,
   EZTREE                                 POSITION(      94         )
   SMALLINT                                     ,
   EYHASHALG                              POSITION(      96         )
   SMALLINT                                     ,
   ESTYPE                                 POSITION(      98         )
   SMALLINT                                     ,
   EZCOUNT                                POSITION(     100         )
   SMALLINT                                     ,
   EADATA                                 POSITION(     102         )
   VARCHAR
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA06 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 66 tb=BUA.XBFA0006HS001001 part 43
//*        load  XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.HS001001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.HS001001.PL
//LOA66   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP06.LOAD66'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFA0006HS001001 PARTLEVEL 43

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.HS001001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFA0006HS001001 PART 43
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFA0006HS001001   PART 043 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   ENID                                   POSITION(       5         )
   INTEGER                                      ,
   ENGROUPID                              POSITION(       9         )
   INTEGER                                      ,
   ENNEXTID                               POSITION(      13         )
   INTEGER
        NULLIF(      17)='?',
   EAUUIDHT                               POSITION(      18         )
   CHAR(                     35)
        NULLIF(      53)='?',
   EATRNVON                               POSITION(      54         )
   CHAR(                     20)                ,
   EATRNBIS                               POSITION(      74         )
   CHAR(                     20)                ,
   EZTREE                                 POSITION(      94         )
   SMALLINT                                     ,
   EYHASHALG                              POSITION(      96         )
   SMALLINT                                     ,
   ESTYPE                                 POSITION(      98         )
   SMALLINT                                     ,
   EZCOUNT                                POSITION(     100         )
   SMALLINT                                     ,
   EADATA                                 POSITION(     102         )
   VARCHAR
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA07 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 67 tb=BUA.XBFA0006PS003001 part 42
//*        load  XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.PS003001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.PS003001.PG
//LOA67   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP07.LOAD67'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFA0006PS003001 PARTLEVEL 42

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.PS003001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFA0006PS003001 PART 42
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFA0006PS003001   PART 042 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EA1ATRN                                POSITION(      64         )
   CHAR(                     20)
        NULLIF(      84)='?',
   EN1PORT                                POSITION(      85         )
   SMALLINT
        NULLIF(      87)='?',
   EY1FILETYP                             POSITION(      88         )
   CHAR(                      8)
        NULLIF(      96)='?',
   EN1EXTDSNAME                           POSITION(      97         )
   CHAR(                    200)
        NULLIF(     297)='?',
   EN1CHECK                               POSITION(     298         )
   CHAR(                     20)
        NULLIF(     318)='?',
   EA1EXREF                               POSITION(     319         )
   CHAR(                    128)
        NULLIF(     447)='?',
   EN1UUID                                POSITION(     448         )
   CHAR(                     20)
        NULLIF(     468)='?',
   EC1DSA                                 POSITION(     469         )
   SMALLINT
        NULLIF(     471)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA08 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 68 tb=BUA.XBFA0006PS003001 part 43
//*        load  XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.PS003001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.PS003001.PL
//LOA68   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP08.LOAD68'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFA0006PS003001 PARTLEVEL 43

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.PS003001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFA0006PS003001 PART 43
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFA0006PS003001   PART 043 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EA1ATRN                                POSITION(      64         )
   CHAR(                     20)
        NULLIF(      84)='?',
   EN1PORT                                POSITION(      85         )
   SMALLINT
        NULLIF(      87)='?',
   EY1FILETYP                             POSITION(      88         )
   CHAR(                      8)
        NULLIF(      96)='?',
   EN1EXTDSNAME                           POSITION(      97         )
   CHAR(                    200)
        NULLIF(     297)='?',
   EN1CHECK                               POSITION(     298         )
   CHAR(                     20)
        NULLIF(     318)='?',
   EA1EXREF                               POSITION(     319         )
   CHAR(                    128)
        NULLIF(     447)='?',
   EN1UUID                                POSITION(     448         )
   CHAR(                     20)
        NULLIF(     468)='?',
   EC1DSA                                 POSITION(     469         )
   SMALLINT
        NULLIF(     471)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA09 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 69 tb=BUA.XBFA0006PS002001 part 42
//*        load  XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.PS002001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.PS002001.PG
//LOA69   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP09.LOAD69'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFA0006PS002001 PARTLEVEL 42

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.PS002001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFA0006PS002001 PART 42
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFA0006PS002001   PART 042 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EA1ATRN                                POSITION(      64         )
   CHAR(                     20)
        NULLIF(      84)='?',
   EN1PORT                                POSITION(      85         )
   SMALLINT
        NULLIF(      87)='?',
   EY1FILETYP                             POSITION(      88         )
   CHAR(                      8)
        NULLIF(      96)='?',
   EN1EXTDSNAME                           POSITION(      97         )
   CHAR(                    200)
        NULLIF(     297)='?',
   EN1CHECK                               POSITION(     298         )
   CHAR(                     20)
        NULLIF(     318)='?',
   EA1EXREF                               POSITION(     319         )
   CHAR(                    128)
        NULLIF(     447)='?',
   EN1UUID                                POSITION(     448         )
   CHAR(                     20)
        NULLIF(     468)='?',
   EC1DSA                                 POSITION(     469         )
   SMALLINT
        NULLIF(     471)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA00 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 70 tb=BUA.XBFA0006PS002001 part 43
//*        load  XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.PS002001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.PS002001.PL
//LOA70   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP00.LOAD70'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFA0006PS002001 PARTLEVEL 43

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.PS002001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFA0006PS002001 PART 43
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFA0006PS002001   PART 043 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EA1ATRN                                POSITION(      64         )
   CHAR(                     20)
        NULLIF(      84)='?',
   EN1PORT                                POSITION(      85         )
   SMALLINT
        NULLIF(      87)='?',
   EY1FILETYP                             POSITION(      88         )
   CHAR(                      8)
        NULLIF(      96)='?',
   EN1EXTDSNAME                           POSITION(      97         )
   CHAR(                    200)
        NULLIF(     297)='?',
   EN1CHECK                               POSITION(     298         )
   CHAR(                     20)
        NULLIF(     318)='?',
   EA1EXREF                               POSITION(     319         )
   CHAR(                    128)
        NULLIF(     447)='?',
   EN1UUID                                POSITION(     448         )
   CHAR(                     20)
        NULLIF(     468)='?',
   EC1DSA                                 POSITION(     469         )
   SMALLINT
        NULLIF(     471)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA01 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 71 tb=BUA.XBFA0006PS001001 part 42
//*        load  XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.PS001001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.PS001001.PG
//LOA71   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP01.LOAD71'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFA0006PS001001 PARTLEVEL 42

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.PS001001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFA0006PS001001 PART 42
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFA0006PS001001   PART 042 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EN1OWNER                               POSITION(      64         )
   SMALLINT
        NULLIF(      66)='?',
   EA1BU                                  POSITION(      67         )
   CHAR(                      4)
        NULLIF(      71)='?',
   EN1CASEID                              POSITION(      72         )
   CHAR(                     10)
        NULLIF(      82)='?',
   EC1PORTUEBER                           POSITION(      83         )
   CHAR(                      1)
        NULLIF(      84)='?',
   EN1CIF                                 POSITION(      85         )
   CHAR(                     12)
        NULLIF(      97)='?',
   ED1CRDATE                              POSITION(      98         )
   DATE EXTERNAL(            10)
        NULLIF(     108)='?',
   EN1PIDORIG                             POSITION(     109         )
   CHAR(                     10)
        NULLIF(     119)='?',
   EN1PIDPROBOWN                          POSITION(     120         )
   CHAR(                     10)
        NULLIF(     130)='?',
   EN1PIDRM                               POSITION(     131         )
   CHAR(                     10)
        NULLIF(     141)='?',
   EN1CIFMUTFLAG                          POSITION(     142         )
   CHAR(                      1)
        NULLIF(     143)='?',
   EA1NAMEORIG                            POSITION(     144         )
   CHAR(                     65)
        NULLIF(     209)='?',
   EA1NAMEPROBOWN                         POSITION(     210         )
   CHAR(                     65)
        NULLIF(     275)='?',
   EA1NAMERM                              POSITION(     276         )
   CHAR(                     65)
        NULLIF(     341)='?',
   EN1DK                                  POSITION(     342         )
   CHAR(                      4)
        NULLIF(     346)='?',
   ET1LOGPROD                             POSITION(     347         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(     373)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA02 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 72 tb=BUA.XBFA0006PS001001 part 43
//*        load  XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.PS001001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.PS001001.PL
//LOA72   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP02.LOAD72'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFA0006PS001001 PARTLEVEL 43

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.PS001001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFA0006PS001001 PART 43
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFA0006PS001001   PART 043 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EN1OWNER                               POSITION(      64         )
   SMALLINT
        NULLIF(      66)='?',
   EA1BU                                  POSITION(      67         )
   CHAR(                      4)
        NULLIF(      71)='?',
   EN1CASEID                              POSITION(      72         )
   CHAR(                     10)
        NULLIF(      82)='?',
   EC1PORTUEBER                           POSITION(      83         )
   CHAR(                      1)
        NULLIF(      84)='?',
   EN1CIF                                 POSITION(      85         )
   CHAR(                     12)
        NULLIF(      97)='?',
   ED1CRDATE                              POSITION(      98         )
   DATE EXTERNAL(            10)
        NULLIF(     108)='?',
   EN1PIDORIG                             POSITION(     109         )
   CHAR(                     10)
        NULLIF(     119)='?',
   EN1PIDPROBOWN                          POSITION(     120         )
   CHAR(                     10)
        NULLIF(     130)='?',
   EN1PIDRM                               POSITION(     131         )
   CHAR(                     10)
        NULLIF(     141)='?',
   EN1CIFMUTFLAG                          POSITION(     142         )
   CHAR(                      1)
        NULLIF(     143)='?',
   EA1NAMEORIG                            POSITION(     144         )
   CHAR(                     65)
        NULLIF(     209)='?',
   EA1NAMEPROBOWN                         POSITION(     210         )
   CHAR(                     65)
        NULLIF(     275)='?',
   EA1NAMERM                              POSITION(     276         )
   CHAR(                     65)
        NULLIF(     341)='?',
   EN1DK                                  POSITION(     342         )
   CHAR(                      4)
        NULLIF(     346)='?',
   ET1LOGPROD                             POSITION(     347         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(     373)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA03 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 73 tb=BUA.XBFA0006IT003001 part 42
//*        load  XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.IT003001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.IT003001.PG
//LOA73   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP03.LOAD73'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFA0006IT003001 PARTLEVEL 42

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.IT003001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFA0006IT003001 PART 42
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFA0006IT003001   PART 042 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EN1STK1                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EN1STK2                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   EA1INHALT                              POSITION(      32         )
   VARCHAR
        NULLIF(    1032)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA04 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 74 tb=BUA.XBFA0006IT003001 part 43
//*        load  XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.IT003001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.IT003001.PL
//LOA74   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP04.LOAD74'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFA0006IT003001 PARTLEVEL 43

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.IT003001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFA0006IT003001 PART 43
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFA0006IT003001   PART 043 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EN1STK1                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EN1STK2                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   EA1INHALT                              POSITION(      32         )
   VARCHAR
        NULLIF(    1032)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA05 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 75 tb=BUA.XBFA0006IT002001 part 42
//*        load  XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.IT002001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.IT002001.PG
//LOA75   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP05.LOAD75'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFA0006IT002001 PARTLEVEL 42

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.IT002001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFA0006IT002001 PART 42
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFA0006IT002001   PART 042 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EN1STK1                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EN1STK2                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   EA1INHALT                              POSITION(      32         )
   VARCHAR
        NULLIF(    1032)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA06 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 76 tb=BUA.XBFA0006IT002001 part 43
//*        load  XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.IT002001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.IT002001.PL
//LOA76   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP06.LOAD76'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFA0006IT002001 PARTLEVEL 43

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFA0006.PRT003.IT002001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFA0006IT002001 PART 43
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFA0006IT002001   PART 043 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EN1STK1                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EN1STK2                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   EA1INHALT                              POSITION(      32         )
   VARCHAR
        NULLIF(    1032)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA07 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 77 tb=BUA.XBFC4003HS001001 part 304
//*        load  XB.RZ2.P0.OVRFLD.XBFC4003.PRT120.HS001001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFC4003.PRT120.HS001001.PG
//LOA77   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP07.LOAD77'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFC4003HS001001 PARTLEVEL 304

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFC4003.PRT120.HS001001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFC4003HS001001 PART 304
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFC4003HS001001   PART 304 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   ENID                                   POSITION(       5         )
   INTEGER                                      ,
   ENGROUPID                              POSITION(       9         )
   INTEGER                                      ,
   ENNEXTID                               POSITION(      13         )
   INTEGER
        NULLIF(      17)='?',
   EAUUIDHT                               POSITION(      18         )
   CHAR(                     35)
        NULLIF(      53)='?',
   EATRNVON                               POSITION(      54         )
   CHAR(                     20)                ,
   EATRNBIS                               POSITION(      74         )
   CHAR(                     20)                ,
   EZTREE                                 POSITION(      94         )
   SMALLINT                                     ,
   EYHASHALG                              POSITION(      96         )
   SMALLINT                                     ,
   ESTYPE                                 POSITION(      98         )
   SMALLINT                                     ,
   EZCOUNT                                POSITION(     100         )
   SMALLINT                                     ,
   EADATA                                 POSITION(     102         )
   VARCHAR
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA08 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 78 tb=BUA.XBFC4003HS001001 part 305
//*        load  XB.RZ2.P0.OVRFLD.XBFC4003.PRT120.HS001001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFC4003.PRT120.HS001001.PL
//LOA78   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP08.LOAD78'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFC4003HS001001 PARTLEVEL 305

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFC4003.PRT120.HS001001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFC4003HS001001 PART 305
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFC4003HS001001   PART 305 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   ENID                                   POSITION(       5         )
   INTEGER                                      ,
   ENGROUPID                              POSITION(       9         )
   INTEGER                                      ,
   ENNEXTID                               POSITION(      13         )
   INTEGER
        NULLIF(      17)='?',
   EAUUIDHT                               POSITION(      18         )
   CHAR(                     35)
        NULLIF(      53)='?',
   EATRNVON                               POSITION(      54         )
   CHAR(                     20)                ,
   EATRNBIS                               POSITION(      74         )
   CHAR(                     20)                ,
   EZTREE                                 POSITION(      94         )
   SMALLINT                                     ,
   EYHASHALG                              POSITION(      96         )
   SMALLINT                                     ,
   ESTYPE                                 POSITION(      98         )
   SMALLINT                                     ,
   EZCOUNT                                POSITION(     100         )
   SMALLINT                                     ,
   EADATA                                 POSITION(     102         )
   VARCHAR
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA09 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 79 tb=BUA.XBFC4003PS002001 part 304
//*        load  XB.RZ2.P0.OVRFLD.XBFC4003.PRT120.PS002001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFC4003.PRT120.PS002001.PG
//LOA79   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP09.LOAD79'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFC4003PS002001 PARTLEVEL 304

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFC4003.PRT120.PS002001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFC4003PS002001 PART 304
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFC4003PS002001   PART 304 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EA1ATRN                                POSITION(      64         )
   CHAR(                     20)
        NULLIF(      84)='?',
   EN1PORT                                POSITION(      85         )
   SMALLINT
        NULLIF(      87)='?',
   EC1DSA                                 POSITION(      88         )
   SMALLINT
        NULLIF(      90)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA00 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 80 tb=BUA.XBFC4003PS002001 part 305
//*        load  XB.RZ2.P0.OVRFLD.XBFC4003.PRT120.PS002001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFC4003.PRT120.PS002001.PL
//LOA80   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP00.LOAD80'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFC4003PS002001 PARTLEVEL 305

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFC4003.PRT120.PS002001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFC4003PS002001 PART 305
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFC4003PS002001   PART 305 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EA1ATRN                                POSITION(      64         )
   CHAR(                     20)
        NULLIF(      84)='?',
   EN1PORT                                POSITION(      85         )
   SMALLINT
        NULLIF(      87)='?',
   EC1DSA                                 POSITION(      88         )
   SMALLINT
        NULLIF(      90)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA01 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 81 tb=BUA.XBFC4003PS001001 part 304
//*        load  XB.RZ2.P0.OVRFLD.XBFC4003.PRT120.PS001001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFC4003.PRT120.PS001001.PG
//LOA81   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP01.LOAD81'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFC4003PS001001 PARTLEVEL 304

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFC4003.PRT120.PS001001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFC4003PS001001 PART 304
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFC4003PS001001   PART 304 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EN1OWNER                               POSITION(      64         )
   SMALLINT
        NULLIF(      66)='?',
   EA1BU                                  POSITION(      67         )
   CHAR(                      4)
        NULLIF(      71)='?',
   EN1AUFTRAGSNR                          POSITION(      72         )
   CHAR(                     17)
        NULLIF(      89)='?',
   EN1AUFTRZEIT                           POSITION(      90         )
   CHAR(                      4)
        NULLIF(      94)='?',
   ET1DZEINLIEFER                         POSITION(      95         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(     121)='?',
   EC1PORTUEBER                           POSITION(     122         )
   CHAR(                      1)
        NULLIF(     123)='?',
   EA1ID01                                POSITION(     124         )
   CHAR(                      4)
        NULLIF(     128)='?',
   EN1AUFTRNRKASS                         POSITION(     129         )
   CHAR(                     17)
        NULLIF(     146)='?',
   ED1AUFTRAG                             POSITION(     147         )
   DATE EXTERNAL(            10)
        NULLIF(     157)='?',
   EN1BKSTNR                              POSITION(     158         )
   CHAR(                      4)
        NULLIF(     162)='?',
   EN1KASSENNR                            POSITION(     163         )
   CHAR(                      4)
        NULLIF(     167)='?',
   EN1AUFTRID                             POSITION(     168         )
   CHAR(                      4)
        NULLIF(     172)='?',
   EN1LAUFNR                              POSITION(     173         )
   CHAR(                      5)
        NULLIF(     178)='?',
   EA1PID                                 POSITION(     179         )
   CHAR(                      7)
        NULLIF(     186)='?',
   EY1BELEGTYP                            POSITION(     187         )
   CHAR(                      1)
        NULLIF(     188)='?',
   EN1PAGINATOR                           POSITION(     189         )
   CHAR(                     20)
        NULLIF(     209)='?',
   ET1LOGPROD                             POSITION(     210         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(     236)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA02 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 82 tb=BUA.XBFC4003PS001001 part 305
//*        load  XB.RZ2.P0.OVRFLD.XBFC4003.PRT120.PS001001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFC4003.PRT120.PS001001.PL
//LOA82   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP02.LOAD82'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFC4003PS001001 PARTLEVEL 305

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFC4003.PRT120.PS001001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFC4003PS001001 PART 305
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFC4003PS001001   PART 305 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1ATRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EC1SEHT                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EC1SEUT                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   ET1SEOCC                               POSITION(      32         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(      58)='?',
   EN1SEUV                                POSITION(      59         )
   SMALLINT
        NULLIF(      61)='?',
   ES1SEUV                                POSITION(      62         )
   CHAR(                      1)
        NULLIF(      63)='?',
   EN1OWNER                               POSITION(      64         )
   SMALLINT
        NULLIF(      66)='?',
   EA1BU                                  POSITION(      67         )
   CHAR(                      4)
        NULLIF(      71)='?',
   EN1AUFTRAGSNR                          POSITION(      72         )
   CHAR(                     17)
        NULLIF(      89)='?',
   EN1AUFTRZEIT                           POSITION(      90         )
   CHAR(                      4)
        NULLIF(      94)='?',
   ET1DZEINLIEFER                         POSITION(      95         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(     121)='?',
   EC1PORTUEBER                           POSITION(     122         )
   CHAR(                      1)
        NULLIF(     123)='?',
   EA1ID01                                POSITION(     124         )
   CHAR(                      4)
        NULLIF(     128)='?',
   EN1AUFTRNRKASS                         POSITION(     129         )
   CHAR(                     17)
        NULLIF(     146)='?',
   ED1AUFTRAG                             POSITION(     147         )
   DATE EXTERNAL(            10)
        NULLIF(     157)='?',
   EN1BKSTNR                              POSITION(     158         )
   CHAR(                      4)
        NULLIF(     162)='?',
   EN1KASSENNR                            POSITION(     163         )
   CHAR(                      4)
        NULLIF(     167)='?',
   EN1AUFTRID                             POSITION(     168         )
   CHAR(                      4)
        NULLIF(     172)='?',
   EN1LAUFNR                              POSITION(     173         )
   CHAR(                      5)
        NULLIF(     178)='?',
   EA1PID                                 POSITION(     179         )
   CHAR(                      7)
        NULLIF(     186)='?',
   EY1BELEGTYP                            POSITION(     187         )
   CHAR(                      1)
        NULLIF(     188)='?',
   EN1PAGINATOR                           POSITION(     189         )
   CHAR(                     20)
        NULLIF(     209)='?',
   ET1LOGPROD                             POSITION(     210         )
   TIMESTAMP EXTERNAL(       26)
        NULLIF(     236)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA03 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 83 tb=BUA.XBFC4003IT002001 part 304
//*        load  XB.RZ2.P0.OVRFLD.XBFC4003.PRT120.IT002001.RG
//*        punch XB.RZ2.P0.OVRFLD.XBFC4003.PRT120.IT002001.PG
//LOA83   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP03.LOAD83'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFC4003IT002001 PARTLEVEL 304

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFC4003.PRT120.IT002001.RG)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFC4003IT002001 PART 304
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFC4003IT002001   PART 304 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EN1STK1                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EN1STK2                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   EA1INHALT                              POSITION(      32         )
   VARCHAR
        NULLIF(    1032)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE
//XBREPA04 JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2,
//         MSGCLASS=T,NOTIFY=&SYSUID
//*        job 84 tb=BUA.XBFC4003IT002001 part 305
//*        load  XB.RZ2.P0.OVRFLD.XBFC4003.PRT120.IT002001.RL
//*        punch XB.RZ2.P0.OVRFLD.XBFC4003.PRT120.IT002001.PL
//LOA84   EXEC PGM=DSNUTILB,PARM='DVBP,XBREP04.LOAD84'
//SYSPRINT   DD SYSOUT=*
//UTPRINT    DD SYSOUT=*
//SYSTEMPL   DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN    DD *
LISTDEF PA INCLUDE TABLE BUA.XBFC4003IT002001 PARTLEVEL 305

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

TEMPLATE INP DSN(XB.RZ2.P0.OVRFLD.XBFC4003.PRT120.IT002001.RL)

LOAD DATA INDDN INP
                LOG NO RESUME YES
  SORTDEVT DISK
  WORKDDN(TSYUTD,TSOUTD)
  INTO TABLE BUA.XBFC4003IT002001 PART 305
-- LOAD DATA INDDN SYSREC LOG NO INTO TABLE
-- BUA.XBFC4003IT002001   PART 305 REPLACE
   (
   EN1PART                                POSITION(       1         )
   INTEGER                                      ,
   EA1STRN                                POSITION(       5         )
   CHAR(                     20)
        NULLIF(      25)='?',
   EN1STK1                                POSITION(      26         )
   SMALLINT
        NULLIF(      28)='?',
   EN1STK2                                POSITION(      29         )
   SMALLINT
        NULLIF(      31)='?',
   EA1INHALT                              POSITION(      32         )
   VARCHAR
        NULLIF(    1032)='?'
   )

COPY LIST PA COPYDDN(TCOPYD)
  FULL YES PARALLEL
  SHRLEVEL CHANGE

RUNSTATS TABLESPACE LIST PA
  INDEX(ALL)
  SHRLEVEL CHANGE