zOs/JCL/DB2REBUJ
$#@
$@=[
INCLUDE INDEX BUA.I0004PRU_MIG PARTLEVEL
INCLUDE INDEX BUA.I0004PRV_MIG PARTLEVEL
INCLUDE INDEX BUA.I0004PRW_MIG PARTLEVEL
INCLUDE INDEX BUA.I0004PRX_MIG PARTLEVEL
INCLUDE INDEX BUA.I0004PRY_MIG PARTLEVEL
INCLUDE INDEX BUA.I0004PRZ_MIG PARTLEVEL
INCLUDE INDEX BUA.I0004PS0_MIG PARTLEVEL
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL
INCLUDE INDEX BUA.I0004PS2_MIG PARTLEVEL
INCLUDE INDEX BUA.I0004PS3_MIG PARTLEVEL
INCLUDE INDEX BUA.I0004PS4_MIG PARTLEVEL
INCLUDE INDEX BUA.I0004PS5_MIG PARTLEVEL
INCLUDE INDEX BUA.I0005GJI_MIG PARTLEVEL
INCLUDE INDEX BUA.I0005GJJ_MIG PARTLEVEL
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL
INCLUDE INDEX BUA.I0005GJL_MIG PARTLEVEL
INCLUDE INDEX BUA.I0005GJM_MIG PARTLEVEL
INCLUDE INDEX BUA.I00054QN_MIG PARTLEVEL
INCLUDE INDEX BUA.I00054QO_MIG PARTLEVEL
INCLUDE INDEX BUA.I00054QP_MIG PARTLEVEL
INCLUDE INDEX BUA.I00054QQ_MIG PARTLEVEL
INCLUDE INDEX BUA.I00054QR_MIG PARTLEVEL
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL
INCLUDE INDEX BUA.I0007X0H_MIG PARTLEVEL
INCLUDE INDEX BUA.I0007X0I_MIG PARTLEVEL
INCLUDE INDEX BUA.I0007X0J_MIG PARTLEVEL
INCLUDE INDEX BUA.I0007X0K_MIG PARTLEVEL
INCLUDE INDEX BUA.I0007X0L_MIG PARTLEVEL
INCLUDE INDEX BUA.I00086SW_MIG PARTLEVEL
$]
$|
$@=[
select strip(s.dbName) || '.' || strip(s.name) ts, partitions parts,
strip(x.creator) || '.' || strip(x.name) ix
from sysibm.sysindexes x
join sysibm.sysTables t
on x.tbCreator = t.creator and x.tbName = t.name
join sysibm.sysTableSpace s
on t.dbName = s.dbName and t.tsName = s.name
where x.creator = 'BUA' and x.name in
$]
pref = '('
$@for i $@[
parse value $i with inc c1 cr'.'ix le
$$- ' 'pref "'"ix"'"
pref = ','
$]
$@=[
)
order by 1, 3
$]
$|
call sqlConnect dvbp
call sqlSel
$|
oldTs = ''
$@forWith i $@[
if $TS \== oldTs then do
if oldTs \== '' then
$$- li
oldTs = $TS
li = $TS $PARTS
end
li = li $IX
$]
$$- li
$|
$=lx=0
$=jx=0
$@for i $@[
parse value $i with ts parts .
$@do px=1 to parts $@[
$=lx=-$lx+1
if $lx // 100 = 1 then $@=[
$=jx=-$jx+1
$=sx=-$jx//4
$=sx=-if($sx=0,4,$sx)
//A540769$sx JOB (KEL25071,0240,,3612),'CATALOG',
//* RESTART=STEPNAME, <== FOR RESTART REMOVE * AND ENTER STEP NAME
// MSGCLASS=T,TIME=1440
//*MAIN SYSTEM=S2$sx
//*
$]
$@=[
$$- '//******* ts' ts 'part' px 'of' parts',' (words($i)-2) 'index'
//STP$lx EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A540769$jx.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
$]
$$ LISTDEF LST$lx
$@do wx=3 to words($i) $@=[
$=ix=-word($i, wx)
INCLUDE INDEX $ix PARTLEVEL $px
$]
$@=[
REBUILD INDEX LIST LST$lx SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
$]
$]
call sqlDisconnect
$]
$#out 20101212 15:37:19
//A5407691 JOB (KEL25071,0240,,3612),'CATALOG',
//* RESTART=STEPNAME, <== FOR RESTART REMOVE * AND ENTER STEP NAME
// MSGCLASS=T,TIME=1440
//*MAIN SYSTEM=S21
//*
//******* ts XBDLH001.SIT02001 part 1 of 2, 1 index
//STP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST1
INCLUDE INDEX BUA.I0007X0J_MIG PARTLEVEL 1
REBUILD INDEX LIST LST1 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDLH001.SIT02001 part 2 of 2, 1 index
//STP2 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST2
INCLUDE INDEX BUA.I0007X0J_MIG PARTLEVEL 2
REBUILD INDEX LIST LST2 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDLH001.SPS01001 part 1 of 2, 2 index
//STP3 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST3
INCLUDE INDEX BUA.I0007X0H_MIG PARTLEVEL 1
INCLUDE INDEX BUA.I0007X0I_MIG PARTLEVEL 1
REBUILD INDEX LIST LST3 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDLH001.SPS01001 part 2 of 2, 2 index
//STP4 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST4
INCLUDE INDEX BUA.I0007X0H_MIG PARTLEVEL 2
INCLUDE INDEX BUA.I0007X0I_MIG PARTLEVEL 2
REBUILD INDEX LIST LST4 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDLH001.SPS02001 part 1 of 2, 2 index
//STP5 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST5
INCLUDE INDEX BUA.I0007X0K_MIG PARTLEVEL 1
INCLUDE INDEX BUA.I0007X0L_MIG PARTLEVEL 1
REBUILD INDEX LIST LST5 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDLH001.SPS02001 part 2 of 2, 2 index
//STP6 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST6
INCLUDE INDEX BUA.I0007X0K_MIG PARTLEVEL 2
INCLUDE INDEX BUA.I0007X0L_MIG PARTLEVEL 2
REBUILD INDEX LIST LST6 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 1 of 139, 1 index
//STP7 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST7
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 1
REBUILD INDEX LIST LST7 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 2 of 139, 1 index
//STP8 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST8
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 2
REBUILD INDEX LIST LST8 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 3 of 139, 1 index
//STP9 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST9
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 3
REBUILD INDEX LIST LST9 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 4 of 139, 1 index
//STP10 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST10
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 4
REBUILD INDEX LIST LST10 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 5 of 139, 1 index
//STP11 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST11
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 5
REBUILD INDEX LIST LST11 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 6 of 139, 1 index
//STP12 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST12
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 6
REBUILD INDEX LIST LST12 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 7 of 139, 1 index
//STP13 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST13
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 7
REBUILD INDEX LIST LST13 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 8 of 139, 1 index
//STP14 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST14
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 8
REBUILD INDEX LIST LST14 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 9 of 139, 1 index
//STP15 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST15
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 9
REBUILD INDEX LIST LST15 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 10 of 139, 1 index
//STP16 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST16
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 10
REBUILD INDEX LIST LST16 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 11 of 139, 1 index
//STP17 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST17
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 11
REBUILD INDEX LIST LST17 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 12 of 139, 1 index
//STP18 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST18
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 12
REBUILD INDEX LIST LST18 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 13 of 139, 1 index
//STP19 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST19
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 13
REBUILD INDEX LIST LST19 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 14 of 139, 1 index
//STP20 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST20
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 14
REBUILD INDEX LIST LST20 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 15 of 139, 1 index
//STP21 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST21
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 15
REBUILD INDEX LIST LST21 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 16 of 139, 1 index
//STP22 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST22
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 16
REBUILD INDEX LIST LST22 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 17 of 139, 1 index
//STP23 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST23
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 17
REBUILD INDEX LIST LST23 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 18 of 139, 1 index
//STP24 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST24
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 18
REBUILD INDEX LIST LST24 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 19 of 139, 1 index
//STP25 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST25
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 19
REBUILD INDEX LIST LST25 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 20 of 139, 1 index
//STP26 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST26
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 20
REBUILD INDEX LIST LST26 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 21 of 139, 1 index
//STP27 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST27
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 21
REBUILD INDEX LIST LST27 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 22 of 139, 1 index
//STP28 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST28
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 22
REBUILD INDEX LIST LST28 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 23 of 139, 1 index
//STP29 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST29
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 23
REBUILD INDEX LIST LST29 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 24 of 139, 1 index
//STP30 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST30
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 24
REBUILD INDEX LIST LST30 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 25 of 139, 1 index
//STP31 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST31
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 25
REBUILD INDEX LIST LST31 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 26 of 139, 1 index
//STP32 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST32
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 26
REBUILD INDEX LIST LST32 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 27 of 139, 1 index
//STP33 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST33
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 27
REBUILD INDEX LIST LST33 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 28 of 139, 1 index
//STP34 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST34
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 28
REBUILD INDEX LIST LST34 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 29 of 139, 1 index
//STP35 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST35
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 29
REBUILD INDEX LIST LST35 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 30 of 139, 1 index
//STP36 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST36
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 30
REBUILD INDEX LIST LST36 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 31 of 139, 1 index
//STP37 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST37
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 31
REBUILD INDEX LIST LST37 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 32 of 139, 1 index
//STP38 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST38
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 32
REBUILD INDEX LIST LST38 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 33 of 139, 1 index
//STP39 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST39
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 33
REBUILD INDEX LIST LST39 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 34 of 139, 1 index
//STP40 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST40
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 34
REBUILD INDEX LIST LST40 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 35 of 139, 1 index
//STP41 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST41
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 35
REBUILD INDEX LIST LST41 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 36 of 139, 1 index
//STP42 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST42
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 36
REBUILD INDEX LIST LST42 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 37 of 139, 1 index
//STP43 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST43
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 37
REBUILD INDEX LIST LST43 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 38 of 139, 1 index
//STP44 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST44
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 38
REBUILD INDEX LIST LST44 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 39 of 139, 1 index
//STP45 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST45
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 39
REBUILD INDEX LIST LST45 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 40 of 139, 1 index
//STP46 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST46
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 40
REBUILD INDEX LIST LST46 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 41 of 139, 1 index
//STP47 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST47
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 41
REBUILD INDEX LIST LST47 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 42 of 139, 1 index
//STP48 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST48
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 42
REBUILD INDEX LIST LST48 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 43 of 139, 1 index
//STP49 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST49
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 43
REBUILD INDEX LIST LST49 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 44 of 139, 1 index
//STP50 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST50
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 44
REBUILD INDEX LIST LST50 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 45 of 139, 1 index
//STP51 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST51
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 45
REBUILD INDEX LIST LST51 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 46 of 139, 1 index
//STP52 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST52
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 46
REBUILD INDEX LIST LST52 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 47 of 139, 1 index
//STP53 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST53
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 47
REBUILD INDEX LIST LST53 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 48 of 139, 1 index
//STP54 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST54
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 48
REBUILD INDEX LIST LST54 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 49 of 139, 1 index
//STP55 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST55
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 49
REBUILD INDEX LIST LST55 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 50 of 139, 1 index
//STP56 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST56
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 50
REBUILD INDEX LIST LST56 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 51 of 139, 1 index
//STP57 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST57
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 51
REBUILD INDEX LIST LST57 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 52 of 139, 1 index
//STP58 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST58
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 52
REBUILD INDEX LIST LST58 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 53 of 139, 1 index
//STP59 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST59
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 53
REBUILD INDEX LIST LST59 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 54 of 139, 1 index
//STP60 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST60
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 54
REBUILD INDEX LIST LST60 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 55 of 139, 1 index
//STP61 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST61
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 55
REBUILD INDEX LIST LST61 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 56 of 139, 1 index
//STP62 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST62
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 56
REBUILD INDEX LIST LST62 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 57 of 139, 1 index
//STP63 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST63
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 57
REBUILD INDEX LIST LST63 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 58 of 139, 1 index
//STP64 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST64
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 58
REBUILD INDEX LIST LST64 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 59 of 139, 1 index
//STP65 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST65
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 59
REBUILD INDEX LIST LST65 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 60 of 139, 1 index
//STP66 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST66
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 60
REBUILD INDEX LIST LST66 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 61 of 139, 1 index
//STP67 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST67
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 61
REBUILD INDEX LIST LST67 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 62 of 139, 1 index
//STP68 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST68
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 62
REBUILD INDEX LIST LST68 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 63 of 139, 1 index
//STP69 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST69
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 63
REBUILD INDEX LIST LST69 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 64 of 139, 1 index
//STP70 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST70
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 64
REBUILD INDEX LIST LST70 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 65 of 139, 1 index
//STP71 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST71
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 65
REBUILD INDEX LIST LST71 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 66 of 139, 1 index
//STP72 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST72
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 66
REBUILD INDEX LIST LST72 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 67 of 139, 1 index
//STP73 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST73
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 67
REBUILD INDEX LIST LST73 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 68 of 139, 1 index
//STP74 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST74
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 68
REBUILD INDEX LIST LST74 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 69 of 139, 1 index
//STP75 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST75
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 69
REBUILD INDEX LIST LST75 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 70 of 139, 1 index
//STP76 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST76
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 70
REBUILD INDEX LIST LST76 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 71 of 139, 1 index
//STP77 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST77
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 71
REBUILD INDEX LIST LST77 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 72 of 139, 1 index
//STP78 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST78
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 72
REBUILD INDEX LIST LST78 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 73 of 139, 1 index
//STP79 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST79
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 73
REBUILD INDEX LIST LST79 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 74 of 139, 1 index
//STP80 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST80
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 74
REBUILD INDEX LIST LST80 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 75 of 139, 1 index
//STP81 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST81
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 75
REBUILD INDEX LIST LST81 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 76 of 139, 1 index
//STP82 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST82
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 76
REBUILD INDEX LIST LST82 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 77 of 139, 1 index
//STP83 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST83
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 77
REBUILD INDEX LIST LST83 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 78 of 139, 1 index
//STP84 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST84
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 78
REBUILD INDEX LIST LST84 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 79 of 139, 1 index
//STP85 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST85
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 79
REBUILD INDEX LIST LST85 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 80 of 139, 1 index
//STP86 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST86
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 80
REBUILD INDEX LIST LST86 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 81 of 139, 1 index
//STP87 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST87
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 81
REBUILD INDEX LIST LST87 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 82 of 139, 1 index
//STP88 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST88
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 82
REBUILD INDEX LIST LST88 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 83 of 139, 1 index
//STP89 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST89
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 83
REBUILD INDEX LIST LST89 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 84 of 139, 1 index
//STP90 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST90
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 84
REBUILD INDEX LIST LST90 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 85 of 139, 1 index
//STP91 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST91
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 85
REBUILD INDEX LIST LST91 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 86 of 139, 1 index
//STP92 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST92
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 86
REBUILD INDEX LIST LST92 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 87 of 139, 1 index
//STP93 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST93
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 87
REBUILD INDEX LIST LST93 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 88 of 139, 1 index
//STP94 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST94
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 88
REBUILD INDEX LIST LST94 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 89 of 139, 1 index
//STP95 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST95
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 89
REBUILD INDEX LIST LST95 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 90 of 139, 1 index
//STP96 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST96
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 90
REBUILD INDEX LIST LST96 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 91 of 139, 1 index
//STP97 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST97
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 91
REBUILD INDEX LIST LST97 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 92 of 139, 1 index
//STP98 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST98
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 92
REBUILD INDEX LIST LST98 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 93 of 139, 1 index
//STP99 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST99
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 93
REBUILD INDEX LIST LST99 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 94 of 139, 1 index
//STP100 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407691.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST100
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 94
REBUILD INDEX LIST LST100 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//A5407692 JOB (KEL25071,0240,,3612),'CATALOG',
//* RESTART=STEPNAME, <== FOR RESTART REMOVE * AND ENTER STEP NAME
// MSGCLASS=T,TIME=1440
//*MAIN SYSTEM=S22
//*
//******* ts XBDM7001.SIT02001 part 95 of 139, 1 index
//STP101 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST101
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 95
REBUILD INDEX LIST LST101 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 96 of 139, 1 index
//STP102 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST102
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 96
REBUILD INDEX LIST LST102 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 97 of 139, 1 index
//STP103 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST103
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 97
REBUILD INDEX LIST LST103 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 98 of 139, 1 index
//STP104 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST104
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 98
REBUILD INDEX LIST LST104 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 99 of 139, 1 index
//STP105 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST105
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 99
REBUILD INDEX LIST LST105 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 100 of 139, 1 index
//STP106 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST106
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 100
REBUILD INDEX LIST LST106 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 101 of 139, 1 index
//STP107 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST107
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 101
REBUILD INDEX LIST LST107 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 102 of 139, 1 index
//STP108 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST108
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 102
REBUILD INDEX LIST LST108 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 103 of 139, 1 index
//STP109 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST109
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 103
REBUILD INDEX LIST LST109 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 104 of 139, 1 index
//STP110 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST110
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 104
REBUILD INDEX LIST LST110 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 105 of 139, 1 index
//STP111 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST111
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 105
REBUILD INDEX LIST LST111 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 106 of 139, 1 index
//STP112 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST112
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 106
REBUILD INDEX LIST LST112 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 107 of 139, 1 index
//STP113 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST113
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 107
REBUILD INDEX LIST LST113 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 108 of 139, 1 index
//STP114 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST114
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 108
REBUILD INDEX LIST LST114 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 109 of 139, 1 index
//STP115 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST115
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 109
REBUILD INDEX LIST LST115 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 110 of 139, 1 index
//STP116 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST116
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 110
REBUILD INDEX LIST LST116 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 111 of 139, 1 index
//STP117 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST117
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 111
REBUILD INDEX LIST LST117 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 112 of 139, 1 index
//STP118 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST118
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 112
REBUILD INDEX LIST LST118 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 113 of 139, 1 index
//STP119 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST119
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 113
REBUILD INDEX LIST LST119 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 114 of 139, 1 index
//STP120 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST120
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 114
REBUILD INDEX LIST LST120 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 115 of 139, 1 index
//STP121 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST121
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 115
REBUILD INDEX LIST LST121 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 116 of 139, 1 index
//STP122 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST122
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 116
REBUILD INDEX LIST LST122 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 117 of 139, 1 index
//STP123 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST123
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 117
REBUILD INDEX LIST LST123 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 118 of 139, 1 index
//STP124 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST124
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 118
REBUILD INDEX LIST LST124 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 119 of 139, 1 index
//STP125 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST125
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 119
REBUILD INDEX LIST LST125 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 120 of 139, 1 index
//STP126 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST126
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 120
REBUILD INDEX LIST LST126 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 121 of 139, 1 index
//STP127 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST127
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 121
REBUILD INDEX LIST LST127 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 122 of 139, 1 index
//STP128 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST128
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 122
REBUILD INDEX LIST LST128 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 123 of 139, 1 index
//STP129 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST129
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 123
REBUILD INDEX LIST LST129 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 124 of 139, 1 index
//STP130 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST130
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 124
REBUILD INDEX LIST LST130 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 125 of 139, 1 index
//STP131 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST131
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 125
REBUILD INDEX LIST LST131 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 126 of 139, 1 index
//STP132 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST132
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 126
REBUILD INDEX LIST LST132 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 127 of 139, 1 index
//STP133 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST133
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 127
REBUILD INDEX LIST LST133 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 128 of 139, 1 index
//STP134 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST134
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 128
REBUILD INDEX LIST LST134 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 129 of 139, 1 index
//STP135 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST135
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 129
REBUILD INDEX LIST LST135 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 130 of 139, 1 index
//STP136 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST136
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 130
REBUILD INDEX LIST LST136 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 131 of 139, 1 index
//STP137 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST137
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 131
REBUILD INDEX LIST LST137 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 132 of 139, 1 index
//STP138 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST138
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 132
REBUILD INDEX LIST LST138 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 133 of 139, 1 index
//STP139 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST139
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 133
REBUILD INDEX LIST LST139 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 134 of 139, 1 index
//STP140 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST140
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 134
REBUILD INDEX LIST LST140 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 135 of 139, 1 index
//STP141 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST141
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 135
REBUILD INDEX LIST LST141 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 136 of 139, 1 index
//STP142 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST142
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 136
REBUILD INDEX LIST LST142 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 137 of 139, 1 index
//STP143 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST143
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 137
REBUILD INDEX LIST LST143 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 138 of 139, 1 index
//STP144 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST144
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 138
REBUILD INDEX LIST LST144 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SIT02001 part 139 of 139, 1 index
//STP145 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST145
INCLUDE INDEX BUA.I0006XFA_MIG PARTLEVEL 139
REBUILD INDEX LIST LST145 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 1 of 36, 1 index
//STP146 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST146
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 1
REBUILD INDEX LIST LST146 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 2 of 36, 1 index
//STP147 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST147
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 2
REBUILD INDEX LIST LST147 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 3 of 36, 1 index
//STP148 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST148
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 3
REBUILD INDEX LIST LST148 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 4 of 36, 1 index
//STP149 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST149
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 4
REBUILD INDEX LIST LST149 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 5 of 36, 1 index
//STP150 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST150
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 5
REBUILD INDEX LIST LST150 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 6 of 36, 1 index
//STP151 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST151
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 6
REBUILD INDEX LIST LST151 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 7 of 36, 1 index
//STP152 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST152
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 7
REBUILD INDEX LIST LST152 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 8 of 36, 1 index
//STP153 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST153
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 8
REBUILD INDEX LIST LST153 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 9 of 36, 1 index
//STP154 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST154
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 9
REBUILD INDEX LIST LST154 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 10 of 36, 1 index
//STP155 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST155
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 10
REBUILD INDEX LIST LST155 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 11 of 36, 1 index
//STP156 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST156
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 11
REBUILD INDEX LIST LST156 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 12 of 36, 1 index
//STP157 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST157
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 12
REBUILD INDEX LIST LST157 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 13 of 36, 1 index
//STP158 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST158
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 13
REBUILD INDEX LIST LST158 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 14 of 36, 1 index
//STP159 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST159
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 14
REBUILD INDEX LIST LST159 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 15 of 36, 1 index
//STP160 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST160
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 15
REBUILD INDEX LIST LST160 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 16 of 36, 1 index
//STP161 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST161
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 16
REBUILD INDEX LIST LST161 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 17 of 36, 1 index
//STP162 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST162
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 17
REBUILD INDEX LIST LST162 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 18 of 36, 1 index
//STP163 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST163
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 18
REBUILD INDEX LIST LST163 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 19 of 36, 1 index
//STP164 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST164
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 19
REBUILD INDEX LIST LST164 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 20 of 36, 1 index
//STP165 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST165
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 20
REBUILD INDEX LIST LST165 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 21 of 36, 1 index
//STP166 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST166
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 21
REBUILD INDEX LIST LST166 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 22 of 36, 1 index
//STP167 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST167
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 22
REBUILD INDEX LIST LST167 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 23 of 36, 1 index
//STP168 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST168
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 23
REBUILD INDEX LIST LST168 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 24 of 36, 1 index
//STP169 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST169
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 24
REBUILD INDEX LIST LST169 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 25 of 36, 1 index
//STP170 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST170
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 25
REBUILD INDEX LIST LST170 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 26 of 36, 1 index
//STP171 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST171
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 26
REBUILD INDEX LIST LST171 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 27 of 36, 1 index
//STP172 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST172
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 27
REBUILD INDEX LIST LST172 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 28 of 36, 1 index
//STP173 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST173
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 28
REBUILD INDEX LIST LST173 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 29 of 36, 1 index
//STP174 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST174
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 29
REBUILD INDEX LIST LST174 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 30 of 36, 1 index
//STP175 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST175
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 30
REBUILD INDEX LIST LST175 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 31 of 36, 1 index
//STP176 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST176
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 31
REBUILD INDEX LIST LST176 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 32 of 36, 1 index
//STP177 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST177
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 32
REBUILD INDEX LIST LST177 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 33 of 36, 1 index
//STP178 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST178
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 33
REBUILD INDEX LIST LST178 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 34 of 36, 1 index
//STP179 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST179
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 34
REBUILD INDEX LIST LST179 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 35 of 36, 1 index
//STP180 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST180
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 35
REBUILD INDEX LIST LST180 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01002 part 36 of 36, 1 index
//STP181 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST181
INCLUDE INDEX BUA.I0006XF4_MIG PARTLEVEL 36
REBUILD INDEX LIST LST181 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 1 of 87, 2 index
//STP182 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST182
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 1
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 1
REBUILD INDEX LIST LST182 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 2 of 87, 2 index
//STP183 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST183
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 2
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 2
REBUILD INDEX LIST LST183 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 3 of 87, 2 index
//STP184 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST184
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 3
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 3
REBUILD INDEX LIST LST184 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 4 of 87, 2 index
//STP185 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST185
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 4
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 4
REBUILD INDEX LIST LST185 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 5 of 87, 2 index
//STP186 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST186
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 5
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 5
REBUILD INDEX LIST LST186 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 6 of 87, 2 index
//STP187 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST187
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 6
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 6
REBUILD INDEX LIST LST187 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 7 of 87, 2 index
//STP188 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST188
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 7
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 7
REBUILD INDEX LIST LST188 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 8 of 87, 2 index
//STP189 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST189
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 8
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 8
REBUILD INDEX LIST LST189 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 9 of 87, 2 index
//STP190 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST190
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 9
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 9
REBUILD INDEX LIST LST190 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 10 of 87, 2 index
//STP191 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST191
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 10
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 10
REBUILD INDEX LIST LST191 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 11 of 87, 2 index
//STP192 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST192
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 11
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 11
REBUILD INDEX LIST LST192 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 12 of 87, 2 index
//STP193 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST193
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 12
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 12
REBUILD INDEX LIST LST193 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 13 of 87, 2 index
//STP194 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST194
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 13
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 13
REBUILD INDEX LIST LST194 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 14 of 87, 2 index
//STP195 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST195
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 14
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 14
REBUILD INDEX LIST LST195 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 15 of 87, 2 index
//STP196 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST196
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 15
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 15
REBUILD INDEX LIST LST196 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 16 of 87, 2 index
//STP197 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST197
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 16
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 16
REBUILD INDEX LIST LST197 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 17 of 87, 2 index
//STP198 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST198
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 17
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 17
REBUILD INDEX LIST LST198 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 18 of 87, 2 index
//STP199 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST199
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 18
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 18
REBUILD INDEX LIST LST199 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 19 of 87, 2 index
//STP200 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407692.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST200
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 19
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 19
REBUILD INDEX LIST LST200 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//A5407693 JOB (KEL25071,0240,,3612),'CATALOG',
//* RESTART=STEPNAME, <== FOR RESTART REMOVE * AND ENTER STEP NAME
// MSGCLASS=T,TIME=1440
//*MAIN SYSTEM=S23
//*
//******* ts XBDM7001.SPM01003 part 20 of 87, 2 index
//STP201 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST201
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 20
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 20
REBUILD INDEX LIST LST201 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 21 of 87, 2 index
//STP202 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST202
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 21
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 21
REBUILD INDEX LIST LST202 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 22 of 87, 2 index
//STP203 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST203
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 22
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 22
REBUILD INDEX LIST LST203 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 23 of 87, 2 index
//STP204 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST204
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 23
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 23
REBUILD INDEX LIST LST204 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 24 of 87, 2 index
//STP205 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST205
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 24
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 24
REBUILD INDEX LIST LST205 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 25 of 87, 2 index
//STP206 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST206
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 25
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 25
REBUILD INDEX LIST LST206 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 26 of 87, 2 index
//STP207 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST207
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 26
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 26
REBUILD INDEX LIST LST207 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 27 of 87, 2 index
//STP208 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST208
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 27
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 27
REBUILD INDEX LIST LST208 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 28 of 87, 2 index
//STP209 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST209
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 28
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 28
REBUILD INDEX LIST LST209 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 29 of 87, 2 index
//STP210 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST210
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 29
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 29
REBUILD INDEX LIST LST210 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 30 of 87, 2 index
//STP211 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST211
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 30
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 30
REBUILD INDEX LIST LST211 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 31 of 87, 2 index
//STP212 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST212
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 31
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 31
REBUILD INDEX LIST LST212 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 32 of 87, 2 index
//STP213 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST213
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 32
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 32
REBUILD INDEX LIST LST213 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 33 of 87, 2 index
//STP214 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST214
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 33
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 33
REBUILD INDEX LIST LST214 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 34 of 87, 2 index
//STP215 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST215
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 34
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 34
REBUILD INDEX LIST LST215 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 35 of 87, 2 index
//STP216 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST216
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 35
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 35
REBUILD INDEX LIST LST216 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 36 of 87, 2 index
//STP217 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST217
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 36
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 36
REBUILD INDEX LIST LST217 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 37 of 87, 2 index
//STP218 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST218
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 37
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 37
REBUILD INDEX LIST LST218 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 38 of 87, 2 index
//STP219 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST219
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 38
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 38
REBUILD INDEX LIST LST219 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 39 of 87, 2 index
//STP220 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST220
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 39
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 39
REBUILD INDEX LIST LST220 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 40 of 87, 2 index
//STP221 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST221
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 40
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 40
REBUILD INDEX LIST LST221 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 41 of 87, 2 index
//STP222 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST222
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 41
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 41
REBUILD INDEX LIST LST222 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 42 of 87, 2 index
//STP223 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST223
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 42
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 42
REBUILD INDEX LIST LST223 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 43 of 87, 2 index
//STP224 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST224
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 43
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 43
REBUILD INDEX LIST LST224 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 44 of 87, 2 index
//STP225 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST225
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 44
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 44
REBUILD INDEX LIST LST225 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 45 of 87, 2 index
//STP226 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST226
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 45
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 45
REBUILD INDEX LIST LST226 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 46 of 87, 2 index
//STP227 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST227
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 46
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 46
REBUILD INDEX LIST LST227 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 47 of 87, 2 index
//STP228 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST228
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 47
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 47
REBUILD INDEX LIST LST228 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 48 of 87, 2 index
//STP229 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST229
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 48
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 48
REBUILD INDEX LIST LST229 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 49 of 87, 2 index
//STP230 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST230
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 49
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 49
REBUILD INDEX LIST LST230 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 50 of 87, 2 index
//STP231 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST231
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 50
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 50
REBUILD INDEX LIST LST231 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 51 of 87, 2 index
//STP232 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST232
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 51
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 51
REBUILD INDEX LIST LST232 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 52 of 87, 2 index
//STP233 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST233
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 52
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 52
REBUILD INDEX LIST LST233 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 53 of 87, 2 index
//STP234 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST234
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 53
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 53
REBUILD INDEX LIST LST234 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 54 of 87, 2 index
//STP235 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST235
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 54
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 54
REBUILD INDEX LIST LST235 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 55 of 87, 2 index
//STP236 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST236
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 55
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 55
REBUILD INDEX LIST LST236 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 56 of 87, 2 index
//STP237 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST237
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 56
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 56
REBUILD INDEX LIST LST237 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 57 of 87, 2 index
//STP238 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST238
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 57
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 57
REBUILD INDEX LIST LST238 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 58 of 87, 2 index
//STP239 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST239
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 58
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 58
REBUILD INDEX LIST LST239 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 59 of 87, 2 index
//STP240 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST240
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 59
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 59
REBUILD INDEX LIST LST240 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 60 of 87, 2 index
//STP241 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST241
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 60
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 60
REBUILD INDEX LIST LST241 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 61 of 87, 2 index
//STP242 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST242
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 61
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 61
REBUILD INDEX LIST LST242 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 62 of 87, 2 index
//STP243 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST243
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 62
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 62
REBUILD INDEX LIST LST243 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 63 of 87, 2 index
//STP244 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST244
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 63
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 63
REBUILD INDEX LIST LST244 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 64 of 87, 2 index
//STP245 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST245
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 64
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 64
REBUILD INDEX LIST LST245 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 65 of 87, 2 index
//STP246 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST246
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 65
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 65
REBUILD INDEX LIST LST246 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 66 of 87, 2 index
//STP247 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST247
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 66
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 66
REBUILD INDEX LIST LST247 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 67 of 87, 2 index
//STP248 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST248
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 67
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 67
REBUILD INDEX LIST LST248 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 68 of 87, 2 index
//STP249 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST249
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 68
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 68
REBUILD INDEX LIST LST249 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 69 of 87, 2 index
//STP250 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST250
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 69
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 69
REBUILD INDEX LIST LST250 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 70 of 87, 2 index
//STP251 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST251
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 70
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 70
REBUILD INDEX LIST LST251 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 71 of 87, 2 index
//STP252 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST252
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 71
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 71
REBUILD INDEX LIST LST252 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 72 of 87, 2 index
//STP253 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST253
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 72
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 72
REBUILD INDEX LIST LST253 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 73 of 87, 2 index
//STP254 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST254
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 73
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 73
REBUILD INDEX LIST LST254 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 74 of 87, 2 index
//STP255 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST255
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 74
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 74
REBUILD INDEX LIST LST255 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 75 of 87, 2 index
//STP256 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST256
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 75
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 75
REBUILD INDEX LIST LST256 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 76 of 87, 2 index
//STP257 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST257
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 76
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 76
REBUILD INDEX LIST LST257 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 77 of 87, 2 index
//STP258 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST258
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 77
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 77
REBUILD INDEX LIST LST258 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 78 of 87, 2 index
//STP259 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST259
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 78
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 78
REBUILD INDEX LIST LST259 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 79 of 87, 2 index
//STP260 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST260
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 79
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 79
REBUILD INDEX LIST LST260 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 80 of 87, 2 index
//STP261 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST261
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 80
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 80
REBUILD INDEX LIST LST261 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 81 of 87, 2 index
//STP262 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST262
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 81
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 81
REBUILD INDEX LIST LST262 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 82 of 87, 2 index
//STP263 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST263
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 82
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 82
REBUILD INDEX LIST LST263 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 83 of 87, 2 index
//STP264 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST264
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 83
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 83
REBUILD INDEX LIST LST264 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 84 of 87, 2 index
//STP265 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST265
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 84
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 84
REBUILD INDEX LIST LST265 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 85 of 87, 2 index
//STP266 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST266
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 85
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 85
REBUILD INDEX LIST LST266 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 86 of 87, 2 index
//STP267 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST267
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 86
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 86
REBUILD INDEX LIST LST267 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPM01003 part 87 of 87, 2 index
//STP268 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST268
INCLUDE INDEX BUA.I0006XF5_MIG PARTLEVEL 87
INCLUDE INDEX BUA.I0006XF6_MIG PARTLEVEL 87
REBUILD INDEX LIST LST268 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 1 of 71, 3 index
//STP269 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST269
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 1
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 1
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 1
REBUILD INDEX LIST LST269 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 2 of 71, 3 index
//STP270 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST270
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 2
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 2
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 2
REBUILD INDEX LIST LST270 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 3 of 71, 3 index
//STP271 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST271
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 3
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 3
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 3
REBUILD INDEX LIST LST271 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 4 of 71, 3 index
//STP272 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST272
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 4
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 4
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 4
REBUILD INDEX LIST LST272 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 5 of 71, 3 index
//STP273 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST273
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 5
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 5
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 5
REBUILD INDEX LIST LST273 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 6 of 71, 3 index
//STP274 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST274
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 6
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 6
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 6
REBUILD INDEX LIST LST274 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 7 of 71, 3 index
//STP275 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST275
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 7
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 7
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 7
REBUILD INDEX LIST LST275 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 8 of 71, 3 index
//STP276 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST276
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 8
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 8
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 8
REBUILD INDEX LIST LST276 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 9 of 71, 3 index
//STP277 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST277
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 9
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 9
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 9
REBUILD INDEX LIST LST277 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 10 of 71, 3 index
//STP278 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST278
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 10
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 10
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 10
REBUILD INDEX LIST LST278 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 11 of 71, 3 index
//STP279 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST279
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 11
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 11
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 11
REBUILD INDEX LIST LST279 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 12 of 71, 3 index
//STP280 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST280
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 12
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 12
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 12
REBUILD INDEX LIST LST280 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 13 of 71, 3 index
//STP281 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST281
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 13
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 13
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 13
REBUILD INDEX LIST LST281 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 14 of 71, 3 index
//STP282 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST282
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 14
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 14
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 14
REBUILD INDEX LIST LST282 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 15 of 71, 3 index
//STP283 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST283
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 15
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 15
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 15
REBUILD INDEX LIST LST283 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 16 of 71, 3 index
//STP284 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST284
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 16
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 16
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 16
REBUILD INDEX LIST LST284 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 17 of 71, 3 index
//STP285 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST285
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 17
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 17
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 17
REBUILD INDEX LIST LST285 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 18 of 71, 3 index
//STP286 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST286
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 18
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 18
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 18
REBUILD INDEX LIST LST286 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 19 of 71, 3 index
//STP287 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST287
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 19
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 19
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 19
REBUILD INDEX LIST LST287 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 20 of 71, 3 index
//STP288 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST288
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 20
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 20
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 20
REBUILD INDEX LIST LST288 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 21 of 71, 3 index
//STP289 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST289
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 21
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 21
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 21
REBUILD INDEX LIST LST289 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 22 of 71, 3 index
//STP290 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST290
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 22
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 22
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 22
REBUILD INDEX LIST LST290 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 23 of 71, 3 index
//STP291 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST291
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 23
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 23
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 23
REBUILD INDEX LIST LST291 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 24 of 71, 3 index
//STP292 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST292
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 24
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 24
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 24
REBUILD INDEX LIST LST292 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 25 of 71, 3 index
//STP293 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST293
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 25
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 25
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 25
REBUILD INDEX LIST LST293 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 26 of 71, 3 index
//STP294 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST294
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 26
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 26
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 26
REBUILD INDEX LIST LST294 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 27 of 71, 3 index
//STP295 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST295
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 27
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 27
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 27
REBUILD INDEX LIST LST295 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 28 of 71, 3 index
//STP296 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST296
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 28
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 28
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 28
REBUILD INDEX LIST LST296 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 29 of 71, 3 index
//STP297 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST297
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 29
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 29
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 29
REBUILD INDEX LIST LST297 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 30 of 71, 3 index
//STP298 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST298
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 30
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 30
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 30
REBUILD INDEX LIST LST298 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 31 of 71, 3 index
//STP299 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST299
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 31
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 31
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 31
REBUILD INDEX LIST LST299 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 32 of 71, 3 index
//STP300 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407693.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST300
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 32
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 32
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 32
REBUILD INDEX LIST LST300 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//A5407694 JOB (KEL25071,0240,,3612),'CATALOG',
//* RESTART=STEPNAME, <== FOR RESTART REMOVE * AND ENTER STEP NAME
// MSGCLASS=T,TIME=1440
//*MAIN SYSTEM=S24
//*
//******* ts XBDM7001.SPS01001 part 33 of 71, 3 index
//STP301 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST301
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 33
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 33
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 33
REBUILD INDEX LIST LST301 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 34 of 71, 3 index
//STP302 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST302
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 34
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 34
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 34
REBUILD INDEX LIST LST302 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 35 of 71, 3 index
//STP303 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST303
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 35
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 35
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 35
REBUILD INDEX LIST LST303 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 36 of 71, 3 index
//STP304 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST304
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 36
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 36
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 36
REBUILD INDEX LIST LST304 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 37 of 71, 3 index
//STP305 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST305
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 37
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 37
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 37
REBUILD INDEX LIST LST305 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 38 of 71, 3 index
//STP306 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST306
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 38
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 38
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 38
REBUILD INDEX LIST LST306 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 39 of 71, 3 index
//STP307 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST307
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 39
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 39
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 39
REBUILD INDEX LIST LST307 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 40 of 71, 3 index
//STP308 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST308
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 40
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 40
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 40
REBUILD INDEX LIST LST308 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 41 of 71, 3 index
//STP309 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST309
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 41
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 41
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 41
REBUILD INDEX LIST LST309 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 42 of 71, 3 index
//STP310 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST310
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 42
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 42
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 42
REBUILD INDEX LIST LST310 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 43 of 71, 3 index
//STP311 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST311
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 43
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 43
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 43
REBUILD INDEX LIST LST311 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 44 of 71, 3 index
//STP312 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST312
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 44
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 44
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 44
REBUILD INDEX LIST LST312 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 45 of 71, 3 index
//STP313 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST313
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 45
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 45
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 45
REBUILD INDEX LIST LST313 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 46 of 71, 3 index
//STP314 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST314
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 46
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 46
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 46
REBUILD INDEX LIST LST314 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 47 of 71, 3 index
//STP315 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST315
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 47
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 47
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 47
REBUILD INDEX LIST LST315 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 48 of 71, 3 index
//STP316 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST316
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 48
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 48
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 48
REBUILD INDEX LIST LST316 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 49 of 71, 3 index
//STP317 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST317
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 49
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 49
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 49
REBUILD INDEX LIST LST317 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 50 of 71, 3 index
//STP318 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST318
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 50
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 50
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 50
REBUILD INDEX LIST LST318 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 51 of 71, 3 index
//STP319 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST319
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 51
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 51
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 51
REBUILD INDEX LIST LST319 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 52 of 71, 3 index
//STP320 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST320
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 52
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 52
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 52
REBUILD INDEX LIST LST320 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 53 of 71, 3 index
//STP321 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST321
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 53
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 53
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 53
REBUILD INDEX LIST LST321 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 54 of 71, 3 index
//STP322 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST322
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 54
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 54
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 54
REBUILD INDEX LIST LST322 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 55 of 71, 3 index
//STP323 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST323
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 55
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 55
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 55
REBUILD INDEX LIST LST323 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 56 of 71, 3 index
//STP324 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST324
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 56
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 56
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 56
REBUILD INDEX LIST LST324 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 57 of 71, 3 index
//STP325 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST325
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 57
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 57
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 57
REBUILD INDEX LIST LST325 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 58 of 71, 3 index
//STP326 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST326
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 58
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 58
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 58
REBUILD INDEX LIST LST326 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 59 of 71, 3 index
//STP327 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST327
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 59
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 59
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 59
REBUILD INDEX LIST LST327 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 60 of 71, 3 index
//STP328 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST328
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 60
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 60
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 60
REBUILD INDEX LIST LST328 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 61 of 71, 3 index
//STP329 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST329
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 61
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 61
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 61
REBUILD INDEX LIST LST329 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 62 of 71, 3 index
//STP330 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST330
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 62
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 62
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 62
REBUILD INDEX LIST LST330 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 63 of 71, 3 index
//STP331 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST331
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 63
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 63
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 63
REBUILD INDEX LIST LST331 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 64 of 71, 3 index
//STP332 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST332
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 64
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 64
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 64
REBUILD INDEX LIST LST332 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 65 of 71, 3 index
//STP333 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST333
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 65
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 65
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 65
REBUILD INDEX LIST LST333 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 66 of 71, 3 index
//STP334 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST334
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 66
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 66
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 66
REBUILD INDEX LIST LST334 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 67 of 71, 3 index
//STP335 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST335
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 67
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 67
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 67
REBUILD INDEX LIST LST335 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 68 of 71, 3 index
//STP336 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST336
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 68
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 68
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 68
REBUILD INDEX LIST LST336 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 69 of 71, 3 index
//STP337 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST337
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 69
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 69
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 69
REBUILD INDEX LIST LST337 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 70 of 71, 3 index
//STP338 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST338
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 70
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 70
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 70
REBUILD INDEX LIST LST338 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS01001 part 71 of 71, 3 index
//STP339 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST339
INCLUDE INDEX BUA.I0006XF7_MIG PARTLEVEL 71
INCLUDE INDEX BUA.I0006XF8_MIG PARTLEVEL 71
INCLUDE INDEX BUA.I0006XF9_MIG PARTLEVEL 71
REBUILD INDEX LIST LST339 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 1 of 49, 2 index
//STP340 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST340
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 1
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 1
REBUILD INDEX LIST LST340 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 2 of 49, 2 index
//STP341 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST341
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 2
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 2
REBUILD INDEX LIST LST341 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 3 of 49, 2 index
//STP342 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST342
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 3
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 3
REBUILD INDEX LIST LST342 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 4 of 49, 2 index
//STP343 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST343
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 4
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 4
REBUILD INDEX LIST LST343 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 5 of 49, 2 index
//STP344 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST344
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 5
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 5
REBUILD INDEX LIST LST344 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 6 of 49, 2 index
//STP345 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST345
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 6
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 6
REBUILD INDEX LIST LST345 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 7 of 49, 2 index
//STP346 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST346
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 7
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 7
REBUILD INDEX LIST LST346 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 8 of 49, 2 index
//STP347 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST347
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 8
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 8
REBUILD INDEX LIST LST347 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 9 of 49, 2 index
//STP348 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST348
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 9
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 9
REBUILD INDEX LIST LST348 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 10 of 49, 2 index
//STP349 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST349
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 10
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 10
REBUILD INDEX LIST LST349 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 11 of 49, 2 index
//STP350 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST350
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 11
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 11
REBUILD INDEX LIST LST350 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 12 of 49, 2 index
//STP351 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST351
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 12
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 12
REBUILD INDEX LIST LST351 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 13 of 49, 2 index
//STP352 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST352
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 13
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 13
REBUILD INDEX LIST LST352 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 14 of 49, 2 index
//STP353 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST353
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 14
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 14
REBUILD INDEX LIST LST353 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 15 of 49, 2 index
//STP354 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST354
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 15
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 15
REBUILD INDEX LIST LST354 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 16 of 49, 2 index
//STP355 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST355
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 16
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 16
REBUILD INDEX LIST LST355 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 17 of 49, 2 index
//STP356 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST356
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 17
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 17
REBUILD INDEX LIST LST356 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 18 of 49, 2 index
//STP357 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST357
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 18
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 18
REBUILD INDEX LIST LST357 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 19 of 49, 2 index
//STP358 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST358
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 19
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 19
REBUILD INDEX LIST LST358 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 20 of 49, 2 index
//STP359 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST359
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 20
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 20
REBUILD INDEX LIST LST359 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 21 of 49, 2 index
//STP360 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST360
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 21
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 21
REBUILD INDEX LIST LST360 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 22 of 49, 2 index
//STP361 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST361
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 22
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 22
REBUILD INDEX LIST LST361 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 23 of 49, 2 index
//STP362 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST362
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 23
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 23
REBUILD INDEX LIST LST362 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 24 of 49, 2 index
//STP363 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST363
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 24
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 24
REBUILD INDEX LIST LST363 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 25 of 49, 2 index
//STP364 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST364
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 25
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 25
REBUILD INDEX LIST LST364 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 26 of 49, 2 index
//STP365 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST365
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 26
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 26
REBUILD INDEX LIST LST365 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 27 of 49, 2 index
//STP366 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST366
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 27
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 27
REBUILD INDEX LIST LST366 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 28 of 49, 2 index
//STP367 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST367
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 28
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 28
REBUILD INDEX LIST LST367 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 29 of 49, 2 index
//STP368 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST368
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 29
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 29
REBUILD INDEX LIST LST368 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 30 of 49, 2 index
//STP369 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST369
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 30
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 30
REBUILD INDEX LIST LST369 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 31 of 49, 2 index
//STP370 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST370
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 31
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 31
REBUILD INDEX LIST LST370 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 32 of 49, 2 index
//STP371 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST371
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 32
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 32
REBUILD INDEX LIST LST371 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 33 of 49, 2 index
//STP372 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST372
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 33
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 33
REBUILD INDEX LIST LST372 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 34 of 49, 2 index
//STP373 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST373
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 34
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 34
REBUILD INDEX LIST LST373 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 35 of 49, 2 index
//STP374 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST374
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 35
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 35
REBUILD INDEX LIST LST374 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 36 of 49, 2 index
//STP375 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST375
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 36
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 36
REBUILD INDEX LIST LST375 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 37 of 49, 2 index
//STP376 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST376
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 37
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 37
REBUILD INDEX LIST LST376 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 38 of 49, 2 index
//STP377 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST377
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 38
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 38
REBUILD INDEX LIST LST377 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 39 of 49, 2 index
//STP378 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST378
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 39
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 39
REBUILD INDEX LIST LST378 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 40 of 49, 2 index
//STP379 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST379
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 40
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 40
REBUILD INDEX LIST LST379 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 41 of 49, 2 index
//STP380 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST380
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 41
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 41
REBUILD INDEX LIST LST380 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 42 of 49, 2 index
//STP381 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST381
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 42
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 42
REBUILD INDEX LIST LST381 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 43 of 49, 2 index
//STP382 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST382
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 43
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 43
REBUILD INDEX LIST LST382 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 44 of 49, 2 index
//STP383 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST383
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 44
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 44
REBUILD INDEX LIST LST383 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 45 of 49, 2 index
//STP384 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST384
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 45
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 45
REBUILD INDEX LIST LST384 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 46 of 49, 2 index
//STP385 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST385
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 46
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 46
REBUILD INDEX LIST LST385 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 47 of 49, 2 index
//STP386 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST386
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 47
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 47
REBUILD INDEX LIST LST386 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 48 of 49, 2 index
//STP387 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST387
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 48
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 48
REBUILD INDEX LIST LST387 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDM7001.SPS02001 part 49 of 49, 2 index
//STP388 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST388
INCLUDE INDEX BUA.I0006XFB_MIG PARTLEVEL 49
INCLUDE INDEX BUA.I0006XFC_MIG PARTLEVEL 49
REBUILD INDEX LIST LST388 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 1 of 46, 1 index
//STP389 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST389
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 1
REBUILD INDEX LIST LST389 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 2 of 46, 1 index
//STP390 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST390
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 2
REBUILD INDEX LIST LST390 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 3 of 46, 1 index
//STP391 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST391
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 3
REBUILD INDEX LIST LST391 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 4 of 46, 1 index
//STP392 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST392
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 4
REBUILD INDEX LIST LST392 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 5 of 46, 1 index
//STP393 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST393
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 5
REBUILD INDEX LIST LST393 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 6 of 46, 1 index
//STP394 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST394
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 6
REBUILD INDEX LIST LST394 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 7 of 46, 1 index
//STP395 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST395
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 7
REBUILD INDEX LIST LST395 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 8 of 46, 1 index
//STP396 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST396
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 8
REBUILD INDEX LIST LST396 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 9 of 46, 1 index
//STP397 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST397
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 9
REBUILD INDEX LIST LST397 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 10 of 46, 1 index
//STP398 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST398
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 10
REBUILD INDEX LIST LST398 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 11 of 46, 1 index
//STP399 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST399
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 11
REBUILD INDEX LIST LST399 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 12 of 46, 1 index
//STP400 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407694.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST400
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 12
REBUILD INDEX LIST LST400 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//A5407691 JOB (KEL25071,0240,,3612),'CATALOG',
//* RESTART=STEPNAME, <== FOR RESTART REMOVE * AND ENTER STEP NAME
// MSGCLASS=T,TIME=1440
//*MAIN SYSTEM=S21
//*
//******* ts XBDMI001.SIT02001 part 13 of 46, 1 index
//STP401 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST401
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 13
REBUILD INDEX LIST LST401 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 14 of 46, 1 index
//STP402 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST402
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 14
REBUILD INDEX LIST LST402 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 15 of 46, 1 index
//STP403 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST403
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 15
REBUILD INDEX LIST LST403 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 16 of 46, 1 index
//STP404 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST404
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 16
REBUILD INDEX LIST LST404 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 17 of 46, 1 index
//STP405 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST405
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 17
REBUILD INDEX LIST LST405 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 18 of 46, 1 index
//STP406 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST406
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 18
REBUILD INDEX LIST LST406 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 19 of 46, 1 index
//STP407 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST407
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 19
REBUILD INDEX LIST LST407 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 20 of 46, 1 index
//STP408 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST408
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 20
REBUILD INDEX LIST LST408 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 21 of 46, 1 index
//STP409 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST409
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 21
REBUILD INDEX LIST LST409 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 22 of 46, 1 index
//STP410 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST410
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 22
REBUILD INDEX LIST LST410 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 23 of 46, 1 index
//STP411 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST411
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 23
REBUILD INDEX LIST LST411 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 24 of 46, 1 index
//STP412 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST412
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 24
REBUILD INDEX LIST LST412 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 25 of 46, 1 index
//STP413 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST413
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 25
REBUILD INDEX LIST LST413 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 26 of 46, 1 index
//STP414 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST414
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 26
REBUILD INDEX LIST LST414 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 27 of 46, 1 index
//STP415 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST415
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 27
REBUILD INDEX LIST LST415 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 28 of 46, 1 index
//STP416 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST416
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 28
REBUILD INDEX LIST LST416 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 29 of 46, 1 index
//STP417 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST417
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 29
REBUILD INDEX LIST LST417 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 30 of 46, 1 index
//STP418 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST418
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 30
REBUILD INDEX LIST LST418 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 31 of 46, 1 index
//STP419 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST419
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 31
REBUILD INDEX LIST LST419 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 32 of 46, 1 index
//STP420 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST420
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 32
REBUILD INDEX LIST LST420 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 33 of 46, 1 index
//STP421 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST421
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 33
REBUILD INDEX LIST LST421 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 34 of 46, 1 index
//STP422 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST422
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 34
REBUILD INDEX LIST LST422 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 35 of 46, 1 index
//STP423 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST423
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 35
REBUILD INDEX LIST LST423 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 36 of 46, 1 index
//STP424 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST424
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 36
REBUILD INDEX LIST LST424 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 37 of 46, 1 index
//STP425 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST425
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 37
REBUILD INDEX LIST LST425 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 38 of 46, 1 index
//STP426 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST426
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 38
REBUILD INDEX LIST LST426 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 39 of 46, 1 index
//STP427 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST427
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 39
REBUILD INDEX LIST LST427 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 40 of 46, 1 index
//STP428 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST428
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 40
REBUILD INDEX LIST LST428 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 41 of 46, 1 index
//STP429 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST429
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 41
REBUILD INDEX LIST LST429 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 42 of 46, 1 index
//STP430 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST430
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 42
REBUILD INDEX LIST LST430 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 43 of 46, 1 index
//STP431 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST431
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 43
REBUILD INDEX LIST LST431 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 44 of 46, 1 index
//STP432 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST432
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 44
REBUILD INDEX LIST LST432 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 45 of 46, 1 index
//STP433 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST433
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 45
REBUILD INDEX LIST LST433 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SIT02001 part 46 of 46, 1 index
//STP434 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST434
INCLUDE INDEX BUA.I0004PS1_MIG PARTLEVEL 46
REBUILD INDEX LIST LST434 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS01001 part 1 of 14, 7 index
//STP435 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST435
INCLUDE INDEX BUA.I0004PRU_MIG PARTLEVEL 1
INCLUDE INDEX BUA.I0004PRV_MIG PARTLEVEL 1
INCLUDE INDEX BUA.I0004PRW_MIG PARTLEVEL 1
INCLUDE INDEX BUA.I0004PRX_MIG PARTLEVEL 1
INCLUDE INDEX BUA.I0004PRY_MIG PARTLEVEL 1
INCLUDE INDEX BUA.I0004PRZ_MIG PARTLEVEL 1
INCLUDE INDEX BUA.I0004PS0_MIG PARTLEVEL 1
REBUILD INDEX LIST LST435 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS01001 part 2 of 14, 7 index
//STP436 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST436
INCLUDE INDEX BUA.I0004PRU_MIG PARTLEVEL 2
INCLUDE INDEX BUA.I0004PRV_MIG PARTLEVEL 2
INCLUDE INDEX BUA.I0004PRW_MIG PARTLEVEL 2
INCLUDE INDEX BUA.I0004PRX_MIG PARTLEVEL 2
INCLUDE INDEX BUA.I0004PRY_MIG PARTLEVEL 2
INCLUDE INDEX BUA.I0004PRZ_MIG PARTLEVEL 2
INCLUDE INDEX BUA.I0004PS0_MIG PARTLEVEL 2
REBUILD INDEX LIST LST436 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS01001 part 3 of 14, 7 index
//STP437 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST437
INCLUDE INDEX BUA.I0004PRU_MIG PARTLEVEL 3
INCLUDE INDEX BUA.I0004PRV_MIG PARTLEVEL 3
INCLUDE INDEX BUA.I0004PRW_MIG PARTLEVEL 3
INCLUDE INDEX BUA.I0004PRX_MIG PARTLEVEL 3
INCLUDE INDEX BUA.I0004PRY_MIG PARTLEVEL 3
INCLUDE INDEX BUA.I0004PRZ_MIG PARTLEVEL 3
INCLUDE INDEX BUA.I0004PS0_MIG PARTLEVEL 3
REBUILD INDEX LIST LST437 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS01001 part 4 of 14, 7 index
//STP438 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST438
INCLUDE INDEX BUA.I0004PRU_MIG PARTLEVEL 4
INCLUDE INDEX BUA.I0004PRV_MIG PARTLEVEL 4
INCLUDE INDEX BUA.I0004PRW_MIG PARTLEVEL 4
INCLUDE INDEX BUA.I0004PRX_MIG PARTLEVEL 4
INCLUDE INDEX BUA.I0004PRY_MIG PARTLEVEL 4
INCLUDE INDEX BUA.I0004PRZ_MIG PARTLEVEL 4
INCLUDE INDEX BUA.I0004PS0_MIG PARTLEVEL 4
REBUILD INDEX LIST LST438 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS01001 part 5 of 14, 7 index
//STP439 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST439
INCLUDE INDEX BUA.I0004PRU_MIG PARTLEVEL 5
INCLUDE INDEX BUA.I0004PRV_MIG PARTLEVEL 5
INCLUDE INDEX BUA.I0004PRW_MIG PARTLEVEL 5
INCLUDE INDEX BUA.I0004PRX_MIG PARTLEVEL 5
INCLUDE INDEX BUA.I0004PRY_MIG PARTLEVEL 5
INCLUDE INDEX BUA.I0004PRZ_MIG PARTLEVEL 5
INCLUDE INDEX BUA.I0004PS0_MIG PARTLEVEL 5
REBUILD INDEX LIST LST439 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS01001 part 6 of 14, 7 index
//STP440 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST440
INCLUDE INDEX BUA.I0004PRU_MIG PARTLEVEL 6
INCLUDE INDEX BUA.I0004PRV_MIG PARTLEVEL 6
INCLUDE INDEX BUA.I0004PRW_MIG PARTLEVEL 6
INCLUDE INDEX BUA.I0004PRX_MIG PARTLEVEL 6
INCLUDE INDEX BUA.I0004PRY_MIG PARTLEVEL 6
INCLUDE INDEX BUA.I0004PRZ_MIG PARTLEVEL 6
INCLUDE INDEX BUA.I0004PS0_MIG PARTLEVEL 6
REBUILD INDEX LIST LST440 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS01001 part 7 of 14, 7 index
//STP441 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST441
INCLUDE INDEX BUA.I0004PRU_MIG PARTLEVEL 7
INCLUDE INDEX BUA.I0004PRV_MIG PARTLEVEL 7
INCLUDE INDEX BUA.I0004PRW_MIG PARTLEVEL 7
INCLUDE INDEX BUA.I0004PRX_MIG PARTLEVEL 7
INCLUDE INDEX BUA.I0004PRY_MIG PARTLEVEL 7
INCLUDE INDEX BUA.I0004PRZ_MIG PARTLEVEL 7
INCLUDE INDEX BUA.I0004PS0_MIG PARTLEVEL 7
REBUILD INDEX LIST LST441 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS01001 part 8 of 14, 7 index
//STP442 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST442
INCLUDE INDEX BUA.I0004PRU_MIG PARTLEVEL 8
INCLUDE INDEX BUA.I0004PRV_MIG PARTLEVEL 8
INCLUDE INDEX BUA.I0004PRW_MIG PARTLEVEL 8
INCLUDE INDEX BUA.I0004PRX_MIG PARTLEVEL 8
INCLUDE INDEX BUA.I0004PRY_MIG PARTLEVEL 8
INCLUDE INDEX BUA.I0004PRZ_MIG PARTLEVEL 8
INCLUDE INDEX BUA.I0004PS0_MIG PARTLEVEL 8
REBUILD INDEX LIST LST442 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS01001 part 9 of 14, 7 index
//STP443 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST443
INCLUDE INDEX BUA.I0004PRU_MIG PARTLEVEL 9
INCLUDE INDEX BUA.I0004PRV_MIG PARTLEVEL 9
INCLUDE INDEX BUA.I0004PRW_MIG PARTLEVEL 9
INCLUDE INDEX BUA.I0004PRX_MIG PARTLEVEL 9
INCLUDE INDEX BUA.I0004PRY_MIG PARTLEVEL 9
INCLUDE INDEX BUA.I0004PRZ_MIG PARTLEVEL 9
INCLUDE INDEX BUA.I0004PS0_MIG PARTLEVEL 9
REBUILD INDEX LIST LST443 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS01001 part 10 of 14, 7 index
//STP444 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST444
INCLUDE INDEX BUA.I0004PRU_MIG PARTLEVEL 10
INCLUDE INDEX BUA.I0004PRV_MIG PARTLEVEL 10
INCLUDE INDEX BUA.I0004PRW_MIG PARTLEVEL 10
INCLUDE INDEX BUA.I0004PRX_MIG PARTLEVEL 10
INCLUDE INDEX BUA.I0004PRY_MIG PARTLEVEL 10
INCLUDE INDEX BUA.I0004PRZ_MIG PARTLEVEL 10
INCLUDE INDEX BUA.I0004PS0_MIG PARTLEVEL 10
REBUILD INDEX LIST LST444 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS01001 part 11 of 14, 7 index
//STP445 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST445
INCLUDE INDEX BUA.I0004PRU_MIG PARTLEVEL 11
INCLUDE INDEX BUA.I0004PRV_MIG PARTLEVEL 11
INCLUDE INDEX BUA.I0004PRW_MIG PARTLEVEL 11
INCLUDE INDEX BUA.I0004PRX_MIG PARTLEVEL 11
INCLUDE INDEX BUA.I0004PRY_MIG PARTLEVEL 11
INCLUDE INDEX BUA.I0004PRZ_MIG PARTLEVEL 11
INCLUDE INDEX BUA.I0004PS0_MIG PARTLEVEL 11
REBUILD INDEX LIST LST445 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS01001 part 12 of 14, 7 index
//STP446 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST446
INCLUDE INDEX BUA.I0004PRU_MIG PARTLEVEL 12
INCLUDE INDEX BUA.I0004PRV_MIG PARTLEVEL 12
INCLUDE INDEX BUA.I0004PRW_MIG PARTLEVEL 12
INCLUDE INDEX BUA.I0004PRX_MIG PARTLEVEL 12
INCLUDE INDEX BUA.I0004PRY_MIG PARTLEVEL 12
INCLUDE INDEX BUA.I0004PRZ_MIG PARTLEVEL 12
INCLUDE INDEX BUA.I0004PS0_MIG PARTLEVEL 12
REBUILD INDEX LIST LST446 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS01001 part 13 of 14, 7 index
//STP447 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST447
INCLUDE INDEX BUA.I0004PRU_MIG PARTLEVEL 13
INCLUDE INDEX BUA.I0004PRV_MIG PARTLEVEL 13
INCLUDE INDEX BUA.I0004PRW_MIG PARTLEVEL 13
INCLUDE INDEX BUA.I0004PRX_MIG PARTLEVEL 13
INCLUDE INDEX BUA.I0004PRY_MIG PARTLEVEL 13
INCLUDE INDEX BUA.I0004PRZ_MIG PARTLEVEL 13
INCLUDE INDEX BUA.I0004PS0_MIG PARTLEVEL 13
REBUILD INDEX LIST LST447 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS01001 part 14 of 14, 7 index
//STP448 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST448
INCLUDE INDEX BUA.I0004PRU_MIG PARTLEVEL 14
INCLUDE INDEX BUA.I0004PRV_MIG PARTLEVEL 14
INCLUDE INDEX BUA.I0004PRW_MIG PARTLEVEL 14
INCLUDE INDEX BUA.I0004PRX_MIG PARTLEVEL 14
INCLUDE INDEX BUA.I0004PRY_MIG PARTLEVEL 14
INCLUDE INDEX BUA.I0004PRZ_MIG PARTLEVEL 14
INCLUDE INDEX BUA.I0004PS0_MIG PARTLEVEL 14
REBUILD INDEX LIST LST448 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS02001 part 1 of 26, 4 index
//STP449 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST449
INCLUDE INDEX BUA.I0004PS2_MIG PARTLEVEL 1
INCLUDE INDEX BUA.I0004PS3_MIG PARTLEVEL 1
INCLUDE INDEX BUA.I0004PS4_MIG PARTLEVEL 1
INCLUDE INDEX BUA.I0004PS5_MIG PARTLEVEL 1
REBUILD INDEX LIST LST449 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS02001 part 2 of 26, 4 index
//STP450 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST450
INCLUDE INDEX BUA.I0004PS2_MIG PARTLEVEL 2
INCLUDE INDEX BUA.I0004PS3_MIG PARTLEVEL 2
INCLUDE INDEX BUA.I0004PS4_MIG PARTLEVEL 2
INCLUDE INDEX BUA.I0004PS5_MIG PARTLEVEL 2
REBUILD INDEX LIST LST450 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS02001 part 3 of 26, 4 index
//STP451 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST451
INCLUDE INDEX BUA.I0004PS2_MIG PARTLEVEL 3
INCLUDE INDEX BUA.I0004PS3_MIG PARTLEVEL 3
INCLUDE INDEX BUA.I0004PS4_MIG PARTLEVEL 3
INCLUDE INDEX BUA.I0004PS5_MIG PARTLEVEL 3
REBUILD INDEX LIST LST451 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS02001 part 4 of 26, 4 index
//STP452 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST452
INCLUDE INDEX BUA.I0004PS2_MIG PARTLEVEL 4
INCLUDE INDEX BUA.I0004PS3_MIG PARTLEVEL 4
INCLUDE INDEX BUA.I0004PS4_MIG PARTLEVEL 4
INCLUDE INDEX BUA.I0004PS5_MIG PARTLEVEL 4
REBUILD INDEX LIST LST452 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS02001 part 5 of 26, 4 index
//STP453 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST453
INCLUDE INDEX BUA.I0004PS2_MIG PARTLEVEL 5
INCLUDE INDEX BUA.I0004PS3_MIG PARTLEVEL 5
INCLUDE INDEX BUA.I0004PS4_MIG PARTLEVEL 5
INCLUDE INDEX BUA.I0004PS5_MIG PARTLEVEL 5
REBUILD INDEX LIST LST453 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS02001 part 6 of 26, 4 index
//STP454 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST454
INCLUDE INDEX BUA.I0004PS2_MIG PARTLEVEL 6
INCLUDE INDEX BUA.I0004PS3_MIG PARTLEVEL 6
INCLUDE INDEX BUA.I0004PS4_MIG PARTLEVEL 6
INCLUDE INDEX BUA.I0004PS5_MIG PARTLEVEL 6
REBUILD INDEX LIST LST454 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS02001 part 7 of 26, 4 index
//STP455 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST455
INCLUDE INDEX BUA.I0004PS2_MIG PARTLEVEL 7
INCLUDE INDEX BUA.I0004PS3_MIG PARTLEVEL 7
INCLUDE INDEX BUA.I0004PS4_MIG PARTLEVEL 7
INCLUDE INDEX BUA.I0004PS5_MIG PARTLEVEL 7
REBUILD INDEX LIST LST455 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS02001 part 8 of 26, 4 index
//STP456 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST456
INCLUDE INDEX BUA.I0004PS2_MIG PARTLEVEL 8
INCLUDE INDEX BUA.I0004PS3_MIG PARTLEVEL 8
INCLUDE INDEX BUA.I0004PS4_MIG PARTLEVEL 8
INCLUDE INDEX BUA.I0004PS5_MIG PARTLEVEL 8
REBUILD INDEX LIST LST456 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS02001 part 9 of 26, 4 index
//STP457 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST457
INCLUDE INDEX BUA.I0004PS2_MIG PARTLEVEL 9
INCLUDE INDEX BUA.I0004PS3_MIG PARTLEVEL 9
INCLUDE INDEX BUA.I0004PS4_MIG PARTLEVEL 9
INCLUDE INDEX BUA.I0004PS5_MIG PARTLEVEL 9
REBUILD INDEX LIST LST457 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS02001 part 10 of 26, 4 index
//STP458 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST458
INCLUDE INDEX BUA.I0004PS2_MIG PARTLEVEL 10
INCLUDE INDEX BUA.I0004PS3_MIG PARTLEVEL 10
INCLUDE INDEX BUA.I0004PS4_MIG PARTLEVEL 10
INCLUDE INDEX BUA.I0004PS5_MIG PARTLEVEL 10
REBUILD INDEX LIST LST458 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS02001 part 11 of 26, 4 index
//STP459 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST459
INCLUDE INDEX BUA.I0004PS2_MIG PARTLEVEL 11
INCLUDE INDEX BUA.I0004PS3_MIG PARTLEVEL 11
INCLUDE INDEX BUA.I0004PS4_MIG PARTLEVEL 11
INCLUDE INDEX BUA.I0004PS5_MIG PARTLEVEL 11
REBUILD INDEX LIST LST459 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS02001 part 12 of 26, 4 index
//STP460 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST460
INCLUDE INDEX BUA.I0004PS2_MIG PARTLEVEL 12
INCLUDE INDEX BUA.I0004PS3_MIG PARTLEVEL 12
INCLUDE INDEX BUA.I0004PS4_MIG PARTLEVEL 12
INCLUDE INDEX BUA.I0004PS5_MIG PARTLEVEL 12
REBUILD INDEX LIST LST460 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS02001 part 13 of 26, 4 index
//STP461 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST461
INCLUDE INDEX BUA.I0004PS2_MIG PARTLEVEL 13
INCLUDE INDEX BUA.I0004PS3_MIG PARTLEVEL 13
INCLUDE INDEX BUA.I0004PS4_MIG PARTLEVEL 13
INCLUDE INDEX BUA.I0004PS5_MIG PARTLEVEL 13
REBUILD INDEX LIST LST461 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS02001 part 14 of 26, 4 index
//STP462 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST462
INCLUDE INDEX BUA.I0004PS2_MIG PARTLEVEL 14
INCLUDE INDEX BUA.I0004PS3_MIG PARTLEVEL 14
INCLUDE INDEX BUA.I0004PS4_MIG PARTLEVEL 14
INCLUDE INDEX BUA.I0004PS5_MIG PARTLEVEL 14
REBUILD INDEX LIST LST462 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS02001 part 15 of 26, 4 index
//STP463 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST463
INCLUDE INDEX BUA.I0004PS2_MIG PARTLEVEL 15
INCLUDE INDEX BUA.I0004PS3_MIG PARTLEVEL 15
INCLUDE INDEX BUA.I0004PS4_MIG PARTLEVEL 15
INCLUDE INDEX BUA.I0004PS5_MIG PARTLEVEL 15
REBUILD INDEX LIST LST463 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS02001 part 16 of 26, 4 index
//STP464 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST464
INCLUDE INDEX BUA.I0004PS2_MIG PARTLEVEL 16
INCLUDE INDEX BUA.I0004PS3_MIG PARTLEVEL 16
INCLUDE INDEX BUA.I0004PS4_MIG PARTLEVEL 16
INCLUDE INDEX BUA.I0004PS5_MIG PARTLEVEL 16
REBUILD INDEX LIST LST464 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS02001 part 17 of 26, 4 index
//STP465 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST465
INCLUDE INDEX BUA.I0004PS2_MIG PARTLEVEL 17
INCLUDE INDEX BUA.I0004PS3_MIG PARTLEVEL 17
INCLUDE INDEX BUA.I0004PS4_MIG PARTLEVEL 17
INCLUDE INDEX BUA.I0004PS5_MIG PARTLEVEL 17
REBUILD INDEX LIST LST465 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS02001 part 18 of 26, 4 index
//STP466 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST466
INCLUDE INDEX BUA.I0004PS2_MIG PARTLEVEL 18
INCLUDE INDEX BUA.I0004PS3_MIG PARTLEVEL 18
INCLUDE INDEX BUA.I0004PS4_MIG PARTLEVEL 18
INCLUDE INDEX BUA.I0004PS5_MIG PARTLEVEL 18
REBUILD INDEX LIST LST466 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS02001 part 19 of 26, 4 index
//STP467 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST467
INCLUDE INDEX BUA.I0004PS2_MIG PARTLEVEL 19
INCLUDE INDEX BUA.I0004PS3_MIG PARTLEVEL 19
INCLUDE INDEX BUA.I0004PS4_MIG PARTLEVEL 19
INCLUDE INDEX BUA.I0004PS5_MIG PARTLEVEL 19
REBUILD INDEX LIST LST467 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS02001 part 20 of 26, 4 index
//STP468 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST468
INCLUDE INDEX BUA.I0004PS2_MIG PARTLEVEL 20
INCLUDE INDEX BUA.I0004PS3_MIG PARTLEVEL 20
INCLUDE INDEX BUA.I0004PS4_MIG PARTLEVEL 20
INCLUDE INDEX BUA.I0004PS5_MIG PARTLEVEL 20
REBUILD INDEX LIST LST468 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS02001 part 21 of 26, 4 index
//STP469 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST469
INCLUDE INDEX BUA.I0004PS2_MIG PARTLEVEL 21
INCLUDE INDEX BUA.I0004PS3_MIG PARTLEVEL 21
INCLUDE INDEX BUA.I0004PS4_MIG PARTLEVEL 21
INCLUDE INDEX BUA.I0004PS5_MIG PARTLEVEL 21
REBUILD INDEX LIST LST469 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS02001 part 22 of 26, 4 index
//STP470 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST470
INCLUDE INDEX BUA.I0004PS2_MIG PARTLEVEL 22
INCLUDE INDEX BUA.I0004PS3_MIG PARTLEVEL 22
INCLUDE INDEX BUA.I0004PS4_MIG PARTLEVEL 22
INCLUDE INDEX BUA.I0004PS5_MIG PARTLEVEL 22
REBUILD INDEX LIST LST470 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS02001 part 23 of 26, 4 index
//STP471 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST471
INCLUDE INDEX BUA.I0004PS2_MIG PARTLEVEL 23
INCLUDE INDEX BUA.I0004PS3_MIG PARTLEVEL 23
INCLUDE INDEX BUA.I0004PS4_MIG PARTLEVEL 23
INCLUDE INDEX BUA.I0004PS5_MIG PARTLEVEL 23
REBUILD INDEX LIST LST471 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS02001 part 24 of 26, 4 index
//STP472 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST472
INCLUDE INDEX BUA.I0004PS2_MIG PARTLEVEL 24
INCLUDE INDEX BUA.I0004PS3_MIG PARTLEVEL 24
INCLUDE INDEX BUA.I0004PS4_MIG PARTLEVEL 24
INCLUDE INDEX BUA.I0004PS5_MIG PARTLEVEL 24
REBUILD INDEX LIST LST472 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS02001 part 25 of 26, 4 index
//STP473 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST473
INCLUDE INDEX BUA.I0004PS2_MIG PARTLEVEL 25
INCLUDE INDEX BUA.I0004PS3_MIG PARTLEVEL 25
INCLUDE INDEX BUA.I0004PS4_MIG PARTLEVEL 25
INCLUDE INDEX BUA.I0004PS5_MIG PARTLEVEL 25
REBUILD INDEX LIST LST473 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDMI001.SPS02001 part 26 of 26, 4 index
//STP474 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST474
INCLUDE INDEX BUA.I0004PS2_MIG PARTLEVEL 26
INCLUDE INDEX BUA.I0004PS3_MIG PARTLEVEL 26
INCLUDE INDEX BUA.I0004PS4_MIG PARTLEVEL 26
INCLUDE INDEX BUA.I0004PS5_MIG PARTLEVEL 26
REBUILD INDEX LIST LST474 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDNQ001.SIT02001 part 1 of 5, 1 index
//STP475 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST475
INCLUDE INDEX BUA.I00054QP_MIG PARTLEVEL 1
REBUILD INDEX LIST LST475 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDNQ001.SIT02001 part 2 of 5, 1 index
//STP476 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST476
INCLUDE INDEX BUA.I00054QP_MIG PARTLEVEL 2
REBUILD INDEX LIST LST476 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDNQ001.SIT02001 part 3 of 5, 1 index
//STP477 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST477
INCLUDE INDEX BUA.I00054QP_MIG PARTLEVEL 3
REBUILD INDEX LIST LST477 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDNQ001.SIT02001 part 4 of 5, 1 index
//STP478 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST478
INCLUDE INDEX BUA.I00054QP_MIG PARTLEVEL 4
REBUILD INDEX LIST LST478 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDNQ001.SIT02001 part 5 of 5, 1 index
//STP479 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST479
INCLUDE INDEX BUA.I00054QP_MIG PARTLEVEL 5
REBUILD INDEX LIST LST479 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDNQ001.SPS01001 part 1 of 5, 2 index
//STP480 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST480
INCLUDE INDEX BUA.I00054QN_MIG PARTLEVEL 1
INCLUDE INDEX BUA.I00054QO_MIG PARTLEVEL 1
REBUILD INDEX LIST LST480 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDNQ001.SPS01001 part 2 of 5, 2 index
//STP481 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST481
INCLUDE INDEX BUA.I00054QN_MIG PARTLEVEL 2
INCLUDE INDEX BUA.I00054QO_MIG PARTLEVEL 2
REBUILD INDEX LIST LST481 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDNQ001.SPS01001 part 3 of 5, 2 index
//STP482 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST482
INCLUDE INDEX BUA.I00054QN_MIG PARTLEVEL 3
INCLUDE INDEX BUA.I00054QO_MIG PARTLEVEL 3
REBUILD INDEX LIST LST482 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDNQ001.SPS01001 part 4 of 5, 2 index
//STP483 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST483
INCLUDE INDEX BUA.I00054QN_MIG PARTLEVEL 4
INCLUDE INDEX BUA.I00054QO_MIG PARTLEVEL 4
REBUILD INDEX LIST LST483 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDNQ001.SPS01001 part 5 of 5, 2 index
//STP484 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST484
INCLUDE INDEX BUA.I00054QN_MIG PARTLEVEL 5
INCLUDE INDEX BUA.I00054QO_MIG PARTLEVEL 5
REBUILD INDEX LIST LST484 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDNQ001.SPS02001 part 1 of 5, 2 index
//STP485 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST485
INCLUDE INDEX BUA.I00054QQ_MIG PARTLEVEL 1
INCLUDE INDEX BUA.I00054QR_MIG PARTLEVEL 1
REBUILD INDEX LIST LST485 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDNQ001.SPS02001 part 2 of 5, 2 index
//STP486 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST486
INCLUDE INDEX BUA.I00054QQ_MIG PARTLEVEL 2
INCLUDE INDEX BUA.I00054QR_MIG PARTLEVEL 2
REBUILD INDEX LIST LST486 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDNQ001.SPS02001 part 3 of 5, 2 index
//STP487 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST487
INCLUDE INDEX BUA.I00054QQ_MIG PARTLEVEL 3
INCLUDE INDEX BUA.I00054QR_MIG PARTLEVEL 3
REBUILD INDEX LIST LST487 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDNQ001.SPS02001 part 4 of 5, 2 index
//STP488 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST488
INCLUDE INDEX BUA.I00054QQ_MIG PARTLEVEL 4
INCLUDE INDEX BUA.I00054QR_MIG PARTLEVEL 4
REBUILD INDEX LIST LST488 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDNQ001.SPS02001 part 5 of 5, 2 index
//STP489 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST489
INCLUDE INDEX BUA.I00054QQ_MIG PARTLEVEL 5
INCLUDE INDEX BUA.I00054QR_MIG PARTLEVEL 5
REBUILD INDEX LIST LST489 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 1 of 31, 1 index
//STP490 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST490
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 1
REBUILD INDEX LIST LST490 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 2 of 31, 1 index
//STP491 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST491
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 2
REBUILD INDEX LIST LST491 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 3 of 31, 1 index
//STP492 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST492
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 3
REBUILD INDEX LIST LST492 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 4 of 31, 1 index
//STP493 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST493
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 4
REBUILD INDEX LIST LST493 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 5 of 31, 1 index
//STP494 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST494
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 5
REBUILD INDEX LIST LST494 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 6 of 31, 1 index
//STP495 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST495
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 6
REBUILD INDEX LIST LST495 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 7 of 31, 1 index
//STP496 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST496
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 7
REBUILD INDEX LIST LST496 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 8 of 31, 1 index
//STP497 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST497
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 8
REBUILD INDEX LIST LST497 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 9 of 31, 1 index
//STP498 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST498
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 9
REBUILD INDEX LIST LST498 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 10 of 31, 1 index
//STP499 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST499
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 10
REBUILD INDEX LIST LST499 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 11 of 31, 1 index
//STP500 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407695.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST500
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 11
REBUILD INDEX LIST LST500 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//A5407692 JOB (KEL25071,0240,,3612),'CATALOG',
//* RESTART=STEPNAME, <== FOR RESTART REMOVE * AND ENTER STEP NAME
// MSGCLASS=T,TIME=1440
//*MAIN SYSTEM=S22
//*
//******* ts XBDO6001.SIT02001 part 12 of 31, 1 index
//STP501 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST501
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 12
REBUILD INDEX LIST LST501 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 13 of 31, 1 index
//STP502 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST502
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 13
REBUILD INDEX LIST LST502 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 14 of 31, 1 index
//STP503 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST503
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 14
REBUILD INDEX LIST LST503 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 15 of 31, 1 index
//STP504 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST504
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 15
REBUILD INDEX LIST LST504 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 16 of 31, 1 index
//STP505 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST505
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 16
REBUILD INDEX LIST LST505 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 17 of 31, 1 index
//STP506 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST506
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 17
REBUILD INDEX LIST LST506 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 18 of 31, 1 index
//STP507 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST507
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 18
REBUILD INDEX LIST LST507 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 19 of 31, 1 index
//STP508 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST508
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 19
REBUILD INDEX LIST LST508 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 20 of 31, 1 index
//STP509 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST509
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 20
REBUILD INDEX LIST LST509 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 21 of 31, 1 index
//STP510 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST510
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 21
REBUILD INDEX LIST LST510 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 22 of 31, 1 index
//STP511 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST511
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 22
REBUILD INDEX LIST LST511 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 23 of 31, 1 index
//STP512 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST512
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 23
REBUILD INDEX LIST LST512 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 24 of 31, 1 index
//STP513 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST513
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 24
REBUILD INDEX LIST LST513 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 25 of 31, 1 index
//STP514 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST514
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 25
REBUILD INDEX LIST LST514 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 26 of 31, 1 index
//STP515 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST515
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 26
REBUILD INDEX LIST LST515 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 27 of 31, 1 index
//STP516 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST516
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 27
REBUILD INDEX LIST LST516 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 28 of 31, 1 index
//STP517 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST517
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 28
REBUILD INDEX LIST LST517 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 29 of 31, 1 index
//STP518 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST518
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 29
REBUILD INDEX LIST LST518 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 30 of 31, 1 index
//STP519 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST519
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 30
REBUILD INDEX LIST LST519 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SIT02001 part 31 of 31, 1 index
//STP520 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST520
INCLUDE INDEX BUA.I0005GJK_MIG PARTLEVEL 31
REBUILD INDEX LIST LST520 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS01001 part 1 of 24, 2 index
//STP521 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST521
INCLUDE INDEX BUA.I0005GJL_MIG PARTLEVEL 1
INCLUDE INDEX BUA.I0005GJM_MIG PARTLEVEL 1
REBUILD INDEX LIST LST521 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS01001 part 2 of 24, 2 index
//STP522 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST522
INCLUDE INDEX BUA.I0005GJL_MIG PARTLEVEL 2
INCLUDE INDEX BUA.I0005GJM_MIG PARTLEVEL 2
REBUILD INDEX LIST LST522 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS01001 part 3 of 24, 2 index
//STP523 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST523
INCLUDE INDEX BUA.I0005GJL_MIG PARTLEVEL 3
INCLUDE INDEX BUA.I0005GJM_MIG PARTLEVEL 3
REBUILD INDEX LIST LST523 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS01001 part 4 of 24, 2 index
//STP524 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST524
INCLUDE INDEX BUA.I0005GJL_MIG PARTLEVEL 4
INCLUDE INDEX BUA.I0005GJM_MIG PARTLEVEL 4
REBUILD INDEX LIST LST524 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS01001 part 5 of 24, 2 index
//STP525 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST525
INCLUDE INDEX BUA.I0005GJL_MIG PARTLEVEL 5
INCLUDE INDEX BUA.I0005GJM_MIG PARTLEVEL 5
REBUILD INDEX LIST LST525 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS01001 part 6 of 24, 2 index
//STP526 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST526
INCLUDE INDEX BUA.I0005GJL_MIG PARTLEVEL 6
INCLUDE INDEX BUA.I0005GJM_MIG PARTLEVEL 6
REBUILD INDEX LIST LST526 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS01001 part 7 of 24, 2 index
//STP527 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST527
INCLUDE INDEX BUA.I0005GJL_MIG PARTLEVEL 7
INCLUDE INDEX BUA.I0005GJM_MIG PARTLEVEL 7
REBUILD INDEX LIST LST527 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS01001 part 8 of 24, 2 index
//STP528 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST528
INCLUDE INDEX BUA.I0005GJL_MIG PARTLEVEL 8
INCLUDE INDEX BUA.I0005GJM_MIG PARTLEVEL 8
REBUILD INDEX LIST LST528 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS01001 part 9 of 24, 2 index
//STP529 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST529
INCLUDE INDEX BUA.I0005GJL_MIG PARTLEVEL 9
INCLUDE INDEX BUA.I0005GJM_MIG PARTLEVEL 9
REBUILD INDEX LIST LST529 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS01001 part 10 of 24, 2 index
//STP530 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST530
INCLUDE INDEX BUA.I0005GJL_MIG PARTLEVEL 10
INCLUDE INDEX BUA.I0005GJM_MIG PARTLEVEL 10
REBUILD INDEX LIST LST530 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS01001 part 11 of 24, 2 index
//STP531 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST531
INCLUDE INDEX BUA.I0005GJL_MIG PARTLEVEL 11
INCLUDE INDEX BUA.I0005GJM_MIG PARTLEVEL 11
REBUILD INDEX LIST LST531 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS01001 part 12 of 24, 2 index
//STP532 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST532
INCLUDE INDEX BUA.I0005GJL_MIG PARTLEVEL 12
INCLUDE INDEX BUA.I0005GJM_MIG PARTLEVEL 12
REBUILD INDEX LIST LST532 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS01001 part 13 of 24, 2 index
//STP533 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST533
INCLUDE INDEX BUA.I0005GJL_MIG PARTLEVEL 13
INCLUDE INDEX BUA.I0005GJM_MIG PARTLEVEL 13
REBUILD INDEX LIST LST533 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS01001 part 14 of 24, 2 index
//STP534 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST534
INCLUDE INDEX BUA.I0005GJL_MIG PARTLEVEL 14
INCLUDE INDEX BUA.I0005GJM_MIG PARTLEVEL 14
REBUILD INDEX LIST LST534 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS01001 part 15 of 24, 2 index
//STP535 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST535
INCLUDE INDEX BUA.I0005GJL_MIG PARTLEVEL 15
INCLUDE INDEX BUA.I0005GJM_MIG PARTLEVEL 15
REBUILD INDEX LIST LST535 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS01001 part 16 of 24, 2 index
//STP536 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST536
INCLUDE INDEX BUA.I0005GJL_MIG PARTLEVEL 16
INCLUDE INDEX BUA.I0005GJM_MIG PARTLEVEL 16
REBUILD INDEX LIST LST536 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS01001 part 17 of 24, 2 index
//STP537 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST537
INCLUDE INDEX BUA.I0005GJL_MIG PARTLEVEL 17
INCLUDE INDEX BUA.I0005GJM_MIG PARTLEVEL 17
REBUILD INDEX LIST LST537 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS01001 part 18 of 24, 2 index
//STP538 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST538
INCLUDE INDEX BUA.I0005GJL_MIG PARTLEVEL 18
INCLUDE INDEX BUA.I0005GJM_MIG PARTLEVEL 18
REBUILD INDEX LIST LST538 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS01001 part 19 of 24, 2 index
//STP539 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST539
INCLUDE INDEX BUA.I0005GJL_MIG PARTLEVEL 19
INCLUDE INDEX BUA.I0005GJM_MIG PARTLEVEL 19
REBUILD INDEX LIST LST539 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS01001 part 20 of 24, 2 index
//STP540 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST540
INCLUDE INDEX BUA.I0005GJL_MIG PARTLEVEL 20
INCLUDE INDEX BUA.I0005GJM_MIG PARTLEVEL 20
REBUILD INDEX LIST LST540 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS01001 part 21 of 24, 2 index
//STP541 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST541
INCLUDE INDEX BUA.I0005GJL_MIG PARTLEVEL 21
INCLUDE INDEX BUA.I0005GJM_MIG PARTLEVEL 21
REBUILD INDEX LIST LST541 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS01001 part 22 of 24, 2 index
//STP542 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST542
INCLUDE INDEX BUA.I0005GJL_MIG PARTLEVEL 22
INCLUDE INDEX BUA.I0005GJM_MIG PARTLEVEL 22
REBUILD INDEX LIST LST542 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS01001 part 23 of 24, 2 index
//STP543 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST543
INCLUDE INDEX BUA.I0005GJL_MIG PARTLEVEL 23
INCLUDE INDEX BUA.I0005GJM_MIG PARTLEVEL 23
REBUILD INDEX LIST LST543 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS01001 part 24 of 24, 2 index
//STP544 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST544
INCLUDE INDEX BUA.I0005GJL_MIG PARTLEVEL 24
INCLUDE INDEX BUA.I0005GJM_MIG PARTLEVEL 24
REBUILD INDEX LIST LST544 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS02001 part 1 of 15, 2 index
//STP545 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST545
INCLUDE INDEX BUA.I0005GJI_MIG PARTLEVEL 1
INCLUDE INDEX BUA.I0005GJJ_MIG PARTLEVEL 1
REBUILD INDEX LIST LST545 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS02001 part 2 of 15, 2 index
//STP546 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST546
INCLUDE INDEX BUA.I0005GJI_MIG PARTLEVEL 2
INCLUDE INDEX BUA.I0005GJJ_MIG PARTLEVEL 2
REBUILD INDEX LIST LST546 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS02001 part 3 of 15, 2 index
//STP547 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST547
INCLUDE INDEX BUA.I0005GJI_MIG PARTLEVEL 3
INCLUDE INDEX BUA.I0005GJJ_MIG PARTLEVEL 3
REBUILD INDEX LIST LST547 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS02001 part 4 of 15, 2 index
//STP548 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST548
INCLUDE INDEX BUA.I0005GJI_MIG PARTLEVEL 4
INCLUDE INDEX BUA.I0005GJJ_MIG PARTLEVEL 4
REBUILD INDEX LIST LST548 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS02001 part 5 of 15, 2 index
//STP549 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST549
INCLUDE INDEX BUA.I0005GJI_MIG PARTLEVEL 5
INCLUDE INDEX BUA.I0005GJJ_MIG PARTLEVEL 5
REBUILD INDEX LIST LST549 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS02001 part 6 of 15, 2 index
//STP550 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST550
INCLUDE INDEX BUA.I0005GJI_MIG PARTLEVEL 6
INCLUDE INDEX BUA.I0005GJJ_MIG PARTLEVEL 6
REBUILD INDEX LIST LST550 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS02001 part 7 of 15, 2 index
//STP551 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST551
INCLUDE INDEX BUA.I0005GJI_MIG PARTLEVEL 7
INCLUDE INDEX BUA.I0005GJJ_MIG PARTLEVEL 7
REBUILD INDEX LIST LST551 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS02001 part 8 of 15, 2 index
//STP552 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST552
INCLUDE INDEX BUA.I0005GJI_MIG PARTLEVEL 8
INCLUDE INDEX BUA.I0005GJJ_MIG PARTLEVEL 8
REBUILD INDEX LIST LST552 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS02001 part 9 of 15, 2 index
//STP553 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST553
INCLUDE INDEX BUA.I0005GJI_MIG PARTLEVEL 9
INCLUDE INDEX BUA.I0005GJJ_MIG PARTLEVEL 9
REBUILD INDEX LIST LST553 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS02001 part 10 of 15, 2 index
//STP554 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST554
INCLUDE INDEX BUA.I0005GJI_MIG PARTLEVEL 10
INCLUDE INDEX BUA.I0005GJJ_MIG PARTLEVEL 10
REBUILD INDEX LIST LST554 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS02001 part 11 of 15, 2 index
//STP555 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST555
INCLUDE INDEX BUA.I0005GJI_MIG PARTLEVEL 11
INCLUDE INDEX BUA.I0005GJJ_MIG PARTLEVEL 11
REBUILD INDEX LIST LST555 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS02001 part 12 of 15, 2 index
//STP556 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST556
INCLUDE INDEX BUA.I0005GJI_MIG PARTLEVEL 12
INCLUDE INDEX BUA.I0005GJJ_MIG PARTLEVEL 12
REBUILD INDEX LIST LST556 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS02001 part 13 of 15, 2 index
//STP557 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST557
INCLUDE INDEX BUA.I0005GJI_MIG PARTLEVEL 13
INCLUDE INDEX BUA.I0005GJJ_MIG PARTLEVEL 13
REBUILD INDEX LIST LST557 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS02001 part 14 of 15, 2 index
//STP558 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST558
INCLUDE INDEX BUA.I0005GJI_MIG PARTLEVEL 14
INCLUDE INDEX BUA.I0005GJJ_MIG PARTLEVEL 14
REBUILD INDEX LIST LST558 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDO6001.SPS02001 part 15 of 15, 2 index
//STP559 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST559
INCLUDE INDEX BUA.I0005GJI_MIG PARTLEVEL 15
INCLUDE INDEX BUA.I0005GJJ_MIG PARTLEVEL 15
REBUILD INDEX LIST LST559 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDQ0001.SIT02001 part 1 of 4, 1 index
//STP560 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST560
INCLUDE INDEX BUA.I00086SW_MIG PARTLEVEL 1
REBUILD INDEX LIST LST560 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDQ0001.SIT02001 part 2 of 4, 1 index
//STP561 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST561
INCLUDE INDEX BUA.I00086SW_MIG PARTLEVEL 2
REBUILD INDEX LIST LST561 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDQ0001.SIT02001 part 3 of 4, 1 index
//STP562 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST562
INCLUDE INDEX BUA.I00086SW_MIG PARTLEVEL 3
REBUILD INDEX LIST LST562 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
//******* ts XBDQ0001.SIT02001 part 4 of 4, 1 index
//STP563 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DVBP,'A5407696.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
OPTIONS EVENT (ITEMERROR, SKIP)
LISTDEF LST563
INCLUDE INDEX BUA.I00086SW_MIG PARTLEVEL 4
REBUILD INDEX LIST LST563 SCOPE PENDING
SORTDEVT SYSDA
SORTNUM 250
WORKDDN(TSYUTD)
STATISTICS KEYCARD UPDATE ALL
$#out 20101212 15:29:40