zOs/war/tx1
}¢--- DSN.TX.CASE(MFNVTPAR) cre=2010-05-12 mod=2010-05-12-17.11.36 A540769 -----
part 1 values ( 105),
part 2 values ( 224),
part 3 values ( 340),
part 4 values ( 432),
part 5 values ( 554),
part 6 values ( 656),
part 7 values ( 770),
part 8 values ( 892),
part 9 values ( 991),
part 10 values ( 1115),
part 11 values ( 1211),
part 12 values ( 1315),
part 13 values ( 1435),
part 14 values ( 1524),
part 15 values ( 1651),
part 16 values ( 1751),
part 17 values ( 1867),
part 18 values ( 1988),
part 19 values ( 2079),
part 20 values ( 2153),
part 21 values ( 2273),
part 22 values ( 2367),
part 23 values ( 2492),
part 24 values ( 2609),
part 25 values ( 2675),
part 26 values ( 2795),
part 27 values ( 2901),
part 28 values ( 3015),
part 29 values ( 3134),
part 30 values ( 3233),
part 31 values ( 3311),
part 32 values ( 3432),
part 33 values ( 3538),
part 34 values ( 3659),
part 35 values ( 3770),
part 36 values ( 3845),
part 37 values ( 3966),
part 38 values ( 4075),
part 39 values ( 4191),
part 40 values ( 4311),
part 41 values ( 4417),
part 42 values ( 4542),
part 43 values ( 4651),
part 44 values ( 4763),
part 45 values ( 4879),
part 46 values ( 4983),
part 47 values ( 5105),
part 48 values ( 5214),
part 49 values ( 5333),
part 50 values ( 5457),
part 51 values ( 5566),
part 52 values ( 5691),
part 53 values ( 5802),
part 54 values ( 5918),
part 55 values ( 6034),
part 56 values ( 6149),
part 57 values ( 6273),
part 58 values ( 6385),
part 59 values ( 6505),
part 60 values ( 6608),
part 61 values ( 6720),
part 62 values ( 6844),
part 63 values ( 6956),
part 64 values ( 7070),
part 65 values ( 7179),
part 66 values ( 7295),
part 67 values ( 7420),
part 68 values ( 7540),
part 69 values ( 7650),
part 70 values ( 7749),
part 71 values ( 7862),
part 72 values ( 7989),
part 73 values ( 8119),
part 74 values ( 8225),
part 75 values ( 8332),
part 76 values ( 8447),
part 77 values ( 8531),
part 78 values ( 8659),
part 79 values ( 8778),
part 80 values ( 8889),
part 81 values ( 9011),
part 82 values ( 9088),
part 83 values ( 9216),
part 84 values ( 9340),
part 85 values ( 9444),
part 86 values ( 9562),
part 87 values ( 9664),
part 88 values ( 9733),
part 89 values ( 9862),
part 90 values ( 9971),
part 91 values (10084),
part 92 values (10206),
part 93 values (10269),
part 94 values (10396),
part 95 values (10512),
part 96 values (10620),
part 97 values (10747),
part 98 values (10843),
part 99 values (10971),
part 100 values (11046)
}¢--- DSN.TX.CASE(MFNVTREB) cre=2010-04-18 mod=2010-04-18-20.52.12 A540769 -----
//YMFREBUI JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//P02 EXEC PGM=DSNUTILB,
// PARM='DBZF,YMFREBUI.REBUILD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
REBUILD INDEX (ALL) TABLESPACE MF01$.A150A
SORTDEVT DISK
SORTNUM 200
WORKDDN(TSYUTD)
STATISTICS UPDATE ALL
SHRLEVEL CHANGE
//YMFRUNST JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//P02 EXEC PGM=DSNUTILB,
// PARM='DBZF,YMFRUNST.RUNSTAT'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
RUNSTATS TABLESPACE MF01$.A150A
SORTDEVT DISK
UPDATE ALL
SHRLEVEL REFERENCE
//YMFRUNS2 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//P02 EXEC PGM=DSNUTILB,
// PARM='DBZF,YMFRUNS2.RUNSTAT'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
RUNSTATS TABLESPACE MF01$.A009A
INDEX(ALL)
SORTDEVT DISK
SORTNUM 200
UPDATE ALL
SHRLEVEL REFERENCE
}¢--- DSN.TX.CASE(MFNVTREH) cre=2010-04-26 mod=2010-04-26-22.23.43 A540769 -----
$>.jclSub()
$@do ix=0 to 4 $@=¢
//YMFREBH$ix JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//P02 EXEC PGM=DSNUTILB,
// PARM='DBZF,YMFREBH$ix.REBUILD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
REBUILD INDEX (OA1Z.$"$"IMF150H$ix)
SORTDEVT DISK
SORTNUM 255
WORKDDN(TSYUTD)
STATISTICS UPDATE ALL
SHRLEVEL REFERENCE
$!
$*(
//YMFRUNSH XXX (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//P02 EXEC PGM=DSNUTILB,
// PARM='DBZF,YMFRUNSH.RUNSTAT'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
RUNSTATS TABLESPACE MF01$.A150H
SORTDEVT DISK
UPDATE ALL
SHRLEVEL REFERENCE
$*)
$#out 20100426 22:22:46
$#out 20100426 22:20:05
$#out 20100426 22:11:23
$#out 20100426 22:10:32
$#out 20100426 22:07:39
$#out 20100426 22:09:37
$#out 20100426 22:08:02
//YMFREBH0 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//P02 EXEC PGM=DSNUTILB,
// PARM='DBZF,YMFREBH0.REBUILD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
REBUILD INDEX OA1Z.$IMF150H0
SORTDEVT DISK
SORTNUM 255
WORKDDN(TSYUTD)
STATISTICS UPDATE ALL
SHRLEVEL CHANGE
//YMFREBH1 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//P02 EXEC PGM=DSNUTILB,
// PARM='DBZF,YMFREBH1.REBUILD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
REBUILD INDEX OA1Z.$IMF150H1
SORTDEVT DISK
SORTNUM 255
WORKDDN(TSYUTD)
STATISTICS UPDATE ALL
SHRLEVEL CHANGE
//YMFREBH2 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//P02 EXEC PGM=DSNUTILB,
// PARM='DBZF,YMFREBH2.REBUILD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
REBUILD INDEX OA1Z.$IMF150H2
SORTDEVT DISK
SORTNUM 255
WORKDDN(TSYUTD)
STATISTICS UPDATE ALL
SHRLEVEL CHANGE
//YMFREBH3 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//P02 EXEC PGM=DSNUTILB,
// PARM='DBZF,YMFREBH3.REBUILD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
REBUILD INDEX OA1Z.$IMF150H3
SORTDEVT DISK
SORTNUM 255
WORKDDN(TSYUTD)
STATISTICS UPDATE ALL
SHRLEVEL CHANGE
//YMFREBH4 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//P02 EXEC PGM=DSNUTILB,
// PARM='DBZF,YMFREBH4.REBUILD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
REBUILD INDEX OA1Z.$IMF150H4
SORTDEVT DISK
SORTNUM 255
WORKDDN(TSYUTD)
STATISTICS UPDATE ALL
SHRLEVEL CHANGE
$#out
$#out 20100426 22:07:11
$#out 20100426 22:06:51
$#out 20100426 22:06:30
}¢--- DSN.TX.CASE(MFNVTR2O) cre=2010-04-30 mod=2010-05-13-11.18.26 A540769 -----
//YMFNVR2O JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBZF,'YMFNVR2O.REORG'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DBZF.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
REORG TABLESPACE MF01$.$2A150A PART 1 : 100
LOG NO
SORTDATA
COPYDDN(TCOPYD)
SHRLEVEL CHANGE
MAPPINGTABLE S100447.MAPTAB03
MAXRO 300
DRAIN ALL
DELAY 1500
TIMEOUT TERM
UNLOAD CONTINUE
PUNCHDDN TPUNCH
SORTKEYS
SORTDEVT DISK
SORTNUM 160
STATISTICS
INDEX ALL
REPORT NO
UPDATE ALL
DISCARD DISCARDDN TDISC
FROM TABLE OA1Z.$2TMF150A1
WHEN (MF150060 >= '2010-04-07-23.00.00.000000')
}¢--- DSN.TX.CASE(MFNVTUNH) cre=2010-04-26 mod=2010-04-26-14.49.02 A540769 -----
//YMFNVUNH JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//***************************************************
//* UNLOAD
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBOF,'YMFUNRE0.UNLOAC'),
// REGION=0M
//*DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSTEMPL DD DSN=DBOF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE TREC DSN('DSN.MFUNL.&DB..&TS..P&PA..UNL')
DATACLAS (EYN0X) MGMTCLAS(COM#A064)
SPACE (10,1000) CYL
TEMPLATE TPUN DSN('DSN.MFUNL.&DB..&TS..PUN')
MGMTCLAS(COM#A064)
SPACE (1,10) CYL
LISTDEF LST INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 207
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 208
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 209
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 210
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 211
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 212
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 213
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 214
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 215
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 216
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 217
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 218
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 219
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 220
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 221
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 222
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 223
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 224
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 225
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 226
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 227
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 228
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 229
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 230
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 231
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 232
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 233
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 234
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 235
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 236
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 237
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 238
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 239
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 240
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 241
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 242
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 243
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 244
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 245
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 246
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 247
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 248
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 249
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 250
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 251
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 252
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 253
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 254
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 255
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 256
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 257
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 258
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL 259
UNLOAD LIST LST
PUNCHDDN TPUN UNLDDN TREC
SHRLEVEL CHANGE ISOLATION UR
}¢--- DSN.TX.CASE(MFNVTUNL) cre=2010-04-17 mod=2010-04-17-14.42.34 A540769 -----
$>.jclSub()
$@=¢
36 '21.03.2009'
47 '24.04.2009'
53 '12.05.2009'
60 '03.06.2009'
68 '27.06.2009'
74 '15.07.2009'
80 '03.08.2009'
88 '27.08.2009'
94 '15.09.2009'
100 '03.10.2009'
108 '27.10.2009'
114 '15.11.2009'
120 '03.12.2009'
127 '24.12.2009'
132 '09.01.2010'
139 '31.01.2010'
146 '21.02.2010'
152 '09.03.2010'
159 '31.03.2010'
165 '18.04.2010'
999 '31.12.9999'
$!
$| $@¢
$=pr='01.01.0001'
$=n = 01
$@for li $@¢
parse value $li with pa lim .
$=lim=-lim
$**say $n pa '>' $pr and '<=' $lim
$@=¢
//YMFUNL$n JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBOF
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//*YSPUNCH DD SYSOUT=*
//*YSREC00 DD SYSOUT=*,LRECL=700
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.MFUNL.MF150P$n.UNL,
// DCB=(LRECL=661,RECFM=FB,BLKSIZE=31728),
// SPACE=(CYL,(2,1000)),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.MFUNL.MF150P$n.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSIN DD *
select t.*,
smallint(mod(
int(
translate(
translate('08642' , hex(substr(MF150023, 8, 5)), '1234567890'),
'024579', 'ABCDEF')) * 13
+ month(MF150013), 11113)) mf150hash
from oa1p.TMF150A1 t
where MF150013 > $pr and MF150013 <= $lim
with ur
;
$!
$=pr = $lim
$=n =- right($n+1, 2, 0)
$!
$!
$#out 20100417 14:42:07
$#out 20100417 14:41:22
$#out 20100417 14:40:43
$#out 20100417 14:14:50
$#out 20100417 14:08:00
$#out 20100417 14:06:23
$#out 20100417 14:05:49
$#out 20100417 14:03:28
}¢--- DSN.TX.CASE(MFNVTUNR) cre=2010-04-17 mod=2010-04-17-14.38.56 A540769 -----
//YMFUNRE0 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//***************************************************
//* UNLOAD
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBOF,'YMFUNRE0.UNLOAC'),
// REGION=0M
//*DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSTEMPL DD DSN=DBOF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE TREC DSN('DSN.MFUNL.&DB..&TS..UNL')
DATACLAS (EYN0X) MGMTCLAS(COM#A064)
SPACE (10,1000) CYL
TEMPLATE TPUN DSN('DSN.MFUNL.&DB..&TS..PUN')
MGMTCLAS(COM#A064)
SPACE (10,250) CYL
LISTDEF LST -- INCLUDE TABLESPACE MF01A1P.A150A
-- INCLUDE TABLESPACE MF03A1P.A009A
-- INCLUDE TABLESPACE MF01A1P.A131A
INCLUDE TABLESPACE MF01A1P.A101A
INCLUDE TABLESPACE MF01A1P.A401A
INCLUDE TABLESPACE MF01A1P.A130A
INCLUDE TABLESPACE OE02A1P.A401A
INCLUDE TABLESPACE MF01A1P.A200A
INCLUDE TABLESPACE MF01A1P.A102A
INCLUDE TABLESPACE MF01A1P.A105A
INCLUDE TABLESPACE MF01A1P.A137A
INCLUDE TABLESPACE MF01A1P.A138A
INCLUDE TABLESPACE MF01A1P.A141A
INCLUDE TABLESPACE MF01A1P.A202A
INCLUDE TABLESPACE MF01A1P.A230A
INCLUDE TABLESPACE MF02A1P.A701A
INCLUDE TABLESPACE MF02A1P.A702A
INCLUDE TABLESPACE MF02A1P.A707A
INCLUDE TABLESPACE MF02A1P.A708A
INCLUDE TABLESPACE MF02A1P.A709A
INCLUDE TABLESPACE MF02A1P.A714A
INCLUDE TABLESPACE MF02A1P.A716A
INCLUDE TABLESPACE MF01A1P.A903A
UNLOAD LIST LST
PUNCHDDN TPUN UNLDDN TREC
SHRLEVEL CHANGE ISOLATION UR
//YMFUNRE1 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//***************************************************
//* UNLOAD
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBOF,'YMFUNRE1.UNLOAC'),
// REGION=0M
//*DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSTEMPL DD DSN=DBOF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE TREC DSN('DSN.MFUNL.&DB..&TS..UNL')
DATACLAS (EYN0X) MGMTCLAS(COM#A064)
SPACE (10,1000) CYL
TEMPLATE TPUN DSN('DSN.MFUNL.&DB..&TS..PUN')
MGMTCLAS(COM#A064)
SPACE (10,250) CYL
LISTDEF LST -- INCLUDE TABLESPACE MF01A1P.A150A
-- INCLUDE TABLESPACE MF03A1P.A009A
INCLUDE TABLESPACE MF01A1P.A131A
UNLOAD LIST LST
PUNCHDDN TPUN UNLDDN TREC
SHRLEVEL CHANGE ISOLATION UR
//YMFUNRE2 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//***************************************************
//* UNLOAD
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBOF,'YMFUNRE2.UNLOAC'),
// REGION=0M
//*DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSTEMPL DD DSN=DBOF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE TREC DSN('DSN.MFUNL.&DB..&TS..P&PA..UNL')
DATACLAS (EYN0X) MGMTCLAS(COM#A064)
SPACE (10,1000) CYL
TEMPLATE TPUN DSN('DSN.MFUNL.&DB..&TS..PUN')
MGMTCLAS(COM#A064)
SPACE (10,250) CYL
LISTDEF LST -- INCLUDE TABLESPACE MF01A1P.A150A
INCLUDE TABLESPACE MF03A1P.A009A PARTLEVEL
UNLOAD LIST LST
PUNCHDDN TPUN UNLDDN TREC
SHRLEVEL CHANGE ISOLATION UR
}¢--- DSN.TX.CASE(MFNVTUNZ) cre=2010-04-22 mod=2010-04-22-11.02.37 A540769 -----
$>.jclSub()
$@=¢
36 '21.03.2009'
47 '24.04.2009'
53 '12.05.2009'
60 '03.06.2009'
68 '27.06.2009'
74 '15.07.2009'
80 '03.08.2009'
88 '27.08.2009'
94 '15.09.2009'
100 '03.10.2009'
108 '27.10.2009'
114 '15.11.2009'
120 '03.12.2009'
127 '24.12.2009'
132 '09.01.2010'
139 '31.01.2010'
146 '21.02.2010'
152 '09.03.2010'
159 '31.03.2010'
165 '18.04.2010'
999 '31.12.9999'
$!
$| $@¢
$=pr='01.01.0001'
$=n = 01
$@for li $@¢
parse value $li with pa lim .
$=lim=-lim
$**say $n pa '>' $pr and '<=' $lim
$@=¢
//YMFUNL$n JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBZF
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBZF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//*YSPUNCH DD SYSOUT=*
//*YSREC00 DD SYSOUT=*,LRECL=700
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.MFNV.MF150P$n.UNL,
// DCB=(LRECL=661,RECFM=FB,BLKSIZE=31728),
// SPACE=(CYL,(2,1000)),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.MFNV.MF150P$n.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSIN DD *
select t.*,
smallint(mod(
month(MF150013) * 100000
+ int(translate(
translate('08642' , hex(substr(MF150023, 8, 5)), '1234567890')
, '024579', 'ABCDEF'))
, 11047)) mf150hash
from oa1z.$"$"TMF150A1 t
where MF150013 > $pr and MF150013 <= $lim
with ur
;
$!
$=pr = $lim
$=n =- right($n+1, 2, 0)
$!
$!
$#out 20100422 11:02:05
$#out 20100422 10:56:20
//YMFUNL01 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBZF
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBZF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//*YSPUNCH DD SYSOUT=*
//*YSREC00 DD SYSOUT=*,LRECL=700
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.MFNV.MF150P01.UNL,
// DCB=(LRECL=661,RECFM=FB,BLKSIZE=31728),
// SPACE=(CYL,(2,1000)),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.MFNV.MF150P01.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSIN DD *
select t.*,
smallint(mod(
month(MF150013) * 100000
+ int(translate(
translate('08642' , hex(substr(MF150023, 8, 5)), '1234567890')
, '024579', 'ABCDEF'))
, 11047)) mf150hash
from oa1z.$TMF150A1 t
where MF150013 > '01.01.0001' and MF150013 <= '21.03.2009'
with ur
;
//YMFUNL02 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBZF
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBZF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//*YSPUNCH DD SYSOUT=*
//*YSREC00 DD SYSOUT=*,LRECL=700
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.MFNV.MF150P02.UNL,
// DCB=(LRECL=661,RECFM=FB,BLKSIZE=31728),
// SPACE=(CYL,(2,1000)),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.MFNV.MF150P02.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSIN DD *
select t.*,
smallint(mod(
month(MF150013) * 100000
+ int(translate(
translate('08642' , hex(substr(MF150023, 8, 5)), '1234567890')
, '024579', 'ABCDEF'))
, 11047)) mf150hash
from oa1z.$TMF150A1 t
where MF150013 > '21.03.2009' and MF150013 <= '24.04.2009'
with ur
;
}¢--- DSN.TX.CASE(MFNVX) cre=2010-04-14 mod=2010-04-22-18.08.20 A540769 --------
* test table $creator.$tmf150
* create old table $tmf150
credb trg 1
+ ok creDb A540769.TX.GENF(MF150t1) ::f
credb trg 2
* load data from oa1a.tmf150
+ ok creDb A540769.TX.GENF(MF150t2) ::f
* add tmf150hash and triggers
credb trg 3
+ ok creDb A540769.TX.GENF(MF150t3) ::f
* load data from oa1a.tmf150
credb trg 4
+ ok creDb A540769.TX.GENF(MF150t4) ::f
credb trg 5
+ ok creDb A540769.TX.GENF(MF150t5) ::f
credb trg 3
+ ok creDb A540769.TX.GENF(MFNVXt3) ::f
* update to get new hash values
credb trg 5
+ ok creDb A540769.TX.GENF(MFNVXt5) ::f
}¢--- DSN.TX.CASE(MFNVXDDL) cre=2010-04-14 mod=2010-04-22-18.02.53 A540769 -----
--
SET CURRENT SQLID='S100447';
$@¢
if $phase = 1 then $@=¢
CREATE TABLESPACE A150A
IN $db
USING STOGROUP GSMS
FREEPAGE 30 PCTFREE 10
DSSIZE 32 G ?
NUMPARTS 254
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX 30000
CLOSE NO
COMPRESS YES
LOCKPART YES;
COMMIT;
CREATE TABLE $creator.$'$TMF'150A1
(MF150001 CHAR(16) NOT NULL WITH DEFAULT,
MF150002 CHAR(1) NOT NULL WITH DEFAULT,
MF150003 CHAR(5) NOT NULL WITH DEFAULT,
MF150004 CHAR(25) NOT NULL WITH DEFAULT,
MF150005 CHAR(1) NOT NULL WITH DEFAULT,
MF150006 CHAR(1) NOT NULL WITH DEFAULT,
MF150007 CHAR(1) NOT NULL WITH DEFAULT,
MF150008 CHAR(3) NOT NULL WITH DEFAULT,
MF150009 CHAR(5) NOT NULL WITH DEFAULT,
MF150010 CHAR(4) NOT NULL WITH DEFAULT,
MF150011 CHAR(1) NOT NULL WITH DEFAULT,
MF150012 CHAR(1) NOT NULL WITH DEFAULT,
MF150013 DATE NOT NULL WITH DEFAULT,
MF150014 CHAR(4) NOT NULL WITH DEFAULT,
MF150015 CHAR(4) NOT NULL WITH DEFAULT,
MF150016 CHAR(4) NOT NULL WITH DEFAULT,
MF150017 CHAR(12) NOT NULL WITH DEFAULT,
MF150018 DECIMAL(15, 3) NOT NULL WITH DEFAULT,
MF150019 DECIMAL(15, 3) NOT NULL WITH DEFAULT,
MF150020 CHAR(8) NOT NULL WITH DEFAULT,
MF150021 TIMESTAMP NOT NULL WITH DEFAULT,
MF150022 CHAR(4) NOT NULL WITH DEFAULT,
MF150023 CHAR(12) NOT NULL WITH DEFAULT,
MF150024 CHAR(1) NOT NULL WITH DEFAULT,
MF150025 CHAR(3) NOT NULL WITH DEFAULT,
MF150026 CHAR(3) NOT NULL WITH DEFAULT,
MF150027 CHAR(3) NOT NULL WITH DEFAULT,
MF150028 CHAR(3) NOT NULL WITH DEFAULT,
MF150029 CHAR(3) NOT NULL WITH DEFAULT,
MF150030 CHAR(16) NOT NULL WITH DEFAULT,
MF150031 CHAR(2) NOT NULL WITH DEFAULT,
MF150032 CHAR(7) NOT NULL WITH DEFAULT,
MF150033 CHAR(7) NOT NULL WITH DEFAULT,
MF150034 CHAR(4) NOT NULL WITH DEFAULT,
MF150035 CHAR(1) NOT NULL WITH DEFAULT,
MF150036 CHAR(18) NOT NULL WITH DEFAULT,
MF150037 DECIMAL(15, 0) NOT NULL WITH DEFAULT,
MF150038 CHAR(16) NOT NULL WITH DEFAULT,
MF150039 CHAR(2) NOT NULL WITH DEFAULT,
MF150040 CHAR(2) NOT NULL WITH DEFAULT,
MF150041 CHAR(2) NOT NULL WITH DEFAULT,
MF150042 CHAR(4) NOT NULL WITH DEFAULT,
MF150043 DECIMAL(15, 3) NOT NULL WITH DEFAULT,
MF150044 CHAR(5) NOT NULL WITH DEFAULT,
MF150045 CHAR(4) NOT NULL WITH DEFAULT,
MF150046 CHAR(4) NOT NULL WITH DEFAULT,
MF150047 CHAR(1) NOT NULL WITH DEFAULT,
MF150051 CHAR(3) NOT NULL WITH DEFAULT,
MF150052 CHAR(3) NOT NULL WITH DEFAULT,
MF150053 DECIMAL(15, 3) NOT NULL WITH DEFAULT,
MF150054 CHAR(7) NOT NULL WITH DEFAULT,
MF150055 CHAR(1) NOT NULL WITH DEFAULT,
MF150056 CHAR(8) NOT NULL WITH DEFAULT,
MF150059 CHAR(5) NOT NULL WITH DEFAULT,
MF150060 TIMESTAMP NOT NULL WITH DEFAULT,
MF150062 CHAR(1) NOT NULL WITH DEFAULT,
MF150063 CHAR(1) NOT NULL WITH DEFAULT,
MF150064 DATE NOT NULL WITH DEFAULT,
MF150065 DATE NOT NULL WITH DEFAULT,
MF150066 CHAR(16) NOT NULL WITH DEFAULT,
MF150067 CHAR(16) NOT NULL WITH DEFAULT,
MF150068 CHAR(16) NOT NULL WITH DEFAULT,
MF150069 CHAR(4) NOT NULL WITH DEFAULT,
MF150070 CHAR(7) NOT NULL WITH DEFAULT,
MF150071 CHAR(1) NOT NULL WITH DEFAULT,
MF150072 CHAR(1) NOT NULL WITH DEFAULT,
MF150073 CHAR(1) NOT NULL WITH DEFAULT,
MF150074 CHAR(1) NOT NULL WITH DEFAULT,
MF150075 CHAR(1) NOT NULL WITH DEFAULT,
MF150076 CHAR(1) NOT NULL WITH DEFAULT,
MF150077 CHAR(6) NOT NULL WITH DEFAULT,
MF150078 CHAR(1) NOT NULL WITH DEFAULT,
MF150079 CHAR(1) NOT NULL WITH DEFAULT,
MF150080 DATE NOT NULL WITH DEFAULT,
MF150081 CHAR(5) NOT NULL WITH DEFAULT,
MF150082 CHAR(26) NOT NULL WITH DEFAULT,
MF150083 SMALLINT NOT NULL WITH DEFAULT,
MF150084 SMALLINT NOT NULL WITH DEFAULT,
MF150085 SMALLINT NOT NULL WITH DEFAULT,
MF150086 CHAR(35) NOT NULL WITH DEFAULT,
MF150087 CHAR(35) NOT NULL WITH DEFAULT,
MF150088 CHAR(35) NOT NULL WITH DEFAULT,
MF150089 CHAR(35) NOT NULL WITH DEFAULT,
MF150090 SMALLINT NOT NULL WITH DEFAULT,
MF150091 SMALLINT NOT NULL WITH DEFAULT,
MF150092 CHAR(16) NOT NULL WITH DEFAULT,
MF150019A CHAR(4) NOT NULL WITH DEFAULT '0010',
CONSTRAINT MF150001
PRIMARY KEY (MF150001))
IN $db.A150A
PARTITION BY (MF150013 ASC)
(PART 1 VALUES('31.12.2000'),
PART 2 VALUES('31.12.2001'),
PART 3 VALUES('31.12.2002'),
PART 4 VALUES('31.12.2003'),
PART 5 VALUES('31.12.2004'),
PART 6 VALUES('31.12.2005'),
PART 7 VALUES('31.12.2006'),
PART 8 VALUES('31.12.2007'),
PART 9 VALUES('31.12.2008'),
PART 10 VALUES('03.01.2009'),
PART 11 VALUES('06.01.2009'),
PART 12 VALUES('09.01.2009'),
PART 13 VALUES('12.01.2009'),
PART 14 VALUES('15.01.2009'),
PART 15 VALUES('18.01.2009'),
PART 16 VALUES('21.01.2009'),
PART 17 VALUES('24.01.2009'),
PART 18 VALUES('27.01.2009'),
PART 19 VALUES('31.01.2009'),
PART 20 VALUES('03.02.2009'),
PART 21 VALUES('06.02.2009'),
PART 22 VALUES('09.02.2009'),
PART 23 VALUES('12.02.2009'),
PART 24 VALUES('15.02.2009'),
PART 25 VALUES('18.02.2009'),
PART 26 VALUES('21.02.2009'),
PART 27 VALUES('24.02.2009'),
PART 28 VALUES('27.02.2009'),
PART 29 VALUES('28.02.2009'),
PART 30 VALUES('03.03.2009'),
PART 31 VALUES('06.03.2009'),
PART 32 VALUES('09.03.2009'),
PART 33 VALUES('12.03.2009'),
PART 34 VALUES('15.03.2009'),
PART 35 VALUES('18.03.2009'),
PART 36 VALUES('21.03.2009'),
PART 37 VALUES('24.03.2009'),
PART 38 VALUES('27.03.2009'),
PART 39 VALUES('31.03.2009'),
PART 40 VALUES('03.04.2009'),
PART 41 VALUES('06.04.2009'),
PART 42 VALUES('09.04.2009'),
PART 43 VALUES('12.04.2009'),
PART 44 VALUES('15.04.2009'),
PART 45 VALUES('18.04.2009'),
PART 46 VALUES('21.04.2009'),
PART 47 VALUES('24.04.2009'),
PART 48 VALUES('27.04.2009'),
PART 49 VALUES('30.04.2009'),
PART 50 VALUES('03.05.2009'),
PART 51 VALUES('06.05.2009'),
PART 52 VALUES('09.05.2009'),
PART 53 VALUES('12.05.2009'),
PART 54 VALUES('15.05.2009'),
PART 55 VALUES('18.05.2009'),
PART 56 VALUES('21.05.2009'),
PART 57 VALUES('24.05.2009'),
PART 58 VALUES('27.05.2009'),
PART 59 VALUES('31.05.2009'),
PART 60 VALUES('03.06.2009'),
PART 61 VALUES('06.06.2009'),
PART 62 VALUES('09.06.2009'),
PART 63 VALUES('12.06.2009'),
PART 64 VALUES('15.06.2009'),
PART 65 VALUES('18.06.2009'),
PART 66 VALUES('21.06.2009'),
PART 67 VALUES('24.06.2009'),
PART 68 VALUES('27.06.2009'),
PART 69 VALUES('30.06.2009'),
PART 70 VALUES('03.07.2009'),
PART 71 VALUES('06.07.2009'),
PART 72 VALUES('09.07.2009'),
PART 73 VALUES('12.07.2009'),
PART 74 VALUES('15.07.2009'),
PART 75 VALUES('18.07.2009'),
PART 76 VALUES('21.07.2009'),
PART 77 VALUES('24.07.2009'),
PART 78 VALUES('27.07.2009'),
PART 79 VALUES('31.07.2009'),
PART 80 VALUES('03.08.2009'),
PART 81 VALUES('06.08.2009'),
PART 82 VALUES('09.08.2009'),
PART 83 VALUES('12.08.2009'),
PART 84 VALUES('15.08.2009'),
PART 85 VALUES('18.08.2009'),
PART 86 VALUES('21.08.2009'),
PART 87 VALUES('24.08.2009'),
PART 88 VALUES('27.08.2009'),
PART 89 VALUES('31.08.2009'),
PART 90 VALUES('03.09.2009'),
PART 91 VALUES('06.09.2009'),
PART 92 VALUES('09.09.2009'),
PART 93 VALUES('12.09.2009'),
PART 94 VALUES('15.09.2009'),
PART 95 VALUES('18.09.2009'),
PART 96 VALUES('21.09.2009'),
PART 97 VALUES('24.09.2009'),
PART 98 VALUES('27.09.2009'),
PART 99 VALUES('30.09.2009'),
PART 100 VALUES('03.10.2009'),
PART 101 VALUES('06.10.2009'),
PART 102 VALUES('09.10.2009'),
PART 103 VALUES('12.10.2009'),
PART 104 VALUES('15.10.2009'),
PART 105 VALUES('18.10.2009'),
PART 106 VALUES('21.10.2009'),
PART 107 VALUES('24.10.2009'),
PART 108 VALUES('27.10.2009'),
PART 109 VALUES('31.10.2009'),
PART 110 VALUES('03.11.2009'),
PART 111 VALUES('06.11.2009'),
PART 112 VALUES('09.11.2009'),
PART 113 VALUES('12.11.2009'),
PART 114 VALUES('15.11.2009'),
PART 115 VALUES('18.11.2009'),
PART 116 VALUES('21.11.2009'),
PART 117 VALUES('24.11.2009'),
PART 118 VALUES('27.11.2009'),
PART 119 VALUES('30.11.2009'),
PART 120 VALUES('03.12.2009'),
PART 121 VALUES('06.12.2009'),
PART 122 VALUES('09.12.2009'),
PART 123 VALUES('12.12.2009'),
PART 124 VALUES('15.12.2009'),
PART 125 VALUES('18.12.2009'),
PART 126 VALUES('21.12.2009'),
PART 127 VALUES('24.12.2009'),
PART 128 VALUES('27.12.2009'),
PART 129 VALUES('31.12.2009'),
PART 130 VALUES('03.01.2010'),
PART 131 VALUES('06.01.2010'),
PART 132 VALUES('09.01.2010'),
PART 133 VALUES('12.01.2010'),
PART 134 VALUES('15.01.2010'),
PART 135 VALUES('18.01.2010'),
PART 136 VALUES('21.01.2010'),
PART 137 VALUES('24.01.2010'),
PART 138 VALUES('27.01.2010'),
PART 139 VALUES('31.01.2010'),
PART 140 VALUES('03.02.2010'),
PART 141 VALUES('06.02.2010'),
PART 142 VALUES('09.02.2010'),
PART 143 VALUES('12.02.2010'),
PART 144 VALUES('15.02.2010'),
PART 145 VALUES('18.02.2010'),
PART 146 VALUES('21.02.2010'),
PART 147 VALUES('24.02.2010'),
PART 148 VALUES('27.02.2010'),
PART 149 VALUES('28.02.2010'),
PART 150 VALUES('03.03.2010'),
PART 151 VALUES('06.03.2010'),
PART 152 VALUES('09.03.2010'),
PART 153 VALUES('12.03.2010'),
PART 154 VALUES('15.03.2010'),
PART 155 VALUES('18.03.2010'),
PART 156 VALUES('21.03.2010'),
PART 157 VALUES('24.03.2010'),
PART 158 VALUES('27.03.2010'),
PART 159 VALUES('31.03.2010'),
PART 160 VALUES('03.04.2010'),
PART 161 VALUES('06.04.2010'),
PART 162 VALUES('09.04.2010'),
PART 163 VALUES('12.04.2010'),
PART 164 VALUES('15.04.2010'),
PART 165 VALUES('18.04.2010'),
PART 166 VALUES('21.04.2010'),
PART 167 VALUES('24.04.2010'),
PART 168 VALUES('27.04.2010'),
PART 169 VALUES('30.04.2010'),
PART 170 VALUES('03.05.2010'),
PART 171 VALUES('06.05.2010'),
PART 172 VALUES('09.05.2010'),
PART 173 VALUES('12.05.2010'),
PART 174 VALUES('15.05.2010'),
PART 175 VALUES('18.05.2010'),
PART 176 VALUES('21.05.2010'),
PART 177 VALUES('24.05.2010'),
PART 178 VALUES('27.05.2010'),
PART 179 VALUES('31.05.2010'),
PART 180 VALUES('03.06.2010'),
PART 181 VALUES('06.06.2010'),
PART 182 VALUES('09.06.2010'),
PART 183 VALUES('12.06.2010'),
PART 184 VALUES('15.06.2010'),
PART 185 VALUES('18.06.2010'),
PART 186 VALUES('21.06.2010'),
PART 187 VALUES('24.06.2010'),
PART 188 VALUES('27.06.2010'),
PART 189 VALUES('30.06.2010'),
PART 190 VALUES('03.07.2010'),
PART 191 VALUES('06.07.2010'),
PART 192 VALUES('09.07.2010'),
PART 193 VALUES('12.07.2010'),
PART 194 VALUES('15.07.2010'),
PART 195 VALUES('18.07.2010'),
PART 196 VALUES('21.07.2010'),
PART 197 VALUES('24.07.2010'),
PART 198 VALUES('27.07.2010'),
PART 199 VALUES('31.07.2010'),
PART 200 VALUES('03.08.2010'),
PART 201 VALUES('06.08.2010'),
PART 202 VALUES('09.08.2010'),
PART 203 VALUES('12.08.2010'),
PART 204 VALUES('15.08.2010'),
PART 205 VALUES('18.08.2010'),
PART 206 VALUES('21.08.2010'),
PART 207 VALUES('24.08.2010'),
PART 208 VALUES('27.08.2010'),
PART 209 VALUES('31.08.2010'),
PART 210 VALUES('03.09.2010'),
PART 211 VALUES('06.09.2010'),
PART 212 VALUES('09.09.2010'),
PART 213 VALUES('12.09.2010'),
PART 214 VALUES('15.09.2010'),
PART 215 VALUES('18.09.2010'),
PART 216 VALUES('21.09.2010'),
PART 217 VALUES('24.09.2010'),
PART 218 VALUES('27.09.2010'),
PART 219 VALUES('30.09.2010'),
PART 220 VALUES('03.10.2010'),
PART 221 VALUES('06.10.2010'),
PART 222 VALUES('09.10.2010'),
PART 223 VALUES('12.10.2010'),
PART 224 VALUES('15.10.2010'),
PART 225 VALUES('18.10.2010'),
PART 226 VALUES('21.10.2010'),
PART 227 VALUES('24.10.2010'),
PART 228 VALUES('27.10.2010'),
PART 229 VALUES('31.10.2010'),
PART 230 VALUES('03.11.2010'),
PART 231 VALUES('06.11.2010'),
PART 232 VALUES('09.11.2010'),
PART 233 VALUES('12.11.2010'),
PART 234 VALUES('15.11.2010'),
PART 235 VALUES('18.11.2010'),
PART 236 VALUES('21.11.2010'),
PART 237 VALUES('24.11.2010'),
PART 238 VALUES('27.11.2010'),
PART 239 VALUES('30.11.2010'),
PART 240 VALUES('03.12.2010'),
PART 241 VALUES('06.12.2010'),
PART 242 VALUES('09.12.2010'),
PART 243 VALUES('12.12.2010'),
PART 244 VALUES('15.12.2010'),
PART 245 VALUES('18.12.2010'),
PART 246 VALUES('21.12.2010'),
PART 247 VALUES('24.12.2010'),
PART 248 VALUES('27.12.2010'),
PART 249 VALUES('31.12.2010'),
PART 250 VALUES('03.01.2011'),
PART 251 VALUES('06.01.2011'),
PART 252 VALUES('09.01.2011'),
PART 253 VALUES('12.01.2011'),
PART 254 VALUES('31.12.2099'));
--
LABEL ON TABLE $creator.$'$TMF'150A1 IS 'Mittelflussrechnung';
--
LABEL ON $creator.$'$TMF'150A1
(MF150019A IS 'Buchführungswährung',
MF150091 IS 'Limiten-Hierarchie',
MF150090 IS 'Limiten-Typ',
MF150089 IS 'Ort Begünstigter',
MF150088 IS 'Name Begünstigter',
MF150087 IS 'Ort Auftraggeber',
MF150086 IS 'Name Auftraggeber',
MF150085 IS 'Life-Cycle-Status',
MF150084 IS 'Relevant-Group',
MF150083 IS 'Transaction-Typ',
MF150082 IS 'Lade_Timestamp_ID',
MF150081 IS 'Preiskomponente',
MF150080 IS 'mutierbar bis',
MF150079 IS 'Depot_Uebertrag',
MF150078 IS 'Vorheriger GP-Typ',
MF150077 IS 'Bankenclearing-Nr',
MF150076 IS 'Kommentar_Status',
MF150075 IS 'Edit-Status Gesamt',
MF150074 IS 'EDIT-STATUS URHEBER',
MF150073 IS 'EDIT-STATUS GRUND',
MF150072 IS 'Edit-Status Gegenpartei',
MF150071 IS 'Prüfziffer Kundencif',
MF150070 IS 'Stammnummer Kundencif',
MF150069 IS 'Bankstelle Kundencif',
MF150068 IS 'int. Form OE Kundenbüro GP',
MF150067 IS 'int. Form OE Kundenbüro',
MF150066 IS 'int. Form OE-ID KV',
MF150065 IS 'Cif-Saldierungsdatum',
MF150064 IS 'Cif-Eröffnungsdatum',
MF150063 IS 'Mittelfluss-Identifikation',
MF150062 IS 'Coupon-Mantel',
MF150060 IS 'Erstellungstimestamp',
MF150059 IS 'Auftragslaufnummer',
MF150056 IS 'Endverfall Obligationen',
MF150055 IS 'Richtung des Mittelflusses',
MF150054 IS 'Leitweg',
MF150053 IS 'Volumen in Nominal/Stück',
MF150052 IS 'Bearbeitungscode',
MF150051 IS 'Domizil Gegenpartei',
MF150047 IS 'Buchungsart',
MF150046 IS 'eff.Depotstelle/Umbuchungskto',
MF150045 IS 'Depotstelle bzw. GFM_Laufnr.',
MF150044 IS 'Sequenz-Nummer zu Valor',
MF150043 IS 'Betrag zu Bestandeswährung',
MF150042 IS 'Bestandeswährung',
MF150041 IS 'Untergruppe Gegenpartei',
MF150040 IS 'Hauptgruppe Gegenpartei',
MF150039 IS 'Gegenpartei-Geldmarktzusatz',
MF150038 IS 'Gegenpartei-Beziehungsnummer',
MF150037 IS 'CSID Gegenpartei',
MF150036 IS 'Gegenpartei',
MF150035 IS 'Gegenpartei-Typ',
MF150034 IS 'BUID Gegenpartei',
MF150033 IS 'KundenverantwortlicheR',
MF150032 IS 'Kundenbüro Kunde',
MF150031 IS 'Kunden-Geldmarktzusatz',
MF150030 IS 'Kunden-Beziehungsnummer',
MF150029 IS 'Depotartenschlüssel',
MF150028 IS 'Kontoartenschlüssel',
MF150027 IS 'Kundendomizil',
MF150026 IS 'Kundensegment',
MF150025 IS 'Kundenart',
MF150024 IS 'PVV-Kunde',
MF150023 IS 'Cifnummer Kunde',
MF150022 IS 'BUID Kunde',
MF150021 IS 'Mutationsdatum',
MF150020 IS 'MutationsPID',
MF150019 IS 'Betrag in Buchführungswährung',
MF150018 IS 'Betrag in FWhrg',
MF150017 IS 'Valor',
MF150016 IS 'Währung',
MF150015 IS 'Urheber',
MF150014 IS 'Grund',
MF150013 IS 'Buchungsdatum',
MF150012 IS 'Bewegungsverdichtung',
MF150011 IS 'Produkteklassifizierung',
MF150010 IS 'MF-Produkt',
MF150009 IS 'Produktenr.Prok/Textcode Hypo',
MF150008 IS 'Bewegungsart Depot/Edelmetall',
MF150007 IS 'zu bewerten',
MF150006 IS 'nachzuerfassen',
MF150005 IS 'Storno',
MF150004 IS 'Auftragsnummer',
MF150003 IS 'Lieferantentyp',
MF150002 IS 'RZ-Herkunft',
MF150001 IS 'ID Mittelfluss (UUID)');
--
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.$'$IMF'150A0 On $creator.$'$TMF'150A1
------------------------------------------------------------------------
--
CREATE UNIQUE INDEX $creator.$'$IMF'150A0
ON $creator.$'$TMF'150A1
(MF150001 ASC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.$'$IMF'150A1 On $creator.$'$TMF'150A1
------------------------------------------------------------------------
--
CREATE INDEX $creator.$'$IMF'150A1
ON $creator.$'$TMF'150A1
(MF150013 ASC,
MF150067 ASC)
PARTITIONED
USING STOGROUP GSMS
CLUSTER
(PART 1,
PART 2,
PART 3,
PART 4,
PART 5,
PART 6,
PART 7,
PART 8,
PART 9,
PART 10,
PART 11,
PART 12,
PART 13,
PART 14,
PART 15,
PART 16,
PART 17,
PART 18,
PART 19,
PART 20,
PART 21,
PART 22,
PART 23,
PART 24,
PART 25,
PART 26,
PART 27,
PART 28,
PART 29,
PART 30,
PART 31,
PART 32,
PART 33,
PART 34,
PART 35,
PART 36,
PART 37,
PART 38,
PART 39,
PART 40,
PART 41,
PART 42,
PART 43,
PART 44,
PART 45,
PART 46,
PART 47,
PART 48,
PART 49,
PART 50,
PART 51,
PART 52,
PART 53,
PART 54,
PART 55,
PART 56,
PART 57,
PART 58,
PART 59,
PART 60,
PART 61,
PART 62,
PART 63,
PART 64,
PART 65,
PART 66,
PART 67,
PART 68,
PART 69,
PART 70,
PART 71,
PART 72,
PART 73,
PART 74,
PART 75,
PART 76,
PART 77,
PART 78,
PART 79,
PART 80,
PART 81,
PART 82,
PART 83,
PART 84,
PART 85,
PART 86,
PART 87,
PART 88,
PART 89,
PART 90,
PART 91,
PART 92,
PART 93,
PART 94,
PART 95,
PART 96,
PART 97,
PART 98,
PART 99,
PART 100,
PART 101,
PART 102,
PART 103,
PART 104,
PART 105,
PART 106,
PART 107,
PART 108,
PART 109,
PART 110,
PART 111,
PART 112,
PART 113,
PART 114,
PART 115,
PART 116,
PART 117,
PART 118,
PART 119,
PART 120,
PART 121,
PART 122,
PART 123,
PART 124,
PART 125,
PART 126,
PART 127,
PART 128,
PART 129,
PART 130,
PART 131,
PART 132,
PART 133,
PART 134,
PART 135,
PART 136,
PART 137,
PART 138,
PART 139,
PART 140,
PART 141,
PART 142,
PART 143,
PART 144,
PART 145,
PART 146,
PART 147,
PART 148,
PART 149,
PART 150,
PART 151,
PART 152,
PART 153,
PART 154,
PART 155,
PART 156,
PART 157,
PART 158,
PART 159,
PART 160,
PART 161,
PART 162,
PART 163,
PART 164,
PART 165,
PART 166,
PART 167,
PART 168,
PART 169,
PART 170,
PART 171,
PART 172,
PART 173,
PART 174,
PART 175,
PART 176,
PART 177,
PART 178,
PART 179,
PART 180,
PART 181,
PART 182,
PART 183,
PART 184,
PART 185,
PART 186,
PART 187,
PART 188,
PART 189,
PART 190,
PART 191,
PART 192,
PART 193,
PART 194,
PART 195,
PART 196,
PART 197,
PART 198,
PART 199,
PART 200,
PART 201,
PART 202,
PART 203,
PART 204,
PART 205,
PART 206,
PART 207,
PART 208,
PART 209,
PART 210,
PART 211,
PART 212,
PART 213,
PART 214,
PART 215,
PART 216,
PART 217,
PART 218,
PART 219,
PART 220,
PART 221,
PART 222,
PART 223,
PART 224,
PART 225,
PART 226,
PART 227,
PART 228,
PART 229,
PART 230,
PART 231,
PART 232,
PART 233,
PART 234,
PART 235,
PART 236,
PART 237,
PART 238,
PART 239,
PART 240,
PART 241,
PART 242,
PART 243,
PART 244,
PART 245,
PART 246,
PART 247,
PART 248,
PART 249,
PART 250,
PART 251,
PART 252,
PART 253,
PART 254)
BUFFERPOOL BP1
CLOSE NO;
--
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.$'$IMF'150A2 On $creator.$'$TMF'150A1
------------------------------------------------------------------------
--
CREATE INDEX $creator.$'$IMF'150A2
ON $creator.$'$TMF'150A1
(MF150023 ASC,
MF150013 DESC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.$'$IMF'150A3 On $creator.$'$TMF'150A1
------------------------------------------------------------------------
--
CREATE INDEX $creator.$'$IMF'150A3
ON $creator.$'$TMF'150A1
(MF150066 ASC,
MF150013 DESC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.$'$IMF'150A4 On $creator.$'$TMF'150A1
------------------------------------------------------------------------
--
CREATE INDEX $creator.$'$IMF'150A4
ON $creator.$'$TMF'150A1
(MF150067 ASC,
MF150013 DESC,
MF150019 DESC,
MF150066 DESC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 4 G;
--
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.$'$IMF'150A5 On $creator.$'$TMF'150A1
------------------------------------------------------------------------
--
CREATE UNIQUE INDEX $creator.$'$IMF'150A5
ON $creator.$'$TMF'150A1
(MF150004 ASC,
MF150059 ASC,
MF150005 ASC,
MF150013 ASC,
MF150023 ASC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.$'$IMF'150A6 On $creator.$'$TMF'150A1
------------------------------------------------------------------------
--
CREATE INDEX $creator.$'$IMF'150A6
ON $creator.$'$TMF'150A1
(MF150085 ASC,
MF150084 ASC,
MF150060 ASC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.$'$IMF'150A7 On $creator.$'$TMF'150A1
------------------------------------------------------------------------
--
CREATE INDEX $creator.$'$IMF'150A7
ON $creator.$'$TMF'150A1
(MF150084 ASC,
MF150085 ASC,
MF150022 ASC,
MF150023 ASC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.$'$IMF'150A8 On $creator.$'$TMF'150A1
------------------------------------------------------------------------
--
CREATE UNIQUE INDEX $creator.$'$IMF'150A8
ON $creator.$'$TMF'150A1
(MF150023 ASC,
MF150013 ASC,
MF150001 ASC,
MF150019 ASC,
MF150083 ASC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
COMMIT;
$! else if $phase = 2 then $@=¢
insert into $creator.$'$TMF'150A1
select * from oa1a.tmf150a1
where MF150013 = '13.10.2009'
fetch first 1000 rows only
;
commit
;
$! else if $phase = 3 then $@=¢
$*(
alter TABLE $creator.$'$TMF'150A1
add MF150HASH smallInt not null with default -9999;
$*)
drop trigger $creator.$'$TMF'150A1Ins ;
drop trigger $creator.$'$TMF'150A1Upd ;
create trigger $creator.$'$TMF'150A1Ins no cascade before insert
on $creator.$'$TMF'150A1 referencing New as n
for each row mode db2sql
set MF150HASH =
smallint(mod(
month(n.MF150013) * 100000
+ int(translate(
translate('08642', hex(substr(n.MF150023, 8,5)), '1234567890')
, '024579', 'ABCDEF'))
, 11047))
;
create trigger $creator.$'$TMF'150A1Upd no cascade before
update of MF150013, MF150023, MF150HASH
on $creator.$'$TMF'150A1 referencing New as N
for each row mode db2sql
set MF150HASH =
smallint(mod(
month(n.MF150013) * 100000
+ int(translate(
translate('08642', hex(substr(n.MF150023, 8,5)), '1234567890')
, '024579', 'ABCDEF'))
, 11047))
;
commit;
$! else if $phase = 4 then $@=¢
insert into $creator.$'$TMF'150A1
select t.*, -8888 from oa1a.tmf150a1 t
where MF150013 = '12.10.2009'
fetch first 1000 rows only
;
commit
;
$! else if $phase = 5 then $@=¢
update $creator.$'$TMF'150A1
set MF150013 = MF150013;
commit;
$! else if $phase = 99 then $@=¢
drop view $creator.$'$VMF'150FformOa1a ;
CREATE view $creator.$'$VMF'150FromOa1a as
( select t.*,
smallint(mod(int(
translate(translate('08642'
, hex(substr( mf150023, 8,5)), '1234567890')
, '024579', 'ABCDEF')
), 11113)) mf150Hash
from oa1a.tmf150a1 t
)
;
commit;
$!
$!
}¢--- DSN.TX.CASE(MFNVY) cre=2010-04-30 mod=2010-04-30-17.48.48 A540769 --------
credb trg 1
+ ok creDb A540769.TX.GENF(MFNVYt1) ::f
}¢--- DSN.TX.CASE(MFNVYDDL) cre=2010-04-30 mod=2010-04-30-17.45.57 A540769 -----
SET CURRENT SQLID='S100447';
DROP TABLESPACE $db.A150A;
commit;
CREATE TABLESPACE A150A
IN $db
USING STOGROUP GSMS
FREEPAGE 30 PCTFREE 10
DSSIZE 32 G
NUMPARTS 100
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX 30000
CLOSE NO
COMPRESS YES
LOCKPART YES;
COMMIT;
--
------------------------------------------------------------------------
-- Table=$creator.$'$TMF'150A1 In $db.A150A
------------------------------------------------------------------------
--
SET CURRENT SCHEMA='$creator';
--
CREATE TABLE $creator.$'$TMF'150A1
(MF150001 CHAR(16) NOT NULL WITH DEFAULT,
MF150002 CHAR(1) NOT NULL WITH DEFAULT,
MF150003 CHAR(5) NOT NULL WITH DEFAULT,
MF150004 CHAR(25) NOT NULL WITH DEFAULT,
MF150005 CHAR(1) NOT NULL WITH DEFAULT,
MF150006 CHAR(1) NOT NULL WITH DEFAULT,
MF150007 CHAR(1) NOT NULL WITH DEFAULT,
MF150008 CHAR(3) NOT NULL WITH DEFAULT,
MF150009 CHAR(5) NOT NULL WITH DEFAULT,
MF150010 CHAR(4) NOT NULL WITH DEFAULT,
MF150011 CHAR(1) NOT NULL WITH DEFAULT,
MF150012 CHAR(1) NOT NULL WITH DEFAULT,
MF150013 DATE NOT NULL WITH DEFAULT,
MF150014 CHAR(4) NOT NULL WITH DEFAULT,
MF150015 CHAR(4) NOT NULL WITH DEFAULT,
MF150016 CHAR(4) NOT NULL WITH DEFAULT,
MF150017 CHAR(12) NOT NULL WITH DEFAULT,
MF150018 DECIMAL(15, 3) NOT NULL WITH DEFAULT,
MF150019 DECIMAL(15, 3) NOT NULL WITH DEFAULT,
MF150020 CHAR(8) NOT NULL WITH DEFAULT,
MF150021 TIMESTAMP NOT NULL WITH DEFAULT,
MF150022 CHAR(4) NOT NULL WITH DEFAULT,
MF150023 CHAR(12) NOT NULL WITH DEFAULT,
MF150024 CHAR(1) NOT NULL WITH DEFAULT,
MF150025 CHAR(3) NOT NULL WITH DEFAULT,
MF150026 CHAR(3) NOT NULL WITH DEFAULT,
MF150027 CHAR(3) NOT NULL WITH DEFAULT,
MF150028 CHAR(3) NOT NULL WITH DEFAULT,
MF150029 CHAR(3) NOT NULL WITH DEFAULT,
MF150030 CHAR(16) NOT NULL WITH DEFAULT,
MF150031 CHAR(2) NOT NULL WITH DEFAULT,
MF150032 CHAR(7) NOT NULL WITH DEFAULT,
MF150033 CHAR(7) NOT NULL WITH DEFAULT,
MF150034 CHAR(4) NOT NULL WITH DEFAULT,
MF150035 CHAR(1) NOT NULL WITH DEFAULT,
MF150036 CHAR(18) NOT NULL WITH DEFAULT,
MF150037 DECIMAL(15, 0) NOT NULL WITH DEFAULT,
MF150038 CHAR(16) NOT NULL WITH DEFAULT,
MF150039 CHAR(2) NOT NULL WITH DEFAULT,
MF150040 CHAR(2) NOT NULL WITH DEFAULT,
MF150041 CHAR(2) NOT NULL WITH DEFAULT,
MF150042 CHAR(4) NOT NULL WITH DEFAULT,
MF150043 DECIMAL(15, 3) NOT NULL WITH DEFAULT,
MF150044 CHAR(5) NOT NULL WITH DEFAULT,
MF150045 CHAR(4) NOT NULL WITH DEFAULT,
MF150046 CHAR(4) NOT NULL WITH DEFAULT,
MF150047 CHAR(1) NOT NULL WITH DEFAULT,
MF150051 CHAR(3) NOT NULL WITH DEFAULT,
MF150052 CHAR(3) NOT NULL WITH DEFAULT,
MF150053 DECIMAL(15, 3) NOT NULL WITH DEFAULT,
MF150054 CHAR(7) NOT NULL WITH DEFAULT,
MF150055 CHAR(1) NOT NULL WITH DEFAULT,
MF150056 CHAR(8) NOT NULL WITH DEFAULT,
MF150059 CHAR(5) NOT NULL WITH DEFAULT,
MF150060 TIMESTAMP NOT NULL WITH DEFAULT,
MF150062 CHAR(1) NOT NULL WITH DEFAULT,
MF150063 CHAR(1) NOT NULL WITH DEFAULT,
MF150064 DATE NOT NULL WITH DEFAULT,
MF150065 DATE NOT NULL WITH DEFAULT,
MF150066 CHAR(16) NOT NULL WITH DEFAULT,
MF150067 CHAR(16) NOT NULL WITH DEFAULT,
MF150068 CHAR(16) NOT NULL WITH DEFAULT,
MF150069 CHAR(4) NOT NULL WITH DEFAULT,
MF150070 CHAR(7) NOT NULL WITH DEFAULT,
MF150071 CHAR(1) NOT NULL WITH DEFAULT,
MF150072 CHAR(1) NOT NULL WITH DEFAULT,
MF150073 CHAR(1) NOT NULL WITH DEFAULT,
MF150074 CHAR(1) NOT NULL WITH DEFAULT,
MF150075 CHAR(1) NOT NULL WITH DEFAULT,
MF150076 CHAR(1) NOT NULL WITH DEFAULT,
MF150077 CHAR(6) NOT NULL WITH DEFAULT,
MF150078 CHAR(1) NOT NULL WITH DEFAULT,
MF150079 CHAR(1) NOT NULL WITH DEFAULT,
MF150080 DATE NOT NULL WITH DEFAULT,
MF150081 CHAR(5) NOT NULL WITH DEFAULT,
MF150082 CHAR(26) NOT NULL WITH DEFAULT,
MF150083 SMALLINT NOT NULL WITH DEFAULT,
MF150084 SMALLINT NOT NULL WITH DEFAULT,
MF150085 SMALLINT NOT NULL WITH DEFAULT,
MF150086 CHAR(35) NOT NULL WITH DEFAULT,
MF150087 CHAR(35) NOT NULL WITH DEFAULT,
MF150088 CHAR(35) NOT NULL WITH DEFAULT,
MF150089 CHAR(35) NOT NULL WITH DEFAULT,
MF150090 SMALLINT NOT NULL WITH DEFAULT,
MF150091 SMALLINT NOT NULL WITH DEFAULT,
MF150092 CHAR(16) NOT NULL WITH DEFAULT,
MF150019A CHAR(4) NOT NULL WITH DEFAULT '0010',
MF150HASH SMALLINT NOT NULL,
CONSTRAINT MF150001
PRIMARY KEY (MF150001))
IN $db.A150A
PARTITION BY (MF150HASH ASC)
(
part 1 values ( 105),
part 2 values ( 224),
part 3 values ( 340),
part 4 values ( 432),
part 5 values ( 554),
part 6 values ( 656),
part 7 values ( 770),
part 8 values ( 892),
part 9 values ( 991),
part 10 values ( 1115),
part 11 values ( 1211),
part 12 values ( 1315),
part 13 values ( 1435),
part 14 values ( 1524),
part 15 values ( 1651),
part 16 values ( 1751),
part 17 values ( 1867),
part 18 values ( 1988),
part 19 values ( 2079),
part 20 values ( 2153),
part 21 values ( 2273),
part 22 values ( 2367),
part 23 values ( 2492),
part 24 values ( 2609),
part 25 values ( 2675),
part 26 values ( 2795),
part 27 values ( 2901),
part 28 values ( 3015),
part 29 values ( 3134),
part 30 values ( 3233),
part 31 values ( 3311),
part 32 values ( 3432),
part 33 values ( 3538),
part 34 values ( 3659),
part 35 values ( 3770),
part 36 values ( 3845),
part 37 values ( 3966),
part 38 values ( 4075),
part 39 values ( 4191),
part 40 values ( 4311),
part 41 values ( 4417),
part 42 values ( 4542),
part 43 values ( 4651),
part 44 values ( 4763),
part 45 values ( 4879),
part 46 values ( 4983),
part 47 values ( 5105),
part 48 values ( 5214),
part 49 values ( 5333),
part 50 values ( 5457),
part 51 values ( 5566),
part 52 values ( 5691),
part 53 values ( 5802),
part 54 values ( 5918),
part 55 values ( 6034),
part 56 values ( 6149),
part 57 values ( 6273),
part 58 values ( 6385),
part 59 values ( 6505),
part 60 values ( 6608),
part 61 values ( 6720),
part 62 values ( 6844),
part 63 values ( 6956),
part 64 values ( 7070),
part 65 values ( 7179),
part 66 values ( 7295),
part 67 values ( 7420),
part 68 values ( 7540),
part 69 values ( 7650),
part 70 values ( 7749),
part 71 values ( 7862),
part 72 values ( 7989),
part 73 values ( 8119),
part 74 values ( 8225),
part 75 values ( 8332),
part 76 values ( 8447),
part 77 values ( 8531),
part 78 values ( 8659),
part 79 values ( 8778),
part 80 values ( 8889),
part 81 values ( 9011),
part 82 values ( 9088),
part 83 values ( 9216),
part 84 values ( 9340),
part 85 values ( 9444),
part 86 values ( 9562),
part 87 values ( 9664),
part 88 values ( 9733),
part 89 values ( 9862),
part 90 values ( 9971),
part 91 values (10084),
part 92 values (10206),
part 93 values (10269),
part 94 values (10396),
part 95 values (10512),
part 96 values (10620),
part 97 values (10747),
part 98 values (10843),
part 99 values (10971),
part 100 values (11046)
)
;
--
LABEL ON TABLE $creator.$'$TMF'150A1 IS 'Mittelflussrechnung';
--
LABEL ON $creator.$'$TMF'150A1
(MF150HASH IS 'PartitionierungsHash',
MF150019A IS 'Buchführungswährung',
MF150091 IS 'Limiten-Hierarchie',
MF150090 IS 'Limiten-Typ',
MF150089 IS 'Ort Begünstigter',
MF150088 IS 'Name Begünstigter',
MF150087 IS 'Ort Auftraggeber',
MF150086 IS 'Name Auftraggeber',
MF150085 IS 'Life-Cycle-Status',
MF150084 IS 'Relevant-Group',
MF150083 IS 'Transaction-Typ',
MF150082 IS 'Lade_Timestamp_ID',
MF150081 IS 'Preiskomponente',
MF150080 IS 'mutierbar bis',
MF150079 IS 'Depot_Uebertrag',
MF150078 IS 'Vorheriger GP-Typ',
MF150077 IS 'Bankenclearing-Nr',
MF150076 IS 'Kommentar_Status',
MF150075 IS 'Edit-Status Gesamt',
MF150074 IS 'EDIT-STATUS URHEBER',
MF150073 IS 'EDIT-STATUS GRUND',
MF150072 IS 'Edit-Status Gegenpartei',
MF150071 IS 'Prüfziffer Kundencif',
MF150070 IS 'Stammnummer Kundencif',
MF150069 IS 'Bankstelle Kundencif',
MF150068 IS 'int. Form OE Kundenbüro GP',
MF150067 IS 'int. Form OE Kundenbüro',
MF150066 IS 'int. Form OE-ID KV',
MF150065 IS 'Cif-Saldierungsdatum',
MF150064 IS 'Cif-Eröffnungsdatum',
MF150063 IS 'Mittelfluss-Identifikation',
MF150062 IS 'Coupon-Mantel',
MF150060 IS 'Erstellungstimestamp',
MF150059 IS 'Auftragslaufnummer',
MF150056 IS 'Endverfall Obligationen',
MF150055 IS 'Richtung des Mittelflusses',
MF150054 IS 'Leitweg',
MF150053 IS 'Volumen in Nominal/Stück',
MF150052 IS 'Bearbeitungscode',
MF150051 IS 'Domizil Gegenpartei',
MF150047 IS 'Buchungsart',
MF150046 IS 'eff.Depotstelle/Umbuchungskto',
MF150045 IS 'Depotstelle bzw. GFM_Laufnr.',
MF150044 IS 'Sequenz-Nummer zu Valor',
MF150043 IS 'Betrag zu Bestandeswährung',
MF150042 IS 'Bestandeswährung',
MF150041 IS 'Untergruppe Gegenpartei',
MF150040 IS 'Hauptgruppe Gegenpartei',
MF150039 IS 'Gegenpartei-Geldmarktzusatz',
MF150038 IS 'Gegenpartei-Beziehungsnummer',
MF150037 IS 'CSID Gegenpartei',
MF150036 IS 'Gegenpartei',
MF150035 IS 'Gegenpartei-Typ',
MF150034 IS 'BUID Gegenpartei',
MF150033 IS 'KundenverantwortlicheR',
MF150032 IS 'Kundenbüro Kunde',
MF150031 IS 'Kunden-Geldmarktzusatz',
MF150030 IS 'Kunden-Beziehungsnummer',
MF150029 IS 'Depotartenschlüssel',
MF150028 IS 'Kontoartenschlüssel',
MF150027 IS 'Kundendomizil',
MF150026 IS 'Kundensegment',
MF150025 IS 'Kundenart',
MF150024 IS 'PVV-Kunde',
MF150023 IS 'Cifnummer Kunde',
MF150022 IS 'BUID Kunde',
MF150021 IS 'Mutationsdatum',
MF150020 IS 'MutationsPID',
MF150019 IS 'Betrag in Buchführungswährung',
MF150018 IS 'Betrag in FWhrg',
MF150017 IS 'Valor',
MF150016 IS 'Währung',
MF150015 IS 'Urheber',
MF150014 IS 'Grund',
MF150013 IS 'Buchungsdatum',
MF150012 IS 'Bewegungsverdichtung',
MF150011 IS 'Produkteklassifizierung',
MF150010 IS 'MF-Produkt',
MF150009 IS 'Produktenr.Prok/Textcode Hypo',
MF150008 IS 'Bewegungsart Depot/Edelmetall',
MF150007 IS 'zu bewerten',
MF150006 IS 'nachzuerfassen',
MF150005 IS 'Storno',
MF150004 IS 'Auftragsnummer',
MF150003 IS 'Lieferantentyp',
MF150002 IS 'RZ-Herkunft',
MF150001 IS 'ID Mittelfluss (UUID)');
commit;
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.$'$IMF' $creator.$'$TMF'150A1
------------------------------------------------------------------------
--
CREATE UNIQUE INDEX $creator.$'$IMF'150A0
ON $creator.$'$TMF'150A1
(MF150001 ASC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.$'$IMF'150A1 On $creator.$'$TMF'150A1
------------------------------------------------------------------------
--
CREATE INDEX $creator.$'$IMF'150A1
ON $creator.$'$TMF'150A1
(MF150013 ASC,
MF150067 ASC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.$'$IMF'150A2 On $creator.$'$TMF'150A1
------------------------------------------------------------------------
--
CREATE INDEX $creator.$'$IMF'150A2
ON $creator.$'$TMF'150A1
(MF150023 ASC,
MF150013 DESC)
USING STOGROUP GSMS
CLUSTER
BUFFERPOOL BP1
CLOSE NO
;
--
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.$'$IMF'150A3 On $creator.$'$TMF'150A1
------------------------------------------------------------------------
--
CREATE INDEX $creator.$'$IMF'150A3
ON $creator.$'$TMF'150A1
(MF150066 ASC,
MF150013 DESC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.$'$IMF'150A4 On $creator.$'$TMF'150A1
------------------------------------------------------------------------
--
CREATE INDEX $creator.$'$IMF'150A4
ON $creator.$'$TMF'150A1
(MF150067 ASC,
MF150013 DESC,
MF150019 DESC,
MF150066 DESC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 4 G;
--
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.$'$IMF'150A5 On $creator.$'$TMF'150A1
------------------------------------------------------------------------
--
CREATE UNIQUE INDEX $creator.$'$IMF'150A5
ON $creator.$'$TMF'150A1
(MF150004 ASC,
MF150059 ASC,
MF150005 ASC,
MF150013 ASC,
MF150023 ASC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.$'$IMF'150A6 On $creator.$'$TMF'150A1
------------------------------------------------------------------------
--
CREATE INDEX $creator.$'$IMF'150A6
ON $creator.$'$TMF'150A1
(MF150085 ASC,
MF150084 ASC,
MF150060 ASC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.$'$IMF'150A7 On $creator.$'$TMF'150A1
------------------------------------------------------------------------
--
CREATE INDEX $creator.$'$IMF'150A7
ON $creator.$'$TMF'150A1
(MF150084 ASC,
MF150085 ASC,
MF150022 ASC,
MF150023 ASC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.$'$IMF'150A8 On $creator.$'$TMF'150A1
------------------------------------------------------------------------
--
CREATE UNIQUE INDEX $creator.$'$IMF'150A8
ON $creator.$'$TMF'150A1
(MF150023 ASC,
MF150013 ASC,
MF150001 ASC,
MF150019 ASC,
MF150083 ASC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
COMMIT;
--
--
--drop trigger $creator.$'$TMF'150A1Ins ;
--drop trigger $creator.$'$TMF'150A1Upd ;
create trigger $creator.$'$TMF'150A1Ins no cascade before insert
on $creator.$'$TMF'150A1 referencing New as n
for each row mode db2sql
set MF150HASH =
smallint(mod(
month(n.MF150013) * 100000
+ int(translate(
translate('08642', hex(substr(n.MF150023, 8,5)), '1234567890')
, '024579', 'ABCDEF'))
, 11047))
;
create trigger $creator.$'$TMF'150A1Upd no cascade before
update of MF150013, MF150023, MF150HASH
on $creator.$'$TMF'150A1 referencing New as N
for each row mode db2sql
set MF150HASH =
smallint(mod(
month(n.MF150013) * 100000
+ int(translate(
translate('08642', hex(substr(n.MF150023, 8,5)), '1234567890')
, '024579', 'ABCDEF'))
, 11047))
;
COMMIT;
}¢--- DSN.TX.CASE(MFNVYICS) cre=2010-04-30 mod=2010-05-12-16.57.11 A540769 -----
$<A540769.TX.CASE(MFNVYPAR)
cn=0
pFr = 1
$@for pLi $@¢
parse value $pLi with 'part' pa 'values' . '(' va ')'
cn = cn+1
if cn <> pa then
call err 'cnt' cn 'but pa' pa
m.part.cn = right(strip(va), 5, 0)
if cn // 5 = 0 then $@¢
$$- pFr cn
say 'vvv' pFr cn
pFr = cn+1
$!
$!
if cn // 5 <> 0 then
$$- pFr cn
$|
$@for jLi $@¢
parse value $jLi with pFr pTo
$= pTo =- right(pTo, 3, 0)
say pFr m.part.pFr '-' pTo $pTo m.part.pTo
$@=¢
//job $pTo
//SORT EXEC PGM=ICETOOL,PARM='SIZE(MAX)'
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP$pTo.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP$pTo.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP$pTo.LOA
$!
$@do px=pFr to $pTo $@=¢
$=px=- right(px, 3, 0)
//OUT$px DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N$px.SRT
$!
$@=¢
//DFSMSG DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//TOOLIN DD *
SORT FROM(IN) USING(SOSP)
//SOSPCNTL DD *
SORT FIELDS=(1,1,CH,A,2,5,CH,D)
OUTFIL FNAMES=OUT1,INCLUDE=(1,1,CH,LE,C'f')
OUTFIL FNAMES=OUT2,INCLUDE=(1,1,CH,GT,C'f',AND,1,1,CH,LE,C'n')
OUTFIL FNAMES=OUT3,INCLUDE=(1,1,CH,GT,C'n')
$!
$@do px=pFr to $pTo $@=¢
$=va=- right(m.part.px, 5, 0)
$=px=- right(px, 3, 0)
part $px value $va
$!
$!
$#end
m.part.0 = cn
do y=1 to m.part.0
say y m.part.y
end
$#out 20100512 16:55:25
//job 005
//SORT EXEC PGM=ICETOOL,PARM='SIZE(MAX)'
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP005.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP005.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP005.LOA
//OUT001 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N001.SRT
//OUT002 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N002.SRT
//OUT003 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N003.SRT
//OUT004 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N004.SRT
//OUT005 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N005.SRT
//DFSMSG DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//TOOLIN DD *
SORT FROM(IN) USING(SOSP)
//SOSPCNTL DD *
SORT FIELDS=(1,1,CH,A,2,5,CH,D)
OUTFIL FNAMES=OUT1,INCLUDE=(1,1,CH,LE,C'f')
OUTFIL FNAMES=OUT2,INCLUDE=(1,1,CH,GT,C'f',AND,1,1,CH,LE,C'n')
OUTFIL FNAMES=OUT3,INCLUDE=(1,1,CH,GT,C'n')
part 001 value 00105
part 002 value 00224
part 003 value 00340
part 004 value 00432
part 005 value 00554
//job 010
//SORT EXEC PGM=ICETOOL,PARM='SIZE(MAX)'
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP010.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP010.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP010.LOA
//OUT006 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N006.SRT
//OUT007 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N007.SRT
//OUT008 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N008.SRT
//OUT009 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N009.SRT
//OUT010 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N010.SRT
//DFSMSG DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//TOOLIN DD *
SORT FROM(IN) USING(SOSP)
//SOSPCNTL DD *
SORT FIELDS=(1,1,CH,A,2,5,CH,D)
OUTFIL FNAMES=OUT1,INCLUDE=(1,1,CH,LE,C'f')
OUTFIL FNAMES=OUT2,INCLUDE=(1,1,CH,GT,C'f',AND,1,1,CH,LE,C'n')
OUTFIL FNAMES=OUT3,INCLUDE=(1,1,CH,GT,C'n')
part 006 value 00656
part 007 value 00770
part 008 value 00892
part 009 value 00991
part 010 value 01115
//job 015
//SORT EXEC PGM=ICETOOL,PARM='SIZE(MAX)'
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP015.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP015.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP015.LOA
//OUT011 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N011.SRT
//OUT012 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N012.SRT
//OUT013 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N013.SRT
//OUT014 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N014.SRT
//OUT015 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N015.SRT
//DFSMSG DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//TOOLIN DD *
SORT FROM(IN) USING(SOSP)
//SOSPCNTL DD *
SORT FIELDS=(1,1,CH,A,2,5,CH,D)
OUTFIL FNAMES=OUT1,INCLUDE=(1,1,CH,LE,C'f')
OUTFIL FNAMES=OUT2,INCLUDE=(1,1,CH,GT,C'f',AND,1,1,CH,LE,C'n')
OUTFIL FNAMES=OUT3,INCLUDE=(1,1,CH,GT,C'n')
part 011 value 01211
part 012 value 01315
part 013 value 01435
part 014 value 01524
part 015 value 01651
//job 020
//SORT EXEC PGM=ICETOOL,PARM='SIZE(MAX)'
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP020.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP020.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP020.LOA
//OUT016 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N016.SRT
//OUT017 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N017.SRT
//OUT018 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N018.SRT
//OUT019 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N019.SRT
//OUT020 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N020.SRT
//DFSMSG DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//TOOLIN DD *
SORT FROM(IN) USING(SOSP)
//SOSPCNTL DD *
SORT FIELDS=(1,1,CH,A,2,5,CH,D)
OUTFIL FNAMES=OUT1,INCLUDE=(1,1,CH,LE,C'f')
OUTFIL FNAMES=OUT2,INCLUDE=(1,1,CH,GT,C'f',AND,1,1,CH,LE,C'n')
OUTFIL FNAMES=OUT3,INCLUDE=(1,1,CH,GT,C'n')
part 016 value 01751
part 017 value 01867
part 018 value 01988
part 019 value 02079
part 020 value 02153
//job 025
//SORT EXEC PGM=ICETOOL,PARM='SIZE(MAX)'
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP025.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP025.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP025.LOA
//OUT021 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N021.SRT
//OUT022 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N022.SRT
//OUT023 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N023.SRT
//OUT024 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N024.SRT
//OUT025 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N025.SRT
//DFSMSG DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//TOOLIN DD *
SORT FROM(IN) USING(SOSP)
//SOSPCNTL DD *
SORT FIELDS=(1,1,CH,A,2,5,CH,D)
OUTFIL FNAMES=OUT1,INCLUDE=(1,1,CH,LE,C'f')
OUTFIL FNAMES=OUT2,INCLUDE=(1,1,CH,GT,C'f',AND,1,1,CH,LE,C'n')
OUTFIL FNAMES=OUT3,INCLUDE=(1,1,CH,GT,C'n')
part 021 value 02273
part 022 value 02367
part 023 value 02492
part 024 value 02609
part 025 value 02675
//job 030
//SORT EXEC PGM=ICETOOL,PARM='SIZE(MAX)'
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP030.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP030.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP030.LOA
//OUT026 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N026.SRT
//OUT027 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N027.SRT
//OUT028 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N028.SRT
//OUT029 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N029.SRT
//OUT030 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N030.SRT
//DFSMSG DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//TOOLIN DD *
SORT FROM(IN) USING(SOSP)
//SOSPCNTL DD *
SORT FIELDS=(1,1,CH,A,2,5,CH,D)
OUTFIL FNAMES=OUT1,INCLUDE=(1,1,CH,LE,C'f')
OUTFIL FNAMES=OUT2,INCLUDE=(1,1,CH,GT,C'f',AND,1,1,CH,LE,C'n')
OUTFIL FNAMES=OUT3,INCLUDE=(1,1,CH,GT,C'n')
part 026 value 02795
part 027 value 02901
part 028 value 03015
part 029 value 03134
part 030 value 03233
//job 035
//SORT EXEC PGM=ICETOOL,PARM='SIZE(MAX)'
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP035.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP035.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP035.LOA
//OUT031 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N031.SRT
//OUT032 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N032.SRT
//OUT033 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N033.SRT
//OUT034 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N034.SRT
//OUT035 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N035.SRT
//DFSMSG DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//TOOLIN DD *
SORT FROM(IN) USING(SOSP)
//SOSPCNTL DD *
SORT FIELDS=(1,1,CH,A,2,5,CH,D)
OUTFIL FNAMES=OUT1,INCLUDE=(1,1,CH,LE,C'f')
OUTFIL FNAMES=OUT2,INCLUDE=(1,1,CH,GT,C'f',AND,1,1,CH,LE,C'n')
OUTFIL FNAMES=OUT3,INCLUDE=(1,1,CH,GT,C'n')
part 031 value 03311
part 032 value 03432
part 033 value 03538
part 034 value 03659
part 035 value 03770
//job 040
//SORT EXEC PGM=ICETOOL,PARM='SIZE(MAX)'
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP040.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP040.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP040.LOA
//OUT036 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N036.SRT
//OUT037 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N037.SRT
//OUT038 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N038.SRT
//OUT039 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N039.SRT
//OUT040 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N040.SRT
//DFSMSG DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//TOOLIN DD *
SORT FROM(IN) USING(SOSP)
//SOSPCNTL DD *
SORT FIELDS=(1,1,CH,A,2,5,CH,D)
OUTFIL FNAMES=OUT1,INCLUDE=(1,1,CH,LE,C'f')
OUTFIL FNAMES=OUT2,INCLUDE=(1,1,CH,GT,C'f',AND,1,1,CH,LE,C'n')
OUTFIL FNAMES=OUT3,INCLUDE=(1,1,CH,GT,C'n')
part 036 value 03845
part 037 value 03966
part 038 value 04075
part 039 value 04191
part 040 value 04311
//job 045
//SORT EXEC PGM=ICETOOL,PARM='SIZE(MAX)'
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP045.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP045.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP045.LOA
//OUT041 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N041.SRT
//OUT042 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N042.SRT
//OUT043 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N043.SRT
//OUT044 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N044.SRT
//OUT045 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N045.SRT
//DFSMSG DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//TOOLIN DD *
SORT FROM(IN) USING(SOSP)
//SOSPCNTL DD *
SORT FIELDS=(1,1,CH,A,2,5,CH,D)
OUTFIL FNAMES=OUT1,INCLUDE=(1,1,CH,LE,C'f')
OUTFIL FNAMES=OUT2,INCLUDE=(1,1,CH,GT,C'f',AND,1,1,CH,LE,C'n')
OUTFIL FNAMES=OUT3,INCLUDE=(1,1,CH,GT,C'n')
part 041 value 04417
part 042 value 04542
part 043 value 04651
part 044 value 04763
part 045 value 04879
//job 050
//SORT EXEC PGM=ICETOOL,PARM='SIZE(MAX)'
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP050.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP050.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP050.LOA
//OUT046 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N046.SRT
//OUT047 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N047.SRT
//OUT048 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N048.SRT
//OUT049 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N049.SRT
//OUT050 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N050.SRT
//DFSMSG DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//TOOLIN DD *
SORT FROM(IN) USING(SOSP)
//SOSPCNTL DD *
SORT FIELDS=(1,1,CH,A,2,5,CH,D)
OUTFIL FNAMES=OUT1,INCLUDE=(1,1,CH,LE,C'f')
OUTFIL FNAMES=OUT2,INCLUDE=(1,1,CH,GT,C'f',AND,1,1,CH,LE,C'n')
OUTFIL FNAMES=OUT3,INCLUDE=(1,1,CH,GT,C'n')
part 046 value 04983
part 047 value 05105
part 048 value 05214
part 049 value 05333
part 050 value 05457
//job 055
//SORT EXEC PGM=ICETOOL,PARM='SIZE(MAX)'
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP055.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP055.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP055.LOA
//OUT051 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N051.SRT
//OUT052 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N052.SRT
//OUT053 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N053.SRT
//OUT054 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N054.SRT
//OUT055 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N055.SRT
//DFSMSG DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//TOOLIN DD *
SORT FROM(IN) USING(SOSP)
//SOSPCNTL DD *
SORT FIELDS=(1,1,CH,A,2,5,CH,D)
OUTFIL FNAMES=OUT1,INCLUDE=(1,1,CH,LE,C'f')
OUTFIL FNAMES=OUT2,INCLUDE=(1,1,CH,GT,C'f',AND,1,1,CH,LE,C'n')
OUTFIL FNAMES=OUT3,INCLUDE=(1,1,CH,GT,C'n')
part 051 value 05566
part 052 value 05691
part 053 value 05802
part 054 value 05918
part 055 value 06034
//job 060
//SORT EXEC PGM=ICETOOL,PARM='SIZE(MAX)'
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP060.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP060.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP060.LOA
//OUT056 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N056.SRT
//OUT057 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N057.SRT
//OUT058 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N058.SRT
//OUT059 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N059.SRT
//OUT060 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N060.SRT
//DFSMSG DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//TOOLIN DD *
SORT FROM(IN) USING(SOSP)
//SOSPCNTL DD *
SORT FIELDS=(1,1,CH,A,2,5,CH,D)
OUTFIL FNAMES=OUT1,INCLUDE=(1,1,CH,LE,C'f')
OUTFIL FNAMES=OUT2,INCLUDE=(1,1,CH,GT,C'f',AND,1,1,CH,LE,C'n')
OUTFIL FNAMES=OUT3,INCLUDE=(1,1,CH,GT,C'n')
part 056 value 06149
part 057 value 06273
part 058 value 06385
part 059 value 06505
part 060 value 06608
//job 065
//SORT EXEC PGM=ICETOOL,PARM='SIZE(MAX)'
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP065.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP065.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP065.LOA
//OUT061 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N061.SRT
//OUT062 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N062.SRT
//OUT063 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N063.SRT
//OUT064 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N064.SRT
//OUT065 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N065.SRT
//DFSMSG DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//TOOLIN DD *
SORT FROM(IN) USING(SOSP)
//SOSPCNTL DD *
SORT FIELDS=(1,1,CH,A,2,5,CH,D)
OUTFIL FNAMES=OUT1,INCLUDE=(1,1,CH,LE,C'f')
OUTFIL FNAMES=OUT2,INCLUDE=(1,1,CH,GT,C'f',AND,1,1,CH,LE,C'n')
OUTFIL FNAMES=OUT3,INCLUDE=(1,1,CH,GT,C'n')
part 061 value 06720
part 062 value 06844
part 063 value 06956
part 064 value 07070
part 065 value 07179
//job 070
//SORT EXEC PGM=ICETOOL,PARM='SIZE(MAX)'
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP070.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP070.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP070.LOA
//OUT066 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N066.SRT
//OUT067 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N067.SRT
//OUT068 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N068.SRT
//OUT069 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N069.SRT
//OUT070 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N070.SRT
//DFSMSG DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//TOOLIN DD *
SORT FROM(IN) USING(SOSP)
//SOSPCNTL DD *
SORT FIELDS=(1,1,CH,A,2,5,CH,D)
OUTFIL FNAMES=OUT1,INCLUDE=(1,1,CH,LE,C'f')
OUTFIL FNAMES=OUT2,INCLUDE=(1,1,CH,GT,C'f',AND,1,1,CH,LE,C'n')
OUTFIL FNAMES=OUT3,INCLUDE=(1,1,CH,GT,C'n')
part 066 value 07295
part 067 value 07420
part 068 value 07540
part 069 value 07650
part 070 value 07749
//job 075
//SORT EXEC PGM=ICETOOL,PARM='SIZE(MAX)'
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP075.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP075.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP075.LOA
//OUT071 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N071.SRT
//OUT072 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N072.SRT
//OUT073 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N073.SRT
//OUT074 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N074.SRT
//OUT075 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N075.SRT
//DFSMSG DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//TOOLIN DD *
SORT FROM(IN) USING(SOSP)
//SOSPCNTL DD *
SORT FIELDS=(1,1,CH,A,2,5,CH,D)
OUTFIL FNAMES=OUT1,INCLUDE=(1,1,CH,LE,C'f')
OUTFIL FNAMES=OUT2,INCLUDE=(1,1,CH,GT,C'f',AND,1,1,CH,LE,C'n')
OUTFIL FNAMES=OUT3,INCLUDE=(1,1,CH,GT,C'n')
part 071 value 07862
part 072 value 07989
part 073 value 08119
part 074 value 08225
part 075 value 08332
//job 080
//SORT EXEC PGM=ICETOOL,PARM='SIZE(MAX)'
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP080.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP080.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP080.LOA
//OUT076 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N076.SRT
//OUT077 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N077.SRT
//OUT078 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N078.SRT
//OUT079 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N079.SRT
//OUT080 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N080.SRT
//DFSMSG DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//TOOLIN DD *
SORT FROM(IN) USING(SOSP)
//SOSPCNTL DD *
SORT FIELDS=(1,1,CH,A,2,5,CH,D)
OUTFIL FNAMES=OUT1,INCLUDE=(1,1,CH,LE,C'f')
OUTFIL FNAMES=OUT2,INCLUDE=(1,1,CH,GT,C'f',AND,1,1,CH,LE,C'n')
OUTFIL FNAMES=OUT3,INCLUDE=(1,1,CH,GT,C'n')
part 076 value 08447
part 077 value 08531
part 078 value 08659
part 079 value 08778
part 080 value 08889
//job 085
//SORT EXEC PGM=ICETOOL,PARM='SIZE(MAX)'
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP085.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP085.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP085.LOA
//OUT081 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N081.SRT
//OUT082 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N082.SRT
//OUT083 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N083.SRT
//OUT084 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N084.SRT
//OUT085 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N085.SRT
//DFSMSG DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//TOOLIN DD *
SORT FROM(IN) USING(SOSP)
//SOSPCNTL DD *
SORT FIELDS=(1,1,CH,A,2,5,CH,D)
OUTFIL FNAMES=OUT1,INCLUDE=(1,1,CH,LE,C'f')
OUTFIL FNAMES=OUT2,INCLUDE=(1,1,CH,GT,C'f',AND,1,1,CH,LE,C'n')
OUTFIL FNAMES=OUT3,INCLUDE=(1,1,CH,GT,C'n')
part 081 value 09011
part 082 value 09088
part 083 value 09216
part 084 value 09340
part 085 value 09444
//job 090
//SORT EXEC PGM=ICETOOL,PARM='SIZE(MAX)'
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP090.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP090.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP090.LOA
//OUT086 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N086.SRT
//OUT087 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N087.SRT
//OUT088 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N088.SRT
//OUT089 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N089.SRT
//OUT090 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N090.SRT
//DFSMSG DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//TOOLIN DD *
SORT FROM(IN) USING(SOSP)
//SOSPCNTL DD *
SORT FIELDS=(1,1,CH,A,2,5,CH,D)
OUTFIL FNAMES=OUT1,INCLUDE=(1,1,CH,LE,C'f')
OUTFIL FNAMES=OUT2,INCLUDE=(1,1,CH,GT,C'f',AND,1,1,CH,LE,C'n')
OUTFIL FNAMES=OUT3,INCLUDE=(1,1,CH,GT,C'n')
part 086 value 09562
part 087 value 09664
part 088 value 09733
part 089 value 09862
part 090 value 09971
//job 095
//SORT EXEC PGM=ICETOOL,PARM='SIZE(MAX)'
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP095.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP095.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP095.LOA
//OUT091 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N091.SRT
//OUT092 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N092.SRT
//OUT093 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N093.SRT
//OUT094 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N094.SRT
//OUT095 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N095.SRT
//DFSMSG DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//TOOLIN DD *
SORT FROM(IN) USING(SOSP)
//SOSPCNTL DD *
SORT FIELDS=(1,1,CH,A,2,5,CH,D)
OUTFIL FNAMES=OUT1,INCLUDE=(1,1,CH,LE,C'f')
OUTFIL FNAMES=OUT2,INCLUDE=(1,1,CH,GT,C'f',AND,1,1,CH,LE,C'n')
OUTFIL FNAMES=OUT3,INCLUDE=(1,1,CH,GT,C'n')
part 091 value 10084
part 092 value 10206
part 093 value 10269
part 094 value 10396
part 095 value 10512
//job 100
//SORT EXEC PGM=ICETOOL,PARM='SIZE(MAX)'
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP100.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP100.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP100.LOA
//OUT096 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N096.SRT
//OUT097 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N097.SRT
//OUT098 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N098.SRT
//OUT099 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N099.SRT
//OUT100 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N100.SRT
//DFSMSG DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//TOOLIN DD *
SORT FROM(IN) USING(SOSP)
//SOSPCNTL DD *
SORT FIELDS=(1,1,CH,A,2,5,CH,D)
OUTFIL FNAMES=OUT1,INCLUDE=(1,1,CH,LE,C'f')
OUTFIL FNAMES=OUT2,INCLUDE=(1,1,CH,GT,C'f',AND,1,1,CH,LE,C'n')
OUTFIL FNAMES=OUT3,INCLUDE=(1,1,CH,GT,C'n')
part 096 value 10620
part 097 value 10747
part 098 value 10843
part 099 value 10971
part 100 value 11046
$#out 20100430 21:02:37
//job 005
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP005.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP005.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP005.LOA
//OUT001 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N001.SRT
//OUT002 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N002.SRT
//OUT003 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N003.SRT
//OUT004 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N004.SRT
//OUT005 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N005.SRT
part 001 value 00105
part 002 value 00224
part 003 value 00340
part 004 value 00432
part 005 value 00554
//job 010
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP010.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP010.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP010.LOA
//OUT006 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N006.SRT
//OUT007 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N007.SRT
//OUT008 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N008.SRT
//OUT009 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N009.SRT
//OUT010 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N010.SRT
part 006 value 00656
part 007 value 00770
part 008 value 00892
part 009 value 00991
part 010 value 01115
//job 015
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP015.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP015.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP015.LOA
//OUT011 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N011.SRT
//OUT012 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N012.SRT
//OUT013 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N013.SRT
//OUT014 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N014.SRT
//OUT015 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N015.SRT
part 011 value 01211
part 012 value 01315
part 013 value 01435
part 014 value 01524
part 015 value 01651
//job 020
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP020.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP020.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP020.LOA
//OUT016 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N016.SRT
//OUT017 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N017.SRT
//OUT018 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N018.SRT
//OUT019 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N019.SRT
//OUT020 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N020.SRT
part 016 value 01751
part 017 value 01867
part 018 value 01988
part 019 value 02079
part 020 value 02153
//job 025
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP025.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP025.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP025.LOA
//OUT021 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N021.SRT
//OUT022 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N022.SRT
//OUT023 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N023.SRT
//OUT024 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N024.SRT
//OUT025 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N025.SRT
part 021 value 02273
part 022 value 02367
part 023 value 02492
part 024 value 02609
part 025 value 02675
//job 030
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP030.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP030.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP030.LOA
//OUT026 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N026.SRT
//OUT027 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N027.SRT
//OUT028 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N028.SRT
//OUT029 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N029.SRT
//OUT030 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N030.SRT
part 026 value 02795
part 027 value 02901
part 028 value 03015
part 029 value 03134
part 030 value 03233
//job 035
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP035.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP035.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP035.LOA
//OUT031 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N031.SRT
//OUT032 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N032.SRT
//OUT033 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N033.SRT
//OUT034 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N034.SRT
//OUT035 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N035.SRT
part 031 value 03311
part 032 value 03432
part 033 value 03538
part 034 value 03659
part 035 value 03770
//job 040
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP040.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP040.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP040.LOA
//OUT036 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N036.SRT
//OUT037 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N037.SRT
//OUT038 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N038.SRT
//OUT039 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N039.SRT
//OUT040 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N040.SRT
part 036 value 03845
part 037 value 03966
part 038 value 04075
part 039 value 04191
part 040 value 04311
//job 045
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP045.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP045.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP045.LOA
//OUT041 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N041.SRT
//OUT042 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N042.SRT
//OUT043 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N043.SRT
//OUT044 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N044.SRT
//OUT045 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N045.SRT
part 041 value 04417
part 042 value 04542
part 043 value 04651
part 044 value 04763
part 045 value 04879
//job 050
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP050.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP050.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP050.LOA
//OUT046 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N046.SRT
//OUT047 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N047.SRT
//OUT048 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N048.SRT
//OUT049 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N049.SRT
//OUT050 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N050.SRT
part 046 value 04983
part 047 value 05105
part 048 value 05214
part 049 value 05333
part 050 value 05457
//job 055
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP055.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP055.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP055.LOA
//OUT051 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N051.SRT
//OUT052 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N052.SRT
//OUT053 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N053.SRT
//OUT054 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N054.SRT
//OUT055 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N055.SRT
part 051 value 05566
part 052 value 05691
part 053 value 05802
part 054 value 05918
part 055 value 06034
//job 060
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP060.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP060.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP060.LOA
//OUT056 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N056.SRT
//OUT057 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N057.SRT
//OUT058 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N058.SRT
//OUT059 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N059.SRT
//OUT060 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N060.SRT
part 056 value 06149
part 057 value 06273
part 058 value 06385
part 059 value 06505
part 060 value 06608
//job 065
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP065.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP065.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP065.LOA
//OUT061 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N061.SRT
//OUT062 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N062.SRT
//OUT063 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N063.SRT
//OUT064 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N064.SRT
//OUT065 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N065.SRT
part 061 value 06720
part 062 value 06844
part 063 value 06956
part 064 value 07070
part 065 value 07179
//job 070
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP070.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP070.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP070.LOA
//OUT066 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N066.SRT
//OUT067 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N067.SRT
//OUT068 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N068.SRT
//OUT069 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N069.SRT
//OUT070 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N070.SRT
part 066 value 07295
part 067 value 07420
part 068 value 07540
part 069 value 07650
part 070 value 07749
//job 075
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP075.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP075.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP075.LOA
//OUT071 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N071.SRT
//OUT072 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N072.SRT
//OUT073 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N073.SRT
//OUT074 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N074.SRT
//OUT075 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N075.SRT
part 071 value 07862
part 072 value 07989
part 073 value 08119
part 074 value 08225
part 075 value 08332
//job 080
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP080.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP080.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP080.LOA
//OUT076 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N076.SRT
//OUT077 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N077.SRT
//OUT078 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N078.SRT
//OUT079 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N079.SRT
//OUT080 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N080.SRT
part 076 value 08447
part 077 value 08531
part 078 value 08659
part 079 value 08778
part 080 value 08889
//job 085
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP085.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP085.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP085.LOA
//OUT081 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N081.SRT
//OUT082 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N082.SRT
//OUT083 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N083.SRT
//OUT084 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N084.SRT
//OUT085 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N085.SRT
part 081 value 09011
part 082 value 09088
part 083 value 09216
part 084 value 09340
part 085 value 09444
//job 090
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP090.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP090.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP090.LOA
//OUT086 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N086.SRT
//OUT087 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N087.SRT
//OUT088 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N088.SRT
//OUT089 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N089.SRT
//OUT090 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N090.SRT
part 086 value 09562
part 087 value 09664
part 088 value 09733
part 089 value 09862
part 090 value 09971
//job 095
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP095.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP095.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP095.LOA
//OUT091 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N091.SRT
//OUT092 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N092.SRT
//OUT093 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N093.SRT
//OUT094 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N094.SRT
//OUT095 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N095.SRT
part 091 value 10084
part 092 value 10206
part 093 value 10269
part 094 value 10396
part 095 value 10512
//job 100
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP100.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP100.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP100.LOA
//OUT096 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N096.SRT
//OUT097 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N097.SRT
//OUT098 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N098.SRT
//OUT099 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N099.SRT
//OUT100 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N100.SRT
part 096 value 10620
part 097 value 10747
part 098 value 10843
part 099 value 10971
part 100 value 11046
$#out 20100430 21:01:43
//job 004
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP004.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP004.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP004.LOA
//OUT001 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N001.SRT
//OUT002 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N002.SRT
//OUT003 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N003.SRT
//OUT004 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N004.SRT
part 001 value 00105
part 002 value 00224
part 003 value 00340
part 004 value 00432
//job 009
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP009.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP009.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP009.LOA
//OUT006 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N006.SRT
//OUT007 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N007.SRT
//OUT008 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N008.SRT
//OUT009 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N009.SRT
part 006 value 00656
part 007 value 00770
part 008 value 00892
part 009 value 00991
//job 014
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP014.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP014.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP014.LOA
//OUT011 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N011.SRT
//OUT012 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N012.SRT
//OUT013 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N013.SRT
//OUT014 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N014.SRT
part 011 value 01211
part 012 value 01315
part 013 value 01435
part 014 value 01524
//job 019
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP019.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP019.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP019.LOA
//OUT016 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N016.SRT
//OUT017 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N017.SRT
//OUT018 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N018.SRT
//OUT019 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N019.SRT
part 016 value 01751
part 017 value 01867
part 018 value 01988
part 019 value 02079
//job 024
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP024.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP024.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP024.LOA
//OUT021 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N021.SRT
//OUT022 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N022.SRT
//OUT023 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N023.SRT
//OUT024 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N024.SRT
part 021 value 02273
part 022 value 02367
part 023 value 02492
part 024 value 02609
//job 029
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP029.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP029.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP029.LOA
//OUT026 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N026.SRT
//OUT027 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N027.SRT
//OUT028 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N028.SRT
//OUT029 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N029.SRT
part 026 value 02795
part 027 value 02901
part 028 value 03015
part 029 value 03134
//job 034
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP034.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP034.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP034.LOA
//OUT031 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N031.SRT
//OUT032 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N032.SRT
//OUT033 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N033.SRT
//OUT034 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N034.SRT
part 031 value 03311
part 032 value 03432
part 033 value 03538
part 034 value 03659
//job 039
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP039.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP039.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP039.LOA
//OUT036 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N036.SRT
//OUT037 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N037.SRT
//OUT038 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N038.SRT
//OUT039 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N039.SRT
part 036 value 03845
part 037 value 03966
part 038 value 04075
part 039 value 04191
//job 044
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP044.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP044.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP044.LOA
//OUT041 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N041.SRT
//OUT042 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N042.SRT
//OUT043 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N043.SRT
//OUT044 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N044.SRT
part 041 value 04417
part 042 value 04542
part 043 value 04651
part 044 value 04763
//job 049
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP049.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP049.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP049.LOA
//OUT046 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N046.SRT
//OUT047 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N047.SRT
//OUT048 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N048.SRT
//OUT049 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N049.SRT
part 046 value 04983
part 047 value 05105
part 048 value 05214
part 049 value 05333
//job 054
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP054.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP054.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP054.LOA
//OUT051 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N051.SRT
//OUT052 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N052.SRT
//OUT053 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N053.SRT
//OUT054 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N054.SRT
part 051 value 05566
part 052 value 05691
part 053 value 05802
part 054 value 05918
//job 059
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP059.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP059.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP059.LOA
//OUT056 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N056.SRT
//OUT057 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N057.SRT
//OUT058 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N058.SRT
//OUT059 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N059.SRT
part 056 value 06149
part 057 value 06273
part 058 value 06385
part 059 value 06505
//job 064
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP064.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP064.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP064.LOA
//OUT061 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N061.SRT
//OUT062 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N062.SRT
//OUT063 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N063.SRT
//OUT064 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N064.SRT
part 061 value 06720
part 062 value 06844
part 063 value 06956
part 064 value 07070
//job 069
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP069.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP069.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP069.LOA
//OUT066 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N066.SRT
//OUT067 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N067.SRT
//OUT068 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N068.SRT
//OUT069 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N069.SRT
part 066 value 07295
part 067 value 07420
part 068 value 07540
part 069 value 07650
//job 074
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP074.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP074.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP074.LOA
//OUT071 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N071.SRT
//OUT072 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N072.SRT
//OUT073 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N073.SRT
//OUT074 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N074.SRT
part 071 value 07862
part 072 value 07989
part 073 value 08119
part 074 value 08225
//job 079
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP079.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP079.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP079.LOA
//OUT076 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N076.SRT
//OUT077 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N077.SRT
//OUT078 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N078.SRT
//OUT079 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N079.SRT
part 076 value 08447
part 077 value 08531
part 078 value 08659
part 079 value 08778
//job 084
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP084.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP084.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP084.LOA
//OUT081 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N081.SRT
//OUT082 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N082.SRT
//OUT083 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N083.SRT
//OUT084 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N084.SRT
part 081 value 09011
part 082 value 09088
part 083 value 09216
part 084 value 09340
//job 089
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP089.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP089.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP089.LOA
//OUT086 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N086.SRT
//OUT087 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N087.SRT
//OUT088 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N088.SRT
//OUT089 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N089.SRT
part 086 value 09562
part 087 value 09664
part 088 value 09733
part 089 value 09862
//job 094
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP094.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP094.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP094.LOA
//OUT091 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N091.SRT
//OUT092 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N092.SRT
//OUT093 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N093.SRT
//OUT094 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N094.SRT
part 091 value 10084
part 092 value 10206
part 093 value 10269
part 094 value 10396
//job 099
//INP DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P01.NP099.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P02.NP099.LOA
DD DISP=SHR,DSN=DSN=DSN=DSN.MFNV.MF150P03.NP099.LOA
//OUT096 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N096.SRT
//OUT097 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N097.SRT
//OUT098 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N098.SRT
//OUT099 DD DISP=SHR,DSN=DSN=DSN.MFNV.MF150N099.SRT
part 096 value 10620
part 097 value 10747
part 098 value 10843
part 099 value 10971
$#out 20100430 19:02:41
}¢--- DSN.TX.CASE(MFNVYLOA) cre=2010-04-30 mod=2010-04-30-18.04.11 A540769 -----
$*(
$<DSN.MFNV.MF150P01.PUN $>}into
call scanUtilInto
$;
$;
$@<}into
$;
$*)
$**$>.jclSub()
$=nFr = 5
$=nBy = 5
$=nTo = 100
//YMFNVYLO JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBZF
//S1 EXEC PGM=DSNUTILB,PARM='DBZF,YMFNVYLO.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
$@do pTo=$nFr by $nBy to $nTo $@=¢
$= pTo =- right($pTo, 3, 0)
$= pFr =- right($pTo-4, 3, 0)
//TIN$pTo DD DISP=SHR,DSN=DSN.MFNV.MF150P01.NP$pTo.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P02.NP$pTo.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P03.NP$pTo.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P04.NP$pTo.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P05.NP$pTo.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P06.NP$pTo.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P07.NP$pTo.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P08.NP$pTo.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P09.NP$pTo.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P10.NP$pTo.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P11.NP$pTo.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P12.NP$pTo.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P13.NP$pTo.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P14.NP$pTo.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P15.NP$pTo.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P16.NP$pTo.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P17.NP$pTo.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P18.NP$pTo.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P19.NP$pTo.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P20.NP$pTo.LOA
$!
//SYSIN DD *
LOAD DATA LOG NO
EBCDIC CCSID(00500,00000,00000)
SORTKEYS
-- ENFORCE NO
SORTDEVT DISK
SORTNUM 160
WORKDDN(TSYUTD,TSOUTD)
$@do px=$pFr to $pTo $@=¢
INTO TABLE OA1Z.$"$2"TMF150A1 PART $px INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
$!
$!
$#out 20100430 14:47:56
//YMFL2005 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBZF
//S1 EXEC PGM=DSNUTILB,PARM='DBZF,YMFL2005.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//TIN DD DISP=SHR,DSN=DSN.MFNV.MF150P01.NP005.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P02.NP005.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P03.NP005.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P04.NP005.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P05.NP005.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P06.NP005.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P07.NP005.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P08.NP005.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P09.NP005.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P10.NP005.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P11.NP005.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P12.NP005.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P13.NP005.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P14.NP005.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P15.NP005.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P16.NP005.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P17.NP005.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P18.NP005.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P19.NP005.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P20.NP005.LOA
//SYSIN DD *
LOAD DATA LOG NO
EBCDIC CCSID(00500,00000,00000)
SORTKEYS
-- ENFORCE NO
SORTDEVT DISK
SORTNUM 160
WORKDDN(TSYUTD,TSOUTD)
INTO TABLE OA1Z.$2TMF150A1 PART 1 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 2 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 3 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 4 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 5 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
//YMFL2010 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBZF
//S1 EXEC PGM=DSNUTILB,PARM='DBZF,YMFL2010.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//TIN DD DISP=SHR,DSN=DSN.MFNV.MF150P01.NP010.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P02.NP010.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P03.NP010.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P04.NP010.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P05.NP010.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P06.NP010.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P07.NP010.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P08.NP010.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P09.NP010.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P10.NP010.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P11.NP010.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P12.NP010.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P13.NP010.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P14.NP010.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P15.NP010.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P16.NP010.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P17.NP010.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P18.NP010.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P19.NP010.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P20.NP010.LOA
//SYSIN DD *
LOAD DATA LOG NO
EBCDIC CCSID(00500,00000,00000)
SORTKEYS
-- ENFORCE NO
SORTDEVT DISK
SORTNUM 160
WORKDDN(TSYUTD,TSOUTD)
INTO TABLE OA1Z.$2TMF150A1 PART 6 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 7 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 8 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 9 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 10 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
//YMFL2015 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBZF
//S1 EXEC PGM=DSNUTILB,PARM='DBZF,YMFL2015.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//TIN DD DISP=SHR,DSN=DSN.MFNV.MF150P01.NP015.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P02.NP015.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P03.NP015.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P04.NP015.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P05.NP015.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P06.NP015.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P07.NP015.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P08.NP015.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P09.NP015.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P10.NP015.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P11.NP015.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P12.NP015.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P13.NP015.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P14.NP015.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P15.NP015.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P16.NP015.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P17.NP015.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P18.NP015.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P19.NP015.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P20.NP015.LOA
//SYSIN DD *
LOAD DATA LOG NO
EBCDIC CCSID(00500,00000,00000)
SORTKEYS
-- ENFORCE NO
SORTDEVT DISK
SORTNUM 160
WORKDDN(TSYUTD,TSOUTD)
INTO TABLE OA1Z.$2TMF150A1 PART 11 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 12 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 13 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 14 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 15 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
//YMFL2020 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBZF
//S1 EXEC PGM=DSNUTILB,PARM='DBZF,YMFL2020.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//TIN DD DISP=SHR,DSN=DSN.MFNV.MF150P01.NP020.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P02.NP020.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P03.NP020.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P04.NP020.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P05.NP020.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P06.NP020.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P07.NP020.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P08.NP020.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P09.NP020.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P10.NP020.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P11.NP020.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P12.NP020.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P13.NP020.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P14.NP020.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P15.NP020.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P16.NP020.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P17.NP020.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P18.NP020.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P19.NP020.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P20.NP020.LOA
//SYSIN DD *
LOAD DATA LOG NO
EBCDIC CCSID(00500,00000,00000)
SORTKEYS
-- ENFORCE NO
SORTDEVT DISK
SORTNUM 160
WORKDDN(TSYUTD,TSOUTD)
INTO TABLE OA1Z.$2TMF150A1 PART 16 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 17 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 18 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 19 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 20 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
//YMFL2025 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBZF
//S1 EXEC PGM=DSNUTILB,PARM='DBZF,YMFL2025.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//TIN DD DISP=SHR,DSN=DSN.MFNV.MF150P01.NP025.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P02.NP025.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P03.NP025.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P04.NP025.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P05.NP025.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P06.NP025.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P07.NP025.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P08.NP025.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P09.NP025.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P10.NP025.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P11.NP025.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P12.NP025.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P13.NP025.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P14.NP025.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P15.NP025.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P16.NP025.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P17.NP025.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P18.NP025.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P19.NP025.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P20.NP025.LOA
//SYSIN DD *
LOAD DATA LOG NO
EBCDIC CCSID(00500,00000,00000)
SORTKEYS
-- ENFORCE NO
SORTDEVT DISK
SORTNUM 160
WORKDDN(TSYUTD,TSOUTD)
INTO TABLE OA1Z.$2TMF150A1 PART 21 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 22 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 23 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 24 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 25 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
//YMFL2030 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBZF
//S1 EXEC PGM=DSNUTILB,PARM='DBZF,YMFL2030.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//TIN DD DISP=SHR,DSN=DSN.MFNV.MF150P01.NP030.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P02.NP030.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P03.NP030.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P04.NP030.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P05.NP030.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P06.NP030.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P07.NP030.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P08.NP030.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P09.NP030.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P10.NP030.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P11.NP030.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P12.NP030.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P13.NP030.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P14.NP030.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P15.NP030.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P16.NP030.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P17.NP030.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P18.NP030.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P19.NP030.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P20.NP030.LOA
//SYSIN DD *
LOAD DATA LOG NO
EBCDIC CCSID(00500,00000,00000)
SORTKEYS
-- ENFORCE NO
SORTDEVT DISK
SORTNUM 160
WORKDDN(TSYUTD,TSOUTD)
INTO TABLE OA1Z.$2TMF150A1 PART 26 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 27 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 28 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 29 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 30 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
//YMFL2035 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBZF
//S1 EXEC PGM=DSNUTILB,PARM='DBZF,YMFL2035.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//TIN DD DISP=SHR,DSN=DSN.MFNV.MF150P01.NP035.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P02.NP035.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P03.NP035.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P04.NP035.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P05.NP035.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P06.NP035.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P07.NP035.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P08.NP035.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P09.NP035.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P10.NP035.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P11.NP035.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P12.NP035.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P13.NP035.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P14.NP035.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P15.NP035.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P16.NP035.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P17.NP035.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P18.NP035.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P19.NP035.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P20.NP035.LOA
//SYSIN DD *
LOAD DATA LOG NO
EBCDIC CCSID(00500,00000,00000)
SORTKEYS
-- ENFORCE NO
SORTDEVT DISK
SORTNUM 160
WORKDDN(TSYUTD,TSOUTD)
INTO TABLE OA1Z.$2TMF150A1 PART 31 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 32 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 33 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 34 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 35 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
//YMFL2040 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBZF
//S1 EXEC PGM=DSNUTILB,PARM='DBZF,YMFL2040.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//TIN DD DISP=SHR,DSN=DSN.MFNV.MF150P01.NP040.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P02.NP040.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P03.NP040.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P04.NP040.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P05.NP040.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P06.NP040.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P07.NP040.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P08.NP040.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P09.NP040.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P10.NP040.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P11.NP040.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P12.NP040.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P13.NP040.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P14.NP040.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P15.NP040.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P16.NP040.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P17.NP040.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P18.NP040.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P19.NP040.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P20.NP040.LOA
//SYSIN DD *
LOAD DATA LOG NO
EBCDIC CCSID(00500,00000,00000)
SORTKEYS
-- ENFORCE NO
SORTDEVT DISK
SORTNUM 160
WORKDDN(TSYUTD,TSOUTD)
INTO TABLE OA1Z.$2TMF150A1 PART 36 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 37 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 38 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 39 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 40 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
//YMFL2045 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBZF
//S1 EXEC PGM=DSNUTILB,PARM='DBZF,YMFL2045.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//TIN DD DISP=SHR,DSN=DSN.MFNV.MF150P01.NP045.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P02.NP045.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P03.NP045.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P04.NP045.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P05.NP045.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P06.NP045.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P07.NP045.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P08.NP045.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P09.NP045.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P10.NP045.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P11.NP045.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P12.NP045.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P13.NP045.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P14.NP045.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P15.NP045.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P16.NP045.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P17.NP045.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P18.NP045.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P19.NP045.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P20.NP045.LOA
//SYSIN DD *
LOAD DATA LOG NO
EBCDIC CCSID(00500,00000,00000)
SORTKEYS
-- ENFORCE NO
SORTDEVT DISK
SORTNUM 160
WORKDDN(TSYUTD,TSOUTD)
INTO TABLE OA1Z.$2TMF150A1 PART 41 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 42 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 43 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 44 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 45 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
//YMFL2050 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBZF
//S1 EXEC PGM=DSNUTILB,PARM='DBZF,YMFL2050.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//TIN DD DISP=SHR,DSN=DSN.MFNV.MF150P01.NP050.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P02.NP050.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P03.NP050.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P04.NP050.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P05.NP050.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P06.NP050.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P07.NP050.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P08.NP050.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P09.NP050.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P10.NP050.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P11.NP050.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P12.NP050.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P13.NP050.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P14.NP050.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P15.NP050.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P16.NP050.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P17.NP050.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P18.NP050.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P19.NP050.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P20.NP050.LOA
//SYSIN DD *
LOAD DATA LOG NO
EBCDIC CCSID(00500,00000,00000)
SORTKEYS
-- ENFORCE NO
SORTDEVT DISK
SORTNUM 160
WORKDDN(TSYUTD,TSOUTD)
INTO TABLE OA1Z.$2TMF150A1 PART 46 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 47 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 48 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 49 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 50 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
//YMFL2055 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBZF
//S1 EXEC PGM=DSNUTILB,PARM='DBZF,YMFL2055.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//TIN DD DISP=SHR,DSN=DSN.MFNV.MF150P01.NP055.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P02.NP055.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P03.NP055.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P04.NP055.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P05.NP055.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P06.NP055.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P07.NP055.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P08.NP055.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P09.NP055.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P10.NP055.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P11.NP055.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P12.NP055.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P13.NP055.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P14.NP055.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P15.NP055.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P16.NP055.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P17.NP055.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P18.NP055.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P19.NP055.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P20.NP055.LOA
//SYSIN DD *
LOAD DATA LOG NO
EBCDIC CCSID(00500,00000,00000)
SORTKEYS
-- ENFORCE NO
SORTDEVT DISK
SORTNUM 160
WORKDDN(TSYUTD,TSOUTD)
INTO TABLE OA1Z.$2TMF150A1 PART 51 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 52 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 53 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 54 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 55 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
//YMFL2060 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBZF
//S1 EXEC PGM=DSNUTILB,PARM='DBZF,YMFL2060.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//TIN DD DISP=SHR,DSN=DSN.MFNV.MF150P01.NP060.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P02.NP060.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P03.NP060.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P04.NP060.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P05.NP060.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P06.NP060.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P07.NP060.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P08.NP060.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P09.NP060.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P10.NP060.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P11.NP060.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P12.NP060.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P13.NP060.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P14.NP060.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P15.NP060.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P16.NP060.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P17.NP060.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P18.NP060.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P19.NP060.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P20.NP060.LOA
//SYSIN DD *
LOAD DATA LOG NO
EBCDIC CCSID(00500,00000,00000)
SORTKEYS
-- ENFORCE NO
SORTDEVT DISK
SORTNUM 160
WORKDDN(TSYUTD,TSOUTD)
INTO TABLE OA1Z.$2TMF150A1 PART 56 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 57 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 58 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 59 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 60 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
//YMFL2065 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBZF
//S1 EXEC PGM=DSNUTILB,PARM='DBZF,YMFL2065.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//TIN DD DISP=SHR,DSN=DSN.MFNV.MF150P01.NP065.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P02.NP065.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P03.NP065.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P04.NP065.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P05.NP065.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P06.NP065.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P07.NP065.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P08.NP065.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P09.NP065.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P10.NP065.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P11.NP065.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P12.NP065.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P13.NP065.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P14.NP065.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P15.NP065.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P16.NP065.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P17.NP065.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P18.NP065.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P19.NP065.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P20.NP065.LOA
//SYSIN DD *
LOAD DATA LOG NO
EBCDIC CCSID(00500,00000,00000)
SORTKEYS
-- ENFORCE NO
SORTDEVT DISK
SORTNUM 160
WORKDDN(TSYUTD,TSOUTD)
INTO TABLE OA1Z.$2TMF150A1 PART 61 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 62 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 63 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 64 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 65 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
//YMFL2070 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBZF
//S1 EXEC PGM=DSNUTILB,PARM='DBZF,YMFL2070.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//TIN DD DISP=SHR,DSN=DSN.MFNV.MF150P01.NP070.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P02.NP070.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P03.NP070.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P04.NP070.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P05.NP070.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P06.NP070.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P07.NP070.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P08.NP070.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P09.NP070.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P10.NP070.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P11.NP070.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P12.NP070.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P13.NP070.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P14.NP070.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P15.NP070.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P16.NP070.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P17.NP070.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P18.NP070.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P19.NP070.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P20.NP070.LOA
//SYSIN DD *
LOAD DATA LOG NO
EBCDIC CCSID(00500,00000,00000)
SORTKEYS
-- ENFORCE NO
SORTDEVT DISK
SORTNUM 160
WORKDDN(TSYUTD,TSOUTD)
INTO TABLE OA1Z.$2TMF150A1 PART 66 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 67 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 68 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 69 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 70 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
//YMFL2075 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBZF
//S1 EXEC PGM=DSNUTILB,PARM='DBZF,YMFL2075.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//TIN DD DISP=SHR,DSN=DSN.MFNV.MF150P01.NP075.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P02.NP075.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P03.NP075.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P04.NP075.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P05.NP075.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P06.NP075.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P07.NP075.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P08.NP075.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P09.NP075.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P10.NP075.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P11.NP075.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P12.NP075.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P13.NP075.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P14.NP075.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P15.NP075.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P16.NP075.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P17.NP075.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P18.NP075.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P19.NP075.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P20.NP075.LOA
//SYSIN DD *
LOAD DATA LOG NO
EBCDIC CCSID(00500,00000,00000)
SORTKEYS
-- ENFORCE NO
SORTDEVT DISK
SORTNUM 160
WORKDDN(TSYUTD,TSOUTD)
INTO TABLE OA1Z.$2TMF150A1 PART 71 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 72 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 73 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 74 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 75 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
//YMFL2080 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBZF
//S1 EXEC PGM=DSNUTILB,PARM='DBZF,YMFL2080.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//TIN DD DISP=SHR,DSN=DSN.MFNV.MF150P01.NP080.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P02.NP080.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P03.NP080.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P04.NP080.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P05.NP080.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P06.NP080.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P07.NP080.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P08.NP080.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P09.NP080.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P10.NP080.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P11.NP080.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P12.NP080.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P13.NP080.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P14.NP080.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P15.NP080.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P16.NP080.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P17.NP080.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P18.NP080.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P19.NP080.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P20.NP080.LOA
//SYSIN DD *
LOAD DATA LOG NO
EBCDIC CCSID(00500,00000,00000)
SORTKEYS
-- ENFORCE NO
SORTDEVT DISK
SORTNUM 160
WORKDDN(TSYUTD,TSOUTD)
INTO TABLE OA1Z.$2TMF150A1 PART 76 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 77 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 78 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 79 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 80 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
//YMFL2085 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBZF
//S1 EXEC PGM=DSNUTILB,PARM='DBZF,YMFL2085.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//TIN DD DISP=SHR,DSN=DSN.MFNV.MF150P01.NP085.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P02.NP085.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P03.NP085.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P04.NP085.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P05.NP085.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P06.NP085.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P07.NP085.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P08.NP085.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P09.NP085.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P10.NP085.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P11.NP085.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P12.NP085.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P13.NP085.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P14.NP085.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P15.NP085.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P16.NP085.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P17.NP085.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P18.NP085.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P19.NP085.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P20.NP085.LOA
//SYSIN DD *
LOAD DATA LOG NO
EBCDIC CCSID(00500,00000,00000)
SORTKEYS
-- ENFORCE NO
SORTDEVT DISK
SORTNUM 160
WORKDDN(TSYUTD,TSOUTD)
INTO TABLE OA1Z.$2TMF150A1 PART 81 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 82 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 83 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 84 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 85 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
//YMFL2090 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBZF
//S1 EXEC PGM=DSNUTILB,PARM='DBZF,YMFL2090.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//TIN DD DISP=SHR,DSN=DSN.MFNV.MF150P01.NP090.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P02.NP090.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P03.NP090.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P04.NP090.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P05.NP090.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P06.NP090.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P07.NP090.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P08.NP090.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P09.NP090.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P10.NP090.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P11.NP090.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P12.NP090.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P13.NP090.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P14.NP090.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P15.NP090.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P16.NP090.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P17.NP090.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P18.NP090.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P19.NP090.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P20.NP090.LOA
//SYSIN DD *
LOAD DATA LOG NO
EBCDIC CCSID(00500,00000,00000)
SORTKEYS
-- ENFORCE NO
SORTDEVT DISK
SORTNUM 160
WORKDDN(TSYUTD,TSOUTD)
INTO TABLE OA1Z.$2TMF150A1 PART 86 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 87 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 88 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 89 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 90 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
//YMFL2095 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBZF
//S1 EXEC PGM=DSNUTILB,PARM='DBZF,YMFL2095.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//TIN DD DISP=SHR,DSN=DSN.MFNV.MF150P01.NP095.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P02.NP095.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P03.NP095.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P04.NP095.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P05.NP095.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P06.NP095.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P07.NP095.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P08.NP095.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P09.NP095.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P10.NP095.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P11.NP095.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P12.NP095.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P13.NP095.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P14.NP095.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P15.NP095.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P16.NP095.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P17.NP095.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P18.NP095.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P19.NP095.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P20.NP095.LOA
//SYSIN DD *
LOAD DATA LOG NO
EBCDIC CCSID(00500,00000,00000)
SORTKEYS
-- ENFORCE NO
SORTDEVT DISK
SORTNUM 160
WORKDDN(TSYUTD,TSOUTD)
INTO TABLE OA1Z.$2TMF150A1 PART 91 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 92 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 93 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 94 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 95 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
//YMFL2100 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBZF
//S1 EXEC PGM=DSNUTILB,PARM='DBZF,YMFL2100.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBZF.DBAA.LISTDEF(TEMPL),DISP=SHR
//TIN DD DISP=SHR,DSN=DSN.MFNV.MF150P01.NP100.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P02.NP100.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P03.NP100.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P04.NP100.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P05.NP100.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P06.NP100.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P07.NP100.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P08.NP100.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P09.NP100.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P10.NP100.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P11.NP100.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P12.NP100.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P13.NP100.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P14.NP100.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P15.NP100.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P16.NP100.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P17.NP100.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P18.NP100.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P19.NP100.LOA
// DD DISP=SHR,DSN=DSN.MFNV.MF150P20.NP100.LOA
//SYSIN DD *
LOAD DATA LOG NO
EBCDIC CCSID(00500,00000,00000)
SORTKEYS
-- ENFORCE NO
SORTDEVT DISK
SORTNUM 160
WORKDDN(TSYUTD,TSOUTD)
INTO TABLE OA1Z.$2TMF150A1 PART 96 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 97 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 98 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 99 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1Z.$2TMF150A1 PART 100 INDDN TIN
RESUME NO REPLACE
COPYDDN(TCOPYD)
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
$#out 20100430 13:32:50
}¢--- DSN.TX.CASE(MFNVYPAR) cre=2010-04-30 mod=2010-04-30-18.35.13 A540769 -----
part 1 values ( 105),
part 2 values ( 224),
part 3 values ( 340),
part 4 values ( 432),
part 5 values ( 554),
part 6 values ( 656),
part 7 values ( 770),
part 8 values ( 892),
part 9 values ( 991),
part 10 values ( 1115),
part 11 values ( 1211),
part 12 values ( 1315),
part 13 values ( 1435),
part 14 values ( 1524),
part 15 values ( 1651),
part 16 values ( 1751),
part 17 values ( 1867),
part 18 values ( 1988),
part 19 values ( 2079),
part 20 values ( 2153),
part 21 values ( 2273),
part 22 values ( 2367),
part 23 values ( 2492),
part 24 values ( 2609),
part 25 values ( 2675),
part 26 values ( 2795),
part 27 values ( 2901),
part 28 values ( 3015),
part 29 values ( 3134),
part 30 values ( 3233),
part 31 values ( 3311),
part 32 values ( 3432),
part 33 values ( 3538),
part 34 values ( 3659),
part 35 values ( 3770),
part 36 values ( 3845),
part 37 values ( 3966),
part 38 values ( 4075),
part 39 values ( 4191),
part 40 values ( 4311),
part 41 values ( 4417),
part 42 values ( 4542),
part 43 values ( 4651),
part 44 values ( 4763),
part 45 values ( 4879),
part 46 values ( 4983),
part 47 values ( 5105),
part 48 values ( 5214),
part 49 values ( 5333),
part 50 values ( 5457),
part 51 values ( 5566),
part 52 values ( 5691),
part 53 values ( 5802),
part 54 values ( 5918),
part 55 values ( 6034),
part 56 values ( 6149),
part 57 values ( 6273),
part 58 values ( 6385),
part 59 values ( 6505),
part 60 values ( 6608),
part 61 values ( 6720),
part 62 values ( 6844),
part 63 values ( 6956),
part 64 values ( 7070),
part 65 values ( 7179),
part 66 values ( 7295),
part 67 values ( 7420),
part 68 values ( 7540),
part 69 values ( 7650),
part 70 values ( 7749),
part 71 values ( 7862),
part 72 values ( 7989),
part 73 values ( 8119),
part 74 values ( 8225),
part 75 values ( 8332),
part 76 values ( 8447),
part 77 values ( 8531),
part 78 values ( 8659),
part 79 values ( 8778),
part 80 values ( 8889),
part 81 values ( 9011),
part 82 values ( 9088),
part 83 values ( 9216),
part 84 values ( 9340),
part 85 values ( 9444),
part 86 values ( 9562),
part 87 values ( 9664),
part 88 values ( 9733),
part 89 values ( 9862),
part 90 values ( 9971),
part 91 values (10084),
part 92 values (10206),
part 93 values (10269),
part 94 values (10396),
part 95 values (10512),
part 96 values (10620),
part 97 values (10747),
part 98 values (10843),
part 99 values (10971),
part 100 values (11046)
}¢--- DSN.TX.CASE(MFNVZ) cre=2010-09-04 mod=2010-09-04-11.58.48 A540769 --------
nop
= trgDb = MF01A1A
= trgCreator = OA1A
creDb trg 1
}¢--- DSN.TX.CASE(MFNVZDDJ) cre=2010-09-04 mod=2010-10-04-11.07.38 A540769 -----
//YMFNVDDL JOB (CP00,KE50), 00010001
// MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID
//*MAIN CLASS=DBOF ,SYSTEM=S12
//S01 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99 00020001
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2)
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSIN DD *
SET CURRENT SQLID='S100447';
SET CURRENT SCHEMA='OA1P';
???P TABLESPACE MF01A1P.A150A;
commit;
CREATE TABLESPACE A150A
IN MF01A1P
USING STOGROUP GSMS
FREEPAGE 30 PCTFREE 10
DSSIZE 32 G
NUMPARTS 100
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE NO
COMPRESS YES
LOCKPART YES;
COMMIT;
--
------------------------------------------------------------------------
-- Table=OA1P.TMF150A1 In MF01A1P.A150A
------------------------------------------------------------------------
--
SET CURRENT SCHEMA='OA1P';
--
CREATE TABLE OA1P.TMF150A1
(MF150001 CHAR(16) NOT NULL WITH DEFAULT,
MF150002 CHAR(1) NOT NULL WITH DEFAULT,
MF150003 CHAR(5) NOT NULL WITH DEFAULT,
MF150004 CHAR(25) NOT NULL WITH DEFAULT,
MF150005 CHAR(1) NOT NULL WITH DEFAULT,
MF150006 CHAR(1) NOT NULL WITH DEFAULT,
MF150007 CHAR(1) NOT NULL WITH DEFAULT,
MF150008 CHAR(3) NOT NULL WITH DEFAULT,
MF150009 CHAR(5) NOT NULL WITH DEFAULT,
MF150010 CHAR(4) NOT NULL WITH DEFAULT,
MF150011 CHAR(1) NOT NULL WITH DEFAULT,
MF150012 CHAR(1) NOT NULL WITH DEFAULT,
MF150013 DATE NOT NULL WITH DEFAULT,
MF150014 CHAR(4) NOT NULL WITH DEFAULT,
MF150015 CHAR(4) NOT NULL WITH DEFAULT,
MF150016 CHAR(4) NOT NULL WITH DEFAULT,
MF150017 CHAR(12) NOT NULL WITH DEFAULT,
MF150018 DECIMAL(15, 3) NOT NULL WITH DEFAULT,
MF150019 DECIMAL(15, 3) NOT NULL WITH DEFAULT,
MF150020 CHAR(8) NOT NULL WITH DEFAULT,
MF150021 TIMESTAMP NOT NULL WITH DEFAULT,
MF150022 CHAR(4) NOT NULL WITH DEFAULT,
MF150023 CHAR(12) NOT NULL WITH DEFAULT,
MF150024 CHAR(1) NOT NULL WITH DEFAULT,
MF150025 CHAR(3) NOT NULL WITH DEFAULT,
MF150026 CHAR(3) NOT NULL WITH DEFAULT,
MF150027 CHAR(3) NOT NULL WITH DEFAULT,
MF150028 CHAR(3) NOT NULL WITH DEFAULT,
MF150029 CHAR(3) NOT NULL WITH DEFAULT,
MF150030 CHAR(16) NOT NULL WITH DEFAULT,
MF150031 CHAR(2) NOT NULL WITH DEFAULT,
MF150032 CHAR(7) NOT NULL WITH DEFAULT,
MF150033 CHAR(7) NOT NULL WITH DEFAULT,
MF150034 CHAR(4) NOT NULL WITH DEFAULT,
MF150035 CHAR(1) NOT NULL WITH DEFAULT,
MF150036 CHAR(18) NOT NULL WITH DEFAULT,
MF150037 DECIMAL(15, 0) NOT NULL WITH DEFAULT,
MF150038 CHAR(16) NOT NULL WITH DEFAULT,
MF150039 CHAR(2) NOT NULL WITH DEFAULT,
MF150040 CHAR(2) NOT NULL WITH DEFAULT,
MF150041 CHAR(2) NOT NULL WITH DEFAULT,
MF150042 CHAR(4) NOT NULL WITH DEFAULT,
MF150043 DECIMAL(15, 3) NOT NULL WITH DEFAULT,
MF150044 CHAR(5) NOT NULL WITH DEFAULT,
MF150045 CHAR(4) NOT NULL WITH DEFAULT,
MF150046 CHAR(4) NOT NULL WITH DEFAULT,
MF150047 CHAR(1) NOT NULL WITH DEFAULT,
MF150051 CHAR(3) NOT NULL WITH DEFAULT,
MF150052 CHAR(3) NOT NULL WITH DEFAULT,
MF150053 DECIMAL(15, 3) NOT NULL WITH DEFAULT,
MF150054 CHAR(7) NOT NULL WITH DEFAULT,
MF150055 CHAR(1) NOT NULL WITH DEFAULT,
MF150056 CHAR(8) NOT NULL WITH DEFAULT,
MF150059 CHAR(5) NOT NULL WITH DEFAULT,
MF150060 TIMESTAMP NOT NULL WITH DEFAULT,
MF150062 CHAR(1) NOT NULL WITH DEFAULT,
MF150063 CHAR(1) NOT NULL WITH DEFAULT,
MF150064 DATE NOT NULL WITH DEFAULT,
MF150065 DATE NOT NULL WITH DEFAULT,
MF150066 CHAR(16) NOT NULL WITH DEFAULT,
MF150067 CHAR(16) NOT NULL WITH DEFAULT,
MF150068 CHAR(16) NOT NULL WITH DEFAULT,
MF150069 CHAR(4) NOT NULL WITH DEFAULT,
MF150070 CHAR(7) NOT NULL WITH DEFAULT,
MF150071 CHAR(1) NOT NULL WITH DEFAULT,
MF150072 CHAR(1) NOT NULL WITH DEFAULT,
MF150073 CHAR(1) NOT NULL WITH DEFAULT,
MF150074 CHAR(1) NOT NULL WITH DEFAULT,
MF150075 CHAR(1) NOT NULL WITH DEFAULT,
MF150076 CHAR(1) NOT NULL WITH DEFAULT,
MF150077 CHAR(6) NOT NULL WITH DEFAULT,
MF150078 CHAR(1) NOT NULL WITH DEFAULT,
MF150079 CHAR(1) NOT NULL WITH DEFAULT,
MF150080 DATE NOT NULL WITH DEFAULT,
MF150081 CHAR(5) NOT NULL WITH DEFAULT,
MF150082 CHAR(26) NOT NULL WITH DEFAULT,
MF150083 SMALLINT NOT NULL WITH DEFAULT,
MF150084 SMALLINT NOT NULL WITH DEFAULT,
MF150085 SMALLINT NOT NULL WITH DEFAULT,
MF150086 CHAR(35) NOT NULL WITH DEFAULT,
MF150087 CHAR(35) NOT NULL WITH DEFAULT,
MF150088 CHAR(35) NOT NULL WITH DEFAULT,
MF150089 CHAR(35) NOT NULL WITH DEFAULT,
MF150090 SMALLINT NOT NULL WITH DEFAULT,
MF150091 SMALLINT NOT NULL WITH DEFAULT,
MF150092 CHAR(16) NOT NULL WITH DEFAULT,
MF150019A CHAR(4) NOT NULL WITH DEFAULT '0010',
MF150HASH SMALLINT NOT NULL with DEFAULT -32768,
CONSTRAINT MF150001
PRIMARY KEY (MF150001))
IN MF01A1P.A150A
PARTITION BY (MF150HASH ASC)
(
part 1 values ( 105),
part 2 values ( 224),
part 3 values ( 340),
part 4 values ( 432),
part 5 values ( 554),
part 6 values ( 656),
part 7 values ( 770),
part 8 values ( 892),
part 9 values ( 991),
part 10 values ( 1115),
part 11 values ( 1211),
part 12 values ( 1315),
part 13 values ( 1435),
part 14 values ( 1524),
part 15 values ( 1651),
part 16 values ( 1751),
part 17 values ( 1867),
part 18 values ( 1988),
part 19 values ( 2079),
part 20 values ( 2153),
part 21 values ( 2273),
part 22 values ( 2367),
part 23 values ( 2492),
part 24 values ( 2609),
part 25 values ( 2675),
part 26 values ( 2795),
part 27 values ( 2901),
part 28 values ( 3015),
part 29 values ( 3134),
part 30 values ( 3233),
part 31 values ( 3311),
part 32 values ( 3432),
part 33 values ( 3538),
part 34 values ( 3659),
part 35 values ( 3770),
part 36 values ( 3845),
part 37 values ( 3966),
part 38 values ( 4075),
part 39 values ( 4191),
part 40 values ( 4311),
part 41 values ( 4417),
part 42 values ( 4542),
part 43 values ( 4651),
part 44 values ( 4763),
part 45 values ( 4879),
part 46 values ( 4983),
part 47 values ( 5105),
part 48 values ( 5214),
part 49 values ( 5333),
part 50 values ( 5457),
part 51 values ( 5566),
part 52 values ( 5691),
part 53 values ( 5802),
part 54 values ( 5918),
part 55 values ( 6034),
part 56 values ( 6149),
part 57 values ( 6273),
part 58 values ( 6385),
part 59 values ( 6505),
part 60 values ( 6608),
part 61 values ( 6720),
part 62 values ( 6844),
part 63 values ( 6956),
part 64 values ( 7070),
part 65 values ( 7179),
part 66 values ( 7295),
part 67 values ( 7420),
part 68 values ( 7540),
part 69 values ( 7650),
part 70 values ( 7749),
part 71 values ( 7862),
part 72 values ( 7989),
part 73 values ( 8119),
part 74 values ( 8225),
part 75 values ( 8332),
part 76 values ( 8447),
part 77 values ( 8531),
part 78 values ( 8659),
part 79 values ( 8778),
part 80 values ( 8889),
part 81 values ( 9011),
part 82 values ( 9088),
part 83 values ( 9216),
part 84 values ( 9340),
part 85 values ( 9444),
part 86 values ( 9562),
part 87 values ( 9664),
part 88 values ( 9733),
part 89 values ( 9862),
part 90 values ( 9971),
part 91 values (10084),
part 92 values (10206),
part 93 values (10269),
part 94 values (10396),
part 95 values (10512),
part 96 values (10620),
part 97 values (10747),
part 98 values (10843),
part 99 values (10971),
part 100 values (11046)
)
;
--
LABEL ON TABLE OA1P.TMF150A1 IS 'Mittelflussrechnung';
--
LABEL ON OA1P.TMF150A1
(MF150HASH IS 'PartitionierungsHash',
MF150019A IS 'Buchführungswährung',
MF150091 IS 'Limiten-Hierarchie',
MF150090 IS 'Limiten-Typ',
MF150089 IS 'Ort Begünstigter',
MF150088 IS 'Name Begünstigter',
MF150087 IS 'Ort Auftraggeber',
MF150086 IS 'Name Auftraggeber',
MF150085 IS 'Life-Cycle-Status',
MF150084 IS 'Relevant-Group',
MF150083 IS 'Transaction-Typ',
MF150082 IS 'Lade_Timestamp_ID',
MF150081 IS 'Preiskomponente',
MF150080 IS 'mutierbar bis',
MF150079 IS 'Depot_Uebertrag',
MF150078 IS 'Vorheriger GP-Typ',
MF150077 IS 'Bankenclearing-Nr',
MF150076 IS 'Kommentar_Status',
MF150075 IS 'Edit-Status Gesamt',
MF150074 IS 'EDIT-STATUS URHEBER',
MF150073 IS 'EDIT-STATUS GRUND',
MF150072 IS 'Edit-Status Gegenpartei',
MF150071 IS 'Prüfziffer Kundencif',
MF150070 IS 'Stammnummer Kundencif',
MF150069 IS 'Bankstelle Kundencif',
MF150068 IS 'int. Form OE Kundenbüro GP',
MF150067 IS 'int. Form OE Kundenbüro',
MF150066 IS 'int. Form OE-ID KV',
MF150065 IS 'Cif-Saldierungsdatum',
MF150064 IS 'Cif-Eröffnungsdatum',
MF150063 IS 'Mittelfluss-Identifikation',
MF150062 IS 'Coupon-Mantel',
MF150060 IS 'Erstellungstimestamp',
MF150059 IS 'Auftragslaufnummer',
MF150056 IS 'Endverfall Obligationen',
MF150055 IS 'Richtung des Mittelflusses',
MF150054 IS 'Leitweg',
MF150053 IS 'Volumen in Nominal/Stück',
MF150052 IS 'Bearbeitungscode',
MF150051 IS 'Domizil Gegenpartei',
MF150047 IS 'Buchungsart',
MF150046 IS 'eff.Depotstelle/Umbuchungskto',
MF150045 IS 'Depotstelle bzw. GFM_Laufnr.',
MF150044 IS 'Sequenz-Nummer zu Valor',
MF150043 IS 'Betrag zu Bestandeswährung',
MF150042 IS 'Bestandeswährung',
MF150041 IS 'Untergruppe Gegenpartei',
MF150040 IS 'Hauptgruppe Gegenpartei',
MF150039 IS 'Gegenpartei-Geldmarktzusatz',
MF150038 IS 'Gegenpartei-Beziehungsnummer',
MF150037 IS 'CSID Gegenpartei',
MF150036 IS 'Gegenpartei',
MF150035 IS 'Gegenpartei-Typ',
MF150034 IS 'BUID Gegenpartei',
MF150033 IS 'KundenverantwortlicheR',
MF150032 IS 'Kundenbüro Kunde',
MF150031 IS 'Kunden-Geldmarktzusatz',
MF150030 IS 'Kunden-Beziehungsnummer',
MF150029 IS 'Depotartenschlüssel',
MF150028 IS 'Kontoartenschlüssel',
MF150027 IS 'Kundendomizil',
MF150026 IS 'Kundensegment',
MF150025 IS 'Kundenart',
MF150024 IS 'PVV-Kunde',
MF150023 IS 'Cifnummer Kunde',
MF150022 IS 'BUID Kunde',
MF150021 IS 'Mutationsdatum',
MF150020 IS 'MutationsPID',
MF150019 IS 'Betrag in Buchführungswährung',
MF150018 IS 'Betrag in FWhrg',
MF150017 IS 'Valor',
MF150016 IS 'Währung',
MF150015 IS 'Urheber',
MF150014 IS 'Grund',
MF150013 IS 'Buchungsdatum',
MF150012 IS 'Bewegungsverdichtung',
MF150011 IS 'Produkteklassifizierung',
MF150010 IS 'MF-Produkt',
MF150009 IS 'Produktenr.Prok/Textcode Hypo',
MF150008 IS 'Bewegungsart Depot/Edelmetall',
MF150007 IS 'zu bewerten',
MF150006 IS 'nachzuerfassen',
MF150005 IS 'Storno',
MF150004 IS 'Auftragsnummer',
MF150003 IS 'Lieferantentyp',
MF150002 IS 'RZ-Herkunft',
MF150001 IS 'ID Mittelfluss (UUID)');
commit;
------------------------------------------------------------------------
-- Database=MF01A1P
-- Index=OA1P.IMF OA1P.TMF150A1
------------------------------------------------------------------------
--
CREATE UNIQUE INDEX OA1P.IMF150A0
ON OA1P.TMF150A1
(MF150001 ASC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
------------------------------------------------------------------------
-- Database=MF01A1P
-- Index=OA1P.IMF150A1 On OA1P.TMF150A1
------------------------------------------------------------------------
--
CREATE INDEX OA1P.IMF150A1
ON OA1P.TMF150A1
(MF150013 ASC,
MF150067 ASC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
------------------------------------------------------------------------
-- Database=MF01A1P
-- Index=OA1P.IMF150A2 On OA1P.TMF150A1
------------------------------------------------------------------------
--
CREATE INDEX OA1P.IMF150A2
ON OA1P.TMF150A1
(MF150023 ASC,
MF150013 DESC)
USING STOGROUP GSMS
CLUSTER
BUFFERPOOL BP1
CLOSE NO
;
--
------------------------------------------------------------------------
-- Database=MF01A1P
-- Index=OA1P.IMF150A3 On OA1P.TMF150A1
------------------------------------------------------------------------
--
CREATE INDEX OA1P.IMF150A3
ON OA1P.TMF150A1
(MF150066 ASC,
MF150013 DESC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
------------------------------------------------------------------------
-- Database=MF01A1P
-- Index=OA1P.IMF150A4 On OA1P.TMF150A1
------------------------------------------------------------------------
--
CREATE INDEX OA1P.IMF150A4
ON OA1P.TMF150A1
(MF150067 ASC,
MF150013 DESC,
MF150019 DESC,
MF150066 DESC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 4 G;
--
------------------------------------------------------------------------
-- Database=MF01A1P
-- Index=OA1P.IMF150A5 On OA1P.TMF150A1
------------------------------------------------------------------------
--
CREATE UNIQUE INDEX OA1P.IMF150A5
ON OA1P.TMF150A1
(MF150004 ASC,
MF150059 ASC,
MF150005 ASC,
MF150013 ASC,
MF150023 ASC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
------------------------------------------------------------------------
-- Database=MF01A1P
-- Index=OA1P.IMF150A6 On OA1P.TMF150A1
------------------------------------------------------------------------
--
CREATE INDEX OA1P.IMF150A6
ON OA1P.TMF150A1
(MF150085 ASC,
MF150084 ASC,
MF150060 ASC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
------------------------------------------------------------------------
-- Database=MF01A1P
-- Index=OA1P.IMF150A7 On OA1P.TMF150A1
------------------------------------------------------------------------
--
CREATE INDEX OA1P.IMF150A7
ON OA1P.TMF150A1
(MF150084 ASC,
MF150085 ASC,
MF150022 ASC,
MF150023 ASC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
------------------------------------------------------------------------
-- Database=MF01A1P
-- Index=OA1P.IMF150A8 On OA1P.TMF150A1
------------------------------------------------------------------------
--
CREATE UNIQUE INDEX OA1P.IMF150A8
ON OA1P.TMF150A1
(MF150023 ASC,
MF150013 ASC,
MF150001 ASC,
MF150019 ASC,
MF150083 ASC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
COMMIT;
--
--
--drop trigger OA1P.TMF150A1Ins ;
--drop trigger OA1P.TMF150A1Upd ;
create trigger OA1P.TMF150A1Ins no cascade before insert
on OA1P.TMF150A1 referencing New as n
for each row mode db2sql
set MF150HASH =
smallint(mod(
month(n.MF150013) * 100000
+ int(translate(
translate('08642', hex(substr(n.MF150023, 8,5)), '1234567890')
, '024579', 'ABCDEF'))
, 11047))
;
create trigger OA1P.TMF150A1Upd no cascade before
update of MF150013, MF150023, MF150HASH
on OA1P.TMF150A1 referencing New as N
for each row mode db2sql
set MF150HASH =
smallint(mod(
month(n.MF150013) * 100000
+ int(translate(
translate('08642', hex(substr(n.MF150023, 8,5)), '1234567890')
, '024579', 'ABCDEF'))
, 11047))
;
COMMIT;
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1P" ;
--
CREATE VIEW OA1P.VMF150ALL(ID_MITTELFLUSS, RZ_HERKUNFT,
LIEFERANTENTYP, AUFTRAGSNUMMER, STORNO, NACHZUERFASSEN,
ZU_BEWERTEN, BEWEGUNGSART_DEPOT, PRODUKTENR_PROK, MF_PRODUKT,
PRODUKTEKLASSE, BEWEGUNGSVERDICHT, BUCHUNGSDATUM, GRUND,
URHEBER, WAEHRUNG, VALOR, BETRAG_FWHRG, BUWHR, BETRAG_BUWHR,
MUTATIONSPID, MUTATIONSDATUM, BUID_KUNDE, CIFNUMMER_KUNDE,
PVV_KUNDE, KUNDENART, KUNDENSEGMENT, KUNDENDOMIZIL,
KONTOARTENSCHLUESS, DEPOTARTENSCHLUESS, KUNDEN_BEZIEHUNGNR,
KUNDEN_GMZUSATZ, KUNDENBUERO_KUNDE, KUNDENVERANTWORTL,
BUID_GEGENPARTEI, GEGENPARTEI_TYP, GEGENPARTEI,
CSID_GEGENPARTEI, GP_BEZIEHUNGSNR, GP_GELDMARKTZUSATZ,
HAUPTGRUPPE_GP, UNTERGRUPPE_GP, BESTANDESWAEHRUNG,
BETR_BESTANDESWHRG, VALOREN_SEQUENZNR, GFM_LAUFNUMMER,
DEPOTSTELLE, BUCHUNGSART, DOMIZIL_GP, BEARBEITUNGSCODE,
VOLUMEN_NOM_STCK, LEITWEG, ZU_ABFLUSS, POLICENNUMMER,
AUFTRAGSLAUFNUMMER, ERSTELLUNGSTIMSTMP, COUPON_MANTEL,
MITTELFLUSS_IDENTI, EROEFFNUNGSDATUM, SALDIERUNGSDATUM,
INT_OE_FORM_PID_KV, INT_OE_KUNDENBUERO, INT_OE_KBUERO_GP,
BIC_1TEIL, BIC_2TEIL, GP_CODE_REL, EDIT_STATUS_GP,
EDIT_STATUS_GRUND, EDIT_STATUS_URHEB, EDIT_STATUS_GESAMT,
EDIT_STATUS_KOMMNT, BANKENCLEARING_NR, VORHERIGER_GP_TYP,
DEPOTUEBERTRAG, MUTIERBAR_BIS, PREISKOMPONENTE,
LADE_TIMESTAMP_ID, TRANSACTION_TYP, RELEVANT_GROUP,
LIFE_CYCLE_STATUS, NAME_AUFTRAGGEBER, ORT_AUFTRAGGEBER,
NAME_BEGUENSTIGTER, ORT_BEGUENSTIGTER, LIMITEN_TYP,
LIMITEN_HIERARCHIE, RM_INTERNATIONAL) AS
SELECT ALL OA1P.TMF150A1.MF150001, OA1P.TMF150A1.MF150002,
OA1P.TMF150A1.MF150003, OA1P.TMF150A1.MF150004,
OA1P.TMF150A1.MF150005, OA1P.TMF150A1.MF150006,
OA1P.TMF150A1.MF150007, OA1P.TMF150A1.MF150008,
OA1P.TMF150A1.MF150009, OA1P.TMF150A1.MF150010,
OA1P.TMF150A1.MF150011, OA1P.TMF150A1.MF150012,
OA1P.TMF150A1.MF150013, OA1P.TMF150A1.MF150014,
OA1P.TMF150A1.MF150015, OA1P.TMF150A1.MF150016,
OA1P.TMF150A1.MF150017, OA1P.TMF150A1.MF150018,
OA1P.TMF150A1.MF150019A, OA1P.TMF150A1.MF150019,
OA1P.TMF150A1.MF150020, OA1P.TMF150A1.MF150021,
OA1P.TMF150A1.MF150022, OA1P.TMF150A1.MF150023,
OA1P.TMF150A1.MF150024, OA1P.TMF150A1.MF150025,
OA1P.TMF150A1.MF150026, OA1P.TMF150A1.MF150027,
OA1P.TMF150A1.MF150028, OA1P.TMF150A1.MF150029,
OA1P.TMF150A1.MF150030, OA1P.TMF150A1.MF150031,
OA1P.TMF150A1.MF150032, OA1P.TMF150A1.MF150033,
OA1P.TMF150A1.MF150034, OA1P.TMF150A1.MF150035,
OA1P.TMF150A1.MF150036, OA1P.TMF150A1.MF150037,
OA1P.TMF150A1.MF150038, OA1P.TMF150A1.MF150039,
OA1P.TMF150A1.MF150040, OA1P.TMF150A1.MF150041,
OA1P.TMF150A1.MF150042, OA1P.TMF150A1.MF150043,
OA1P.TMF150A1.MF150044, OA1P.TMF150A1.MF150045,
OA1P.TMF150A1.MF150046, OA1P.TMF150A1.MF150047,
OA1P.TMF150A1.MF150051, OA1P.TMF150A1.MF150052,
OA1P.TMF150A1.MF150053, OA1P.TMF150A1.MF150054,
OA1P.TMF150A1.MF150055, OA1P.TMF150A1.MF150056,
OA1P.TMF150A1.MF150059, OA1P.TMF150A1.MF150060,
OA1P.TMF150A1.MF150062, OA1P.TMF150A1.MF150063,
OA1P.TMF150A1.MF150064, OA1P.TMF150A1.MF150065,
OA1P.TMF150A1.MF150066, OA1P.TMF150A1.MF150067,
OA1P.TMF150A1.MF150068, OA1P.TMF150A1.MF150069,
OA1P.TMF150A1.MF150070, OA1P.TMF150A1.MF150071,
OA1P.TMF150A1.MF150072, OA1P.TMF150A1.MF150073,
OA1P.TMF150A1.MF150074, OA1P.TMF150A1.MF150075,
OA1P.TMF150A1.MF150076, OA1P.TMF150A1.MF150077,
OA1P.TMF150A1.MF150078, OA1P.TMF150A1.MF150079,
OA1P.TMF150A1.MF150080, OA1P.TMF150A1.MF150081,
OA1P.TMF150A1.MF150082, OA1P.TMF150A1.MF150083,
OA1P.TMF150A1.MF150084, OA1P.TMF150A1.MF150085,
OA1P.TMF150A1.MF150086, OA1P.TMF150A1.MF150087,
OA1P.TMF150A1.MF150088, OA1P.TMF150A1.MF150089,
OA1P.TMF150A1.MF150090, OA1P.TMF150A1.MF150091,
OA1P.TMF150A1.MF150092
FROM OA1P.TMF150A1
UNION ALL
SELECT ALL OA1P.TMF150H1.MF150001, OA1P.TMF150H1.MF150002,
OA1P.TMF150H1.MF150003, OA1P.TMF150H1.MF150004,
OA1P.TMF150H1.MF150005, OA1P.TMF150H1.MF150006,
OA1P.TMF150H1.MF150007, OA1P.TMF150H1.MF150008,
OA1P.TMF150H1.MF150009, OA1P.TMF150H1.MF150010,
OA1P.TMF150H1.MF150011, OA1P.TMF150H1.MF150012,
OA1P.TMF150H1.MF150013, OA1P.TMF150H1.MF150014,
OA1P.TMF150H1.MF150015, OA1P.TMF150H1.MF150016,
OA1P.TMF150H1.MF150017, OA1P.TMF150H1.MF150018,
OA1P.TMF150H1.MF150019A, OA1P.TMF150H1.MF150019,
OA1P.TMF150H1.MF150020, OA1P.TMF150H1.MF150021,
OA1P.TMF150H1.MF150022, OA1P.TMF150H1.MF150023,
OA1P.TMF150H1.MF150024, OA1P.TMF150H1.MF150025,
OA1P.TMF150H1.MF150026, OA1P.TMF150H1.MF150027,
OA1P.TMF150H1.MF150028, OA1P.TMF150H1.MF150029,
OA1P.TMF150H1.MF150030, OA1P.TMF150H1.MF150031,
OA1P.TMF150H1.MF150032, OA1P.TMF150H1.MF150033,
OA1P.TMF150H1.MF150034, OA1P.TMF150H1.MF150035,
OA1P.TMF150H1.MF150036, OA1P.TMF150H1.MF150037,
OA1P.TMF150H1.MF150038, OA1P.TMF150H1.MF150039,
OA1P.TMF150H1.MF150040, OA1P.TMF150H1.MF150041,
OA1P.TMF150H1.MF150042, OA1P.TMF150H1.MF150043,
OA1P.TMF150H1.MF150044, OA1P.TMF150H1.MF150045,
OA1P.TMF150H1.MF150046, OA1P.TMF150H1.MF150047,
OA1P.TMF150H1.MF150051, OA1P.TMF150H1.MF150052,
OA1P.TMF150H1.MF150053, OA1P.TMF150H1.MF150054,
OA1P.TMF150H1.MF150055, OA1P.TMF150H1.MF150056,
OA1P.TMF150H1.MF150059, OA1P.TMF150H1.MF150060,
OA1P.TMF150H1.MF150062, OA1P.TMF150H1.MF150063,
OA1P.TMF150H1.MF150064, OA1P.TMF150H1.MF150065,
OA1P.TMF150H1.MF150066, OA1P.TMF150H1.MF150067,
OA1P.TMF150H1.MF150068, OA1P.TMF150H1.MF150069,
OA1P.TMF150H1.MF150070, OA1P.TMF150H1.MF150071,
OA1P.TMF150H1.MF150072, OA1P.TMF150H1.MF150073,
OA1P.TMF150H1.MF150074, OA1P.TMF150H1.MF150075,
OA1P.TMF150H1.MF150076, OA1P.TMF150H1.MF150077,
OA1P.TMF150H1.MF150078, OA1P.TMF150H1.MF150079,
OA1P.TMF150H1.MF150080, OA1P.TMF150H1.MF150081,
OA1P.TMF150H1.MF150082, OA1P.TMF150H1.MF150083,
OA1P.TMF150H1.MF150084, OA1P.TMF150H1.MF150085,
OA1P.TMF150H1.MF150086, OA1P.TMF150H1.MF150087,
OA1P.TMF150H1.MF150088, OA1P.TMF150H1.MF150089,
OA1P.TMF150H1.MF150090, OA1P.TMF150H1.MF150091,
OA1P.TMF150H1.MF150092
FROM OA1P.TMF150H1 ;
--
------------------------------------------------------------------------
-- View=OA1P.VMF150A1V
------------------------------------------------------------------------
--
CREATE VIEW OA1P.VMF150A1V(ID_MITTELFLUSS, RZ_HERKUNFT,
LIEFERANTENTYP, AUFTRAGSNUMMER, STORNO, NACHZUERFASSEN,
ZU_BEWERTEN, BEWEGUNGSART_DEPOT, PRODUKTENR_PROK, MF_PRODUKT,
PRODUKTEKLASSE, BEWEGUNGSVERDICHT, BUCHUNGSDATUM, GRUND,
URHEBER, WAEHRUNG, VALOR, BETRAG_FWHRG, BUWHR, BETRAG_BUWHR,
MUTATIONSPID, MUTATIONSDATUM, BUID_KUNDE, CIFNUMMER_KUNDE,
PVV_KUNDE, KUNDENART, KUNDENSEGMENT, KUNDENDOMIZIL,
KONTOARTENSCHLUESS, DEPOTARTENSCHLUESS, KUNDEN_BEZIEHUNGNR,
KUNDEN_GMZUSATZ, KUNDENBUERO_KUNDE, KUNDENVERANTWORTL,
BUID_GEGENPARTEI, GEGENPARTEI_TYP, GEGENPARTEI,
CSID_GEGENPARTEI, GP_BEZIEHUNGSNR, GP_GELDMARKTZUSATZ,
HAUPTGRUPPE_GP, UNTERGRUPPE_GP, BESTANDESWAEHRUNG,
BETR_BESTANDESWHRG, VALOREN_SEQUENZNR, GFM_LAUFNUMMER,
DEPOTSTELLE, BUCHUNGSART, DOMIZIL_GP, BEARBEITUNGSCODE,
VOLUMEN_NOM_STCK, LEITWEG, ZU_ABFLUSS, POLICENNUMMER,
AUFTRAGSLAUFNUMMER, ERSTELLUNGSTIMSTMP, COUPON_MANTEL,
MITTELFLUSS_IDENTI, EROEFFNUNGSDATUM, SALDIERUNGSDATUM,
INT_OE_FORM_PID_KV, INT_OE_KUNDENBUERO, INT_OE_KBUERO_GP,
BIC_1TEIL, BIC_2TEIL, GP_CODE_REL, EDIT_STATUS_GP,
EDIT_STATUS_GRUND, EDIT_STATUS_URHEB, EDIT_STATUS_GESAMT,
EDIT_STATUS_KOMMNT, BANKENCLEARING_NR, VORHERIGER_GP_TYP,
DEPOTUEBERTRAG, MUTIERBAR_BIS, PREISKOMPONENTE,
LADE_TIMESTAMP_ID, TRANSACTION_TYP, RELEVANT_GROUP,
LIFE_CYCLE_STATUS, NAME_AUFTRAGGEBER, ORT_AUFTRAGGEBER,
NAME_BEGUENSTIGTER, ORT_BEGUENSTIGTER, LIMITEN_TYP,
LIMITEN_HIERARCHIE, RM_INTERNATIONAL) AS
SELECT ALL OA1P.TMF150A1.MF150001, OA1P.TMF150A1.MF150002,
OA1P.TMF150A1.MF150003, OA1P.TMF150A1.MF150004,
OA1P.TMF150A1.MF150005, OA1P.TMF150A1.MF150006,
OA1P.TMF150A1.MF150007, OA1P.TMF150A1.MF150008,
OA1P.TMF150A1.MF150009, OA1P.TMF150A1.MF150010,
OA1P.TMF150A1.MF150011, OA1P.TMF150A1.MF150012,
OA1P.TMF150A1.MF150013, OA1P.TMF150A1.MF150014,
OA1P.TMF150A1.MF150015, OA1P.TMF150A1.MF150016,
OA1P.TMF150A1.MF150017, OA1P.TMF150A1.MF150018,
OA1P.TMF150A1.MF150019A, OA1P.TMF150A1.MF150019,
OA1P.TMF150A1.MF150020, OA1P.TMF150A1.MF150021,
OA1P.TMF150A1.MF150022, OA1P.TMF150A1.MF150023,
OA1P.TMF150A1.MF150024, OA1P.TMF150A1.MF150025,
OA1P.TMF150A1.MF150026, OA1P.TMF150A1.MF150027,
OA1P.TMF150A1.MF150028, OA1P.TMF150A1.MF150029,
OA1P.TMF150A1.MF150030, OA1P.TMF150A1.MF150031,
OA1P.TMF150A1.MF150032, OA1P.TMF150A1.MF150033,
OA1P.TMF150A1.MF150034, OA1P.TMF150A1.MF150035,
OA1P.TMF150A1.MF150036, OA1P.TMF150A1.MF150037,
OA1P.TMF150A1.MF150038, OA1P.TMF150A1.MF150039,
OA1P.TMF150A1.MF150040, OA1P.TMF150A1.MF150041,
OA1P.TMF150A1.MF150042, OA1P.TMF150A1.MF150043,
OA1P.TMF150A1.MF150044, OA1P.TMF150A1.MF150045,
OA1P.TMF150A1.MF150046, OA1P.TMF150A1.MF150047,
OA1P.TMF150A1.MF150051, OA1P.TMF150A1.MF150052,
OA1P.TMF150A1.MF150053, OA1P.TMF150A1.MF150054,
OA1P.TMF150A1.MF150055, OA1P.TMF150A1.MF150056,
OA1P.TMF150A1.MF150059, OA1P.TMF150A1.MF150060,
OA1P.TMF150A1.MF150062, OA1P.TMF150A1.MF150063,
OA1P.TMF150A1.MF150064, OA1P.TMF150A1.MF150065,
OA1P.TMF150A1.MF150066, OA1P.TMF150A1.MF150067,
OA1P.TMF150A1.MF150068, OA1P.TMF150A1.MF150069,
OA1P.TMF150A1.MF150070, OA1P.TMF150A1.MF150071,
OA1P.TMF150A1.MF150072, OA1P.TMF150A1.MF150073,
OA1P.TMF150A1.MF150074, OA1P.TMF150A1.MF150075,
OA1P.TMF150A1.MF150076, OA1P.TMF150A1.MF150077,
OA1P.TMF150A1.MF150078, OA1P.TMF150A1.MF150079,
OA1P.TMF150A1.MF150080, OA1P.TMF150A1.MF150081,
OA1P.TMF150A1.MF150082, OA1P.TMF150A1.MF150083,
OA1P.TMF150A1.MF150084, OA1P.TMF150A1.MF150085,
OA1P.TMF150A1.MF150086, OA1P.TMF150A1.MF150087,
OA1P.TMF150A1.MF150088, OA1P.TMF150A1.MF150089,
OA1P.TMF150A1.MF150090, OA1P.TMF150A1.MF150091,
OA1P.TMF150A1.MF150092
FROM OA1P.TMF150A1 ;
--
------------------------------------------------------------------------
-- View=OA1P.VMF150ALL_T
------------------------------------------------------------------------
--
CREATE VIEW OA1P.VMF150ALL_T(MF150001, MF150002, MF150003, MF150004,
MF150005, MF150006, MF150007, MF150008, MF150009, MF150010,
MF150011, MF150012, MF150013, MF150014, MF150015, MF150016,
MF150017, MF150018, MF150019, MF150020, MF150021, MF150022,
MF150023, MF150024, MF150025, MF150026, MF150027, MF150028,
MF150029, MF150030, MF150031, MF150032, MF150033, MF150034,
MF150035, MF150036, MF150037, MF150038, MF150039, MF150040,
MF150041, MF150042, MF150043, MF150044, MF150045, MF150046,
MF150047, MF150051, MF150052, MF150053, MF150054, MF150055,
MF150056, MF150059, MF150060, MF150062, MF150063, MF150064,
MF150065, MF150066, MF150067, MF150068, MF150069, MF150070,
MF150071, MF150072, MF150073, MF150074, MF150075, MF150076,
MF150077, MF150078, MF150079, MF150080, MF150081, MF150082,
MF150083, MF150084, MF150085, MF150086, MF150087, MF150088,
MF150089, MF150090, MF150091, MF150092, MF150019A) AS
SELECT ALL OA1P.TMF150A1.MF150001, OA1P.TMF150A1.MF150002,
OA1P.TMF150A1.MF150003, OA1P.TMF150A1.MF150004,
OA1P.TMF150A1.MF150005, OA1P.TMF150A1.MF150006,
OA1P.TMF150A1.MF150007, OA1P.TMF150A1.MF150008,
OA1P.TMF150A1.MF150009, OA1P.TMF150A1.MF150010,
OA1P.TMF150A1.MF150011, OA1P.TMF150A1.MF150012,
OA1P.TMF150A1.MF150013, OA1P.TMF150A1.MF150014,
OA1P.TMF150A1.MF150015, OA1P.TMF150A1.MF150016,
OA1P.TMF150A1.MF150017, OA1P.TMF150A1.MF150018,
OA1P.TMF150A1.MF150019, OA1P.TMF150A1.MF150020,
OA1P.TMF150A1.MF150021, OA1P.TMF150A1.MF150022,
OA1P.TMF150A1.MF150023, OA1P.TMF150A1.MF150024,
OA1P.TMF150A1.MF150025, OA1P.TMF150A1.MF150026,
OA1P.TMF150A1.MF150027, OA1P.TMF150A1.MF150028,
OA1P.TMF150A1.MF150029, OA1P.TMF150A1.MF150030,
OA1P.TMF150A1.MF150031, OA1P.TMF150A1.MF150032,
OA1P.TMF150A1.MF150033, OA1P.TMF150A1.MF150034,
OA1P.TMF150A1.MF150035, OA1P.TMF150A1.MF150036,
OA1P.TMF150A1.MF150037, OA1P.TMF150A1.MF150038,
OA1P.TMF150A1.MF150039, OA1P.TMF150A1.MF150040,
OA1P.TMF150A1.MF150041, OA1P.TMF150A1.MF150042,
OA1P.TMF150A1.MF150043, OA1P.TMF150A1.MF150044,
OA1P.TMF150A1.MF150045, OA1P.TMF150A1.MF150046,
OA1P.TMF150A1.MF150047, OA1P.TMF150A1.MF150051,
OA1P.TMF150A1.MF150052, OA1P.TMF150A1.MF150053,
OA1P.TMF150A1.MF150054, OA1P.TMF150A1.MF150055,
OA1P.TMF150A1.MF150056, OA1P.TMF150A1.MF150059,
OA1P.TMF150A1.MF150060, OA1P.TMF150A1.MF150062,
OA1P.TMF150A1.MF150063, OA1P.TMF150A1.MF150064,
OA1P.TMF150A1.MF150065, OA1P.TMF150A1.MF150066,
OA1P.TMF150A1.MF150067, OA1P.TMF150A1.MF150068,
OA1P.TMF150A1.MF150069, OA1P.TMF150A1.MF150070,
OA1P.TMF150A1.MF150071, OA1P.TMF150A1.MF150072,
OA1P.TMF150A1.MF150073, OA1P.TMF150A1.MF150074,
OA1P.TMF150A1.MF150075, OA1P.TMF150A1.MF150076,
OA1P.TMF150A1.MF150077, OA1P.TMF150A1.MF150078,
OA1P.TMF150A1.MF150079, OA1P.TMF150A1.MF150080,
OA1P.TMF150A1.MF150081, OA1P.TMF150A1.MF150082,
OA1P.TMF150A1.MF150083, OA1P.TMF150A1.MF150084,
OA1P.TMF150A1.MF150085, OA1P.TMF150A1.MF150086,
OA1P.TMF150A1.MF150087, OA1P.TMF150A1.MF150088,
OA1P.TMF150A1.MF150089, OA1P.TMF150A1.MF150090,
OA1P.TMF150A1.MF150091, OA1P.TMF150A1.MF150092,
OA1P.TMF150A1.MF150019A
FROM OA1P.TMF150A1
UNION ALL
SELECT ALL OA1P.TMF150H1.MF150001, OA1P.TMF150H1.MF150002,
OA1P.TMF150H1.MF150003, OA1P.TMF150H1.MF150004,
OA1P.TMF150H1.MF150005, OA1P.TMF150H1.MF150006,
OA1P.TMF150H1.MF150007, OA1P.TMF150H1.MF150008,
OA1P.TMF150H1.MF150009, OA1P.TMF150H1.MF150010,
OA1P.TMF150H1.MF150011, OA1P.TMF150H1.MF150012,
OA1P.TMF150H1.MF150013, OA1P.TMF150H1.MF150014,
OA1P.TMF150H1.MF150015, OA1P.TMF150H1.MF150016,
OA1P.TMF150H1.MF150017, OA1P.TMF150H1.MF150018,
OA1P.TMF150H1.MF150019, OA1P.TMF150H1.MF150020,
OA1P.TMF150H1.MF150021, OA1P.TMF150H1.MF150022,
OA1P.TMF150H1.MF150023, OA1P.TMF150H1.MF150024,
OA1P.TMF150H1.MF150025, OA1P.TMF150H1.MF150026,
OA1P.TMF150H1.MF150027, OA1P.TMF150H1.MF150028,
OA1P.TMF150H1.MF150029, OA1P.TMF150H1.MF150030,
OA1P.TMF150H1.MF150031, OA1P.TMF150H1.MF150032,
OA1P.TMF150H1.MF150033, OA1P.TMF150H1.MF150034,
OA1P.TMF150H1.MF150035, OA1P.TMF150H1.MF150036,
OA1P.TMF150H1.MF150037, OA1P.TMF150H1.MF150038,
OA1P.TMF150H1.MF150039, OA1P.TMF150H1.MF150040,
OA1P.TMF150H1.MF150041, OA1P.TMF150H1.MF150042,
OA1P.TMF150H1.MF150043, OA1P.TMF150H1.MF150044,
OA1P.TMF150H1.MF150045, OA1P.TMF150H1.MF150046,
OA1P.TMF150H1.MF150047, OA1P.TMF150H1.MF150051,
OA1P.TMF150H1.MF150052, OA1P.TMF150H1.MF150053,
OA1P.TMF150H1.MF150054, OA1P.TMF150H1.MF150055,
OA1P.TMF150H1.MF150056, OA1P.TMF150H1.MF150059,
OA1P.TMF150H1.MF150060, OA1P.TMF150H1.MF150062,
OA1P.TMF150H1.MF150063, OA1P.TMF150H1.MF150064,
OA1P.TMF150H1.MF150065, OA1P.TMF150H1.MF150066,
OA1P.TMF150H1.MF150067, OA1P.TMF150H1.MF150068,
OA1P.TMF150H1.MF150069, OA1P.TMF150H1.MF150070,
OA1P.TMF150H1.MF150071, OA1P.TMF150H1.MF150072,
OA1P.TMF150H1.MF150073, OA1P.TMF150H1.MF150074,
OA1P.TMF150H1.MF150075, OA1P.TMF150H1.MF150076,
OA1P.TMF150H1.MF150077, OA1P.TMF150H1.MF150078,
OA1P.TMF150H1.MF150079, OA1P.TMF150H1.MF150080,
OA1P.TMF150H1.MF150081, OA1P.TMF150H1.MF150082,
OA1P.TMF150H1.MF150083, OA1P.TMF150H1.MF150084,
OA1P.TMF150H1.MF150085, OA1P.TMF150H1.MF150086,
OA1P.TMF150H1.MF150087, OA1P.TMF150H1.MF150088,
OA1P.TMF150H1.MF150089, OA1P.TMF150H1.MF150090,
OA1P.TMF150H1.MF150091, OA1P.TMF150H1.MF150092,
OA1P.TMF150H1.MF150019A
FROM OA1P.TMF150H1 ;
--
COMMIT;
}¢--- DSN.TX.CASE(MFNVZDDL) cre=2010-09-03 mod=2010-09-10-16.52.46 A540769 -----
SET CURRENT SQLID='S100447';
$=cre=$creator
???ROP TABLESPACE $db.A150A;
commit;
CREATE TABLESPACE A150A
IN $db
USING STOGROUP GSMS
FREEPAGE 30 PCTFREE 10
DSSIZE 32 G
NUMPARTS 100
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX 30000
CLOSE NO
COMPRESS YES
LOCKPART YES;
COMMIT;
--
------------------------------------------------------------------------
-- Table=$creator.TMF150A1 In $db.A150A
------------------------------------------------------------------------
--
SET CURRENT SCHEMA='$creator';
--
CREATE TABLE $creator.TMF150A1
(MF150001 CHAR(16) NOT NULL WITH DEFAULT,
MF150002 CHAR(1) NOT NULL WITH DEFAULT,
MF150003 CHAR(5) NOT NULL WITH DEFAULT,
MF150004 CHAR(25) NOT NULL WITH DEFAULT,
MF150005 CHAR(1) NOT NULL WITH DEFAULT,
MF150006 CHAR(1) NOT NULL WITH DEFAULT,
MF150007 CHAR(1) NOT NULL WITH DEFAULT,
MF150008 CHAR(3) NOT NULL WITH DEFAULT,
MF150009 CHAR(5) NOT NULL WITH DEFAULT,
MF150010 CHAR(4) NOT NULL WITH DEFAULT,
MF150011 CHAR(1) NOT NULL WITH DEFAULT,
MF150012 CHAR(1) NOT NULL WITH DEFAULT,
MF150013 DATE NOT NULL WITH DEFAULT,
MF150014 CHAR(4) NOT NULL WITH DEFAULT,
MF150015 CHAR(4) NOT NULL WITH DEFAULT,
MF150016 CHAR(4) NOT NULL WITH DEFAULT,
MF150017 CHAR(12) NOT NULL WITH DEFAULT,
MF150018 DECIMAL(15, 3) NOT NULL WITH DEFAULT,
MF150019 DECIMAL(15, 3) NOT NULL WITH DEFAULT,
MF150020 CHAR(8) NOT NULL WITH DEFAULT,
MF150021 TIMESTAMP NOT NULL WITH DEFAULT,
MF150022 CHAR(4) NOT NULL WITH DEFAULT,
MF150023 CHAR(12) NOT NULL WITH DEFAULT,
MF150024 CHAR(1) NOT NULL WITH DEFAULT,
MF150025 CHAR(3) NOT NULL WITH DEFAULT,
MF150026 CHAR(3) NOT NULL WITH DEFAULT,
MF150027 CHAR(3) NOT NULL WITH DEFAULT,
MF150028 CHAR(3) NOT NULL WITH DEFAULT,
MF150029 CHAR(3) NOT NULL WITH DEFAULT,
MF150030 CHAR(16) NOT NULL WITH DEFAULT,
MF150031 CHAR(2) NOT NULL WITH DEFAULT,
MF150032 CHAR(7) NOT NULL WITH DEFAULT,
MF150033 CHAR(7) NOT NULL WITH DEFAULT,
MF150034 CHAR(4) NOT NULL WITH DEFAULT,
MF150035 CHAR(1) NOT NULL WITH DEFAULT,
MF150036 CHAR(18) NOT NULL WITH DEFAULT,
MF150037 DECIMAL(15, 0) NOT NULL WITH DEFAULT,
MF150038 CHAR(16) NOT NULL WITH DEFAULT,
MF150039 CHAR(2) NOT NULL WITH DEFAULT,
MF150040 CHAR(2) NOT NULL WITH DEFAULT,
MF150041 CHAR(2) NOT NULL WITH DEFAULT,
MF150042 CHAR(4) NOT NULL WITH DEFAULT,
MF150043 DECIMAL(15, 3) NOT NULL WITH DEFAULT,
MF150044 CHAR(5) NOT NULL WITH DEFAULT,
MF150045 CHAR(4) NOT NULL WITH DEFAULT,
MF150046 CHAR(4) NOT NULL WITH DEFAULT,
MF150047 CHAR(1) NOT NULL WITH DEFAULT,
MF150051 CHAR(3) NOT NULL WITH DEFAULT,
MF150052 CHAR(3) NOT NULL WITH DEFAULT,
MF150053 DECIMAL(15, 3) NOT NULL WITH DEFAULT,
MF150054 CHAR(7) NOT NULL WITH DEFAULT,
MF150055 CHAR(1) NOT NULL WITH DEFAULT,
MF150056 CHAR(8) NOT NULL WITH DEFAULT,
MF150059 CHAR(5) NOT NULL WITH DEFAULT,
MF150060 TIMESTAMP NOT NULL WITH DEFAULT,
MF150062 CHAR(1) NOT NULL WITH DEFAULT,
MF150063 CHAR(1) NOT NULL WITH DEFAULT,
MF150064 DATE NOT NULL WITH DEFAULT,
MF150065 DATE NOT NULL WITH DEFAULT,
MF150066 CHAR(16) NOT NULL WITH DEFAULT,
MF150067 CHAR(16) NOT NULL WITH DEFAULT,
MF150068 CHAR(16) NOT NULL WITH DEFAULT,
MF150069 CHAR(4) NOT NULL WITH DEFAULT,
MF150070 CHAR(7) NOT NULL WITH DEFAULT,
MF150071 CHAR(1) NOT NULL WITH DEFAULT,
MF150072 CHAR(1) NOT NULL WITH DEFAULT,
MF150073 CHAR(1) NOT NULL WITH DEFAULT,
MF150074 CHAR(1) NOT NULL WITH DEFAULT,
MF150075 CHAR(1) NOT NULL WITH DEFAULT,
MF150076 CHAR(1) NOT NULL WITH DEFAULT,
MF150077 CHAR(6) NOT NULL WITH DEFAULT,
MF150078 CHAR(1) NOT NULL WITH DEFAULT,
MF150079 CHAR(1) NOT NULL WITH DEFAULT,
MF150080 DATE NOT NULL WITH DEFAULT,
MF150081 CHAR(5) NOT NULL WITH DEFAULT,
MF150082 CHAR(26) NOT NULL WITH DEFAULT,
MF150083 SMALLINT NOT NULL WITH DEFAULT,
MF150084 SMALLINT NOT NULL WITH DEFAULT,
MF150085 SMALLINT NOT NULL WITH DEFAULT,
MF150086 CHAR(35) NOT NULL WITH DEFAULT,
MF150087 CHAR(35) NOT NULL WITH DEFAULT,
MF150088 CHAR(35) NOT NULL WITH DEFAULT,
MF150089 CHAR(35) NOT NULL WITH DEFAULT,
MF150090 SMALLINT NOT NULL WITH DEFAULT,
MF150091 SMALLINT NOT NULL WITH DEFAULT,
MF150092 CHAR(16) NOT NULL WITH DEFAULT,
MF150019A CHAR(4) NOT NULL WITH DEFAULT '0010',
MF150HASH SMALLINT NOT NULL with DEFAULT -32768,
CONSTRAINT MF150001
PRIMARY KEY (MF150001))
IN $db.A150A
PARTITION BY (MF150HASH ASC)
(
part 1 values ( 105),
part 2 values ( 224),
part 3 values ( 340),
part 4 values ( 432),
part 5 values ( 554),
part 6 values ( 656),
part 7 values ( 770),
part 8 values ( 892),
part 9 values ( 991),
part 10 values ( 1115),
part 11 values ( 1211),
part 12 values ( 1315),
part 13 values ( 1435),
part 14 values ( 1524),
part 15 values ( 1651),
part 16 values ( 1751),
part 17 values ( 1867),
part 18 values ( 1988),
part 19 values ( 2079),
part 20 values ( 2153),
part 21 values ( 2273),
part 22 values ( 2367),
part 23 values ( 2492),
part 24 values ( 2609),
part 25 values ( 2675),
part 26 values ( 2795),
part 27 values ( 2901),
part 28 values ( 3015),
part 29 values ( 3134),
part 30 values ( 3233),
part 31 values ( 3311),
part 32 values ( 3432),
part 33 values ( 3538),
part 34 values ( 3659),
part 35 values ( 3770),
part 36 values ( 3845),
part 37 values ( 3966),
part 38 values ( 4075),
part 39 values ( 4191),
part 40 values ( 4311),
part 41 values ( 4417),
part 42 values ( 4542),
part 43 values ( 4651),
part 44 values ( 4763),
part 45 values ( 4879),
part 46 values ( 4983),
part 47 values ( 5105),
part 48 values ( 5214),
part 49 values ( 5333),
part 50 values ( 5457),
part 51 values ( 5566),
part 52 values ( 5691),
part 53 values ( 5802),
part 54 values ( 5918),
part 55 values ( 6034),
part 56 values ( 6149),
part 57 values ( 6273),
part 58 values ( 6385),
part 59 values ( 6505),
part 60 values ( 6608),
part 61 values ( 6720),
part 62 values ( 6844),
part 63 values ( 6956),
part 64 values ( 7070),
part 65 values ( 7179),
part 66 values ( 7295),
part 67 values ( 7420),
part 68 values ( 7540),
part 69 values ( 7650),
part 70 values ( 7749),
part 71 values ( 7862),
part 72 values ( 7989),
part 73 values ( 8119),
part 74 values ( 8225),
part 75 values ( 8332),
part 76 values ( 8447),
part 77 values ( 8531),
part 78 values ( 8659),
part 79 values ( 8778),
part 80 values ( 8889),
part 81 values ( 9011),
part 82 values ( 9088),
part 83 values ( 9216),
part 84 values ( 9340),
part 85 values ( 9444),
part 86 values ( 9562),
part 87 values ( 9664),
part 88 values ( 9733),
part 89 values ( 9862),
part 90 values ( 9971),
part 91 values (10084),
part 92 values (10206),
part 93 values (10269),
part 94 values (10396),
part 95 values (10512),
part 96 values (10620),
part 97 values (10747),
part 98 values (10843),
part 99 values (10971),
part 100 values (11046)
)
;
--
LABEL ON TABLE $creator.TMF150A1 IS 'Mittelflussrechnung';
--
LABEL ON $creator.TMF150A1
(MF150HASH IS 'PartitionierungsHash',
MF150019A IS 'Buchführungswährung',
MF150091 IS 'Limiten-Hierarchie',
MF150090 IS 'Limiten-Typ',
MF150089 IS 'Ort Begünstigter',
MF150088 IS 'Name Begünstigter',
MF150087 IS 'Ort Auftraggeber',
MF150086 IS 'Name Auftraggeber',
MF150085 IS 'Life-Cycle-Status',
MF150084 IS 'Relevant-Group',
MF150083 IS 'Transaction-Typ',
MF150082 IS 'Lade_Timestamp_ID',
MF150081 IS 'Preiskomponente',
MF150080 IS 'mutierbar bis',
MF150079 IS 'Depot_Uebertrag',
MF150078 IS 'Vorheriger GP-Typ',
MF150077 IS 'Bankenclearing-Nr',
MF150076 IS 'Kommentar_Status',
MF150075 IS 'Edit-Status Gesamt',
MF150074 IS 'EDIT-STATUS URHEBER',
MF150073 IS 'EDIT-STATUS GRUND',
MF150072 IS 'Edit-Status Gegenpartei',
MF150071 IS 'Prüfziffer Kundencif',
MF150070 IS 'Stammnummer Kundencif',
MF150069 IS 'Bankstelle Kundencif',
MF150068 IS 'int. Form OE Kundenbüro GP',
MF150067 IS 'int. Form OE Kundenbüro',
MF150066 IS 'int. Form OE-ID KV',
MF150065 IS 'Cif-Saldierungsdatum',
MF150064 IS 'Cif-Eröffnungsdatum',
MF150063 IS 'Mittelfluss-Identifikation',
MF150062 IS 'Coupon-Mantel',
MF150060 IS 'Erstellungstimestamp',
MF150059 IS 'Auftragslaufnummer',
MF150056 IS 'Endverfall Obligationen',
MF150055 IS 'Richtung des Mittelflusses',
MF150054 IS 'Leitweg',
MF150053 IS 'Volumen in Nominal/Stück',
MF150052 IS 'Bearbeitungscode',
MF150051 IS 'Domizil Gegenpartei',
MF150047 IS 'Buchungsart',
MF150046 IS 'eff.Depotstelle/Umbuchungskto',
MF150045 IS 'Depotstelle bzw. GFM_Laufnr.',
MF150044 IS 'Sequenz-Nummer zu Valor',
MF150043 IS 'Betrag zu Bestandeswährung',
MF150042 IS 'Bestandeswährung',
MF150041 IS 'Untergruppe Gegenpartei',
MF150040 IS 'Hauptgruppe Gegenpartei',
MF150039 IS 'Gegenpartei-Geldmarktzusatz',
MF150038 IS 'Gegenpartei-Beziehungsnummer',
MF150037 IS 'CSID Gegenpartei',
MF150036 IS 'Gegenpartei',
MF150035 IS 'Gegenpartei-Typ',
MF150034 IS 'BUID Gegenpartei',
MF150033 IS 'KundenverantwortlicheR',
MF150032 IS 'Kundenbüro Kunde',
MF150031 IS 'Kunden-Geldmarktzusatz',
MF150030 IS 'Kunden-Beziehungsnummer',
MF150029 IS 'Depotartenschlüssel',
MF150028 IS 'Kontoartenschlüssel',
MF150027 IS 'Kundendomizil',
MF150026 IS 'Kundensegment',
MF150025 IS 'Kundenart',
MF150024 IS 'PVV-Kunde',
MF150023 IS 'Cifnummer Kunde',
MF150022 IS 'BUID Kunde',
MF150021 IS 'Mutationsdatum',
MF150020 IS 'MutationsPID',
MF150019 IS 'Betrag in Buchführungswährung',
MF150018 IS 'Betrag in FWhrg',
MF150017 IS 'Valor',
MF150016 IS 'Währung',
MF150015 IS 'Urheber',
MF150014 IS 'Grund',
MF150013 IS 'Buchungsdatum',
MF150012 IS 'Bewegungsverdichtung',
MF150011 IS 'Produkteklassifizierung',
MF150010 IS 'MF-Produkt',
MF150009 IS 'Produktenr.Prok/Textcode Hypo',
MF150008 IS 'Bewegungsart Depot/Edelmetall',
MF150007 IS 'zu bewerten',
MF150006 IS 'nachzuerfassen',
MF150005 IS 'Storno',
MF150004 IS 'Auftragsnummer',
MF150003 IS 'Lieferantentyp',
MF150002 IS 'RZ-Herkunft',
MF150001 IS 'ID Mittelfluss (UUID)');
commit;
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.IMF $creator.TMF150A1
------------------------------------------------------------------------
--
CREATE UNIQUE INDEX $creator.IMF150A0
ON $creator.TMF150A1
(MF150001 ASC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.IMF150A1 On $creator.TMF150A1
------------------------------------------------------------------------
--
CREATE INDEX $creator.IMF150A1
ON $creator.TMF150A1
(MF150013 ASC,
MF150067 ASC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.IMF150A2 On $creator.TMF150A1
------------------------------------------------------------------------
--
CREATE INDEX $creator.IMF150A2
ON $creator.TMF150A1
(MF150023 ASC,
MF150013 DESC)
USING STOGROUP GSMS
CLUSTER
BUFFERPOOL BP1
CLOSE NO
;
--
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.IMF150A3 On $creator.TMF150A1
------------------------------------------------------------------------
--
CREATE INDEX $creator.IMF150A3
ON $creator.TMF150A1
(MF150066 ASC,
MF150013 DESC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.IMF150A4 On $creator.TMF150A1
------------------------------------------------------------------------
--
CREATE INDEX $creator.IMF150A4
ON $creator.TMF150A1
(MF150067 ASC,
MF150013 DESC,
MF150019 DESC,
MF150066 DESC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 4 G;
--
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.IMF150A5 On $creator.TMF150A1
------------------------------------------------------------------------
--
CREATE UNIQUE INDEX $creator.IMF150A5
ON $creator.TMF150A1
(MF150004 ASC,
MF150059 ASC,
MF150005 ASC,
MF150013 ASC,
MF150023 ASC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.IMF150A6 On $creator.TMF150A1
------------------------------------------------------------------------
--
CREATE INDEX $creator.IMF150A6
ON $creator.TMF150A1
(MF150085 ASC,
MF150084 ASC,
MF150060 ASC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.IMF150A7 On $creator.TMF150A1
------------------------------------------------------------------------
--
CREATE INDEX $creator.IMF150A7
ON $creator.TMF150A1
(MF150084 ASC,
MF150085 ASC,
MF150022 ASC,
MF150023 ASC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.IMF150A8 On $creator.TMF150A1
------------------------------------------------------------------------
--
CREATE UNIQUE INDEX $creator.IMF150A8
ON $creator.TMF150A1
(MF150023 ASC,
MF150013 ASC,
MF150001 ASC,
MF150019 ASC,
MF150083 ASC)
USING STOGROUP GSMS
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 8 G;
--
COMMIT;
--
--
--drop trigger $creator.TMF150A1Ins ;
--drop trigger $creator.TMF150A1Upd ;
create trigger $creator.TMF150A1Ins no cascade before insert
on $creator.TMF150A1 referencing New as n
for each row mode db2sql
set MF150HASH =
smallint(mod(
month(n.MF150013) * 100000
+ int(translate(
translate('08642', hex(substr(n.MF150023, 8,5)), '1234567890')
, '024579', 'ABCDEF'))
, 11047))
;
create trigger $creator.TMF150A1Upd no cascade before
update of MF150013, MF150023, MF150HASH
on $creator.TMF150A1 referencing New as N
for each row mode db2sql
set MF150HASH =
smallint(mod(
month(n.MF150013) * 100000
+ int(translate(
translate('08642', hex(substr(n.MF150023, 8,5)), '1234567890')
, '024579', 'ABCDEF'))
, 11047))
;
COMMIT;
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","$cre" ;
--
CREATE VIEW $cre.VMF150ALL(ID_MITTELFLUSS, RZ_HERKUNFT,
LIEFERANTENTYP, AUFTRAGSNUMMER, STORNO, NACHZUERFASSEN,
ZU_BEWERTEN, BEWEGUNGSART_DEPOT, PRODUKTENR_PROK, MF_PRODUKT,
PRODUKTEKLASSE, BEWEGUNGSVERDICHT, BUCHUNGSDATUM, GRUND,
URHEBER, WAEHRUNG, VALOR, BETRAG_FWHRG, BUWHR, BETRAG_BUWHR,
MUTATIONSPID, MUTATIONSDATUM, BUID_KUNDE, CIFNUMMER_KUNDE,
PVV_KUNDE, KUNDENART, KUNDENSEGMENT, KUNDENDOMIZIL,
KONTOARTENSCHLUESS, DEPOTARTENSCHLUESS, KUNDEN_BEZIEHUNGNR,
KUNDEN_GMZUSATZ, KUNDENBUERO_KUNDE, KUNDENVERANTWORTL,
BUID_GEGENPARTEI, GEGENPARTEI_TYP, GEGENPARTEI,
CSID_GEGENPARTEI, GP_BEZIEHUNGSNR, GP_GELDMARKTZUSATZ,
HAUPTGRUPPE_GP, UNTERGRUPPE_GP, BESTANDESWAEHRUNG,
BETR_BESTANDESWHRG, VALOREN_SEQUENZNR, GFM_LAUFNUMMER,
DEPOTSTELLE, BUCHUNGSART, DOMIZIL_GP, BEARBEITUNGSCODE,
VOLUMEN_NOM_STCK, LEITWEG, ZU_ABFLUSS, POLICENNUMMER,
AUFTRAGSLAUFNUMMER, ERSTELLUNGSTIMSTMP, COUPON_MANTEL,
MITTELFLUSS_IDENTI, EROEFFNUNGSDATUM, SALDIERUNGSDATUM,
INT_OE_FORM_PID_KV, INT_OE_KUNDENBUERO, INT_OE_KBUERO_GP,
BIC_1TEIL, BIC_2TEIL, GP_CODE_REL, EDIT_STATUS_GP,
EDIT_STATUS_GRUND, EDIT_STATUS_URHEB, EDIT_STATUS_GESAMT,
EDIT_STATUS_KOMMNT, BANKENCLEARING_NR, VORHERIGER_GP_TYP,
DEPOTUEBERTRAG, MUTIERBAR_BIS, PREISKOMPONENTE,
LADE_TIMESTAMP_ID, TRANSACTION_TYP, RELEVANT_GROUP,
LIFE_CYCLE_STATUS, NAME_AUFTRAGGEBER, ORT_AUFTRAGGEBER,
NAME_BEGUENSTIGTER, ORT_BEGUENSTIGTER, LIMITEN_TYP,
LIMITEN_HIERARCHIE, RM_INTERNATIONAL) AS
SELECT ALL $cre.TMF150A1.MF150001, $cre.TMF150A1.MF150002,
$cre.TMF150A1.MF150003, $cre.TMF150A1.MF150004,
$cre.TMF150A1.MF150005, $cre.TMF150A1.MF150006,
$cre.TMF150A1.MF150007, $cre.TMF150A1.MF150008,
$cre.TMF150A1.MF150009, $cre.TMF150A1.MF150010,
$cre.TMF150A1.MF150011, $cre.TMF150A1.MF150012,
$cre.TMF150A1.MF150013, $cre.TMF150A1.MF150014,
$cre.TMF150A1.MF150015, $cre.TMF150A1.MF150016,
$cre.TMF150A1.MF150017, $cre.TMF150A1.MF150018,
$cre.TMF150A1.MF150019A, $cre.TMF150A1.MF150019,
$cre.TMF150A1.MF150020, $cre.TMF150A1.MF150021,
$cre.TMF150A1.MF150022, $cre.TMF150A1.MF150023,
$cre.TMF150A1.MF150024, $cre.TMF150A1.MF150025,
$cre.TMF150A1.MF150026, $cre.TMF150A1.MF150027,
$cre.TMF150A1.MF150028, $cre.TMF150A1.MF150029,
$cre.TMF150A1.MF150030, $cre.TMF150A1.MF150031,
$cre.TMF150A1.MF150032, $cre.TMF150A1.MF150033,
$cre.TMF150A1.MF150034, $cre.TMF150A1.MF150035,
$cre.TMF150A1.MF150036, $cre.TMF150A1.MF150037,
$cre.TMF150A1.MF150038, $cre.TMF150A1.MF150039,
$cre.TMF150A1.MF150040, $cre.TMF150A1.MF150041,
$cre.TMF150A1.MF150042, $cre.TMF150A1.MF150043,
$cre.TMF150A1.MF150044, $cre.TMF150A1.MF150045,
$cre.TMF150A1.MF150046, $cre.TMF150A1.MF150047,
$cre.TMF150A1.MF150051, $cre.TMF150A1.MF150052,
$cre.TMF150A1.MF150053, $cre.TMF150A1.MF150054,
$cre.TMF150A1.MF150055, $cre.TMF150A1.MF150056,
$cre.TMF150A1.MF150059, $cre.TMF150A1.MF150060,
$cre.TMF150A1.MF150062, $cre.TMF150A1.MF150063,
$cre.TMF150A1.MF150064, $cre.TMF150A1.MF150065,
$cre.TMF150A1.MF150066, $cre.TMF150A1.MF150067,
$cre.TMF150A1.MF150068, $cre.TMF150A1.MF150069,
$cre.TMF150A1.MF150070, $cre.TMF150A1.MF150071,
$cre.TMF150A1.MF150072, $cre.TMF150A1.MF150073,
$cre.TMF150A1.MF150074, $cre.TMF150A1.MF150075,
$cre.TMF150A1.MF150076, $cre.TMF150A1.MF150077,
$cre.TMF150A1.MF150078, $cre.TMF150A1.MF150079,
$cre.TMF150A1.MF150080, $cre.TMF150A1.MF150081,
$cre.TMF150A1.MF150082, $cre.TMF150A1.MF150083,
$cre.TMF150A1.MF150084, $cre.TMF150A1.MF150085,
$cre.TMF150A1.MF150086, $cre.TMF150A1.MF150087,
$cre.TMF150A1.MF150088, $cre.TMF150A1.MF150089,
$cre.TMF150A1.MF150090, $cre.TMF150A1.MF150091,
$cre.TMF150A1.MF150092
FROM $cre.TMF150A1
UNION ALL
SELECT ALL $cre.TMF150H1.MF150001, $cre.TMF150H1.MF150002,
$cre.TMF150H1.MF150003, $cre.TMF150H1.MF150004,
$cre.TMF150H1.MF150005, $cre.TMF150H1.MF150006,
$cre.TMF150H1.MF150007, $cre.TMF150H1.MF150008,
$cre.TMF150H1.MF150009, $cre.TMF150H1.MF150010,
$cre.TMF150H1.MF150011, $cre.TMF150H1.MF150012,
$cre.TMF150H1.MF150013, $cre.TMF150H1.MF150014,
$cre.TMF150H1.MF150015, $cre.TMF150H1.MF150016,
$cre.TMF150H1.MF150017, $cre.TMF150H1.MF150018,
$cre.TMF150H1.MF150019A, $cre.TMF150H1.MF150019,
$cre.TMF150H1.MF150020, $cre.TMF150H1.MF150021,
$cre.TMF150H1.MF150022, $cre.TMF150H1.MF150023,
$cre.TMF150H1.MF150024, $cre.TMF150H1.MF150025,
$cre.TMF150H1.MF150026, $cre.TMF150H1.MF150027,
$cre.TMF150H1.MF150028, $cre.TMF150H1.MF150029,
$cre.TMF150H1.MF150030, $cre.TMF150H1.MF150031,
$cre.TMF150H1.MF150032, $cre.TMF150H1.MF150033,
$cre.TMF150H1.MF150034, $cre.TMF150H1.MF150035,
$cre.TMF150H1.MF150036, $cre.TMF150H1.MF150037,
$cre.TMF150H1.MF150038, $cre.TMF150H1.MF150039,
$cre.TMF150H1.MF150040, $cre.TMF150H1.MF150041,
$cre.TMF150H1.MF150042, $cre.TMF150H1.MF150043,
$cre.TMF150H1.MF150044, $cre.TMF150H1.MF150045,
$cre.TMF150H1.MF150046, $cre.TMF150H1.MF150047,
$cre.TMF150H1.MF150051, $cre.TMF150H1.MF150052,
$cre.TMF150H1.MF150053, $cre.TMF150H1.MF150054,
$cre.TMF150H1.MF150055, $cre.TMF150H1.MF150056,
$cre.TMF150H1.MF150059, $cre.TMF150H1.MF150060,
$cre.TMF150H1.MF150062, $cre.TMF150H1.MF150063,
$cre.TMF150H1.MF150064, $cre.TMF150H1.MF150065,
$cre.TMF150H1.MF150066, $cre.TMF150H1.MF150067,
$cre.TMF150H1.MF150068, $cre.TMF150H1.MF150069,
$cre.TMF150H1.MF150070, $cre.TMF150H1.MF150071,
$cre.TMF150H1.MF150072, $cre.TMF150H1.MF150073,
$cre.TMF150H1.MF150074, $cre.TMF150H1.MF150075,
$cre.TMF150H1.MF150076, $cre.TMF150H1.MF150077,
$cre.TMF150H1.MF150078, $cre.TMF150H1.MF150079,
$cre.TMF150H1.MF150080, $cre.TMF150H1.MF150081,
$cre.TMF150H1.MF150082, $cre.TMF150H1.MF150083,
$cre.TMF150H1.MF150084, $cre.TMF150H1.MF150085,
$cre.TMF150H1.MF150086, $cre.TMF150H1.MF150087,
$cre.TMF150H1.MF150088, $cre.TMF150H1.MF150089,
$cre.TMF150H1.MF150090, $cre.TMF150H1.MF150091,
$cre.TMF150H1.MF150092
FROM $cre.TMF150H1 ;
--
------------------------------------------------------------------------
-- View=$cre.VMF150A1V
------------------------------------------------------------------------
--
CREATE VIEW $cre.VMF150A1V(ID_MITTELFLUSS, RZ_HERKUNFT,
LIEFERANTENTYP, AUFTRAGSNUMMER, STORNO, NACHZUERFASSEN,
ZU_BEWERTEN, BEWEGUNGSART_DEPOT, PRODUKTENR_PROK, MF_PRODUKT,
PRODUKTEKLASSE, BEWEGUNGSVERDICHT, BUCHUNGSDATUM, GRUND,
URHEBER, WAEHRUNG, VALOR, BETRAG_FWHRG, BUWHR, BETRAG_BUWHR,
MUTATIONSPID, MUTATIONSDATUM, BUID_KUNDE, CIFNUMMER_KUNDE,
PVV_KUNDE, KUNDENART, KUNDENSEGMENT, KUNDENDOMIZIL,
KONTOARTENSCHLUESS, DEPOTARTENSCHLUESS, KUNDEN_BEZIEHUNGNR,
KUNDEN_GMZUSATZ, KUNDENBUERO_KUNDE, KUNDENVERANTWORTL,
BUID_GEGENPARTEI, GEGENPARTEI_TYP, GEGENPARTEI,
CSID_GEGENPARTEI, GP_BEZIEHUNGSNR, GP_GELDMARKTZUSATZ,
HAUPTGRUPPE_GP, UNTERGRUPPE_GP, BESTANDESWAEHRUNG,
BETR_BESTANDESWHRG, VALOREN_SEQUENZNR, GFM_LAUFNUMMER,
DEPOTSTELLE, BUCHUNGSART, DOMIZIL_GP, BEARBEITUNGSCODE,
VOLUMEN_NOM_STCK, LEITWEG, ZU_ABFLUSS, POLICENNUMMER,
AUFTRAGSLAUFNUMMER, ERSTELLUNGSTIMSTMP, COUPON_MANTEL,
MITTELFLUSS_IDENTI, EROEFFNUNGSDATUM, SALDIERUNGSDATUM,
INT_OE_FORM_PID_KV, INT_OE_KUNDENBUERO, INT_OE_KBUERO_GP,
BIC_1TEIL, BIC_2TEIL, GP_CODE_REL, EDIT_STATUS_GP,
EDIT_STATUS_GRUND, EDIT_STATUS_URHEB, EDIT_STATUS_GESAMT,
EDIT_STATUS_KOMMNT, BANKENCLEARING_NR, VORHERIGER_GP_TYP,
DEPOTUEBERTRAG, MUTIERBAR_BIS, PREISKOMPONENTE,
LADE_TIMESTAMP_ID, TRANSACTION_TYP, RELEVANT_GROUP,
LIFE_CYCLE_STATUS, NAME_AUFTRAGGEBER, ORT_AUFTRAGGEBER,
NAME_BEGUENSTIGTER, ORT_BEGUENSTIGTER, LIMITEN_TYP,
LIMITEN_HIERARCHIE, RM_INTERNATIONAL) AS
SELECT ALL $cre.TMF150A1.MF150001, $cre.TMF150A1.MF150002,
$cre.TMF150A1.MF150003, $cre.TMF150A1.MF150004,
$cre.TMF150A1.MF150005, $cre.TMF150A1.MF150006,
$cre.TMF150A1.MF150007, $cre.TMF150A1.MF150008,
$cre.TMF150A1.MF150009, $cre.TMF150A1.MF150010,
$cre.TMF150A1.MF150011, $cre.TMF150A1.MF150012,
$cre.TMF150A1.MF150013, $cre.TMF150A1.MF150014,
$cre.TMF150A1.MF150015, $cre.TMF150A1.MF150016,
$cre.TMF150A1.MF150017, $cre.TMF150A1.MF150018,
$cre.TMF150A1.MF150019A, $cre.TMF150A1.MF150019,
$cre.TMF150A1.MF150020, $cre.TMF150A1.MF150021,
$cre.TMF150A1.MF150022, $cre.TMF150A1.MF150023,
$cre.TMF150A1.MF150024, $cre.TMF150A1.MF150025,
$cre.TMF150A1.MF150026, $cre.TMF150A1.MF150027,
$cre.TMF150A1.MF150028, $cre.TMF150A1.MF150029,
$cre.TMF150A1.MF150030, $cre.TMF150A1.MF150031,
$cre.TMF150A1.MF150032, $cre.TMF150A1.MF150033,
$cre.TMF150A1.MF150034, $cre.TMF150A1.MF150035,
$cre.TMF150A1.MF150036, $cre.TMF150A1.MF150037,
$cre.TMF150A1.MF150038, $cre.TMF150A1.MF150039,
$cre.TMF150A1.MF150040, $cre.TMF150A1.MF150041,
$cre.TMF150A1.MF150042, $cre.TMF150A1.MF150043,
$cre.TMF150A1.MF150044, $cre.TMF150A1.MF150045,
$cre.TMF150A1.MF150046, $cre.TMF150A1.MF150047,
$cre.TMF150A1.MF150051, $cre.TMF150A1.MF150052,
$cre.TMF150A1.MF150053, $cre.TMF150A1.MF150054,
$cre.TMF150A1.MF150055, $cre.TMF150A1.MF150056,
$cre.TMF150A1.MF150059, $cre.TMF150A1.MF150060,
$cre.TMF150A1.MF150062, $cre.TMF150A1.MF150063,
$cre.TMF150A1.MF150064, $cre.TMF150A1.MF150065,
$cre.TMF150A1.MF150066, $cre.TMF150A1.MF150067,
$cre.TMF150A1.MF150068, $cre.TMF150A1.MF150069,
$cre.TMF150A1.MF150070, $cre.TMF150A1.MF150071,
$cre.TMF150A1.MF150072, $cre.TMF150A1.MF150073,
$cre.TMF150A1.MF150074, $cre.TMF150A1.MF150075,
$cre.TMF150A1.MF150076, $cre.TMF150A1.MF150077,
$cre.TMF150A1.MF150078, $cre.TMF150A1.MF150079,
$cre.TMF150A1.MF150080, $cre.TMF150A1.MF150081,
$cre.TMF150A1.MF150082, $cre.TMF150A1.MF150083,
$cre.TMF150A1.MF150084, $cre.TMF150A1.MF150085,
$cre.TMF150A1.MF150086, $cre.TMF150A1.MF150087,
$cre.TMF150A1.MF150088, $cre.TMF150A1.MF150089,
$cre.TMF150A1.MF150090, $cre.TMF150A1.MF150091,
$cre.TMF150A1.MF150092
FROM $cre.TMF150A1 ;
--
------------------------------------------------------------------------
-- View=$cre.VMF150ALL_T
------------------------------------------------------------------------
--
CREATE VIEW $cre.VMF150ALL_T(MF150001, MF150002, MF150003, MF150004,
MF150005, MF150006, MF150007, MF150008, MF150009, MF150010,
MF150011, MF150012, MF150013, MF150014, MF150015, MF150016,
MF150017, MF150018, MF150019, MF150020, MF150021, MF150022,
MF150023, MF150024, MF150025, MF150026, MF150027, MF150028,
MF150029, MF150030, MF150031, MF150032, MF150033, MF150034,
MF150035, MF150036, MF150037, MF150038, MF150039, MF150040,
MF150041, MF150042, MF150043, MF150044, MF150045, MF150046,
MF150047, MF150051, MF150052, MF150053, MF150054, MF150055,
MF150056, MF150059, MF150060, MF150062, MF150063, MF150064,
MF150065, MF150066, MF150067, MF150068, MF150069, MF150070,
MF150071, MF150072, MF150073, MF150074, MF150075, MF150076,
MF150077, MF150078, MF150079, MF150080, MF150081, MF150082,
MF150083, MF150084, MF150085, MF150086, MF150087, MF150088,
MF150089, MF150090, MF150091, MF150092, MF150019A) AS
SELECT ALL $cre.TMF150A1.MF150001, $cre.TMF150A1.MF150002,
$cre.TMF150A1.MF150003, $cre.TMF150A1.MF150004,
$cre.TMF150A1.MF150005, $cre.TMF150A1.MF150006,
$cre.TMF150A1.MF150007, $cre.TMF150A1.MF150008,
$cre.TMF150A1.MF150009, $cre.TMF150A1.MF150010,
$cre.TMF150A1.MF150011, $cre.TMF150A1.MF150012,
$cre.TMF150A1.MF150013, $cre.TMF150A1.MF150014,
$cre.TMF150A1.MF150015, $cre.TMF150A1.MF150016,
$cre.TMF150A1.MF150017, $cre.TMF150A1.MF150018,
$cre.TMF150A1.MF150019, $cre.TMF150A1.MF150020,
$cre.TMF150A1.MF150021, $cre.TMF150A1.MF150022,
$cre.TMF150A1.MF150023, $cre.TMF150A1.MF150024,
$cre.TMF150A1.MF150025, $cre.TMF150A1.MF150026,
$cre.TMF150A1.MF150027, $cre.TMF150A1.MF150028,
$cre.TMF150A1.MF150029, $cre.TMF150A1.MF150030,
$cre.TMF150A1.MF150031, $cre.TMF150A1.MF150032,
$cre.TMF150A1.MF150033, $cre.TMF150A1.MF150034,
$cre.TMF150A1.MF150035, $cre.TMF150A1.MF150036,
$cre.TMF150A1.MF150037, $cre.TMF150A1.MF150038,
$cre.TMF150A1.MF150039, $cre.TMF150A1.MF150040,
$cre.TMF150A1.MF150041, $cre.TMF150A1.MF150042,
$cre.TMF150A1.MF150043, $cre.TMF150A1.MF150044,
$cre.TMF150A1.MF150045, $cre.TMF150A1.MF150046,
$cre.TMF150A1.MF150047, $cre.TMF150A1.MF150051,
$cre.TMF150A1.MF150052, $cre.TMF150A1.MF150053,
$cre.TMF150A1.MF150054, $cre.TMF150A1.MF150055,
$cre.TMF150A1.MF150056, $cre.TMF150A1.MF150059,
$cre.TMF150A1.MF150060, $cre.TMF150A1.MF150062,
$cre.TMF150A1.MF150063, $cre.TMF150A1.MF150064,
$cre.TMF150A1.MF150065, $cre.TMF150A1.MF150066,
$cre.TMF150A1.MF150067, $cre.TMF150A1.MF150068,
$cre.TMF150A1.MF150069, $cre.TMF150A1.MF150070,
$cre.TMF150A1.MF150071, $cre.TMF150A1.MF150072,
$cre.TMF150A1.MF150073, $cre.TMF150A1.MF150074,
$cre.TMF150A1.MF150075, $cre.TMF150A1.MF150076,
$cre.TMF150A1.MF150077, $cre.TMF150A1.MF150078,
$cre.TMF150A1.MF150079, $cre.TMF150A1.MF150080,
$cre.TMF150A1.MF150081, $cre.TMF150A1.MF150082,
$cre.TMF150A1.MF150083, $cre.TMF150A1.MF150084,
$cre.TMF150A1.MF150085, $cre.TMF150A1.MF150086,
$cre.TMF150A1.MF150087, $cre.TMF150A1.MF150088,
$cre.TMF150A1.MF150089, $cre.TMF150A1.MF150090,
$cre.TMF150A1.MF150091, $cre.TMF150A1.MF150092,
$cre.TMF150A1.MF150019A
FROM $cre.TMF150A1
UNION ALL
SELECT ALL $cre.TMF150H1.MF150001, $cre.TMF150H1.MF150002,
$cre.TMF150H1.MF150003, $cre.TMF150H1.MF150004,
$cre.TMF150H1.MF150005, $cre.TMF150H1.MF150006,
$cre.TMF150H1.MF150007, $cre.TMF150H1.MF150008,
$cre.TMF150H1.MF150009, $cre.TMF150H1.MF150010,
$cre.TMF150H1.MF150011, $cre.TMF150H1.MF150012,
$cre.TMF150H1.MF150013, $cre.TMF150H1.MF150014,
$cre.TMF150H1.MF150015, $cre.TMF150H1.MF150016,
$cre.TMF150H1.MF150017, $cre.TMF150H1.MF150018,
$cre.TMF150H1.MF150019, $cre.TMF150H1.MF150020,
$cre.TMF150H1.MF150021, $cre.TMF150H1.MF150022,
$cre.TMF150H1.MF150023, $cre.TMF150H1.MF150024,
$cre.TMF150H1.MF150025, $cre.TMF150H1.MF150026,
$cre.TMF150H1.MF150027, $cre.TMF150H1.MF150028,
$cre.TMF150H1.MF150029, $cre.TMF150H1.MF150030,
$cre.TMF150H1.MF150031, $cre.TMF150H1.MF150032,
$cre.TMF150H1.MF150033, $cre.TMF150H1.MF150034,
$cre.TMF150H1.MF150035, $cre.TMF150H1.MF150036,
$cre.TMF150H1.MF150037, $cre.TMF150H1.MF150038,
$cre.TMF150H1.MF150039, $cre.TMF150H1.MF150040,
$cre.TMF150H1.MF150041, $cre.TMF150H1.MF150042,
$cre.TMF150H1.MF150043, $cre.TMF150H1.MF150044,
$cre.TMF150H1.MF150045, $cre.TMF150H1.MF150046,
$cre.TMF150H1.MF150047, $cre.TMF150H1.MF150051,
$cre.TMF150H1.MF150052, $cre.TMF150H1.MF150053,
$cre.TMF150H1.MF150054, $cre.TMF150H1.MF150055,
$cre.TMF150H1.MF150056, $cre.TMF150H1.MF150059,
$cre.TMF150H1.MF150060, $cre.TMF150H1.MF150062,
$cre.TMF150H1.MF150063, $cre.TMF150H1.MF150064,
$cre.TMF150H1.MF150065, $cre.TMF150H1.MF150066,
$cre.TMF150H1.MF150067, $cre.TMF150H1.MF150068,
$cre.TMF150H1.MF150069, $cre.TMF150H1.MF150070,
$cre.TMF150H1.MF150071, $cre.TMF150H1.MF150072,
$cre.TMF150H1.MF150073, $cre.TMF150H1.MF150074,
$cre.TMF150H1.MF150075, $cre.TMF150H1.MF150076,
$cre.TMF150H1.MF150077, $cre.TMF150H1.MF150078,
$cre.TMF150H1.MF150079, $cre.TMF150H1.MF150080,
$cre.TMF150H1.MF150081, $cre.TMF150H1.MF150082,
$cre.TMF150H1.MF150083, $cre.TMF150H1.MF150084,
$cre.TMF150H1.MF150085, $cre.TMF150H1.MF150086,
$cre.TMF150H1.MF150087, $cre.TMF150H1.MF150088,
$cre.TMF150H1.MF150089, $cre.TMF150H1.MF150090,
$cre.TMF150H1.MF150091, $cre.TMF150H1.MF150092,
$cre.TMF150H1.MF150019A
FROM $cre.TMF150H1 ;
--
COMMIT;
}¢--- DSN.TX.CASE(MFNVZDD0) cre=2010-09-03 mod=2010-09-03-10.48.15 A540769 -----
SET CURRENT SQLID='S100447';
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","$creator" ;
--
drop VIEW $creator.$'$'VMF150Hash;
CREATE VIEW $creator.$'$'VMF150Hash
as select t.*,
smallint(mod(
month(MF150013) * 100000
+ int(translate(
translate('08642', hex(substr(MF150023, 8,5)), '1234567890')
, '024579', 'ABCDEF'))
, 11047)) mf150Hash
from $creator.tmf150A1 t
;
commit;
}¢--- DSN.TX.CASE(MFNVZDEI) cre=2010-09-06 mod=2010-09-06-10.10.33 A540769 -----
declare global temporary table session.keys as
( select MF150013, MF150067 from oa1a.tmf150a1 )
with no data
on commit delete rows
;
select MF150013, MF150067, count(*)
from oa1a.tmf150a1
group by MF150013, MF150067
fetch first 10 rows only
;
insert into session.keys
select MF150013, MF150067 from
( select MF150013, MF150067
from oa1a.tmf150a1
fetch first 10 rows only
) i
group by MF150013, MF150067
;
select * from session.keys;
insert into oa1a.tmf150H1 (
MF150001 ,
MF150002 ,
MF150003 ,
MF150004 ,
MF150005 ,
MF150006 ,
MF150007 ,
MF150008 ,
MF150009 ,
MF150010 ,
MF150011 ,
MF150012 ,
MF150013 ,
MF150014 ,
MF150015 ,
MF150016 ,
MF150017 ,
MF150018 ,
MF150019 ,
MF150020 ,
MF150021 ,
MF150022 ,
MF150023 ,
MF150024 ,
MF150025 ,
MF150026 ,
MF150027 ,
MF150028 ,
MF150029 ,
MF150030 ,
MF150031 ,
MF150032 ,
MF150033 ,
MF150034 ,
MF150035 ,
MF150036 ,
MF150037 ,
MF150038 ,
MF150039 ,
MF150040 ,
MF150041 ,
MF150042 ,
MF150043 ,
MF150044 ,
MF150045 ,
MF150046 ,
MF150047 ,
MF150051 ,
MF150052 ,
MF150053 ,
MF150054 ,
MF150055 ,
MF150056 ,
MF150059 ,
MF150060 ,
MF150062 ,
MF150063 ,
MF150064 ,
MF150065 ,
MF150066 ,
MF150067 ,
MF150068 ,
MF150069 ,
MF150070 ,
MF150071 ,
MF150072 ,
MF150073 ,
MF150074 ,
MF150075 ,
MF150076 ,
MF150077 ,
MF150078 ,
MF150079 ,
MF150080 ,
MF150081 ,
MF150082 ,
MF150083 ,
MF150084 ,
MF150085 ,
MF150086 ,
MF150087 ,
MF150088 ,
MF150089 ,
MF150090 ,
MF150091 ,
MF150092 ,
MF150019A )
select
MF150001 ,
MF150002 ,
MF150003 ,
MF150004 ,
MF150005 ,
MF150006 ,
MF150007 ,
MF150008 ,
MF150009 ,
MF150010 ,
MF150011 ,
MF150012 ,
MF150013 ,
MF150014 ,
MF150015 ,
MF150016 ,
MF150017 ,
MF150018 ,
MF150019 ,
MF150020 ,
MF150021 ,
MF150022 ,
MF150023 ,
MF150024 ,
MF150025 ,
MF150026 ,
MF150027 ,
MF150028 ,
MF150029 ,
MF150030 ,
MF150031 ,
MF150032 ,
MF150033 ,
MF150034 ,
MF150035 ,
MF150036 ,
MF150037 ,
MF150038 ,
MF150039 ,
MF150040 ,
MF150041 ,
MF150042 ,
MF150043 ,
MF150044 ,
MF150045 ,
MF150046 ,
MF150047 ,
MF150051 ,
MF150052 ,
MF150053 ,
MF150054 ,
MF150055 ,
MF150056 ,
MF150059 ,
MF150060 ,
MF150062 ,
MF150063 ,
MF150064 ,
MF150065 ,
MF150066 ,
MF150067 ,
MF150068 ,
MF150069 ,
MF150070 ,
MF150071 ,
MF150072 ,
MF150073 ,
MF150074 ,
MF150075 ,
MF150076 ,
MF150077 ,
MF150078 ,
MF150079 ,
MF150080 ,
MF150081 ,
MF150082 ,
MF150083 ,
MF150084 ,
MF150085 ,
MF150086 ,
MF150087 ,
MF150088 ,
MF150089 ,
MF150090 ,
MF150091 ,
MF150092 ,
MF150019A
from oa1a.tmf150a1
where (MF150013, MF150067) in
( select MF150013, MF150067
from session.keys)
;
delete from oa1a.tmf150a1
where (MF150013, MF150067) in
( select MF150013, MF150067
from session.keys)
;
rollback
;
}¢--- DSN.TX.CASE(MFNVZINI) cre=2010-09-03 mod=2010-09-03-12.20.47 A540769 -----
call compRun '@', 'A540769.TX.CASE(ini)'
say 'start wsh A540769.tx.case(mfnvzINI)'
$= srcSubsys = DBAF
$= srcDb = DGDB0389
$= srcCreator = GDB0389
$= trgSubsys = DBAF
$= trgDb = MF01A1A
$= trgCreator = OA1A
$= ddl = $pds(${mpr}DDL)
}¢--- DSN.TX.CASE(MFNVZLDD) cre=2010-10-08 mod=2010-10-08-12.19.09 A540769 -----
// SET OLDPREF='DSN.MFUOL.MF150.P00'
// SET OLDSUF='.UNL'
//REC001 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC002 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC003 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC004 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC005 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC006 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC007 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC008 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC009 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC010 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC011 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC012 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC013 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC014 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC015 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC016 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC017 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC018 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC019 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC020 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC021 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC022 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC023 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC024 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC025 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC026 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC027 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC028 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC029 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC030 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC031 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC032 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC033 DD DISP=SHR,DSN=&OLDPREF.001&OLDSUF
//REC034 DD DISP=SHR,DSN=&OLDPREF.002&OLDSUF
//REC035 DD DISP=SHR,DSN=&OLDPREF.002&OLDSUF
//REC036 DD DISP=SHR,DSN=&OLDPREF.002&OLDSUF
//REC037 DD DISP=SHR,DSN=&OLDPREF.002&OLDSUF
//REC038 DD DISP=SHR,DSN=&OLDPREF.002&OLDSUF
//REC039 DD DISP=SHR,DSN=&OLDPREF.002&OLDSUF
//REC040 DD DISP=SHR,DSN=&OLDPREF.002&OLDSUF
//REC041 DD DISP=SHR,DSN=&OLDPREF.002&OLDSUF
//REC042 DD DISP=SHR,DSN=&OLDPREF.002&OLDSUF
//REC043 DD DISP=SHR,DSN=&OLDPREF.002&OLDSUF
//REC044 DD DISP=SHR,DSN=&OLDPREF.002&OLDSUF
//REC045 DD DISP=SHR,DSN=&OLDPREF.002&OLDSUF
//REC046 DD DISP=SHR,DSN=&OLDPREF.002&OLDSUF
//REC047 DD DISP=SHR,DSN=&OLDPREF.002&OLDSUF
//REC048 DD DISP=SHR,DSN=&OLDPREF.002&OLDSUF
//REC049 DD DISP=SHR,DSN=&OLDPREF.002&OLDSUF
//REC050 DD DISP=SHR,DSN=&OLDPREF.002&OLDSUF
//REC051 DD DISP=SHR,DSN=&OLDPREF.002&OLDSUF
//REC052 DD DISP=SHR,DSN=&OLDPREF.002&OLDSUF
//REC053 DD DISP=SHR,DSN=&OLDPREF.002&OLDSUF
//REC054 DD DISP=SHR,DSN=&OLDPREF.002&OLDSUF
//REC055 DD DISP=SHR,DSN=&OLDPREF.002&OLDSUF
//REC056 DD DISP=SHR,DSN=&OLDPREF.002&OLDSUF
//REC057 DD DISP=SHR,DSN=&OLDPREF.002&OLDSUF
//REC058 DD DISP=SHR,DSN=&OLDPREF.003&OLDSUF
//REC059 DD DISP=SHR,DSN=&OLDPREF.003&OLDSUF
//REC060 DD DISP=SHR,DSN=&OLDPREF.003&OLDSUF
//REC061 DD DISP=SHR,DSN=&OLDPREF.003&OLDSUF
//REC062 DD DISP=SHR,DSN=&OLDPREF.003&OLDSUF
//REC063 DD DISP=SHR,DSN=&OLDPREF.003&OLDSUF
//REC064 DD DISP=SHR,DSN=&OLDPREF.003&OLDSUF
//REC065 DD DISP=SHR,DSN=&OLDPREF.003&OLDSUF
//REC066 DD DISP=SHR,DSN=&OLDPREF.003&OLDSUF
//REC067 DD DISP=SHR,DSN=&OLDPREF.003&OLDSUF
//REC068 DD DISP=SHR,DSN=&OLDPREF.003&OLDSUF
//REC069 DD DISP=SHR,DSN=&OLDPREF.003&OLDSUF
//REC070 DD DISP=SHR,DSN=&OLDPREF.003&OLDSUF
//REC071 DD DISP=SHR,DSN=&OLDPREF.003&OLDSUF
//REC072 DD DISP=SHR,DSN=&OLDPREF.003&OLDSUF
//REC073 DD DISP=SHR,DSN=&OLDPREF.003&OLDSUF
//REC074 DD DISP=SHR,DSN=&OLDPREF.003&OLDSUF
//REC075 DD DISP=SHR,DSN=&OLDPREF.003&OLDSUF
//REC076 DD DISP=SHR,DSN=&OLDPREF.003&OLDSUF
//REC077 DD DISP=SHR,DSN=&OLDPREF.003&OLDSUF
//REC078 DD DISP=SHR,DSN=&OLDPREF.003&OLDSUF
//REC079 DD DISP=SHR,DSN=&OLDPREF.003&OLDSUF
//REC080 DD DISP=SHR,DSN=&OLDPREF.003&OLDSUF
//REC081 DD DISP=SHR,DSN=&OLDPREF.003&OLDSUF
//REC082 DD DISP=SHR,DSN=&OLDPREF.004&OLDSUF
//REC083 DD DISP=SHR,DSN=&OLDPREF.004&OLDSUF
//REC084 DD DISP=SHR,DSN=&OLDPREF.004&OLDSUF
//REC085 DD DISP=SHR,DSN=&OLDPREF.004&OLDSUF
//REC086 DD DISP=SHR,DSN=&OLDPREF.004&OLDSUF
//REC087 DD DISP=SHR,DSN=&OLDPREF.004&OLDSUF
//REC088 DD DISP=SHR,DSN=&OLDPREF.004&OLDSUF
//REC089 DD DISP=SHR,DSN=&OLDPREF.004&OLDSUF
//REC090 DD DISP=SHR,DSN=&OLDPREF.004&OLDSUF
//REC091 DD DISP=SHR,DSN=&OLDPREF.004&OLDSUF
//REC092 DD DISP=SHR,DSN=&OLDPREF.004&OLDSUF
//REC093 DD DISP=SHR,DSN=&OLDPREF.004&OLDSUF
//REC094 DD DISP=SHR,DSN=&OLDPREF.004&OLDSUF
//REC095 DD DISP=SHR,DSN=&OLDPREF.004&OLDSUF
//REC096 DD DISP=SHR,DSN=&OLDPREF.004&OLDSUF
//REC097 DD DISP=SHR,DSN=&OLDPREF.004&OLDSUF
//REC098 DD DISP=SHR,DSN=&OLDPREF.004&OLDSUF
//REC099 DD DISP=SHR,DSN=&OLDPREF.004&OLDSUF
//REC100 DD DISP=SHR,DSN=&OLDPREF.004&OLDSUF
//REC101 DD DISP=SHR,DSN=&OLDPREF.004&OLDSUF
//REC102 DD DISP=SHR,DSN=&OLDPREF.004&OLDSUF
//REC103 DD DISP=SHR,DSN=&OLDPREF.004&OLDSUF
//REC104 DD DISP=SHR,DSN=&OLDPREF.004&OLDSUF
//REC105 DD DISP=SHR,DSN=&OLDPREF.004&OLDSUF
//REC106 DD DISP=SHR,DSN=&OLDPREF.005&OLDSUF
//REC107 DD DISP=SHR,DSN=&OLDPREF.005&OLDSUF
//REC108 DD DISP=SHR,DSN=&OLDPREF.005&OLDSUF
//REC109 DD DISP=SHR,DSN=&OLDPREF.005&OLDSUF
//REC110 DD DISP=SHR,DSN=&OLDPREF.005&OLDSUF
//REC111 DD DISP=SHR,DSN=&OLDPREF.005&OLDSUF
//REC112 DD DISP=SHR,DSN=&OLDPREF.005&OLDSUF
//REC113 DD DISP=SHR,DSN=&OLDPREF.005&OLDSUF
//REC114 DD DISP=SHR,DSN=&OLDPREF.005&OLDSUF
//REC115 DD DISP=SHR,DSN=&OLDPREF.005&OLDSUF
//REC116 DD DISP=SHR,DSN=&OLDPREF.005&OLDSUF
//REC117 DD DISP=SHR,DSN=&OLDPREF.005&OLDSUF
//REC118 DD DISP=SHR,DSN=&OLDPREF.005&OLDSUF
//REC119 DD DISP=SHR,DSN=&OLDPREF.005&OLDSUF
//REC120 DD DISP=SHR,DSN=&OLDPREF.005&OLDSUF
//REC121 DD DISP=SHR,DSN=&OLDPREF.005&OLDSUF
//REC122 DD DISP=SHR,DSN=&OLDPREF.005&OLDSUF
//REC123 DD DISP=SHR,DSN=&OLDPREF.005&OLDSUF
//REC124 DD DISP=SHR,DSN=&OLDPREF.005&OLDSUF
//REC125 DD DISP=SHR,DSN=&OLDPREF.005&OLDSUF
//REC126 DD DISP=SHR,DSN=&OLDPREF.005&OLDSUF
//REC127 DD DISP=SHR,DSN=&OLDPREF.005&OLDSUF
//REC128 DD DISP=SHR,DSN=&OLDPREF.005&OLDSUF
//REC129 DD DISP=SHR,DSN=&OLDPREF.005&OLDSUF
//REC130 DD DISP=SHR,DSN=&OLDPREF.006&OLDSUF
//REC131 DD DISP=SHR,DSN=&OLDPREF.006&OLDSUF
//REC132 DD DISP=SHR,DSN=&OLDPREF.006&OLDSUF
//REC133 DD DISP=SHR,DSN=&OLDPREF.006&OLDSUF
//REC134 DD DISP=SHR,DSN=&OLDPREF.006&OLDSUF
//REC135 DD DISP=SHR,DSN=&OLDPREF.006&OLDSUF
//REC136 DD DISP=SHR,DSN=&OLDPREF.006&OLDSUF
//REC137 DD DISP=SHR,DSN=&OLDPREF.006&OLDSUF
//REC138 DD DISP=SHR,DSN=&OLDPREF.006&OLDSUF
//REC139 DD DISP=SHR,DSN=&OLDPREF.006&OLDSUF
//REC140 DD DISP=SHR,DSN=&OLDPREF.006&OLDSUF
//REC141 DD DISP=SHR,DSN=&OLDPREF.006&OLDSUF
//REC142 DD DISP=SHR,DSN=&OLDPREF.006&OLDSUF
//REC143 DD DISP=SHR,DSN=&OLDPREF.006&OLDSUF
//REC144 DD DISP=SHR,DSN=&OLDPREF.006&OLDSUF
//REC145 DD DISP=SHR,DSN=&OLDPREF.006&OLDSUF
//REC146 DD DISP=SHR,DSN=&OLDPREF.006&OLDSUF
//REC147 DD DISP=SHR,DSN=&OLDPREF.006&OLDSUF
//REC148 DD DISP=SHR,DSN=&OLDPREF.006&OLDSUF
//REC149 DD DISP=SHR,DSN=&OLDPREF.006&OLDSUF
//REC150 DD DISP=SHR,DSN=&OLDPREF.006&OLDSUF
//REC151 DD DISP=SHR,DSN=&OLDPREF.006&OLDSUF
//REC152 DD DISP=SHR,DSN=&OLDPREF.006&OLDSUF
//REC153 DD DISP=SHR,DSN=&OLDPREF.006&OLDSUF
//REC154 DD DISP=SHR,DSN=&OLDPREF.007&OLDSUF
//REC155 DD DISP=SHR,DSN=&OLDPREF.007&OLDSUF
//REC156 DD DISP=SHR,DSN=&OLDPREF.007&OLDSUF
//REC157 DD DISP=SHR,DSN=&OLDPREF.007&OLDSUF
//REC158 DD DISP=SHR,DSN=&OLDPREF.007&OLDSUF
//REC159 DD DISP=SHR,DSN=&OLDPREF.007&OLDSUF
//REC160 DD DISP=SHR,DSN=&OLDPREF.007&OLDSUF
//REC161 DD DISP=SHR,DSN=&OLDPREF.007&OLDSUF
//REC162 DD DISP=SHR,DSN=&OLDPREF.007&OLDSUF
//REC163 DD DISP=SHR,DSN=&OLDPREF.007&OLDSUF
//REC164 DD DISP=SHR,DSN=&OLDPREF.007&OLDSUF
//REC165 DD DISP=SHR,DSN=&OLDPREF.007&OLDSUF
//REC166 DD DISP=SHR,DSN=&OLDPREF.007&OLDSUF
//REC167 DD DISP=SHR,DSN=&OLDPREF.007&OLDSUF
//REC168 DD DISP=SHR,DSN=&OLDPREF.007&OLDSUF
//REC169 DD DISP=SHR,DSN=&OLDPREF.007&OLDSUF
//REC170 DD DISP=SHR,DSN=&OLDPREF.007&OLDSUF
//REC171 DD DISP=SHR,DSN=&OLDPREF.007&OLDSUF
//REC172 DD DISP=SHR,DSN=&OLDPREF.007&OLDSUF
//REC173 DD DISP=SHR,DSN=&OLDPREF.007&OLDSUF
//REC174 DD DISP=SHR,DSN=&OLDPREF.007&OLDSUF
//REC175 DD DISP=SHR,DSN=&OLDPREF.007&OLDSUF
//REC176 DD DISP=SHR,DSN=&OLDPREF.007&OLDSUF
//REC177 DD DISP=SHR,DSN=&OLDPREF.007&OLDSUF
//REC178 DD DISP=SHR,DSN=&OLDPREF.008&OLDSUF
//REC179 DD DISP=SHR,DSN=&OLDPREF.008&OLDSUF
//REC180 DD DISP=SHR,DSN=&OLDPREF.008&OLDSUF
//REC181 DD DISP=SHR,DSN=&OLDPREF.008&OLDSUF
//REC182 DD DISP=SHR,DSN=&OLDPREF.008&OLDSUF
//REC183 DD DISP=SHR,DSN=&OLDPREF.008&OLDSUF
//REC184 DD DISP=SHR,DSN=&OLDPREF.008&OLDSUF
//REC185 DD DISP=SHR,DSN=&OLDPREF.008&OLDSUF
//REC186 DD DISP=SHR,DSN=&OLDPREF.008&OLDSUF
//REC187 DD DISP=SHR,DSN=&OLDPREF.008&OLDSUF
//REC188 DD DISP=SHR,DSN=&OLDPREF.008&OLDSUF
//REC189 DD DISP=SHR,DSN=&OLDPREF.008&OLDSUF
//REC190 DD DISP=SHR,DSN=&OLDPREF.008&OLDSUF
//REC191 DD DISP=SHR,DSN=&OLDPREF.008&OLDSUF
//REC192 DD DISP=SHR,DSN=&OLDPREF.008&OLDSUF
//REC193 DD DISP=SHR,DSN=&OLDPREF.008&OLDSUF
//REC194 DD DISP=SHR,DSN=&OLDPREF.008&OLDSUF
//REC195 DD DISP=SHR,DSN=&OLDPREF.008&OLDSUF
//REC196 DD DISP=SHR,DSN=&OLDPREF.008&OLDSUF
//REC197 DD DISP=SHR,DSN=&OLDPREF.008&OLDSUF
//REC198 DD DISP=SHR,DSN=&OLDPREF.008&OLDSUF
//REC199 DD DISP=SHR,DSN=&OLDPREF.008&OLDSUF
//REC200 DD DISP=SHR,DSN=&OLDPREF.008&OLDSUF
//REC201 DD DISP=SHR,DSN=&OLDPREF.008&OLDSUF
//REC202 DD DISP=SHR,DSN=&OLDPREF.009&OLDSUF
//REC203 DD DISP=SHR,DSN=&OLDPREF.009&OLDSUF
//REC204 DD DISP=SHR,DSN=&OLDPREF.009&OLDSUF
//REC205 DD DISP=SHR,DSN=&OLDPREF.009&OLDSUF
//REC206 DD DISP=SHR,DSN=&OLDPREF.009&OLDSUF
//REC207 DD DISP=SHR,DSN=&OLDPREF.009&OLDSUF
//REC208 DD DISP=SHR,DSN=&OLDPREF.009&OLDSUF
//REC209 DD DISP=SHR,DSN=&OLDPREF.009&OLDSUF
//REC210 DD DISP=SHR,DSN=&OLDPREF.009&OLDSUF
//REC211 DD DISP=SHR,DSN=&OLDPREF.009&OLDSUF
//REC212 DD DISP=SHR,DSN=&OLDPREF.009&OLDSUF
//REC213 DD DISP=SHR,DSN=&OLDPREF.009&OLDSUF
//REC214 DD DISP=SHR,DSN=&OLDPREF.009&OLDSUF
//REC215 DD DISP=SHR,DSN=&OLDPREF.009&OLDSUF
//REC216 DD DISP=SHR,DSN=&OLDPREF.009&OLDSUF
//REC217 DD DISP=SHR,DSN=&OLDPREF.009&OLDSUF
//REC218 DD DISP=SHR,DSN=&OLDPREF.009&OLDSUF
//REC219 DD DISP=SHR,DSN=&OLDPREF.009&OLDSUF
//REC220 DD DISP=SHR,DSN=&OLDPREF.009&OLDSUF
//REC221 DD DISP=SHR,DSN=&OLDPREF.009&OLDSUF
//REC222 DD DISP=SHR,DSN=&OLDPREF.009&OLDSUF
//REC223 DD DISP=SHR,DSN=&OLDPREF.009&OLDSUF
//REC224 DD DISP=SHR,DSN=&OLDPREF.009&OLDSUF
//REC225 DD DISP=SHR,DSN=&OLDPREF.009&OLDSUF BIS 31.12.2008
//REC226 DD DISP=SHR,DSN=&OLDPREF.010&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.011&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.012&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.013&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.014&OLDSUF
//REC227 DD DISP=SHR,DSN=&OLDPREF.015&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.016&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.017&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.018&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.019&OLDSUF
//REC228 DD DISP=SHR,DSN=&OLDPREF.020&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.021&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.022&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.023&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.024&OLDSUF
//REC229 DD DISP=SHR,DSN=&OLDPREF.025&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.026&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.027&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.028&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.029&OLDSUF
//REC230 DD DISP=SHR,DSN=&OLDPREF.030&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.031&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.032&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.033&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.034&OLDSUF
//REC231 DD DISP=SHR,DSN=&OLDPREF.035&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.036&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.037&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.038&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.039&OLDSUF
//REC232 DD DISP=SHR,DSN=&OLDPREF.040&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.041&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.042&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.043&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.044&OLDSUF
//REC233 DD DISP=SHR,DSN=&OLDPREF.045&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.046&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.047&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.048&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.049&OLDSUF
//REC234 DD DISP=SHR,DSN=&OLDPREF.050&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.051&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.052&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.053&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.054&OLDSUF
//REC235 DD DISP=SHR,DSN=&OLDPREF.055&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.056&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.057&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.058&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.059&OLDSUF
//REC236 DD DISP=SHR,DSN=&OLDPREF.060&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.061&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.062&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.063&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.064&OLDSUF
//REC237 DD DISP=SHR,DSN=&OLDPREF.065&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.066&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.067&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.068&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.069&OLDSUF
//REC238 DD DISP=SHR,DSN=&OLDPREF.070&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.071&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.072&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.073&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.074&OLDSUF
//REC239 DD DISP=SHR,DSN=&OLDPREF.075&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.076&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.077&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.078&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.079&OLDSUF
//REC240 DD DISP=SHR,DSN=&OLDPREF.080&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.081&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.082&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.083&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.084&OLDSUF
//REC241 DD DISP=SHR,DSN=&OLDPREF.085&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.086&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.087&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.088&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.089&OLDSUF
//REC242 DD DISP=SHR,DSN=&OLDPREF.090&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.091&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.092&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.093&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.094&OLDSUF
//REC243 DD DISP=SHR,DSN=&OLDPREF.095&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.096&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.097&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.098&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.099&OLDSUF -- BIS 30.09.2009
//REC244 DD DISP=SHR,DSN=&OLDPREF.100&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.101&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.102&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.103&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.104&OLDSUF
//REC245 DD DISP=SHR,DSN=&OLDPREF.105&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.106&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.107&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.108&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.109&OLDSUF
//REC246 DD DISP=SHR,DSN=&OLDPREF.110&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.111&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.112&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.113&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.114&OLDSUF
//REC247 DD DISP=SHR,DSN=&OLDPREF.115&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.116&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.117&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.118&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.119&OLDSUF
//REC248 DD DISP=SHR,DSN=&OLDPREF.120&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.121&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.122&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.123&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.124&OLDSUF
//REC249 DD DISP=SHR,DSN=&OLDPREF.125&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.126&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.127&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.128&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.129&OLDSUF
//REC250 DD DISP=SHR,DSN=&OLDPREF.130&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.131&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.132&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.133&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.134&OLDSUF
//REC251 DD DISP=SHR,DSN=&OLDPREF.135&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.136&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.137&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.138&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.139&OLDSUF
//REC252 DD DISP=SHR,DSN=&OLDPREF.140&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.141&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.142&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.143&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.144&OLDSUF
//REC253 DD DISP=SHR,DSN=&OLDPREF.145&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.146&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.147&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.148&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.149&OLDSUF
//REC254 DD DISP=SHR,DSN=&OLDPREF.150&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.151&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.152&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.153&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.154&OLDSUF
//REC255 DD DISP=SHR,DSN=&OLDPREF.155&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.156&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.157&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.158&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.159&OLDSUF
//REC256 DD DISP=SHR,DSN=&OLDPREF.160&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.161&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.162&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.163&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.164&OLDSUF
//REC257 DD DISP=SHR,DSN=&OLDPREF.165&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.166&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.167&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.168&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.169&OLDSUF
//REC258 DD DISP=SHR,DSN=&OLDPREF.170&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.171&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.172&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.173&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.174&OLDSUF
//REC259 DD DISP=SHR,DSN=&OLDPREF.175&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.176&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.177&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.178&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.179&OLDSUF
//REC260 DD DISP=SHR,DSN=&OLDPREF.180&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.181&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.182&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.183&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.184&OLDSUF
//REC261 DD DISP=SHR,DSN=&OLDPREF.185&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.186&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.187&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.188&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.189&OLDSUF
//REC262 DD DISP=SHR,DSN=&OLDPREF.190&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.191&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.192&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.193&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.194&OLDSUF
//REC263 DD DISP=SHR,DSN=&OLDPREF.195&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.196&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.197&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.198&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.199&OLDSUF
//REC264 DD DISP=SHR,DSN=&OLDPREF.200&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.201&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.202&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.203&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.204&OLDSUF
//REC265 DD DISP=SHR,DSN=&OLDPREF.205&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.206&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.207&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.208&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.209&OLDSUF
//REC266 DD DISP=SHR,DSN=&OLDPREF.210&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.211&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.212&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.213&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.214&OLDSUF
//REC267 DD DISP=SHR,DSN=&OLDPREF.215&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.216&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.217&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.218&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.219&OLDSUF
//REC268 DD DISP=SHR,DSN=&OLDPREF.220&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.221&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.222&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.223&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.224&OLDSUF
//REC269 DD DISP=SHR,DSN=&OLDPREF.225&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.226&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.227&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.228&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.229&OLDSUF
//REC270 DD DISP=SHR,DSN=&OLDPREF.230&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.231&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.232&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.233&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.234&OLDSUF
//REC271 DD DISP=SHR,DSN=&OLDPREF.235&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.236&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.237&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.238&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.239&OLDSUF
//REC272 DD DISP=SHR,DSN=&OLDPREF.240&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.241&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.242&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.243&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.244&OLDSUF
//REC273 DD DISP=SHR,DSN=&OLDPREF.245&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.246&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.247&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.248&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.249&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.250&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.251&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.252&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.253&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.254&OLDSUF
}¢--- DSN.TX.CASE(MFNVZLOA) cre=2010-10-13 mod=2010-10-13-10.09.22 A540769 -----
//YMFNVZLO JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBOF
//S1 EXEC PGM=DSNUTILB,PARM='DBOF,YMFNVYLO.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBOF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE TIN DSN('DSN.MFUNL.MF15P&PART(3)..UNL')
LOAD DATA
EBCDIC CCSID(00500,00000,00000)
-- STATISTICS INDEX(ALL) KEYCARD UPDATE ALL
LOG NO
SORTDEVT DISK SORTNUM 150
WORKDDN(TSYUTS, TSOUTS)
INTO TABLE OA1P.TMF150A1 PART 1
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 2
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 3
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 4
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 5
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 6
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 7
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 8
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 9
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 10
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 11
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 12
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 13
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 14
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 15
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 16
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 17
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 18
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 19
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 20
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 21
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 22
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 23
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 24
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 25
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 26
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 27
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 28
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 29
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 30
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 31
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 32
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 33
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 34
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 35
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 36
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 37
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 38
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 39
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 40
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 41
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 42
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 43
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 44
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 45
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 46
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 47
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 48
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 49
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 50
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 51
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 52
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 53
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 54
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 55
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 56
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 57
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 58
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 59
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 60
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 61
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 62
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 63
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 64
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 65
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 66
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 67
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 68
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 69
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 70
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 71
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 72
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 73
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 74
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 75
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 76
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 77
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 78
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 79
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 80
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 81
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 82
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 83
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 84
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 85
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 86
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 87
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 88
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 89
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 90
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 91
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 92
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 93
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 94
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 95
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 96
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 97
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 98
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 99
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
INTO TABLE OA1P.TMF150A1 PART 100
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
}¢--- DSN.TX.CASE(MFNVZLOH) cre=2010-10-01 mod=2010-10-05-13.13.19 A540769 -----
$*** $>.jclSub()
$=ssid=DBOF
$@=¢
//YMFNVLOH JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=$ssid
$@do px=908 to 909 $@=¢
//S$px EXEC PGM=DSNUTILB,PARM='$ssid,YMFNVYLOH.Y$px'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=$ssid.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE TIN$px DSN('DSN.MFUNL.MF15P$px.UNL')
TEMPLATE TDISU DSN('&SSID..&DB..&SN..P&PART..&UNIQ..DIS')
DATACLAS(ENN35) MGMTCLAS(COM#A032)
SPACE (100,10000) TRK
LOAD DATA
EBCDIC CCSID(00500,00000,00000)
RESUME YES INDDN TIN$px
LOG YES SHRLEVEL CHANGE
DISCARDDN TDISU
ERRDDN TERRD
SORTDEVT DISK SORTNUM 150
WORKDDN(TSYUTS, TSOUTS)
INTO TABLE OA1P.TMF150H1
WHEN( MF150082 = ' ')
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
)
$!
$!
$#out 20101005 08:02:45
//YMFNVLOH JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBOF
//S908 EXEC PGM=DSNUTILB,PARM='DBOF,YMFNVYLOH.Y908'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBOF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE TIN908 DSN('DSN.MFUNL.MF15P908.UNL')
TEMPLATE TDISU DSN('&SSID..&DB..&SN..P&PART..&UNIQ..DIS')
DATACLAS(ENN35) MGMTCLAS(COM#A032)
SPACE (100,10000) TRK
LOAD DATA
EBCDIC CCSID(00500,00000,00000)
RESUME YES INDDN TIN908
LOG YES SHRLEVEL CHANGE
DISCARDDN TDISU
ERRDDN TERRD
SORTDEVT DISK SORTNUM 150
WORKDDN(TSYUTS, TSOUTS)
INTO TABLE OA1P.TMF150H1
WHEN( MF150082 = ' ')
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
)
//S909 EXEC PGM=DSNUTILB,PARM='DBOF,YMFNVYLOH.Y909'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBOF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE TIN909 DSN('DSN.MFUNL.MF15P909.UNL')
TEMPLATE TDISU DSN('&SSID..&DB..&SN..P&PART..&UNIQ..DIS')
DATACLAS(ENN35) MGMTCLAS(COM#A032)
SPACE (100,10000) TRK
LOAD DATA
EBCDIC CCSID(00500,00000,00000)
RESUME YES INDDN TIN909
LOG YES SHRLEVEL CHANGE
DISCARDDN TDISU
ERRDDN TERRD
SORTDEVT DISK SORTNUM 150
WORKDDN(TSYUTS, TSOUTS)
INTO TABLE OA1P.TMF150H1
WHEN( MF150082 = ' ')
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
)
$#out 20101004 11:39:51
}¢--- DSN.TX.CASE(MFNVZLOJ) cre=2010-10-08 mod=2010-10-08-12.30.33 A540769 -----
$*** $>.jclSub()
$=ssid=DBOF
$@=¢
//YMFNVLOJ JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=$ssid
//SUTIL EXEC PGM=DSNUTILB,PARM='$ssid,YMFNVYLOJ.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=$ssid.DBAA.LISTDEF(TEMPL),DISP=SHR
// SET OLDPREF='DSN.MFUOL.MF150.P00'
// SET OLDSUF='.UNL'
//REC226 DD DISP=SHR,DSN=&OLDPREF.010&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.011&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.012&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.013&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.014&OLDSUF
//REC227 DD DISP=SHR,DSN=&OLDPREF.015&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.016&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.017&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.018&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.019&OLDSUF
//REC228 DD DISP=SHR,DSN=&OLDPREF.020&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.021&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.022&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.023&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.024&OLDSUF
//REC229 DD DISP=SHR,DSN=&OLDPREF.025&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.026&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.027&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.028&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.029&OLDSUF
//REC230 DD DISP=SHR,DSN=&OLDPREF.030&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.031&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.032&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.033&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.034&OLDSUF
//REC231 DD DISP=SHR,DSN=&OLDPREF.035&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.036&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.037&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.038&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.039&OLDSUF
//REC232 DD DISP=SHR,DSN=&OLDPREF.040&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.041&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.042&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.043&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.044&OLDSUF
//REC233 DD DISP=SHR,DSN=&OLDPREF.045&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.046&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.047&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.048&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.049&OLDSUF
//REC234 DD DISP=SHR,DSN=&OLDPREF.050&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.051&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.052&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.053&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.054&OLDSUF
//REC235 DD DISP=SHR,DSN=&OLDPREF.055&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.056&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.057&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.058&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.059&OLDSUF
//REC236 DD DISP=SHR,DSN=&OLDPREF.060&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.061&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.062&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.063&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.064&OLDSUF
//REC237 DD DISP=SHR,DSN=&OLDPREF.065&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.066&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.067&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.068&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.069&OLDSUF
//REC238 DD DISP=SHR,DSN=&OLDPREF.070&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.071&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.072&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.073&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.074&OLDSUF
//REC239 DD DISP=SHR,DSN=&OLDPREF.075&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.076&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.077&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.078&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.079&OLDSUF
//REC240 DD DISP=SHR,DSN=&OLDPREF.080&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.081&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.082&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.083&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.084&OLDSUF
//REC241 DD DISP=SHR,DSN=&OLDPREF.085&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.086&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.087&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.088&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.089&OLDSUF
//REC242 DD DISP=SHR,DSN=&OLDPREF.090&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.091&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.092&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.093&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.094&OLDSUF
//REC243 DD DISP=SHR,DSN=&OLDPREF.095&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.096&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.097&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.098&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.099&OLDSUF -- BIS 30.09.2009
//SYSIN DD *
LISTDEF C#LIST
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL
COPY LIST C#LIST COPYDDN(TCOPYD)
PARALLEL
FULL YES
SHRLEVEL REFERENCE
LOAD DATA
EBCDIC CCSID(00500,00000,00000)
RESUME YES
LOG YES SHRLEVEL CHANGE
DISCARDDN TDISC
ERRDDN TERRD
SORTDEVT DISK SORTNUM 150
WORKDDN(TSYUTS, TSOUTS)
$@do px=226 to 243 $@=¢
$=px=- right($px, 3, 0)
INTO TABLE OA1P.TMF150H1 PART $px INDDN REC$px
WHEN( MF150082 = ' ')
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
)
$!
$!
$#out 20101008 12:29:32
//YMFNVLOJ JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBOF
//SUTIL EXEC PGM=DSNUTILB,PARM='DBOF,YMFNVYLOJ.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBOF.DBAA.LISTDEF(TEMPL),DISP=SHR
// SET OLDPREF='DSN.MFUOL.MF150.P00'
// SET OLDSUF='.UNL'
//REC226 DD DISP=SHR,DSN=&OLDPREF.010&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.011&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.012&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.013&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.014&OLDSUF
//REC227 DD DISP=SHR,DSN=&OLDPREF.015&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.016&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.017&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.018&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.019&OLDSUF
//REC228 DD DISP=SHR,DSN=&OLDPREF.020&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.021&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.022&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.023&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.024&OLDSUF
//REC229 DD DISP=SHR,DSN=&OLDPREF.025&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.026&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.027&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.028&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.029&OLDSUF
//REC230 DD DISP=SHR,DSN=&OLDPREF.030&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.031&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.032&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.033&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.034&OLDSUF
//REC231 DD DISP=SHR,DSN=&OLDPREF.035&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.036&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.037&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.038&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.039&OLDSUF
//REC232 DD DISP=SHR,DSN=&OLDPREF.040&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.041&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.042&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.043&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.044&OLDSUF
//REC233 DD DISP=SHR,DSN=&OLDPREF.045&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.046&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.047&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.048&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.049&OLDSUF
//REC234 DD DISP=SHR,DSN=&OLDPREF.050&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.051&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.052&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.053&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.054&OLDSUF
//REC235 DD DISP=SHR,DSN=&OLDPREF.055&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.056&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.057&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.058&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.059&OLDSUF
//REC236 DD DISP=SHR,DSN=&OLDPREF.060&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.061&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.062&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.063&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.064&OLDSUF
//REC237 DD DISP=SHR,DSN=&OLDPREF.065&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.066&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.067&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.068&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.069&OLDSUF
//REC238 DD DISP=SHR,DSN=&OLDPREF.070&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.071&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.072&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.073&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.074&OLDSUF
//REC239 DD DISP=SHR,DSN=&OLDPREF.075&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.076&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.077&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.078&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.079&OLDSUF
//REC240 DD DISP=SHR,DSN=&OLDPREF.080&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.081&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.082&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.083&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.084&OLDSUF
//REC241 DD DISP=SHR,DSN=&OLDPREF.085&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.086&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.087&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.088&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.089&OLDSUF
//REC242 DD DISP=SHR,DSN=&OLDPREF.090&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.091&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.092&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.093&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.094&OLDSUF
//REC243 DD DISP=SHR,DSN=&OLDPREF.095&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.096&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.097&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.098&OLDSUF
// DD DISP=SHR,DSN=&OLDPREF.099&OLDSUF -- BIS 30.09.2009
//SYSIN DD *
LISTDEF C#LIST
INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL
COPY LIST C#LIST COPYDDN(TCOPYD)
PARALLEL
FULL YES
SHRLEVEL REFERENCE
LOAD DATA
EBCDIC CCSID(00500,00000,00000)
RESUME YES
LOG YES SHRLEVEL CHANGE
DISCARDDN TDISC
ERRDDN TERRD
SORTDEVT DISK SORTNUM 150
WORKDDN(TSYUTS, TSOUTS)
INTO TABLE OA1P.TMF150H1 PART 226 INDDN REC226
WHEN( MF150082 = ' ')
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
)
INTO TABLE OA1P.TMF150H1 PART 227 INDDN REC227
WHEN( MF150082 = ' ')
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
)
INTO TABLE OA1P.TMF150H1 PART 228 INDDN REC228
WHEN( MF150082 = ' ')
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
)
INTO TABLE OA1P.TMF150H1 PART 229 INDDN REC229
WHEN( MF150082 = ' ')
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
)
INTO TABLE OA1P.TMF150H1 PART 230 INDDN REC230
WHEN( MF150082 = ' ')
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
)
INTO TABLE OA1P.TMF150H1 PART 231 INDDN REC231
WHEN( MF150082 = ' ')
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
)
INTO TABLE OA1P.TMF150H1 PART 232 INDDN REC232
WHEN( MF150082 = ' ')
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
)
INTO TABLE OA1P.TMF150H1 PART 233 INDDN REC233
WHEN( MF150082 = ' ')
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
)
INTO TABLE OA1P.TMF150H1 PART 234 INDDN REC234
WHEN( MF150082 = ' ')
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
)
INTO TABLE OA1P.TMF150H1 PART 235 INDDN REC235
WHEN( MF150082 = ' ')
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
)
INTO TABLE OA1P.TMF150H1 PART 236 INDDN REC236
WHEN( MF150082 = ' ')
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
)
INTO TABLE OA1P.TMF150H1 PART 237 INDDN REC237
WHEN( MF150082 = ' ')
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
)
INTO TABLE OA1P.TMF150H1 PART 238 INDDN REC238
WHEN( MF150082 = ' ')
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
)
INTO TABLE OA1P.TMF150H1 PART 239 INDDN REC239
WHEN( MF150082 = ' ')
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
)
INTO TABLE OA1P.TMF150H1 PART 240 INDDN REC240
WHEN( MF150082 = ' ')
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
)
INTO TABLE OA1P.TMF150H1 PART 241 INDDN REC241
WHEN( MF150082 = ' ')
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
)
INTO TABLE OA1P.TMF150H1 PART 242 INDDN REC242
WHEN( MF150082 = ' ')
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
)
INTO TABLE OA1P.TMF150H1 PART 243 INDDN REC243
WHEN( MF150082 = ' ')
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
)
$#out 20101005 08:02:45
}¢--- DSN.TX.CASE(MFNVZLOW) cre=2010-09-04 mod=2010-10-13-10.20.06 A540769 -----
$*** $>.jclSub()
$@=¢
$=max=100
//YMFNVZLO JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBOF
//S1 EXEC PGM=DSNUTILB,PARM='DBOF,YMFNVYLO.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBOF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE TIN DSN('DSN.MFUNL.MF15P&PART(3)..UNL')
LOAD DATA
EBCDIC CCSID(00500,00000,00000)
-- STATISTICS INDEX(ALL) KEYCARD UPDATE ALL
LOG NO
SORTDEVT DISK SORTNUM 150
WORKDDN(TSYUTS, TSOUTS)
$@do px=1 to $max $@=¢
INTO TABLE OA1P.TMF150A1 PART $px
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
MF150001 POSITION( 1 )
CHAR( 16) ,
MF150002 POSITION( 17 )
CHAR( 1) ,
MF150003 POSITION( 18 )
CHAR( 5) ,
MF150004 POSITION( 23 )
CHAR( 25) ,
MF150005 POSITION( 48 )
CHAR( 1) ,
MF150006 POSITION( 49 )
CHAR( 1) ,
MF150007 POSITION( 50 )
CHAR( 1) ,
MF150008 POSITION( 51 )
CHAR( 3) ,
MF150009 POSITION( 54 )
CHAR( 5) ,
MF150010 POSITION( 59 )
CHAR( 4) ,
MF150011 POSITION( 63 )
CHAR( 1) ,
MF150012 POSITION( 64 )
CHAR( 1) ,
MF150013 POSITION( 65 )
DATE EXTERNAL( 10) ,
MF150014 POSITION( 75 )
CHAR( 4) ,
MF150015 POSITION( 79 )
CHAR( 4) ,
MF150016 POSITION( 83 )
CHAR( 4) ,
MF150017 POSITION( 87 )
CHAR( 12) ,
MF150018 POSITION( 99: 106)
DECIMAL ,
MF150019 POSITION( 107: 114)
DECIMAL ,
MF150020 POSITION( 115 )
CHAR( 8) ,
MF150021 POSITION( 123 )
TIMESTAMP EXTERNAL( 26) ,
MF150022 POSITION( 149 )
CHAR( 4) ,
MF150023 POSITION( 153 )
CHAR( 12) ,
MF150024 POSITION( 165 )
CHAR( 1) ,
MF150025 POSITION( 166 )
CHAR( 3) ,
MF150026 POSITION( 169 )
CHAR( 3) ,
MF150027 POSITION( 172 )
CHAR( 3) ,
MF150028 POSITION( 175 )
CHAR( 3) ,
MF150029 POSITION( 178 )
CHAR( 3) ,
MF150030 POSITION( 181 )
CHAR( 16) ,
MF150031 POSITION( 197 )
CHAR( 2) ,
MF150032 POSITION( 199 )
CHAR( 7) ,
MF150033 POSITION( 206 )
CHAR( 7) ,
MF150034 POSITION( 213 )
CHAR( 4) ,
MF150035 POSITION( 217 )
CHAR( 1) ,
MF150036 POSITION( 218 )
CHAR( 18) ,
MF150037 POSITION( 236: 243)
DECIMAL ,
MF150038 POSITION( 244 )
CHAR( 16) ,
MF150039 POSITION( 260 )
CHAR( 2) ,
MF150040 POSITION( 262 )
CHAR( 2) ,
MF150041 POSITION( 264 )
CHAR( 2) ,
MF150042 POSITION( 266 )
CHAR( 4) ,
MF150043 POSITION( 270: 277)
DECIMAL ,
MF150044 POSITION( 278 )
CHAR( 5) ,
MF150045 POSITION( 283 )
CHAR( 4) ,
MF150046 POSITION( 287 )
CHAR( 4) ,
MF150047 POSITION( 291 )
CHAR( 1) ,
MF150051 POSITION( 292 )
CHAR( 3) ,
MF150052 POSITION( 295 )
CHAR( 3) ,
MF150053 POSITION( 298: 305)
DECIMAL ,
MF150054 POSITION( 306 )
CHAR( 7) ,
MF150055 POSITION( 313 )
CHAR( 1) ,
MF150056 POSITION( 314 )
CHAR( 8) ,
MF150059 POSITION( 322 )
CHAR( 5) ,
MF150060 POSITION( 327 )
TIMESTAMP EXTERNAL( 26) ,
MF150062 POSITION( 353 )
CHAR( 1) ,
MF150063 POSITION( 354 )
CHAR( 1) ,
MF150064 POSITION( 355 )
DATE EXTERNAL( 10) ,
MF150065 POSITION( 365 )
DATE EXTERNAL( 10) ,
MF150066 POSITION( 375 )
CHAR( 16) ,
MF150067 POSITION( 391 )
CHAR( 16) ,
MF150068 POSITION( 407 )
CHAR( 16) ,
MF150069 POSITION( 423 )
CHAR( 4) ,
MF150070 POSITION( 427 )
CHAR( 7) ,
MF150071 POSITION( 434 )
CHAR( 1) ,
MF150072 POSITION( 435 )
CHAR( 1) ,
MF150073 POSITION( 436 )
CHAR( 1) ,
MF150074 POSITION( 437 )
CHAR( 1) ,
MF150075 POSITION( 438 )
CHAR( 1) ,
MF150076 POSITION( 439 )
CHAR( 1) ,
MF150077 POSITION( 440 )
CHAR( 6) ,
MF150078 POSITION( 446 )
CHAR( 1) ,
MF150079 POSITION( 447 )
CHAR( 1) ,
MF150080 POSITION( 448 )
DATE EXTERNAL( 10) ,
MF150081 POSITION( 458 )
CHAR( 5) ,
MF150082 POSITION( 463 )
CHAR( 26) ,
MF150083 POSITION( 489 )
SMALLINT ,
MF150084 POSITION( 491 )
SMALLINT ,
MF150085 POSITION( 493 )
SMALLINT ,
MF150086 POSITION( 495 )
CHAR( 35) ,
MF150087 POSITION( 530 )
CHAR( 35) ,
MF150088 POSITION( 565 )
CHAR( 35) ,
MF150089 POSITION( 600 )
CHAR( 35) ,
MF150090 POSITION( 635 )
SMALLINT ,
MF150091 POSITION( 637 )
SMALLINT ,
MF150092 POSITION( 639 )
CHAR( 16) ,
MF150019A POSITION( 655 )
CHAR( 4) ,
MF150HASH POSITION( 659 )
SMALLINT
)
$!
$!
$#out 20101013 10:08:51
}¢--- DSN.TX.CASE(MFNVZREB) cre=2010-09-04 mod=2010-10-04-11.29.10 A540769 -----
//A540769P JOB (CP00,KE50),'DB2',
// MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P04 EXEC PGM=IKJEFT01
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTSXX DD *
alter table oA1P.tmf150a1
//SYSTSIN DD *
DSN SYS(DBOF)
}¢--- DSN.TX.CASE(MFNVZRUN) cre=2010-09-04 mod=2010-10-04-11.27.17 A540769 -----
//MFNVZRUN JOB (CP00,KE50),'DB2',
// MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//***************************************************
//* CREATED BY : A540769
//* TIMESTAMP : 06/21/2006.10.10.05
//* ENVIRONMENT: ISPF 5.7MVS TSO
//* RELEASE : V7.4.02 08/31/2004
//* DB2 VERSION: 810
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBOF,'MFNVZRUN.RUNSTA'),
// REGION=0M
//*DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//RNPRIN01 DD SYSOUT=*
//SYSIN DD *
LISTDEF LST#STA INCLUDE TABLESPACE MF01A1P.A150A
OPTIONS EVENT (ITEMERROR, SKIP)
RUNSTATS TABLESPACE LIST LST#STA
SHRLEVEL CHANGE
INDEX ALL
KEYCARD
UPDATE ALL
}¢--- DSN.TX.CASE(MFNVZ0) cre=2010-09-03 mod=2010-09-03-10.48.30 A540769 -------
=ini=A540769.TX.CASE(MFNVZINI)
nop
-= nopCount = 1
+ ok nop
- nop opts =
- nop opts =
=ddl=A540769.TX.CASE(MFNVZdd0)
creDb trg 1
+ ok creDb A540769.TX.GENF(MFNVZt1) ::f
- nop opts =
}¢--- DSN.TX.CASE(MFNVZ7) cre=2010-09-03 mod=2010-09-03-12.24.59 A540769 -------
=ini=A540769.TX.CASE(MFNVZINI)
nop
-= nopCount = 1
+ ok nop
- nop opts =
- nop opts =
=ddl=A540769.TX.CASE(MFNVZddl)
creDb src 1
+ ok creDb A540769.TX.GENF(MFNVZs1) ::f
}¢--- DSN.TX.CASE(MF15HIST) cre=2011-01-24 mod=2011-01-24-11.02.15 A540769 -----
//A540769C JOB (CP00,KE50),'DB2 REO', 00010000
// MSGCLASS=T,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M 00030000
//*MAIN CLASS=DBTF 00040000
//*
//* mf historisierung mf150A1 ==> mf150H1
//* mit PartitionenWeisen Load auf MF150H1
//*
//DEL EXEC PGM=IEFBR14
//SYSREC00 DD DISP=(MOD,DELETE),DSN=TSS.SKA.TMP.MF15HIST
//S1 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBTF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
//SYSTSPRT DD SYSOUT=*
//*
//* sql: r: für nichtLeere Partition in mf150H v(on) und b(is)
//* p: alle Partitionen die gelöscht werden können
//* t: für jede Partition 4 Utility Statements:
//* copy, sql exec, load, copy
//*
//SYSIN DD *
with r (l, p, v, b) as
( /* r = rekursiv Partitionen berechnen, */
/* p = Partition, v=von inklusiv, b=bis exklusiv */
select 0, 0, date('01.01.1800'), date('01.01.1900')
from sysibm.sysdummyE
union all select l+1, -1,
(select min(MF150013) from oa1t.tmf150a1 where MF150013 >= r.b),b
from r where p >= 0 and v < current date - 12 month and l < 999
union all select l+1, year(v)*24+month(v)*2 +10-48002, v,
v + (16-day(v)) days
from r where p = -1 and day(v) <= 15 and l < 999
union all select l+1, year(v)*24+month(v)*2 +11-48002, v,
v - (day(v)-1) days + 1 month
from r where p = -1 and day(v) > 15 and l < 999
)
, p (p, v, b) as
(
select strip(char(p)), v, b
from r
where p > 0 and b < current date - 12 month
)
, t (p, v, b, n, t) as
( /* für jede Partition utility ctl: copy, load, copy */
select p.*, 1, 'COPY TABLESPACE MF01A1T.MF150H DSNUM ' || p
from p
union all select p.*, 2, ' COPYDDN(TCOPYD) SHRLEVEL REFERENCE'
from p
union all select p.*,10, 'EXEC SQL' from p
union all select p.*,11, ' DECLARE CUR' || p ||' CURSOR FOR' from p
union all select p.*,12, ' SELECT *' from p
union all select p.*,13, ' FROM OA1T.TMF150A1' from p
union all select p.*,14, ' WHERE MF150013 >= '''
|| char(v) || '''' from p
union all select p.*,15, ' and MF150013 < '''
|| char(b) || '''' from p
union all select p.*,16, ' order by MF150013 asc, MF150067 asc'
from p
union all select p.*,17, 'ENDEXEC' from p
union all select p.*,21, 'LOAD DATA INCURSOR CUR' || p from p
union all select p.*,22, ' LOG NO RESUME YES ' from p
union all select p.*,23, ' SORTDEVT DISK SORTNUM 50' from p
union all select p.*,24, ' WORKDDN(TSYUTS,TSOUTS)' from p
union all select p.*,25, ' INTO TABLE OA1T.TMF150H1' from p
union all select p.*,26, ' IGNOREFIELDS YES PART ' || p from p
union all select p.*,31, 'COPY TABLESPACE MF01A1T.MF150H DSNUM ' || p
from p
union all select p.*,32, ' COPYDDN(TCOPYD) SHRLEVEL REFERENCE'
from p
)
select char(coalesce(t, '??????'), 80)
from t order by v, n
;
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD SYSOUT=*
//SYSPUNCH DD SYSOUT=*,RECFM=FB,LRECL=80
//SYSREC00 DD DISP=(NEW,CATLG),DSN=*.DEL.SYSREC00,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=26800),
// SPACE=(CYL,(2,1000))
//LOAD EXEC PGM=DSNUTILB,PARM='DBTF,A540769L.LOAD' 00020001
//SYSMAP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSERR DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBTF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD DISP=SHR,DSN=*.DEL.SYSREC00
}¢--- DSN.TX.CASE(MF15HLOA) cre=2010-10-05 mod=2010-10-05-14.39.12 A540769 -----
//YMF15LOA JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBTF
//S1 EXEC PGM=DSNUTILB,PARM='DBTF,YMF15LOA.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBTF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE TIN
DSN('A540769.TMPUL.MF150H.P&PA..UNL')
DISP(OLD,KEEP,KEEP)
LOAD DATA
EBCDIC CCSID(00500,00000,00000)
-- STATISTICS INDEX(ALL) KEYCARD UPDATE ALL
LOG NO
SORTDEVT DISK SORTNUM 150
WORKDDN(TSYUTS, TSOUTS)
SORTKEYS 124141645
INTO TABLE
"OA1T".
"TMF150H1"
PART 00064 INDDN TIN
RESUME NO REPLACE COPYDDN(TCOPYD)
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
)
INTO TABLE
"OA1T".
"TMF150H1"
PART 00065 INDDN TIN
RESUME NO REPLACE COPYDDN(TCOPYD)
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
)
INTO TABLE
"OA1T".
"TMF150H1"
PART 00066 INDDN TIN
RESUME NO REPLACE COPYDDN(TCOPYD)
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
)
}¢--- DSN.TX.CASE(MF15HREO) cre=2010-10-06 mod=2010-10-06-06.00.04 A540769 -----
//A540769W JOB (CP00,KE50),'DB2 REO', 00010001
// MSGCLASS=T,TIME=1440, 00020001
// NOTIFY=&SYSUID,REGION=0M 00030001
//*MAIN CLASS=LOG,SYSTEM=S11 00040001
//P05 EXEC PGM=DSNUTILB, 00050001
// PARM='DBTF,A540769W.REORG' 00060001
//STEPLIB DD DSN=DB2@.RZ1.P0.DSNLOAD,DISP=SHR 00070001
//SYSPRINT DD SYSOUT=* 00080001
//UTPRINT DD SYSOUT=* 00090001
//SYSUDUMP DD SYSOUT=* 00100001
//SYSTEMPL DD DSN=DBTF.DBAA.LISTDEF(TEMPL),DISP=SHR 00110001
//SYSIN DD * 00120001
00130001
REORG TABLESPACE MF01A1T.A150H PART 63:67 00140001
LOG NO 00150001
SORTDATA NOSYSREC SORTKEYS 00160001
COPYDDN(TCOPYD) 00170001
SHRLEVEL CHANGE 00180001
DRAIN_WAIT 1800 00190001
RETRY 0 00200001
RETRY_DELAY 300 00210001
MAPPINGTABLE S100447.MAPTAB05 00220001
MAXRO 120 00230001
DRAIN WRITERS 00240001
LONGLOG CONTINUE 00250001
DELAY 1200 00260001
TIMEOUT TERM 00270001
UNLDDN(TSRECD) 00280001
WORKDDN(TSYUTD,TSOUTD) 00290001
SORTDEVT DISK 00300001
SORTNUM 4 00310001
}¢--- DSN.TX.CASE(MF15HUOL) cre=2010-10-05 mod=2010-10-05-13.14.48 A540769 -----
//YMFUNOLD JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//UNLO EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBOF,'YMFUNOLD.UNLOAD'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DBOF.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
TEMPLATE TREC DSN('A540769.TMPUL.MF150H.P&PA..UNL')
DATACLAS (ENN0X) MGMTCLAS(COM#A045)
TEMPLATE TPUN DSN('A540769.TMPUL.MF150H.P&PA..PUN')
DATACLAS (ENN0X) MGMTCLAS(COM#A045)
LISTDEF LL INCLUDE TABLESPACE MF01A1P.A150H PARTLEVEL
UNLOAD TABLESPACE MF01A1P.A150A PART 64:66
PUNCHDDN TPUN UNLDDN TREC
SHRLEVEL CHANGE ISOLATION UR
}¢--- DSN.TX.CASE(M2UTS) cre=2016-03-11 mod=2016-09-12-17.25.16 A540769 --------
* 1 segmented
* 11 partitioned classic
* 21 UTS PBG
* 31 UTS PBR
* ?3 c3 laenger piecesize 8M if segmented
* ?4 c4 added
* ?6 free page ts 66%
* ?7 segSize 16
* ?8 free page ix 88%
* plus comment/label mit $phase
* drop tablespace QZ92A1T.AM2UTSA ;
* alter tablespace QZ92A1T.AM2UTSA drop pending changes
* alter tablespace QZ92A1t.AM2UTSA maxpartitions 3
* alter table QZ92crt.tqzM2UTSA add restrict on drop
* alter table QZ92crt.tqzM2UTSA add restrict on drop
$$ say 16
creDb src 21
+ ok creDb DSN.TX.GENF(M2UTSs21)
$$ say 19
creDb trg 31
+ ok creDb DSN.TX.GENF(M2UTSt31)
$$ say 21
}¢--- DSN.TX.CASE(M2UTSAL) cre=2016-05-06 mod=2016-05-06-23.53.32 A540769 ------
set current sqlid = 'S100447';
alter tablespace QZ91A1S.AM2UTSA segsize 64;
rollback;
}¢--- DSN.TX.CASE(M2UTSDDL) cre=2015-10-08 mod=2016-09-01-20.46.00 A540769 -----
set current sqlid = 'S100447';
DROP TABLESPACE $db.am2utsa ;
COMMIT ;
$@ if $phase >= 1 then $@=/p1/
CREATE TABLESPACE am2utsa
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
GBPCACHE CHANGED
TRACKMOD NO
LOGGED
BUFFERPOOL BP32K
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID ebcdic
DEFINE YES
$= segSize =- if($phase // 10 = 7, 64, 16)
$@ if $phase <= 9 then $@=¢
SEGSIZE $segSize -- segmented
$! $@ else if $phase <= 19 then $@=¢ $** partitioned classic
numparts 5 -- classic partitioned
dssize 16 g
$! $@ else if $phase <= 29 then $@=¢ $** UTS PBG
maxpartitions 1 -- uts PBG partitioned by growth
SEGSIZE $segSize
dssize 16 g
$! $@ else if $phase <= 39 then $@=¢ $** UTS PBR
numparts 5 -- uts PBR partitioned by range
SEGSIZE $segSize
dssize 1 g
$!
MAXROWS 255
$@ if $phase // 10 = 6 then
FREEPAGE 66
$@ else
FREEPAGE 0
;
CREATE TABLE $creator.tqz91m2utsA
( c1 char(15) not null with default
, c2 char(10) not null with default
$@ if $phase // 10 < 3 then
, c3 char(10) not null with default
$@ else
, c3 char(13) not null with default
$@ if $phase // 10 = 4 then
, c4 char(10) not null with default
)
IN $db.am2utsa
CCSID EBCDIC
$@ if ($phase>=10 & $phase<=19) | ($phase>=30 & $phase<=39) then $@=¢
partition by (c1)
( partition 1 ending ('j')
, partition 2 ending ('z')
, partition 3 ending ('A')
, partition 4 ending ('J')
, partition 5 ending (maxvalue)
)
$!
;
comment on table $creator.tqz91m2utsA is
'comment on tb $creator.tqz91m2utsA phase=$phase';
comment on $creator.tqz91m2utsA
( c1 is 'comment on c1'
, c2 is 'comment on c1 phase=$phase' );
label on table $creator.tqz91m2utsA is
'label on tqz91m2utsA phase=$phase';
label on $creator.tqz91m2utsA
( c1 is 'label on c1'
, c2 is 'label on c1 phase=$phase' );
CREATE UNIQUE INDEX $creator.Im2utsA1
ON $creator.tqz91m2utsA
(c1 asc
)
CLUSTER
$@ if ($phase>=10 & $phase<=19) | ($phase>=30 & $phase<=39) then
partitioned
DEFINE YES
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
DEFER NO
COPY NO
USING STOGROUP "GSMS "
PRIQTY -1
SECQTY -1
ERASE NO
$@ if $phase = 3 then
PIECESIZE 8M
$@ if $phase // 10 = 8 then
FREEPAGE 88
$@ else
FREEPAGE 0
PCTFREE 0
GBPCACHE CHANGED
;
CREATE INDEX $creator.Im2utsA2
ON $creator.tqz91m2utsA
(c1 asc, c2
)
NOT CLUSTER
$@ if ($phase>=10 & $phase<=19) | ($phase>=30 & $phase<=39) then
partitioned
DEFINE YES
COMPRESS NO
BUFFERPOOL BP32K
CLOSE YES
DEFER NO
COPY NO
USING STOGROUP "GSMS "
PRIQTY -1
SECQTY -1
ERASE NO
$@ if $phase = 3 then
PIECESIZE 8M
$@ if $phase // 10 = 8 then
FREEPAGE 88
$@ else
FREEPAGE 0
PCTFREE 0
GBPCACHE CHANGED
;
insert into $creator.tqz91m2utsA (c1, c2) values('eins', 'eins 1');
insert into $creator.tqz91m2utsA (c1, c2) values('zwei', 'zwei 2');
insert into $creator.tqz91m2utsA (c1, c2) values('drei', 'drei 3');
insert into $creator.tqz91m2utsA (c1, c2) values('vier', 'vier 4');
insert into $creator.tqz91m2utsA (c1, c2) values('fuenf', 'fuenf 5');
insert into $creator.tqz91m2utsA (c1, c2) values('sechs', 'sechs 6');
commit;
$/p1/
}¢--- DSN.TX.CASE(M2UTSMIP) cre=2015-10-09 mod=2015-10-09-11.30.59 A540769 -----
//A540769X JOB (CP00,KE50),'DB2 REO', 00010000
// MSGCLASS=T,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2 00030003
//*** migrate partitioned classic to UTS pbR 00040003
//DDL EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99 00020001
//SYSTSIN DD *
DSN SYSTEM(DP4G)
RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2)
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=* DSN=A540769.TMP.TEXV(GRENZE)
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSIN DD *
set current sqlid = 'S100447';
alter tablespace qz92a1t.am2utsa drop pending changes ;
alter table qz92crt.TQZM2UTSA
alter c3 set data type char(13);
alter table qz92crt.TQZM2UTSA
add c4 char(10) not null with default;
alter tablespace qz92a1t.am2utsa segsize 16 ;
alter tablespace qz92a1t.am2utsa dsSize 4 g ;
//REO EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DP4G,'A540769X.REORG'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DP4G.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
LISTDEF LST INCLUDE TABLESPACE QZ92A1T.AM2UTSA
REORG TABLESPACE LIST LST
LOG NO
SORTDATA
COPYDDN(TCOPYD)
SHRLEVEL CHANGE
MAPPINGTABLE S100447.MAPTAB03
MAXRO 300
DRAIN ALL
DELAY 1500
TIMEOUT TERM
UNLOAD CONTINUE
PUNCHDDN TPUNCH
DISCARDDN TDISCA
SORTKEYS
SORTDEVT DISK
STATISTICS
INDEX ALL KEYCARD
REPORT NO UPDATE ALL
}¢--- DSN.TX.CASE(M2UTSMIS) cre=2015-10-08 mod=2015-10-09-11.22.54 A540769 -----
//A540769X JOB (CP00,KE50),'DB2 REO', 00010000
// MSGCLASS=T,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2 00030003
//*** migrate segmented to pbg 00040003
//DDL EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99 00020001
//SYSTSIN DD *
DSN SYSTEM(DP4G)
RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2)
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=* DSN=A540769.TMP.TEXV(GRENZE)
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSIN DD *
set current sqlid = 'S100447';
-- alter tablespace qz92a1t.am2utsa drop pending changes ;
alter table qz92crt.TQZM2UTSA
alter c3 set data type char(13);
alter table qz92crt.TQZM2UTSA
add c4 char(10) not null with default;
alter tablespace qz92a1t.am2utsa maxpartitions 1 ;
alter tablespace qz92a1t.am2utsa dssize 16 g ;
//REO EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DP4G,'A540769X.REORG'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DP4G.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
LISTDEF LST INCLUDE TABLESPACE QZ92A1T.AM2UTSA
REORG TABLESPACE LIST LST
LOG NO
SORTDATA
COPYDDN(TCOPYD)
SHRLEVEL CHANGE
MAPPINGTABLE S100447.MAPTAB03
MAXRO 300
DRAIN ALL
DELAY 1500
TIMEOUT TERM
UNLOAD CONTINUE
PUNCHDDN TPUNCH
DISCARDDN TDISCA
SORTKEYS
SORTDEVT DISK
STATISTICS
INDEX ALL KEYCARD
REPORT NO UPDATE ALL
}¢--- DSN.TX.CASE(M2UTSRE0) cre=2016-06-15 mod=2016-06-15-13.22.48 A540769 -----
//A540769W JOB (CP00,KE50),'DB2 ADMIN', 00010002
// TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2ALL, 00020004
// MSGCLASS=T,NOTIFY=&SYSUID 00021002
//*** ddl fragments to pbg 00040003
//DDL EXEC PGM=IEFBR14
//SYSIN DD *
set current sqlid = 'S100447';
alter tablespace qz92a1t.am2utsa drop pending changes ;
alter table qz92crt.TQZ91M2UTSA
alter c3 set data type char(13);
alter table qz92crt.TQZM2UTSA
add c4 char(10) not null with default;
alter tablespace qz92a1t.am2utsa maxpartitions 1 ;
alter tablespace qz92a1t.am2utsa dssize 16 g ;
alter tablespace qz92a1t.am2utsa segsize 64 ;
alter table qz92crt.TQZ91M2UTSA alter partition 2 ending('k ') ;
//REO EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DP4G,'A540769X.REORG'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DP4G.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
LISTDEF LST INCLUDE TABLESPACE QZ92A1T.AM2UTSA
REORG TABLESPACE LIST LST
LOG NO
SHRLEVEL CHANGE
SORTDATA NO RECLUSTER NO NOSYSREC KEEPDICTIONARY
UNLDDN TSRECU
PUNCHDDN TPUNCH
DISCARDDN TDISCA
COPYDDN(TCOPYD)
SORTKEYS
SORTDEVT DISK
MAXRO 300
DRAIN ALL
DELAY 1500
TIMEOUT TERM
UNLOAD CONTINUE
STATISTICS
INDEX ALL KEYCARD
REPORT NO UPDATE ALL
}¢--- DSN.TX.CASE(M2UTSRID) cre=2016-09-01 mod=2016-09-01-20.55.32 A540769 -----
select c1, hex(rid(t))
from QZ92CRT.TQZ91M2UTSA t
order by c1 desc
fetch first 30 rows only
;x;
insert into QZ92CRT.TQZ91M2UTSA (c1,c2)
with i(i) as
(
select 0 from sysibm.sysDummy1
union all select i+1 from i where i < 32000
)
select 'B' || i, 'Bb'|| i
from i
}¢--- DSN.TX.CASE(ORMAN) cre=2015-07-03 mod=2015-07-03-12.52.24 A540769 --------
credb trg 1
+ ok creDb DSN.TX.GENF(ORMANt1) ::f
}¢--- DSN.TX.CASE(ORMANDDL) cre=2015-07-03 mod=2015-07-03-12.52.04 A540769 -----
------------$-¢right(userid() sysvar(sysnode) date(s) time(), 60,'-')$!
-- testCase $dsn
-- env $env phase $phase
-- dbSys $dbSys db $db creator $creator
-----------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
SET CURRENT SCHEMA = $creator;
drop tablespace $db.ORMAN;
commit;
$@ if $phase >= 1 then $@=/create/
CREATE TABLESPACE ORMAN
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
dssize 16 g
numparts 55
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255;
CREATE TABLE $creator.TORMANJOUR
( cust char(3) not null
, pa2 smallint not null
, tst timestamp not null
)
PARTITION BY (cust, pa2)
$=c1=(
$=px = 0
$@do jx=0 to 1 $@=¢
$c1 partition $.^paNx ending at ('DPB', ${jx}0105)
$=c1= ,
$do mx=1 to 12 $@=¢
$= mx =- right($mx, 2, 0)
, partition $.^paNx ending at ('DPB', ${jx}${mx}15)
$@ if $mx = 12 then $@=¢
, partition $.^paNx ending at ('DPB', ${jx}1229) $!
, partition $.^paNx ending at ('DPB', ${jx}${mx}31)
$!
$!
, partition $.^paNx ending at ('GPP', 32767)
-- Attention ' ' is necessary, because DB2 pads with x'FF' |||
, partition $.^paNx ending at ('MF ', 01231)
, partition $.^paNx ending at ('MF ', 11231)
)
IN $db.ORMAN
AUDIT NONE
DATA CAPTURE CHANGES
CCSID EBCDIC
NOT VOLATILE
;
CREATE TRIGGER $creator.tORMANJOURIns
NO CASCADE BEFORE insert ON $creator.TORMANJOUR
REFERENCING New as n
for each row mode DB2SQL
set pa2 = mod( (year(n.tst) * 100 + month(n.tst)) * 100+day(n.tst)
, 20000)
;
CREATE TRIGGER $creator.tORMANJOURUpd
NO CASCADE BEFORE update ON $creator.TORMANJOUR
REFERENCING New as n
for each row mode DB2SQL
set pa2 = mod( (year(n.tst) * 100 + month(n.tst)) * 100+day(n.tst)
, 20000)
;
insert into $creator.TORMANJOUR
with t (t, l) as
(
select current timestamp, 0 from sysibm.sysDummy1
union all select t - (48 * 60 + 1.2) minutes, l+1
from t where l < 500
)
select 'DPB', 0, t from t
union all select 'GPP', 0, t from t where l < 100
union all select 'MF', 0, t from t where l < 100
;
commit;
$/create/
$proc $@/paNx/
$=px =- $px + 1
return $px
$/paNx/
}¢--- DSN.TX.CASE(PATH) cre=2009-08-18 mod=2009-08-18-15.33.20 A540769 ---------
credb src 1
}¢--- DSN.TX.CASE(PATHDDL) cre=2009-08-18 mod=2009-08-18-15.44.30 A540769 ------
set current sqlid = 'S100447';
set :eins = current timestamp ;
$@{ say 'tst eins' eins $}
set path = :p1, :p2, :p3;
}¢--- DSN.TX.CASE(PA2DI) cre=2016-06-10 mod=2016-06-10-12.20.48 A540769 --------
* mehrdimensional Paritionierung mit Indirektions Tabelle
* Partitionierungs Tabelle
* pa2dDat: p cif aDt data
* pa2dPar: p cifBeg cifEnd aDtBeg aDtEnd
* mit p = select p from pa2dPar
* where cif >= cifBeg and cif < cifEnd
* and aDt >= aDtBeg and aDt < aDtEnd
*
* und fuer cif >= cB and cif < cE and aDt >= aB and aDt < aE
* wird das p in (select q from pa2dPar
* where cE > cifBeg and cB < cifEnd
* and aE > aDtBeg and aB < aDtEnd
creDb trg 1
+ ok creDb DSN.TX.GENF(PA2DIt1) ::f
}¢--- DSN.TX.CASE(PA2DIDDL) cre=2016-06-10 mod=2016-06-10-12.02.41 A540769 -----
set current sqlid = 'S100447';
DROP TABLESPACE $db.apa2diDa ;
DROP TABLESPACE $db.apa2dipa ;
COMMIT ;
$@ if $phase >= 1 then $@=/p1/
CREATE TABLESPACE apa2diDa
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
GBPCACHE CHANGED
TRACKMOD NO
LOGGED
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID ebcdic
DEFINE YES
segsize 64
numParts 60
dssize 16 g
MAXROWS 255
;
CREATE TABLESPACE apa2diPa
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
GBPCACHE CHANGED
TRACKMOD NO
LOGGED
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID ebcdic
DEFINE YES
segsize 64
maxPartitions 10
dssize 4 g
MAXROWS 255
;
CREATE TABLE $creator.tqz91pa2diData
(
p smallint not null
, cif char(4) not null
, aDt date not null
, data varchar(100)
)
in $db.aPa2DiDa
partition by (p)
(
partition 1 ending (1)
$do px=2 to 60 $@=¢
, partition $px ending ($px) $!
)
CCSID EBCDIC
;
CREATE INDEX $creator.Iqz91pa2diDaI1
ON $creator.tqz91pa2diData
(p, cif, aDt
)
CLUSTER
partitioned
DEFINE YES
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
DEFER NO
COPY NO
USING STOGROUP GSMS
;
CREATE TABLE $creator.tqz91pa2diPart
(
p smallint not null
, cifBeg char(4) not null
, cifEnd char(4) not null
, aDtBeg date not null
, aDtEnd date not null
)
in $db.aPa2DiPa
CCSID EBCDIC
;
CREATE INDEX $creator.Iqz91pa2diPaI1
ON $creator.tqz91pa2diPart
(cifBeg, cifEnd, aDtBeg, aDtEnd, p)
CLUSTER
DEFINE YES
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
DEFER NO
COPY NO
USING STOGROUP GSMS
;
$/p1/
}¢--- DSN.TX.CASE(PA2DIEXP) cre=2016-06-10 mod=2016-06-12-15.26.07 A540769 -----
--- temporary explain --------------------------------------------------
set current sqlid = 'A540769';
delete from A540769.plan_table;
delete from A540769.DSN_STATEMNT_TABLE;
delete from A540769.DSN_DetCost_TABLE ;
delete from A540769.dsn_filter_Table ;
delete from A540769.dsn_predicat_table;
explain plan set queryno = 10 for
select d.* from
qz92crT.tqz91pa2diPart p join qz92crT.tqz91pa2diData d
on p.p = d.p and d.cif >= p.cifBeg and d.cif < p.cifEnd
and d.aDt >= p.aDtBeg and d.aDt < p.aDtEnd
where d.cif = 'C_PG'
and d.aDt = '25.04.2016'
;
explain plan set queryno = 12 for
select d.* from
qz92crT.tqz91pa2diPart p join qz92crT.tqz91pa2diData d
on p.p = d.p and d.cif >= p.cifBeg and d.cif < p.cifEnd
and d.aDt >= p.aDtBeg and d.aDt < p.aDtEnd
where d.cif = 'C_PG'
and d.aDt = '25.04.2016'
and p.cifBeg <= 'C_PG' and p.cifEnd > 'C_PG'
and p.aDtBeg <= '25.04.2016' and p.aDtEnd > '25.04.2016'
;
explain plan set queryno = 20 for
select d.* from
qz92crT.tqz91pa2diPart p join qz92crT.tqz91pa2diData d
on p.p = d.p and d.cif >= p.cifBeg and d.cif < p.cifEnd
and d.aDt >= p.aDtBeg and d.aDt < p.aDtEnd
where d.cif = 'C_PG'
and d.aDt >= '25.04.2016' and d.aDt < '04.05.2016'
;
explain plan set queryno = 30 for
select d.* from
qz92crT.tqz91pa2diPart p join qz92crT.tqz91pa2diData d
on p.p = d.p and d.cif >= p.cifBeg and d.cif < p.cifEnd
and d.aDt >= p.aDtBeg and d.aDt < p.aDtEnd
where d.cif >= 'CS' and d.cif < 'DB'
and d.aDt >= '25.04.2016' and d.aDt < '04.05.2016'
;
explain plan set queryno = 32 for
select d.* from
qz92crT.tqz91pa2diPart p join qz92crT.tqz91pa2diData d
on p.p = d.p and d.cif >= p.cifBeg and d.cif < p.cifEnd
and d.aDt >= p.aDtBeg and d.aDt < p.aDtEnd
where d.cif >= 'CS' and d.cif < 'DB'
and d.aDt >= '25.04.2016' and d.aDt < '04.05.2016'
and p.cifEnd > 'CS' and p.cifBeg < 'DB'
and p.aDtEnd > '25.04.2016' and p.aDtBeg < '04.05.2016'
;
explain plan set queryno = 34 for
select d.*
from qz92crT.tqz91pa2diData d
where d.cif >= 'CS' and d.cif < 'DB'
and d.aDt >= '25.04.2016' and d.aDt < '04.05.2016'
and d.p in (select p.p
from qz92crT.tqz91pa2diPart p
where p.cifEnd > 'CS' and p.cifBeg < 'DB'
and p.aDtEnd > '25.04.2016' and p.aDtBeg < '04.05.2016'
)
;
select * from plan_view1
order by -- collid, progName, version, explain_time,
queryNo, qblockno, planno, mixOpSeq
;
select * from plan_view2
order by -- collid, progName, version, explain_time,
queryNo, qblockno, planno, mixOpSeq
;
select * from plan_view2det
order by -- collid, progName, version, explain_time,
queryNo, qblockno, planno, mixOpSeq
;
select *
from plan_viewPred
order by collid, progName, explain_time,
queryNo, qBlockNo, predNo, orderNo, mixOpSeqNo
with ur
;
rollback
$#out 20160612 15:24:58
sqlCode 0: set current sqlid = 'A540769'
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.plan_table
sqlCode 0, 16 rows deleted: delete from A540769.plan_table
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.DSN_STATEMNT_TABLE
sqlCode 0, 4 rows deleted: delete from A540769.DSN_STATEMNT_TABLE
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.DSN_DetCost_TABLE
sqlCode 0, 16 rows deleted: delete from A540769.DSN_DetCost_TABLE
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.dsn_filter_Table
sqlCode 0, 25 rows deleted: delete from A540769.dsn_filter_Table
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.dsn_predicat_table
sqlCode 0, 100 rows deleted: delete from A540769.dsn_predicat_table
sqlCode 0: explain plan set queryno = 10 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 12 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 20 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 30 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 32 for select d.* from qz92crT.tqz91...
SQLCODE = -199: ILLEGAL USE OF KEYWORD WHERE. TOKEN
SELECTIVITY AND OR HAVING GROUP INTERSECT ORDER FETCH EXCEPT WAS
EXPECTED
src ... d.aDt < '04.05.2016' and d.p in (select p.p from qz92crT.tqz91pa
+ 2diPart p where p.cifEnd > 'CS' and p.cifBeg < 'DB' and p.aDtEnd > '
+ 25.04.2016' and p.aDtBeg < '04.05.2016' ) where d.cif >= 'CS' and...
> >>>pos 728 of 853>>>
sql = explain plan set queryno = 34 for ...
sqlCode 0: rollback
$#out 20160612 15:17:15
sqlCode 0: set current sqlid = 'A540769'
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.plan_table
sqlCode 0, 16 rows deleted: delete from A540769.plan_table
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.DSN_STATEMNT_TABLE
sqlCode 0, 4 rows deleted: delete from A540769.DSN_STATEMNT_TABLE
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.DSN_DetCost_TABLE
sqlCode 0, 16 rows deleted: delete from A540769.DSN_DetCost_TABLE
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.dsn_filter_Table
sqlCode 0, 25 rows deleted: delete from A540769.dsn_filter_Table
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.dsn_predicat_table
sqlCode 0, 100 rows deleted: delete from A540769.dsn_predicat_table
sqlCode 0: explain plan set queryno = 10 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 12 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 20 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 30 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 32 for select d.* from qz92crT.tqz91...
Queryn B PM TABLE UJOG ...
TYPE tTy no cor ...
ACCESS mcO ...
INDEX join/met ...
Queryn B PM TYPE ACCESS INDEX TABLE tTy no c mcO join/m UJOG ...
10 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNNN ...
10 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNNN ...
12 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 1Y NNNN ...
12 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNNN ...
20 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNNN ...
20 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNNN ...
30 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNNN ...
30 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 2N nlJoin NNNN ...
32 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 1Y NNNN ...
32 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 2N nlJoin NNNN ...
10 rows fetched: select * from plan_view1 order by queryNo, qblockno, plan...
MSEC TABLE ...
Queryn B PM tTy no cor ...
TYPE mcO ...
ACCESS join/met ...
INDEX UJO...
M Queryn B PM TYPE ACCESS INDEX TABLE tTy no c mcO join/m UJO...
2 10 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNN...
2 10 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNN...
1 12 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 1Y NNN...
1 12 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNN...
1 20 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNN...
1 20 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNN...
1 30 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNN...
1 30 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 2N nlJoin NNN...
1 32 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 1Y NNN...
1 32 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 2N nlJoin NNN...
10 rows fetched: select * from plan_view2 order by queryNo, qblockno, plan...
DMROWS OPENCOST INDEX ...
RDSROW Queryn B PM ...
SNROWS TYPE ...
COMPCOST ACCESS ...
DMROWS RDSROW SNROWS COMPCOST OPENCO Queryn B PM TYPE ACCESS INDEX ...
6.00e1 6.00e1 0.0e0 1.85e-1 0.0e0 10 1 10 SELECT ixScan IQZ91PA2DIPA...
2.36e0 2.36e0 0.0e0 2.50e00 0.0e0 10 1 20 SELECT ixScan IQZ91PA2DIDA...
2.17e0 2.17e0 0.0e0 4.08e-2 0.0e0 12 1 10 SELECT ixScan IQZ91PA2DIPA...
2.36e0 2.36e0 0.0e0 1.24e-1 0.0e0 12 1 20 SELECT ixScan IQZ91PA2DIDA...
6.00e1 6.00e1 0.0e0 1.85e-1 0.0e0 20 1 10 SELECT ixScan IQZ91PA2DIPA...
1.00e0 1.00e0 0.0e0 2.28e00 0.0e0 20 1 20 SELECT ixScan IQZ91PA2DIDA...
6.00e1 6.00e1 0.0e0 1.85e-1 0.0e0 30 1 10 SELECT ixScan IQZ91PA2DIPA...
1.00e0 1.00e0 0.0e0 1.75e00 0.0e0 30 1 20 SELECT ixScan IQZ91PA2DIDA...
2.57e0 2.57e0 0.0e0 4.83e-2 0.0e0 32 1 10 SELECT ixScan IQZ91PA2DIPA...
1.00e0 1.00e0 0.0e0 1.15e-1 0.0e0 32 1 20 SELECT ixScan IQZ91PA2DIDA...
10 rows fetched: select * from plan_view2det order by queryNo, qblockno, p...
Queryn B PM TEXT ...
PREDIN ...
ORDERN ...
STAGE ...
FF ...
PRTY ...
BoN ...
Queryn B PM PR ORD STAGE FF PRTY BoN TEXT ...
10 1 1 --- --- 1.00e00 AND Y N (((((("D"."CIF"='C_PG' AND...
10 1 20 2 2 MATCHING 9.62e-3 EQUAL Y N "D"."CIF"='C_PG' ...
10 1 20 3 3 MATCHING 3.28e-2 EQUAL Y N "D"."ADT"='2016-04-25' ...
10 1 20 4 1 MATCHING 1.67e-2 EQUAL Y N "P"."P"="D"."P" ...
10 1 20 5 4 STAGE1 1.00e-1 RANGE Y N "D"."CIF">="P"."CIFBEG" ...
10 1 20 6 5 STAGE1 1.00e-1 RANGE Y N "D"."CIF"<"P"."CIFEND" ...
10 1 20 7 6 STAGE1 3.33e-1 RANGE Y N "D"."ADT">="P"."ADTBEG" ...
10 1 20 8 7 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<"P"."ADTEND" ...
10 1 9 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4,5,6,7,8 ...
10 1 10 --- --- 3.20e-4 COMPOUND Y N COMPOUND: 2,3 ...
10 1 11 --- --- 1.67e-2 COMPOUND Y N COMPOUND: 4,5,6,7,8 ...
10 1 12 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4 ...
12 1 1 --- --- 1.00e00 AND Y N (((((((((("D"."CIF"='C_PG'...
12 1 20 2 2 MATCHING 9.62e-3 EQUAL Y N "D"."CIF"='C_PG' ...
12 1 20 3 3 MATCHING 3.28e-2 EQUAL Y N "D"."ADT"='2016-04-25' ...
12 1 10 4 1 MATCHING 6.00e-1 RANGE Y N "P"."CIFBEG"<='C_PG' ...
12 1 10 5 2 SCREENING 3.33e-1 RANGE Y N "P"."CIFEND">'C_PG' ...
12 1 10 6 3 SCREENING 3.33e-1 RANGE Y N "P"."ADTBEG"<='2016-04-25'...
12 1 10 7 4 SCREENING 3.33e-1 RANGE Y N "P"."ADTEND">'2016-04-25' ...
12 1 20 8 1 MATCHING 1.67e-2 EQUAL Y N "P"."P"="D"."P" ...
12 1 20 9 4 STAGE1 1.00e-1 RANGE Y N "D"."CIF">="P"."CIFBEG" ...
12 1 20 10 5 STAGE1 1.00e-1 RANGE Y N "D"."CIF"<"P"."CIFEND" ...
12 1 20 11 6 STAGE1 3.33e-1 RANGE Y N "D"."ADT">="P"."ADTBEG" ...
12 1 20 12 7 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<"P"."ADTEND" ...
12 1 13 --- --- 3.20e-4 COMPOUND Y N COMPOUND: 2,3 ...
12 1 14 --- --- 1.94e-2 COMPOUND Y N COMPOUND: 4,5,6,7,9 ...
12 1 15 --- --- 1.67e-2 COMPOUND Y N COMPOUND: 4,5,6,7,8,9,10,1...
12 1 16 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,8 ...
12 1 17 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,8,9,10,11,12...
12 1 18 --- --- 3.61e-2 COMPOUND Y N COMPOUND: 4,5,6,7 ...
20 1 1 --- --- 1.00e00 AND Y N ((((((("D"."CIF"='C_PG' AN...
20 1 20 2 2 MATCHING 9.62e-3 EQUAL Y N "D"."CIF"='C_PG' ...
20 1 20 3 3 MATCHING 3.33e-1 RANGE Y N "D"."ADT">='2016-04-25' ...
20 1 20 4 4 MATCHING 3.33e-1 RANGE Y N "D"."ADT"<'2016-05-04' ...
20 1 20 5 1 MATCHING 1.67e-2 EQUAL Y N "P"."P"="D"."P" ...
20 1 20 6 5 STAGE1 1.00e-1 RANGE Y N "D"."CIF">="P"."CIFBEG" ...
20 1 20 7 6 STAGE1 1.00e-1 RANGE Y N "D"."CIF"<"P"."CIFEND" ...
20 1 20 8 7 STAGE1 3.33e-1 RANGE Y N "D"."ADT">="P"."ADTBEG" ...
20 1 20 9 8 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<"P"."ADTEND" ...
20 1 10 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4,5 ...
20 1 11 --- --- 1.60e-4 COMPOUND Y N COMPOUND: 2,5 ...
20 1 12 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4,5,8,9 ...
20 1 13 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4 ...
20 1 14 --- --- 1.67e-2 COMPOUND Y N COMPOUND: 5,6,7,8,9 ...
20 1 15 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4,5,6,7,8,9 ...
30 1 1 --- --- 1.00e00 AND Y N (((((((("D"."CIF">='CS' AN...
30 1 20 2 2 MATCHING 1.00e-1 RANGE Y N "D"."CIF">='CS' ...
30 1 20 3 3 MATCHING 1.00e-1 RANGE Y N "D"."CIF"<'DB' ...
30 1 20 4 4 SCREENING 3.33e-1 RANGE Y N "D"."ADT">='2016-04-25' ...
30 1 20 5 5 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<'2016-05-04' ...
30 1 20 6 1 MATCHING 1.67e-2 EQUAL Y N "P"."P"="D"."P" ...
30 1 20 7 6 STAGE1 1.00e-1 RANGE Y N "D"."CIF">="P"."CIFBEG" ...
30 1 20 8 7 STAGE1 1.00e-1 RANGE Y N "D"."CIF"<"P"."CIFEND" ...
30 1 20 9 8 STAGE1 3.33e-1 RANGE Y N "D"."ADT">="P"."ADTBEG" ...
30 1 20 10 9 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<"P"."ADTEND" ...
30 1 11 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4,5 ...
30 1 12 --- --- 1.00e-2 COMPOUND Y N COMPOUND: 2,3 ...
30 1 13 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4,5,6,7,8,9,...
30 1 14 --- --- 1.67e-2 COMPOUND Y N COMPOUND: 6,7,8,9,10 ...
30 1 15 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,6 ...
30 1 16 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4,5,6 ...
32 1 1 --- --- 1.00e00 AND Y N (((((((((((("D"."CIF">='CS...
32 1 20 2 2 MATCHING 1.00e-1 RANGE Y N "D"."CIF">='CS' ...
32 1 20 3 3 MATCHING 1.00e-1 RANGE Y N "D"."CIF"<'DB' ...
32 1 20 4 4 SCREENING 3.33e-1 RANGE Y N "D"."ADT">='2016-04-25' ...
32 1 20 5 5 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<'2016-05-04' ...
32 1 10 6 2 SCREENING 3.33e-1 RANGE Y N "P"."CIFEND">'CS' ...
32 1 10 7 1 MATCHING 8.00e-1 RANGE Y N "P"."CIFBEG"<'DB' ...
32 1 10 8 4 SCREENING 3.33e-1 RANGE Y N "P"."ADTEND">'2016-04-25' ...
32 1 10 9 3 SCREENING 3.33e-1 RANGE Y N "P"."ADTBEG"<'2016-05-04' ...
32 1 20 10 1 MATCHING 1.67e-2 EQUAL Y N "P"."P"="D"."P" ...
32 1 20 11 6 STAGE1 1.00e-1 RANGE Y N "D"."CIF">="P"."CIFBEG" ...
32 1 20 12 7 STAGE1 1.00e-1 RANGE Y N "D"."CIF"<"P"."CIFEND" ...
32 1 20 13 8 STAGE1 3.33e-1 RANGE Y N "D"."ADT">="P"."ADTBEG" ...
32 1 20 14 9 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<"P"."ADTEND" ...
32 1 15 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4,5 ...
32 1 16 --- --- 1.67e-2 COMPOUND Y N COMPOUND: 6,7,8,9,10,11,12...
32 1 17 --- --- 1.00e-2 COMPOUND Y N COMPOUND: 2,3 ...
32 1 18 --- --- 1.94e-2 COMPOUND Y N COMPOUND: 6,7,8,9,11 ...
32 1 19 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,10 ...
32 1 20 --- --- 4.28e-2 COMPOUND Y N COMPOUND: 6,7,8,9 ...
32 1 21 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4,5,10,11,12...
32 1 22 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4,5,10 ...
83 rows fetched: select * from plan_viewPred order by collid, progName, ex...
sqlCode 0: rollback
$#out 20160612 15:16:00
sqlCode 0: set current sqlid = 'A540769'
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.plan_table
sqlCode 0, 16 rows deleted: delete from A540769.plan_table
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.DSN_STATEMNT_TABLE
sqlCode 0, 4 rows deleted: delete from A540769.DSN_STATEMNT_TABLE
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.DSN_DetCost_TABLE
sqlCode 0, 16 rows deleted: delete from A540769.DSN_DetCost_TABLE
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.dsn_filter_Table
sqlCode 0, 25 rows deleted: delete from A540769.dsn_filter_Table
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.dsn_predicat_table
sqlCode 0, 100 rows deleted: delete from A540769.dsn_predicat_table
sqlCode 0: explain plan set queryno = 10 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 12 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 20 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 30 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 32 for select d.* from qz92crT.tqz91...
Queryn B PM TABLE UJOG ...
TYPE tTy no cor ...
ACCESS mcO ...
INDEX join/met ...
Queryn B PM TYPE ACCESS INDEX TABLE tTy no c mcO join/m UJOG ...
10 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNNN ...
10 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNNN ...
12 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 1Y NNNN ...
12 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNNN ...
20 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNNN ...
20 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNNN ...
30 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNNN ...
30 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 2N nlJoin NNNN ...
32 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 1Y NNNN ...
32 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 2N nlJoin NNNN ...
10 rows fetched: select * from plan_view1 order by queryNo, qblockno, plan...
MSEC TABLE ...
Queryn B PM tTy no cor ...
TYPE mcO ...
ACCESS join/met ...
INDEX UJO...
M Queryn B PM TYPE ACCESS INDEX TABLE tTy no c mcO join/m UJO...
2 10 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNN...
2 10 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNN...
1 12 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 1Y NNN...
1 12 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNN...
1 20 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNN...
1 20 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNN...
1 30 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNN...
1 30 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 2N nlJoin NNN...
1 32 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 1Y NNN...
1 32 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 2N nlJoin NNN...
10 rows fetched: select * from plan_view2 order by queryNo, qblockno, plan...
DMROWS OPENCOST INDEX ...
RDSROW Queryn B PM ...
SNROWS TYPE ...
COMPCOST ACCESS ...
DMROWS RDSROW SNROWS COMPCOST OPENCO Queryn B PM TYPE ACCESS INDEX ...
6.00e1 6.00e1 0.0e0 1.85e-1 0.0e0 10 1 10 SELECT ixScan IQZ91PA2DIPA...
2.36e0 2.36e0 0.0e0 2.50e00 0.0e0 10 1 20 SELECT ixScan IQZ91PA2DIDA...
2.17e0 2.17e0 0.0e0 4.08e-2 0.0e0 12 1 10 SELECT ixScan IQZ91PA2DIPA...
2.36e0 2.36e0 0.0e0 1.24e-1 0.0e0 12 1 20 SELECT ixScan IQZ91PA2DIDA...
6.00e1 6.00e1 0.0e0 1.85e-1 0.0e0 20 1 10 SELECT ixScan IQZ91PA2DIPA...
1.00e0 1.00e0 0.0e0 2.28e00 0.0e0 20 1 20 SELECT ixScan IQZ91PA2DIDA...
6.00e1 6.00e1 0.0e0 1.85e-1 0.0e0 30 1 10 SELECT ixScan IQZ91PA2DIPA...
1.00e0 1.00e0 0.0e0 1.75e00 0.0e0 30 1 20 SELECT ixScan IQZ91PA2DIDA...
2.57e0 2.57e0 0.0e0 4.83e-2 0.0e0 32 1 10 SELECT ixScan IQZ91PA2DIPA...
1.00e0 1.00e0 0.0e0 1.15e-1 0.0e0 32 1 20 SELECT ixScan IQZ91PA2DIDA...
10 rows fetched: select * from plan_view2det order by queryNo, qblockno, p...
SQLCODE = -104: ILLEGAL SYMBOL "FRXM". SOME SYMBOLS THAT
MIGHT BE LEGAL ARE: FROM INTO
src select * frxm plan_viewPred orde...
> >>>pos 77 of 299>>>
sql = select * ...
stmt = prepare s10 into :M.SQL.10.D from :src
with into :M.SQL.10.D = M.SQL.10.D
sqlCode 0: rollback
$#out 20160612 15:15:39
sqlCode 0: set current sqlid = 'A540769'
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.plan_table
sqlCode 0, 16 rows deleted: delete from A540769.plan_table
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.DSN_STATEMNT_TABLE
sqlCode 0, 4 rows deleted: delete from A540769.DSN_STATEMNT_TABLE
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.DSN_DetCost_TABLE
sqlCode 0, 16 rows deleted: delete from A540769.DSN_DetCost_TABLE
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.dsn_filter_Table
sqlCode 0, 25 rows deleted: delete from A540769.dsn_filter_Table
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.dsn_predicat_table
sqlCode 0, 100 rows deleted: delete from A540769.dsn_predicat_table
sqlCode 0: explain plan set queryno = 10 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 12 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 20 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 30 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 32 for select d.* from qz92crT.tqz91...
Queryn B PM TABLE UJOG ...
TYPE tTy no cor ...
ACCESS mcO ...
INDEX join/met ...
Queryn B PM TYPE ACCESS INDEX TABLE tTy no c mcO join/m UJOG ...
10 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNNN ...
10 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNNN ...
12 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 1Y NNNN ...
12 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNNN ...
20 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNNN ...
20 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNNN ...
30 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNNN ...
30 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 2N nlJoin NNNN ...
32 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 1Y NNNN ...
32 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 2N nlJoin NNNN ...
10 rows fetched: select * from plan_view1 order by queryNo, qblockno, plan...
MSEC TABLE ...
Queryn B PM tTy no cor ...
TYPE mcO ...
ACCESS join/met ...
INDEX UJO...
M Queryn B PM TYPE ACCESS INDEX TABLE tTy no c mcO join/m UJO...
2 10 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNN...
2 10 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNN...
1 12 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 1Y NNN...
1 12 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNN...
1 20 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNN...
1 20 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNN...
1 30 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNN...
1 30 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 2N nlJoin NNN...
1 32 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 1Y NNN...
1 32 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 2N nlJoin NNN...
10 rows fetched: select * from plan_view2 order by queryNo, qblockno, plan...
DMROWS OPENCOST INDEX ...
RDSROW Queryn B PM ...
SNROWS TYPE ...
COMPCOST ACCESS ...
DMROWS RDSROW SNROWS COMPCOST OPENCO Queryn B PM TYPE ACCESS INDEX ...
6.00e1 6.00e1 0.0e0 1.85e-1 0.0e0 10 1 10 SELECT ixScan IQZ91PA2DIPA...
2.36e0 2.36e0 0.0e0 2.50e00 0.0e0 10 1 20 SELECT ixScan IQZ91PA2DIDA...
2.17e0 2.17e0 0.0e0 4.08e-2 0.0e0 12 1 10 SELECT ixScan IQZ91PA2DIPA...
2.36e0 2.36e0 0.0e0 1.24e-1 0.0e0 12 1 20 SELECT ixScan IQZ91PA2DIDA...
6.00e1 6.00e1 0.0e0 1.85e-1 0.0e0 20 1 10 SELECT ixScan IQZ91PA2DIPA...
1.00e0 1.00e0 0.0e0 2.28e00 0.0e0 20 1 20 SELECT ixScan IQZ91PA2DIDA...
6.00e1 6.00e1 0.0e0 1.85e-1 0.0e0 30 1 10 SELECT ixScan IQZ91PA2DIPA...
1.00e0 1.00e0 0.0e0 1.75e00 0.0e0 30 1 20 SELECT ixScan IQZ91PA2DIDA...
2.57e0 2.57e0 0.0e0 4.83e-2 0.0e0 32 1 10 SELECT ixScan IQZ91PA2DIPA...
1.00e0 1.00e0 0.0e0 1.15e-1 0.0e0 32 1 20 SELECT ixScan IQZ91PA2DIDA...
10 rows fetched: select * from plan_view2det order by queryNo, qblockno, p...
SQLCODE = -104: ILLEGAL SYMBOL "FRXM". SOME SYMBOLS THAT
MIGHT BE LEGAL ARE: FROM INTO
src select * frxm plan_viewPred orde...
> >>>pos 77 of 299>>>
sql = select * ...
stmt = prepare s10 into :M.SQL.10.D from :src
with into :M.SQL.10.D = M.SQL.10.D
sqlCode 0: rollback
$#out 20160612 15:14:22
sqlCode 0: set current sqlid = 'A540769'
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.plan_table
sqlCode 0, 16 rows deleted: delete from A540769.plan_table
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.DSN_STATEMNT_TABLE
sqlCode 0, 4 rows deleted: delete from A540769.DSN_STATEMNT_TABLE
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.DSN_DetCost_TABLE
sqlCode 0, 16 rows deleted: delete from A540769.DSN_DetCost_TABLE
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.dsn_filter_Table
sqlCode 0, 25 rows deleted: delete from A540769.dsn_filter_Table
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.dsn_predicat_table
sqlCode 0, 100 rows deleted: delete from A540769.dsn_predicat_table
sqlCode 0: explain plan set queryno = 10 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 12 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 20 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 30 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 32 for select d.* from qz92crT.tqz91...
Queryn B PM TABLE UJOG ...
TYPE tTy no cor ...
ACCESS mcO ...
INDEX join/met ...
Queryn B PM TYPE ACCESS INDEX TABLE tTy no c mcO join/m UJOG ...
10 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNNN ...
10 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNNN ...
12 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 1Y NNNN ...
12 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNNN ...
20 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNNN ...
20 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNNN ...
30 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNNN ...
30 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 2N nlJoin NNNN ...
32 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 1Y NNNN ...
32 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 2N nlJoin NNNN ...
10 rows fetched: select * from plan_view1 order by queryNo, qblockno, plan...
MSEC TABLE ...
Queryn B PM tTy no cor ...
TYPE mcO ...
ACCESS join/met ...
INDEX UJO...
M Queryn B PM TYPE ACCESS INDEX TABLE tTy no c mcO join/m UJO...
2 10 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNN...
2 10 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNN...
1 12 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 1Y NNN...
1 12 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNN...
1 20 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNN...
1 20 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNN...
1 30 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNN...
1 30 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 2N nlJoin NNN...
1 32 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 1Y NNN...
1 32 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 2N nlJoin NNN...
10 rows fetched: select * from plan_view2 order by queryNo, qblockno, plan...
DMROWS OPENCOST INDEX ...
RDSROW Queryn B PM ...
SNROWS TYPE ...
COMPCOST ACCESS ...
DMROWS RDSROW SNROWS COMPCOST OPENCO Queryn B PM TYPE ACCESS INDEX ...
6.00e1 6.00e1 0.0e0 1.85e-1 0.0e0 10 1 10 SELECT ixScan IQZ91PA2DIPA...
2.36e0 2.36e0 0.0e0 2.50e00 0.0e0 10 1 20 SELECT ixScan IQZ91PA2DIDA...
2.17e0 2.17e0 0.0e0 4.08e-2 0.0e0 12 1 10 SELECT ixScan IQZ91PA2DIPA...
2.36e0 2.36e0 0.0e0 1.24e-1 0.0e0 12 1 20 SELECT ixScan IQZ91PA2DIDA...
6.00e1 6.00e1 0.0e0 1.85e-1 0.0e0 20 1 10 SELECT ixScan IQZ91PA2DIPA...
1.00e0 1.00e0 0.0e0 2.28e00 0.0e0 20 1 20 SELECT ixScan IQZ91PA2DIDA...
6.00e1 6.00e1 0.0e0 1.85e-1 0.0e0 30 1 10 SELECT ixScan IQZ91PA2DIPA...
1.00e0 1.00e0 0.0e0 1.75e00 0.0e0 30 1 20 SELECT ixScan IQZ91PA2DIDA...
2.57e0 2.57e0 0.0e0 4.83e-2 0.0e0 32 1 10 SELECT ixScan IQZ91PA2DIPA...
1.00e0 1.00e0 0.0e0 1.15e-1 0.0e0 32 1 20 SELECT ixScan IQZ91PA2DIDA...
10 rows fetched: select * from plan_view2det order by queryNo, qblockno, p...
Queryn B PM TEXT ...
PREDIN ...
ORDERN ...
STAGE ...
FF ...
PRTY ...
BoN ...
Queryn B PM PR ORD STAGE FF PRTY BoN TEXT ...
10 1 1 --- --- 1.00e00 AND Y N (((((("D"."CIF"='C_PG' AND...
10 1 20 2 2 MATCHING 9.62e-3 EQUAL Y N "D"."CIF"='C_PG' ...
10 1 20 3 3 MATCHING 3.28e-2 EQUAL Y N "D"."ADT"='2016-04-25' ...
10 1 20 4 1 MATCHING 1.67e-2 EQUAL Y N "P"."P"="D"."P" ...
10 1 20 5 4 STAGE1 1.00e-1 RANGE Y N "D"."CIF">="P"."CIFBEG" ...
10 1 20 6 5 STAGE1 1.00e-1 RANGE Y N "D"."CIF"<"P"."CIFEND" ...
10 1 20 7 6 STAGE1 3.33e-1 RANGE Y N "D"."ADT">="P"."ADTBEG" ...
10 1 20 8 7 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<"P"."ADTEND" ...
10 1 9 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4,5,6,7,8 ...
10 1 10 --- --- 3.20e-4 COMPOUND Y N COMPOUND: 2,3 ...
10 1 11 --- --- 1.67e-2 COMPOUND Y N COMPOUND: 4,5,6,7,8 ...
10 1 12 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4 ...
12 1 1 --- --- 1.00e00 AND Y N (((((((((("D"."CIF"='C_PG'...
12 1 20 2 2 MATCHING 9.62e-3 EQUAL Y N "D"."CIF"='C_PG' ...
12 1 20 3 3 MATCHING 3.28e-2 EQUAL Y N "D"."ADT"='2016-04-25' ...
12 1 10 4 1 MATCHING 6.00e-1 RANGE Y N "P"."CIFBEG"<='C_PG' ...
12 1 10 5 2 SCREENING 3.33e-1 RANGE Y N "P"."CIFEND">'C_PG' ...
12 1 10 6 3 SCREENING 3.33e-1 RANGE Y N "P"."ADTBEG"<='2016-04-25'...
12 1 10 7 4 SCREENING 3.33e-1 RANGE Y N "P"."ADTEND">'2016-04-25' ...
12 1 20 8 1 MATCHING 1.67e-2 EQUAL Y N "P"."P"="D"."P" ...
12 1 20 9 4 STAGE1 1.00e-1 RANGE Y N "D"."CIF">="P"."CIFBEG" ...
12 1 20 10 5 STAGE1 1.00e-1 RANGE Y N "D"."CIF"<"P"."CIFEND" ...
12 1 20 11 6 STAGE1 3.33e-1 RANGE Y N "D"."ADT">="P"."ADTBEG" ...
12 1 20 12 7 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<"P"."ADTEND" ...
12 1 13 --- --- 3.20e-4 COMPOUND Y N COMPOUND: 2,3 ...
12 1 14 --- --- 1.94e-2 COMPOUND Y N COMPOUND: 4,5,6,7,9 ...
12 1 15 --- --- 1.67e-2 COMPOUND Y N COMPOUND: 4,5,6,7,8,9,10,1...
12 1 16 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,8 ...
12 1 17 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,8,9,10,11,12...
12 1 18 --- --- 3.61e-2 COMPOUND Y N COMPOUND: 4,5,6,7 ...
20 1 1 --- --- 1.00e00 AND Y N ((((((("D"."CIF"='C_PG' AN...
20 1 20 2 2 MATCHING 9.62e-3 EQUAL Y N "D"."CIF"='C_PG' ...
20 1 20 3 3 MATCHING 3.33e-1 RANGE Y N "D"."ADT">='2016-04-25' ...
20 1 20 4 4 MATCHING 3.33e-1 RANGE Y N "D"."ADT"<'2016-05-04' ...
20 1 20 5 1 MATCHING 1.67e-2 EQUAL Y N "P"."P"="D"."P" ...
20 1 20 6 5 STAGE1 1.00e-1 RANGE Y N "D"."CIF">="P"."CIFBEG" ...
20 1 20 7 6 STAGE1 1.00e-1 RANGE Y N "D"."CIF"<"P"."CIFEND" ...
20 1 20 8 7 STAGE1 3.33e-1 RANGE Y N "D"."ADT">="P"."ADTBEG" ...
20 1 20 9 8 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<"P"."ADTEND" ...
20 1 10 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4,5 ...
20 1 11 --- --- 1.60e-4 COMPOUND Y N COMPOUND: 2,5 ...
20 1 12 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4,5,8,9 ...
20 1 13 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4 ...
20 1 14 --- --- 1.67e-2 COMPOUND Y N COMPOUND: 5,6,7,8,9 ...
20 1 15 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4,5,6,7,8,9 ...
30 1 1 --- --- 1.00e00 AND Y N (((((((("D"."CIF">='CS' AN...
30 1 20 2 2 MATCHING 1.00e-1 RANGE Y N "D"."CIF">='CS' ...
30 1 20 3 3 MATCHING 1.00e-1 RANGE Y N "D"."CIF"<'DB' ...
30 1 20 4 4 SCREENING 3.33e-1 RANGE Y N "D"."ADT">='2016-04-25' ...
30 1 20 5 5 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<'2016-05-04' ...
30 1 20 6 1 MATCHING 1.67e-2 EQUAL Y N "P"."P"="D"."P" ...
30 1 20 7 6 STAGE1 1.00e-1 RANGE Y N "D"."CIF">="P"."CIFBEG" ...
30 1 20 8 7 STAGE1 1.00e-1 RANGE Y N "D"."CIF"<"P"."CIFEND" ...
30 1 20 9 8 STAGE1 3.33e-1 RANGE Y N "D"."ADT">="P"."ADTBEG" ...
30 1 20 10 9 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<"P"."ADTEND" ...
30 1 11 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4,5 ...
30 1 12 --- --- 1.00e-2 COMPOUND Y N COMPOUND: 2,3 ...
30 1 13 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4,5,6,7,8,9,...
30 1 14 --- --- 1.67e-2 COMPOUND Y N COMPOUND: 6,7,8,9,10 ...
30 1 15 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,6 ...
30 1 16 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4,5,6 ...
32 1 1 --- --- 1.00e00 AND Y N (((((((((((("D"."CIF">='CS...
32 1 20 2 2 MATCHING 1.00e-1 RANGE Y N "D"."CIF">='CS' ...
32 1 20 3 3 MATCHING 1.00e-1 RANGE Y N "D"."CIF"<'DB' ...
32 1 20 4 4 SCREENING 3.33e-1 RANGE Y N "D"."ADT">='2016-04-25' ...
32 1 20 5 5 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<'2016-05-04' ...
32 1 10 6 2 SCREENING 3.33e-1 RANGE Y N "P"."CIFEND">'CS' ...
32 1 10 7 1 MATCHING 8.00e-1 RANGE Y N "P"."CIFBEG"<'DB' ...
32 1 10 8 4 SCREENING 3.33e-1 RANGE Y N "P"."ADTEND">'2016-04-25' ...
32 1 10 9 3 SCREENING 3.33e-1 RANGE Y N "P"."ADTBEG"<'2016-05-04' ...
32 1 20 10 1 MATCHING 1.67e-2 EQUAL Y N "P"."P"="D"."P" ...
32 1 20 11 6 STAGE1 1.00e-1 RANGE Y N "D"."CIF">="P"."CIFBEG" ...
32 1 20 12 7 STAGE1 1.00e-1 RANGE Y N "D"."CIF"<"P"."CIFEND" ...
32 1 20 13 8 STAGE1 3.33e-1 RANGE Y N "D"."ADT">="P"."ADTBEG" ...
32 1 20 14 9 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<"P"."ADTEND" ...
32 1 15 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4,5 ...
32 1 16 --- --- 1.67e-2 COMPOUND Y N COMPOUND: 6,7,8,9,10,11,12...
32 1 17 --- --- 1.00e-2 COMPOUND Y N COMPOUND: 2,3 ...
32 1 18 --- --- 1.94e-2 COMPOUND Y N COMPOUND: 6,7,8,9,11 ...
32 1 19 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,10 ...
32 1 20 --- --- 4.28e-2 COMPOUND Y N COMPOUND: 6,7,8,9 ...
32 1 21 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4,5,10,11,12...
32 1 22 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4,5,10 ...
83 rows fetched: select * from plan_viewPred order by collid, progName, ex...
sqlCode 0: rollback
$#out 20160610 13:31:11
sqlCode 0: set current sqlid = 'A540769'
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.plan_table
sqlCode 0, 16 rows deleted: delete from A540769.plan_table
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.DSN_STATEMNT_TABLE
sqlCode 0, 4 rows deleted: delete from A540769.DSN_STATEMNT_TABLE
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.DSN_DetCost_TABLE
sqlCode 0, 16 rows deleted: delete from A540769.DSN_DetCost_TABLE
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.dsn_filter_Table
sqlCode 0, 25 rows deleted: delete from A540769.dsn_filter_Table
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.dsn_predicat_table
sqlCode 0, 100 rows deleted: delete from A540769.dsn_predicat_table
sqlCode 0: explain plan set queryno = 10 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 12 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 20 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 30 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 32 for select d.* from qz92crT.tqz91...
Queryn B PM TABLE UJOG ...
TYPE tTy no cor ...
ACCESS mcO ...
INDEX join/met ...
Queryn B PM TYPE ACCESS INDEX TABLE tTy no c mcO join/m UJOG ...
10 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNNN ...
10 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNNN ...
12 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 1Y NNNN ...
12 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNNN ...
20 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNNN ...
20 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNNN ...
30 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNNN ...
30 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 2N nlJoin NNNN ...
32 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 1Y NNNN ...
32 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 2N nlJoin NNNN ...
10 rows fetched: select * from plan_view1 order by queryNo, qblockno, plan...
MSEC TABLE ...
Queryn B PM tTy no cor ...
TYPE mcO ...
ACCESS join/met ...
INDEX UJO...
M Queryn B PM TYPE ACCESS INDEX TABLE tTy no c mcO join/m UJO...
2 10 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNN...
2 10 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNN...
1 12 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 1Y NNN...
1 12 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNN...
1 20 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNN...
1 20 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNN...
1 30 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNN...
1 30 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 2N nlJoin NNN...
1 32 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 1Y NNN...
1 32 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 2N nlJoin NNN...
10 rows fetched: select * from plan_view2 order by queryNo, qblockno, plan...
DMROWS OPENCOST INDEX ...
RDSROW Queryn B PM ...
SNROWS TYPE ...
COMPCOST ACCESS ...
DMROWS RDSROW SNROWS COMPCOST OPENCO Queryn B PM TYPE ACCESS INDEX ...
6.00e1 6.00e1 0.0e0 1.85e-1 0.0e0 10 1 10 SELECT ixScan IQZ91PA2DIPA...
2.36e0 2.36e0 0.0e0 2.50e00 0.0e0 10 1 20 SELECT ixScan IQZ91PA2DIDA...
2.17e0 2.17e0 0.0e0 4.08e-2 0.0e0 12 1 10 SELECT ixScan IQZ91PA2DIPA...
2.36e0 2.36e0 0.0e0 1.24e-1 0.0e0 12 1 20 SELECT ixScan IQZ91PA2DIDA...
6.00e1 6.00e1 0.0e0 1.85e-1 0.0e0 20 1 10 SELECT ixScan IQZ91PA2DIPA...
1.00e0 1.00e0 0.0e0 2.28e00 0.0e0 20 1 20 SELECT ixScan IQZ91PA2DIDA...
6.00e1 6.00e1 0.0e0 1.85e-1 0.0e0 30 1 10 SELECT ixScan IQZ91PA2DIPA...
1.00e0 1.00e0 0.0e0 1.75e00 0.0e0 30 1 20 SELECT ixScan IQZ91PA2DIDA...
2.57e0 2.57e0 0.0e0 4.83e-2 0.0e0 32 1 10 SELECT ixScan IQZ91PA2DIPA...
1.00e0 1.00e0 0.0e0 1.15e-1 0.0e0 32 1 20 SELECT ixScan IQZ91PA2DIDA...
10 rows fetched: select * from plan_view2det order by queryNo, qblockno, p...
Queryn B PM TEXT ...
PREDIN ...
ORDERN ...
STAGE ...
FF ...
PRTY ...
BoN ...
Queryn B PM PR ORD STAGE FF PRTY BoN TEXT ...
10 1 1 --- --- 1.00e00 AND Y N (((((("D"."CIF"='C_PG' AND...
10 1 20 2 2 MATCHING 9.62e-3 EQUAL Y N "D"."CIF"='C_PG' ...
10 1 20 3 3 MATCHING 3.28e-2 EQUAL Y N "D"."ADT"='2016-04-25' ...
10 1 20 4 1 MATCHING 1.67e-2 EQUAL Y N "P"."P"="D"."P" ...
10 1 20 5 4 STAGE1 1.00e-1 RANGE Y N "D"."CIF">="P"."CIFBEG" ...
10 1 20 6 5 STAGE1 1.00e-1 RANGE Y N "D"."CIF"<"P"."CIFEND" ...
10 1 20 7 6 STAGE1 3.33e-1 RANGE Y N "D"."ADT">="P"."ADTBEG" ...
10 1 20 8 7 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<"P"."ADTEND" ...
10 1 9 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4,5,6,7,8 ...
10 1 10 --- --- 3.20e-4 COMPOUND Y N COMPOUND: 2,3 ...
10 1 11 --- --- 1.67e-2 COMPOUND Y N COMPOUND: 4,5,6,7,8 ...
10 1 12 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4 ...
12 1 1 --- --- 1.00e00 AND Y N (((((((((("D"."CIF"='C_PG'...
12 1 20 2 2 MATCHING 9.62e-3 EQUAL Y N "D"."CIF"='C_PG' ...
12 1 20 3 3 MATCHING 3.28e-2 EQUAL Y N "D"."ADT"='2016-04-25' ...
12 1 10 4 1 MATCHING 6.00e-1 RANGE Y N "P"."CIFBEG"<='C_PG' ...
12 1 10 5 2 SCREENING 3.33e-1 RANGE Y N "P"."CIFEND">'C_PG' ...
12 1 10 6 3 SCREENING 3.33e-1 RANGE Y N "P"."ADTBEG"<='2016-04-25'...
12 1 10 7 4 SCREENING 3.33e-1 RANGE Y N "P"."ADTEND">'2016-04-25' ...
12 1 20 8 1 MATCHING 1.67e-2 EQUAL Y N "P"."P"="D"."P" ...
12 1 20 9 4 STAGE1 1.00e-1 RANGE Y N "D"."CIF">="P"."CIFBEG" ...
12 1 20 10 5 STAGE1 1.00e-1 RANGE Y N "D"."CIF"<"P"."CIFEND" ...
12 1 20 11 6 STAGE1 3.33e-1 RANGE Y N "D"."ADT">="P"."ADTBEG" ...
12 1 20 12 7 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<"P"."ADTEND" ...
12 1 13 --- --- 3.20e-4 COMPOUND Y N COMPOUND: 2,3 ...
12 1 14 --- --- 1.94e-2 COMPOUND Y N COMPOUND: 4,5,6,7,9 ...
12 1 15 --- --- 1.67e-2 COMPOUND Y N COMPOUND: 4,5,6,7,8,9,10,1...
12 1 16 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,8 ...
12 1 17 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,8,9,10,11,12...
12 1 18 --- --- 3.61e-2 COMPOUND Y N COMPOUND: 4,5,6,7 ...
20 1 1 --- --- 1.00e00 AND Y N ((((((("D"."CIF"='C_PG' AN...
20 1 20 2 2 MATCHING 9.62e-3 EQUAL Y N "D"."CIF"='C_PG' ...
20 1 20 3 3 MATCHING 3.33e-1 RANGE Y N "D"."ADT">='2016-04-25' ...
20 1 20 4 4 MATCHING 3.33e-1 RANGE Y N "D"."ADT"<'2016-05-04' ...
20 1 20 5 1 MATCHING 1.67e-2 EQUAL Y N "P"."P"="D"."P" ...
20 1 20 6 5 STAGE1 1.00e-1 RANGE Y N "D"."CIF">="P"."CIFBEG" ...
20 1 20 7 6 STAGE1 1.00e-1 RANGE Y N "D"."CIF"<"P"."CIFEND" ...
20 1 20 8 7 STAGE1 3.33e-1 RANGE Y N "D"."ADT">="P"."ADTBEG" ...
20 1 20 9 8 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<"P"."ADTEND" ...
20 1 10 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4,5 ...
20 1 11 --- --- 1.60e-4 COMPOUND Y N COMPOUND: 2,5 ...
20 1 12 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4,5,8,9 ...
20 1 13 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4 ...
20 1 14 --- --- 1.67e-2 COMPOUND Y N COMPOUND: 5,6,7,8,9 ...
20 1 15 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4,5,6,7,8,9 ...
30 1 1 --- --- 1.00e00 AND Y N (((((((("D"."CIF">='CS' AN...
30 1 20 2 2 MATCHING 1.00e-1 RANGE Y N "D"."CIF">='CS' ...
30 1 20 3 3 MATCHING 1.00e-1 RANGE Y N "D"."CIF"<'DB' ...
30 1 20 4 4 SCREENING 3.33e-1 RANGE Y N "D"."ADT">='2016-04-25' ...
30 1 20 5 5 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<'2016-05-04' ...
30 1 20 6 1 MATCHING 1.67e-2 EQUAL Y N "P"."P"="D"."P" ...
30 1 20 7 6 STAGE1 1.00e-1 RANGE Y N "D"."CIF">="P"."CIFBEG" ...
30 1 20 8 7 STAGE1 1.00e-1 RANGE Y N "D"."CIF"<"P"."CIFEND" ...
30 1 20 9 8 STAGE1 3.33e-1 RANGE Y N "D"."ADT">="P"."ADTBEG" ...
30 1 20 10 9 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<"P"."ADTEND" ...
30 1 11 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4,5 ...
30 1 12 --- --- 1.00e-2 COMPOUND Y N COMPOUND: 2,3 ...
30 1 13 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4,5,6,7,8,9,...
30 1 14 --- --- 1.67e-2 COMPOUND Y N COMPOUND: 6,7,8,9,10 ...
30 1 15 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,6 ...
30 1 16 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4,5,6 ...
32 1 1 --- --- 1.00e00 AND Y N (((((((((((("D"."CIF">='CS...
32 1 20 2 2 MATCHING 1.00e-1 RANGE Y N "D"."CIF">='CS' ...
32 1 20 3 3 MATCHING 1.00e-1 RANGE Y N "D"."CIF"<'DB' ...
32 1 20 4 4 SCREENING 3.33e-1 RANGE Y N "D"."ADT">='2016-04-25' ...
32 1 20 5 5 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<'2016-05-04' ...
32 1 10 6 2 SCREENING 3.33e-1 RANGE Y N "P"."CIFEND">'CS' ...
32 1 10 7 1 MATCHING 8.00e-1 RANGE Y N "P"."CIFBEG"<'DB' ...
32 1 10 8 4 SCREENING 3.33e-1 RANGE Y N "P"."ADTEND">'2016-04-25' ...
32 1 10 9 3 SCREENING 3.33e-1 RANGE Y N "P"."ADTBEG"<'2016-05-04' ...
32 1 20 10 1 MATCHING 1.67e-2 EQUAL Y N "P"."P"="D"."P" ...
32 1 20 11 6 STAGE1 1.00e-1 RANGE Y N "D"."CIF">="P"."CIFBEG" ...
32 1 20 12 7 STAGE1 1.00e-1 RANGE Y N "D"."CIF"<"P"."CIFEND" ...
32 1 20 13 8 STAGE1 3.33e-1 RANGE Y N "D"."ADT">="P"."ADTBEG" ...
32 1 20 14 9 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<"P"."ADTEND" ...
32 1 15 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4,5 ...
32 1 16 --- --- 1.67e-2 COMPOUND Y N COMPOUND: 6,7,8,9,10,11,12...
32 1 17 --- --- 1.00e-2 COMPOUND Y N COMPOUND: 2,3 ...
32 1 18 --- --- 1.94e-2 COMPOUND Y N COMPOUND: 6,7,8,9,11 ...
32 1 19 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,10 ...
32 1 20 --- --- 4.28e-2 COMPOUND Y N COMPOUND: 6,7,8,9 ...
32 1 21 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4,5,10,11,12...
32 1 22 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4,5,10 ...
83 rows fetched: select * from plan_viewPred order by collid, progName, ex...
sqlCode 0: rollback
$#out 20160610 13:30:25
sqlCode 0: set current sqlid = 'A540769'
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.plan_table
sqlCode 0, 16 rows deleted: delete from A540769.plan_table
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.DSN_STATEMNT_TABLE
sqlCode 0, 4 rows deleted: delete from A540769.DSN_STATEMNT_TABLE
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.DSN_DetCost_TABLE
sqlCode 0, 16 rows deleted: delete from A540769.DSN_DetCost_TABLE
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.dsn_filter_Table
sqlCode 0, 25 rows deleted: delete from A540769.dsn_filter_Table
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.dsn_predicat_table
sqlCode 0, 100 rows deleted: delete from A540769.dsn_predicat_table
sqlCode 0: explain plan set queryno = 10 for select d.* from qz92crT.tqz91...
SQLCODE = -206: P.ADBEND IS NOT VALID IN THE CONTEXT WHERE
IT IS USED
sql = explain plan set queryno = 12 for ...
sqlCode 0: rollback
$#out 20160610 13:29:41
sqlCode 0: set current sqlid = 'A540769'
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.plan_table
sqlCode 0, 16 rows deleted: delete from A540769.plan_table
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.DSN_STATEMNT_TABLE
sqlCode 0, 4 rows deleted: delete from A540769.DSN_STATEMNT_TABLE
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.DSN_DetCost_TABLE
sqlCode 0, 16 rows deleted: delete from A540769.DSN_DetCost_TABLE
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.dsn_filter_Table
sqlCode 0, 25 rows deleted: delete from A540769.dsn_filter_Table
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.dsn_predicat_table
sqlCode 0, 100 rows deleted: delete from A540769.dsn_predicat_table
sqlCode 0: explain plan set queryno = 10 for select d.* from qz92crT.tqz91...
SQLCODE = -206: D.ADTBEG IS NOT VALID IN THE CONTEXT WHERE
IT IS USED
sql = explain plan set queryno = 12 for ...
sqlCode 0: rollback
$#out 20160610 13:04:35
sqlCode 0: set current sqlid = 'A540769'
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.plan_table
sqlCode 0, 16 rows deleted: delete from A540769.plan_table
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.DSN_STATEMNT_TABLE
sqlCode 0, 4 rows deleted: delete from A540769.DSN_STATEMNT_TABLE
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.DSN_DetCost_TABLE
sqlCode 0, 16 rows deleted: delete from A540769.DSN_DetCost_TABLE
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.dsn_filter_Table
sqlCode 0, 25 rows deleted: delete from A540769.dsn_filter_Table
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.dsn_predicat_table
sqlCode 0, 100 rows deleted: delete from A540769.dsn_predicat_table
sqlCode 0: explain plan set queryno = 10 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 20 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 30 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 32 for select d.* from qz92crT.tqz91...
Queryn B PM TABLE UJOG ...
TYPE tTy no cor ...
ACCESS mcO ...
INDEX join/met ...
Queryn B PM TYPE ACCESS INDEX TABLE tTy no c mcO join/m UJOG ...
10 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNNN ...
10 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNNN ...
20 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNNN ...
20 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNNN ...
30 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNNN ...
30 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 2N nlJoin NNNN ...
32 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 1Y NNNN ...
32 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 2N nlJoin NNNN ...
8 rows fetched: select * from plan_view1 order by queryNo, qblockno, plann...
MSEC TABLE ...
Queryn B PM tTy no cor ...
TYPE mcO ...
ACCESS join/met ...
INDEX UJO...
M Queryn B PM TYPE ACCESS INDEX TABLE tTy no c mcO join/m UJO...
2 10 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNN...
2 10 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNN...
1 20 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNN...
1 20 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNN...
1 30 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNN...
1 30 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 2N nlJoin NNN...
1 32 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 1Y NNN...
1 32 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 2N nlJoin NNN...
8 rows fetched: select * from plan_view2 order by queryNo, qblockno, plann...
DMROWS OPENCOST INDEX ...
RDSROW Queryn B PM ...
SNROWS TYPE ...
COMPCOST ACCESS ...
DMROWS RDSROW SNROWS COMPCOST OPENCO Queryn B PM TYPE ACCESS INDEX ...
6.00e1 6.00e1 0.0e0 1.85e-1 0.0e0 10 1 10 SELECT ixScan IQZ91PA2DIPA...
2.36e0 2.36e0 0.0e0 2.50e00 0.0e0 10 1 20 SELECT ixScan IQZ91PA2DIDA...
6.00e1 6.00e1 0.0e0 1.85e-1 0.0e0 20 1 10 SELECT ixScan IQZ91PA2DIPA...
1.00e0 1.00e0 0.0e0 2.28e00 0.0e0 20 1 20 SELECT ixScan IQZ91PA2DIDA...
6.00e1 6.00e1 0.0e0 1.85e-1 0.0e0 30 1 10 SELECT ixScan IQZ91PA2DIPA...
1.00e0 1.00e0 0.0e0 1.75e00 0.0e0 30 1 20 SELECT ixScan IQZ91PA2DIDA...
2.57e0 2.57e0 0.0e0 4.83e-2 0.0e0 32 1 10 SELECT ixScan IQZ91PA2DIPA...
1.00e0 1.00e0 0.0e0 1.15e-1 0.0e0 32 1 20 SELECT ixScan IQZ91PA2DIDA...
8 rows fetched: select * from plan_view2det order by queryNo, qblockno, pl...
Queryn B PM TEXT ...
PREDIN ...
ORDERN ...
STAGE ...
FF ...
PRTY ...
BoN ...
Queryn B PM PR ORD STAGE FF PRTY BoN TEXT ...
10 1 1 --- --- 1.00e00 AND Y N (((((("D"."CIF"='C_PG' AND...
10 1 20 2 2 MATCHING 9.62e-3 EQUAL Y N "D"."CIF"='C_PG' ...
10 1 20 3 3 MATCHING 3.28e-2 EQUAL Y N "D"."ADT"='2016-04-25' ...
10 1 20 4 1 MATCHING 1.67e-2 EQUAL Y N "P"."P"="D"."P" ...
10 1 20 5 4 STAGE1 1.00e-1 RANGE Y N "D"."CIF">="P"."CIFBEG" ...
10 1 20 6 5 STAGE1 1.00e-1 RANGE Y N "D"."CIF"<"P"."CIFEND" ...
10 1 20 7 6 STAGE1 3.33e-1 RANGE Y N "D"."ADT">="P"."ADTBEG" ...
10 1 20 8 7 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<"P"."ADTEND" ...
10 1 9 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4,5,6,7,8 ...
10 1 10 --- --- 3.20e-4 COMPOUND Y N COMPOUND: 2,3 ...
10 1 11 --- --- 1.67e-2 COMPOUND Y N COMPOUND: 4,5,6,7,8 ...
10 1 12 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4 ...
20 1 1 --- --- 1.00e00 AND Y N ((((((("D"."CIF"='C_PG' AN...
20 1 20 2 2 MATCHING 9.62e-3 EQUAL Y N "D"."CIF"='C_PG' ...
20 1 20 3 3 MATCHING 3.33e-1 RANGE Y N "D"."ADT">='2016-04-25' ...
20 1 20 4 4 MATCHING 3.33e-1 RANGE Y N "D"."ADT"<'2016-05-04' ...
20 1 20 5 1 MATCHING 1.67e-2 EQUAL Y N "P"."P"="D"."P" ...
20 1 20 6 5 STAGE1 1.00e-1 RANGE Y N "D"."CIF">="P"."CIFBEG" ...
20 1 20 7 6 STAGE1 1.00e-1 RANGE Y N "D"."CIF"<"P"."CIFEND" ...
20 1 20 8 7 STAGE1 3.33e-1 RANGE Y N "D"."ADT">="P"."ADTBEG" ...
20 1 20 9 8 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<"P"."ADTEND" ...
20 1 10 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4,5 ...
20 1 11 --- --- 1.60e-4 COMPOUND Y N COMPOUND: 2,5 ...
20 1 12 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4,5,8,9 ...
20 1 13 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4 ...
20 1 14 --- --- 1.67e-2 COMPOUND Y N COMPOUND: 5,6,7,8,9 ...
20 1 15 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4,5,6,7,8,9 ...
30 1 1 --- --- 1.00e00 AND Y N (((((((("D"."CIF">='CS' AN...
30 1 20 2 2 MATCHING 1.00e-1 RANGE Y N "D"."CIF">='CS' ...
30 1 20 3 3 MATCHING 1.00e-1 RANGE Y N "D"."CIF"<'DB' ...
30 1 20 4 4 SCREENING 3.33e-1 RANGE Y N "D"."ADT">='2016-04-25' ...
30 1 20 5 5 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<'2016-05-04' ...
30 1 20 6 1 MATCHING 1.67e-2 EQUAL Y N "P"."P"="D"."P" ...
30 1 20 7 6 STAGE1 1.00e-1 RANGE Y N "D"."CIF">="P"."CIFBEG" ...
30 1 20 8 7 STAGE1 1.00e-1 RANGE Y N "D"."CIF"<"P"."CIFEND" ...
30 1 20 9 8 STAGE1 3.33e-1 RANGE Y N "D"."ADT">="P"."ADTBEG" ...
30 1 20 10 9 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<"P"."ADTEND" ...
30 1 11 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4,5 ...
30 1 12 --- --- 1.00e-2 COMPOUND Y N COMPOUND: 2,3 ...
30 1 13 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4,5,6,7,8,9,...
30 1 14 --- --- 1.67e-2 COMPOUND Y N COMPOUND: 6,7,8,9,10 ...
30 1 15 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,6 ...
30 1 16 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4,5,6 ...
32 1 1 --- --- 1.00e00 AND Y N (((((((((((("D"."CIF">='CS...
32 1 20 2 2 MATCHING 1.00e-1 RANGE Y N "D"."CIF">='CS' ...
32 1 20 3 3 MATCHING 1.00e-1 RANGE Y N "D"."CIF"<'DB' ...
32 1 20 4 4 SCREENING 3.33e-1 RANGE Y N "D"."ADT">='2016-04-25' ...
32 1 20 5 5 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<'2016-05-04' ...
32 1 10 6 2 SCREENING 3.33e-1 RANGE Y N "P"."CIFEND">'CS' ...
32 1 10 7 1 MATCHING 8.00e-1 RANGE Y N "P"."CIFBEG"<'DB' ...
32 1 10 8 4 SCREENING 3.33e-1 RANGE Y N "P"."ADTEND">'2016-04-25' ...
32 1 10 9 3 SCREENING 3.33e-1 RANGE Y N "P"."ADTBEG"<'2016-05-04' ...
32 1 20 10 1 MATCHING 1.67e-2 EQUAL Y N "P"."P"="D"."P" ...
32 1 20 11 6 STAGE1 1.00e-1 RANGE Y N "D"."CIF">="P"."CIFBEG" ...
32 1 20 12 7 STAGE1 1.00e-1 RANGE Y N "D"."CIF"<"P"."CIFEND" ...
32 1 20 13 8 STAGE1 3.33e-1 RANGE Y N "D"."ADT">="P"."ADTBEG" ...
32 1 20 14 9 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<"P"."ADTEND" ...
32 1 15 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4,5 ...
32 1 16 --- --- 1.67e-2 COMPOUND Y N COMPOUND: 6,7,8,9,10,11,12...
32 1 17 --- --- 1.00e-2 COMPOUND Y N COMPOUND: 2,3 ...
32 1 18 --- --- 1.94e-2 COMPOUND Y N COMPOUND: 6,7,8,9,11 ...
32 1 19 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,10 ...
32 1 20 --- --- 4.28e-2 COMPOUND Y N COMPOUND: 6,7,8,9 ...
32 1 21 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4,5,10,11,12...
32 1 22 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4,5,10 ...
65 rows fetched: select * from plan_viewPred order by collid, progName, ex...
sqlCode 0: rollback
$#out 20160610 13:03:43
sqlCode 0: set current sqlid = 'A540769'
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.plan_table
sqlCode 0, 16 rows deleted: delete from A540769.plan_table
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.DSN_STATEMNT_TABLE
sqlCode 0, 4 rows deleted: delete from A540769.DSN_STATEMNT_TABLE
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.DSN_DetCost_TABLE
sqlCode 0, 16 rows deleted: delete from A540769.DSN_DetCost_TABLE
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.dsn_filter_Table
sqlCode 0, 25 rows deleted: delete from A540769.dsn_filter_Table
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.dsn_predicat_table
sqlCode 0, 100 rows deleted: delete from A540769.dsn_predicat_table
sqlCode 0: explain plan set queryno = 10 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 20 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 30 for select d.* from qz92crT.tqz91...
SQLCODE = -206: P.CIF IS NOT VALID IN THE CONTEXT WHERE IT
IS USED
sql = explain plan set queryno = 32 for ...
sqlCode 0: rollback
$#out 20160610 13:00:45
sqlCode 0: set current sqlid = 'A540769'
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.plan_table
sqlCode 0, 16 rows deleted: delete from A540769.plan_table
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.DSN_STATEMNT_TABLE
sqlCode 0, 4 rows deleted: delete from A540769.DSN_STATEMNT_TABLE
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.DSN_DetCost_TABLE
sqlCode 0, 16 rows deleted: delete from A540769.DSN_DetCost_TABLE
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.dsn_filter_Table
sqlCode 0, 25 rows deleted: delete from A540769.dsn_filter_Table
SQLCODE = 000, SUCCESSFUL EXECUTION
warnings 4=W no where
sql = delete from A540769.dsn_predicat_table
sqlCode 0, 100 rows deleted: delete from A540769.dsn_predicat_table
sqlCode 0: explain plan set queryno = 11 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 12 for select d.* from qz92crT.tqz91...
sqlCode 0: explain plan set queryno = 22 for select d.* from qz92crT.tqz91...
Queryn B PM TABLE UJOG ...
TYPE tTy no cor ...
ACCESS mcO ...
INDEX join/met ...
Queryn B PM TYPE ACCESS INDEX TABLE tTy no c mcO join/m UJOG ...
11 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNNN ...
11 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNNN ...
12 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNNN ...
12 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNNN ...
22 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNNN ...
22 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 2N nlJoin NNNN ...
6 rows fetched: select * from plan_view1 order by queryNo, qblockno, plann...
MSEC TABLE ...
Queryn B PM tTy no cor ...
TYPE mcO ...
ACCESS join/met ...
INDEX UJO...
M Queryn B PM TYPE ACCESS INDEX TABLE tTy no c mcO join/m UJO...
2 11 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNN...
2 11 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNN...
1 12 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNN...
1 12 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 3N nlJoin NNN...
1 22 1 10 SELECT ixScan IQZ91PA2DIPA TQZ91PA2DIPA tb 1 P 0Y NNN...
1 22 1 20 SELECT ixScan IQZ91PA2DIDA TQZ91PA2DIDA tb 2 D 2N nlJoin NNN...
6 rows fetched: select * from plan_view2 order by queryNo, qblockno, plann...
DMROWS OPENCOST INDEX ...
RDSROW Queryn B PM ...
SNROWS TYPE ...
COMPCOST ACCESS ...
DMROWS RDSROW SNROWS COMPCOST OPENCO Queryn B PM TYPE ACCESS INDEX ...
6.00e1 6.00e1 0.0e0 1.85e-1 0.0e0 11 1 10 SELECT ixScan IQZ91PA2DIPA...
2.36e0 2.36e0 0.0e0 2.50e00 0.0e0 11 1 20 SELECT ixScan IQZ91PA2DIDA...
6.00e1 6.00e1 0.0e0 1.85e-1 0.0e0 12 1 10 SELECT ixScan IQZ91PA2DIPA...
1.00e0 1.00e0 0.0e0 2.28e00 0.0e0 12 1 20 SELECT ixScan IQZ91PA2DIDA...
6.00e1 6.00e1 0.0e0 1.85e-1 0.0e0 22 1 10 SELECT ixScan IQZ91PA2DIPA...
1.00e0 1.00e0 0.0e0 1.75e00 0.0e0 22 1 20 SELECT ixScan IQZ91PA2DIDA...
6 rows fetched: select * from plan_view2det order by queryNo, qblockno, pl...
Queryn B PM TEXT ...
PREDIN ...
ORDERN ...
STAGE ...
FF ...
PRTY ...
BoN ...
Queryn B PM PR ORD STAGE FF PRTY BoN TEXT ...
11 1 1 --- --- 1.00e00 AND Y N (((((("D"."CIF"='C_PG' AND...
11 1 20 2 2 MATCHING 9.62e-3 EQUAL Y N "D"."CIF"='C_PG' ...
11 1 20 3 3 MATCHING 3.28e-2 EQUAL Y N "D"."ADT"='2016-04-25' ...
11 1 20 4 1 MATCHING 1.67e-2 EQUAL Y N "P"."P"="D"."P" ...
11 1 20 5 4 STAGE1 1.00e-1 RANGE Y N "D"."CIF">="P"."CIFBEG" ...
11 1 20 6 5 STAGE1 1.00e-1 RANGE Y N "D"."CIF"<"P"."CIFEND" ...
11 1 20 7 6 STAGE1 3.33e-1 RANGE Y N "D"."ADT">="P"."ADTBEG" ...
11 1 20 8 7 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<"P"."ADTEND" ...
11 1 9 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4,5,6,7,8 ...
11 1 10 --- --- 3.20e-4 COMPOUND Y N COMPOUND: 2,3 ...
11 1 11 --- --- 1.67e-2 COMPOUND Y N COMPOUND: 4,5,6,7,8 ...
11 1 12 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4 ...
12 1 1 --- --- 1.00e00 AND Y N ((((((("D"."CIF"='C_PG' AN...
12 1 20 2 2 MATCHING 9.62e-3 EQUAL Y N "D"."CIF"='C_PG' ...
12 1 20 3 3 MATCHING 3.33e-1 RANGE Y N "D"."ADT">='2016-04-25' ...
12 1 20 4 4 MATCHING 3.33e-1 RANGE Y N "D"."ADT"<'2016-05-04' ...
12 1 20 5 1 MATCHING 1.67e-2 EQUAL Y N "P"."P"="D"."P" ...
12 1 20 6 5 STAGE1 1.00e-1 RANGE Y N "D"."CIF">="P"."CIFBEG" ...
12 1 20 7 6 STAGE1 1.00e-1 RANGE Y N "D"."CIF"<"P"."CIFEND" ...
12 1 20 8 7 STAGE1 3.33e-1 RANGE Y N "D"."ADT">="P"."ADTBEG" ...
12 1 20 9 8 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<"P"."ADTEND" ...
12 1 10 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4,5 ...
12 1 11 --- --- 1.60e-4 COMPOUND Y N COMPOUND: 2,5 ...
12 1 12 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4,5,8,9 ...
12 1 13 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4 ...
12 1 14 --- --- 1.67e-2 COMPOUND Y N COMPOUND: 5,6,7,8,9 ...
12 1 15 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4,5,6,7,8,9 ...
22 1 1 --- --- 1.00e00 AND Y N (((((((("D"."CIF">='CS' AN...
22 1 20 2 2 MATCHING 1.00e-1 RANGE Y N "D"."CIF">='CS' ...
22 1 20 3 3 MATCHING 1.00e-1 RANGE Y N "D"."CIF"<'DB' ...
22 1 20 4 4 SCREENING 3.33e-1 RANGE Y N "D"."ADT">='2016-04-25' ...
22 1 20 5 5 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<'2016-05-04' ...
22 1 20 6 1 MATCHING 1.67e-2 EQUAL Y N "P"."P"="D"."P" ...
22 1 20 7 6 STAGE1 1.00e-1 RANGE Y N "D"."CIF">="P"."CIFBEG" ...
22 1 20 8 7 STAGE1 1.00e-1 RANGE Y N "D"."CIF"<"P"."CIFEND" ...
22 1 20 9 8 STAGE1 3.33e-1 RANGE Y N "D"."ADT">="P"."ADTBEG" ...
22 1 20 10 9 STAGE1 3.33e-1 RANGE Y N "D"."ADT"<"P"."ADTEND" ...
22 1 11 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4,5 ...
22 1 12 --- --- 1.00e-2 COMPOUND Y N COMPOUND: 2,3 ...
22 1 13 --- --- 2.23e-6 COMPOUND Y N COMPOUND: 2,3,4,5,6,7,8,9,...
22 1 14 --- --- 1.67e-2 COMPOUND Y N COMPOUND: 6,7,8,9,10 ...
22 1 15 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,6 ...
22 1 16 --- --- 5.25e-6 COMPOUND Y N COMPOUND: 2,3,4,5,6 ...
43 rows fetched: select * from plan_viewPred order by collid, progName, ex...
sqlCode 0: rollback
$#out
}¢--- DSN.TX.CASE(PA2DIINS) cre=2016-06-10 mod=2016-06-12-13.26.09 A540769 -----
delete from qz92crT.tqz91pa2diPart;
delete from qz92crT.tqz91pa2diData;
insert into qz92crT.tqz91pa2diPart
with c (c, b, i) as
( select 'A', 'B', 1 from sysibm.sysDummy1
union all select 'B', 'C', 2 from sysibm.sysDummy1
union all select 'C', 'D', 3 from sysibm.sysDummy1
union all select 'D', 'E', 4 from sysibm.sysDummy1
union all select 'E', 'F', 5 from sysibm.sysDummy1
)
, d (d, j) as
( select date('01.01.2016'), 0 from sysibm.sysDummy1
union all select d + 1 month, j+1
from d where j < 11
)
select i + 5 * j, c, b, d, d + 1 month from c, d
;
insert into qz92crT.tqz91pa2diData
with c (c, i) as
( select 'A', 1 from sysibm.sysDummy1
union all select 'B', 2 from sysibm.sysDummy1
union all select 'C', 3 from sysibm.sysDummy1
union all select 'D', 4 from sysibm.sysDummy1
union all select 'E', 5 from sysibm.sysDummy1
)
, d (d, j) as
( select date('01.01.2016'), 0 from sysibm.sysDummy1
union all select d + 1 day, j+1
from d where j < 365
)
, e (c ,e) as
(
select '', 'empty key append' from sysibm.sysDummy1
union all select substr(name, 4, 3)
, strip( left(strip(creator) || '.' || strip(name)
|| ' in ' || strip(dbName) || '.' || strip(tsname)
, 100))
from sysibm.sysTables
where creator = 'SYSIBM'
)
, j as
(
select c.c || e.c c, d.d, e.e e
from c, d, e
)
, p as
(
select
( select p from qz92crT.tqz91pa2diPart
where c >= cifBeg and c < cifEnd
and d >= aDtBeg and d < aDtEnd
) p
, c, d, e
from j
)
select * from p
;
}¢--- DSN.TX.CASE(PA2DISEL) cre=2016-06-10 mod=2016-06-12-15.13.11 A540769 -----
select d.* from
qz92crT.tqz91pa2diPart p join qz92crT.tqz91pa2diData d
on p.p = d.p and d.cif >= p.cifBeg and d.cif < p.cifEnd
and d.aDt >= p.aDtBeg and d.aDt < p.aDtEnd
where d.cif = 'C_PG'
and d.aDt = '25.04.2016'
;
select d.* from
qz92crT.tqz91pa2diPart p join qz92crT.tqz91pa2diData d
on p.p = d.p and d.cif >= p.cifBeg and d.cif < p.cifEnd
and d.aDt >= p.aDtBeg and d.aDt < p.aDtEnd
where d.cif = 'C_PG'
and d.aDt >= '25.04.2016' and d.aDt < '04.05.2016'
;
select count(*)
from qz92crT.tqz91pa2diPart p join qz92crT.tqz91pa2diData d
on p.p = d.p and d.cif >= p.cifBeg and d.cif < p.cifEnd
and d.aDt >= p.aDtBeg and d.aDt < p.aDtEnd
where d.cif >= 'CS' and d.cif < 'DB'
and d.aDt >= '25.04.2016' and d.aDt < '04.05.2016'
;
select count(*)
from qz92crT.tqz91pa2diPart p join qz92crT.tqz91pa2diData d
on p.p = d.p and d.cif >= p.cifBeg and d.cif < p.cifEnd
and d.aDt >= p.aDtBeg and d.aDt < p.aDtEnd
where d.cif >= 'CS' and d.cif < 'DB'
and d.aDt >= '25.04.2016' and d.aDt < '04.05.2016'
and p.cifEnd > 'CS' and p.cifBeg < 'DB'
and p.aDtEnd > '25.04.2016' and p.aDtBeg < '04.05.2016'
;x;
select p, count(*)
from qz92crT.tqz91pa2diPart p
where p.cifEnd > 'BB' and p.cifBeg < 'DD'
and p.aDtEnd > '05.02.2016' and p.aDtBeg < '05.04.2016'
group by p
order by p
;
select p, count(*)
from qz92crT.tqz91pa2diData d
where d.cif >= 'BB' and d.cif < 'DD'
and d.aDt >= '05.02.2016' and d.aDt < '05.04.2016'
group by p
order by p
;
select d.p, count(*)
from qz92crT.tqz91pa2diPart p join qz92crT.tqz91pa2diData d
on p.p = d.p
where p.cifEnd > 'BB' and p.cifBeg < 'DD'
and p.aDtEnd > '05.02.2016' and p.aDtBeg < '05.04.2016'
and d.cif >= 'BB' and d.cif < 'DD'
and d.aDt >= '05.02.2016' and d.aDt < '05.04.2016'
group by d.p
order by d.p
; x;x;
}¢--- DSN.TX.CASE(PBGUT) cre= mod= ---------------------------------------------
creDb trg 1
+ ok creDb DSN.TX.GENF(PBGUTt1) ::f
}¢--- DSN.TX.CASE(PBGUTDDL) cre=2016-04-14 mod=2016-04-14-13.05.33 A540769 -----
set current sqlid = 'S100447';
DROP TABLESPACE $db.apbguta ;
COMMIT ;
CREATE TABLESPACE apbguta
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
GBPCACHE CHANGED
TRACKMOD NO
LOGGED
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID ebcdic
DEFINE YES
SEGSIZE 64
maxpartitions 100 -- uts PBG partitioned by growth
dssize 1 G
MAXROWS 255
FREEPAGE 0
;
CREATE TABLE $creator.tqz91pbgUtA
( i1 integer not null generated always as identity
, c2 varchar(4000) not null with default
)
in $db.apbguta;
CREATE INDEX $creator.IpbgUtA1
ON $creator.tqz91pbgUtA
(i1 asc
)
CLUSTER
DEFINE YES
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
DEFER NO
COPY NO
USING STOGROUP "GSMS "
PRIQTY -1
SECQTY -1
ERASE NO
PIECESIZE 8M
FREEPAGE 0
PCTFREE 0
GBPCACHE CHANGED
;
insert into $creator.tqz91pbgUtA (c2)
select char(current timestamp)
|| repeat(left(' ' || strip(creator) || '.' || strip(name)
|| ' in ' || strip(dbName) || '.' || tsname
, 50), 70)
from sysibm.sysTables
;
commit
;
}¢--- DSN.TX.CASE(PBGUTINS) cre=2016-04-14 mod=2016-04-14-14.29.50 A540769 -----
insert into qz92crt.tqz91pbgUtA (c2) select c2 from qz92crt.tqz91pbgUtA
fetch first 20000 rows only;
commit;
insert into qz92crt.tqz91pbgUtA (c2) select c2 from qz92crt.tqz91pbgUtA;
commit;
insert into qz92crt.tqz91pbgUtA (c2) select c2 from qz92crt.tqz91pbgUtA;
commit;
insert into qz92crt.tqz91pbgUtA (c2) select c2 from qz92crt.tqz91pbgUtA;
commit;
}¢--- DSN.TX.CASE(PER01) cre=2010-07-20 mod=2010-07-20-18.34.38 A540769 --------
* partition and table pruning testen
*
credb src 1
+ ok creDb A540769.TX.GENF(PER01s1) ::f
manual sub PER01RUN runstats laufen lassen (damit index genommen wird)
+ wait runstats laufen lassen (damit überhaupt index genommen wird)
* aus probieren welche indexe/indexPart und TS, TSParts
* gestoppt werden können, so dass die SQL's noch gehen:
* alle selektieren nur per01x1:part 5+6 (Mai/Juni)
* PER01SPP select auf Table
* PER01SPV select auf Union All
* PER01SPW select auf Union All mit where
*
* Versuch: hilft Constraint
* dass die where Bedingung in Union überflüssig wird?
* (am 20.7.2010 NEIN|)
credb src 2
manual sub PER01CHE check
* aus probieren wie oben
}¢--- DSN.TX.CASE(PER01CHE) cre=2010-07-20 mod=2010-07-20-18.23.28 A540769 -----
//A540769C JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//***************************************************
//* CREATED BY : A540769
//* TIMESTAMP : 06/20/2006.09.40.21
//* ENVIRONMENT: ISPF 5.7MVS TSO
//* RELEASE : V7.4.02 08/31/2004
//* DB2 VERSION: 810
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,
// PARM=(DBAF,'A540769C.CHECK'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DBAF.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
CHECK DATA TABLESPACE DGDB9998.APER01X0
TABLESPACE DGDB9998.APER01X1
TABLESPACE DGDB9998.APER01X2
SHRLEVEL CHANGE
SCOPE ALL
WORKDDN(TSYUTD, TSOUTD) ERRDDN TERRD
SORTDEVT DISK SORTNUM 32
}¢--- DSN.TX.CASE(PER01DDL) cre=2010-07-20 mod=2010-07-20-18.13.08 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
$=tb=TWK934A1
SET CURRENT SQLID='S100447';
$@¢
if $phase <= 1 then $@=¢
drop tablespace $db.aPer01x1;
drop tablespace $db.aPer01x2;
drop tablespace $db.aPer01x3;
commit;
$!
if $phase = 1 then
$@do ix=0 to 2 $@=¢
------------------------------------------------------------------------
CREATE TABLESPACE aPer01x$ix
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
numParts 12
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255
; ---------------------------------------------------------------------
CREATE TABLE $creator.tPer01x$ix
( da date not null,
ix integer not null,
ch char(10)
)
partition by (da)
(part 1 values ('31.01.201$ix'),
part 2 values ('28.02.201$ix'),
part 3 values ('31.03.201$ix'),
part 4 values ('30.04.201$ix'),
part 5 values ('31.05.201$ix'),
part 6 values ('30.06.201$ix'),
part 7 values ('31.07.201$ix'),
part 8 values ('31.08.201$ix'),
part 9 values ('30.09.201$ix'),
part 10 values ('31.10.201$ix'),
part 11 values ('30.11.201$ix'),
part 12 values ('31.12.201$ix')
)
IN $db.aPer01x$ix
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE ;
CREATE INDEX $creator.IPer01x$ix
ON $creator.tPer01x$ix
(ix ASC)
partitioned
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES ;
commit;
------------------------------------------------------------------------
delete from $creator.tPer01x$ix;
insert into $creator.tPer01x$ix
select date('01.01.201$ix') + (r - 1) days, 0, 'i$ix' from
(select row_number () over() r from sysibm.sysColumns
fetch first 365 rows only) r
;
update $creator.tPer01x$ix set ix = (month(da)*100+day(da))*1000000;
insert into $creator.tPer01x$ix
select da, ix + r, 'j$ix' from $creator.tPer01x$ix,
(select row_number () over() r from sysibm.sysColumns
fetch first 1999 rows only) r
;
commit;
$! else
if $phase = 2 then
$@do ix=0 to 2 $@=¢
alter table $creator.tPer01x$ix
add constraint date check(da >= '01.01.201$ix');
$!
$!
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(PER01RUN) cre=2010-07-20 mod=2010-07-20-18.06.49 A540769 -----
//A540769S JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//***************************************************
//* CREATED BY : A540769
//* TIMESTAMP : 06/21/2006.10.10.05
//* ENVIRONMENT: ISPF 5.7MVS TSO
//* RELEASE : V7.4.02 08/31/2004
//* DB2 VERSION: 810
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBAF,'A540769S.RUNSTA'),
// REGION=0M
//*DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//RNPRIN01 DD SYSOUT=*
//SYSIN DD *
LISTDEF LST#STA INCLUDE TABLESPACE DGDB9998.APER01X*
OPTIONS EVENT (ITEMERROR, SKIP)
RUNSTATS TABLESPACE LIST LST#STA
SHRLEVEL CHANGE
INDEX ALL
KEYCARD
UPDATE ALL
}¢--- DSN.TX.CASE(PER01SEL) cre=2010-07-20 mod=2010-07-20-14.28.34 A540769 -----
select *
from gdb9998.tPer01
order by da, ix
}¢--- DSN.TX.CASE(PER01SPP) cre=2010-07-20 mod=2010-07-20-17.37.21 A540769 -----
select count(*), min(ix), max(ix)
from gdb9998.tPer01x1
where da between '30.05.2011' and '02.06.2011'
and ix between 0530000000 and 0602999999
;
}¢--- DSN.TX.CASE(PER01SPU) cre=2010-07-20 mod=2010-07-20-18.03.55 A540769 -----
with u as
( select * from gdb9998.tPer01x0
union all select * from gdb9998.tPer01x1
union all select * from gdb9998.tPer01x2
)
select count(*), min(ix), max(ix)
from u
where da = '30.05.2011' --d '02.06.2011'
and ix between 0530000000 and 0602999999
;
}¢--- DSN.TX.CASE(PER01SPW) cre=2010-07-20 mod=2010-08-03-13.48.15 A540769 -----
with u as
( select * from gdb9998.tPer01x0
where da between '01.01.2010' and '31.12.2010'
union all select * from gdb9998.tPer01x1
where da between '01.01.2011' and '31.12.2011'
union all select * from gdb9998.tPer01x2
where da between '01.01.2012' and '31.12.2012'
)
select count(*), min(ix), max(ix)
from u
-- where da between '30.05.2011' and '02.06.2011'
where da = '30.05.2011'
and ix between 0530000000 and 0602999999
;
}¢--- DSN.TX.CASE(PER01SWW) cre=2010-08-02 mod=2010-08-02-17.09.04 A540769 -----
call sqlConnect dbaf
dv = '30.05.2011'
dt = '02.06.2011'
s ="with u as" ,
"( select * from gdb9998.tPer01x0",
"where da between '01.01.2010' and '31.12.2010'",
"union all select * from gdb9998.tPer01x1",
"where da between '01.01.2011' and '31.12.2011'",
"union all select * from gdb9998.tPer01x2",
"where da between '01.01.2012' and '31.12.2012'",
")",
"select count(*), min(ix), max(ix)",
"from u",
/* "where da >= ? and da <= ? ", */,
"where da between ? and ? ",
"and ix between 0530000000 and 0602999999"
p1 = pos('?', s)
p2 = pos('?', s, p1+1)
if 1 then do
call sqlPreAllCl 1, left(s,p1-1) "'"dv"'" substr(s, p1+1, p2-p1-1),
"'"dt"'" substr(s, p2+1),
, st, ':cnt,:min,:max'
end
else do
call sqlPrepare 1, s
call sqlOpAllCl 1, st, ':cnt,:min,:max', dv, dt
end
$$- m.st.0 'cnt' cnt':' min '-' max
call sqlDisconnect
$#out 20100802 17:08:27
1 cnt 8000: 530000000 - 602001999
$#out 20100802 17:07:21
$#out 20100802 17:07:59
1 cnt 8000: 530000000 - 602001999
$#out 20100802 17:06:34
$#out 20100802 17:07:06
$#out 20100802 17:06:48
1 cnt 8000: 530000000 - 602001999
$#out 20100802 17:06:18
1 cnt 8000: 530000000 - 602001999
$#out 20100802 17:05:57
1 cnt 8000: 530000000 - 602001999
$#out 20100802 17:03:54
1 cnt 8000: 530000000 - 602001999
$#out 20100802 16:39:07
$#out 20100802 17:03:10
$#out 20100802 17:02:22
$#out 20100802 16:59:51
$#out 20100802 16:58:48
$#out 20100802 16:57:08
$#out 20100802 16:56:27
$#out 20100802 16:54:47
$#out 20100802 16:54:26
$#out 20100802 16:54:05
$#out 20100802 16:51:27
$#out 20100802 16:39:48
$#out 20100802 16:39:19
1 cnt 8000: 530000000 - 602001999
$#out 20100802 16:37:23
$#out 20100802 16:38:39
1 cnt 8000: 530000000 - 602001999
$#out 20100802 16:30:50
$#out 20100802 16:36:20
$#out 20100802 16:35:21
$#out 20100802 16:33:53
$#out 20100802 16:33:23
$#out 20100802 16:31:08
1 cnt 8000: 530000000 - 602001999
$#out 20100802 16:26:57
1 cnt 8000: 530000000 - 602001999
$#out 20100802 16:13:27
1 cnt 8000: 530000000 - 602001999
$#out 20100802 16:13:14
$#out
}¢--- DSN.TX.CASE(PER01SWX) cre=2010-08-02 mod=2010-08-02-17.48.11 A540769 -----
call sqlConnect dbaf
dv = '30.05.2011'
dt = '02.06.2011'
s ="with x (v, b, t) as" ,
"( select date('01.01.2010'), date('31.12.2010'), 'x0'",
"from sysibm.sysDummy1" ,
"union all select date('01.01.2011'), date('31.12.2011'), 'x1'",
"from sysibm.sysDummy1" ,
"union all select date('01.01.2012'), date('31.12.2012'), 'x2'",
"from sysibm.sysDummy1" ,
") , u as" ,
"( select * from gdb9998.tPer01x0 , x",
"where t = 'x0' and da between v and b",
"union all select * from gdb9998.tPer01x1 , x",
"where t = 'x1' and da between v and b",
"union all select * from gdb9998.tPer01x2, x",
"where t = 'x2' and da between v and b" ,
")",
"select count(*), min(ix), max(ix)",
"from u",
/* "where da >= ? and da <= ? ", */,
"where da between ? and ? ",
"and ix between 0530000000 and 0602999999"
q ="with u as" ,
"( select * from gdb9998.tPer01x0",
"where da between '01.01.2010' and '31.12.2010'",
"union all select * from gdb9998.tPer01x1",
"where da between '01.01.2011' and '31.12.2011'",
"union all select * from gdb9998.tPer01x2",
"where da between '01.01.2012' and '31.12.2012'",
")",
"select count(*), min(ix), max(ix)",
"from u",
/* "where da >= ? and da <= ? ", */,
"where da between ? and ? ",
"and ix between 0530000000 and 0602999999"
p1 = pos('?', s)
p2 = pos('?', s, p1+1)
if 0 then do
call sqlPreAllCl 1, left(s,p1-1) "'"dv"'" substr(s, p1+1, p2-p1-1),
"'"dt"'" substr(s, p2+1),
, st, ':cnt,:min,:max'
end
else do
call sqlPrepare 1, s
call sqlOpAllCl 1, st, ':cnt,:min,:max', dv, dt
end
$$- m.st.0 'cnt' cnt':' min '-' max
call sqlDisconnect
$#out 20100802 17:29:05
1 cnt 8000: 530000000 - 602001999
$#out 20100802 17:28:40
1 cnt 8000: 530000000 - 602001999
$#out 20100802 17:26:20
$#out 20100802 17:28:11
$#out 20100802 17:27:26
1 cnt 8000: 530000000 - 602001999
$#out 20100802 17:25:24
1 cnt 8000: 530000000 - 602001999
$#out 20100802 17:16:15
$#out 20100802 17:24:10
$#out 20100802 17:23:56
1 cnt 01.01.2011: 31.12.2011 - x1
$#out 20100802 17:08:27
1 cnt 8000: 530000000 - 602001999
$#out 20100802 17:07:21
$#out 20100802 17:07:59
1 cnt 8000: 530000000 - 602001999
$#out 20100802 17:06:34
$#out 20100802 17:07:06
$#out 20100802 17:06:48
1 cnt 8000: 530000000 - 602001999
$#out 20100802 17:06:18
1 cnt 8000: 530000000 - 602001999
$#out 20100802 17:05:57
1 cnt 8000: 530000000 - 602001999
$#out 20100802 17:03:54
1 cnt 8000: 530000000 - 602001999
$#out 20100802 16:39:07
$#out 20100802 17:03:10
$#out 20100802 17:02:22
$#out 20100802 16:59:51
$#out 20100802 16:58:48
$#out 20100802 16:57:08
$#out 20100802 16:56:27
$#out 20100802 16:54:47
$#out 20100802 16:54:26
$#out 20100802 16:54:05
$#out 20100802 16:51:27
$#out 20100802 16:39:48
$#out 20100802 16:39:19
1 cnt 8000: 530000000 - 602001999
$#out 20100802 16:37:23
$#out 20100802 16:38:39
1 cnt 8000: 530000000 - 602001999
$#out 20100802 16:30:50
$#out 20100802 16:36:20
$#out 20100802 16:35:21
$#out 20100802 16:33:53
$#out 20100802 16:33:23
$#out 20100802 16:31:08
1 cnt 8000: 530000000 - 602001999
$#out 20100802 16:26:57
1 cnt 8000: 530000000 - 602001999
$#out 20100802 16:13:27
1 cnt 8000: 530000000 - 602001999
$#out 20100802 16:13:14
$#out
}¢--- DSN.TX.CASE(PER02) cre= mod= ---------------------------------------------
credb src 1
}¢--- DSN.TX.CASE(PER02DDL) cre=2010-07-27 mod=2010-07-27-14.21.32 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
$=tb=TWK934A1
SET CURRENT SQLID='S100447';
drop tablespace $db.aPer02;
commit;
------------------------------------------------------------------------
CREATE TABLESPACE aPer02
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
segsize 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID unicode
DEFINE YES
MAXROWS 255
; ---------------------------------------------------------------------
--- set current isolation level = 'UR';
CREATE TABLE $creator.tper02
( c) as
(select substr(strip(left(l.name, 10))
|| strip(left(r.name, 10)), 1, 20)
from sysibm.sysColumns l, sysibm.sysColumns r
) data initially deferred refresh deferred
maintained by user enable query optimization
IN $db.aPer02
AUDIT NONE
DATA CAPTURE NONE
CCSID unicode
NOT VOLATILE ;
CREATE INDEX $creator.IPer02
ON $creator.tper02
(c ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES ;
commit;
------------------------------------------------------------------------
refresh table $creator.tper02;
commit;
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(PER03) cre= mod= ---------------------------------------------
credb trg 1
+ ok creDb A540769.TX.GENF(PER03t1) ::f
}¢--- DSN.TX.CASE(PER03DDL) cre=2010-08-02 mod=2010-08-03-12.13.57 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
drop tablespace $db.aPer03;
commit;
------------------------------------------------------------------------
CREATE TABLESPACE aPer03
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
segsize 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255
; ---------------------------------------------------------------------
CREATE TABLE $creator.tPer03
( v decimal(13) not null,
b decimal(13) not null,
t char(1) not null
)
IN $db.aPer03
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE ;
CREATE unique INDEX $creator.IPer03x0
ON $creator.tPer03
(v asc, b asc, t asc)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES ;
$=i=insert into $creator.tper03 values
$i(-9999999999999, 1700000, 'a');
$i( 1700001, 3200000, 'b');
$i( 3200001, 4500000, 'c');
$i( 4500001, 5000000, 'd');
$i( 5000001, 6980000, 'e');
$i( 6980001, 9200000, 'f');
$i( 9200001, 10000000, 'g');
$i( 10000001, 10500000, 'h');
$i( 10500001, 11000000, 'i');
$i( 11000001, 9999999999999, 'j');
------------------------------------------------------------------------
CREATE VIEW $creator.vPer03V AS
SELECT v.* FROM GDB0351.TFI027A1 v, $creator.tPer03 t
WHERE t = 'a' and TKKEY between v and b
union all SELECT v.* FROM GDB0351.TFI027B1 v, $creator.tPer03 t
WHERE t = 'b' and TKKEY between v and b
union all SELECT v.* FROM GDB0351.TFI027C1 v, $creator.tPer03 t
WHERE t = 'c' and TKKEY between v and b
union all SELECT v.* FROM GDB0351.TFI027D1 v, $creator.tPer03 t
WHERE t = 'd' and TKKEY between v and b
union all SELECT v.* FROM GDB0351.TFI027E1 v, $creator.tPer03 t
WHERE t = 'e' and TKKEY between v and b
union all SELECT v.* FROM GDB0351.TFI027F1 v, $creator.tPer03 t
WHERE t = 'f' and TKKEY between v and b
union all SELECT v.* FROM GDB0351.TFI027G1 v, $creator.tPer03 t
WHERE t = 'g' and TKKEY between v and b
union all SELECT v.* FROM GDB0351.TFI027H1 v, $creator.tPer03 t
WHERE t = 'h' and TKKEY between v and b
union all SELECT v.* FROM GDB0351.TFI027I1 v, $creator.tPer03 t
WHERE t = 'i' and TKKEY between v and b
union all SELECT v.* FROM GDB0351.TFI027J1 v, $creator.tPer03 t
WHERE t = 'j' and TKKEY between v and b
;
commit;
}¢--- DSN.TX.CASE(PER03SWX) cre=2010-08-03 mod=2010-08-03-15.45.19 A540769 -----
call sqlConnect dbaf
tkkey = 5003240
tkBis = 5007840
s = "",
"from GDB0351.vFI027A1 where tkKey between ? and ?" ,
"and mut_timestamp = '2008-11-09-07.14.51.229389'" ,
""
s ="select count(*), min(kursDatum), max(KursDatum)" ,
"from GDB0351.vFI027A1 where tkKey = ?"
s ="select count(*), min(verfall), max(verfall)" ,
"from GDB0351.vFI027A1 where tkKey = ?"
p1 = pos('?', s)
p2 = pos('?', s, p1+1)
if 1 then do
call sqlPreAllCl 1, left(s,p1-1) tkKey substr(s, p1+1) ,
, st, ':cnt,:min,:max'
end
else if 1 then do
call sqlPrepare 1, s
call sqlOpAllCl 1, st, ':cnt,:min,:max', tkKey
end
else if 0 then do
call sqlPreAllCl 1, left(s,p1-1) tkkey substr(s, p1+1, p2-p1-1),
tkBis substr(s, p2+1),
, st, ':cnt,:min,:max'
end
else do
call sqlPrepare 1, s
call sqlOpAllCl 1, st, ':cnt,:min,:max', tkKey, tkBis
end
$$- m.st.0 'cnt' cnt':' min '-' max
call sqlDisconnect
$#out 20100803 14:34:48
$#out 20100803 14:35:44
$#out 20100803 14:35:15
1 cnt 166: 21.12.2009 - 26.04.2011
$#out 20100803 14:32:36
1 cnt 166: 21.12.2009 - 26.04.2011
$#out 20100803 14:30:23
1 cnt 1: 21.12.2009 - 21.12.2009
$#out 20100803 14:30:00
1 cnt 1: 30.03.2006 - 30.03.2006
$#out 20100803 13:58:51
1 cnt 1: 30.03.2006 - 30.03.2006
$#out 20100803 13:57:50
1 cnt 1: 30.03.2006 - 30.03.2006
$#out 20100803 13:56:14
1 cnt 5: 27.03.2006 - 31.03.2006
$#out 20100803 13:41:15
$#out 20100803 13:55:12
$#out 20100803 13:44:39
1 cnt 276396: 23.03.2006 - 24.05.2010
$#out 20100803 13:40:48
1 cnt 276396: 23.03.2006 - 24.05.2010
$#out 20100803 13:38:54
1 cnt 166: 27.03.2006 - 24.05.2010
$#out 20100803 13:37:43
1 cnt 166: 27.03.2006 - 24.05.2010
$#out 20100802 17:29:05
$#out 20100803 12:14:18
$#out 20100803 12:09:31
}¢--- DSN.TX.CASE(PER03VW) cre= mod= -------------------------------------------
SET CURRENT SQLID='GDB0351';
SET CURRENT SCHEMA='F383353';
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F383353" ;
CREATE VIEW GDB0351.VFI027A1 AS
SELECT *
FROM GDB0351.TFI027A1
WHERE TKKEY < 1700001
UNION ALL
SELECT *
FROM GDB0351.TFI027B1
WHERE TKKEY BETWEEN 1700001 AND 3200000
UNION ALL
SELECT *
FROM GDB0351.TFI027C1
WHERE TKKEY BETWEEN 3200001 AND 4500000
UNION ALL
SELECT *
FROM GDB0351.TFI027D1
WHERE TKKEY BETWEEN 4500001 AND 5000000
UNION ALL
SELECT *
FROM GDB0351.TFI027E1
WHERE TKKEY BETWEEN 5000001 AND 6980000
UNION ALL
SELECT *
FROM GDB0351.TFI027F1
WHERE TKKEY BETWEEN 6980001 AND 9200000
UNION ALL
SELECT *
FROM GDB0351.TFI027G1
WHERE TKKEY BETWEEN 9200001 AND 10000000
UNION ALL
SELECT *
FROM GDB0351.TFI027H1
WHERE TKKEY BETWEEN 10000001 AND 10500000
UNION ALL
SELECT *
FROM GDB0351.TFI027I1
WHERE TKKEY BETWEEN 10500001 AND 11000000
UNION ALL
SELECT *
FROM GDB0351.TFI027J1
WHERE TKKEY > 11000000 ;
COMMIT;
}¢--- DSN.TX.CASE(PER05) cre=2010-08-25 mod=2010-08-25-17.01.53 A540769 --------
* test table pruning for union all
* create tables, switchTable, fill them and generate view
creDb trg 1
+ ok creDb A540769.TX.GENF(PER05t1) ::f
* PER05RUN runstats, nicht nötig
* -sto ts, indexes for x0 and x2
* PER05SE1 select direkt auf tabelle
* vPer05UnionWhere (mit where in union all) works ok:
* PER05SEW konstanten in where
* PER05SMW parameter marker in where
* PER05RXX parameter marker REXX
* PER05WSH parameter marker wsh
* PER05SFW Funktioniert auch mit Funktionen und ops
* vPer05Union (ohne where in union all) accesses wrong tables
* PER05SEU -904
* vPer05UnionJoin (where mit join in union all) accesses wrong tables
* PER05SEJ -904
* vPer05UnionInt (where mit ix) works ok
* PER05SIW konstanten in where
* PER05RIX paramter marker rexx
* .... aber int Funktion accesses wrong tables
* PER05SJW -904
* PER05DDL
}¢--- DSN.TX.CASE(PER05DDL) cre=2010-08-25 mod=2010-08-25-16.20.15 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
$=tb=TWK934A1
SET CURRENT SQLID='S100447';
$@¢
if $phase <= 1 then $@=¢
drop tablespace $db.aper05x0;
drop tablespace $db.aper05x1;
drop tablespace $db.aper05x2;
drop tablespace $db.aper05SW;
commit;
$!
if $phase = 1 then
$@do ix=0 to 2 $@=¢
------------------------------------------------------------------------
CREATE TABLESPACE aper05x$ix
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
segsize 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255
; ---------------------------------------------------------------------
CREATE TABLE $creator.tper05x$ix
( da date not null,
ix integer not null,
ch char(10)
)
IN $db.aper05x$ix
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE
;
CREATE INDEX $creator.Iper05x$ix
ON $creator.tper05x$ix
(da ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
;
alter table $creator.tper05x$ix
add constraint date check(da between '01.01.201$ix'
and '31.12.201$ix')
;
delete from $creator.tper05x$ix;
insert into $creator.tper05x$ix
select date('01.01.201$ix') + (r - 1) days, 0, 'i$ix' from
(select row_number () over() r from sysibm.sysColumns
fetch first 365 rows only) r
;
update $creator.tper05x$ix set ix = (month(da)*100+day(da))*1000000
;
insert into $creator.tper05x$ix
select da, ix + r, 'j$ix' from $creator.tper05x$ix,
(select row_number () over() r from sysibm.sysColumns
fetch first 199 rows only) r
;
$!
$@=¢
CREATE TABLESPACE aper05SW
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
segsize 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255
; ---------------------------------------------------------------------
CREATE TABLE $creator.tper05SW
( fr date not null,
to date not null,
tb char(2) not null
)
IN $db.aper05SW
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE ;
insert into $creator.tper05SW
select min(da), max(da), 'x0' from $creator.tper05x0
union all select min(da), max(da), 'x1' from $creator.tper05x1
union all select min(da), max(da), 'x2' from $creator.tper05x2
;
create view $creator.vPer05Union as
select * from $creator.tPer05x0
union all select * from $creator.tPer05x1
union all select * from $creator.tPer05x2
;
create view $creator.vPer05UnionWhere as
select * from $creator.tPer05x0
where da between '01.01.2010' and '31.12.2010'
union all select * from $creator.tPer05x1
where da between '01.01.2011' and '31.12.2011'
union all select * from $creator.tPer05x2
where da between '01.01.2012' and '31.12.2012'
;
create view $creator.vPer05UnionJoin as
select x.* from $creator.tPer05x0 x, $creator.tPer05sw
where tb = 'x0' and da between fr and to
union all select x.* from $creator.tPer05x1 x, $creator.tPer05sw
where tb = 'x1' and da between fr and to
union all select x.* from $creator.tPer05x2 x, $creator.tPer05sw
where tb = 'x2' and da between fr and to
;
create view $creator.vPer05UnionInt as
select * from $creator.tPer05x0
where ix between 0 and 433000000
union all select * from $creator.tPer05x1
where ix between 500000000 and 833000000
union all select * from $creator.tPer05x2
where ix between 900000000 and 1300000000
;
commit;
$!
$!
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(PER05RIX) cre=2010-08-25 mod=2010-08-25-16.28.56 A540769 -----
/* rexx */
parse arg vw
if vw = '' then
vw = 'vPer05UnionInt'
call sqlConnect dbaf
dv = 0530000000
dt = 0602999999
say 'selecting' vw '.................'
src = 'select count(*), min(ix), max(ix)',
"from A540769."vw "where ix between ? and ?"
call sqlExec 'prepare s1 from :src'
call sqlExec 'describe input s1 into :M.SQL.1.I'
m.sql.1.I.1.sqlData = dv
m.sql.1.I.1.sqlInd = 0
m.sql.1.I.2.sqlData = dt
m.sql.1.I.2.sqlInd = 0
call sqlExec 'open c1 using descriptor :M.SQL.1.I'
call sqlExec 'fetch c1 into :cnt,:min :ii,:max :ia'
say 'fetched cnt' cnt':' min '-' max
call sqlExec 'close c1'
ggSqlStmt = 'disconnect'
address dsnRexx ggSqlStmt
exit
/*--- connect to the db2 subsystem ggSys -----------------------------*/
sqlConnect: procedure expose m.
parse arg ggSys
address tso "SUBCOM DSNREXX"
if rc <> 0 then do
sRc = RXSUBCOM('ADD','DSNREXX','DSNREXX') /* ADD HOST CMD ENV */
if sRc <> 0 then
call err 'rc' sRc 'from RXSUBCOM(ADD, DSNREXX, DSNREXX)'
end
ggSqlStmt = 'connect' ggSys
address dsnRexx ggSqlStmt
if rc <> 0 then
call err sqlMsg()
return
endProcedure sqlConnect
/*--- do an sqlExec, report a bad sqlCode with an error -------------*/
sqlExec: /* no procedure, to keep variables sql... */
parse arg ggSqlStmt, ggRet
address dsnRexx 'execSql' ggSqlStmt
if rc = 0 then
return 0
if pos('*', ggRet) < 0 | wordPos(sqlCode, ggRet) > 0 then
return sqlCode
else if sqlCode \= 0 then
call err sqlmsg()
say sqlmsg()
return 0
endSubroutine sqlExec
/*--- return an sql error message ------------------------------------*/
sqlMsg: /* no procedure, to keep variables sql... */
signal on syntax name sqlMsgOnSyntax
ggRes = 'sqlCode' sqlCodeT(sqlCode, sqlErrMc, sqlwarn.0':' ,
|| sqlwarn.1||sqlwarn.2||sqlwarn.3||sqlwarn.4||sqlwarn.5',',
|| sqlwarn.6||sqlwarn.7||sqlwarn.8||sqlwarn.9||sqlwarn.10)
if 0 then
sqlMsgOnSyntax: do
ggRes = 'sqlCode' sqlCode translate(sqlErrMc, ',', 'ff'x),
'<<rexx sqlCodeT not found or syntax>>\nwarnings'
do ggX=0 to 10
if sqlWarn.ggx <> '' then
ggRes = ggRes ggx'='sqlWarn.ggx
end
end
signal off syntax
ggRes = ggRes'\nstate' sqlState'\nstmt = ' ggSqlStmt
ggPref = '\nwith'
ggXX = pos(':', ggSqlStmt)+1
do 12 while ggXX > 1
ggYY = verify(ggSqlStmt, ' ,:+-*/&%?|()¢!', 'm', ggXX)
if ggYY < 1 then
ggYY = length(ggSqlStmt) + 1
ggVar = substr(ggSqlStmt, ggXX, ggYY - ggXX)
if ggVar <> '' then do
ggRes = ggRes || ggPref ggVar '=' value(ggVar)
ggPref = '\n '
end
ggXX = pos(':', ggSqlStmt, ggYY+1) + 1
end
return ggRes
endProcedure sqlMsg
/*--- issue an errorMessage and exit ---------------------------------*/
err:
parse arg ggTxt
ggTxt = 'error:' ggTxt
bx = 1
do while bx <= length(ggTxt)
ex = pos('\n', ggTxt, bx)
if ex < 1 then
ex = length(ggTxt)+1
say substr(ggTxt, bx, ex-bx)
bx = ex+2
end
say 'error exit 12'
exit 12
}¢--- DSN.TX.CASE(PER05RUN) cre=2010-08-25 mod=2010-08-25-11.14.38 A540769 -----
//A540769S JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//***************************************************
//* CREATED BY : A540769
//* TIMESTAMP : 06/21/2006.10.10.05
//* ENVIRONMENT: ISPF 5.7MVS TSO
//* RELEASE : V7.4.02 08/31/2004
//* DB2 VERSION: 810
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBAF,'A540769S.RUNSTA'),
// REGION=0M
//*DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//RNPRIN01 DD SYSOUT=*
//SYSIN DD *
LISTDEF LST#STA INCLUDE TABLESPACE DA540769.APER05X*
OPTIONS EVENT (ITEMERROR, SKIP)
RUNSTATS TABLESPACE LIST LST#STA
SHRLEVEL CHANGE
INDEX ALL
KEYCARD
UPDATE ALL
}¢--- DSN.TX.CASE(PER05RXX) cre=2010-08-25 mod=2010-08-25-14.33.13 A540769 -----
/* rexx */
parse arg vw
if vw = '' then
vw = 'vPer05UnionWhere'
call sqlConnect dbaf
dv = '30.05.2011'
dt = '02.06.2011'
say 'selecting' vw '.................'
src = 'select count(*), min(ix), max(ix)',
'from A540769.'vw 'where da between ? and ?'
call sqlExec 'prepare s1 from :src'
call sqlExec 'describe input s1 into :M.SQL.1.I'
m.sql.1.I.1.sqlData = dv
m.sql.1.I.1.sqlInd = 0
m.sql.1.I.2.sqlData = dt
m.sql.1.I.2.sqlInd = 0
call sqlExec 'open c1 using descriptor :M.SQL.1.I'
call sqlExec 'fetch c1 into :cnt,:min :ii,:max :ia'
say 'fetched cnt' cnt':' min '-' max
call sqlExec 'close c1'
ggSqlStmt = 'disconnect'
address dsnRexx ggSqlStmt
exit
/*--- connect to the db2 subsystem ggSys -----------------------------*/
sqlConnect: procedure expose m.
parse arg ggSys
address tso "SUBCOM DSNREXX"
if rc <> 0 then do
sRc = RXSUBCOM('ADD','DSNREXX','DSNREXX') /* ADD HOST CMD ENV */
if sRc <> 0 then
call err 'rc' sRc 'from RXSUBCOM(ADD, DSNREXX, DSNREXX)'
end
ggSqlStmt = 'connect' ggSys
address dsnRexx ggSqlStmt
if rc <> 0 then
call err sqlMsg()
return
endProcedure sqlConnect
/*--- do an sqlExec, report a bad sqlCode with an error -------------*/
sqlExec: /* no procedure, to keep variables sql... */
parse arg ggSqlStmt, ggRet
address dsnRexx 'execSql' ggSqlStmt
if rc = 0 then
return 0
if pos('*', ggRet) < 0 | wordPos(sqlCode, ggRet) > 0 then
return sqlCode
else if sqlCode \= 0 then
call err sqlmsg()
say sqlmsg()
return 0
endSubroutine sqlExec
/*--- return an sql error message ------------------------------------*/
sqlMsg: /* no procedure, to keep variables sql... */
signal on syntax name sqlMsgOnSyntax
ggRes = 'sqlCode' sqlCodeT(sqlCode, sqlErrMc, sqlwarn.0':' ,
|| sqlwarn.1||sqlwarn.2||sqlwarn.3||sqlwarn.4||sqlwarn.5',',
|| sqlwarn.6||sqlwarn.7||sqlwarn.8||sqlwarn.9||sqlwarn.10)
if 0 then
sqlMsgOnSyntax: do
ggRes = 'sqlCode' sqlCode translate(sqlErrMc, ',', 'ff'x),
'<<rexx sqlCodeT not found or syntax>>\nwarnings'
do ggX=0 to 10
if sqlWarn.ggx <> '' then
ggRes = ggRes ggx'='sqlWarn.ggx
end
end
signal off syntax
ggRes = ggRes'\nstate' sqlState'\nstmt = ' ggSqlStmt
ggPref = '\nwith'
ggXX = pos(':', ggSqlStmt)+1
do 12 while ggXX > 1
ggYY = verify(ggSqlStmt, ' ,:+-*/&%?|()¢!', 'm', ggXX)
if ggYY < 1 then
ggYY = length(ggSqlStmt) + 1
ggVar = substr(ggSqlStmt, ggXX, ggYY - ggXX)
if ggVar <> '' then do
ggRes = ggRes || ggPref ggVar '=' value(ggVar)
ggPref = '\n '
end
ggXX = pos(':', ggSqlStmt, ggYY+1) + 1
end
return ggRes
endProcedure sqlMsg
/*--- issue an errorMessage and exit ---------------------------------*/
err:
parse arg ggTxt
ggTxt = 'error:' ggTxt
bx = 1
do while bx <= length(ggTxt)
ex = pos('\n', ggTxt, bx)
if ex < 1 then
ex = length(ggTxt)+1
say substr(ggTxt, bx, ex-bx)
bx = ex+2
end
say 'error exit 12'
exit 12
}¢--- DSN.TX.CASE(PER05SEJ) cre=2010-08-25 mod=2010-08-25-12.10.16 A540769 -----
set current sqlid = 'A540769';
delete from plan_table;
explain plan set queryno = 4 for
select count(*), min(ix), max(ix)
from A540769.vPer05UnionJoin
where da between '30.05.2011' and '02.06.2011'
;
select * from plan_view2
order by applname, progname, queryNo, qblockno, planno
;
select count(*), min(ix), max(ix)
from A540769.vPer05UnionJoin
where da between '30.05.2011' and '02.06.2011'
-- and ix between 0530000000 and 0602999999
;
rollback;
}¢--- DSN.TX.CASE(PER05SEU) cre=2010-08-25 mod=2010-08-25-15.33.22 A540769 -----
set current sqlid = 'A540769';
delete from plan_table;
explain plan set queryno = 2 for
select count(*), min(ix), max(ix)
from A540769.vPer05Union
where da between '30.05.2011' and '02.06.2011'
;
select * from plan_view2
order by applname, progname, queryNo, qblockno, planno
;
select count(*), min(ix), max(ix)
from A540769.vPer05Union
where da between '30.05.2011' and '02.06.2011'
;
rollback;
}¢--- DSN.TX.CASE(PER05SEW) cre=2010-08-25 mod=2010-08-25-15.08.55 A540769 -----
set current sqlid = 'A540769';
delete from plan_table;
explain plan set queryno = 2 for
select count(*), min(ix), max(ix)
from A540769.vPer05UnionWhere
where da between '30.05.2011' and '02.06.2011'
;
select * from plan_table
order by applname, progname, queryNo, qblockno, planno
;
select count(*), min(ix), max(ix)
from A540769.vPer05UnionWhere
where da between '30.05.2011' and '02.06.2011'
;
rollback;
}¢--- DSN.TX.CASE(PER05SE1) cre=2010-08-25 mod=2010-08-25-16.48.33 A540769 -----
set current sqlid = 'A540769';
delete from plan_table;
explain plan set queryno = 1 for
select count(*), min(ix), max(ix)
from A540769.tPer05x1
where da between '30.05.2011' and '02.06.2011'
;
select * from plan_view2
order by applname, progname, queryNo, qblockno, planno
;
select count(*), min(ix), max(ix)
from A540769.tPer05x1
where da between '30.05.2011' and '02.06.2011'
;
rollback;
}¢--- DSN.TX.CASE(PER05SFW) cre=2010-08-25 mod=2010-08-25-17.01.05 A540769 -----
set current sqlid = 'A540769';
delete from plan_table;
explain plan set queryno = 2 for
select count(*), min(ix), max(ix)
from A540769.vPer05UnionWhere
where da between date(char(date('30.05.2011')))
and date('02.06' || '.2011')
;
select * from plan_table
order by applname, progname, queryNo, qblockno, planno
;
select count(*), min(ix), max(ix)
from A540769.vPer05UnionWhere
where da between '30.05.2011' and '02.06.2011'
;
rollback;
}¢--- DSN.TX.CASE(PER05SIW) cre=2010-08-25 mod=2010-08-25-16.39.56 A540769 -----
set current sqlid = 'A540769';
delete from plan_table;
explain plan set queryno = 7 for
select count(*), min(ix), max(ix)
from A540769.vPer05UnionInt
where ix between 530000000 and 602999999
;
select * from plan_table
order by applname, progname, queryNo, qblockno, planno
;
select count(*), min(ix), max(ix)
from A540769.vPer05UnionInt
where ix between 530000000 and 602999999
;
rollback;
}¢--- DSN.TX.CASE(PER05SJW) cre=2010-08-25 mod=2010-08-25-16.38.42 A540769 -----
set current sqlid = 'A540769';
delete from plan_table;
explain plan set queryno = 7 for
select count(*), min(ix), max(ix)
from A540769.vPer05UnionInt
where ix between int(530000000) and 602999999
;
select * from plan_table
order by applname, progname, queryNo, qblockno, planno
;
select count(*), min(ix), max(ix)
from A540769.vPer05UnionInt
where ix between int(530000000) and 602999999
;
rollback;
}¢--- DSN.TX.CASE(PER05SMW) cre=2010-08-25 mod=2010-08-25-15.22.32 A540769 -----
set current sqlid = 'A540769';
delete from plan_table;
explain plan set queryno = 3 for
select count(*), min(ix), max(ix)
from A540769.vPer05UnionWhere
where da between ? and ?
;
select * from plan_table
order by applname, progname, queryNo, qblockno, planno
;
rollback;
}¢--- DSN.TX.CASE(PER05WSH) cre=2010-08-25 mod=2010-08-25-13.44.50 A540769 -----
call sqlConnect dbaf
dv = '30.05.2011'
dt = '02.06.2011'
all = 'tPer05x0 tPer05x1 vPer05Union vPer05UnionWhere vPer05UnionJoin'
do vx=1 to words(all)
vw = word(all, vx)
$$- 'selecting' vw '.................'
s = 'select count(*), min(ix), max(ix)',
'from A540769.'vw 'where da between ? and ?'
call sqlPrepare 1, s
call sqlOpAllCl 1, st, ':cnt,:min :ii,:max :ia', dv, dt
$$- m.st.0 'cnt' cnt':' min '-' max
end
call sqlDisconnect
$#out 20100825 12:38:52
selecting tPer05x0 .................
1 cnt 0: 0 - 0
selecting tPer05x1 .................
1 cnt 800: 530000000 - 602000199
selecting vPer05Union .................
1 cnt 800: 530000000 - 602000199
selecting vPer05UnionWhere .................
1 cnt 800: 530000000 - 602000199
selecting vPer05UnionJoin .................
1 cnt 800: 530000000 - 602000199
$#out 20100825 12:35:47
}¢--- DSN.TX.CASE(PER06) cre=2010-09-09 mod=2010-10-08-14.57.27 A540769 --------
* TransaktionSequenzen auf mehreren Membern
* auf jedem Member y wird inserted in tPer06Xy
* mit den letzten Timestamps aus den anderen Tabellen
* hat immer löcher |
credb trg 1
+ ok creDb A540769.TX.GENF(PER06t1) ::f
manual per06ins parallele jobs starten und mit per06sel anschauen
+ wait per06ins parallele jobs starten und mit per06sel anschauen
}¢--- DSN.TX.CASE(PER06DDL) cre=2010-09-08 mod=2010-10-08-14.52.53 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
$=fx=5
$=tx=6
SET CURRENT SQLID='S100447';
$@¢
if $phase <= 1 then $@do ix=$fx to $tx $@=¢
drop tablespace $db.aper06x$ix;
commit;
$!
if $phase = 1 then
$@do ix=$fx to $tx $@=¢
------------------------------------------------------------------------
CREATE TABLESPACE aper06x$ix
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
segsize 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255
; ---------------------------------------------------------------------
CREATE TABLE $creator.tper06x$ix
( cur timestamp not null
$@do tx=$fx to $tx $@=¢
, tst$tx timestamp
$!
)
IN $db.aper06x$ix
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE
;
CREATE unique INDEX $creator.Iper06x$ix
ON $creator.tper06x$ix
(cur ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
;
insert into $creator.tPer06x$ix (cur) values(current timestamp);
commit;
$!
$!
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(PER06INS) cre=2010-09-08 mod=2010-10-08-15.07.30 A540769 -----
$>.jclSub()
$@do jx=5 to 6 $@=¢
//A540769$jx JOB (CP00,KE50),'DB2 REO',
// MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=S1$jx,SYSTEM=S1$jx
//S1 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99,
// PARM='%WSH'
//SYSPROC DD DSN=A540769.WK.REXX,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//OUT DD SYSOUT=*
//SYSTSIN DD DUMMY
//WSH DD * DISP=SHR,DSN=A540769.WK.REXX(RCG)
call sqlConnect dbaf
$'$=jx='$jx
$@#¢
$@do 10000 $@¢
call sqlExec "insert into A540769.tPer06X"$jx "(cur, tst5, tst6)" ,
"select current timestamp" ,
", (select max(cur) from A540769.tPer06X5)" ,
", (select max(cur) from A540769.tPer06X6)" ,
"from sysibm.sysDummy1 "
call sqlCommit
$!
call sqlDisconnect
$!
$!
$#out 20101008 14:57:35
$#out 20101008 14:55:36
3#out 20101008 14:54:12
$#out 20101008 14:53:15
$#out 20100908 17:14:43
$#out 20100908 17:09:47
$#out 20100908 17:03:59
$#out 20100908 17:03:04
$#out 20100908 15:36:28
$#out 20100908 15:34:23
$#out 20100908 15:33:19
$#out 20100908 15:33:09
$#out 20100908 15:29:30
$#out 20100908 15:22:54
$#out 20100908 15:12:12
$#out 20100908 15:10:25
$#out 20100908 15:09:52
$#out 20100908 15:03:52
$#out 20100908 15:03:06
$#out 20100908 15:02:21
$#out 20100908 14:59:07
}¢--- DSN.TX.CASE(PER06SEL) cre=2010-09-08 mod=2010-10-08-15.05.58 A540769 -----
select t, bet, substr(char(cur), 12) "cur" ,
substr(char(tst5), 12) "tst5" ,
substr(char(tst6), 12) "tst6"
from (
select 't5' t,
(select count(*) from A540769.tPer06x6 a6
where a6.cur < t5.cur and a6.cur > t5.tst6) bet,
t5.* from A540769.tPer06x5 t5
where cur <= (select max(cur) from A540769.tPer06x6 )
union all select 't6' t,
(select count(*) from A540769.tPer06x5 a5
where a5.cur < t6.cur and a5.cur > t6.tst5) bet,
t6.* from A540769.tPer06x6 t6
where cur <= (select max(cur) from A540769.tPer06x5 )
) x
order by 3 asc
fetch first 100 rows only
}¢--- DSN.TX.CASE(PER06STO) cre=2010-09-08 mod=2010-09-08-17.09.41 A540769 -----
//A540769S JOB (CP00,KE50),'DB2 REO', 00010000
// MSGCLASS=T,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M 00030000
//*MAIN CLASS=LOG 00040000
//P04 EXEC PGM=IKJEFT01
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTSIN DD *
DSN SYS(DBAF)
-STO DB(DA540769) SPACENAM(APER06X*)
-STA DB(DA540769) SPACENAM(APER06X*)
}¢--- DSN.TX.CASE(PER07) cre=2010-09-08 mod=2010-10-08-15.20.53 A540769 --------
* test transaction consistency between members
* on first member loop insert with same ix on tper07x4 and tPer07x5
* on second member read last ix in both table, look if equal
*
credb trg 1
+ ok creDb A540769.TX.GENF(PER07t1) ::f
manual per07ins und jobOutput anschauen
+ wait per07ins und jobOutput anschauen
}¢--- DSN.TX.CASE(PER07DDL) cre=2010-09-08 mod=2010-10-08-15.20.43 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
$=fx=5
$=tx=6
SET CURRENT SQLID='S100447';
$@¢
if $phase <= 1 then $@do ix=$fx to $tx $@=¢
drop tablespace $db.aper07x$ix;
commit;
$!
if $phase = 1 then
$@do ix=$fx to $tx $@=¢
------------------------------------------------------------------------
CREATE TABLESPACE aper07x$ix
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
segsize 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255
; ---------------------------------------------------------------------
CREATE TABLE $creator.tper07x$ix
( cur timestamp not null
, ix int not null
)
IN $db.aper07x$ix
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE
;
CREATE unique INDEX $creator.Iper07x$ix
ON $creator.tper07x$ix
(ix ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
;
insert into $creator.tPer07x$ix values(current timestamp, 0);
commit;
$!
$!
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(PER07III) cre=2010-09-09 mod=2010-09-09-08.58.36 A540769 -----
call sqlConnect dbaf
call sqlPreAllCl 1, 'select current packageset from sysibm.sysDummy1',
,q,':pkg'
say 'pkg' pkg
call sqlExec "set current packageSet = 'DSNREXXIW'"
call sqlPreAllCl 1, 'select current packageset from sysibm.sysDummy1',
,q,':pkg'
say 'pkg' pkg
$@do lx=1 to 0001 $@¢
call sqlPreAllCl 1, 'select current timestamp,',
'(select max(ix) from A540769.tPer07X4),',
'(select max(ix) from A540769.tPer07X5)',
'from sysibm.sysDummy1 with rr',
, st , ':qt, :q4, :q5'
if q4 > q5 then
say '<>' lx qt q4 '>' q5
if q4 < q5 then
say '<>' lx qt q4 '<' q5
else if lx // 1000 = 0 then
say ' ' lx qt q4 '=' q5
call sqlCommit
$!
call sqlDisconnect
$#out 20100908 17:55:09
$#out 20100909 08:34:55
$#out 20100909 08:34:24
$#out 20100909 08:33:12
$#out 20100909 08:32:54
}¢--- DSN.TX.CASE(PER07INS) cre=2010-09-09 mod=2010-10-12-11.03.23 A540769 -----
$>.jclSub()
$=fx=5
$=tx=6
$@do jx=$fx to $tx $@=¢
//A540769$jx JOB (CP00,KE50),'DB2 REO',
// MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=S1$jx,SYSTEM=S1$jx
//S1 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99,
// PARM='%WSH'
//SYSPROC DD DSN=A540769.WK.REXX,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//OUT DD SYSOUT=*
//SYSTSIN DD DUMMY
//WSH DD * DISP=SHR,DSN=A540769.WK.REXX(RCG)
call sqlConnect dbaf
$@/ww/
if $jx = $fx then $@=/w1/
call sqlPreAllCl 1, 'select current packageset from sysibm.sysDummy1',
,q,':pkg'
say 'pkg was:' pkg
call sqlExec "set current packageSet = 'DSNREXRR'"
call sqlPreAllCl 1, 'select current packageset from sysibm.sysDummy1',
,q,':pkg'
say 'pkg set to' pkg
$'$@do' lx=1 to 300 $'$@'¢
call sqlPreAllCl 1, 'select max(ix) from A540769.tPer07x$fx',
, st, ':mx'
if lx // 100 = 1 then
say lx 'max' mx
$'$@do' kx=$fx to $tx $'$@¢'
call sqlExec "insert into A540769.tPer07X"$'$kx' "(cur, ix)" ,
"values(current timestamp," (mx+1)")"
$'$!'
call sqlCommit
$'$!'
$/w1/ else $@=/w2/
$'$@do' lx=1 to 700 $'$@¢'
if 0 then
call sqlExec "insert into A540769.tPer06x$tx (cur)" ,
"values ( current timestamp )"
if 0 then do
qu = ''
call sqlPreAllCl 1, 'select current timestamp,',
'(select max(ix) from A540769.tPer07x$fx),',
'(select max(ix) from A540769.tPer07x$tx)',
'from sysibm.sysDummy1 with rr',
, st , ':qt, :q$fx, :q$tx'
end
else do
call sqlPreAllCl 1, 'select ix, current timestamp',
'from A540769.tPer07x$fx t$tx where ix =' ,
'(select max(ix) from A540769.tPer07x$fx)',
'with rr' ,
, st , ':q$fx, :qt'
call sqlPreAllCl 1, 'select ix, current timestamp',
'from A540769.tPer07x$tx t$tx where ix =' ,
'(select max(ix) from A540769.tPer07x$tx)',
'with rr' ,
, st , ':q$tx, :qu'
end
if q$fx > q$tx then
say '<>' lx qt q$fx '>' q$tx qu
if q$fx < q$tx then
say '<>' lx qt q$fx '<' q$tx qu
else if lx // 1000 = 0 then
say ' ' lx qt q$fx '=' q$tx qu
call sqlCommit
$'$!'
$/w2/
$/ww/
call sqlDisconnect
$!
$#out 20101012 10:56:20
$#out 20101012 10:42:38
$#out 20101008 15:45:13
$#out 20101008 15:42:52
$#out 20101008 15:40:43
}¢--- DSN.TX.CASE(PER07STO) cre=2010-09-09 mod=2010-09-09-09.16.49 A540769 -----
//A540769S JOB (CP00,KE50),'DB2 REO', 00010000
// MSGCLASS=T,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M 00030000
//*MAIN CLASS=LOG 00040000
//P04 EXEC PGM=IKJEFT01
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTSIN DD *
DSN SYS(DBAF)
-STO DB(DA540769) SPACENAM(APER07X*)
-STA DB(DA540769) SPACENAM(APER07X*)
}¢--- DSN.TX.CASE(PER08) cre=2015-02-27 mod=2015-02-27-12.49.54 A540769 --------
creDb trg 2
+ ok creDb DSN.TX.GENF(PER08t2) ::f
}¢--- DSN.TX.CASE(PER08DDL) cre=2011-01-24 mod=2015-02-27-16.39.08 A540769 -----
--------$-¢right(userid() sysvar(sysnode) date(s) time(), 60, '-')$!
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
------------------------------------------------------------------------
set current sqlid = 'S100447';
drop tablespace $db.aper08;
commit;
$@¢
if $phase >= 1 then $@=¢
CREATE TABLESPACE aper08
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
segsize 64
BUFFERPOOL BP32K
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID unicode
DEFINE YES
MAXROWS 255
; ---------------------------------------------------------------------
CREATE TABLE $creator.tper08
like sysibm.sysColumns
IN $db.aper08
;
$!
if $phase >= 2 then $@=¢
CREATE unique INDEX $creator.IPer08A0
ON $creator.TPer08
(tbCreator, tbName, name)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
GBPCACHE CHANGED
CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES;
CREATE INDEX $creator.IPer08A1
ON $creator.TPer08
(name)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
GBPCACHE CHANGED
not CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES;
$!
if $phase >= 1 then $@=¢
insert into $creator.tPer08
select * from sysibm.sysColumns
$@¢ if $phase >= 2 then $@=¢
where tbCreator = '$creator'
$! $!
;
commit;
$!
$!
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(PER08DGT) cre=2011-01-24 mod=2011-03-29-12.16.37 A540769 -----
$#@ 00010001
$>.fEdit() 00020004
$@do jx=0 to 50 $@=¢ 00030005
$=jx=- right($jx, 2, 0) 00040005
//A5407X$jx JOB (CP00,KE50),TIME=99 00050005
//*MAIN CLASS=DBAF ?YSTEM=S14 00060005
//* 00070001
//S1 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99, 00080001
// PARM='%WSH' 00090001
//SYSPROC DD DSN=A540769.WK.REXX,DISP=SHR 00100001
//SYSTSIN DD DUMMY 00110001
//SYSTSPRT DD SYSOUT=* 00120001
//WSH DD * 00130001
$@#¢ 00140001
call sqlConnect dbaf 00150001
call sqlExImm , 00160001
'declare global temporary table session.tDGT as', 00170001
'( select * from A540769.tPer08', 00180001
') with no data', 00190001
'on commit delete rows' 00200001
s1 = 'insert into session.tDGT', 00210001
'select * from A540769.tPer08 fetch first' 00220001
s2 = 'insert into session.tDGT', 00230002
'select * from A540769.tPer08' , 00240002
'order by colcardf, name, tbName, tbCreator', 00250005
'fetch first' 00260002
sE = 'rows only' 00270002
do t=1 00280001
call sqlExImm s1 1 sE 00290002
do i=2 to 3 00300002
c = left(100000000, i) 00310001
call sqlExImm s2 c sE 00320002
end 00330001
call sqlPreAllCl 1, 'select count(*) from session.tdgt', st, 00340001
,':cnt' 00350001
if t // 5 = 1 then 00360002
say right(t, 6) time() 'count' cnt 00370001
call sqlCommit 00380001
end 00390001
$! 00400001
$! 00410002
$#out 20110329 12:16:29 00420005
$#out 20110329 12:13:12 00430005
$#out 20110329 12:07:44 00440005
$#out 20110329 12:06:21 00450005
$#out 20110329 12:03:49 00460005
$#out 20110329 11:40:56 00470004
$#out 20110126 07:09:11 00480003
$#out 20110125 12:00:24 00490002
$#out 20110125 10:30:24 00500002
$#out 20110125 10:29:11 00510002
$#out 20110125 10:27:50 00520002
$#out 20110125 10:18:36 00530002
$#out 20110125 08:19:11 00540002
$#out 00550002
}¢--- DSN.TX.CASE(PER08EXP) cre=2015-02-27 mod=2015-02-27-16.41.31 A540769 -----
--- versionen, compiles und explains eines packages -------------------
select *
from cmnbatch.plan_view0
where collid = 'QZ'
and prog = 'QZPLB'
order by pcEx desc, explain_time desc
with ur
;
--- ausgewählte Explains analysieren
select *
from cmnbatch.plan_view1
-- from cmnbatch.plan_view2Det
where collid = 'QZ'
and progName = 'QZPLB'
and explain_time in ( '2015-02-27-13.02.50.480540'
, '2015-02-27-14.02.55.226372'
, '2015-02-27-16.40.41.008254'
, '2015-02-27-14.07.32.811472'
)
order by collid, progName
, queryno
, version
, explain_time
, qBlockNo, planno, mixopSeq
with ur
;
--- ausgewählte Explains analysieren
select *
from cmnbatch.plan_view2
-- from cmnbatch.plan_view2Det
where collid = 'QZ'
and progName = 'QZPLB'
and explain_time in ( '2015-02-27-13.02.50.480540'
, '2015-02-27-14.02.55.226372'
, '2015-02-27-16.40.41.008254'
, '2015-02-27-14.07.32.811472'
)
order by collid, progName
, queryno
, version
, explain_time
, qBlockNo, planno, mixopSeq
with ur
;
select *
from cmnbatch.plan_viewPred
where collid = 'QZ'
and progName = 'QZPLB'
and explain_time in ( '2015-02-27-13.02.50.480540'
, '2015-02-27-14.02.55.226372'
, '2015-02-27-14.07.32.811472'
, '2015-02-27-16.40.41.008254'
)
order by collid, progName
, queryNo
, explain_time
, qBlockNo, predNo, orderNo, mixOpSeqNo
with ur
;
select *
from cmnbatch.plan_table
-- from cmnbatch.plan_view2Det
where collid = 'QZ'
and progName = 'QZPLB'
and explain_time in ( '2015-02-27-13.02.50.480540'
, '2015-02-27-14.02.55.226372'
, '2015-02-27-14.07.32.811472'
, '2015-02-27-16.40.41.008254'
)
order by collid, progName
, queryno
, version
, explain_time
, qBlockNo, planno, mixopSeq
with ur
;
select * from cmnBAtch.DSN_DetCost_TABLE
where collid = 'QZ'
and progName = 'QZPLB'
and explain_time in ( '2015-02-27-13.02.50.480540'
, '2015-02-27-14.02.55.226372'
, '2015-02-27-14.07.32.811472'
)
order by collid, progName
, queryno
, version
, explain_time
, qBlockNo, planno
with ur
;
; x;
--- temporary explain --------------------------------------------------
set current sqlid = 'A540769';
delete from A540769.plan_table;
delete from A540769.DSN_STATEMNT_TABLE;
delete from A540769.DSN_DetCost_TABLE ;
delete from A540769.dsn_filter_Table ;
delete from A540769.dsn_predicat_table;
explain plan set queryno = 3 for
select count(*), sum(colCardF) cardF
from QTXCRY.tPer08
where tbCreator = 'QTXCRY'
and name = 'NAME'
;
select * from plan_view1
order by -- collid, progName, version, explain_time,
queryNo, qblockno, planno, mixOpSeq
;
select * from plan_view2
order by -- collid, progName, version, explain_time,
queryNo, qblockno, planno, mixOpSeq
;
select * from plan_view2det
order by -- collid, progName, version, explain_time,
queryNo, qblockno, planno, mixOpSeq
;
select *
from plan_viewPred
order by collid, progName, explain_time,
queryNo, qBlockNo, predNo, orderNo, mixOpSeqNo
with ur
;
rollback
;;;;
}¢--- DSN.TX.CASE(PER08REB) cre=2015-03-09 mod=2015-03-09-06.44.48 A540769 -----
//A540769W JOB (CP00,KE50),'DB2 REO', 00010000
// MSGCLASS=T,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2 00030000
//*MAIN CLASS=LOG 00040000
// SET PKG=CMN.DIV.P0.DB2J.#000237 00041000
//E01 EXEC PGM=IKJEFT01,DYNAMNBR=30 00042000
//SYSTSPRT DD SYSOUT=* 00043000
//DBRMLIB DD DISP=SHR,DSN=&PKG..DBR 00044000
//SYSTSIN DD * 00045000
DSN S(DP4G) 00046000
REBIND PACKAGE(QZ.QZPLB.(DB2J000237)) - 00047000
EXPLAIN(YES) - 00048000
APCOMPARE(ERROR) 00048100
// 00050000
APREUSE(ERROR) 00060000
}¢--- DSN.TX.CASE(PER08REO) cre=2015-02-27 mod=2015-02-27-12.46.33 A540769 -----
//A540769Q JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//***************************************************
//* CREATED BY : A540769
//* TIMESTAMP : 06/20/2006.09.40.21
//* ENVIRONMENT: ISPF 5.7MVS TSO
//* RELEASE : V7.4.02 08/31/2004
//* DB2 VERSION: 810
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBAF,'A540769T.REORG'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DBAF.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
LISTDEF LST#REO INCLUDE TABLESPACE DA540769.APER08
REORG TABLESPACE LIST LST#REO
LOG NO
SORTDATA
COPYDDN(TCOPYD)
SHRLEVEL CHANGE
MAPPINGTABLE S100447.MAPTAB07
MAXRO 300
DRAIN ALL
DELAY 1500
TIMEOUT TERM
UNLDDN TSRECD
UNLOAD CONTINUE
PUNCHDDN TPUNCH
DISCARDDN TDISC
SORTKEYS
SORTDEVT DISK
-- SORTNUM 155
STATISTICS
INDEX ALL KEYCARD
UPDATE ALL
}¢--- DSN.TX.CASE(PER08RUN) cre=2011-03-29 mod=2015-02-27-12.49.45 A540769 -----
//A540769Q JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//***************************************************
//* CREATED BY : A540769
//* TIMESTAMP : 06/20/2006.09.40.21
//* ENVIRONMENT: ISPF 5.7MVS TSO
//* RELEASE : V7.4.02 08/31/2004
//* DB2 VERSION: 810
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DP4G,'A540769T.REORG'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DP4G.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
RUNSTATS TABLESPACE QTXDBY.APER08
INDEX ALL KEYCARD
UPDATE ALL
SHRLEVEL CHANGE
}¢--- DSN.TX.CASE(PER08SEL) cre=2011-03-29 mod=2011-03-29-12.11.05 A540769 -----
select * from A540769.tPer08 00230000
order by colcardf, name, tbName, tbCreator 00240002
fetch first 10 rows only 00250002
}¢--- DSN.TX.CASE(PER09) cre=2011-01-26 mod=2015-11-05-09.17.47 A540769 --------
* test mit vielen Partitionen
=prts=3
* alter table qz92crT.tper09 add restrict on drop
creDb src 3
+ ok creDb DSN.TX.GENF(PER09s3) ::f
creDb trg 1
+ ok creDb DSN.TX.GENF(PER09t1) ::f
}¢--- DSN.TX.CASE(PER09A) cre=2011-03-02 mod=2011-03-02-06.39.14 A540769 -------
* ew22: reorg abends with too many locks
=prts=600
creDb trg 1
+ ok creDb A540769.TX.GENF(PER09t1) ::f
* sub PER09INS ==> alle Partitionen füllen
* sub PER09REO ==> mit oder ohne Partlevel? Im Moment läuft's durch|
}¢--- DSN.TX.CASE(PER09B) cre=2011-03-02 mod=2011-03-02-06.32.05 A540769 -------
* ew23: load abends with too many data set allocations
=prts=600
creDb trg 1
+ ok creDb A540769.TX.GENF(PER09t1) ::f
* sub PER09INS ==> alle Partitionen füllen
* sub PER09UNL ==> unload erstellen (oder alte restoren)
* sub PER09LOA ==> Abend be 420 sysRec
* sub PER09LO2 ==> Abend be 167 copy
}¢--- DSN.TX.CASE(PER09COP) cre=2011-01-26 mod=2011-03-04-10.25.53 A540769 -----
//A540769C JOB (CP00,KE50),'DB2 REO',
// MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//***************************************************
//* CREATED BY : A540769
//* TIMESTAMP : 06/20/2006.09.40.21
//* ENVIRONMENT: ISPF 5.7MVS TSO
//* RELEASE : V7.4.02 08/31/2004
//* DB2 VERSION: 810
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBAF,'A540769C.COPY'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DBAF.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
LISTDEF LST INCLUDE TABLESPACE DA540769.APER09 PARTLEVEL
COPY LIST LST COPYDDN(TCOPYD)
FULL YES PARALLEL
SHRLEVEL CHANGE
}¢--- DSN.TX.CASE(PER09DDL) cre=2011-01-26 mod=2015-11-05-08.01.06 A540769 -----
SET CURRENT SQLID='S100447';
drop tablespace $db.APER09;
commit;
$@¢
if $phase >= 1 then $@=¢
CREATE TABLESPACE APER09
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 10 PCTFREE $phase
GBPCACHE CHANGED
TRACKMOD YES
NUMPARTS $prts
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE NO
MAXROWS 255;
COMMIT;
CREATE TABLE $creator.TPer09
(part int NOT NULL,
tst timestamp not null with default,
text varChar(2000) not null with default
)
PARTITION BY (part)
(PART 1 VALUES(1)
$@do px=2 to $prts $@=¢
,PART $px VALUES($px)
$!
)
IN $db.APer09
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
COMMIT;
CREATE INDEX $creator.IPer09A0
ON $creator.TPer09
(tst ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
CLUSTER
Partitioned
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE NO ;
COMMIT;
$!
$!
}¢--- DSN.TX.CASE(PER09INS) cre=2011-01-26 mod=2011-01-26-16.41.21 A540769 -----
//A540769E JOB (CP00,KE50), 00010001
// MSGCLASS=T,TIME=1440,
// NOTIFY=A540769
//*MAIN CLASS=DBTF ,SYSTEM=S12
//S01 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99 00020001
//SYSTSIN DD *
DSN SYSTEM(DBAF)
RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2)
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSIN DD *
select current timestamp from sysibm.sysdummy1;
insert into A540769.tPer09
select 1+mod(row_number() over ()-1, 600), createdts,
strip(tbcreator) || '.' || strip(tbname)
|| ':' || strip(name) || ' type = ' || colType
from sysibm.syscolumns
where createdts > current timestamp - 10 years
fetch first 100000 rows only
;
select current timestamp from sysibm.sysdummy1;
commit;
select current timestamp from sysibm.sysdummy1;
}¢--- DSN.TX.CASE(PER09LOA) cre=2011-02-22 mod=2012-05-09-18.16.48 A540769 -----
//A540769U JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG0,SYSTEM=S13
//*
//***************************************************
//* UNLOAD COPY
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,DYNAMNBR=1600,
// PARM=(DAF0,'A540769U.UNLOAC'),
// REGION=0M
//*DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSTEMPL DD DSN=DBAF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE DDIN
DSN('DBAF.DA540769.APER09.P&PA..D120509.REC')
DISP(OLD,KEEP,KEEP)
DIAGNOSE TYPE(66)
LOAD DATA LOG NO RESUME NO REPLACE COPYDDN(TCOPYD)
STATISTICS INDEX(ALL) REPORT NO UPDATE ALL
EBCDIC CCSID(00500,00000,00000)
SORTKEYS
-- ENFORCE NO
SORTDEVT DISK
-- SORTNUM 160
WORKDDN(TSYUTD,TSOUTD)
INTO TABLE
"A540769".
"TPER09"
PART 00001 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00002 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00003 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00004 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00005 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00006 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00007 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00008 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00009 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00010 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00011 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00012 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00013 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00014 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00015 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00016 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00017 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00018 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00019 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00020 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00021 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00022 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00023 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00024 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00025 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00026 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00027 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00028 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00029 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00030 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00031 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00032 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00033 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00034 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00035 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00036 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00037 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00038 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00039 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00040 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00041 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00042 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00043 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00044 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00045 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00046 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00047 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00048 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00049 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00050 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00051 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00052 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00053 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00054 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00055 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00056 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00057 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00058 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00059 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00060 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00061 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00062 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00063 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00064 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00065 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00066 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00067 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00068 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00069 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00070 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00071 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00072 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00073 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00074 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00075 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00076 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00077 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00078 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00079 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00080 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00081 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00082 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00083 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00084 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00085 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00086 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00087 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00088 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00089 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00090 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00091 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00092 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00093 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00094 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00095 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00096 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00097 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00098 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00099 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00100 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00101 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00102 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00103 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00104 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00105 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00106 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00107 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00108 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00109 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00110 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00111 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00112 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00113 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00114 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00115 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00116 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00117 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00118 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00119 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00120 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00121 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00122 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00123 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00124 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00125 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00126 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00127 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00128 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00129 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00130 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00131 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00132 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00133 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00134 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00135 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00136 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00137 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00138 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00139 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00140 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00141 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00142 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00143 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00144 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00145 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00146 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00147 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00148 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00149 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00150 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00151 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00152 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00153 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00154 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00155 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00156 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00157 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00158 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00159 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00160 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00161 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00162 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00163 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00164 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00165 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00166 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00167 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00168 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00169 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00170 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00171 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00172 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00173 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00174 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00175 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00176 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00177 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00178 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00179 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00180 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00181 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00182 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00183 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00184 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00185 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00186 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00187 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00188 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00189 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00190 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00191 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00192 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00193 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00194 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00195 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00196 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00197 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00198 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00199 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00200 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00201 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00202 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00203 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00204 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00205 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00206 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00207 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00208 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00209 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00210 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00211 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00212 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00213 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00214 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00215 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00216 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00217 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00218 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00219 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00220 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00221 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00222 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00223 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00224 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00225 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00226 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00227 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00228 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00229 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00230 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00231 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00232 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00233 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00234 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00235 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00236 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00237 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00238 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00239 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00240 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00241 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00242 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00243 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00244 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00245 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00246 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00247 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00248 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00249 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00250 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00251 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00252 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00253 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00254 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00255 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00256 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00257 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00258 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00259 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00260 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00261 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00262 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00263 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00264 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00265 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00266 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00267 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00268 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00269 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00270 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00271 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00272 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00273 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00274 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00275 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00276 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00277 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00278 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00279 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00280 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00281 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00282 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00283 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00284 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00285 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00286 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00287 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00288 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00289 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00290 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00291 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00292 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00293 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00294 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00295 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00296 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00297 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00298 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00299 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00300 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00301 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00302 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00303 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00304 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00305 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00306 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00307 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00308 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00309 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00310 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00311 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00312 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00313 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00314 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00315 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00316 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00317 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00318 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00319 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00320 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00321 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00322 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00323 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00324 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00325 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00326 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00327 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00328 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00329 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00330 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00331 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00332 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00333 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00334 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00335 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00336 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00337 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00338 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00339 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00340 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00341 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00342 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00343 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00344 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00345 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00346 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00347 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00348 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00349 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00350 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00351 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00352 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00353 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00354 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00355 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00356 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00357 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00358 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00359 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00360 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00361 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00362 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00363 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00364 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00365 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00366 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00367 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00368 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00369 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00370 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00371 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00372 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00373 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00374 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00375 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00376 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00377 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00378 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00379 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00380 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00381 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00382 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00383 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00384 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00385 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00386 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00387 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00388 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00389 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00390 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00391 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00392 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00393 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00394 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00395 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00396 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00397 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00398 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00399 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00400 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00401 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00402 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00403 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00404 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00405 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00406 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00407 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00408 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00409 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00410 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00411 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00412 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00413 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00414 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00415 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00416 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00417 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00418 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00419 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00420 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00421 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00422 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00423 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00424 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00425 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00426 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00427 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00428 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00429 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00430 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00431 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00432 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00433 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00434 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00435 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00436 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00437 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00438 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00439 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00440 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00441 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00442 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00443 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00444 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00445 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00446 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00447 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00448 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00449 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00450 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00451 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00452 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00453 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00454 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00455 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00456 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00457 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00458 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00459 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00460 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00461 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00462 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00463 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00464 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00465 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00466 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00467 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00468 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00469 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00470 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00471 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00472 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00473 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00474 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00475 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00476 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00477 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00478 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00479 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00480 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00481 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00482 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00483 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00484 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00485 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00486 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00487 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00488 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00489 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00490 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00491 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00492 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00493 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00494 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00495 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00496 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00497 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00498 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00499 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00500 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00501 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00502 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00503 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00504 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00505 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00506 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00507 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00508 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00509 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00510 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00511 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00512 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00513 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00514 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00515 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00516 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00517 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00518 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00519 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00520 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00521 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00522 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00523 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00524 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00525 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00526 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00527 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00528 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00529 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00530 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00531 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00532 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00533 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00534 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00535 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00536 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00537 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00538 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00539 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00540 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00541 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00542 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00543 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00544 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00545 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00546 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00547 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00548 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00549 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00550 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00551 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00552 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00553 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00554 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00555 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00556 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00557 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00558 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00559 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00560 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00561 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00562 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00563 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00564 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00565 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00566 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00567 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00568 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00569 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00570 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00571 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00572 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00573 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00574 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00575 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00576 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00577 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00578 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00579 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00580 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00581 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00582 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00583 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00584 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00585 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00586 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00587 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00588 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00589 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00590 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00591 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00592 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00593 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00594 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00595 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00596 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00597 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00598 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00599 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00600 INDDN DDIN
WHEN(00001:00002) = X'0304'
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
}¢--- DSN.TX.CASE(PER09LO2) cre=2011-02-22 mod=2011-02-22-16.36.47 A540769 -----
//A540769U JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//***************************************************
//* UNLOAD COPY
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBAF,'A540769U.UNLOAC'),
// REGION=0M
//*DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSTEMPL DD DSN=DBAF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE DDIN
DSN('DBAF.DA540769.APER09.P&PA..D110222.REC')
DISP(OLD,KEEP,KEEP)
LOAD DATA LOG NO
STATISTICS INDEX(ALL) REPORT NO UPDATE ALL
EBCDIC CCSID(00500,00000,00000)
SORTKEYS
-- ENFORCE NO
SORTDEVT DISK
-- SORTNUM 160
WORKDDN(TSYUTD,TSOUTD)
INTO TABLE
"A540769".
"TPER09"
PART 00001 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00002 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00003 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00004 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00005 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00006 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00007 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00008 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00009 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00010 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00011 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00012 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00013 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00014 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00015 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00016 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00017 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00018 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00019 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00020 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00021 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00022 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00023 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00024 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00025 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00026 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00027 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00028 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00029 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00030 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00031 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00032 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00033 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00034 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00035 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00036 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00037 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00038 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00039 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00040 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00041 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00042 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00043 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00044 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00045 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00046 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00047 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00048 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00049 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00050 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00051 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00052 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00053 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00054 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00055 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00056 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00057 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00058 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00059 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00060 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00061 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00062 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00063 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00064 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00065 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00066 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00067 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00068 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00069 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00070 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00071 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00072 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00073 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00074 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00075 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00076 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00077 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00078 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00079 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00080 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00081 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00082 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00083 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00084 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00085 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00086 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00087 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00088 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00089 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00090 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00091 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00092 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00093 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00094 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00095 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00096 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00097 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00098 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00099 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00100 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00101 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00102 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00103 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00104 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00105 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00106 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00107 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00108 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00109 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00110 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00111 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00112 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00113 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00114 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00115 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00116 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00117 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00118 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00119 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00120 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00121 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00122 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00123 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00124 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00125 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00126 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00127 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00128 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00129 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00130 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00131 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00132 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00133 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00134 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00135 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00136 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00137 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00138 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00139 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00140 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00141 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00142 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00143 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00144 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00145 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00146 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00147 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00148 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00149 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00150 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00151 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00152 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00153 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00154 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00155 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00156 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00157 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00158 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00159 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00160 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00161 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00162 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00163 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00164 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00165 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00166 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00167 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00168 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00169 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00170 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00171 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00172 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00173 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00174 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00175 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00176 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00177 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00178 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00179 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00180 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00181 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00182 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00183 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00184 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00185 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00186 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00187 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00188 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00189 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00190 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00191 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00192 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00193 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00194 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00195 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00196 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00197 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00198 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00199 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00200 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00201 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00202 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00203 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00204 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00205 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00206 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00207 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00208 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00209 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00210 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00211 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00212 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00213 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00214 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00215 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00216 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00217 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00218 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00219 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00220 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00221 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00222 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00223 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00224 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00225 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00226 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00227 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00228 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00229 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00230 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00231 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00232 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00233 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00234 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00235 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00236 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00237 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00238 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00239 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00240 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00241 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00242 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00243 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00244 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00245 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00246 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00247 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00248 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00249 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00250 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
//
INTO TABLE
"A540769".
"TPER09"
PART 00251 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00252 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00253 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00254 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00255 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00256 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00257 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00258 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00259 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00260 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00261 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00262 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00263 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00264 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00265 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00266 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00267 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00268 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00269 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00270 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00271 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00272 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00273 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00274 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00275 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00276 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00277 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00278 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00279 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00280 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00281 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00282 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00283 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00284 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00285 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00286 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00287 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00288 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00289 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00290 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00291 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00292 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00293 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00294 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00295 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00296 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00297 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00298 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00299 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00300 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00301 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00302 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00303 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00304 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00305 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00306 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00307 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00308 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00309 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00310 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00311 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00312 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00313 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00314 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00315 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00316 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00317 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00318 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00319 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00320 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00321 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00322 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00323 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00324 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00325 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00326 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00327 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00328 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00329 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00330 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00331 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00332 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00333 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00334 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00335 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00336 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00337 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00338 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00339 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00340 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00341 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00342 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00343 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00344 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00345 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00346 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00347 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00348 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00349 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00350 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00351 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00352 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00353 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00354 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00355 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00356 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00357 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00358 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00359 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00360 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00361 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00362 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00363 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00364 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00365 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00366 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00367 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00368 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00369 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00370 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00371 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00372 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00373 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00374 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00375 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00376 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00377 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00378 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00379 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00380 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00381 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00382 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00383 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00384 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00385 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00386 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00387 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00388 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00389 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00390 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00391 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00392 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00393 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00394 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00395 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00396 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00397 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00398 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00399 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00400 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 351
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00401 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00402 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00403 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00404 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00405 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00406 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00407 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00408 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00409 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00410 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00411 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00412 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00413 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00414 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00415 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00416 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00417 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00418 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00419 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00420 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00421 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00422 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00423 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00424 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00425 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00426 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00427 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00428 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00429 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00430 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00431 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00432 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00433 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00434 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00435 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00436 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00437 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00438 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00439 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00440 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00441 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00442 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00443 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00444 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00445 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00446 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00447 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00448 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00449 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00450 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00451 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00452 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00453 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00454 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00455 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00456 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00457 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00458 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00459 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00460 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00461 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00462 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00463 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00464 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00465 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00466 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00467 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00468 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00469 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00470 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00471 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00472 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00473 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00474 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00475 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00476 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00477 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00478 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00479 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00480 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00481 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00482 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00483 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00484 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00485 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00486 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00487 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00488 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00489 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00490 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00491 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00492 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00493 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00494 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00495 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00496 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00497 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00498 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00499 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00500 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00501 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00502 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00503 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00504 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00505 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00506 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00507 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00508 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00509 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00510 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00511 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00512 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00513 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00514 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00515 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00516 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00517 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00518 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00519 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00520 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00521 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00522 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00523 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00524 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00525 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00526 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00527 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00528 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00529 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00530 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00531 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00532 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00533 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00534 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00535 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00536 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00537 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00538 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00539 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00540 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00541 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00542 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00543 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00544 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00545 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00546 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00547 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00548 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00549 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00550 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00551 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00552 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00553 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00554 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00555 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00556 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00557 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00558 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00559 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00560 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00561 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00562 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00563 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00564 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00565 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00566 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00567 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00568 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00569 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00570 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00571 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00572 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00573 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00574 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00575 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00576 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00577 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00578 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00579 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00580 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00581 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00582 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00583 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00584 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00585 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00586 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00587 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00588 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00589 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00590 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00591 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00592 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00593 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00594 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00595 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00596 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00597 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00598 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00599 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
INTO TABLE
"A540769".
"TPER09"
PART 00600 RESUME NO REPLACE COPYDDN(TCOPYD) INDDN DDIN
WHEN(00001:00002) = X'0304'
NUMRECS 348
( "PART"
POSITION( 00003:00006) INTEGER
, "TST"
POSITION( 00007:00032) TIMESTAMP EXTERNAL
, "TEXT"
POSITION( 00033:02034) VARCHAR
)
}¢--- DSN.TX.CASE(PER09REO) cre=2011-01-26 mod=2011-03-02-06.27.57 A540769 -----
//A540769W JOB (CP00,KE50),'DB2 REO',
// MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG,SYSTEM=S11
//*
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,REGION=0M,
// PARM=(DBAF,'A540769W.REORG')
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DBAF.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
LISTDEF LST#REO INCLUDE TABLESPACE DA540769.APER09 PARTLEVEL
REORG TABLESPACE LIST LST#REO
LOG NO
SORTDATA
COPYDDN(TCOPYD)
SHRLEVEL CHANGE
MAPPINGTABLE S100447.MAPTAB07
MAXRO 300
DRAIN ALL
DELAY 1500
TIMEOUT TERM
UNLDDN TSRECD
UNLOAD CONTINUE
PUNCHDDN TPUNCH
DISCARDDN TDISC
SORTKEYS
SORTDEVT DISK
SORTNUM 155
STATISTICS
INDEX ALL KEYCARD
UPDATE ALL
}¢--- DSN.TX.CASE(PER09UNL) cre=2011-02-22 mod=2012-05-09-13.24.30 A540769 -----
//A540769U JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG0
//*
//***************************************************
//* UNLOAD COPY
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBAF,'A540769U.UNLOAC'),
// REGION=0M
//*DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSTEMPL DD DSN=DBAF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
UNLOAD FROM TABLE A540769.TPER09
PUNCHDDN TPUNCH UNLDDN TSRECD
SHRLEVEL REFERENCE
}¢--- DSN.TX.CASE(PER10) cre=2016-11-18 mod=2016-11-21-09.54.52 A540769 --------
*
* segmented table für reorg drain retries
* per10Reo ==> reo mit retry parametern
* per10job ==> startet mehrere Jobs mit dem
* per10Ru script, jeder Job wird durch ein per10Ru? member
* per10Ru? member gesteuert
* per10RuC Select Insert Commit, sleep, loop
* per10RuD Insert Commit select, sleep, loop
* per10RuI Insert (ohne commit), sleep, loop
* per10RuJ Insert, Commit , sleep, loop
* per10RuM (Insert 500, Commit) * 200 , exit
* per10RuS Select (ohne Commit), sleep, loop
* per10RuT Select Commit, sleep, loop
=parts = -13 $** < = ==> pbg
creDb trg 1
+ ok creDb DSN.TX.GENF(PER10t1)
}¢--- DSN.TX.CASE(PER10DDL) cre=2011-02-08 mod=2016-04-06-09.59.27 A540769 -----
------------$-¢right(userid() sysvar(sysnode) date(s) time(), 60,'-')$!
-- testCase $dsn
-- env $env phase $phase
-- dbSys $dbSys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
$=cr2=$creator
SET CURRENT SQLID='S100447';
drop tablespace $db.aPer10;
-- drop table $creator.tPer10;
commit;
------------------------------------------------------------------------
CREATE TABLESPACE aPer10
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
$@ if $parts <= 0 then
SEGSIZE 64
$@ if $parts > 0 then
NUMPARTS $parts
$@ if $parts < 0 then
MAXPARTITIONS 20
BUFFERPOOL BP32K
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
locksize any
MAXROWS 255
;
commit;
CREATE TABLE $creator.tQz91Per10
(part int NOT NULL,
key int NOT NULL,
text CHAR(50) NOT NULL
) in $db.aPer10
$@¢
if $parts > 0 then $@¢
$@=¢
partition by (part)
$!
$=pr= (
$@do px=1 to $parts $@=¢
$-¢if($px=1,'(',',')$! partition $px ending at ( $*+
$-¢trunc(999*$px/$parts, 0)$! )
$!
$$- ' ) '
$!
$!
;
--------------------------------------------------------------
CREATE UNIQUE INDEX $creator.IQz91per10A
ON $creator.tQz91Per10
(key ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
commit;
insert into $creator.tQz91Per10 values
(1, 1, char(current timestamp) || ' initial eins');
insert into $creator.tQz91Per10 values
(2, 2, char(current timestamp) || ' initial zwei');
insert into $creator.tQz91Per10 values
(3, 3, char(current timestamp) || ' initial drei');
commit;
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(PER10JOB) cre=2011-02-08 mod=2016-04-07-08.34.49 A540769 -----
$>. fSub()
$=jobs=D $** CDIS $** CIJSTM
$@do cx=1 to length($jobs) $@=/job/
$=j=- substr($jobs, cx, 1)
//A540769$j JOB (CP00,KE50),'DB2 ADMIN', 00010002
// TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2ALL, 00020004
// MSGCLASS=T,NOTIFY=&SYSUID 00021002
//*
//S1 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99,
// PARM='%WSH'
//SYSPROC DD DSN=A540769.WK.REXX,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD DUMMY
//WSH DD *
$'$=j='$j
// DD DISP=SHR,DSN=DSN.TX.CASE(PER10RU)
$/job/
}¢--- DSN.TX.CASE(PER10JOC) cre=2012-06-15 mod=2012-06-15-17.54.55 A540769 -----
$>.fSub()
$=jobs=UVWXYZ
$@do cx=1 to length($jobs) $@=/job/
$=j=- substr($jobs, cx, 1)
//A540769$j JOB (CP00,KE50),TIME=99
//*MAIN CLASS=LOG
//*
//S1 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99,
// PARM='%WSH'
//SYSPROC DD DSN=A540769.WK.REXX,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD DUMMY
//WSH DD *
$'$=j='T
// DD DISP=SHR,DSN=DSN.TX.CASE(PER10RU)
$/job/
}¢--- DSN.TX.CASE(PER10REO) cre=2011-02-08 mod=2016-04-07-11.13.05 A540769 -----
//A540769R JOB (CP00,KE50),'DB2 ADMIN', 00010002
// TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2ALL, 00020004
// MSGCLASS=T,NOTIFY=&SYSUID 00021002
//*
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DP4G,'A540769R.REORG'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DP4G.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
LISTDEF LST
INCLUDE TABLESPACE QZ92A1T.APER10 PARTLEVEL
REORG TABLESPACE LIST LST
LOG NO
SORTDATA
COPYDDN(TCOPYD)
SHRLEVEL CHANGE
MAXRO 40
DRAIN_WAIT 40 RETRY 99 RETRY_DELAY 13 DRAIN WRITERS
LONGLOG CONTINUE DELAY 40
UNLDDN TSRECD
UNLOAD CONTINUE
PUNCHDDN TPUNCH
DISCARDDN TDISC
SORTKEYS
SORTDEVT DISK
STATISTICS
INDEX ALL KEYCARD
UPDATE ALL
}¢--- DSN.TX.CASE(PER10RU) cre=2011-02-08 mod=2016-04-07-08.32.27 A540769 ------
if \ ${?j} then
$=j=C
$=fa=1e6
$=ba=- c2d($j)*$fa
$=tb=QZ92CRT.tqz91Per10
call sqlConnect dp4g
m.sql_retOk = '*'
$@do ix=1 $@¢
$<dsn.tx.case(per10Ru$j)
$@for li $@¢
parse upper value $li with w1 w2 wR
stTi = time()
say stTi $ix w1 'begin e' time(e)
call time r
sc = 0
if w1 == exit then $@¢
exit
$! else if w1 = insert then $@¢
sc = sqlExec("insert into" $tb ,
"select mod(mod(max("$ba", max(key)), 1000)*199, 1000),",
"max("$ba", max(key))+1, '"time()"'" ,
"from" $tb "where key <" ($ba+$fa))
$! else if w1 = massInsert then $@¢
sc = sqlExec("insert into" $tb ,
"select mod(row_number () over(), 1000)," ,
"(row_number () over()) +" ,
"(select max(" (300*$fa)", max(key))+1 from" $tb")" ,
",strip(left(name, 40)) from sysibm.sysColumns",
"fetch first 1000 rows only")
$! else if w1 = select then $@¢
cnt = sql2One("with s as (select text t from" $tb ,
"where text < '9' fetch first 10 rows only)" ,
"select count(*) from s with cs",,,, '----')
say time() 'select text' cnt
if cnt < 0 then
sc = cnt
$! else if w1 = select then $@¢
cnt = sql2One('select count(*) from' $tb 'with rs')
say time() 'select count' cnt
$! else if w1 = commit then $@¢
sc = sqlCommit()
$! else if w1 = rollback then $@¢
sc = sqlExec('rollback')
$! else $@¢
say 'unknown' strip($li)
$!
if sc \== 0 & sc \== 1 then
say sqlMsg()
say left('#'$j, 4) stTi time() format(time(e), 4,4) ,
left('sqlCode='sc, 15) w1 $ix
$!
slSt = time()
call time r
call sleep 3
say left('#'$j, 4) stTi time() format(time(e), 4,4) ,
left('', 15) 'sleeping' $ix
$!
call sqlDisconnect
$#out 20110209 11:31:16
}¢--- DSN.TX.CASE(PER10RUC) cre=2016-04-06 mod=2016-04-06-10.31.01 A540769 -----
select
insert
commit
}¢--- DSN.TX.CASE(PER10RUD) cre=2011-02-08 mod=2016-04-06-10.29.41 A540769 -----
insert
commit
select
}¢--- DSN.TX.CASE(PER10RUE) cre=2016-04-06 mod=2016-04-06-11.59.36 A540769 -----
insert
commit
select
}¢--- DSN.TX.CASE(PER10RUF) cre=2016-04-06 mod=2016-04-06-12.08.54 A540769 -----
select
commit
insert
}¢--- DSN.TX.CASE(PER10RUI) cre=2011-02-08 mod=2011-02-09-13.42.29 A540769 -----
select
insert
}¢--- DSN.TX.CASE(PER10RUJ) cre=2011-02-08 mod=2011-02-09-13.23.39 A540769 -----
insert
commit
}¢--- DSN.TX.CASE(PER10RUM) cre=2011-02-09 mod=2011-02-09-11.53.20 A540769 -----
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
exit
}¢--- DSN.TX.CASE(PER10RUN) cre=2011-02-09 mod=2011-02-09-14.02.30 A540769 -----
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
massinsert
commit
}¢--- DSN.TX.CASE(PER10RUS) cre=2011-02-08 mod=2011-02-08-14.45.16 A540769 -----
select
}¢--- DSN.TX.CASE(PER10RUT) cre=2011-02-08 mod=2012-06-15-10.07.12 A540769 -----
commit
select
}¢--- DSN.TX.CASE(PER10SEL) cre=2012-06-15 mod=2012-06-15-15.28.32 A540769 -----
select part, count(*)
from A540769.tPer10
group by part
}¢--- DSN.TX.CASE(PER10SPU) cre=2016-04-08 mod=2016-04-08-13.17.45 A540769 -----
select current timestamp from sysibm.sysDummy1
;
insert into QZ92CRT.tqz91Per10
with r as
(select floor( rand() * 200) * 100000 r from sysibm.sysDummy1 )
select mod(r, 100000)
, value(r , ( select max(key)
from QZ92CRT.tqz91Per10
where key between r.r
and r.r + 90123
) + 1)
, char(current timestamp) || ' ' || r
from r
;
select current timestamp from sysibm.sysDummy1
;
commit
;
select current timestamp from sysibm.sysDummy1
;
with s as
(
select text t
from QZ92CRT.tqz91Per10
where text < '9'
fetch first 10 rows only
)
select count(*)
from s
with cs
;
select current timestamp from sysibm.sysDummy1
;
}¢--- DSN.TX.CASE(PER11) cre=2011-03-21 mod=2011-03-25-14.39.41 A540769 --------
* Statistiken für tBe010A1: wie teuer werden queries für Sammel1
* ohne VerdichtungsTabellen
* ==> Index Screening alles mit procBase,techBez,BuchDat
* ==> tb Acces zusätzlich valDat und verdTyp
* ==> Gruppierung noch x*log der Schlüsselgrössen
*
* 1. per11Unl: Dsntiaul unloads aus Produktion
* vorher Typ anpassen
* 2. analyseTabelle tPer11 mit tx erstellen
* 3. per11Ins: unloads insert
* 4. per11Con: geladene Daten Konsolidieren (group by)
* 5. per11Ins sql Auswertung
*
*
creDb trg 1
+ ok creDb A540769.TX.GENF(PER11t1) ::f
}¢--- DSN.TX.CASE(PER11CON) cre=2011-03-22 mod=2011-03-23-07.50.08 A540769 -----
delete from A540769.tPer11
where type like 'u0322=%'
;
insert into A540769.tPer11
select
sum(Cnt )
, sum(s1Rows )
, min(s1RowF )
, max(s1RowT )
, sum(vrRows )
, min(vrRowF )
, max(vrRowT )
, sum(buRows )
, min(buRowF )
, max(buRowT )
, 'u0322=d'
from A540769.tPer11
where type like 'u0322*%'
group by
floor(log(3*max(s1RowF , 0.1)))
, floor(log(3*max(vrRowF , 0.1)))
, floor(log(3*max(buRowF , 0.1)))
;
insert into A540769.tPer11
select
sum(Cnt )
, sum(s1Rows )
, min(s1RowF )
, max(s1RowT )
, sum(vrRows )
, min(vrRowF )
, max(vrRowT )
, sum(buRows )
, min(buRowF )
, max(buRowT )
, 'u0322=1'
from A540769.tPer11
where type like 'u0322*%'
;
select count(*), type
from A540769.tPer11
group by type
order by type;
select *
from A540769.tPer11
where type = 'u0322=1' ;
select
t.*
from A540769.tper11 t
where type = 'u0322=d'
order by 2 desc, 3 desc, 4 desc
}¢--- DSN.TX.CASE(PER11DDL) cre=2011-03-21 mod=2011-03-23-07.28.21 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
$=cr2=$creator
SET CURRENT SQLID='S100447';
drop tablespace $db.aPer11;
-- drop table $creator.tPer11;
commit;
------------------------------------------------------------------------
CREATE TABLESPACE aPer11
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
SEGSIZE 64
BUFFERPOOL BP32K
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
locksize row
MAXROWS 255
;
commit;
CREATE TABLE $creator.tPer11
( cnt int not null
, s1Rows int not null
, s1RowF int not null
, s1RowT int not null
, vrRows real not null
, vrRowF int not null
, vrRowT int not null
, buRows real not null
, buRowF int not null
, buRowT int not null
, type char(20) not null
) in $db.aPer11;
--------------------------------------------------------------
commit;
--insert into $creator.tPer11 values
-- (1, char(current timestamp) || ' initial eins');
commit;
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(PER11INS) cre=2011-03-21 mod=2011-03-21-11.25.07 A540769 -----
//A540769L JOB (CP00,KE50),'DB2 REO', 00010000
// MSGCLASS=T,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M 00030000
//*MAIN CLASS=LOG 00040000
//*
//S1 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99, 00020001
// PARM='WSH'
//SYSPROC DD DSN=A540769.WK.REXX,DISP=SHR
//ISPPLIB DD DSN=TSO.ISPF.ISPPLIB,DISP=SHR
//ISPMLIB DD DSN=TSO.ISPF.ISPMLIB,DISP=SHR
//* TSO.RZ1.P0.INST.MSGS
// DD DSN=ISP.SISPMENU,DISP=SHR
//* TSO.RZ1.P0.PROD.MSGS
//* ORG.RZ1.B0106.KPCO4.MSGS
//* TSO.RZ1.P0.USER.MSGS
//ISPSLIB DD DSN=TSO.ISPF.ISPSLIB,DISP=SHR
//ISPTLIB DD DSN=TSO.ISPF.ISPTLIB,DISP=SHR
//ISPPROF DD DISP=(,PASS),UNIT=VIO,
// SPACE=(CYL,(1,1,30)),RECFM=FB,LRECL=80
//*
//* DSORG=PO
//ISPLOG DD SYSOUT=*,RECFM=VA,LRECL=125
//ISPLIST DD SYSOUT=*,RECFM=FBA,LRECL=121
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//OUT DD SYSOUT=*
//SYSTSIN DD DUMMY
//WSH DD * DISP=SHR,DSN=A540769.TX.CASE(XC200DEL)
$#@
call sqlConnect dbaf
$=loTb=A540769.tper11
$=seTb=Oa1a01.VBE010A1
$=step= 4
$** call sqlStmt "delete from" $loTb "where verdTyp <> '?'"
$** call sqlCommit
$@do from=123 to 131 by $step $@¢
$=to=- $from + $step - 1
say 'inserting' $from '-' $to
$;
call sqlStmt $<=¢
insert into $loTb
with g as
(
select count(*) rows,
sum(case when sammel1 < '1900-01-01-00:00:00'
then 0 else 1 end) sam1,
sum(case when sammel2 < '1900-01-01-00:00:00'
then 0 else 1 end) sam2,
sum(case when sammel1 < '1900-01-01-00:00:00'
or sammel2 < '1900-01-01-00:00:00'
then 0 else 1 end) sam12,
PROCBASE, TECHBEZ, DAT_BUCH, DAT_VAL, verdTyp
, sammel1
from $seTb
where procBase between $from and $to
group by PROCBASE, TECHBEZ, DAT_BUCH, DAT_VAL, verdTyp
, sammel1
)
, k as
( select count(*) gCnt,
sum(rows) rows, min(rows) rowsMin, max(rows) rowsMax,
sum(sam1) sam1, min(sam1) sam1Min, max(sam1) sam1Max,
sum(sam2) sam2, min(sam2) sam2Min, max(sam2) sam2Max,
sum(sam12) sam12, min(sam12) sam12Min, max(sam12) sam12Max,
verdTyp
from g
group by PROCBASE, TECHBEZ, DAT_BUCH, DAT_VAL, verdTyp
)
, s as
( select count(*) kCnt,
sum(gCnt) gCnt, min(gCnt) gCntF, max(gCnt) gCntT,
sum(rows) rows, min(rows) rowsF, max(rows) rowsT,
sum(rowsMin) rowsMin, min(rowsMin) rowsMinF, max(rowsMin) rowsMinT,
sum(rowsMax) rowsMax, Max(rowsMax) rowsMaxF, max(rowsMax) rowsMaxT,
sum(sam1) sam1, min(sam1) sam1F, max(sam1) sam1T,
sum(sam1Min) sam1Min, min(sam1Min) sam1MinF, max(sam1Min) sam1MinT,
sum(sam1Max) sam1Max, Max(sam1Max) sam1MaxF, max(sam1Max) sam1MaxT,
sum(sam2) sam2, min(sam2Min) sam2MinF, max(sam2Max) sam2MaxT,
sum(sam12) sam12, min(sam12Min) sam12MinF, max(sam12Max) sam12MaxT,
verdTyp
from k
group by verdTyp
, floor(log(3*max(rowsMax, 0.1)))
, floor(log(3*max(sam1Max, 0.1)))
, floor(log(3*max(sam1Min, 0.1)))
)
select *
from s
$!
$;
call sqlCommit
$!
call sqlDisconnect
;
}¢--- DSN.TX.CASE(PER11LOA) cre=2011-03-22 mod=2011-03-22-22.35.18 A540769 -----
//A540769L JOB (CP00,KE50), 00010001
// MSGCLASS=T,TIME=1440,LINES=(999999,WARNING),
// NOTIFY=A540769
//*MAIN CLASS=LOG
//S1 EXEC PGM=DSNUTILB,PARM='DBOF,A540769L.LOAD' 00020001
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBOF.DBAA.LISTDEF(TEMPL),DISP=SHR
//IN1 DD DISP=SHR,DSN=A540769.PER11.UNL000
// DD DISP=SHR,DSN=A540769.PER11.UNL001
// DD DISP=SHR,DSN=A540769.PER11.UNL002
// DD DISP=SHR,DSN=A540769.PER11.UNL003
// DD DISP=SHR,DSN=A540769.PER11.UNL004
// DD DISP=SHR,DSN=A540769.PER11.UNL005
// DD DISP=SHR,DSN=A540769.PER11.UNL006
// DD DISP=SHR,DSN=A540769.PER11.UNL007
// DD DISP=SHR,DSN=A540769.PER11.UNL008
// DD DISP=SHR,DSN=A540769.PER11.UNL009
// DD DISP=SHR,DSN=A540769.PER11.UNL010
// DD DISP=SHR,DSN=A540769.PER11.UNL011
// DD DISP=SHR,DSN=A540769.PER11.UNL012
// DD DISP=SHR,DSN=A540769.PER11.UNL013
// DD DISP=SHR,DSN=A540769.PER11.UNL014
// DD DISP=SHR,DSN=A540769.PER11.UNL015
// DD DISP=SHR,DSN=A540769.PER11.UNL016
// DD DISP=SHR,DSN=A540769.PER11.UNL017
// DD DISP=SHR,DSN=A540769.PER11.UNL018
// DD DISP=SHR,DSN=A540769.PER11.UNL019
// DD DISP=SHR,DSN=A540769.PER11.UNL020
// DD DISP=SHR,DSN=A540769.PER11.UNL021
// DD DISP=SHR,DSN=A540769.PER11.UNL022
// DD DISP=SHR,DSN=A540769.PER11.UNL023
// DD DISP=SHR,DSN=A540769.PER11.UNL024
// DD DISP=SHR,DSN=A540769.PER11.UNL025
// DD DISP=SHR,DSN=A540769.PER11.UNL026
// DD DISP=SHR,DSN=A540769.PER11.UNL027
// DD DISP=SHR,DSN=A540769.PER11.UNL028
// DD DISP=SHR,DSN=A540769.PER11.UNL029
// DD DISP=SHR,DSN=A540769.PER11.UNL030
// DD DISP=SHR,DSN=A540769.PER11.UNL031
// DD DISP=SHR,DSN=A540769.PER11.UNL032
// DD DISP=SHR,DSN=A540769.PER11.UNL033
// DD DISP=SHR,DSN=A540769.PER11.UNL034
// DD DISP=SHR,DSN=A540769.PER11.UNL035
// DD DISP=SHR,DSN=A540769.PER11.UNL036
// DD DISP=SHR,DSN=A540769.PER11.UNL037
// DD DISP=SHR,DSN=A540769.PER11.UNL038
// DD DISP=SHR,DSN=A540769.PER11.UNL039
// DD DISP=SHR,DSN=A540769.PER11.UNL040
// DD DISP=SHR,DSN=A540769.PER11.UNL041
// DD DISP=SHR,DSN=A540769.PER11.UNL042
// DD DISP=SHR,DSN=A540769.PER11.UNL043
// DD DISP=SHR,DSN=A540769.PER11.UNL044
// DD DISP=SHR,DSN=A540769.PER11.UNL045
// DD DISP=SHR,DSN=A540769.PER11.UNL046
// DD DISP=SHR,DSN=A540769.PER11.UNL047
// DD DISP=SHR,DSN=A540769.PER11.UNL048
// DD DISP=SHR,DSN=A540769.PER11.UNL049
// DD DISP=SHR,DSN=A540769.PER11.UNL050
// DD DISP=SHR,DSN=A540769.PER11.UNL051
// DD DISP=SHR,DSN=A540769.PER11.UNL052
// DD DISP=SHR,DSN=A540769.PER11.UNL053
// DD DISP=SHR,DSN=A540769.PER11.UNL054
// DD DISP=SHR,DSN=A540769.PER11.UNL055
// DD DISP=SHR,DSN=A540769.PER11.UNL056
// DD DISP=SHR,DSN=A540769.PER11.UNL057
// DD DISP=SHR,DSN=A540769.PER11.UNL058
// DD DISP=SHR,DSN=A540769.PER11.UNL059
// DD DISP=SHR,DSN=A540769.PER11.UNL060
// DD DISP=SHR,DSN=A540769.PER11.UNL061
// DD DISP=SHR,DSN=A540769.PER11.UNL062
// DD DISP=SHR,DSN=A540769.PER11.UNL063
// DD DISP=SHR,DSN=A540769.PER11.UNL064
// DD DISP=SHR,DSN=A540769.PER11.UNL065
// DD DISP=SHR,DSN=A540769.PER11.UNL066
// DD DISP=SHR,DSN=A540769.PER11.UNL067
// DD DISP=SHR,DSN=A540769.PER11.UNL068
// DD DISP=SHR,DSN=A540769.PER11.UNL069
// DD DISP=SHR,DSN=A540769.PER11.UNL070
// DD DISP=SHR,DSN=A540769.PER11.UNL071
// DD DISP=SHR,DSN=A540769.PER11.UNL072
// DD DISP=SHR,DSN=A540769.PER11.UNL073
// DD DISP=SHR,DSN=A540769.PER11.UNL074
// DD DISP=SHR,DSN=A540769.PER11.UNL075
// DD DISP=SHR,DSN=A540769.PER11.UNL076
// DD DISP=SHR,DSN=A540769.PER11.UNL077
// DD DISP=SHR,DSN=A540769.PER11.UNL078
// DD DISP=SHR,DSN=A540769.PER11.UNL079
// DD DISP=SHR,DSN=A540769.PER11.UNL080
// DD DISP=SHR,DSN=A540769.PER11.UNL081
// DD DISP=SHR,DSN=A540769.PER11.UNL082
// DD DISP=SHR,DSN=A540769.PER11.UNL083
// DD DISP=SHR,DSN=A540769.PER11.UNL084
// DD DISP=SHR,DSN=A540769.PER11.UNL085
// DD DISP=SHR,DSN=A540769.PER11.UNL086
// DD DISP=SHR,DSN=A540769.PER11.UNL087
// DD DISP=SHR,DSN=A540769.PER11.UNL088
// DD DISP=SHR,DSN=A540769.PER11.UNL089
// DD DISP=SHR,DSN=A540769.PER11.UNL090
// DD DISP=SHR,DSN=A540769.PER11.UNL091
// DD DISP=SHR,DSN=A540769.PER11.UNL092
// DD DISP=SHR,DSN=A540769.PER11.UNL093
// DD DISP=SHR,DSN=A540769.PER11.UNL094
// DD DISP=SHR,DSN=A540769.PER11.UNL095
// DD DISP=SHR,DSN=A540769.PER11.UNL096
// DD DISP=SHR,DSN=A540769.PER11.UNL097
// DD DISP=SHR,DSN=A540769.PER11.UNL098
// DD DISP=SHR,DSN=A540769.PER11.UNL099
// DD DISP=SHR,DSN=A540769.PER11.UNL100
// DD DISP=SHR,DSN=A540769.PER11.UNL101
// DD DISP=SHR,DSN=A540769.PER11.UNL102
// DD DISP=SHR,DSN=A540769.PER11.UNL103
// DD DISP=SHR,DSN=A540769.PER11.UNL104
// DD DISP=SHR,DSN=A540769.PER11.UNL105
// DD DISP=SHR,DSN=A540769.PER11.UNL106
// DD DISP=SHR,DSN=A540769.PER11.UNL107
// DD DISP=SHR,DSN=A540769.PER11.UNL108
// DD DISP=SHR,DSN=A540769.PER11.UNL109
// DD DISP=SHR,DSN=A540769.PER11.UNL110
// DD DISP=SHR,DSN=A540769.PER11.UNL111
// DD DISP=SHR,DSN=A540769.PER11.UNL112
// DD DISP=SHR,DSN=A540769.PER11.UNL113
// DD DISP=SHR,DSN=A540769.PER11.UNL114
// DD DISP=SHR,DSN=A540769.PER11.UNL115
// DD DISP=SHR,DSN=A540769.PER11.UNL116
// DD DISP=SHR,DSN=A540769.PER11.UNL117
// DD DISP=SHR,DSN=A540769.PER11.UNL118
// DD DISP=SHR,DSN=A540769.PER11.UNL119
// DD DISP=SHR,DSN=A540769.PER11.UNL120
// DD DISP=SHR,DSN=A540769.PER11.UNL121
// DD DISP=SHR,DSN=A540769.PER11.UNL122
// DD DISP=SHR,DSN=A540769.PER11.UNL123
// DD DISP=SHR,DSN=A540769.PER11.UNL124
// DD DISP=SHR,DSN=A540769.PER11.UNL125
// DD DISP=SHR,DSN=A540769.PER11.UNL126
// DD DISP=SHR,DSN=A540769.PER11.UNL127
// DD DISP=SHR,DSN=A540769.PER11.UNL128
// DD DISP=SHR,DSN=A540769.PER11.UNL129
// DD DISP=SHR,DSN=A540769.PER11.UNL130
//DDI4 DD DUMMY
//SYSIN DD *
LOAD DATA LOG NO RESUME NO REPLACE COPYDDN(TCOPYD) INDDN IN1
INTO TABLE A540769.TPER11
(
CNT POSITION( 1 )
INTEGER ,
S1ROWS POSITION( 5 )
INTEGER ,
S1ROWF POSITION( 10 )
INTEGER ,
S1ROWT POSITION( 15 )
INTEGER ,
VRROWS POSITION( 20 )
INTEGER ,
VRROWF POSITION( 25 )
INTEGER ,
VRROWT POSITION( 30 )
INTEGER ,
BUROWS POSITION( 35 )
INTEGER ,
BUROWF POSITION( 40 )
INTEGER ,
BUROWT POSITION( 45 )
INTEGER ,
TYPE POSITION( 50 )
VARCHAR
)
COPY TABLESPACE DA540769.APER11 COPYDDN(TCOPYD)
PARALLEL
SHRLEVEL CHANGE
}¢--- DSN.TX.CASE(PER11SEL) cre=2011-03-22 mod=2011-03-23-08.30.06 A540769 -----
set current path oa1p;
with a as
(
select
real(s1Rows)/cnt s1A,
real(vrRows)/cnt vrA,
real(buRows)/cnt buA,
t.*
from A540769.tper11 t
where type like 'u0322=%'
)
, g as
( select
5 + buA/49.5 -- indexScreening
+ vrA getPgNeu, -- TS Access
4 + s1A/41.4 + 5 + s1A/49.5 -- indexScreening
+ s1A getPgAlt, -- TS Access
a.*
from a
)
select
fosFmte7(getPgNeu) getPgNeu,
fosFmte7(getPgAlt) getPgAlt,
fosFmte7(cnt) cnt,
fosFmte7(s1A) s1A,
fosFmte7(vrA) vrA,
fosFmte7(buA) buA,
(getPgNeu - getPgAlt)*cnt diff,
g.*
from g
order by type desc, diff desc
}¢--- DSN.TX.CASE(PER11UNL) cre=2011-03-21 mod=2011-03-22-23.13.01 A540769 -----
$>.fEdit() $<=¢
$=loTb=a540769.tper11
$=seTb=oa1p01.vbe010a1
$=step= 200
$=top = 130
$*+ call sqlstmt "delete from" $loTb "where verdtyp <> '?'"
$*+ call sqlcommit
$=from= -$step
$@do tx=0 to $top $@=¢
$=tx=-right(tx, 3, 0)
$=j1=- tx // 10
$=from=- $from+$step
$=to=- $from + $step - 1
//A540769$j1 JOB (CP00,KE50),'DB2 REO', 00010000
// MSGCLASS=T,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M 00030000
//*MAIN CLASS=LOG 00040000
//DEL EXEC PGM=IEFBR14 00020001
//SYSR$tx DD DISP=(MOD,DELETE),DSN=A540769.PER11.UNL$tx
//S1 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99 00020001
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD SYSOUT=*
//SYSPUNCH DD SYSOUT=*,RECFM=FB,LRECL=80
//SYSREC00 DD DISP=(NEW,CATLG),DSN=*.DEL.SYSR$tx,
// DCB=(LRECL=48,RECFM=FB),
// SPACE=(CYL,(2,1000)),MGMTCLAS=COM#A069
//SYSIN DD *
with s1 as
( select count(*) s1Rows,
PROCBASE, TECHBEZ, DAT_BUCH, DAT_VAL, VERDTYP, sammel1
from $seTb a
where procBase between $from and $to
group by PROCBASE, TECHBEZ, DAT_BUCH, DAT_VAL, VERDTYP, sammel1
)
, vr as
( select count(*) vrRows,
PROCBASE, TECHBEZ, DAT_BUCH, DAT_VAL, VERDTYP
from $seTb a
where procBase between $from and $to
group by PROCBASE, TECHBEZ, DAT_BUCH, DAT_VAL, VERDTYP
)
, sv as
( select s1Rows, vrRows,
s1.PROCBASE, s1.TECHBEZ, s1.DAT_BUCH,
s1.DAT_VAL, s1.VERDTYP, s1.sammel1
from s1, vr
where s1.procBase = vr.procBase
and s1.techBez = vr.techBez
and s1.dat_Buch = vr.dat_buch
and s1.dat_Val = vr.dat_val
and s1.verdtyp = vr.verdtyp
)
, va as
( select sum(s1Rows) s1Rows, sum(vrRows) vrRows,
PROCBASE, TECHBEZ, DAT_BUCH, DAT_VAL, sammel1
from sv
group by PROCBASE, TECHBEZ, DAT_BUCH, DAT_VAL, sammel1
)
, bu as
( select count(*) buRows,
sum(case when sammel1 < '1900-01-01-00:00:00'
then 1 else 0 end) buS0Rows,
sum(case when sammel1 > '1900-01-01-00:00:00'
then 1 else 0 end) buS1Rows,
sum(case when sammel2 > '1900-01-01-00:00:00'
then 1 else 0 end) buS2Rows,
PROCBASE, TECHBEZ, DAT_BUCH
from $seTb a
where procBase between $from and $to
group by PROCBASE, TECHBEZ, DAT_BUCH
)
, s as
( select s1Rows, vrRows, buRows, buS0Rows, buS1Rows, buS2Rows,
va.PROCBASE, va.TECHBEZ, va.DAT_BUCH, va.DAT_VAL, va.sammel1
from va, bu
where va.procBase = bu.procBase
and va.techBez = bu.techBez
and va.dat_Buch = bu.dat_buch
)
select count(*) cnt,
sum(s1Rows) s1Rows, min(s1Rows) s1RowF, max(s1Rows) s1RowT,
sum(vrRows) vrRows, min(vrRows) vrRowF, max(vrRows) vrRowT,
sum(buRows) buRows, min(buRows) buRowF, max(buRows) buRowT,
varChar('u0322*$tx', 20) type
from s
group by floor(log(3*max(s1Rows, 0.1)))
, floor(log(3*max(vrRows, 0.1)))
, floor(log(3*max(buRows, 0.1)))
;
$!
$!
}¢--- DSN.TX.CASE(PER12) cre=2011-09-21 mod=2011-09-22-08.39.13 A540769 --------
* We have a table with a unique index i1 on column (c1)
* and an nonUnique index i2 on (c1, c2) with c2 a smallint.
* Db2 chooses i1 for a query with c1 and c2 in the where condition,
* thus the predicates with c2 are stage1.
* per13 selber testfall, aber mit Daten aus DBTF
credb trg 1
+ ok creDb A540769.TX.GENF(PER12t1) ::f
manual spufi per12exp ==> explain 1 and11 use index 1, but shoud 2
+ wait spufi per12exp
manual sub per12run for runstats ==> error disappears here,
* but not in production
}¢--- DSN.TX.CASE(PER12DDL) cre=2011-09-20 mod=2011-09-21-10.53.18 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
drop tablespace $db.aper12;
commit;
------------------------------------------------------------------------
CREATE TABLESPACE aper12
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
segsize 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255
; ---------------------------------------------------------------------
CREATE TABLE $creator.tper12
( i1 int not null
, i2 smallint not null
, j1 int not null
, j2 smallint not null
, k1 int not null
, k2 smallint not null
, l1 int not null
, l2 int not null
)
IN $db.aper12
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE ;
CREATE unique INDEX $creator.Iper12i1u
ON $creator.tper12
(i1)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
cluster
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES ;
CREATE INDEX $creator.Iper12i2d
ON $creator.tper12
(i1, i2)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
not cluster
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES ;
CREATE unique INDEX $creator.Iper12j1u
ON $creator.tper12
(j1)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
not cluster
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES ;
CREATE unique INDEX $creator.Iper12j2u
ON $creator.tper12
(j1, j2)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
not cluster
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES ;
CREATE INDEX $creator.Iper12k1d
ON $creator.tper12
(k1)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
not cluster
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES ;
CREATE unique INDEX $creator.Iper12k2u
ON $creator.tper12
(k1, k2)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
not cluster
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES ;
CREATE unique INDEX $creator.Iper12l1u
ON $creator.tper12
(l1)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
not cluster
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES ;
CREATE INDEX $creator.Iper12l2d
ON $creator.tper12
(l1, l2)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
not cluster
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES ;
commit;
Insert into $creator.tper12
SELECT row_number () over(), mod(row_number () over(), 32000),
row_number () over(), mod(row_number () over(), 32000),
row_number () over(), mod(row_number () over(), 32000),
row_number () over(), mod(row_number () over(), 32000)
FROM sysibm.syscolumns
fetch first 100000 rows only
;
commit;
}¢--- DSN.TX.CASE(PER12EXP) cre=2011-09-20 mod=2011-09-21-09.31.19 A540769 -----
set current sqlid = 'A540769';
delete from A540769.plan_table;
delete from A540769.DSN_PREDICAT_TABLE;
delete from A540769.DSN_FILTER_TABLE;
explain plan set queryno = 1 for
select * from A540769.tper12 where i1=? and ? = i2 ;
explain plan set queryno = 2 for
select * from A540769.tper12 where j1=? and j2 = ?;
explain plan set queryno = 3 for
select * from A540769.tper12 where k1=? and k2 = ?;
explain plan set queryno = 4 for
select * from A540769.tper12 where l1=? and l2 = ?;
explain plan set queryno = 11 for
select * from A540769.tper12 where i1=? and i2 in (?, ?, ?);
explain plan set queryno = 12 for
select * from A540769.tper12 where j1=? and j2 in (?, ?, ?);
explain plan set queryno = 13 for
select * from A540769.tper12 where k1=? and k2 in (?, ?, ?);
explain plan set queryno = 14 for
select * from A540769.tper12 where l1=? and l2 in (?, ?, ?);
select * from plan_view1
order by applname, progname, queryNo, qblockno, planno, mixOpSeq
;
select * from plan_viewPred
order by collid, progName, applName, explain_time,
queryNo, qBlockNo, planno,
stage, predno
;
commit
}¢--- DSN.TX.CASE(PER12RUN) cre=2011-09-20 mod=2011-09-23-11.14.08 A540769 -----
//A540769R JOB (CP00,KE50),'DB2 REO', 00010000
// MSGCLASS=T,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M 00030000
//*MAIN CLASS=DBAF 00040000
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBAF,'A540769R.RUNSTA'),
// REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
RUNSTATS TABLESPACE DA540769.APER12
SHRLEVEL CHANGE
INDEX(ALL KEYCARD)
REPORT NO UPDATE SPACE
}¢--- DSN.TX.CASE(PER13) cre=2011-09-22 mod=2011-09-22-11.26.29 A540769 --------
* We have a table with a unique index i1 on column (c1)
* and an nonUnique index i2 on (c1, c2) with c2 a smallint.
* Db2 chooses i1 for a query with c1 and c2 in the where condition,
* thus the predicates with c2 are stage1.
*
* per12 selber testfall, aber mit synthetischen Daten
creDb trg 1
+ ok creDb A540769.TX.GENF(PER13t1) ::f
manual Daten Laden aus tx.tDat.per13
+ wait Daten Laden aus tx.tDat.per13
manual spufi per13exp/q
manual spufi per13cz für Explain auf tcz323a1
}¢--- DSN.TX.CASE(PER13CZ) cre=2011-09-22 mod=2011-09-22-11.27.28 A540769 ------
set current sqlid = 'A540769';
delete from A540769.plan_table;
delete from A540769.DSN_FILTER_TABLE ;
delete from A540769.DSN_STRUCT_TABLE ;
delete from A540769.DSN_PREDICAT_TABLE ;
explain plan set queryno = 24 for
select I_DCMNTN_ITEM, I_DCMNTN_ITEM
from oa1t.VCZ323A1V q323
where ? = Q323.I_DCMNTN_ITEM
AND Q323.I_DOCUMENT_T = ?
;
explain plan set queryno = 25 for
select CZ32301, CZ32313
from oa1t.tCZ323A1 q323
where ? = Q323.CZ32301
AND Q323.CZ32313 IN ( ?, ?, ?)
;
explain plan set queryno = 34 for
select *
from oa1t.VCZ323A1V q323
where ? = Q323.I_DCMNTN_ITEM
AND Q323.I_DOCUMENT_T = ?
;
explain plan set queryno = 35 for
select *
from oa1t.tCZ323A1 q323
where ? = Q323.CZ32301
AND Q323.CZ32313 IN ( ?, ?, ?)
;
explain plan set queryno = 36 for
select *
from oa1t.tCZ323A1 q323
where ? = Q323.CZ32301
AND Q323.CZ32313 IN ( ?, ?, ?)
AND Q323.CZ32304 >= CURRENT DATE
AND Q323.CZ32309 < CURRENT DATE
;
explain plan set queryno = 44 for
select A.*
from oa1t.tCZ323A1 A
, oa1t.tCZ323A1 B
where A.CZ32301 = B.CZ32301
AND ? = A.CZ32301
AND A.CZ32313 IN ( ?, ?, ?)
AND B.CZ32313 IN ( ?, ?, ?)
;
explain plan set queryno = 45 for
select B.*
from oa1t.tCZ323A1 A
, oa1t.tCZ323A1 B
where A.CZ32301 = B.CZ32301
AND ? = A.CZ32301
AND A.CZ32313 IN ( ?, ?, ?)
AND B.CZ32313 IN ( ?, ?, ?)
;
explain plan set queryno = 46 for
select B.*
from oa1t.VCZ323A1V A
, oa1t.VCZ323A1V B
where A.I_DCMNTN_ITEM = B.I_DCMNTN_ITEM
AND ? = A.I_DCMNTN_ITEM
AND A.I_DOCUMENT_T IN ( ?, ?, ?)
AND B.I_DOCUMENT_T IN ( ?, ?, ?)
AND B.D_EFFECTIVE <= CURRENT DATE
AND B.D_END > CURRENT DATE
;
explain plan set queryno = 47 for
select A.*
from oa1t.VCZ323A1V A
, oa1t.VCZ323A1V B
where A.I_DCMNTN_ITEM = B.I_DCMNTN_ITEM
AND ? = A.I_DCMNTN_ITEM
AND A.I_DOCUMENT_T IN ( ?, ?, ?)
AND B.I_DOCUMENT_T IN ( ?, ?, ?)
AND B.D_EFFECTIVE <= CURRENT DATE
AND B.D_END > CURRENT DATE
;
select * from plan_view2
order by applname, progname, queryNo, qblockno, planno, mixOpSeq
;
select *
from plan_ViewPred
order by collid, progName, applName, explain_time,
queryNo, qBlockNo, planno,
stage, PREDNo
;
rollback;
;;;;
set current sqlid = 'A540769';
delete from A540769.plan_table;
delete from A540769.DSN_FILTER_TABLE ;
delete from A540769.DSN_STRUCT_TABLE ;
delete from A540769.DSN_PREDICAT_TABLE ;
explain plan set queryno = 0 for
SELECT Q323.I_DCMNTN_ITEM
, Q323.I_DOCUMENT_T
, Q323.I_DCMNT_ARCHIVE_T
, Q323.D_LEGAL
FROM oa1t.VCZ431A1V Q431
, oa1t.VCZ323A1V Q323
WHERE Q431.I_OBJECT = ?
AND Q431.D_EFFECTIVE <= CURRENT DATE
AND Q431.D_END > CURRENT DATE
AND Q431.I_IDENTIFIER_T = 22
AND Q431.I_DCMNTN_ITEM = Q323.I_DCMNTN_ITEM
AND Q323.D_EFFECTIVE <= CURRENT DATE
AND Q323.D_END > CURRENT DATE
AND Q323.I_DOCUMENT_T IN (445, 446, 447, 448,
454, 455, 491, 492)
;
explain plan set queryno = 4 for
SELECT Q323.I_DCMNTN_ITEM, Q323.D_LEGAL,
Q323.D_EXPIRATION, Q323.D_EFFECTIVE, Q323.D_TIME_CREATED
FROM oa1t.VCZ431A1V Q431, oa1t.VCZ323A1V Q323
WHERE Q431.I_OBJECT = ? AND Q431.I_IDENTIFIER_T =
23 AND Q431.I_DCMNTN_ITEM = Q323.I_DCMNTN_ITEM AND Q431.D_EFFECTIVE <=
CURRENT DATE AND Q431.D_END > CURRENT DATE AND Q323.I_DOCUMENT_T = 341
AND Q323.D_EFFECTIVE <= CURRENT DATE AND Q323.D_END > CURRENT DATE AND
Q323.D_EXPIRATION >= CURRENT DATE ORDER BY Q323.D_LEGAL DESC,
Q323.D_EFFECTIVE DESC, Q323.D_TIME_CREATED DESC FOR FETCH ONLY
;
explain plan set queryno = 14 for
SELECT Q323.I_DCMNTN_ITEM, Q323.D_LEGAL,
Q323.D_EXPIRATION, Q323.D_EFFECTIVE, Q323.D_TIME_CREATED
FROM ( select q.*, smallint(341 + 0 * I_IDENTIFIER_T) kSI
from oa1t.VCZ431A1V q) Q431
join oa1t.VCZ323A1V Q323
on Q431.I_DCMNTN_ITEM = Q323.I_DCMNTN_ITEM
AND Q323.I_DOCUMENT_T = q431.kSI
WHERE Q431.I_OBJECT = ? AND Q431.I_IDENTIFIER_T =
23 AND Q431.D_EFFECTIVE <=
CURRENT DATE AND Q431.D_END > CURRENT DATE
AND Q323.D_EFFECTIVE <= CURRENT DATE AND Q323.D_END > CURRENT DATE AND
Q323.D_EXPIRATION >= CURRENT DATE ORDER BY Q323.D_LEGAL DESC,
Q323.D_EFFECTIVE DESC, Q323.D_TIME_CREATED DESC FOR FETCH ONLY
;
explain plan set queryno = 15 for
SELECT Q323.I_DCMNTN_ITEM, Q323.D_LEGAL,
Q323.D_EXPIRATION, Q323.D_EFFECTIVE, Q323.D_TIME_CREATED
from oa1t.VCZ431A1V Q431
join (select * from oa1t.VCZ323A1V
where I_DOCUMENT_T = 431) q323
on Q431.I_DCMNTN_ITEM = Q323.I_DCMNTN_ITEM
WHERE Q431.I_OBJECT = ? AND Q431.I_IDENTIFIER_T =
23 AND Q431.D_EFFECTIVE <=
CURRENT DATE AND Q431.D_END > CURRENT DATE
AND Q323.D_EFFECTIVE <= CURRENT DATE AND Q323.D_END > CURRENT DATE AND
Q323.D_EXPIRATION >= CURRENT DATE ORDER BY Q323.D_LEGAL DESC,
Q323.D_EFFECTIVE DESC, Q323.D_TIME_CREATED DESC FOR FETCH ONLY
;
explain plan set queryno = 24 for
select I_DCMNTN_ITEM, I_DCMNTN_ITEM
from oa1t.VCZ323A1V q323
where ? = Q323.I_DCMNTN_ITEM
AND Q323.I_DOCUMENT_T = ?
;
explain plan set queryno = 25 for
select CZ32301, CZ32313
from oa1t.tCZ323A1 q323
where ? = Q323.CZ32301
AND Q323.CZ32313 IN ( ?, ?, ?)
;
explain plan set queryno = 34 for
select *
from oa1t.VCZ323A1V q323
where ? = Q323.I_DCMNTN_ITEM
AND Q323.I_DOCUMENT_T = ?
;
explain plan set queryno = 35 for
select *
from oa1t.tCZ323A1 q323
where ? = Q323.CZ32301
AND Q323.CZ32313 IN ( ?, ?, ?)
;
explain plan set queryno = 36 for
select *
from oa1t.tCZ323A1 q323
where ? = Q323.CZ32301
AND Q323.CZ32313 IN ( ?, ?, ?)
AND Q323.CZ32304 >= CURRENT DATE
AND Q323.CZ32309 < CURRENT DATE
;
explain plan set queryno = 44 for
select A.*
from oa1t.tCZ323A1 A
, oa1t.tCZ323A1 B
where A.CZ32301 = B.CZ32301
AND ? = A.CZ32301
AND A.CZ32313 IN ( ?, ?, ?)
AND B.CZ32313 IN ( ?, ?, ?)
;
explain plan set queryno = 45 for
select B.*
from oa1t.tCZ323A1 A
, oa1t.tCZ323A1 B
where A.CZ32301 = B.CZ32301
AND ? = A.CZ32301
AND A.CZ32313 IN ( ?, ?, ?)
AND B.CZ32313 IN ( ?, ?, ?)
;
explain plan set queryno = 46 for
select B.*
from oa1t.VCZ323A1V A
, oa1t.VCZ323A1V B
where A.I_DCMNTN_ITEM = B.I_DCMNTN_ITEM
AND ? = A.I_DCMNTN_ITEM
AND A.I_DOCUMENT_T IN ( ?, ?, ?)
AND B.I_DOCUMENT_T IN ( ?, ?, ?)
AND B.D_EFFECTIVE <= CURRENT DATE
AND B.D_END > CURRENT DATE
;
explain plan set queryno = 47 for
select A.*
from oa1t.VCZ323A1V A
, oa1t.VCZ323A1V B
where A.I_DCMNTN_ITEM = B.I_DCMNTN_ITEM
AND ? = A.I_DCMNTN_ITEM
AND A.I_DOCUMENT_T IN ( ?, ?, ?)
AND B.I_DOCUMENT_T IN ( ?, ?, ?)
AND B.D_EFFECTIVE <= CURRENT DATE
AND B.D_END > CURRENT DATE
;
select * from plan_view2
order by applname, progname, queryNo, qblockno, planno, mixOpSeq
;
select *
from plan_ViewPred
order by collid, progName, applName, explain_time,
queryNo, qBlockNo, planno,
stage, PREDNo
;
rollback;
;;
select * from plan_view1
order by applname, progname, queryNo, qblockno, planno, mixOpSeq
;
rollback
;;;
select * from cmnBatch.plan_view1
where progName in ('EC5492') and collid = 'EC'
-- and bind_time = '2011-02-10-10.55.40.578363'
and version = 'PFB0000070'
order by applname, collid, progname,
queryNo, qblockno, planno, mixOpSeq
;
select *
from CMNBATCH.plan_ViewPred
where progname = 'EC5492' and collid = 'EC'
and explain_time = '2011-08-11-14.41.27.996738'
order by collid, progName, applName, explain_time,
queryNo, qBlockNo, planno,
stage, orderNo
;;
-- versionen, Compiles und Binds pro Programm
with e as
(
select count(*) c, progName pg, version vr, collid co, bind_time bt
from cmnBatch.plan_table
group by progName, version, collid, bind_time
)
select substr(e.pg, 1, 8) pg, date(p.pcTimeStamp) "preComp",
date(e.bt) "bind", c "#plan_t", vr,
e.*, p.*
from e
full outer join sysibm.sysPackage p
on e.co = p.collid and e.pg = p.name and e.vr = p.version
where e.pg = 'EC5492' and e.vr = 'PFB0000070'
order by e.co, e.pg, p.pcTimeStamp desc, e.bt desc
with ur
;
-- versionen, Compiles und Binds pro Programm
with e as
(
select count(*) c, progName pg, version vr, collid co, bind_time bt
from cmnBatch.plan_table
group by progName, version, collid, bind_time
)
select substr(e.pg, 1, 8) pg, date(p.pcTimeStamp) "preComp",
date(e.bt) "bind", c "#plan_t", vr,
e.*, p.*
from e
full outer join sysibm.sysPackage p
on e.co = p.collid and e.pg = p.name and e.vr = p.version
where e.pg = 'YKCLOGS'
order by e.co, e.pg, p.pcTimeStamp desc, e.bt desc
with ur
;
set current sqlid = 'A540769';
delete from A540769.plan_table;
explain plan set queryno = 0 for
select *
from sysibm.sysDummy1
;
select * from plan_view1
order by applname, progname, queryNo, qblockno, planno, mixOpSeq
;
rollback
;;;
with c as
(
select count(*) c
from oa1p.tcz431a1
group by CZ43106
, CZ43108
, CZ43104
)
select count(*), c, count(*) * c
from c
group by c
order by 2 desc
with ur
;;
select count(*), CZ32313
from oa1p.tcz323a1
group by CZ32313
order by 2 asc
with ur
;;;;;;
}¢--- DSN.TX.CASE(PER13DDL) cre=2011-09-21 mod=2011-09-21-15.48.22 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
drop tablespace $db.aper13;
commit;
------------------------------------------------------------------------
CREATE TABLESPACE aper13
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
numparts 8
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255
; ---------------------------------------------------------------------
CREATE TABLE $creator.tper13
( i1 char(20) not null
, i2 smallint not null
, j1 char(20) not null
, j2 smallint not null
, k1 char(20) not null
, k2 smallint not null
, l1 char(20) not null
, l2 int not null
, m2 smallint not null
, n2 smallint not null
, o2 smallint not null
, primary key(i1)
)
IN $db.aper13
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE ;
CREATE unique INDEX $creator.Iper13i1u
ON $creator.tper13
(i1)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
cluster
(PARTITION 1 ENDING AT (X'1F'),
PARTITION 2 ENDING AT (X'3F'),
PARTITION 3 ENDING AT (X'5F'),
PARTITION 4 ENDING AT (X'7F'),
PARTITION 5 ENDING AT (X'9F'),
PARTITION 6 ENDING AT (X'BF'),
PARTITION 7 ENDING AT (X'DF'),
PARTITION 8 ENDING AT (X'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
)
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES ;
CREATE INDEX $creator.Iper13i2d
ON $creator.tper13
(i1, i2)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
not cluster
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES ;
CREATE unique INDEX $creator.Iper13j2u
ON $creator.tper13
(i1, j2)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
not cluster
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES ;
CREATE unique INDEX $creator.Iper13k2u
ON $creator.tper13
(i1, k2)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
not cluster
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES ;
CREATE INDEX $creator.Iper13l2d
ON $creator.tper13
(i1, l2)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
not cluster
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES ;
CREATE INDEX $creator.Iper13m2d
ON $creator.tper13
(i1, m2)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
not cluster
partitioned
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES ;
CREATE unique INDEX $creator.Iper13n2u
ON $creator.tper13
(i1, n2)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
not cluster
partitioned
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES ;
commit;
}¢--- DSN.TX.CASE(PER13EXP) cre=2011-09-21 mod=2011-09-21-16.27.32 A540769 -----
set current sqlid = 'A540769';
delete from A540769.plan_table;
delete from A540769.DSN_PREDICAT_TABLE;
delete from A540769.DSN_FILTER_TABLE;
explain plan set queryno = 1 for
select * from A540769.tper13 where i1=? and ? = i2 ;
explain plan set queryno = 2 for
select * from A540769.tper13 where i1=? and j2 = ?;
explain plan set queryno = 3 for
select * from A540769.tper13 where i1=? and k2 = ?;
explain plan set queryno = 4 for
select * from A540769.tper13 where i1=? and l2 = ?;
explain plan set queryno = 5 for
select * from A540769.tper13 where i1=? and m2 = ?;
explain plan set queryno = 6 for
select * from A540769.tper13 where i1=? and n2 = ?;
explain plan set queryno = 7 for
select * from A540769.tper13 where i1=? and o2 = ?;
explain plan set queryno = 11 for
select * from A540769.tper13 where i1=? and i2 in (?, ?, ?);
explain plan set queryno = 12 for
select * from A540769.tper13 where i1=? and j2 in (?, ?, ?);
explain plan set queryno = 13 for
select * from A540769.tper13 where i1=? and k2 in (?, ?, ?);
explain plan set queryno = 14 for
select * from A540769.tper13 where i1=? and l2 in (?, ?, ?);
explain plan set queryno = 15 for
select * from A540769.tper13 where i1=? and m2 in (?, ?, ?);
explain plan set queryno = 16 for
select * from A540769.tper13 where i1=? and n2 in (?, ?, ?);
explain plan set queryno = 17 for
select * from A540769.tper13 where i1=? and o2 in (?, ?, ?);
select * from plan_view1
order by applname, progname, queryNo, qblockno, planno, mixOpSeq
;
select * from plan_viewPred
order by collid, progName, applName, explain_time,
queryNo, qBlockNo, planno,
stage, predno
;
commit
}¢--- DSN.TX.CASE(PER13EXQ) cre=2011-09-21 mod=2011-09-22-09.20.37 A540769 -----
set current sqlid = 'A540769';
delete from A540769.plan_table;
delete from A540769.DSN_PREDICAT_TABLE;
delete from A540769.DSN_FILTER_TABLE;
explain plan set queryno = 1 for
select * from A540769.tper13 where i1=? and ? = i2 ;
explain plan set queryno = 2 for
select * from A540769.tper13 where i1=? and j2 = ?;
explain plan set queryno = 3 for
select * from A540769.tper13 where i1=? and k2 = ?;
explain plan set queryno = 4 for
select * from A540769.tper13 where i1=? and l2 = ?;
explain plan set queryno = 5 for
select * from A540769.tper13 where i1=? and m2 = ?;
explain plan set queryno = 6 for
select * from A540769.tper13 where i1=? and n2 = ?;
explain plan set queryno = 7 for
select * from A540769.tper13 where i1=? and o2 = ?;
explain plan set queryno = 11 for
select * from A540769.tper13 where i1=? and i2 in (?, ?, ?);
explain plan set queryno = 12 for
select * from A540769.tper13 where i1=? and j2 in (?, ?, ?);
explain plan set queryno = 13 for
select * from A540769.tper13 where i1=? and k2 in (?, ?, ?);
explain plan set queryno = 14 for
select * from A540769.tper13 where i1=? and l2 in (?, ?, ?);
explain plan set queryno = 15 for
select * from A540769.tper13 where i1=? and m2 in (?, ?, ?);
explain plan set queryno = 16 for
select * from A540769.tper13 where i1=? and n2 in (?, ?, ?);
explain plan set queryno = 17 for
select * from A540769.tper13 where i1=? and o2 in (?, ?, ?);
explain plan set queryno = 21 for
select * from A540769.tper13 where i1=? and i2 in (?, ?, ?)
and o2 in (?, ?, ?);
explain plan set queryno = 22 for
select * from A540769.tper13 where i1=? and j2 in (?, ?, ?)
and o2 in (?, ?, ?);
explain plan set queryno = 23 for
select * from A540769.tper13 where i1=? and k2 in (?, ?, ?)
and o2 in (?, ?, ?);
explain plan set queryno = 24 for
select * from A540769.tper13 where i1=? and l2 in (?, ?, ?)
and o2 in (?, ?, ?);
explain plan set queryno = 25 for
select * from A540769.tper13 where i1=? and m2 in (?, ?, ?)
and o2 in (?, ?, ?);
explain plan set queryno = 26 for
select * from A540769.tper13 where i1=? and n2 in (?, ?, ?)
and o2 in (?, ?, ?);
explain plan set queryno = 27 for
select * from A540769.tper13 where i1=? and o2 in (?, ?, ?)
and o2 in (?, ?, ?);
explain plan set queryno = 36 for
select a.* from A540769.tper13 a, A540769.tper13 b
where a.i1=? and a.n2 in (?, ?, ?)
and b.i1=? and b.n2 in (?, ?, ?);
explain plan set queryno = 37 for
select b.* from A540769.tper13 a, A540769.tper13 b
where a.i1=? and a.n2 in (?, ?, ?)
and b.i1=? and b.n2 in (?, ?, ?);
explain plan set queryno = 46 for
select a.* from A540769.tper13 a, A540769.tper13 b
where a.i1=? and a.n2 in (?, ?, ?) and a.o2 in (?, ?, ?)
and b.i1=? and b.n2 in (?, ?, ?) and b.o2 in (?, ?, ?);
explain plan set queryno = 46 for
select b.* from A540769.tper13 a, A540769.tper13 b
where a.i1=? and a.n2 in (?, ?, ?) and a.o2 in (?, ?, ?)
and b.i1=? and b.n2 in (?, ?, ?) and b.o2 in (?, ?, ?);
select * from plan_view1
order by applname, progname, queryNo, qblockno, planno, mixOpSeq
;
select * from plan_viewPred
order by collid, progName, applName, explain_time,
queryNo, qBlockNo, planno,
stage, predno
;
commit
}¢--- DSN.TX.CASE(PER13LOC) cre=2011-09-21 mod=2011-09-21-15.46.25 A540769 -----
//A540769W JOB (CP00,KE50),'DB2 REO', 00010000
// MSGCLASS=T,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M 00030000
//*MAIN CLASS=LOG 00040000
//S1 EXEC PGM=DSNUTILB,PARM='DBAF,A540769L.LOAD' 00020001
//SYSMAP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSERR DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBAF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
EXEC SQL
DECLARE CUR1 CURSOR FOR
SELECT CZ32301 I1, CZ32313 I2
, CZ32301 J1, CZ32313 J2
, CZ32301 K1, CZ32313 K2
, CZ32301 L1, CZ32313 L2
, CZ32313 M2
, CZ32313 N2
, CZ32313 O2
FROM CHSKA000DBTF.OA1T.TCZ323A1
WITH UR
ENDEXEC
LOAD DATA INCURSOR CUR1 LOG NO RESUME NO REPLACE COPYDDN(TCOPYD)
SORTDEVT DISK SORTNUM 50
WORKDDN(TSYUTS,TSOUTS)
STATISTICS INDEX(ALL KEYCARD)
INTO TABLE A540769.TPER13
}¢--- DSN.TX.CASE(PER13UNL) cre=2011-09-21 mod=2011-09-21-16.41.59 A540769 -----
//A540769V JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//***************************************************
//* UNLOAD
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBAF,'A540769.UNLOAC'),
// REGION=0M
//*DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSTEMPL DD DSN=DBAF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE TSREC DSN('A540769.TX.TDAT.PER13.&TS..P&PA..UNL')
DATACLAS (NULL30) MGMTCLAS(COM#A069)
SPACE (10,1250) CYL
TEMPLATE TSPUN DSN('A540769.TX.TDAT.PER13.&TS..UNL')
DATACLAS (NULL12) MGMTCLAS(COM#A069)
SPACE (10,250) CYL
UNLOAD TABLESPACE DA540769.APER13
PUNCHDDN TSPUN UNLDDN TSREC
SHRLEVEL CHANGE
}¢--- DSN.TX.CASE(PER14) cre=2016-06-20 mod=2016-06-20-17.18.32 A540769 --------
credb trg 1
+ ok creDb DSN.TX.GENF(PER14t1) ::f
credb trg 2
+ ok creDb DSN.TX.GENF(PER14t2) ::f
}¢--- DSN.TX.CASE(PER14CLU) cre=2011-09-30 mod=2011-09-30-16.34.01 A540769 -----
select case when t.kNos = left(j.kNos, length(t.kNos))
then 'O' else '*' end
|| case when t.kNames = left(j.kNames, length(t.kNames))
then 'A' else '*' end
|| i.clustering
|| i.clustered,
i.indexType "iTy",
i.clusterRatio "cluRa",
substr(strip(t.cr) || '.' || t.nm, 1, 20) "table",
substr(j.nm, 1, 12) "index",
t.*, j.*, i.*
from A540769.tPer14 t
join sysibm.sysIndexes i
on i.tbCreator = t.cr and i.tbName = t.nm
and i.clustering = 'Y'
join A540769.tPer14 j
on i.creator = j.cr and i.Name = j.nm and j.type = 'i'
where t.type in ('t', 'u')
order by 1, t.cr, t.nm, j.cr, j.nm
}¢--- DSN.TX.CASE(PER14DDL) cre=2011-09-30 mod=2016-06-20-17.17.32 A540769 -----
------------$-¢right(userid() sysvar(sysnode) date(s) time(), 60, '-')$!
-- testCase $dsn
-- env $env phase $phase
-- subsys $dbSys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
$@/wsh/
if $phase <= 1 then $@=¢
drop tablespace $db.aper14;
commit;
$!
if $phase = 1 then $@=¢
------------------------------------------------------------------------
CREATE TABLESPACE aper14
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
segsize 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255
; ---------------------------------------------------------------------
CREATE TABLE $creator.tqz91per14
( cr varchar(128) not null
, nm varchar(128) not null
, type char(1) not null
, keys smallint not null
, kNos varchar(400) not null
, kNames varchar(2000) not null
)
IN $db.aper14
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE ;
CREATE unique INDEX $creator.Iqz91per14i1
ON $creator.tqz91per14
(cr, nm, keys, kNos)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
cluster
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES ;
commit;
$!
if $phase = 2 then $@=¢
delete from $creator.tqz91per14;
insert into $creator.tqz91per14
select creator, name, 'i', 0, '', ''
from sysibm.sysIndexes;
$@do cx=1 to 50 $@=¢
update $creator.tqz91per14 p
set keys = $cx,
kNos = $-¢if($cx=1, "", "kNos || ")$!
(select strip(char(k.colno)) || k.ordering
from sysibm.sysKeys k
where k.ixCreator = p.cr
and k.ixName = p.nm
and k.colSeq = $cx) ,
kNames = $-¢if($cx=1, "", "kNames || ',' ||")$!
(select strip(k.colName) || ' ' || k.ordering
from sysibm.sysKeys k
where k.ixCreator = p.cr
and k.ixName = p.nm
and k.colSeq = $cx)
where type = 'i' and keys = $-¢$cx-1$!
and exists (select 1
from sysibm.sysKeys k
where k.ixCreator = p.cr
and k.ixName = p.nm
and k.colSeq = $cx)
;
$!
commit;
$!
if $phase = 3 then $@=¢
delete from $creator.tqz91per14 where type = 't';
insert into $creator.tqz91per14
select t.creator, t.name, 't', 0, '', ''
from sysibm.sysTables t
join sysibm.sysTableSpace s
on t.dbName = s.dbName and t.tsName = s.name
where t.type = 'T' and s.partitions > 0 and partkeyColNum > 0;
$@do cx=1 to 20 $@=¢
update $creator.tqz91per14 p
set keys = $cx,
kNos = $-¢if($cx=1, "", "kNos || ")$!
(select strip(char(c.colno)) || c.partKey_ordering
from sysibm.sysColumns c
where c.tbCreator = p.cr
and c.tbName = p.nm
and c.partKey_colSeq = $cx) ,
kNames = $-¢if($cx=1, "", "kNames || ',' ||")$!
(select strip(c.name) || ' ' || c.partKey_ordering
from sysibm.sysColumns c
where c.tbCreator = p.cr
and c.tbName = p.nm
and c.partKey_colSeq = $cx)
where type = 't' and keys = $-{$cx-1}
and exists (select 1
from sysibm.sysColumns c
where c.tbCreator = p.cr
and c.tbName = p.nm
and c.partKey_colSeq = $cx)
;
$!
commit;
$!
if $phase = 4 then $@=¢
delete from $creator.tqz91per14 where type = 'u';
insert into $creator.tqz91per14
select t.creator, t.name, 'u', q.keys, q.kNos, q.kNames
from sysibm.sysTables t
join sysibm.sysTableSpace s
on t.dbName = s.dbName and t.tsName = s.name
join sysibm.sysTablePart p
on t.dbName = p.dbName and t.tsName = p.tsName
and p.partition = 1
join $creator.tqz91per14 q
on q.cr = p.ixCreator and q.nm = p.ixName
where t.type = 'T' and s.partitions > 0 and partkeyColNum = 0;
;
commit;
$!
$/wsh/
}¢--- DSN.TX.CASE(PER14RUN) cre= mod= ------------------------------------------
//A540769M JOB (CP00,KE50),'DB2 ru',
// TIME=1440,REGION=0M,SCHENV=DB2ALL,CLASS=M1,
// MSGCLASS=T,NOTIFY=&SYSUID
//*
//* ux utility generator ru
//* who RZ4 DP4G A540769 2
//* 20.06.16 17:18:46 A540769M
//*
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DP4G,'A540769M.UXUTIL'),
// REGION=0M
//SYSPRINT DD SYSOUT=*
//*YSPRINT DD DSN=DSN.JOBRUN.A540769M.STEP1.#DT#,
//* DISP=(NEW,CATLG,CATLG),MGMTCLAS=BAT#NW,DSNTYPE=LARGE,
//* DCB=(RECFM=FB,LRECL=132,DSORG=PS),SPACE=(CYL,(1,1000))
//SYSUDUMP DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DP4G.DBAA.LISTDEF(TEMPL)
//UTPRINT DD SYSOUT=*
//RNPRIN01 DD SYSOUT=*
//STPRIN01 DD SYSOUT=*
//INDUMMY DD DUMMY
//SYSIN DD *
-- OPTIONS PREVIEW
LISTDEF TSLIST
INCLUDE TABLESPACE QZ92A1T.APER14
---- runstats ----------------------------------------------------------
RUNSTATS TABLESPACE LIST TSLIST
SHRLEVEL CHANGE
INDEX(ALL) KEYCARD FREQVAL NUMCOLS 9 COUNT 10 MOST
}¢--- DSN.TX.CASE(PER14SEL) cre=2011-09-30 mod=2011-09-30-13.17.24 A540769 -----
select *
from sysibm.sysTables t
join sysibm.sysTableSpace s
on t.dbName = s.dbName and t.tsName = s.name
where partitions > 0 and t.type = 'T'
and not exists (select 1
from A540769.tPer14 q
where q.cr = t.creator and q.nm = t.name
and q.type in ('t', 'u')
)
;;;
select *
from A540769.tPer14
where type = 'u'
order by cr, nm
}¢--- DSN.TX.CASE(PER15) cre=2011-11-14 mod=2014-09-26-09.26.03 A540769 --------
* row change timestamp
* 1) ohne row change column ==> page scope |
=txtL=128
creDb trg 0
+ ok creDb DSN.TX.GENF(PER15t0) ::f
creDb src 1
+ ok creDb DSN.TX.GENF(PER15s1) ::f
manual per15upd: check row change timestamp und update ==> page level
+ wait per15upd: check row change timestamp und update ==> page level
* add row change column
creDb src 2
* 2) mit row change column ==> row scope |
* (sofort, noch in aReo*
manual per15upd: check row change timestamp und update ==> page level
manual per15reo: * jetzt sind alle change tst in der column
}¢--- DSN.TX.CASE(PER15ALT) cre=2014-09-26 mod=2014-09-26-09.37.25 A540769 -----
alter table QTXCRY.tPer15
alter rowCha set generated always
-- FOR EACH ROW ON UPDATE AS ROW CHANGE TIMESTAMP
;
}¢--- DSN.TX.CASE(PER15B) cre=2013-01-15 mod=2014-09-26-09.26.19 A540769 -------
* add row change timestamp to table
=txtL=128
creDb trg 1
+ ok creDb DSN.TX.GENF(PER15t1) ::f
manual per15upd: check row change timestamp und update ==> page level
+ ok per15upd: check row change timestamp und update ==> page level
* add row change column
creDb src 1
+ ok creDb DSN.TX.GENF(PER15s1) ::f
creDb src 2
+ ok creDb DSN.TX.GENF(PER15s2) ::f
* 2) mit row change column ==> row scope |
* (sofort, noch in aReo*
manual dbx c
}¢--- DSN.TX.CASE(PER15C) cre=2014-09-26 mod=2014-09-26-09.36.57 A540769 -------
* drop/recrate change with row change column
=txtL=28
creDb src 1
+ ok creDb DSN.TX.GENF(PER15s1) ::f
creDb src 2
+ ok creDb DSN.TX.GENF(PER15s2) ::f
=txtL=128
creDb trg 1
+ ok creDb DSN.TX.GENF(PER15t1) ::f
creDb trg 2
+ ok creDb DSN.TX.GENF(PER15t2) ::f
}¢--- DSN.TX.CASE(PER15DDL) cre=2011-11-14 mod=2014-09-26-09.36.47 A540769 -----
------------$-¢right(userid() sysvar(sysnode) date(s) time(), 60, '-')$!
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
$@/wsh/
if $phase <= 1 then $@=¢
drop tablespace $db.aper15;
commit;
$!
if $phase = 1 then $@=¢
------------------------------------------------------------------------
CREATE TABLESPACE aper15
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
segsize 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255
; ---------------------------------------------------------------------
CREATE TABLE $creator.tper15
( ix int generated always as identity
, tst timestamp not null with default
, txt varchar($txtL) not null with default
)
IN $db.aper15
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE ;
$!
if $phase = 2 then $@=¢
alter TABLE $creator.tper15
add rowCha not null generated by default
FOR EACH ROW ON UPDATE AS ROW CHANGE TIMESTAMP
;
commit
;
$!
if $phase >= 1 then $@=¢
$@do cx=1 to 10 $@=¢
insert into $creator.tper15 (txt)
select left(strip(tbCreator) || '.'
|| strip(tbName ) || '.'
|| strip(name ) || '|', $txtL)
from sysibm.syscolumns
fetch first 10 rows only
;
commit
;
$!
$!
$/wsh/
}¢--- DSN.TX.CASE(PER15REO) cre=2011-11-14 mod=2011-11-14-12.09.21 A540769 -----
//A540769Q JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBAF,'A540769Q.REORG'),
// REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DBAF.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
LISTDEF LST#REO INCLUDE TABLESPACE DA540769.APER15
REORG TABLESPACE LIST LST#REO
LOG NO
SORTDATA
COPYDDN(TCOPYD)
SHRLEVEL CHANGE
MAPPINGTABLE S100447.MAPTAB03
MAXRO 300
DRAIN ALL
DELAY 1500
TIMEOUT TERM
UNLDDN TSRECD
UNLOAD CONTINUE
PUNCHDDN TPUNCH
DISCARDDN TDISCA
SORTKEYS
SORTDEVT DISK
STATISTICS
INDEX ALL KEYCARD
REPORT NO UPDATE ALL
}¢--- DSN.TX.CASE(PER15RID) cre=2014-09-29 mod=2014-09-29-10.24.36 A540769 -----
delete from qtxcrx.tper15 d
where exists (select 1 from qtxcrx.tper15 q
where d.txt = q.txt and rid(q) > rid(d)
)
;
rollback
;x;
select count(*)
from t s
where not exists (select 1 from qtxcrx.tper15 q
where s.txt = q.txt and rid(q) > s.ridT
with t as
(
select t.*, rid(t) ridT
from qtxcrx.tper15 t
)
select count(*)
from t s
where not exists (select 1 from qtxcrx.tper15 q
where s.txt = q.txt and rid(q) > s.ridT
)
;y;
select count(*) "cnt", min(rid(t)) "ridMin", max(rid(t)), txt
from qtxcrx.tper15 t
group by txt
}¢--- DSN.TX.CASE(PER15SEL) cre=2011-11-14 mod=2011-11-14-12.08.43 A540769 -----
select ix, hex(rid(t)), row change timestamp for t,
row change token for t,
tst, txt
from A540769.tper15 t
}¢--- DSN.TX.CASE(PER15UPD) cre=2011-11-14 mod=2013-08-07-09.38.30 A540769 -----
insert into A540769.tper15 (txt ) values ('insert jetzt');
select ix, hex(rid(t)), row change timestamp for t, tst, txt
from A540769.tper15 t
;
update A540769.tper15 t set txt = strip(left(txt,80)) || '--update--'
|| char(current timestamp)
-- where mod(ix, 50) = 5
;
select ix, hex(rid(t)), row change timestamp for t, tst, txt
from A540769.tper15 t
;
}¢--- DSN.TX.CASE(PER15UP2) cre=2011-11-14 mod=2011-11-14-12.00.27 A540769 -----
select ix, hex(rid(t)), row change timestamp for t, rowCha, tst, txt
from A540769.tper15 t
;
update A540769.tper15 t set txt = strip(left(txt,80)) || '--update--'
|| char(current timestamp)
where mod(ix, 50) = 5
;
select ix, hex(rid(t)), row change timestamp for t, rowCha, tst, txt
from A540769.tper15 t
;
}¢--- DSN.TX.CASE(PER16) cre=2012-02-06 mod=2012-02-06-13.40.15 A540769 --------
* check locking
=txLe=50
credb trg 1
+ ok creDb DSN.TX.GENF(PER16t1) ::f
}¢--- DSN.TX.CASE(PER16DDL) cre=2012-02-04 mod=2012-02-06-13.39.47 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
$=cr2=$creator
SET CURRENT SQLID='S100447';
drop tablespace $db.aPer16;
-- drop table $creator.tPer16;
commit;
------------------------------------------------------------------------
CREATE TABLESPACE aPer16
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
SEGSIZE 64
BUFFERPOOL BP2
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
locksize row
MAXROWS 255
;
commit;
CREATE TABLE $creator.tPer16
(a int NOT NULL
,b int NOT NULL
,c int NOT NULL
,text CHAR($txLe) NOT NULL with default
) in $db.aPer16;
--------------------------------------------------------------
CREATE INDEX $creator.IPer16A
ON $creator.tPer16
(a, c)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
CREATE INDEX $creator.IPer16b
ON $creator.tPer16
(b, c)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
commit;
insert into $creator.tPer16
select 0, 0, row_number() over (), 'ini0'
from sysibm.sysColumns fetch first 10 rows only;
insert into $creator.tPer16
select a.c, b.c, c.c, 'ini2'
from $creator.tPer16 a, $creator.tPer16 b, $creator.tPer16 c;
commit;
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(PER16INS) cre=2012-02-04 mod=2012-02-06-07.58.15 A540769 -----
//A540769I JOB (CP00,KE50),'DB2 REO', 00010000
// MSGCLASS=T,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M 00030000
//*MAIN SYSTEM=S13,CLASS=LOG0 00040000
//*
//S1 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99, 00020001
// PARM='WSH'
//SYSPROC DD DSN=A540769.WK.REXX,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//OUT DD SYSOUT=*
//SYSTSIN DD DUMMY
//WSH DD *
$=subsys = DBAF
$=tb = A540769.tper16
call sqlConnect $subsys
call sqlPreAllCl 1, "select max(c) from" $tb ,
"where a=5 with rr", st, ":cx"
say 'cx' cx
m.sqlRetOk = '* say'
$@do wi=cx+1 to cx+15 $@¢
m.st.0 = 0
call sqlExec "insert into" $tb ,
"values(3, 5," wi", 'insert 3, 5," wi"')"
say "inserted" wi
call sleep 30
call sqlCommit
$!
call sqlExec "rollback"
}¢--- DSN.TX.CASE(PER16ROW) cre=2012-02-06 mod=2012-02-06-10.43.18 A540769 -----
select rid(t), hex(rid(t)), t.*
from A540769.tper16 t
where a = 1 and b=2 and c=3
;
select rid(t), hex(rid(t)), t.*
from A540769.tper16 t
where a = 5
;
select rid(t), hex(rid(t)), t.*
from A540769.tper16 t
where right(hex(rid(t)), 4) = '132A'
}¢--- DSN.TX.CASE(PER16SEL) cre=2012-02-04 mod=2012-02-06-07.47.25 A540769 -----
//A540769S JOB (CP00,KE50),'DB2 REO', 00010000
// MSGCLASS=T,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M 00030000
//*MAIN SYSTEM=S13,CLASS=LOG0 00040000
//*
//S1 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99, 00020001
// PARM='WSH'
//SYSPROC DD DSN=A540769.WK.REXX,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//OUT DD SYSOUT=*
//SYSTSIN DD DUMMY
//WSH DD *
$=subsys = DBAF
$=tb = A540769.tper16
call sqlConnect $subsys
m.sqlRetOk = '* say'
$@do wi=1 to 15 $@¢
m.st.0 = 0
call sqlPreAllCl 1, "select a, b, c, 'a=4 with rr' from" $tb ,
"where a=4 with rr",
, st, ':a, :b, :c, :t'
say 'fetched' m.st.0 a b c
call sleep 20
call sqlCommit
$!
}¢--- DSN.TX.CASE(PER16SE2) cre=2012-02-06 mod=2012-02-06-07.48.01 A540769 -----
//A540769T JOB (CP00,KE50),'DB2 REO', 00010000
// MSGCLASS=T,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M 00030000
//*MAIN SYSTEM=S13,CLASS=LOG0 00040000
//*
//S1 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99, 00020001
// PARM='WSH'
//SYSPROC DD DSN=A540769.WK.REXX,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//OUT DD SYSOUT=*
//SYSTSIN DD DUMMY
//WSH DD *
$=subsys = DBAF
$=tb = A540769.tper16
call sqlConnect $subsys
m.sqlRetOk = '* say'
$@do wi=1 to 15 $@¢
m.st.0 = 0
call sqlPreAllCl 1, "select a, b, c, 'b=4 with rr' from" $tb ,
"where b=4 with rr",
, st, ':a, :b, :c, :t'
say 'fetched' m.st.0 a b c
call sleep 20
call sqlCommit
$!
}¢--- DSN.TX.CASE(PER17) cre=2012-02-06 mod=2012-02-06-13.42.26 A540769 --------
* vergleich unload/load mit format internal / ohne
per17unI Internal unload from oa1a. tmf150a1 - 10 parts parall
per17unE External unload from oa1a. tmf150a1 - 10 parts parall
per17loD load dummy von A540769.$tmf150a1 - alle parts
per17loI load format internal into A540769.$tmf150a1 - 10 parts parall
per17loE load format external into A540769.$tmf150a1 - 10 parts parall
* Fehler produzieren
per16 tx r mit txLe=50
per17unJ
per16 tx r mit txLe=40
per17loJ
-dis db und select all, unload etc..
}¢--- DSN.TX.CASE(PER17LOD) cre=2012-02-06 mod=2012-02-06-12.04.48 A540769 -----
//A540769L JOB (CP00,KE50), 00010001
// MSGCLASS=T,TIME=1440,
// NOTIFY=A540769
//*MAIN CLASS=LOG SYSTEM=S14
//S1 EXEC PGM=DSNUTILB,PARM='DBAF,A540769L.LOAD' 00020001
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBAF.DBAA.LISTDEF(TEMPL),DISP=SHR
//INDUMMY DD DUMMY
//SYSIN DD *
LISTDEF LST INCLUDE TABLESPACE DA540769.A150A
LOAD DATA LOG NO
WORKDDN(TSYUTS, TSOUTS)
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN INDUMMY
STATISTICS INDEX(ALL KEYCARD) REPORT NO UPDATE ALL
INTO TABLE A540769.$TMF150A1
}¢--- DSN.TX.CASE(PER17LOE) cre=2012-02-06 mod=2012-02-06-12.58.48 A540769 -----
//A540769L JOB (CP00,KE50), 00010001
// MSGCLASS=T,TIME=1440,
// NOTIFY=A540769
//*MAIN CLASS=LOG SYSTEM=S14
//S1 EXEC PGM=DSNUTILB,PARM='DBAF,A540769L.LOAD' 00020001
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBAF.DBAA.LISTDEF(TEMPL),DISP=SHR
//INDUMMY DD DUMMY
//SYSIN DD *
TEMPLATE DOBJD3HG
DSN('DBAF.MF01A1A.A150A.X&PA..D120206.REC')
DISP(OLD,KEEP,KEEP)
LOAD DATA
EBCDIC CCSID(00500,00000,00000)
WORKDDN(TSYUTS, TSOUTS)
SORTDEVT DISK
INTO TABLE
"OA1A".
"TMF150A1"
PART 00004 INDDN DOBJD3HG
RESUME NO REPLACE COPYDDN(TCOPYS)
WHEN(00001:00002) = X'002A'
NUMRECS 1950588
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL(026)
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL(026)
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
, "MF150HASH"
POSITION( 00661:00662) SMALLINT
)
INTO TABLE
"OA1A".
"TMF150A1"
PART 00009 INDDN DOBJD3HG
RESUME NO REPLACE COPYDDN(TCOPYS)
WHEN(00001:00002) = X'002A'
NUMRECS 2032678
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL(026)
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL(026)
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
, "MF150HASH"
POSITION( 00661:00662) SMALLINT
)
INTO TABLE
"OA1A".
"TMF150A1"
PART 00014 INDDN DOBJD3HG
RESUME NO REPLACE COPYDDN(TCOPYS)
WHEN(00001:00002) = X'002A'
NUMRECS 2197177
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL(026)
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL(026)
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
, "MF150HASH"
POSITION( 00661:00662) SMALLINT
)
INTO TABLE
"OA1A".
"TMF150A1"
PART 00020 INDDN DOBJD3HG
RESUME NO REPLACE COPYDDN(TCOPYS)
WHEN(00001:00002) = X'002A'
NUMRECS 1961414
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL(026)
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL(026)
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
, "MF150HASH"
POSITION( 00661:00662) SMALLINT
)
INTO TABLE
"OA1A".
"TMF150A1"
PART 00051 INDDN DOBJD3HG
RESUME NO REPLACE COPYDDN(TCOPYS)
WHEN(00001:00002) = X'002A'
NUMRECS 2543199
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL(026)
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL(026)
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
, "MF150HASH"
POSITION( 00661:00662) SMALLINT
)
INTO TABLE
"OA1A".
"TMF150A1"
PART 00056 INDDN DOBJD3HG
RESUME NO REPLACE COPYDDN(TCOPYS)
WHEN(00001:00002) = X'002A'
NUMRECS 2487274
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL(026)
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL(026)
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
, "MF150HASH"
POSITION( 00661:00662) SMALLINT
)
INTO TABLE
"OA1A".
"TMF150A1"
PART 00061 INDDN DOBJD3HG
RESUME NO REPLACE COPYDDN(TCOPYS)
WHEN(00001:00002) = X'002A'
NUMRECS 2317620
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL(026)
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL(026)
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
, "MF150HASH"
POSITION( 00661:00662) SMALLINT
)
INTO TABLE
"OA1A".
"TMF150A1"
PART 00066 INDDN DOBJD3HG
RESUME NO REPLACE COPYDDN(TCOPYS)
WHEN(00001:00002) = X'002A'
NUMRECS 2455933
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL(026)
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL(026)
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
, "MF150HASH"
POSITION( 00661:00662) SMALLINT
)
INTO TABLE
"OA1A".
"TMF150A1"
PART 00071 INDDN DOBJD3HG
RESUME NO REPLACE COPYDDN(TCOPYS)
WHEN(00001:00002) = X'002A'
NUMRECS 2219334
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL(026)
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL(026)
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
, "MF150HASH"
POSITION( 00661:00662) SMALLINT
)
INTO TABLE
"OA1A".
"TMF150A1"
PART 00098 INDDN DOBJD3HG
RESUME NO REPLACE COPYDDN(TCOPYS)
WHEN(00001:00002) = X'002A'
NUMRECS 2200825
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL(026)
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL(026)
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
, "MF150HASH"
POSITION( 00661:00662) SMALLINT
)
}¢--- DSN.TX.CASE(PER17LOI) cre=2012-02-06 mod=2012-02-06-12.59.15 A540769 -----
//A540769L JOB (CP00,KE50), 00010001
// MSGCLASS=T,TIME=1440,
// NOTIFY=A540769
//*MAIN CLASS=LOG SYSTEM=S14
//S1 EXEC PGM=DSNUTILB,PARM='DBAF,A540769L.LOAD' 00020001
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBAF.DBAA.LISTDEF(TEMPL),DISP=SHR
//INDUMMY DD DUMMY
//SYSIN DD *
TEMPLATE TIN
DSN('DBAF.MF01A1A.A150A.P&PA..D120206.REC')
DISP(OLD,KEEP,KEEP)
LOAD DATA LOG NO
WORKDDN(TSYUTS, TSOUTS)
SORTDEVT DISK
FORMAT INTERNAL
INTO TABLE
A540769.$TMF150A1
PART 00004
RESUME NO REPLACE COPYDDN(TCOPYS)
INDDN TIN NUMRECS 1950588
INTO TABLE
A540769.$TMF150A1
PART 00009
RESUME NO REPLACE COPYDDN(TCOPYS)
INDDN TIN NUMRECS 2032678
INTO TABLE
A540769.$TMF150A1
PART 00014
RESUME NO REPLACE COPYDDN(TCOPYS)
INDDN TIN NUMRECS 2197177
INTO TABLE
A540769.$TMF150A1
PART 00020
RESUME NO REPLACE COPYDDN(TCOPYS)
INDDN TIN NUMRECS 1961414
INTO TABLE
A540769.$TMF150A1
PART 00051
RESUME NO REPLACE COPYDDN(TCOPYS)
INDDN TIN NUMRECS 2543199
INTO TABLE
A540769.$TMF150A1
PART 00056
RESUME NO REPLACE COPYDDN(TCOPYS)
INDDN TIN NUMRECS 2487274
INTO TABLE
A540769.$TMF150A1
PART 00061
RESUME NO REPLACE COPYDDN(TCOPYS)
INDDN TIN NUMRECS 2317620
INTO TABLE
A540769.$TMF150A1
PART 00066
RESUME NO REPLACE COPYDDN(TCOPYS)
INDDN TIN NUMRECS 2455933
INTO TABLE
A540769.$TMF150A1
PART 00071
RESUME NO REPLACE COPYDDN(TCOPYS)
INDDN TIN NUMRECS 2219334
INTO TABLE
A540769.$TMF150A1
PART 00098
RESUME NO REPLACE COPYDDN(TCOPYS)
INDDN TIN NUMRECS 2200825
}¢--- DSN.TX.CASE(PER17LOJ) cre=2012-02-06 mod=2012-02-06-13.44.30 A540769 -----
//A540769L JOB (CP00,KE50), 00010001
// MSGCLASS=T,TIME=1440,
// NOTIFY=A540769
//*MAIN CLASS=LOG ,SYSTEM=S14
//S1 EXEC PGM=DSNUTILB,PARM='DBAF,A540769L.LOAD' 00020001
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBAF.DBAA.LISTDEF(TEMPL),DISP=SHR
//*YSTEMPL DD DSN=A540769.WK.LISTDEF(TEMPL),DISP=SHR
//INDUMMY DD DUMMY
//SYSIN DD *
TEMPLATE TIN
DSN('DBAF.DA540769.APER16.P00000.D120206.REC')
DISP(OLD,KEEP,KEEP)
LOAD DATA LOG NO INDDN(TIN)
RESUME NO REPLACE COPYDDN(TCOPYS)
STATISTICS INDEX(ALL) REPORT NO UPDATE ALL
FORMAT INTERNAL
WORKDDN(TSYUTS, TSOUTS)
INTO TABLE A540769.TPER16
}¢--- DSN.TX.CASE(PER17UNE) cre=2012-02-06 mod=2012-02-06-12.00.51 A540769 -----
//A540769V JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//***************************************************
//* UNLOAD COPY
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBAF,'A540769.UNLOAC'),
// REGION=0M
//*DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSTEMPL DD DSN=DBAF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE TSRECD DSN('&SSID..&DB..&SN..X&PART..D&YE(3).&MO.&DA..REC')
DATACLAS(ENN35) MGMTCLAS(COM#A032)
SPACE TRK MAXPRIME 600
-- TPUNCH: PUNCHDDN FUER REORG UNLOAD
TEMPLATE TPUNCH DSN('&SSID..&DB..&SN..X&PART..D&YE(3).&MO.&DA..PUN')
DATACLAS(NULL8) MGMTCLAS(COM#A032)
SPACE(1,10) TRK
LISTDEF L INCLUDE TABLESPACE MF01A1A.A150A PARTLEVEL 71
INCLUDE TABLESPACE MF01A1A.A150A PARTLEVEL 61
INCLUDE TABLESPACE MF01A1A.A150A PARTLEVEL 4
INCLUDE TABLESPACE MF01A1A.A150A PARTLEVEL 20
INCLUDE TABLESPACE MF01A1A.A150A PARTLEVEL 9
INCLUDE TABLESPACE MF01A1A.A150A PARTLEVEL 66
INCLUDE TABLESPACE MF01A1A.A150A PARTLEVEL 51
INCLUDE TABLESPACE MF01A1A.A150A PARTLEVEL 56
INCLUDE TABLESPACE MF01A1A.A150A PARTLEVEL 98
INCLUDE TABLESPACE MF01A1A.A150A PARTLEVEL 14
UNLOAD LIST L
PUNCHDDN TPUNCH UNLDDN TSRECD
SHRLEVEL CHANGE ISOLATION UR
}¢--- DSN.TX.CASE(PER17UNI) cre=2012-02-06 mod=2012-02-06-12.01.33 A540769 -----
//A540769V JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//***************************************************
//* UNLOAD COPY
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBAF,'A540769.UNLOAC'),
// REGION=0M
//*DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSTEMPL DD DSN=DBAF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
//SYSIN DD *
LISTDEF L INCLUDE TABLESPACE MF01A1A.A150A PARTLEVEL 71
INCLUDE TABLESPACE MF01A1A.A150A PARTLEVEL 61
INCLUDE TABLESPACE MF01A1A.A150A PARTLEVEL 4
INCLUDE TABLESPACE MF01A1A.A150A PARTLEVEL 20
INCLUDE TABLESPACE MF01A1A.A150A PARTLEVEL 9
INCLUDE TABLESPACE MF01A1A.A150A PARTLEVEL 66
INCLUDE TABLESPACE MF01A1A.A150A PARTLEVEL 51
INCLUDE TABLESPACE MF01A1A.A150A PARTLEVEL 56
INCLUDE TABLESPACE MF01A1A.A150A PARTLEVEL 98
INCLUDE TABLESPACE MF01A1A.A150A PARTLEVEL 14
UNLOAD LIST L
PUNCHDDN TPUNCH UNLDDN TSRECD
FORMAT INTERNAL
SHRLEVEL CHANGE ISOLATION UR
}¢--- DSN.TX.CASE(PER17UNJ) cre=2012-02-06 mod=2012-02-06-15.58.59 A540769 -----
//A540769V JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//***************************************************
//* UNLOAD COPY
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBAF,'A540769.UNLOAC'),
// REGION=0M
//*DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSTEMPL DD DSN=DBAF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
-- UNLOAD TABLESPACE DA540769.APER16
UNLOAD FROM TABLE A540769.TPER16
WHEN ( A > 5)
PUNCHDDN TPUNCH UNLDDN TSRECD
FORMAT INTERNAL
SHRLEVEL CHANGE ISOLATION UR
}¢--- DSN.TX.CASE(PER18) cre=2012-05-16 mod=2012-05-16-08.04.58 A540769 --------
credb trg 1
+ ok creDb DSN.TX.GENF(PER18t1) ::f
}¢--- DSN.TX.CASE(PER18DDL) cre=2012-05-16 mod=2012-05-16-08.04.52 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
$=cr2=$creator
SET CURRENT SQLID='S100447';
drop tablespace $db.aper18;
-- drop table $creator.tper18;
commit;
------------------------------------------------------------------------
CREATE TABLESPACE aper18
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
SEGSIZE 64
BUFFERPOOL BP2
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
locksize row
MAXROWS 255
;
commit;
CREATE TABLE $creator.tper18
(k3 char(3) NOT NULL
,k9 char(9) NOT NULL
,d3 char(3) NOT NULL
,d9 char(9) NOT NULL
) in $db.aper18 volatile;
--------------------------------------------------------------
CREATE INDEX $creator.Iper18A
ON $creator.tper18
(k3)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
CREATE INDEX $creator.Iper18b
ON $creator.tper18
(k9)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
commit;
insert into $creator.tper18 values('abc', 'abc' , 'abc', 'abc');
insert into $creator.tper18 values('abc', 'abcabc', 'abc', 'abcabc');
insert into $creator.tper18 values('abc', 'abcefg', 'abc', 'abcefg');
insert into $creator.tper18 values('xyz', 'xyz' , 'xyz', 'xyz');
insert into $creator.tper18 values('xyz', 'xyzxyz', 'xyz', 'xyzxyz');
insert into $creator.tper18 values('xyz', 'xyzefg', 'xyz', 'xyzefg');
select *
from $creator.tper18;
commit;
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(PER18EXP) cre=2012-05-16 mod=2012-05-16-08.46.35 A540769 -----
--- temporary explain --------------------------------------------------
set current sqlid = 'A540769';
delete from A540769.plan_table;
delete from A540769.DSN_STATEMNT_TABLE;
delete from A540769.DSN_DetCost_TABLE ;
delete from A540769.dsn_filter_Table ;
delete from A540769.dsn_predicat_table;
explain plan set queryno = 3 for
select a.k3, b.d9
from tper18 a, tper18 b
where a.k3 = b.d9 and b.k9 = 'xyzxyz'
;
explain plan set queryno = 9 for
select a.k9, b.d3
from tper18 a, tper18 b
where a.k9 = b.d3
;
explain plan set queryno = 11 for
select a.k3, b.k9
from tper18 a, tper18 b
where a.k3 = b.k9 and b.d9 = 'xyzxyz'
;
select * from plan_view1
order by -- collid, progName, version, bind_time,
queryNo, qblockno, planno, mixOpSeq
;
select * from plan_view2
order by -- collid, progName, version, bind_time,
queryNo, qblockno, planno, mixOpSeq
;
select * from plan_view2det
order by -- collid, progName, version, bind_time,
queryNo, qblockno, planno, mixOpSeq
;
select *
from plan_viewPred
order by --collid, progName, applName, explain_time,
queryNo, qBlockNo, planno,
stage, predNo
with ur
;
rollback
;;;;
}¢--- DSN.TX.CASE(PER18RUN) cre=2012-05-16 mod=2012-05-16-08.19.26 A540769 -----
//A540769U JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBAF
//*
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBAF,'A540769U.RUNSTA'),
// REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
LISTDEF LSTA
INCLUDE TABLESPACE DA540769.APER18
OPTIONS EVENT (ITEMERROR, SKIP)
RUNSTATS TABLESPACE LIST LSTA
SHRLEVEL CHANGE
INDEX(ALL KEYCARD) -- FREQVAL NUMCOLS 99 COUNT 10)
REPORT NO UPDATE ALL
}¢--- DSN.TX.CASE(PER18SEL) cre=2012-05-16 mod=2012-05-16-10.36.15 A540769 -----
select a.k3, b.d9
from tper18 a, tper18 b
where a.k3 = b.d9 and a.k9 = 'xyzxyz'
;
select a.k9, b.d3
from tper18 a, tper18 b
where a.k9 = b.d3
;
select a.k9, b.d3
from tper18 a, tper18 b
WHERE CAST(A.K9 AS CHAR(3))=B.D3
}¢--- DSN.TX.CASE(PER19) cre=2013-01-24 mod=2013-01-24-20.24.13 A540769 --------
*
* Mircos Index on Expression
*
*
*
=parts=24
* no index
credb trg 1
+ ok creDb DSN.TX.GENF(PER19t1) ::f
manual runstats, explain
+ ok t runstats, explain
* with NPI
credb trg 2
+ ok creDb DSN.TX.GENF(PER19t2) ::f
manual rebuild, explain
+ ok t rebuild, explain
* with DPSI
credb trg 3
+ ok creDb DSN.TX.GENF(PER19t3) ::f
manual rebuild, explain
+ wait rebuild, explain
}¢--- DSN.TX.CASE(PER19DDL) cre=2013-01-24 mod=2013-01-24-17.56.28 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
------------------------------------------------------------------------
$@¢
if $phase <= 1 then $@=¢
drop tablespace $db.aPER19;
commit;
$!
if $phase = 1 then $@=¢
drop tablespace $db.aPER19;
commit;
CREATE TABLESPACE aper19
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
numparts $parts
dssize 16 G
BUFFERPOOL BP2
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
locksize row
MAXROWS 255
;
commit;
CREATE TABLE $creator.tPER19
(EN1PART INTEGER NOT NULL,
EA1FAMILY CHAR(20) FOR SBCS DATA NOT NULL
WITH DEFAULT,
EA1DOKTYPE CHAR(16) FOR SBCS DATA NOT NULL
WITH DEFAULT,
EA1ATRN CHAR(20) FOR SBCS DATA WITH DEFAULT NULL,
ET1SEOCC TIMESTAMP (6) WITHOUT TIME ZONE
WITH DEFAULT NULL,
EN1ENTERTAG CHAR(20) FOR SBCS DATA WITH DEFAULT NULL,
data varCHAR(2000) WITH DEFAULT not NULL
) in $db.aPER19 not volatile
partition by (en1part)
( partition 1 ending at(1)
$@do px=2 to $parts $@=¢
, partition $px ending at($px)
$!
) ;
--------------------------------------------------------------
commit;
insert into $creator.tPER19
select mod(row_number() over(), $parts) + 1
, left(tbName, 20)
, left(tbCreator, 16)
, left(name , 20)
, createdTs + colNo years
, left(strip(substr(name || ' ', 6)) || strip(tbName)
, 20)
, left(repeat(strip(tbCreator) || '.' || strip(tbName)
|| '.' || strip(name) || ':' || strip(colType), 10), 1000)
from sysibm.syscolumns
;
commit;
insert into $creator.tPER19 select * from $creator.tPER19;
commit;
insert into $creator.tPER19 select * from $creator.tPER19;
commit;
insert into $creator.tPER19 select * from $creator.tPER19;
commit;
insert into $creator.tPER19 select * from $creator.tPER19;
commit;
$!
if $phase >= 2 then $@=¢
drop INDEX $creator.iPer19;
COMMIT;
CREATE INDEX $creator.iPer19
ON $creator.tPER19
(SUBSTR(CHAR(ET1SEOCC),1,4) ASC,
EN1ENTERTAG ASC,
EA1ATRN ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 5 PCTFREE 5
GBPCACHE CHANGED
$-¢if($phase==3, partitioned)$!
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER YES
DEFINE YES;
COMMIT;
$!
$!
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(PER19EXP) cre=2013-01-24 mod=2013-01-24-17.52.39 A540769 -----
--- temporary explain --------------------------------------------------
set current sqlid = 'A540769';
delete from A540769.plan_table;
delete from A540769.DSN_STATEMNT_TABLE;
delete from A540769.DSN_DetCost_TABLE ;
delete from A540769.dsn_filter_Table ;
delete from A540769.dsn_predicat_table;
explain plan set queryno = 3 for
SELECT DISTINCT (substr(char(A.ET1SEOCC),1,4)), A.EN1ENTERTAG
FROM A540769.tper19 A
FOR FETCH ONLY
;
select * from plan_view1
order by -- collid, progName, version, bind_time,
queryNo, qblockno, planno, mixOpSeq
;
select * from plan_view2
order by -- collid, progName, version, bind_time,
queryNo, qblockno, planno, mixOpSeq
;
select * from plan_view2det
order by -- collid, progName, version, bind_time,
queryNo, qblockno, planno, mixOpSeq
;
select *
from plan_viewPred
order by --collid, progName, applName, explain_time,
queryNo, qBlockNo, planno,
stage, predNo
with ur
;
rollback
;;;;
}¢--- DSN.TX.CASE(PER19REB) cre=2013-01-24 mod=2013-01-24-17.49.01 A540769 -----
//A540769S JOB (KEL25071,0240,,3612),'CATALOG',
//* RESTART=STEPNAME, <== FOR RESTART REMOVE * AND ENTER STEP NAME
// MSGCLASS=T,TIME=1440
//*MAIN CLASS=LOG
//*
//*
//**********************************************************************
//*
//* DB2 ADMIN GENERATED JOB - RUN REBUILD UTILITY (INDEXES)
//*
//***********************************************************ADB2UXB****
//*
//**********************************************************************
//* STEP RBLDIDX: REBUILD INDEXES
//**********************************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBAF,'A540769S.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DBAF.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
REBUILD INDEX(
(ALL) TABLESPACE DA540769.APER19
)
STATISTICS KEYCARD UPDATE ALL
SORTDEVT SYSDA
WORKDDN(TSYUTD)
}¢--- DSN.TX.CASE(PER19RUN) cre=2013-01-24 mod=2013-01-24-17.40.08 A540769 -----
//A540769R JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG0
//*
//***************************************************
//* CREATED BY : A540769
//* TIMESTAMP : 06/21/2006.10.10.05
//* ENVIRONMENT: ISPF 5.7MVS TSO
//* RELEASE : V7.4.02 08/31/2004
//* DB2 VERSION: 810
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBAF,'A540769S.RUNSTA'),
// REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
LISTDEF LSTA
INCLUDE TABLESPACE DA540769.APER19
-- INCLUDE TABLESPACE DS100447.PLANTABS
-- INCLUDE TABLESPACE VV27A1T.VDPS329
LISTDEF LSTB INCLUDE LIST LSTA BASE
LISTDEF LSTL INCLUDE LIST LSTA LOB
OPTIONS EVENT (ITEMERROR, SKIP)
RUNSTATS TABLESPACE LIST LSTA
SHRLEVEL CHANGE
INDEX(ALL KEYCARD) -- FREQVAL NUMCOLS 99 COUNT 10)
REPORT NO UPDATE ALL
}¢--- DSN.TX.CASE(PER20) cre=2013-02-04 mod=2013-02-04-16.53.44 A540769 --------
* partitionierung thb510
creDb src 2
+ ok creDb DSN.TX.GENF(PER20s2) ::f
credb trg 1
+ ok creDb DSN.TX.GENF(PER20t1) ::f
}¢--- DSN.TX.CASE(PER20COM) cre=2013-02-04 mod=2013-02-04-16.13.27 A540769 -----
with a as
(
select * from a540769.tper20
where hb510001 < '006008'
)
, p as
(
select * from oa1a.thb510a1
where hb510001 < '006008'
)
select count(*) all,
count(a.hb510001) a,
sum(case when a.hb510001 is null then 1 else 0 end) anull,
count(p.hb510001) p,
sum(case when p.hb510001 is null then 1 else 0 end) pnull,
count(a.hb510001 || p.hb510001) both,
sum(case when a.hb510001 is null then 1
when p.hb510001 is null then 1 else 0 end) apnull
from a full outer join p
on a.hb510001 = p.hb510001
and a.hb510174 = p.hb510174
and a.hb510200 = p.hb510200
and a.hb510391 = p.hb510391
and a.hb510027 = p.hb510027
and a.hb510139 = p.hb510139
and a.hb510028 = p.hb510028
and a.hb510138 = p.hb510138
and a.hb510039 = p.hb510039
and a.hb510040 = p.hb510040
and a.hb510368 = p.hb510368
with ur for read only
;x;
select count(*) all
from oa1p.thb510a1 p
where p.hb510001 < '006008'
;x;
SELECT COUNT(*) ALL,
COUNT(A.HB510001) A,
COUNT(P.HB510001) P,
COUNT(A.HB510001 || P.HB510001) BOTH
FROM A540769.TPER20 A
FULL OUTER JOIN OA1A.THB510A1 P
ON A.HB510001 = P.HB510001
AND A.HB510174 = P.HB510174
AND A.HB510200 = P.HB510200
AND A.HB510391 = P.HB510391
AND A.HB510027 = P.HB510027
AND A.HB510139 = P.HB510139
AND A.HB510028 = P.HB510028
AND A.HB510138 = P.HB510138
AND A.HB510039 = P.HB510039
AND A.HB510040 = P.HB510040
AND A.HB510368 = P.HB510368
WITH UR
}¢--- DSN.TX.CASE(PER20DDL) cre=2013-02-04 mod=2013-02-04-15.26.15 A540769 -----
--
SET CURRENT SQLID='S100447';
--
drop tablespace $db.aPER20;
commit;
$@¢
if $phase >= 1 then $@=¢
CREATE TABLESPACE aPer20
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
TRACKMOD YES
LOGGED
$@¢
if $phase = 1 then $@=¢
SEGSIZE 64
$! else if $phase = 2 then $@=¢
NUMPARTS 32
SEGSIZE 0
DSSIZE 16 G --- ????????
$!
$!
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255;
--
CREATE TABLE $creator.tper20
(HB510001 CHAR(24) FOR SBCS DATA NOT NULL,
HB510174 DATE NOT NULL,
HB510200 DATE NOT NULL,
HB510391 CHAR(2) FOR SBCS DATA NOT NULL,
HB510027 DECIMAL(31, 8) WITH DEFAULT NULL,
HB510139 CHAR(1) FOR SBCS DATA WITH DEFAULT NULL,
HB510028 DECIMAL(31, 8) WITH DEFAULT NULL,
HB510138 CHAR(1) FOR SBCS DATA WITH DEFAULT NULL,
HB510039 DECIMAL(31, 8) WITH DEFAULT NULL,
HB510040 DATE WITH DEFAULT NULL,
HB510368 DATE WITH DEFAULT NULL,
CONSTRAINT HB510001
PRIMARY KEY (HB510001,
HB510174,
HB510391))
IN $db.aPer20
$@¢
if $phase = 2 then $@=¢
PARTITION BY (HB510001 ASC)
(PARTITION 1 ENDING AT ('006008'),
PARTITION 2 ENDING AT ('006515'),
PARTITION 3 ENDING AT ('009408'),
PARTITION 4 ENDING AT ('016002'),
PARTITION 5 ENDING AT ('019301'),
PARTITION 6 ENDING AT ('023006'),
PARTITION 7 ENDING AT ('025106'),
PARTITION 8 ENDING AT ('025801'),
PARTITION 9 ENDING AT ('028806'),
PARTITION 10 ENDING AT ('035200'),
PARTITION 11 ENDING AT ('040501'),
PARTITION 12 ENDING AT ('045602'),
PARTITION 13 ENDING AT ('048604'),
PARTITION 14 ENDING AT ('051511'),
PARTITION 15 ENDING AT ('053108'),
PARTITION 16 ENDING AT ('054418'),
PARTITION 17 ENDING AT ('055409'),
PARTITION 18 ENDING AT ('057500'),
PARTITION 19 ENDING AT ('062501'),
PARTITION 20 ENDING AT ('067809'),
PARTITION 21 ENDING AT ('076507'),
PARTITION 22 ENDING AT ('082304'),
PARTITION 23 ENDING AT ('083503'),
PARTITION 24 ENDING AT ('083508'),
PARTITION 25 ENDING AT ('083514'),
PARTITION 26 ENDING AT ('083908'),
PARTITION 27 ENDING AT ('086211'),
PARTITION 28 ENDING AT ('087909'),
PARTITION 29 ENDING AT ('088211'),
PARTITION 30 ENDING AT ('088499'),
PARTITION 31 ENDING AT ('088609'),
PARTITION 32 ENDING AT ('999999'))
$!
$!
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE
APPEND NO ;
--
LABEL ON TABLE $creator.tper20 IS 'SALDODATEN BX';
--
LABEL ON $creator.tper20
(HB510368 IS 'SALDOPERIODE',
HB510040 IS 'BUCHUNGSDATUM',
HB510039 IS 'UMRECHNUNGSFAKTOR',
HB510138 IS 'VORZEICHEN FELD 28',
HB510028 IS 'SALDO BUCHWHRG',
HB510139 IS 'VORZEICHEN FELD 27',
HB510027 IS 'SALDO BESTANDESWHRG',
HB510391 IS 'SALDOART',
HB510200 IS 'GÜLTIG BIS',
HB510174 IS 'GÜLTIG AB',
HB510001 IS 'BESTANDESKEY');
--
COMMIT;
--
CREATE UNIQUE INDEX $creator.iPer20I0
ON $creator.tper20
(HB510001 ASC,
HB510174 ASC,
HB510391 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
$@¢
if $phase = 1 then $@=¢
PIECESIZE 2 G
$! else if $phase = 2 then $@=¢
partitioned --????????????
$!
$!
CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES ;
--
COMMIT;
$!
$!
}¢--- DSN.TX.CASE(PER20LOA) cre=2013-02-04 mod=2013-02-04-15.37.06 A540769 -----
//A540769W JOB (CP00,KE50),'DB2 REO', 00010000
// MSGCLASS=T,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M 00030000
//*MAIN CLASS=LOG0 00040001
//S1 EXEC PGM=DSNUTILB,PARM='DBAF,A540769L.LOAD' 00020001
//SYSMAP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSERR DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBAF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
EXEC SQL
DECLARE CUR1 CURSOR FOR
SELECT *
FROM OA1A.THB510A1
WITH UR FOR READ ONLY
ENDEXEC
LOAD DATA INCURSOR CUR1 LOG NO RESUME NO REPLACE COPYDDN(TCOPYS)
STATISTICS INDEX ALL KEYCARD UPDATE ALL
SORTDEVT DISK SORTNUM 50
WORKDDN(TSYUTS ,TSOUTS )
INTO TABLE A540769.TPER20
}¢--- DSN.TX.CASE(PER21) cre=2013-02-05 mod=2013-03-14-13.28.40 A540769 --------
* testcase tnz240 repartitionierung
* phase 1 = 60 Partitionen asIs rz2 5.2.13
* phase 2 = 64 Partitionen (minimal Variante)
* phase 3 = 128 Partitionen (minimal Variante)
* phase 3 = 128 Partitionen (minimal Variante)
* 1=with npi, 0=without
=ini=DSN.TX.CASE(INIDBTF)
= npi = 1
creDb src 2
+ ok creDb DSN.TX.GENF(PER21s2) ::f
creDb trg 1
+ ok creDb DSN.TX.GENF(PER21t1) ::f
manual do the tests
+ wait do the tests
creDb src 3
manual do the tests
creDb trg 3
}¢--- DSN.TX.CASE(PER21CSM) cre=2013-02-05 mod=2013-02-06-08.32.14 A540769 -----
//A540769Y JOB (CP00,KE50),'DB2 REO', 00010000
// MSGCLASS=T,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M 00030000
//*MAIN CLASS=LOG0,SYSTEM=S15 00040000
//*
//S1 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99, 00020001
// PARM='WSH'
//SYSPROC DD DSN=A540769.WK.REXX,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD DUMMY
//WSH DD *
$=pr=A540769.tmpUl.per21
call csmCopy 'RZ2/'$pr'.P00000.PUN' , $pr'.P00000.PUN'
$@do px=36 to 57 $@¢
$=py=- right($px, 5, 0)
call csmCopy 'RZ2/'$pr'.P'$py'.UNL' , $pr'.P'$py'.UNL'
$!
}¢--- DSN.TX.CASE(PER21CS2) cre=2013-02-06 mod=2013-02-06-09.28.02 A540769 -----
//A540769Z JOB (CP00,KE50),'DB2 REO', 00010000
// MSGCLASS=T,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M 00030000
//*MAIN CLASS=LOG0,SYSTEM=S14 00040000
//*
//S1 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99, 00020001
// PARM='WSH'
//SYSPROC DD DSN=A540769.WK.REXX,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD DUMMY
//WSH DD *
$=pr=A540769.tmpUl.per21
call csmCopy 'RZ2/'$pr'.P00036.UNL' , $pr'.P00036.UNL'
call csmCopy 'RZ2/'$pr'.P00037.UNL' , $pr'.P00037.UNL'
call csmCopy 'RZ2/'$pr'.P00038.UNL' , $pr'.P00038.UNL'
call csmCopy 'RZ2/'$pr'.P00040.UNL' , $pr'.P00040.UNL'
call csmCopy 'RZ2/'$pr'.P00041.UNL' , $pr'.P00041.UNL'
}¢--- DSN.TX.CASE(PER21CS3) cre=2013-02-06 mod=2013-02-06-09.48.00 A540769 -----
$#@
$=pr=A540769.tmpUl.per21
call csmCopy 'RZ2/'$pr'.P00000.PUN' , $pr'.tst1'
}¢--- DSN.TX.CASE(PER21CUT) cre=2013-03-13 mod=2013-03-13-13.37.47 A540769 -----
$*( create small load files
$*)
$=old=A540769.TMPUL.PER21.P*.UNL
$=olSu=.UNL
$=nwSu=.UNL
call csiOpen csi, $old
do ix=1 while csiNext(csi, cs2)
nf = overlay('Q', m.cs2, pos('*', $old)-1)
ff = dsnAlloc('dd(dd1)' m.cs2)
call readDDBegin dd1
call readDD dd1, i., 5000
call readDDEnd dd1
interpret subword(ff, 2)
call writeDsn nf "shr :like('"m.cs2"')", i., ,1
end
}¢--- DSN.TX.CASE(PER21DDL) cre=2013-02-05 mod=2013-03-14-10.56.54 A540769 -----
-- testcase tnz240 repartitionierung -------------------------
set current sqlid = 'S100447';
DROP TABLESPACE $db.aPer21 ;
COMMIT ;
;
$@¢
say 'npi='$npi'|'
if $phase >= 1 then $@=¢
--
CREATE TABLESPACE aPer21
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD NO
LOGGED
$@¢
if $phase = 1 then $@=¢
DSSIZE 4 G
NUMPARTS 60
$! else if $phase = 2 then $@=¢
DSSIZE 16 G
NUMPARTS 64
$! else if $phase >= 3 then $@=¢
DSSIZE 16 G
NUMPARTS 128
$!
$!
SEGSIZE 0
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255;
--
CREATE TABLE $creator.tper21A1
(NZ240001 CHAR(50) FOR SBCS DATA NOT NULL,
NZ240002 CHAR(50) FOR SBCS DATA NOT NULL,
NZ240003 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240004 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240005 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240006 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240007 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240008 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240009 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240010 CHAR(50) FOR SBCS DATA NOT NULL,
NZ240011 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240012 CHAR(50) FOR SBCS DATA NOT NULL,
NZ240013 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240014 CHAR(50) FOR SBCS DATA NOT NULL,
NZ240015 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240016 CHAR(50) FOR SBCS DATA NOT NULL,
NZ240017 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240018 CHAR(50) FOR SBCS DATA NOT NULL,
NZ240019 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240020 CHAR(50) FOR SBCS DATA NOT NULL,
NZ240021 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240022 CHAR(50) FOR SBCS DATA NOT NULL,
NZ240023 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240024 CHAR(50) FOR SBCS DATA NOT NULL,
NZ240025 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240026 CHAR(50) FOR SBCS DATA NOT NULL,
NZ240027 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240028 CHAR(50) FOR SBCS DATA NOT NULL,
NZ240029 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240030 CHAR(26) FOR SBCS DATA NOT NULL,
NZ240031 CHAR(26) FOR SBCS DATA NOT NULL,
NZ240032 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240033 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240034 CHAR(10) FOR SBCS DATA NOT NULL,
NZ240035 VARCHAR(1000) FOR SBCS DATA NOT NULL,
NZ240036 DATE WITH DEFAULT NULL,
CONSTRAINT NZ240003
PRIMARY KEY (NZ240003))
IN $db.aPer21
$@¢
if $phase = 1 then $@=¢
$! else if $phase = 2 then $@=¢
PARTITION BY (NZ240003 ASC)
( PARTITION 1 ENDING AT (X'0002FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 2 ENDING AT (X'0005FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 3 ENDING AT (X'0009FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 4 ENDING AT (X'0011FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 5 ENDING AT (X'0015FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 6 ENDING AT (X'0019FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 7 ENDING AT (X'001DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 8 ENDING AT (X'0021FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 9 ENDING AT (X'0025FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 10 ENDING AT (X'0029FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 11 ENDING AT (X'002DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 12 ENDING AT (X'0031FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 13 ENDING AT (X'0035FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 14 ENDING AT (X'0039FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 15 ENDING AT (X'003DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 16 ENDING AT (X'0041FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 17 ENDING AT (X'0045FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 18 ENDING AT (X'0049FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 19 ENDING AT (X'004DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 20 ENDING AT (X'0051FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 21 ENDING AT (X'0055FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 22 ENDING AT (X'0059FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 23 ENDING AT (X'005DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 24 ENDING AT (X'0061FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 25 ENDING AT (X'0065FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 26 ENDING AT (X'0069FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 27 ENDING AT (X'006DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 28 ENDING AT (X'0071FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 29 ENDING AT (X'0075FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 30 ENDING AT (X'0079FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 31 ENDING AT (X'007DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 32 ENDING AT (X'0081FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 33 ENDING AT (X'0085FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 34 ENDING AT (X'0089FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 35 ENDING AT (X'008DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 36 ENDING AT (X'0091FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 37 ENDING AT (X'0095FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 38 ENDING AT (X'0099FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 39 ENDING AT (X'009DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 40 ENDING AT (X'00A1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 41 ENDING AT (X'00A5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 42 ENDING AT (X'00A9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 43 ENDING AT (X'00ADFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 44 ENDING AT (X'00B1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 45 ENDING AT (X'00B5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 46 ENDING AT (X'00B9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 47 ENDING AT (X'00BDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 48 ENDING AT (X'00C1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 49 ENDING AT (X'00C5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 50 ENDING AT (X'00C9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 51 ENDING AT (X'00CDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 52 ENDING AT (X'00D1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 53 ENDING AT (X'00D5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 54 ENDING AT (X'00D9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 55 ENDING AT (X'00DDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 56 ENDING AT (X'00E1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 57 ENDING AT (X'00E5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 58 ENDING AT (X'00E9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 59 ENDING AT (X'00EDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 60 ENDING AT (X'00EFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 61 ENDING AT (X'00F3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 62 ENDING AT (X'00F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 63 ENDING AT (X'00FBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 64 ENDING AT (X'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
)
$! else if $phase >= 3 then $@=¢
PARTITION BY (NZ240003 ASC)
( partition 1 ENDING AT (X'0001FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 2 ENDING AT (X'0003FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 3 ENDING AT (X'0005FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 4 ENDING AT (X'0007FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 5 ENDING AT (X'0009FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 6 ENDING AT (X'000BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 7 ENDING AT (X'000DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 8 ENDING AT (X'000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 9 ENDING AT (X'0011FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 10 ENDING AT (X'0013FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 11 ENDING AT (X'0015FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 12 ENDING AT (X'0017FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 13 ENDING AT (X'0019FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 14 ENDING AT (X'001BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 15 ENDING AT (X'001DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 16 ENDING AT (X'001FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 17 ENDING AT (X'0021FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 18 ENDING AT (X'0023FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 19 ENDING AT (X'0025FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 20 ENDING AT (X'0027FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 21 ENDING AT (X'0029FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 22 ENDING AT (X'002BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 23 ENDING AT (X'002DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 24 ENDING AT (X'002FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 25 ENDING AT (X'0031FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 26 ENDING AT (X'0033FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 27 ENDING AT (X'0035FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 28 ENDING AT (X'0037FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 29 ENDING AT (X'0039FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 30 ENDING AT (X'003BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 31 ENDING AT (X'003DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 32 ENDING AT (X'003FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 33 ENDING AT (X'0041FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 34 ENDING AT (X'0043FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 35 ENDING AT (X'0045FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 36 ENDING AT (X'0047FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 37 ENDING AT (X'0049FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 38 ENDING AT (X'004BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 39 ENDING AT (X'004DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 40 ENDING AT (X'004FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 41 ENDING AT (X'0051FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 42 ENDING AT (X'0053FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 43 ENDING AT (X'0055FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 44 ENDING AT (X'0057FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 45 ENDING AT (X'0059FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 46 ENDING AT (X'005BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 47 ENDING AT (X'005DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 48 ENDING AT (X'005FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 49 ENDING AT (X'0061FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 50 ENDING AT (X'0063FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 51 ENDING AT (X'0065FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 52 ENDING AT (X'0067FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 53 ENDING AT (X'0069FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 54 ENDING AT (X'006BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 55 ENDING AT (X'006DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 56 ENDING AT (X'006FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 57 ENDING AT (X'0071FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 58 ENDING AT (X'0073FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 59 ENDING AT (X'0075FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 60 ENDING AT (X'0077FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 61 ENDING AT (X'0079FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 62 ENDING AT (X'007BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 63 ENDING AT (X'007DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 64 ENDING AT (X'007FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 65 ENDING AT (X'0081FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 66 ENDING AT (X'0083FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 67 ENDING AT (X'0085FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 68 ENDING AT (X'0087FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 69 ENDING AT (X'0089FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 70 ENDING AT (X'008BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 71 ENDING AT (X'008DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 72 ENDING AT (X'008FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 73 ENDING AT (X'0091FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 74 ENDING AT (X'0093FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 75 ENDING AT (X'0095FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 76 ENDING AT (X'0097FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 77 ENDING AT (X'0099FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 78 ENDING AT (X'009BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 79 ENDING AT (X'009DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 80 ENDING AT (X'009FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 81 ENDING AT (X'00A1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 82 ENDING AT (X'00A3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 83 ENDING AT (X'00A5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 84 ENDING AT (X'00A7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 85 ENDING AT (X'00A9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 86 ENDING AT (X'00ABFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 87 ENDING AT (X'00ADFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 88 ENDING AT (X'00AFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 89 ENDING AT (X'00B1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 90 ENDING AT (X'00B3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 91 ENDING AT (X'00B5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 92 ENDING AT (X'00B7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 93 ENDING AT (X'00B9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 94 ENDING AT (X'00BBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 95 ENDING AT (X'00BDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 96 ENDING AT (X'00BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 97 ENDING AT (X'00C1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 98 ENDING AT (X'00C3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 99 ENDING AT (X'00C5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 100 ENDING AT (X'00C7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 101 ENDING AT (X'00C9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 102 ENDING AT (X'00CBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 103 ENDING AT (X'00CDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 104 ENDING AT (X'00CFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 105 ENDING AT (X'00D1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 106 ENDING AT (X'00D3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 107 ENDING AT (X'00D5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 108 ENDING AT (X'00D7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 109 ENDING AT (X'00D9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 110 ENDING AT (X'00DBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 111 ENDING AT (X'00DDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 112 ENDING AT (X'00DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 113 ENDING AT (X'00E1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 114 ENDING AT (X'00E3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 115 ENDING AT (X'00E5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 116 ENDING AT (X'00E7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 117 ENDING AT (X'00E9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 118 ENDING AT (X'00EBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 119 ENDING AT (X'00EDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 120 ENDING AT (X'00EFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 121 ENDING AT (X'00F1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 122 ENDING AT (X'00F3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 123 ENDING AT (X'00F5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 124 ENDING AT (X'00F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 125 ENDING AT (X'00F9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 126 ENDING AT (X'00FBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 127 ENDING AT (X'00FDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 128 ENDING AT (X'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
)
$!
$!
AUDIT NONE
DATA CAPTURE NONE
WITH RESTRICT ON DROP
CCSID EBCDIC
NOT VOLATILE
APPEND NO ;
--
LABEL ON TABLE $creator.tper21A1 IS 'ZV HISTO: HISTOHEADER';
--
COMMENT ON $creator.tper21A1
(NZ240035 IS 'ERGAENZENDE BESCHREIBUNG',
NZ240034 IS 'STATUS DES AUFTRAGES',
NZ240033 IS 'IDENTFIKATIONSTYPE DER ERGAENZENDEN BESCHREIBUNG',
NZ240032 IS 'IDENTIFIKTAION DES STATUSBEARBEITERS',
NZ240031 IS 'TIMESTAMP STATUS GEAENDERT',
NZ240030 IS 'TIMESTAMP ERSTELLUNGSZEITPUNKT',
NZ240029 IS 'BESCHREIBUNG SUCHWERT 10',
NZ240028 IS 'SUCHWERT 10',
NZ240027 IS 'BESCHREIBUNG SUCHWERT 09',
NZ240026 IS 'SUCHWERT 09',
NZ240025 IS 'BESCHREIBUNG SUCHWERT 08',
NZ240024 IS 'SUCHWERT 08',
NZ240023 IS 'BESCHREIBUNG SUCHWERT 07',
NZ240022 IS 'SUCHWERT 07',
NZ240021 IS 'BESCHREIBUNG SUCHWERT 06',
NZ240020 IS 'SUCHWERT 06',
NZ240019 IS 'BESCHREIBUNG SUCHWERT 05',
NZ240018 IS 'SUCHWERT 05',
NZ240017 IS 'BESCHREIBUNG SUCHWERT 04',
NZ240016 IS 'SUCHWERT 04',
NZ240015 IS 'BESCHREIBUNG SUCHWERT 03',
NZ240014 IS 'SUCHWERT 03',
NZ240013 IS 'BESCHREIBUNG SUCHWERT 02',
NZ240012 IS 'SUCHWERT 02',
NZ240011 IS 'BESCHREIBUNG SUCHWERT 01',
NZ240010 IS 'SUCHWERT 01',
NZ240009 IS 'IDENTIFIKATION DES EINGANGSKANAL',
NZ240008 IS 'LIEFERANT/ SYSTEM',
NZ240007 IS 'GESCHAEFTSFALLOBJEKTART',
NZ240006 IS 'IDENTIFIKTAION DES OWNERS',
NZ240005 IS 'STATUSINFORMATION',
NZ240004 IS 'DB-VIEW IDENTIFIKATION',
NZ240003 IS 'TABELLEN ID IN WELCHER SICH DER DATENTEIL BEFINDET',
NZ240002 IS 'REFERENZNUMMER DES PARENT VOM SENDEOBJEKTES',
NZ240001 IS 'REFERENZNUMMER DES SENDEOBJEKTES');
--
LABEL ON $creator.tper21A1
(NZ240035 IS 'HEADERDESC',
NZ240034 IS 'ORDERSTATE',
NZ240033 IS 'HEADERDESCTYPE',
NZ240032 IS 'CHANGEID',
NZ240031 IS 'CHANGEDATETIME',
NZ240030 IS 'CREATEDATETIME',
NZ240029 IS 'SEARCHTYPE10',
NZ240028 IS 'SEARCHVALUE10',
NZ240027 IS 'SEARCHTYPE09',
NZ240026 IS 'SEARCHVALUE09',
NZ240025 IS 'SEARCHTYPE08',
NZ240024 IS 'SEARCHVALUE08',
NZ240023 IS 'SEARCHTYPE07',
NZ240022 IS 'SEARCHVALUE07',
NZ240021 IS 'SEARCHTYPE06',
NZ240020 IS 'SEARCHVALUE06',
NZ240019 IS 'SEARCHTYPE05',
NZ240018 IS 'SEARCHVALUE05',
NZ240017 IS 'SEARCHTYPE04',
NZ240016 IS 'SEARCHVALUE04',
NZ240015 IS 'SEARCHTYPE03',
NZ240014 IS 'SEARCHVALUE03',
NZ240013 IS 'SEARCHTYPE02',
NZ240012 IS 'SEARCHVALUE02',
NZ240011 IS 'SEARCHTYPE01',
NZ240010 IS 'SEARCHVALUE01',
NZ240009 IS 'OWNERCHANNEL',
NZ240008 IS 'DELIVERERID',
NZ240007 IS 'OBJTYPE',
NZ240006 IS 'OWNERID',
NZ240005 IS 'STATUS',
NZ240004 IS 'DBVIEWID',
NZ240003 IS 'HEADERUWI',
NZ240002 IS 'PARENTREFID',
NZ240001 IS 'REFID');
--
CREATE UNIQUE INDEX $creator.iper21A0
ON $creator.tper21A1
(NZ240003 ASC)
$@¢
if $phase > 1 then $@=¢
PARTITIONED
$! else if $phase = 1 then $@=¢
( PARTITION 1 ENDING AT (X'0002FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 2 ENDING AT (X'0005FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 3 ENDING AT (X'0009FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 4 ENDING AT (X'0011FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 5 ENDING AT (X'0015FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 6 ENDING AT (X'0019FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 7 ENDING AT (X'001DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 8 ENDING AT (X'0021FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 9 ENDING AT (X'0025FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 10 ENDING AT (X'0029FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 11 ENDING AT (X'002DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 12 ENDING AT (X'0031FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 13 ENDING AT (X'0035FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 14 ENDING AT (X'0039FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 15 ENDING AT (X'003DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 16 ENDING AT (X'0041FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 17 ENDING AT (X'0045FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 18 ENDING AT (X'0049FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 19 ENDING AT (X'004DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 20 ENDING AT (X'0051FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 21 ENDING AT (X'0055FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 22 ENDING AT (X'0059FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 23 ENDING AT (X'005DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 24 ENDING AT (X'0061FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 25 ENDING AT (X'0065FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 26 ENDING AT (X'0069FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 27 ENDING AT (X'006DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 28 ENDING AT (X'0071FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 29 ENDING AT (X'0075FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 30 ENDING AT (X'0079FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 31 ENDING AT (X'007DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 32 ENDING AT (X'0081FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 33 ENDING AT (X'0085FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 34 ENDING AT (X'0089FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 35 ENDING AT (X'008DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 36 ENDING AT (X'0091FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 37 ENDING AT (X'0095FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 38 ENDING AT (X'0099FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 39 ENDING AT (X'009DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 40 ENDING AT (X'00A1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 41 ENDING AT (X'00A5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 42 ENDING AT (X'00A9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 43 ENDING AT (X'00ADFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 44 ENDING AT (X'00B1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 45 ENDING AT (X'00B5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 46 ENDING AT (X'00B9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 47 ENDING AT (X'00BDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 48 ENDING AT (X'00C1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 49 ENDING AT (X'00C5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 50 ENDING AT (X'00C9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 51 ENDING AT (X'00CDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 52 ENDING AT (X'00D1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 53 ENDING AT (X'00D5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 54 ENDING AT (X'00D9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 55 ENDING AT (X'00DDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 56 ENDING AT (X'00E1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 57 ENDING AT (X'00E5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 58 ENDING AT (X'00E9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 59 ENDING AT (X'00EDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 60 ENDING AT (X'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
)
$!
$!
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES;
--
$@¢
if $npi then $@=¢
CREATE INDEX $creator.iper21A1
ON $creator.tper21A1
(NZ240001 ASC,
NZ240005 ASC,
NZ240034 ASC,
NZ240006 ASC,
NZ240008 ASC,
NZ240009 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
--
CREATE INDEX $creator.iper21A2
ON $creator.tper21A1
(NZ240010 ASC,
NZ240012 ASC,
NZ240014 ASC,
NZ240005 ASC,
NZ240034 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
--
CREATE INDEX $creator.iper21A3
ON $creator.tper21A1
(NZ240006 ASC,
NZ240012 ASC,
NZ240014 ASC,
NZ240005 ASC,
NZ240034 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
--
CREATE INDEX $creator.iper21A4
ON $creator.tper21A1
(NZ240028 ASC,
NZ240007 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 4 G;
--
CREATE INDEX $creator.iper21A5
ON $creator.tper21A1
(NZ240022 ASC,
NZ240012 ASC,
NZ240014 ASC,
NZ240005 ASC,
NZ240034 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
$!
$!
--
CREATE VIEW $creator.VNZ240A1V(REFID,
PARENTREFID, HEADERUWI, DBVIEWID,
STATUS, PURGEDATE, OWNERID, OBJTYPE, DELIVERERID, OWNERCHANNEL,
SEARCHVALUE01, SEARCHTYPE01, SEARCHVALUE02, SEARCHTYPE02,
SEARCHVALUE03, SEARCHTYPE03, SEARCHVALUE04, SEARCHTYPE04,
SEARCHVALUE05, SEARCHTYPE05, SEARCHVALUE06, SEARCHTYPE06,
SEARCHVALUE07, SEARCHTYPE07, SEARCHVALUE08, SEARCHTYPE08,
SEARCHVALUE09, SEARCHTYPE09, SEARCHVALUE10, SEARCHTYPE10,
CREATEDATETIME, CHANGEDATETIME, CHANGEID, HEADERDESCTYPE,
ORDERSTATE, HEADERDESC) AS
SELECT ALL NZ240001, NZ240002, NZ240003, NZ240004, NZ240005,
NZ240036, NZ240006, NZ240007, NZ240008, NZ240009, NZ240010,
NZ240011, NZ240012, NZ240013, NZ240014, NZ240015, NZ240016,
NZ240017, NZ240018, NZ240019, NZ240020, NZ240021, NZ240022,
NZ240023, NZ240024, NZ240025, NZ240026, NZ240027, NZ240028,
NZ240029, NZ240030, NZ240031, NZ240032, NZ240033, NZ240034,
NZ240035
FROM $creator.tper21A1 ;
--
COMMIT;
$!
$!
}¢--- DSN.TX.CASE(PER21DD1) cre=2013-02-13 mod=2013-02-13-13.18.16 A540769 -----
-- testcase tnz240 repartitionierung -------------------------
set current sqlid = 'S100447';
DROP TABLESPACE $db.aPer21 ;
COMMIT ;
;
$@¢
say 'npi='$npi'|'
if $phase >= 1 then $@=¢
--
CREATE TABLESPACE aPer21
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD NO
LOGGED
$@¢
if $phase = 1 then $@=¢
DSSIZE 4 G
NUMPARTS 60
$! else if $phase = 2 then $@=¢
DSSIZE 16 G
NUMPARTS 64
$! else if $phase >= 3 then $@=¢
DSSIZE 16 G
NUMPARTS 128
$!
$!
SEGSIZE 0
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255;
--
CREATE TABLE $creator.tper21A1
(NZ240001 CHAR(50) FOR SBCS DATA NOT NULL,
NZ240002 CHAR(50) FOR SBCS DATA NOT NULL,
NZ240003 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240004 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240005 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240006 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240007 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240008 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240009 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240010 CHAR(50) FOR SBCS DATA NOT NULL,
NZ240011 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240012 CHAR(50) FOR SBCS DATA NOT NULL,
NZ240013 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240014 CHAR(50) FOR SBCS DATA NOT NULL,
NZ240015 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240016 CHAR(50) FOR SBCS DATA NOT NULL,
NZ240017 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240018 CHAR(50) FOR SBCS DATA NOT NULL,
NZ240019 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240020 CHAR(50) FOR SBCS DATA NOT NULL,
NZ240021 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240022 CHAR(50) FOR SBCS DATA NOT NULL,
NZ240023 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240024 CHAR(50) FOR SBCS DATA NOT NULL,
NZ240025 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240026 CHAR(50) FOR SBCS DATA NOT NULL,
NZ240027 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240028 CHAR(50) FOR SBCS DATA NOT NULL,
NZ240029 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240030 CHAR(26) FOR SBCS DATA NOT NULL,
NZ240031 CHAR(26) FOR SBCS DATA NOT NULL,
NZ240032 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240033 CHAR(20) FOR SBCS DATA NOT NULL,
NZ240034 CHAR(10) FOR SBCS DATA NOT NULL,
NZ240035 VARCHAR(1000) FOR SBCS DATA NOT NULL,
NZ240036 DATE WITH DEFAULT NULL,
CONSTRAINT NZ240003
PRIMARY KEY (NZ240003))
IN $db.aPer21
$@¢
if $phase = 1 then $@=¢
$! else if $phase = 2 then $@=¢
PARTITION BY (NZ240003 ASC)
( PARTITION 1 ENDING AT (X'0002FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 2 ENDING AT (X'0005FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 3 ENDING AT (X'0009FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 4 ENDING AT (X'0011FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 5 ENDING AT (X'0015FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 6 ENDING AT (X'0019FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 7 ENDING AT (X'001DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 8 ENDING AT (X'0021FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 9 ENDING AT (X'0025FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 10 ENDING AT (X'0029FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 11 ENDING AT (X'002DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 12 ENDING AT (X'0031FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 13 ENDING AT (X'0035FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 14 ENDING AT (X'0039FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 15 ENDING AT (X'003DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 16 ENDING AT (X'0041FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 17 ENDING AT (X'0045FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 18 ENDING AT (X'0049FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 19 ENDING AT (X'004DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 20 ENDING AT (X'0051FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 21 ENDING AT (X'0055FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 22 ENDING AT (X'0059FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 23 ENDING AT (X'005DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 24 ENDING AT (X'0061FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 25 ENDING AT (X'0065FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 26 ENDING AT (X'0069FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 27 ENDING AT (X'006DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 28 ENDING AT (X'0071FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 29 ENDING AT (X'0075FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 30 ENDING AT (X'0079FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 31 ENDING AT (X'007DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 32 ENDING AT (X'0081FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 33 ENDING AT (X'0085FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 34 ENDING AT (X'0089FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 35 ENDING AT (X'008DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 36 ENDING AT (X'0091FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 37 ENDING AT (X'0095FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 38 ENDING AT (X'0099FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 39 ENDING AT (X'009DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 40 ENDING AT (X'00A1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 41 ENDING AT (X'00A5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 42 ENDING AT (X'00A9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 43 ENDING AT (X'00ADFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 44 ENDING AT (X'00B1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 45 ENDING AT (X'00B5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 46 ENDING AT (X'00B9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 47 ENDING AT (X'00BDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 48 ENDING AT (X'00C1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 49 ENDING AT (X'00C5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 50 ENDING AT (X'00C9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 51 ENDING AT (X'00CDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 52 ENDING AT (X'00D1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 53 ENDING AT (X'00D5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 54 ENDING AT (X'00D9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 55 ENDING AT (X'00DDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 56 ENDING AT (X'00E1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 57 ENDING AT (X'00E5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 58 ENDING AT (X'00E9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 59 ENDING AT (X'00EDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 60 ENDING AT (X'00EFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 61 ENDING AT (X'00F3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 62 ENDING AT (X'00F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 63 ENDING AT (X'00FBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 64 ENDING AT (X'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
)
$! else if $phase >= 3 then $@=¢
PARTITION BY (NZ240003 ASC)
( partition 1 ENDING AT (X'0001FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 2 ENDING AT (X'0003FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 3 ENDING AT (X'0005FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 4 ENDING AT (X'0007FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 5 ENDING AT (X'0009FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 6 ENDING AT (X'000BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 7 ENDING AT (X'000DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 8 ENDING AT (X'000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 9 ENDING AT (X'0011FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 10 ENDING AT (X'0013FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 11 ENDING AT (X'0015FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 12 ENDING AT (X'0017FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 13 ENDING AT (X'0019FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 14 ENDING AT (X'001BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 15 ENDING AT (X'001DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 16 ENDING AT (X'001FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 17 ENDING AT (X'0021FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 18 ENDING AT (X'0023FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 19 ENDING AT (X'0025FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 20 ENDING AT (X'0027FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 21 ENDING AT (X'0029FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 22 ENDING AT (X'002BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 23 ENDING AT (X'002DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 24 ENDING AT (X'002FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 25 ENDING AT (X'0031FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 26 ENDING AT (X'0033FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 27 ENDING AT (X'0035FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 28 ENDING AT (X'0037FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 29 ENDING AT (X'0039FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 30 ENDING AT (X'003BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 31 ENDING AT (X'003DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 32 ENDING AT (X'003FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 33 ENDING AT (X'0041FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 34 ENDING AT (X'0043FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 35 ENDING AT (X'0045FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 36 ENDING AT (X'0047FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 37 ENDING AT (X'0049FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 38 ENDING AT (X'004BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 39 ENDING AT (X'004DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 40 ENDING AT (X'004FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 41 ENDING AT (X'0051FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 42 ENDING AT (X'0053FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 43 ENDING AT (X'0055FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 44 ENDING AT (X'0057FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 45 ENDING AT (X'0059FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 46 ENDING AT (X'005BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 47 ENDING AT (X'005DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 48 ENDING AT (X'005FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 49 ENDING AT (X'0061FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 50 ENDING AT (X'0063FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 51 ENDING AT (X'0065FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 52 ENDING AT (X'0067FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 53 ENDING AT (X'0069FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 54 ENDING AT (X'006BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 55 ENDING AT (X'006DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 56 ENDING AT (X'006FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 57 ENDING AT (X'0071FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 58 ENDING AT (X'0073FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 59 ENDING AT (X'0075FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 60 ENDING AT (X'0077FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 61 ENDING AT (X'0079FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 62 ENDING AT (X'007BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 63 ENDING AT (X'007DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 64 ENDING AT (X'007FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 65 ENDING AT (X'0081FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 66 ENDING AT (X'0083FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 67 ENDING AT (X'0085FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 68 ENDING AT (X'0087FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 69 ENDING AT (X'0089FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 70 ENDING AT (X'008BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 71 ENDING AT (X'008DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 72 ENDING AT (X'008FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 73 ENDING AT (X'0091FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 74 ENDING AT (X'0093FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 75 ENDING AT (X'0095FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 76 ENDING AT (X'0097FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 77 ENDING AT (X'0099FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 78 ENDING AT (X'009BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 79 ENDING AT (X'009DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 80 ENDING AT (X'009FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 81 ENDING AT (X'00A1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 82 ENDING AT (X'00A3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 83 ENDING AT (X'00A5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 84 ENDING AT (X'00A7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 85 ENDING AT (X'00A9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 86 ENDING AT (X'00ABFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 87 ENDING AT (X'00ADFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 88 ENDING AT (X'00AFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 89 ENDING AT (X'00B1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 90 ENDING AT (X'00B3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 91 ENDING AT (X'00B5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 92 ENDING AT (X'00B7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 93 ENDING AT (X'00B9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 94 ENDING AT (X'00BBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 95 ENDING AT (X'00BDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 96 ENDING AT (X'00BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 97 ENDING AT (X'00C1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 98 ENDING AT (X'00C3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 99 ENDING AT (X'00C5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 100 ENDING AT (X'00C7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 101 ENDING AT (X'00C9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 102 ENDING AT (X'00CBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 103 ENDING AT (X'00CDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 104 ENDING AT (X'00CFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 105 ENDING AT (X'00D1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 106 ENDING AT (X'00D3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 107 ENDING AT (X'00D5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 108 ENDING AT (X'00D7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 109 ENDING AT (X'00D9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 110 ENDING AT (X'00DBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 111 ENDING AT (X'00DDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 112 ENDING AT (X'00DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 113 ENDING AT (X'00E1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 114 ENDING AT (X'00E3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 115 ENDING AT (X'00E5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 116 ENDING AT (X'00E7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 117 ENDING AT (X'00E9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 118 ENDING AT (X'00EBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 119 ENDING AT (X'00EDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 120 ENDING AT (X'00EFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 121 ENDING AT (X'00F1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 122 ENDING AT (X'00F3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 123 ENDING AT (X'00F5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 124 ENDING AT (X'00F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 125 ENDING AT (X'00F9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 126 ENDING AT (X'00FBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 127 ENDING AT (X'00FDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
, partition 128 ENDING AT (X'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
)
$!
$!
AUDIT NONE
DATA CAPTURE NONE
WITH RESTRICT ON DROP
CCSID EBCDIC
NOT VOLATILE
APPEND NO ;
--
LABEL ON TABLE $creator.tper21A1 IS 'ZV HISTO: HISTOHEADER';
--
COMMENT ON $creator.tper21A1
(NZ240035 IS 'ERGAENZENDE BESCHREIBUNG',
NZ240034 IS 'STATUS DES AUFTRAGES',
NZ240033 IS 'IDENTFIKATIONSTYPE DER ERGAENZENDEN BESCHREIBUNG',
NZ240032 IS 'IDENTIFIKTAION DES STATUSBEARBEITERS',
NZ240031 IS 'TIMESTAMP STATUS GEAENDERT',
NZ240030 IS 'TIMESTAMP ERSTELLUNGSZEITPUNKT',
NZ240029 IS 'BESCHREIBUNG SUCHWERT 10',
NZ240028 IS 'SUCHWERT 10',
NZ240027 IS 'BESCHREIBUNG SUCHWERT 09',
NZ240026 IS 'SUCHWERT 09',
NZ240025 IS 'BESCHREIBUNG SUCHWERT 08',
NZ240024 IS 'SUCHWERT 08',
NZ240023 IS 'BESCHREIBUNG SUCHWERT 07',
NZ240022 IS 'SUCHWERT 07',
NZ240021 IS 'BESCHREIBUNG SUCHWERT 06',
NZ240020 IS 'SUCHWERT 06',
NZ240019 IS 'BESCHREIBUNG SUCHWERT 05',
NZ240018 IS 'SUCHWERT 05',
NZ240017 IS 'BESCHREIBUNG SUCHWERT 04',
NZ240016 IS 'SUCHWERT 04',
NZ240015 IS 'BESCHREIBUNG SUCHWERT 03',
NZ240014 IS 'SUCHWERT 03',
NZ240013 IS 'BESCHREIBUNG SUCHWERT 02',
NZ240012 IS 'SUCHWERT 02',
NZ240011 IS 'BESCHREIBUNG SUCHWERT 01',
NZ240010 IS 'SUCHWERT 01',
NZ240009 IS 'IDENTIFIKATION DES EINGANGSKANAL',
NZ240008 IS 'LIEFERANT/ SYSTEM',
NZ240007 IS 'GESCHAEFTSFALLOBJEKTART',
NZ240006 IS 'IDENTIFIKTAION DES OWNERS',
NZ240005 IS 'STATUSINFORMATION',
NZ240004 IS 'DB-VIEW IDENTIFIKATION',
NZ240003 IS 'TABELLEN ID IN WELCHER SICH DER DATENTEIL BEFINDET',
NZ240002 IS 'REFERENZNUMMER DES PARENT VOM SENDEOBJEKTES',
NZ240001 IS 'REFERENZNUMMER DES SENDEOBJEKTES');
--
LABEL ON $creator.tper21A1
(NZ240035 IS 'HEADERDESC',
NZ240034 IS 'ORDERSTATE',
NZ240033 IS 'HEADERDESCTYPE',
NZ240032 IS 'CHANGEID',
NZ240031 IS 'CHANGEDATETIME',
NZ240030 IS 'CREATEDATETIME',
NZ240029 IS 'SEARCHTYPE10',
NZ240028 IS 'SEARCHVALUE10',
NZ240027 IS 'SEARCHTYPE09',
NZ240026 IS 'SEARCHVALUE09',
NZ240025 IS 'SEARCHTYPE08',
NZ240024 IS 'SEARCHVALUE08',
NZ240023 IS 'SEARCHTYPE07',
NZ240022 IS 'SEARCHVALUE07',
NZ240021 IS 'SEARCHTYPE06',
NZ240020 IS 'SEARCHVALUE06',
NZ240019 IS 'SEARCHTYPE05',
NZ240018 IS 'SEARCHVALUE05',
NZ240017 IS 'SEARCHTYPE04',
NZ240016 IS 'SEARCHVALUE04',
NZ240015 IS 'SEARCHTYPE03',
NZ240014 IS 'SEARCHVALUE03',
NZ240013 IS 'SEARCHTYPE02',
NZ240012 IS 'SEARCHVALUE02',
NZ240011 IS 'SEARCHTYPE01',
NZ240010 IS 'SEARCHVALUE01',
NZ240009 IS 'OWNERCHANNEL',
NZ240008 IS 'DELIVERERID',
NZ240007 IS 'OBJTYPE',
NZ240006 IS 'OWNERID',
NZ240005 IS 'STATUS',
NZ240004 IS 'DBVIEWID',
NZ240003 IS 'HEADERUWI',
NZ240002 IS 'PARENTREFID',
NZ240001 IS 'REFID');
--
CREATE UNIQUE INDEX $creator.iper21A0
ON $creator.tper21A1
(NZ240003 ASC)
$@¢
if $phase > 1 then $@=¢
PARTITIONED
$! else if $phase = 1 then $@=¢
( PARTITION 1 ENDING AT (X'0002FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 2 ENDING AT (X'0005FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 3 ENDING AT (X'0009FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 4 ENDING AT (X'0011FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 5 ENDING AT (X'0015FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 6 ENDING AT (X'0019FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 7 ENDING AT (X'001DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 8 ENDING AT (X'0021FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 9 ENDING AT (X'0025FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 10 ENDING AT (X'0029FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 11 ENDING AT (X'002DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 12 ENDING AT (X'0031FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 13 ENDING AT (X'0035FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 14 ENDING AT (X'0039FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 15 ENDING AT (X'003DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 16 ENDING AT (X'0041FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 17 ENDING AT (X'0045FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 18 ENDING AT (X'0049FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 19 ENDING AT (X'004DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 20 ENDING AT (X'0051FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 21 ENDING AT (X'0055FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 22 ENDING AT (X'0059FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 23 ENDING AT (X'005DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 24 ENDING AT (X'0061FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 25 ENDING AT (X'0065FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 26 ENDING AT (X'0069FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 27 ENDING AT (X'006DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 28 ENDING AT (X'0071FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 29 ENDING AT (X'0075FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 30 ENDING AT (X'0079FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 31 ENDING AT (X'007DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 32 ENDING AT (X'0081FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 33 ENDING AT (X'0085FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 34 ENDING AT (X'0089FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 35 ENDING AT (X'008DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 36 ENDING AT (X'0091FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 37 ENDING AT (X'0095FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 38 ENDING AT (X'0099FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 39 ENDING AT (X'009DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 40 ENDING AT (X'00A1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 41 ENDING AT (X'00A5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 42 ENDING AT (X'00A9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 43 ENDING AT (X'00ADFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 44 ENDING AT (X'00B1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 45 ENDING AT (X'00B5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 46 ENDING AT (X'00B9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 47 ENDING AT (X'00BDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 48 ENDING AT (X'00C1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 49 ENDING AT (X'00C5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 50 ENDING AT (X'00C9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 51 ENDING AT (X'00CDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 52 ENDING AT (X'00D1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 53 ENDING AT (X'00D5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 54 ENDING AT (X'00D9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 55 ENDING AT (X'00DDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 56 ENDING AT (X'00E1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 57 ENDING AT (X'00E5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 58 ENDING AT (X'00E9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 59 ENDING AT (X'00EDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
,
PARTITION 60 ENDING AT (X'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF')
)
$!
$!
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES;
--
$@¢
if $npi then $@=¢
CREATE INDEX $creator.iper21A1
ON $creator.tper21A1
(NZ240001 ASC,
NZ240005 ASC,
NZ240034 ASC,
NZ240006 ASC,
NZ240008 ASC,
NZ240009 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
--
CREATE INDEX $creator.iper21A2
ON $creator.tper21A1
(NZ240010 ASC,
NZ240012 ASC,
NZ240014 ASC,
NZ240005 ASC,
NZ240034 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
--
CREATE INDEX $creator.iper21A3
ON $creator.tper21A1
(NZ240006 ASC,
NZ240012 ASC,
NZ240014 ASC,
NZ240005 ASC,
NZ240034 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
--
CREATE INDEX $creator.iper21A4
ON $creator.tper21A1
(NZ240028 ASC,
NZ240007 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 4 G;
--
CREATE INDEX $creator.iper21A5
ON $creator.tper21A1
(NZ240022 ASC,
NZ240012 ASC,
NZ240014 ASC,
NZ240005 ASC,
NZ240034 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
$!
$!
--
CREATE VIEW $creator.VNZ240A1V(REFID,
PARENTREFID, HEADERUWI, DBVIEWID,
STATUS, PURGEDATE, OWNERID, OBJTYPE, DELIVERERID, OWNERCHANNEL,
SEARCHVALUE01, SEARCHTYPE01, SEARCHVALUE02, SEARCHTYPE02,
SEARCHVALUE03, SEARCHTYPE03, SEARCHVALUE04, SEARCHTYPE04,
SEARCHVALUE05, SEARCHTYPE05, SEARCHVALUE06, SEARCHTYPE06,
SEARCHVALUE07, SEARCHTYPE07, SEARCHVALUE08, SEARCHTYPE08,
SEARCHVALUE09, SEARCHTYPE09, SEARCHVALUE10, SEARCHTYPE10,
CREATEDATETIME, CHANGEDATETIME, CHANGEID, HEADERDESCTYPE,
ORDERSTATE, HEADERDESC) AS
SELECT ALL NZ240001, NZ240002, NZ240003, NZ240004, NZ240005,
NZ240036, NZ240006, NZ240007, NZ240008, NZ240009, NZ240010,
NZ240011, NZ240012, NZ240013, NZ240014, NZ240015, NZ240016,
NZ240017, NZ240018, NZ240019, NZ240020, NZ240021, NZ240022,
NZ240023, NZ240024, NZ240025, NZ240026, NZ240027, NZ240028,
NZ240029, NZ240030, NZ240031, NZ240032, NZ240033, NZ240034,
NZ240035
FROM $creator.tper21A1 ;
--
COMMIT;
$!
$!
}¢--- DSN.TX.CASE(PER21DD2) cre=2013-03-11 mod=2013-03-11-07.57.08 A540769 -----
-- testcase tnz240 repartitionierung -------------------------
set current sqlid = 'S100447';
CREATE INDEX $creator.iper21A1
ON $creator.tper21A1
(NZ240001 ASC,
NZ240005 ASC,
NZ240034 ASC,
NZ240006 ASC,
NZ240008 ASC,
NZ240009 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEfer yes
DEFINE YES
PIECESIZE 2 G;
--
CREATE INDEX $creator.iper21A2
ON $creator.tper21A1
(NZ240010 ASC,
NZ240012 ASC,
NZ240014 ASC,
NZ240005 ASC,
NZ240034 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEfer yes
DEFINE YES
PIECESIZE 2 G;
--
CREATE INDEX $creator.iper21A3
ON $creator.tper21A1
(NZ240006 ASC,
NZ240012 ASC,
NZ240014 ASC,
NZ240005 ASC,
NZ240034 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEfer yes
DEFINE YES
PIECESIZE 2 G;
--
CREATE INDEX $creator.iper21A4
ON $creator.tper21A1
(NZ240028 ASC,
NZ240007 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEfer yes
DEFINE YES
PIECESIZE 4 G;
--
CREATE INDEX $creator.iper21A5
ON $creator.tper21A1
(NZ240022 ASC,
NZ240012 ASC,
NZ240014 ASC,
NZ240005 ASC,
NZ240034 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEfer yes
DEFINE YES
PIECESIZE 2 G;
commit;
}¢--- DSN.TX.CASE(PER21DEL) cre=2013-03-13 mod=2013-03-14-11.16.28 A540769 -----
$#@
$*( create small load files
$*)
$=old= DSN.REPA.DA540769.APER21.P00*.**
call csiOpen csi, $old
do ix=1 while csiNext(csi, cs2)
call adrTso "delete '"m.cs2"'"
end
$#out 20130314 11:16:14
$#out 20130313 17:32:25
$#out 20130313 17:26:02
}¢--- DSN.TX.CASE(PER21LOA) cre=2013-02-06 mod=2013-03-14-11.18.07 A540769 -----
//A540769L JOB (CP00,KE50), 00010001
// MSGCLASS=T,TIME=1440,LINES=(999999,WARNING),
// NOTIFY=&SYSUID
//*MAIN CLASS=LOG0
//S1 EXEC PGM=DSNUTILB,PARM='DBTF,A540769L.LOAD' 00020001
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBTF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE DDIN
DSN('A540769.TMPUL.PER21.P&PA..UNL')
DISP(OLD,KEEP,KEEP)
TEMPLATE DDIQ
DSN('A540769.TMPUL.PER21.Q&PA..UNL')
DISP(OLD,KEEP,KEEP)
LOAD DATA LOG NO -- RESUME NO REPLACE COPYDDN(TCOPYD)
STATISTICS INDEX ALL KEYCARD
SORTKEYS
-- ENFORCE NO
SORTDEVT DISK
WORKDDN(TSYUTD,TSOUTD)
EBCDIC CCSID(00500,00000,00000)
INTO TABLE A540769.TPER21A1
PART 00001 INDDN DDIN REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 3147207
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00002 INDDN DDIN REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 3066233
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00003 INDDN DDIN REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 3325256
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00004 INDDN DDIN REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 5700637
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00005 INDDN DDIN REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2797414
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00006 INDDN DDIN REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2789615
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00007 INDDN DDIN REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2763255
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00008 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2744456
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00009 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2743641
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00010 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2745303
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00011 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2749491
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00012 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2747506
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00013 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2744892
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00014 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2748673
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00015 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2749080
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00016 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2749704
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00017 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2748237
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00018 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2748778
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00019 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2748422
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00020 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2745853
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00021 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2748076
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00022 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2749213
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00023 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2748501
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00024 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2752535
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00025 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2750969
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00026 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2748603
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00027 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2749016
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00028 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2750081
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00029 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2751575
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00030 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2749688
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00031 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2747634
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00032 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2747317
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00033 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2748265
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00034 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2743585
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00035 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2751888
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00036 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2748870
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00037 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2745982
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00038 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2750130
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00039 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2751762
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00040 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2751084
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00041 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2752440
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00042 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2746916
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00043 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2748864
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00044 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2748485
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00045 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2752306
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00046 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2747933
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00047 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2748744
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00048 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2749762
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00049 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2752425
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00050 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2747551
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00051 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2751552
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00052 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2751413
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00053 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2750822
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00054 INDDN DDIQ REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2752459
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00055 INDDN DDIN REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2748377
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00056 INDDN DDIN REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2751009
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00057 INDDN DDIN REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2748526
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00058 INDDN DDIN REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2749157
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00059 INDDN DDIN REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 2749742
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
INTO TABLE A540769.TPER21A1
PART 00060 INDDN DDIN REPLACE COPYDDN(TCOPYD)
WHEN(00001:00002) = X'002D'
NUMRECS 9305451
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
}¢--- DSN.TX.CASE(PER21REB) cre=2013-02-13 mod=2013-03-11-08.23.59 A540769 -----
//A540769S JOB (KEL25071,0240,,3612),'CATALOG',
//* RESTART=STEPNAME, <== FOR RESTART REMOVE * AND ENTER STEP NAME
// MSGCLASS=T,TIME=1440
//*MAIN CLASS=LOG0
//*
//*
//**********************************************************************
//*
//* DB2 ADMIN GENERATED JOB - RUN REBUILD UTILITY (INDEXES)
//*
//***********************************************************ADB2UXB****
//*
//**********************************************************************
//* STEP RBLDIDX: REBUILD INDEXES
//**********************************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBAF,'A540769S.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DBAF.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
REBUILD INDEX(
(ALL) TABLESPACE DA540769.APER21
)
SCOPE PENDING
STATISTICS
SORTDEVT SYSDA
WORKDDN(TSYUTD)
}¢--- DSN.TX.CASE(PER21RPA) cre=2013-03-13 mod=2013-03-13-18.38.44 A540769 -----
//A540769R JOB (PD00,KE50,,SP00000000),
// 'Repa PER21',
// MSGCLASS=E,TIME=1440,LINES=100000,NOTIFY=&SYSUID
//*MAIN CLASS=LOG0
//S01RO EXEC PGM=IKJEFT1B
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTSIN DD *
DSN SYS(DBAF)
-sta db(dA540769) sp(Aper21) acc(ro)
// IF S01RO.RUN AND S01RO.RC = 0 THEN
//S02UNL EXEC PGM=DSNUTILB,PARM=(DBAF,'A540769R.UNLOAD')
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DBAF.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
TEMPLATE TREC DSN('DSN.REPA.&DB..&SN..P&PA..UNL')
DATACLAS (ENN0X) MGMTCLAS(COM#A045)
TEMPLATE TPUN DSN('DSN.REPA.&DB..&SN..P&PA..PUN')
DATACLAS (ENN0X) MGMTCLAS(COM#A045)
LISTDEF LL INCLUDE TABLESPACE DA540769.APER21 PARTLEVEL
UNLOAD TABLESPACE DA540769.APER21 PART 001:060
PUNCHDDN TPUN UNLDDN TREC
SHRLEVEL REFERENCE
// ENDIF
// IF S02UNL.RUN AND S02UNL.RC = 0 THEN
//S03DDL EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99 00020001
//SYSTSIN DD *
DSN SYSTEM(DBAF)
RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2)
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSIN DD *
--#SET MAXERRORS 0
set current sqlid = 'S100447';
set current path = OA1A;
alter table A540769.tper21a1 drop restrict on drop;
DROP TABLESPACE dA540769.aPer21;
commit;
-- RMA694I Partitions were added to TABLESPACE dA540769.
-- aPer21 using the attributes of the previous
-- logical partition to match the number of partitions
-- specified for the table.
-- **************************************************************
-- * *
-- * TABLESPACE CREATE AND ALTER STATEMENTS *
-- * *
-- **************************************************************
-- dA540769.aPer21 WILL BE CREATED VIA THESE NATIVE DB2 COMMANDS.
CREATE TABLESPACE aPer21
IN dA540769
USING STOGROUP GSMS
ERASE NO
FREEPAGE 10
PCTFREE 10
TRACKMOD NO
COMPRESS YES
NUMPARTS 128
BUFFERPOOL BP2
LOCKSIZE ANY
CLOSE YES
SEGSIZE 0
LOCKMAX SYSTEM
CCSID EBCDIC
DSSIZE 16G
;
commit;
-- **************************************************************
-- * *
-- * TABLE CREATE AND ALTER STATEMENTS *
-- * *
-- **************************************************************
-- A540769.tPer21a1 WILL BE CREATED VIA THESE NATIVE DB2 COMMANDS.
CREATE TABLE A540769.tPer21a1
( NZ240001 CHAR ( 50 ) NOT NULL
FOR SBCS DATA
, NZ240002 CHAR ( 50 ) NOT NULL
FOR SBCS DATA
, NZ240003 CHAR ( 20 ) NOT NULL
FOR SBCS DATA
, NZ240004 CHAR ( 20 ) NOT NULL
FOR SBCS DATA
, NZ240005 CHAR ( 20 ) NOT NULL
FOR SBCS DATA
, NZ240006 CHAR ( 20 ) NOT NULL
FOR SBCS DATA
, NZ240007 CHAR ( 20 ) NOT NULL
FOR SBCS DATA
, NZ240008 CHAR ( 20 ) NOT NULL
FOR SBCS DATA
, NZ240009 CHAR ( 20 ) NOT NULL
FOR SBCS DATA
, NZ240010 CHAR ( 50 ) NOT NULL
FOR SBCS DATA
, NZ240011 CHAR ( 20 ) NOT NULL
FOR SBCS DATA
, NZ240012 CHAR ( 50 ) NOT NULL
FOR SBCS DATA
, NZ240013 CHAR ( 20 ) NOT NULL
FOR SBCS DATA
, NZ240014 CHAR ( 50 ) NOT NULL
FOR SBCS DATA
, NZ240015 CHAR ( 20 ) NOT NULL
FOR SBCS DATA
, NZ240016 CHAR ( 50 ) NOT NULL
FOR SBCS DATA
, NZ240017 CHAR ( 20 ) NOT NULL
FOR SBCS DATA
, NZ240018 CHAR ( 50 ) NOT NULL
FOR SBCS DATA
, NZ240019 CHAR ( 20 ) NOT NULL
FOR SBCS DATA
, NZ240020 CHAR ( 50 ) NOT NULL
FOR SBCS DATA
, NZ240021 CHAR ( 20 ) NOT NULL
FOR SBCS DATA
, NZ240022 CHAR ( 50 ) NOT NULL
FOR SBCS DATA
, NZ240023 CHAR ( 20 ) NOT NULL
FOR SBCS DATA
, NZ240024 CHAR ( 50 ) NOT NULL
FOR SBCS DATA
, NZ240025 CHAR ( 20 ) NOT NULL
FOR SBCS DATA
, NZ240026 CHAR ( 50 ) NOT NULL
FOR SBCS DATA
, NZ240027 CHAR ( 20 ) NOT NULL
FOR SBCS DATA
, NZ240028 CHAR ( 50 ) NOT NULL
FOR SBCS DATA
, NZ240029 CHAR ( 20 ) NOT NULL
FOR SBCS DATA
, NZ240030 CHAR ( 26 ) NOT NULL
FOR SBCS DATA
, NZ240031 CHAR ( 26 ) NOT NULL
FOR SBCS DATA
, NZ240032 CHAR ( 20 ) NOT NULL
FOR SBCS DATA
, NZ240033 CHAR ( 20 ) NOT NULL
FOR SBCS DATA
, NZ240034 CHAR ( 10 ) NOT NULL
FOR SBCS DATA
, NZ240035 VARCHAR ( 1000 ) NOT NULL
FOR SBCS DATA
, NZ240036 DATE
,PRIMARY KEY
(NZ240003
)
)
WITH RESTRICT ON DROP
IN dA540769.aPer21
PARTITION BY
( NZ240003
)
( PARTITION 1
ENDING AT ( X'0001FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 2
ENDING AT ( X'0003FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 3
ENDING AT ( X'0005FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 4
ENDING AT ( X'0007FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 5
ENDING AT ( X'0009FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 6
ENDING AT ( X'000BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 7
ENDING AT ( X'000DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 8
ENDING AT ( X'000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 9
ENDING AT ( X'0011FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 10
ENDING AT ( X'0013FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 11
ENDING AT ( X'0015FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 12
ENDING AT ( X'0017FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 13
ENDING AT ( X'0019FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 14
ENDING AT ( X'001BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 15
ENDING AT ( X'001DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 16
ENDING AT ( X'001FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 17
ENDING AT ( X'0021FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 18
ENDING AT ( X'0023FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 19
ENDING AT ( X'0025FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 20
ENDING AT ( X'0027FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 21
ENDING AT ( X'0029FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 22
ENDING AT ( X'002BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 23
ENDING AT ( X'002DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 24
ENDING AT ( X'002FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 25
ENDING AT ( X'0031FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 26
ENDING AT ( X'0033FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 27
ENDING AT ( X'0035FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 28
ENDING AT ( X'0037FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 29
ENDING AT ( X'0039FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 30
ENDING AT ( X'003BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 31
ENDING AT ( X'003DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 32
ENDING AT ( X'003FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 33
ENDING AT ( X'0041FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 34
ENDING AT ( X'0043FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 35
ENDING AT ( X'0045FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 36
ENDING AT ( X'0047FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 37
ENDING AT ( X'0049FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 38
ENDING AT ( X'004BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 39
ENDING AT ( X'004DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 40
ENDING AT ( X'004FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 41
ENDING AT ( X'0051FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 42
ENDING AT ( X'0053FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 43
ENDING AT ( X'0055FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 44
ENDING AT ( X'0057FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 45
ENDING AT ( X'0059FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 46
ENDING AT ( X'005BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 47
ENDING AT ( X'005DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 48
ENDING AT ( X'005FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 49
ENDING AT ( X'0061FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 50
ENDING AT ( X'0063FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 51
ENDING AT ( X'0065FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 52
ENDING AT ( X'0067FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 53
ENDING AT ( X'0069FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 54
ENDING AT ( X'006BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 55
ENDING AT ( X'006DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 56
ENDING AT ( X'006FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 57
ENDING AT ( X'0071FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 58
ENDING AT ( X'0073FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 59
ENDING AT ( X'0075FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 60
ENDING AT ( X'0077FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 61
ENDING AT ( X'0079FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 62
ENDING AT ( X'007BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 63
ENDING AT ( X'007DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 64
ENDING AT ( X'007FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 65
ENDING AT ( X'0081FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 66
ENDING AT ( X'0083FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 67
ENDING AT ( X'0085FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 68
ENDING AT ( X'0087FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 69
ENDING AT ( X'0089FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 70
ENDING AT ( X'008BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 71
ENDING AT ( X'008DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 72
ENDING AT ( X'008FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 73
ENDING AT ( X'0091FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 74
ENDING AT ( X'0093FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 75
ENDING AT ( X'0095FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 76
ENDING AT ( X'0097FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 77
ENDING AT ( X'0099FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 78
ENDING AT ( X'009BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 79
ENDING AT ( X'009DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 80
ENDING AT ( X'009FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 81
ENDING AT ( X'00A1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 82
ENDING AT ( X'00A3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 83
ENDING AT ( X'00A5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 84
ENDING AT ( X'00A7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 85
ENDING AT ( X'00A9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 86
ENDING AT ( X'00ABFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 87
ENDING AT ( X'00ADFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 88
ENDING AT ( X'00AFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 89
ENDING AT ( X'00B1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 90
ENDING AT ( X'00B3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 91
ENDING AT ( X'00B5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 92
ENDING AT ( X'00B7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 93
ENDING AT ( X'00B9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 94
ENDING AT ( X'00BBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 95
ENDING AT ( X'00BDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 96
ENDING AT ( X'00BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 97
ENDING AT ( X'00C1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 98
ENDING AT ( X'00C3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 99
ENDING AT ( X'00C5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 100
ENDING AT ( X'00C7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 101
ENDING AT ( X'00C9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 102
ENDING AT ( X'00CBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 103
ENDING AT ( X'00CDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 104
ENDING AT ( X'00CFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 105
ENDING AT ( X'00D1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 106
ENDING AT ( X'00D3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 107
ENDING AT ( X'00D5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 108
ENDING AT ( X'00D7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 109
ENDING AT ( X'00D9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 110
ENDING AT ( X'00DBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 111
ENDING AT ( X'00DDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 112
ENDING AT ( X'00DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 113
ENDING AT ( X'00E1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 114
ENDING AT ( X'00E3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 115
ENDING AT ( X'00E5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 116
ENDING AT ( X'00E7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 117
ENDING AT ( X'00E9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 118
ENDING AT ( X'00EBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 119
ENDING AT ( X'00EDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 120
ENDING AT ( X'00EFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 121
ENDING AT ( X'00F1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 122
ENDING AT ( X'00F3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 123
ENDING AT ( X'00F5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 124
ENDING AT ( X'00F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 125
ENDING AT ( X'00F9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 126
ENDING AT ( X'00FBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 127
ENDING AT ( X'00FDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
, PARTITION 128
ENDING AT ( X'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' )
)
CCSID EBCDIC
;
COMMENT ON A540769.tPer21a1
( NZ240001 IS 'REFERENZNUMMER DES SENDEOBJEKTES'
, NZ240002 IS 'REFERENZNUMMER DES PARENT VOM SENDEOBJEKTES'
, NZ240003 IS
'TABELLEN ID IN WELCHER SICH DER DATENTEIL BEFINDET'
, NZ240004 IS 'DB-VIEW IDENTIFIKATION'
, NZ240005 IS 'STATUSINFORMATION'
, NZ240006 IS 'IDENTIFIKTAION DES OWNERS'
, NZ240007 IS 'GESCHAEFTSFALLOBJEKTART'
, NZ240008 IS 'LIEFERANT/ SYSTEM'
, NZ240009 IS 'IDENTIFIKATION DES EINGANGSKANAL'
, NZ240010 IS 'SUCHWERT 01'
, NZ240011 IS 'BESCHREIBUNG SUCHWERT 01'
, NZ240012 IS 'SUCHWERT 02'
, NZ240013 IS 'BESCHREIBUNG SUCHWERT 02'
, NZ240014 IS 'SUCHWERT 03'
, NZ240015 IS 'BESCHREIBUNG SUCHWERT 03'
, NZ240016 IS 'SUCHWERT 04'
, NZ240017 IS 'BESCHREIBUNG SUCHWERT 04'
, NZ240018 IS 'SUCHWERT 05'
, NZ240019 IS 'BESCHREIBUNG SUCHWERT 05'
, NZ240020 IS 'SUCHWERT 06'
, NZ240021 IS 'BESCHREIBUNG SUCHWERT 06'
, NZ240022 IS 'SUCHWERT 07'
, NZ240023 IS 'BESCHREIBUNG SUCHWERT 07'
, NZ240024 IS 'SUCHWERT 08'
, NZ240025 IS 'BESCHREIBUNG SUCHWERT 08'
, NZ240026 IS 'SUCHWERT 09'
, NZ240027 IS 'BESCHREIBUNG SUCHWERT 09'
, NZ240028 IS 'SUCHWERT 10'
, NZ240029 IS 'BESCHREIBUNG SUCHWERT 10'
, NZ240030 IS 'TIMESTAMP ERSTELLUNGSZEITPUNKT'
, NZ240031 IS 'TIMESTAMP STATUS GEAENDERT'
, NZ240032 IS 'IDENTIFIKTAION DES STATUSBEARBEITERS'
, NZ240033 IS 'IDENTFIKATIONSTYPE DER ERGAENZENDEN BESCHREIBUNG'
, NZ240034 IS 'STATUS DES AUFTRAGES'
, NZ240035 IS 'ERGAENZENDE BESCHREIBUNG'
) ;
LABEL ON A540769.tPer21a1
( NZ240001 IS 'REFID'
, NZ240002 IS 'PARENTREFID'
, NZ240003 IS 'HEADERUWI'
, NZ240004 IS 'DBVIEWID'
, NZ240005 IS 'STATUS'
, NZ240006 IS 'OWNERID'
, NZ240007 IS 'OBJTYPE'
, NZ240008 IS 'DELIVERERID'
, NZ240009 IS 'OWNERCHANNEL'
, NZ240010 IS 'SEARCHVALUE01'
, NZ240011 IS 'SEARCHTYPE01'
, NZ240012 IS 'SEARCHVALUE02'
, NZ240013 IS 'SEARCHTYPE02'
, NZ240014 IS 'SEARCHVALUE03'
, NZ240015 IS 'SEARCHTYPE03'
, NZ240016 IS 'SEARCHVALUE04'
, NZ240017 IS 'SEARCHTYPE04'
, NZ240018 IS 'SEARCHVALUE05'
, NZ240019 IS 'SEARCHTYPE05'
, NZ240020 IS 'SEARCHVALUE06'
, NZ240021 IS 'SEARCHTYPE06'
, NZ240022 IS 'SEARCHVALUE07'
, NZ240023 IS 'SEARCHTYPE07'
, NZ240024 IS 'SEARCHVALUE08'
, NZ240025 IS 'SEARCHTYPE08'
, NZ240026 IS 'SEARCHVALUE09'
, NZ240027 IS 'SEARCHTYPE09'
, NZ240028 IS 'SEARCHVALUE10'
, NZ240029 IS 'SEARCHTYPE10'
, NZ240030 IS 'CREATEDATETIME'
, NZ240031 IS 'CHANGEDATETIME'
, NZ240032 IS 'CHANGEID'
, NZ240033 IS 'HEADERDESCTYPE'
, NZ240034 IS 'ORDERSTATE'
, NZ240035 IS 'HEADERDESC'
) ;
LABEL ON TABLE A540769.tPer21a1 IS 'ZV HISTO: HISTOHEADER' ;
commit;
--##BEGIN DBX.ALL.STARW OBJ TABLE:A540769.tPer21a1
--## DBTS dA540769.aPer21:
--## anaDateTime 130417:140041.6
--## r=0 b=0 o=1 a=0
--##END DBX.ALL.STARW OBJ TABLE:A540769.tPer21a1
commit;
-- RMA694I Partitions were added to INDEX A540769.
-- iper21A0 using the attributes of the previous
-- logical partition to match the number of partitions
-- specified for the table.
-- **************************************************************
-- * *
-- * INDEX CREATE AND ALTER STATEMENTS *
-- * *
-- **************************************************************
-- A540769.iper21A0 WILL BE CREATED VIA THESE NATIVE DB2 COMMANDS.
CREATE UNIQUE INDEX A540769.iper21A0 ON A540769.tPer21a1
( NZ240003 ASC
)
PARTITIONED
USING STOGROUP GSMS
ERASE NO
FREEPAGE 10
PCTFREE 10
CLUSTER
BUFFERPOOL BP1
CLOSE YES
DEFER YES
;
commit;
-- A540769.iper21A1 WILL BE CREATED VIA THESE NATIVE DB2 COMMANDS.
CREATE INDEX A540769.iper21A1 ON A540769.tPer21a1
( NZ240001 ASC
, NZ240005 ASC
, NZ240034 ASC
, NZ240006 ASC
, NZ240008 ASC
, NZ240009 ASC
)
USING STOGROUP GSMS
ERASE NO
FREEPAGE 10
PCTFREE 10
BUFFERPOOL BP1
CLOSE YES
DEFER YES
PIECESIZE 2G
;
commit;
-- A540769.iper21A2 WILL BE CREATED VIA THESE NATIVE DB2 COMMANDS.
CREATE INDEX A540769.iper21A2 ON A540769.tPer21a1
( NZ240010 ASC
, NZ240012 ASC
, NZ240014 ASC
, NZ240005 ASC
, NZ240034 ASC
)
USING STOGROUP GSMS
ERASE NO
FREEPAGE 10
PCTFREE 10
BUFFERPOOL BP1
CLOSE YES
DEFER YES
PIECESIZE 2G
;
commit;
-- A540769.iper21A3 WILL BE CREATED VIA THESE NATIVE DB2 COMMANDS.
CREATE INDEX A540769.iper21A3 ON A540769.tPer21a1
( NZ240006 ASC
, NZ240012 ASC
, NZ240014 ASC
, NZ240005 ASC
, NZ240034 ASC
)
USING STOGROUP GSMS
ERASE NO
FREEPAGE 10
PCTFREE 10
BUFFERPOOL BP1
CLOSE YES
DEFER YES
PIECESIZE 2G
;
commit;
-- A540769.iper21A4 WILL BE CREATED VIA THESE NATIVE DB2 COMMANDS.
CREATE INDEX A540769.iper21A4 ON A540769.tPer21a1
( NZ240028 ASC
, NZ240007 ASC
)
USING STOGROUP GSMS
ERASE NO
FREEPAGE 10
PCTFREE 10
BUFFERPOOL BP1
CLOSE YES
DEFER YES
PIECESIZE 4G
;
commit;
-- A540769.iper21A5 WILL BE CREATED VIA THESE NATIVE DB2 COMMANDS.
CREATE INDEX A540769.iper21A5 ON A540769.tPer21a1
( NZ240022 ASC
, NZ240012 ASC
, NZ240014 ASC
, NZ240005 ASC
, NZ240034 ASC
)
USING STOGROUP GSMS
ERASE NO
FREEPAGE 10
PCTFREE 10
BUFFERPOOL BP1
CLOSE NO
PIECESIZE 2G
;
commit;
-- **************************************************************
-- * *
-- * SOURCE INDEX CREATE AND ALTER STATEMENTS *
-- * *
-- **************************************************************
-- A485020.iper21A5 WILL BE CREATED VIA THESE NATIVE DB2 COMMANDS.
CREATE INDEX A485020.iper21A5 ON A540769.tPer21a1
( NZ240022 ASC
, NZ240012 ASC
, NZ240014 ASC
, NZ240005 ASC
, NZ240034 ASC
)
USING STOGROUP GSMS
ERASE NO
FREEPAGE 10
PCTFREE 10
BUFFERPOOL BP1
CLOSE YES
DEFER YES
PIECESIZE 2G
;
commit;
-- **************************************************************
-- * *
-- * VIEW CREATE AND ALTER STATEMENTS *
-- * *
-- **************************************************************
-- A540769.vper21A1V WILL BE CREATED VIA THESE NATIVE DB2 COMMANDS.
CREATE VIEW A540769.vper21A1V
( REFID , PARENTREFID , HEADERUWI , DBVIEWID , STATUS ,
PURGEDATE , OWNERID , OBJTYPE , DELIVERERID , OWNERCHANNEL ,
SEARCHVALUE01 , SEARCHTYPE01 , SEARCHVALUE02 , SEARCHTYPE02 ,
SEARCHVALUE03 , SEARCHTYPE03 , SEARCHVALUE04 , SEARCHTYPE04 ,
SEARCHVALUE05 , SEARCHTYPE05 , SEARCHVALUE06 , SEARCHTYPE06 ,
SEARCHVALUE07 , SEARCHTYPE07 , SEARCHVALUE08 , SEARCHTYPE08 ,
SEARCHVALUE09 , SEARCHTYPE09 , SEARCHVALUE10 , SEARCHTYPE10 ,
CREATEDATETIME , CHANGEDATETIME , CHANGEID , HEADERDESCTYPE ,
ORDERSTATE , HEADERDESC ) AS
SELECT ALL NZ240001 , NZ240002 , NZ240003 , NZ240004 , NZ240005 ,
NZ240036 , NZ240006 , NZ240007 , NZ240008 , NZ240009 , NZ240010
, NZ240011 , NZ240012 , NZ240013 , NZ240014 , NZ240015 ,
NZ240016 , NZ240017 , NZ240018 , NZ240019 , NZ240020 , NZ240021
, NZ240022 , NZ240023 , NZ240024 , NZ240025 , NZ240026 ,
NZ240027 , NZ240028 , NZ240029 , NZ240030 , NZ240031 , NZ240032
, NZ240033 , NZ240034 , NZ240035
FROM A540769.tPer21a1
;
commit;
// ENDIF
// IF S03DDL.RUN AND S03DDL.RC = 0 THEN
//S04UT EXEC PGM=IKJEFT1B
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTSIN DD *
DSN SYS(DBAF)
-sta db(dA540769) sp(Aper21) acc(ut)
// ENDIF
// IF S04UT.RUN AND S04UT.RC = 0 THEN
//S05LOAD EXEC PGM=DSNUTILB,PARM='DBAF,A540769R.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
// SET OLDPREF='DSN.REPA.DA540769.APER21.P00'
// SET OLDSUF='.UNL'
//SYSTEMPL DD DSN=DBAF.DBAA.LISTDEF(TEMPL),DISP=SHR
//REC001 DD DISP=MOD,DSN=&OLDPREF.001&OLDSUF
//REC002 DD DISP=MOD,DSN=&OLDPREF.001&OLDSUF
// DD DISP=MOD,DSN=&OLDPREF.002&OLDSUF
//REC003 DD DISP=MOD,DSN=&OLDPREF.002&OLDSUF
//REC004 DD DISP=MOD,DSN=&OLDPREF.003&OLDSUF
//REC005 DD DISP=MOD,DSN=&OLDPREF.003&OLDSUF
//REC006 DD DISP=MOD,DSN=&OLDPREF.004&OLDSUF
//REC007 DD DISP=MOD,DSN=&OLDPREF.004&OLDSUF
//REC008 DD DISP=MOD,DSN=&OLDPREF.004&OLDSUF
//REC009 DD DISP=MOD,DSN=&OLDPREF.004&OLDSUF
//REC010 DD DISP=MOD,DSN=&OLDPREF.005&OLDSUF
//REC011 DD DISP=MOD,DSN=&OLDPREF.005&OLDSUF
//REC012 DD DISP=MOD,DSN=&OLDPREF.006&OLDSUF
//REC013 DD DISP=MOD,DSN=&OLDPREF.006&OLDSUF
//REC014 DD DISP=MOD,DSN=&OLDPREF.007&OLDSUF
//REC015 DD DISP=MOD,DSN=&OLDPREF.007&OLDSUF
//REC016 DD DISP=MOD,DSN=&OLDPREF.008&OLDSUF
//REC017 DD DISP=MOD,DSN=&OLDPREF.008&OLDSUF
//REC018 DD DISP=MOD,DSN=&OLDPREF.009&OLDSUF
//REC019 DD DISP=MOD,DSN=&OLDPREF.009&OLDSUF
//REC020 DD DISP=MOD,DSN=&OLDPREF.010&OLDSUF
//REC021 DD DISP=MOD,DSN=&OLDPREF.010&OLDSUF
//REC022 DD DISP=MOD,DSN=&OLDPREF.011&OLDSUF
//REC023 DD DISP=MOD,DSN=&OLDPREF.011&OLDSUF
//REC024 DD DISP=MOD,DSN=&OLDPREF.012&OLDSUF
//REC025 DD DISP=MOD,DSN=&OLDPREF.012&OLDSUF
//REC026 DD DISP=MOD,DSN=&OLDPREF.013&OLDSUF
//REC027 DD DISP=MOD,DSN=&OLDPREF.013&OLDSUF
//REC028 DD DISP=MOD,DSN=&OLDPREF.014&OLDSUF
//REC029 DD DISP=MOD,DSN=&OLDPREF.014&OLDSUF
//REC030 DD DISP=MOD,DSN=&OLDPREF.015&OLDSUF
//REC031 DD DISP=MOD,DSN=&OLDPREF.015&OLDSUF
//REC032 DD DISP=MOD,DSN=&OLDPREF.016&OLDSUF
//REC033 DD DISP=MOD,DSN=&OLDPREF.016&OLDSUF
//REC034 DD DISP=MOD,DSN=&OLDPREF.017&OLDSUF
//REC035 DD DISP=MOD,DSN=&OLDPREF.017&OLDSUF
//REC036 DD DISP=MOD,DSN=&OLDPREF.018&OLDSUF
//REC037 DD DISP=MOD,DSN=&OLDPREF.018&OLDSUF
//REC038 DD DISP=MOD,DSN=&OLDPREF.019&OLDSUF
//REC039 DD DISP=MOD,DSN=&OLDPREF.019&OLDSUF
//REC040 DD DISP=MOD,DSN=&OLDPREF.020&OLDSUF
//REC041 DD DISP=MOD,DSN=&OLDPREF.020&OLDSUF
//REC042 DD DISP=MOD,DSN=&OLDPREF.021&OLDSUF
//REC043 DD DISP=MOD,DSN=&OLDPREF.021&OLDSUF
//REC044 DD DISP=MOD,DSN=&OLDPREF.022&OLDSUF
//REC045 DD DISP=MOD,DSN=&OLDPREF.022&OLDSUF
//REC046 DD DISP=MOD,DSN=&OLDPREF.023&OLDSUF
//REC047 DD DISP=MOD,DSN=&OLDPREF.023&OLDSUF
//REC048 DD DISP=MOD,DSN=&OLDPREF.024&OLDSUF
//REC049 DD DISP=MOD,DSN=&OLDPREF.024&OLDSUF
//REC050 DD DISP=MOD,DSN=&OLDPREF.025&OLDSUF
//REC051 DD DISP=MOD,DSN=&OLDPREF.025&OLDSUF
//REC052 DD DISP=MOD,DSN=&OLDPREF.026&OLDSUF
//REC053 DD DISP=MOD,DSN=&OLDPREF.026&OLDSUF
//REC054 DD DISP=MOD,DSN=&OLDPREF.027&OLDSUF
//REC055 DD DISP=MOD,DSN=&OLDPREF.027&OLDSUF
//REC056 DD DISP=MOD,DSN=&OLDPREF.028&OLDSUF
//REC057 DD DISP=MOD,DSN=&OLDPREF.028&OLDSUF
//REC058 DD DISP=MOD,DSN=&OLDPREF.029&OLDSUF
//REC059 DD DISP=MOD,DSN=&OLDPREF.029&OLDSUF
//REC060 DD DISP=MOD,DSN=&OLDPREF.030&OLDSUF
//REC061 DD DISP=MOD,DSN=&OLDPREF.030&OLDSUF
//REC062 DD DISP=MOD,DSN=&OLDPREF.031&OLDSUF
//REC063 DD DISP=MOD,DSN=&OLDPREF.031&OLDSUF
//REC064 DD DISP=MOD,DSN=&OLDPREF.032&OLDSUF
//REC065 DD DISP=MOD,DSN=&OLDPREF.032&OLDSUF
//REC066 DD DISP=MOD,DSN=&OLDPREF.033&OLDSUF
//REC067 DD DISP=MOD,DSN=&OLDPREF.033&OLDSUF
//REC068 DD DISP=MOD,DSN=&OLDPREF.034&OLDSUF
//REC069 DD DISP=MOD,DSN=&OLDPREF.034&OLDSUF
//REC070 DD DISP=MOD,DSN=&OLDPREF.035&OLDSUF
//REC071 DD DISP=MOD,DSN=&OLDPREF.035&OLDSUF
//REC072 DD DISP=MOD,DSN=&OLDPREF.036&OLDSUF
//REC073 DD DISP=MOD,DSN=&OLDPREF.036&OLDSUF
//REC074 DD DISP=MOD,DSN=&OLDPREF.037&OLDSUF
//REC075 DD DISP=MOD,DSN=&OLDPREF.037&OLDSUF
//REC076 DD DISP=MOD,DSN=&OLDPREF.038&OLDSUF
//REC077 DD DISP=MOD,DSN=&OLDPREF.038&OLDSUF
//REC078 DD DISP=MOD,DSN=&OLDPREF.039&OLDSUF
//REC079 DD DISP=MOD,DSN=&OLDPREF.039&OLDSUF
//REC080 DD DISP=MOD,DSN=&OLDPREF.040&OLDSUF
//REC081 DD DISP=MOD,DSN=&OLDPREF.040&OLDSUF
//REC082 DD DISP=MOD,DSN=&OLDPREF.041&OLDSUF
//REC083 DD DISP=MOD,DSN=&OLDPREF.041&OLDSUF
//REC084 DD DISP=MOD,DSN=&OLDPREF.042&OLDSUF
//REC085 DD DISP=MOD,DSN=&OLDPREF.042&OLDSUF
//REC086 DD DISP=MOD,DSN=&OLDPREF.043&OLDSUF
//REC087 DD DISP=MOD,DSN=&OLDPREF.043&OLDSUF
//REC088 DD DISP=MOD,DSN=&OLDPREF.044&OLDSUF
//REC089 DD DISP=MOD,DSN=&OLDPREF.044&OLDSUF
//REC090 DD DISP=MOD,DSN=&OLDPREF.045&OLDSUF
//REC091 DD DISP=MOD,DSN=&OLDPREF.045&OLDSUF
//REC092 DD DISP=MOD,DSN=&OLDPREF.046&OLDSUF
//REC093 DD DISP=MOD,DSN=&OLDPREF.046&OLDSUF
//REC094 DD DISP=MOD,DSN=&OLDPREF.047&OLDSUF
//REC095 DD DISP=MOD,DSN=&OLDPREF.047&OLDSUF
//REC096 DD DISP=MOD,DSN=&OLDPREF.048&OLDSUF
//REC097 DD DISP=MOD,DSN=&OLDPREF.048&OLDSUF
//REC098 DD DISP=MOD,DSN=&OLDPREF.049&OLDSUF
//REC099 DD DISP=MOD,DSN=&OLDPREF.049&OLDSUF
//REC100 DD DISP=MOD,DSN=&OLDPREF.050&OLDSUF
//REC101 DD DISP=MOD,DSN=&OLDPREF.050&OLDSUF
//REC102 DD DISP=MOD,DSN=&OLDPREF.051&OLDSUF
//REC103 DD DISP=MOD,DSN=&OLDPREF.051&OLDSUF
//REC104 DD DISP=MOD,DSN=&OLDPREF.052&OLDSUF
//REC105 DD DISP=MOD,DSN=&OLDPREF.052&OLDSUF
//REC106 DD DISP=MOD,DSN=&OLDPREF.053&OLDSUF
//REC107 DD DISP=MOD,DSN=&OLDPREF.053&OLDSUF
//REC108 DD DISP=MOD,DSN=&OLDPREF.054&OLDSUF
//REC109 DD DISP=MOD,DSN=&OLDPREF.054&OLDSUF
//REC110 DD DISP=MOD,DSN=&OLDPREF.055&OLDSUF
//REC111 DD DISP=MOD,DSN=&OLDPREF.055&OLDSUF
//REC112 DD DISP=MOD,DSN=&OLDPREF.056&OLDSUF
//REC113 DD DISP=MOD,DSN=&OLDPREF.056&OLDSUF
//REC114 DD DISP=MOD,DSN=&OLDPREF.057&OLDSUF
//REC115 DD DISP=MOD,DSN=&OLDPREF.057&OLDSUF
//REC116 DD DISP=MOD,DSN=&OLDPREF.058&OLDSUF
//REC117 DD DISP=MOD,DSN=&OLDPREF.058&OLDSUF
//REC118 DD DISP=MOD,DSN=&OLDPREF.059&OLDSUF
//REC119 DD DISP=MOD,DSN=&OLDPREF.059&OLDSUF
//REC120 DD DISP=MOD,DSN=&OLDPREF.060&OLDSUF
//REC121 DD DISP=MOD,DSN=&OLDPREF.060&OLDSUF
//REC122 DD DISP=MOD,DSN=&OLDPREF.060&OLDSUF
//REC123 DD DISP=MOD,DSN=&OLDPREF.060&OLDSUF
//REC124 DD DISP=MOD,DSN=&OLDPREF.060&OLDSUF
//REC125 DD DISP=MOD,DSN=&OLDPREF.060&OLDSUF
//REC126 DD DISP=MOD,DSN=&OLDPREF.060&OLDSUF
//REC127 DD DISP=MOD,DSN=&OLDPREF.060&OLDSUF
//REC128 DD DISP=MOD,DSN=&OLDPREF.060&OLDSUF
//SYSIN DD *
-- tSyUtD: WORKDDN(1,) ¢SYSUT1! fuer check, load, merge
TEMPLATE TSYUTL DSN('&SSID..&DB..&SN..P&PART..&UNIQ..UT')
DATACLAS(ENN35) MGMTCLAS(COM#E005)
SPACE TRK MAXPRIME 60000
-- tSOutD: WORKDDN(,2) ¢SORTOUT! fuer checkData, load
TEMPLATE TSOUTL DSN('&SSID..&DB..&SN..P&PART..&UNIQ..SRT')
DATACLAS(ENN35) MGMTCLAS(COM#E005)
SPACE TRK MAXPRIME 60000
LOAD DATA LOG NO EBCDIC CCSID(00500,00000,00000)
ENFORCE NO
STATISTICS INDEX(ALL) REPORT NO UPDATE ALL
WORKDDN(TSYUTL,TSOUTL)
SORTKEYS
SORTDEVT DISK
-- SORTNUM 160
INDEXDEFER NPI
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 001
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC001
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 002
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC002
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 003
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC003
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 004
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC004
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 005
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC005
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 006
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC006
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 007
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC007
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 008
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC008
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 009
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC009
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 010
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC010
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 011
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC011
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 012
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC012
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 013
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC013
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 014
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC014
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 015
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC015
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 016
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC016
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 017
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC017
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 018
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC018
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 019
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC019
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 020
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC020
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 021
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC021
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 022
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC022
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 023
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC023
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 024
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC024
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 025
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC025
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 026
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC026
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 027
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC027
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 028
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC028
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 029
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC029
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 030
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC030
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 031
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC031
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 032
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC032
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 033
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC033
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 034
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC034
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 035
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC035
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 036
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC036
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 037
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC037
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 038
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC038
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 039
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC039
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 040
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC040
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 041
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC041
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 042
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC042
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 043
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC043
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 044
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC044
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 045
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC045
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 046
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC046
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 047
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC047
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 048
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC048
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 049
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC049
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 050
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC050
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 051
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC051
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 052
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC052
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 053
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC053
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 054
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC054
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 055
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC055
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 056
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC056
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 057
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC057
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 058
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC058
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 059
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC059
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 060
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC060
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 061
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC061
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 062
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC062
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 063
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC063
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 064
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC064
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 065
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC065
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 066
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC066
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 067
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC067
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 068
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC068
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 069
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC069
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 070
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC070
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 071
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC071
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 072
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC072
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 073
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC073
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 074
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC074
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 075
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC075
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 076
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC076
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 077
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC077
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 078
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC078
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 079
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC079
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 080
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC080
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 081
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC081
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 082
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC082
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 083
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC083
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 084
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC084
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 085
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC085
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 086
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC086
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 087
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC087
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 088
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC088
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 089
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC089
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 090
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC090
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 091
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC091
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 092
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC092
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 093
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC093
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 094
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC094
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 095
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC095
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 096
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC096
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 097
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC097
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 098
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC098
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 099
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC099
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 100
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC100
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 101
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC101
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 102
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC102
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 103
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC103
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 104
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC104
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 105
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC105
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 106
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC106
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 107
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC107
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 108
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC108
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 109
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC109
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 110
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC110
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 111
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC111
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 112
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC112
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 113
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC113
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 114
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC114
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 115
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC115
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 116
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC116
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 117
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC117
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 118
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC118
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 119
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC119
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 120
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC120
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 121
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC121
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 122
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC122
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 123
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC123
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 124
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC124
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 125
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC125
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 126
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC126
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 127
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC127
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
----------------- part --------------------
INTO TABLE A540769.TPER21A1 PART 128
RESUME NO REPLACE COPYDDN(TCOPYS) INDDN REC128
NUMRECS 0
( "NZ240001"
POSITION( 00003:00052) CHAR(00050)
, "NZ240002"
POSITION( 00053:00102) CHAR(00050)
, "NZ240003"
POSITION( 00103:00122) CHAR(00020)
, "NZ240004"
POSITION( 00123:00142) CHAR(00020)
, "NZ240005"
POSITION( 00143:00162) CHAR(00020)
, "NZ240006"
POSITION( 00163:00182) CHAR(00020)
, "NZ240007"
POSITION( 00183:00202) CHAR(00020)
, "NZ240008"
POSITION( 00203:00222) CHAR(00020)
, "NZ240009"
POSITION( 00223:00242) CHAR(00020)
, "NZ240010"
POSITION( 00243:00292) CHAR(00050)
, "NZ240011"
POSITION( 00293:00312) CHAR(00020)
, "NZ240012"
POSITION( 00313:00362) CHAR(00050)
, "NZ240013"
POSITION( 00363:00382) CHAR(00020)
, "NZ240014"
POSITION( 00383:00432) CHAR(00050)
, "NZ240015"
POSITION( 00433:00452) CHAR(00020)
, "NZ240016"
POSITION( 00453:00502) CHAR(00050)
, "NZ240017"
POSITION( 00503:00522) CHAR(00020)
, "NZ240018"
POSITION( 00523:00572) CHAR(00050)
, "NZ240019"
POSITION( 00573:00592) CHAR(00020)
, "NZ240020"
POSITION( 00593:00642) CHAR(00050)
, "NZ240021"
POSITION( 00643:00662) CHAR(00020)
, "NZ240022"
POSITION( 00663:00712) CHAR(00050)
, "NZ240023"
POSITION( 00713:00732) CHAR(00020)
, "NZ240024"
POSITION( 00733:00782) CHAR(00050)
, "NZ240025"
POSITION( 00783:00802) CHAR(00020)
, "NZ240026"
POSITION( 00803:00852) CHAR(00050)
, "NZ240027"
POSITION( 00853:00872) CHAR(00020)
, "NZ240028"
POSITION( 00873:00922) CHAR(00050)
, "NZ240029"
POSITION( 00923:00942) CHAR(00020)
, "NZ240030"
POSITION( 00943:00968) CHAR(00026)
, "NZ240031"
POSITION( 00969:00994) CHAR(00026)
, "NZ240032"
POSITION( 00995:01014) CHAR(00020)
, "NZ240033"
POSITION( 01015:01034) CHAR(00020)
, "NZ240034"
POSITION( 01035:01044) CHAR(00010)
, "NZ240035"
POSITION( 01045:02046) VARCHAR
, "NZ240036"
POSITION( 02048:02057) DATE EXTERNAL
NULLIF(02047)=X'FF'
)
// ENDIF
// IF S05LOAD.RUN AND (S05LOAD.RC = 0 OR S05LOAD.RC = 4) THEN
//S06REBU EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBAF,'A540769R.REBUI'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DBAF.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
REBUILD INDEX(
(ALL) TABLESPACE DA540769.APER21
)
SCOPE PENDING
STATISTICS
SORTDEVT SYSDA
WORKDDN(TSYUTD)
// ENDIF
// IF S06REBU.RUN AND S06REBU.RC = 0 THEN
//P07REBI EXEC PGM=IKJEFT01
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTSXX DD *
alter tablespace DA540769.APER21
//SYSTSIN DD *
DSN SYS(DBAF)
-- generating rebinds in DBAF at 16:22:05 13/03/13 for A540769
-- for 1 tablespace, 1 table, 1 view, 7 index, 0 alias, 0 synonym
-- tablespace DA540769.APER21
-- table A540769.TPER21A1
-- view A540769.VPER21A1V
-- index A540769.IPER21A0
-- index A540769.IPER21A1
-- index A540769.IPER21A2
-- index A540769.IPER21A3
-- index A540769.IPER21A4
-- index A540769.IPER21A5
-- index A485020.IPER21A5
// ENDIF
}¢--- DSN.TX.CASE(PER21UNL) cre=2013-02-05 mod=2013-02-05-13.24.28 A540769 -----
//A540769V JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//***************************************************
//* UNLOAD COPY
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBOF,'A540769.UNLOAC'),
// REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSTEMPL DD DSN=DBOF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE TREC DSN('A540769.TMPUL.PER21.P&PART..UNL')
DATACLAS (NULL30) MGMTCLAS(COM#A092)
SPACE (10,1250) CYL
TEMPLATE TPUN DSN('A540769.TMPUL.PER21.P&PART..PUN')
DATACLAS (NULL12) MGMTCLAS(COM#A092)
SPACE (10,250) CYL
UNLOAD FROM TABLE OA1P.TNZ240A1
PUNCHDDN TPUN UNLDDN TREC
SHRLEVEL CHANGE ISOLATION UR
}¢--- DSN.TX.CASE(PER22) cre=2013-07-15 mod=2013-07-15-15.12.09 A540769 --------
* db mit mittelvielen Daten
=stoGr1=GSMS
=stoGr2=GSMS
=stoGr3=GSMS
creDb trg 1
}¢--- DSN.TX.CASE(PER22DDL) cre=2013-07-15 mod=2014-12-09-09.59.52 A540769 -----
-- testcase tnz240 repartitionierung -------------------------
set current sqlid = 'S100447';
DROP TABLESPACE $db.aPer22ts ;
DROP TABLESPACE $db.aPer22tb ;
DROP TABLESPACE $db.aPer22co ;
COMMIT ;
;
$@¢
if $phase >= 1 then $@=¢
--
CREATE TABLESPACE aPer22ts
IN $db
USING STOGROUP $stoGr1
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 0
GBPCACHE CHANGED
TRACKMOD NO
LOGGED
SEGSIZE 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID unicode
DEFINE YES
MAXROWS 255;
--
CREATE TABLE $creator.tper22Ts
as (select * from sysibm.sysTableSpace) with no data
in $db.aPer22ts
;
CREATE INDEX $creator.iper22ts1
ON $creator.tper22ts
(dbName, Name)
USING STOGROUP $stoGr1
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES;
CREATE INDEX $creator.iper22ts2
ON $creator.tper22ts
(partitions, dbName, name)
USING STOGROUP $stoGr1
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES;
CREATE TABLESPACE aPer22tb
IN $db
USING STOGROUP $stoGr2
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 0
GBPCACHE CHANGED
TRACKMOD NO
LOGGED
SEGSIZE 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID unicode
DEFINE YES
MAXROWS 255;
--
CREATE TABLE $creator.tper22Tb
as (select * from sysibm.sysTables) with no data
in $db.aPer22tb
;
CREATE INDEX $creator.iper22tb1
ON $creator.tper22tb
(creator, name)
USING STOGROUP $stoGr2
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES;
CREATE INDEX $creator.iper22tb2
ON $creator.tper22tb
(dbName, name)
USING STOGROUP $stoGr2
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES;
CREATE TABLESPACE aPer22co
IN $db
USING STOGROUP $stoGr3
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 0
GBPCACHE CHANGED
TRACKMOD NO
LOGGED
SEGSIZE 64
BUFFERPOOL BP32K
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID unicode
DEFINE YES
MAXROWS 255;
--
CREATE TABLE $creator.tper22Co
as (select * from sysibm.sysColumns) with no data
in $db.aPer22co
;
CREATE INDEX $creator.iper22co1
ON $creator.tper22co
(tbcreator, tbname, name)
USING STOGROUP $stoGr3
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES;
CREATE INDEX $creator.iper22co2
ON $creator.tper22co
(coltype, name, tbcreator, tbName)
USING STOGROUP $stoGr3
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES;
commit;
$@do c=1 to 3 $@=¢
insert into $creator.tPer22Ts
select * from sysibm.sysTablespace;
commit;
insert into $creator.tPer22tb
select * from sysibm.sysTables;
commit;
insert into $creator.tPer22co
select * from sysibm.sysColumns;
commit;
$!
$@do d=1 to -1 $@=¢
insert into $creator.tPer22Ts
select * from $creator.tPer22Ts ;
commit;
insert into $creator.tPer22tb
select * from $creator.tPer22tb ;
commit;
insert into $creator.tPer22co
select * from $creator.tPer22co ;
commit;
$!
$!
$!
}¢--- DSN.TX.CASE(PER22LOA) cre=2013-07-15 mod=2013-07-15-15.57.41 A540769 -----
//A540769W JOB (CP00,KE50),'DB2 REO', 00010000
// MSGCLASS=T,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M 00030000
//*MAIN CLASS=LOG 00040000
//S1 EXEC PGM=DSNUTILB,PARM='DVBP,A540769L.LOAD' 00020001
//SYSMAP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSERR DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DVBP.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE TSYUTDS DSN('&SSID..&DB..&SN..P&PART(2)..D&TIME..SYSUT1')
DATACLAS(NULL12) MGMTCLAS(COM#E000)
SPACE(2000,2000) CYL UNCNT 59
TEMPLATE TSOUTDS DSN('&SSID..&DB..&SN..P&PART(2)..D&DATE(3)..SRTOUT')
DATACLAS(NULL12) MGMTCLAS(COM#E000)
SPACE(2000,2000) CYL UNCNT 59
EXEC SQL
DECLARE CUR1 CURSOR FOR
SELECT * FROM SYSIBM.SYSCOLUMNS
UNION ALL SELECT * FROM SYSIBM.SYSCOLUMNS
WITH UR
ENDEXEC
LOAD DATA INCURSOR CUR1 LOG NO RESUME YES
SORTDEVT DISK SORTNUM 50
WORKDDN(TSYUTDS,TSOUTDS)
INTO TABLE A540769.TPER22CO
COPY TABLESPACE DA540769.APER22CO
COPYDDN TCOPYD FULL YES
}¢--- DSN.TX.CASE(PER23) cre= mod= ---------------------------------------------
* decFloat
creDb src 1
+ ok creDb DSN.TX.GENF(PER23s1) ::f
}¢--- DSN.TX.CASE(PER23DDL) cre=2013-08-09 mod=2013-08-09-15.58.54 A540769 -----
-- testcase tnz240 repartitionierung -------------------------
set current sqlid = 'S100447';
DROP TABLESPACE $db.aper23ts ;
COMMIT ;
;
$@¢
if $phase >= 1 then $@=¢
--
CREATE TABLESPACE aper23ts
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 0
GBPCACHE CHANGED
TRACKMOD NO
LOGGED
SEGSIZE 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID unicode
DEFINE YES
MAXROWS 255;
--
CREATE TABLE $creator.tper23Ts
(text char(20) not null
,decFl decFloat(34) not null
)
in $db.aper23ts
;
insert into $creator.tper23Ts values ('eins', 12.34);
commit;
$!
$!
}¢--- DSN.TX.CASE(PER24) cre=2013-08-21 mod=2013-08-21-12.19.32 A540769 --------
* different ts types: s1 segmented
* c1 classis partitioned
* g1 partition by growth
* p1 partition by range
creDb trg 1
+ ok creDb DSN.TX.GENF(PER24t1) ::f
}¢--- DSN.TX.CASE(PER24ALT) cre=2013-09-16 mod=2013-10-01-09.51.24 A540769 -----
set current sqlid = 'S100447';
alter tablespace dA540769.APER24C1
segsize 32
;
commit
;x; ------------------------------------------------
alter tablespace dA540769.APER24S1
maxpartitions 5
;
alter tablespace dA540769.APER24C1
segsize 32
;
alter tablespace dA540769.APER24G1
bufferpool bp32k
;
commit
;
;x; ------------------------------------------------
set current sqlid = 'S100447';
alter index A540769.IPER24C1
alter partition 5 pctFree 22
;
alter index A540769.IPER24G1
pctFree 22
;
commit
;x; ------------------------------------------------
set current sqlid = 'S100447';
alter index A540769.IPER24C1 bufferpool bp1
;
alter index A540769.IPER24G1 piecesize 1 G
;
commit
}¢--- DSN.TX.CASE(PER24DDL) cre=2013-08-21 mod=2013-08-21-12.19.36 A540769 -----
-- testcase tnz240 repartitionierung -------------------------
set current sqlid = 'S100447';
DROP TABLESPACE $db.aper24s1 ;
DROP TABLESPACE $db.aper24c1 ;
DROP TABLESPACE $db.aper24g1 ;
DROP TABLESPACE $db.aper24p1 ;
COMMIT ;
;
$@¢
if $phase >= 1 then $@=¢
--
CREATE TABLESPACE aper24S1
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 0
GBPCACHE CHANGED
TRACKMOD NO
LOGGED
SEGSIZE 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID ebcdic
DEFINE YES
MAXROWS 255;
--
CREATE TABLESPACE aper24C1
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 0
GBPCACHE CHANGED
TRACKMOD NO
LOGGED
SEGSIZE 0
numParts 7
dsSize 1G
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID ebcdic
DEFINE YES
MAXROWS 255;
--
CREATE TABLESPACE aper24G1
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 0
GBPCACHE CHANGED
TRACKMOD NO
LOGGED
SEGSIZE 64
maxPartitions 16
dsSize 1G
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID ebcdic
DEFINE YES
MAXROWS 255;
--
CREATE TABLESPACE aper24P1
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 0
GBPCACHE CHANGED
TRACKMOD NO
LOGGED
SEGSIZE 64
numParts 7
dsSize 1G
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID ebcdic
DEFINE YES
MAXROWS 255;
--
CREATE TABLE $creator.tper24S1
(part int not null
,key char(20) not null
,text varchar(2000) not null
)
in $db.aper24S1
;
CREATE INDEX $creator.iper24s1
ON $creator.tper24S1
(part, key)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
CLUSTER
COMPRESS NO
BUFFERPOOL BP1
;
CREATE TABLE $creator.tper24C1
(part int not null
,key char(20) not null
,text varchar(2000) not null
)
in $db.aper24C1
partition by (part)
( partition 1 ending at(100)
$@do px=2 to 7 $@=¢
, partition $px ending at($-¢100*$px$!)
$!
)
;
CREATE INDEX $creator.iper24c1
ON $creator.tper24C1
(part, key)
partitioned
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
CLUSTER
COMPRESS NO
BUFFERPOOL BP1
;
CREATE TABLE $creator.tper24G1
(part int not null
,key char(20) not null
,text varchar(2000) not null
)
in $db.aper24G1
;
CREATE INDEX $creator.iper24G1
ON $creator.tper24G1
(part, key)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
CLUSTER
COMPRESS NO
BUFFERPOOL BP1
;
CREATE TABLE $creator.tper24P1
(part int not null
,key char(20) not null
,text varchar(2000) not null
)
in $db.aper24P1
partition by (part)
( partition 1 ending at(100)
$@do px=2 to 7 $@=¢
, partition $px ending at($-¢100*$px$!)
$!
)
;
CREATE INDEX $creator.iper24p1
ON $creator.tper24P1
(part, key)
partitioned
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
CLUSTER
COMPRESS NO
BUFFERPOOL BP1
;
commit;
$!
$!
}¢--- DSN.TX.CASE(PER24DEG) cre=2013-09-13 mod=2013-09-17-11.34.01 A540769 -----
//A540769G JOB (CP00,KE50), 00010001
// MSGCLASS=T,TIME=1440,
// NOTIFY=A540769
//*MAIN CLASS=LOG0 SYSTEM=S12
//S01 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99 00020001
//SYSTSIN DD *
DSN SYSTEM(DBAF)
RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2)
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
lock table A540769.tper24G1 in exclusive mode;
delete from A540769.tper24G1
where -- part between 1 and 100
mod(part, 3) = 1
;
commit
//SYSIX DD *
;
lock table A540769.tper24G1 in exclusive mode;
delete from A540769.tper24G1
where part between 101 and 200
and mod(part, 3) = 1
;
commit
;
lock table A540769.tper24G1 in exclusive mode;
delete from A540769.tper24G1
where part between 201 and 300
and mod(part, 3) = 0
;
commit
;
lock table A540769.tper24G1 in exclusive mode;
delete from A540769.tper24G1
where part between 301 and 400
and mod(part, 3) = 0
;
commit
;
lock table A540769.tper24G1 in exclusive mode;
delete from A540769.tper24G1
where part between 401 and 500
and mod(part, 3) = 0
;
commit
;
lock table A540769.tper24G1 in exclusive mode;
delete from A540769.tper24G1
where part between 501 and 600
and mod(part, 3) = 0
;
commit
;
lock table A540769.tper24G1 in exclusive mode;
delete from A540769.tper24G1
where part between 601 and 700
and mod(part, 3) = 0
;
commit
;
lock table A540769.tper24G1 in exclusive mode;
delete from A540769.tper24G1
where part between 701 and 800
and mod(part, 3) = 0
;
commit
;
lock table A540769.tper24G1 in exclusive mode;
delete from A540769.tper24G1
where part between 801 and 900
and mod(part, 3) = 0
;
commit
;
lock table A540769.tper24G1 in exclusive mode;
delete from A540769.tper24G1
where part > 900
and mod(part, 3) = 0
;
commit
;
}¢--- DSN.TX.CASE(PER24DER) cre=2013-09-13 mod=2013-09-16-14.38.48 A540769 -----
//A540769P JOB (CP00,KE50), 00010001
// MSGCLASS=T,TIME=1440,
// NOTIFY=A540769
//*MAIN CLASS=LOG0 SYSTEM=S12
//S01 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99 00020001
//SYSTSIN DD *
DSN SYSTEM(DBAF)
RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2)
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
lock table A540769.tper24P1 in exclusive mode;
delete from A540769.tper24P1
where -- part between 1 and 100
where part <= 100
mod(part, 4) = 2
;
commit
;
lock table A540769.tper24P1 in exclusive mode;
delete from A540769.tper24P1
where part between 101 and 200
and mod(part, 4) = 2
;
commit
;
lock table A540769.tper24P1 in exclusive mode;
delete from A540769.tper24P1
where part between 201 and 300
and mod(part, 4) = 2
;
commit
;
lock table A540769.tper24P1 in exclusive mode;
delete from A540769.tper24P1
where part between 301 and 400
and mod(part, 4) = 2
;
commit
;
lock table A540769.tper24P1 in exclusive mode;
delete from A540769.tper24P1
where part between 401 and 500
and mod(part, 4) = 2
;
commit
;
lock table A540769.tper24P1 in exclusive mode;
delete from A540769.tper24P1
where part between 501 and 600
and mod(part, 4) = 2
;
commit
;
lock table A540769.tper24P1 in exclusive mode;
delete from A540769.tper24P1
where part between 601 and 700
and mod(part, 4) = 2
;
commit
;
lock table A540769.tper24P1 in exclusive mode;
delete from A540769.tper24P1
where part between 701 and 800
and mod(part, 4) = 2
;
commit
;
lock table A540769.tper24P1 in exclusive mode;
delete from A540769.tper24P1
where part between 801 and 900
and mod(part, 4) = 2
;
commit
;
lock table A540769.tper24P1 in exclusive mode;
delete from A540769.tper24P1
where part > 900
and mod(part, 4) = 2
;
commit
;
}¢--- DSN.TX.CASE(PER24INP) cre=2013-09-13 mod=2013-09-13-16.52.50 A540769 -----
//A540769P JOB (CP00,KE50), 00010001
// MSGCLASS=T,TIME=1440,
// NOTIFY=A540769
//*MAIN CLASS=LOG0 SYSTEM=S12
//S01 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99 00020001
//SYSTSIN DD *
DSN SYSTEM(DBAF)
RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2)
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
lock table A540769.tper24P1 in exclusive mode;
insert into A540769.tper24P1
select * from A540769.tper24P1
where part between 301 and 400
fetch first 1000000 rows only
;
commit
;
insert into A540769.tper24P1
select * from A540769.tper24P1
where part between 301 and 400
fetch first 1000000 rows only
;
commit
}¢--- DSN.TX.CASE(PER24INS) cre=2013-09-13 mod=2013-09-14-11.07.56 A540769 -----
//A540769G JOB (CP00,KE50), 00010001
// MSGCLASS=T,TIME=1440,
// NOTIFY=A540769
//*MAIN CLASS=LOG0 SYSTEM=S12
//S01 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99 00020001
//SYSTSIN DD *
DSN SYSTEM(DBAF)
RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2)
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
lock table A540769.tper24G1 in exclusive mode;
insert into A540769.tper24G1
select * from A540769.tper24G1 fetch first 1000000 rows only
;
commit
;
lock table A540769.tper24G1 in exclusive mode;
insert into A540769.tper24G1
select * from A540769.tper24G1 fetch first 1000000 rows only
;
commit
}¢--- DSN.TX.CASE(PER24LOA) cre=2013-08-21 mod=2013-08-21-13.10.26 A540769 -----
//A540769L JOB (CP00,KE50), 00010001
// MSGCLASS=T,TIME=1440,LINES=(999999,WARNING),
// NOTIFY=&SYSUID
//*MAIN CLASS=LOG0
//S1 EXEC PGM=DSNUTILB,PARM='DBAF,A540769L.LOAD' 00020001
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBAF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
EXEC SQL
DECLARE C1 CURSOR FOR
with n (n) as
( select 1 from sysibm.sysDummy1
union all select n+1 from n where n < 9
)
, a as
(
select name, tbcreator, tbname, row_number() over () r
from sysibm.syscolumns, n
)
select value(mod(r, 700), 999) part,
left(name, 20) key,
repeat(strip(char(r)) || ':' || strip(tbCreator)
|| '.' || strip(tbName) || '&' || strip(name)
|| ' ' , 20) text
from a
ENDEXEC
LOAD DATA LOG NO -- RESUME NO REPLACE COPYDDN(TCOPYD)
INCURSOR C1 REPLACE COPYDDN(TCOPYS)
STATISTICS INDEX ALL
SORTKEYS
SORTDEVT DISK
WORKDDN(TSYUTS,TSOUTS)
INTO TABLE A540769.TPER24S1
LOAD DATA LOG NO -- RESUME NO REPLACE COPYDDN(TCOPYD)
INCURSOR C1 REPLACE COPYDDN(TCOPYS)
STATISTICS INDEX ALL
SORTKEYS
SORTDEVT DISK
WORKDDN(TSYUTS,TSOUTS)
INTO TABLE A540769.TPER24C1
LOAD DATA LOG NO -- RESUME NO REPLACE COPYDDN(TCOPYD)
INCURSOR C1 REPLACE COPYDDN(TCOPYS)
STATISTICS INDEX ALL
SORTKEYS
SORTDEVT DISK
WORKDDN(TSYUTS,TSOUTS)
INTO TABLE A540769.TPER24G1
LOAD DATA LOG NO -- RESUME NO REPLACE COPYDDN(TCOPYD)
INCURSOR C1 REPLACE COPYDDN(TCOPYS)
STATISTICS INDEX ALL
SORTKEYS
SORTDEVT DISK
WORKDDN(TSYUTS,TSOUTS)
INTO TABLE A540769.TPER24P1
}¢--- DSN.TX.CASE(PER24SEL) cre=2013-10-01 mod=2013-10-01-09.50.21 A540769 -----
select *
from A540769.tPer24C1
where part = 3 and key like 'optHi%'
;
update
A540769.tPer24C1 set key = 'optHi456'
where part = 3 and key like 'optHi%'
;
select *
from A540769.tPer24C1
where part = 3 and key like 'optHi%'
;
}¢--- DSN.TX.CASE(PER26) cre= mod= ---------------------------------------------
* test with data, ddl like tfi026
= parts = 10
creDb trg 1
+ ok creDb DSN.TX.GENF(PER26t1) ::f
}¢--- DSN.TX.CASE(PER26DDL) cre=2015-01-30 mod=2015-04-15-16.17.35 A540769 -----
DROP TABLESPACE $db.aper26 ;
COMMIT ;
;
$@¢
if $phase >= 1 then $@=¢
--
SET CURRENT SQLID = 'S100447';
CREATE TABLESPACE APER26
IN $db
BUFFERPOOL BP2
DSSIZE 16G
CLOSE NO
LOCKMAX SYSTEM
SEGSIZE 64
DEFINE YES
LOGGED
LOCKSIZE ANY
MAXROWS 255
CCSID EBCDIC
NUMPARTS $parts
USING STOGROUP GSMS
PRIQTY -1
SECQTY -1
ERASE NO
PCTFREE 5
FREEPAGE 5
GBPCACHE CHANGED
COMPRESS YES
TRACKMOD YES
;
CREATE TABLE $creator.TPer26
(
TKKEY DECIMAL(13, 0)
NOT NULL
,VERFALL DATE
NOT NULL
WITH DEFAULT '0001-01-01'
,BOERSE CHARACTER(12) FOR SBCS DATA
NOT NULL
,WHRG CHARACTER(4) FOR SBCS DATA
NOT NULL
,STATUS CHARACTER(1) FOR SBCS DATA
NOT NULL
,KURSDATUM DATE
NOT NULL
,MUT_TIMESTAMP TIMESTAMP (6) WITHOUT TIME ZONE
NOT NULL
WITH DEFAULT
,TK_KURSTYP CHARACTER(5) FOR SBCS DATA
NOT NULL
WITH DEFAULT
,TK_ZUSATZ CHARACTER(5) FOR SBCS DATA
NOT NULL
WITH DEFAULT
,CS_KA_NUM CHARACTER(2) FOR SBCS DATA
NOT NULL
WITH DEFAULT
,KURS_LIEFERUNG DECIMAL(31, 15)
NOT NULL
WITH DEFAULT
,KURS_UMRECHNUNG DECIMAL(31, 15)
NOT NULL
WITH DEFAULT
,MENGE DECIMAL(31, 15)
NOT NULL
WITH DEFAULT
,BOERSE_TK CHARACTER(12) FOR SBCS DATA
NOT NULL
WITH DEFAULT
,ERSTELLUNG TIMESTAMP (6) WITHOUT TIME ZONE
NOT NULL
WITH DEFAULT
,QUELLE CHARACTER(10) FOR SBCS DATA
NOT NULL
WITH DEFAULT
,LOG_EINTRAG CHARACTER(8) FOR SBCS DATA
NOT NULL
WITH DEFAULT USER
,INSTRAD CHARACTER(8) FOR SBCS DATA
NOT NULL
WITH DEFAULT
,KS_BPL_ST CHARACTER(1) FOR SBCS DATA
NOT NULL
WITH DEFAULT '0'
,KS_BPL_HT CHARACTER(1) FOR SBCS DATA
NOT NULL
WITH DEFAULT '0'
,KS_BPL_KS CHARACTER(1) FOR SBCS DATA
NOT NULL
WITH DEFAULT '0'
,KS_ALT_KS CHARACTER(1) FOR SBCS DATA
NOT NULL
WITH DEFAULT '0'
,KS_BPL_HA CHARACTER(1) FOR SBCS DATA
NOT NULL
WITH DEFAULT '0'
,KS_AIS_SP CHARACTER(1) FOR SBCS DATA
NOT NULL
WITH DEFAULT '0'
,KS_BPL_IN CHARACTER(1) FOR SBCS DATA
NOT NULL
WITH DEFAULT '0'
,KS_BPL_SP CHARACTER(1) FOR SBCS DATA
NOT NULL
WITH DEFAULT '0'
,EXCODE CHARACTER(2) FOR SBCS DATA
NOT NULL
WITH DEFAULT '00'
,CONSTRAINT TKKEY PRIMARY KEY
(TKKEY
,VERFALL
,BOERSE
,WHRG
,STATUS
,KURSDATUM
,MUT_TIMESTAMP
)
)
IN $db.aPer26
APPEND NO
NOT VOLATILE CARDINALITY
DATA CAPTURE CHANGES
AUDIT NONE
CCSID EBCDIC
PARTITION BY RANGE
(TKKEY NULLS LAST ASC
)
( PARTITION 1 ending ( 1000000000 )
$do px=2 to $parts $@=¢
, PARTITION $px ending ( ${px}000000000 )
$!
);
CREATE UNIQUE INDEX $creator.iper26
ON $creator.Tper26
(TKKEY ASC
,VERFALL ASC
,BOERSE ASC
,WHRG ASC
,STATUS ASC
,KURSDATUM DESC
,MUT_TIMESTAMP DESC
)
CLUSTER
PARTITIONED
DEFINE YES
COMPRESS NO
BUFFERPOOL BP1
CLOSE NO
DEFER NO
COPY NO
USING STOGROUP GSMS
PRIQTY -1
SECQTY -1
ERASE NO
FREEPAGE 0
PCTFREE 5
GBPCACHE CHANGED
;
commit;
$!
$!
}¢--- DSN.TX.CASE(PER26LOA) cre=2015-01-30 mod=2015-04-15-17.19.57 A540769 -----
$#:
$<dsn.tx.case(ini)
$=ini =. $.^¢compile = : $!
$@% ini trg
$<>
>. fEdit()
do px = 1 to 10 $@=¢
$=job=- userid()substr(m.ut_alfUC, 1 + px // 3 , 1)
//$job JOB (CP00,KE50),'DB2 REO',
// MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M,SCHENV=$schenv
//*MAIN CLASS=LOG
//S1 EXEC PGM=DSNUTILB,PARM='$dbSys,$job.LOAD'
//SYSMAP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSERR DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=$dbSys.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
EXEC SQL
DECLARE CUR1 CURSOR FOR
with l (l) as
(
select 0 from sysibm.SysDummy1
union all select l+1 from l where l < 7
)
, q as
(
select rand($px) r
, strip(tbCreator) || '.' || strip(tbName)
|| '?' || strip(name) || '#' || colNo || '@' || colType ||'*' t
from sysibm.sysColumns c, l
)
, t as
(
select
int(r * 1000000) i, row_number() over () j, r,
substr(repeat(t, 1 + 1037 / length(t)), 1 + floor(r*37)) t
from q
)
select -- l, rand(), rand(1), rand(3456), rand(98745)
value(${px}000000000 - 1 - mod(i, 987654), ${px}555) tkKey
, current date + mod(i, 929) days verfall
, value(substr(t, 1, 12), 'boerse') boerse
, value(substr(t, 13, 4), 'whrg') whrg
, value(substr(t, 14, 1), 's') status
, value(current date - mod(i, 923) days, current date) kursDatum
, value(current timestamp - mod(i, 919) days +(0.000001*j) seconds
, current timestamp) mut_timestamp
, value(substr(t, 15, 5), 'kursT') tk_kursTyp
, value(substr(t, 20, 5), 'zusat') tk_zusatz
, value(substr(t, 25, 2), 'ka') cs_ka_num
, value(r * 27913, 27.913) kurs_lieferung
, r * 43907 kurs_umrechnung
, r * 47899 menge
, substr(t, 27, 12) boerse_tk
, current timestamp - mod(i, 897) days erstellung
, substr(t, 39, 10) quelle
, substr(t, 49, 8) LOG_EINTRAG
, substr(t, 57, 8) INSTRAD
, substr(t, 65, 1) KS_BPL_ST
, substr(t, 66, 1) KS_BPL_HT
, substr(t, 67, 1) KS_BPL_KS
, substr(t, 68, 1) KS_ALT_KS
, substr(t, 69, 1) KS_BPL_HA
, substr(t, 70, 1) KS_AIS_SP
, substr(t, 71, 1) KS_BPL_IN
, substr(t, 72, 1) KS_BPL_SP
, substr(t, 73, 2) EXCODE
from t
ENDEXEC
LOAD DATA LOG NO
SORTDEVT DISK
WORKDDN(TSYUTS,TSOUTS)
INTO TABLE $cr.TPER26 PART $px
INCURSOR CUR1 RESUME NO REPLACE COPYDDN(TCOPYD)
$!
}¢--- DSN.TX.CASE(PER26RE1) cre=2015-01-30 mod=2015-04-15-15.58.37 A540769 -----
$#=
$<dsn.tx.case(ini)
$=ini =. $.^¢compile = : $!
$@% ini trg
$<>
$>. fSub()
//A540769R JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M,SCHENV=$schenv
//*MAIN CLASS=LOG
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=($dbSys,'A540769R.REORG'),
// REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=$dbSys.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
LISTDEF LST#REO INCLUDE TABLESPACE $db.APER26 PARTLEVEL
REORG TABLESPACE LIST LST#REO
LOG NO
SORTDATA
COPYDDN(TCOPYD)
SHRLEVEL CHANGE
MAPPINGTABLE S100447.MAPTAB03
MAXRO 300
DRAIN ALL
DELAY 1500
TIMEOUT TERM
UNLOAD CONTINUE
PUNCHDDN TPUNCH
DISCARDDN TDISCA
SORTKEYS
SORTDEVT DISK
STATISTICS
INDEX ALL KEYCARD
REPORT NO UPDATE ALL
}¢--- DSN.TX.CASE(PER26RE3) cre=2015-02-02 mod=2015-02-02-14.03.00 A540769 -----
//A540769R JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2
//*MAIN CLASS=LOG
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DP4G,'A540769T.REORG'),
// REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DP4G.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
LISTDEF LST#REO INCLUDE TABLESPACE QTXDBY.APER26 PARTLEVEL
REORG TABLESPACE LIST LST#REO
LOG NO
SORTDATA
COPYDDN(TCOPYD)
SHRLEVEL CHANGE
MAPPINGTABLE S100447.MAPTAB03
MAXRO 300
DRAIN ALL
DELAY 1500
TIMEOUT TERM
UNLOAD CONTINUE
PUNCHDDN TPUNCH
DISCARDDN TDISCA
SORTKEYS
STATISTICS
INDEX ALL
KEYCARD FREQVAL NUMCOLS 1 COUNT 10
FREQVAL NUMCOLS 2 COUNT 10
FREQVAL NUMCOLS 3 COUNT 10
FREQVAL NUMCOLS 4 COUNT 10
FREQVAL NUMCOLS 5 COUNT 10
FREQVAL NUMCOLS 6 COUNT 10
FREQVAL NUMCOLS 7 COUNT 10
FREQVAL NUMCOLS 8 COUNT 10
FREQVAL NUMCOLS 9 COUNT 10
FREQVAL NUMCOLS 10 COUNT 10
REPORT NO UPDATE ALL
}¢--- DSN.TX.CASE(PER26RE5) cre=2015-01-30 mod=2015-01-30-13.40.43 A540769 -----
//A540769R JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2
//*MAIN CLASS=LOG
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DP4G,'A540769T.REORG'),
// REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DP4G.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
LISTDEF LST#REO INCLUDE TABLESPACE QTXDBY.APER26 PARTLEVEL
REORG TABLESPACE LIST LST#REO
LOG NO
SORTDATA
COPYDDN(TCOPYD)
SHRLEVEL CHANGE
MAPPINGTABLE S100447.MAPTAB03
MAXRO 300
DRAIN ALL
DELAY 1500
TIMEOUT TERM
UNLOAD CONTINUE
PUNCHDDN TPUNCH
DISCARDDN TDISCA
SORTKEYS
STATISTICS
TABLE(ALL)
INDEX ALL KEYCARD
REPORT NO UPDATE ALL
}¢--- DSN.TX.CASE(PER26RE7) cre=2015-01-30 mod=2015-01-30-14.43.49 A540769 -----
//A540769R JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2
//*MAIN CLASS=LOG
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DP4G,'A540769T.REORG'),
// REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DP4G.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
LISTDEF LST#REO INCLUDE TABLESPACE QTXDBY.APER26 PARTLEVEL
REORG TABLESPACE QTXDBY.APER26
LOG NO
SORTDATA
COPYDDN(TCOPYD)
SHRLEVEL CHANGE
MAPPINGTABLE S100447.MAPTAB03
MAXRO 300
DRAIN ALL
DELAY 1500
TIMEOUT TERM
UNLOAD CONTINUE
PUNCHDDN TPUNCH
DISCARDDN TDISCA
SORTKEYS
STATISTICS
TABLE(QTXCRY.TPER26)
COLUMN ALL
COLGROUP(TKKEY ) FREQVAL 10 MOST ,
COLGROUP(VERFALL ) FREQVAL 10 MOST ,
COLGROUP(BOERSE ) FREQVAL 10 MOST ,
COLGROUP(WHRG ) FREQVAL 10 MOST ,
COLGROUP(STATUS ) FREQVAL 10 MOST ,
COLGROUP(KURSDATUM ) FREQVAL 10 MOST ,
COLGROUP(MUT_TIMESTAM ) FREQVAL 10 MOST ,
COLGROUP(TK_KURSTYP ) FREQVAL 10 MOST ,
COLGROUP(TK_ZUSATZ ) FREQVAL 10 MOST ,
COLGROUP(CS_KA_NUM ) FREQVAL 10 MOST ,
COLGROUP(KURS_LIEFERUNG ) FREQVAL 10 MOST ,
COLGROUP(KURS_UMRECHNUNG ) FREQVAL 10 MOST ,
COLGROUP(MENGE ) FREQVAL 10 MOST ,
COLGROUP(BOERSE_TK ) FREQVAL 10 MOST ,
COLGROUP(ERSTELLUNG ) FREQVAL 10 MOST ,
COLGROUP(QUELLE ) FREQVAL 10 MOST ,
COLGROUP(LOG_EINTRAG ) FREQVAL 10 MOST ,
COLGROUP(INSTRAD ) FREQVAL 10 MOST ,
COLGROUP(KS_BPL_ST ) FREQVAL 10 MOST ,
COLGROUP(KS_BPL_HT ) FREQVAL 10 MOST ,
COLGROUP(KS_BPL_KS ) FREQVAL 10 MOST ,
COLGROUP(KS_ALT_KS ) FREQVAL 10 MOST ,
COLGROUP(KS_BPL_HA ) FREQVAL 10 MOST ,
COLGROUP(KS_AIS_SP ) FREQVAL 10 MOST ,
COLGROUP(KS_BPL_IN ) FREQVAL 10 MOST ,
COLGROUP(KS_BPL_SP ) FREQVAL 10 MOST ,
COLGROUP(EXCODE ) FREQVAL 10 MOST
INDEX ALL KEYCARD
REPORT NO UPDATE ALL
}¢--- DSN.TX.CASE(PER26RU1) cre=2015-01-30 mod=2015-01-30-14.58.00 A540769 -----
//A540769R JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2
//*MAIN CLASS=LOG
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DP4G,'A540769T.REORG'),
// REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DP4G.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
LISTDEF LST#REO INCLUDE TABLESPACE QTXDBY.APER26 PARTLEVEL
RUNSTATS TABLESPACE QTXDBY.APER26
SHRLEVEL CHANGE
INDEX ALL KEYCARD
REPORT NO UPDATE ALL
}¢--- DSN.TX.CASE(PER26RU3) cre=2015-02-02 mod=2015-02-02-13.59.12 A540769 -----
//A540769R JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2
//*MAIN CLASS=LOG
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DP4G,'A540769T.REORG'),
// REGION=0M
//SYSPRINT DD SYSOUT=*
//RNPRIN01 DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DP4G.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
LISTDEF LST#REO INCLUDE TABLESPACE QTXDBY.APER26 PARTLEVEL
RUNSTATS TABLESPACE QTXDBY.APER26
SHRLEVEL CHANGE
-- TABLE(QTXCRY.TPER26)
INDEX ALL
KEYCARD FREQVAL NUMCOLS 1 COUNT 10 MOST
FREQVAL NUMCOLS 2 COUNT 10 MOST
FREQVAL NUMCOLS 3 COUNT 10 MOST
FREQVAL NUMCOLS 4 COUNT 10 MOST
FREQVAL NUMCOLS 5 COUNT 10 MOST
FREQVAL NUMCOLS 6 COUNT 10 MOST
FREQVAL NUMCOLS 7 COUNT 10 MOST
FREQVAL NUMCOLS 8 COUNT 10 MOST
FREQVAL NUMCOLS 9 COUNT 10 MOST
FREQVAL NUMCOLS 10 COUNT 10 MOST
REPORT NO UPDATE ALL
}¢--- DSN.TX.CASE(PER26RU5) cre=2015-01-30 mod=2015-01-30-14.48.50 A540769 -----
//A540769R JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2
//*MAIN CLASS=LOG
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DP4G,'A540769T.REORG'),
// REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DP4G.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
LISTDEF LST#REO INCLUDE TABLESPACE QTXDBY.APER26 PARTLEVEL
RUNSTATS TABLESPACE QTXDBY.APER26
SHRLEVEL CHANGE
TABLE(QTXCRY.TPER26)
COLUMN ALL
INDEX ALL KEYCARD
REPORT NO UPDATE ALL
}¢--- DSN.TX.CASE(PER26RU7) cre=2015-01-30 mod=2015-01-30-15.03.29 A540769 -----
//A540769R JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2
//*MAIN CLASS=LOG
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DP4G,'A540769T.REORG'),
// REGION=0M
//SYSPRINT DD SYSOUT=*
//RNPRIN01 DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DP4G.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
LISTDEF LST#REO INCLUDE TABLESPACE QTXDBY.APER26 PARTLEVEL
RUNSTATS TABLESPACE QTXDBY.APER26
SHRLEVEL CHANGE
TABLE(QTXCRY.TPER26)
COLUMN ALL
COLGROUP(TKKEY ) FREQVAL COUNT 10 MOST ,
COLGROUP(VERFALL ) FREQVAL COUNT 10 MOST ,
COLGROUP(BOERSE ) FREQVAL COUNT 10 MOST ,
COLGROUP(WHRG ) FREQVAL COUNT 10 MOST ,
COLGROUP(STATUS ) FREQVAL COUNT 10 MOST ,
COLGROUP(KURSDATUM ) FREQVAL COUNT 10 MOST ,
COLGROUP(MUT_TIMESTAMP ) FREQVAL COUNT 10 MOST ,
COLGROUP(TK_KURSTYP ) FREQVAL COUNT 10 MOST ,
COLGROUP(TK_ZUSATZ ) FREQVAL COUNT 10 MOST ,
COLGROUP(CS_KA_NUM ) FREQVAL COUNT 10 MOST ,
COLGROUP(KURS_LIEFERUNG ) FREQVAL COUNT 10 MOST ,
COLGROUP(KURS_UMRECHNUNG ) FREQVAL COUNT 10 MOST ,
COLGROUP(MENGE ) FREQVAL COUNT 10 MOST ,
COLGROUP(BOERSE_TK ) FREQVAL COUNT 10 MOST ,
COLGROUP(ERSTELLUNG ) FREQVAL COUNT 10 MOST ,
COLGROUP(QUELLE ) FREQVAL COUNT 10 MOST ,
COLGROUP(LOG_EINTRAG ) FREQVAL COUNT 10 MOST ,
COLGROUP(INSTRAD ) FREQVAL COUNT 10 MOST ,
COLGROUP(KS_BPL_ST ) FREQVAL COUNT 10 MOST ,
COLGROUP(KS_BPL_HT ) FREQVAL COUNT 10 MOST ,
COLGROUP(KS_BPL_KS ) FREQVAL COUNT 10 MOST ,
COLGROUP(KS_ALT_KS ) FREQVAL COUNT 10 MOST ,
COLGROUP(KS_BPL_HA ) FREQVAL COUNT 10 MOST ,
COLGROUP(KS_AIS_SP ) FREQVAL COUNT 10 MOST ,
COLGROUP(KS_BPL_IN ) FREQVAL COUNT 10 MOST ,
COLGROUP(KS_BPL_SP ) FREQVAL COUNT 10 MOST ,
COLGROUP(EXCODE ) FREQVAL COUNT 10 MOST
INDEX ALL KEYCARD
REPORT NO UPDATE ALL
}¢--- DSN.TX.CASE(QBCDPEXP) cre=2014-06-05 mod=2014-06-05-10.27.42 A540769 -----
--- temporary explain --------------------------------------------------
set current sqlid = 'A540769';
delete from A540769.plan_table;
delete from A540769.DSN_STATEMNT_TABLE;
delete from A540769.DSN_DetCost_TABLE ;
delete from A540769.dsn_filter_Table ;
delete from A540769.dsn_predicat_table;
explain plan set queryno = 3 for
select *
from oa1p.TCD150A1
where CD150001 = 'TRACE'
and
( ( CD150002 = 'CLIE'
and CD150003 = 'NTID'
)
or
(
CD150002 = 'PID '
and CD150003 = ' '
)
)
and
( substr(cd150011, 1, 8) = ?
or substr(cd150011, 1, 10) = ?
)
and CD150005 < ?
and CD150006 >= ?
;
select * from plan_view1
order by -- collid, progName, version, bind_time,
queryNo, qblockno, planno, mixOpSeq
;
select * from plan_view2
order by -- collid, progName, version, bind_time,
queryNo, qblockno, planno, mixOpSeq
;
select * from plan_view2det
order by -- collid, progName, version, bind_time,
queryNo, qblockno, planno, mixOpSeq
;
select *
from plan_viewPred
order by --collid, progName, applName, explain_time,
queryNo, qBlockNo, planno,
stage, predNo
with ur
;
rollback
;;;;
}¢--- DSN.TX.CASE(QBCDPPLB) cre= mod= ------------------------------------------
*process RULES(LAXSEMI); /* suppress semicolon-warning */
*process RULES(BYNAME) ; /* allow "by name" */
*process RULES(NOLAXIF); /* suppress conversion in boolean expression */
/**** ***************************************************************/
/* QZCDPUT = test version fuer performance test von YCDPUT3 */
/* */
/* Letzte Source-Änderung: 02. Oct. 2013 14:00 A959103 */
/* */
/********************************************************************/
/* */
/* Autor : Markus Niederhauser */
/* Datum : 18.01.2001 */
/* */
/*********************************************************************/
QZCDPUT: proc($parm) options(main);
%include pgmanfa;
dcl $parm char(80) varying;
dcl fun char(1);
dcl pliRetv builtin ;
/*********************************************************************/
/* Change-Log MDL095 2008-02-14 */
/*********************************************************************/
/* */
/*-------------------------------------------------------------------*/
/* Release Req./Ticket PID Text */
/*-------------------------------------------------------------------*/
/* Z1311080 PR014104JI-29 A959103 add CD57 getCifsLong_4.0 */
/* Z1308090 PRQ1348 A959103 add CA59 & CA60 */
/* PRQ1348 A727897 add RM38 */
/*-------------------------------------------------------------------*/
/* Z1305100 PRQ1262 A393014 add RM36 + RM37 */
/*-------------------------------------------------------------------*/
/* Z1302080 PRQ1123 A393014 Maintaining clientIds */
/* */
/* PRQ1123 mn@20121115 Markus Niederhauser */
/* add CD56 */
/* CD56: IF getCifsLong_3.0 */
/* PRQ1123 ad@20121220 Andreas Dahinden */
/* CA14, CI74: YYAUPRE changed to YCDAURA */
/*-------------------------------------------------------------------*/
/* Z1211090 PRQ1026 A393014 Maintaining clientIds */
/* */
/* PRQ1026 mn@20120913 Markus Niederhauser */
/* if clientId='' then ignore comparison */
/* PRQ1026 mn@20120718 Markus Niederhauser */
/* CA37, CA38, CA39 & CA40 add - YCDGETB */
/* - YCDOEFU */
/*-------------------------------------------------------------------*/
/* Z1208100 PRQ882 A393014 CA37, CA38 & CA39 add YCDGETB */
/* */
/* PRQ882 mn@20120608 Markus Niederhauser */
/* CA37, CA38 & CA39 add YCDGETB */
/*-------------------------------------------------------------------*/
/* Z1205110 PRQ757 A393014 CI70 maxAllowedInputSeq= 600¦ */
/* Z1205110 PRQ771 A959103 CD55 IF getCifsLong_2.0 */
/* Z1205110 PRQ770 A959103 CA14 IF searchCif_2.0 */
/* */
/* PRQ628 mn@20111024 Markus Niederhauser */
/* CI70: maxAllowedInputSeq= 600¦ */
/* PRQ771 ad@20120229 Andreas Dahinden */
/* CD55: IF getCifsLong_2.0 */
/* PRQ770 ad@20120229 Andreas Dahinden */
/* CA14: IF searchCif_2.0 */
/*-------------------------------------------------------------------*/
/* Z1202100 PRQ628 A393014 crm4rmicMaxNodes */
/* */
/* PRQ628 mn@20111024 Markus Niederhauser */
/* crm4rmicMaxNodes -> RM68 + RM50 */
/*-------------------------------------------------------------------*/
/* Z1109090 PRQ381 A393014 CA90+CA93:Maske */
/* */
/* PRQ381 mn@20110719 Markus Niederhauser */
/* CA90+CA93:Maske forApplUse_01 */
/*-------------------------------------------------------------------*/
/*--------------+--------+-------------------------------------------*/
/* CcYy-mm-dd ¦ OFR ¦ Name, Instradation */
/* NME@CcYyMmDd ¦ xxx.0 ¦ - Correction A */
/* NM@CcYyMmDd ¦ yyy.0 ¦ - Correction B */
/*--------------+--------+-------------------------------------------*/
/* 2010-08-13 ¦ ¦ Niederhauser Markus, KCAB 323 */
/* mn@20100510 ¦ 479.x ¦ - add the fields */
/* ¦ ¦ - currentDate */
/* ¦ ¦ - dayOfWeek */
/*--------------+--------+-------------------------------------------*/
/* 2010-05-14 ¦ ¦ Niederhauser Markus, KCAB 323 */
/* mn@20100310 ¦ 479.x ¦ - CI70 */
/* mn@20100302 ¦ 479.x ¦ - CD71 */
/* mn@20100107 ¦ 479.x ¦ - CI76 */
/* mn@20100107 ¦ 479.x ¦ - CD87 */
/*--------------+--------+-------------------------------------------*/
/* 2010-02-12 ¦ ¦ Niederhauser Markus, KCAB 323 */
/* mn@20100105 ¦ 479.x ¦ - CI88 */
/* mn@20091218 ¦ 479.x ¦ - RM98: Mail=Y */
/* mn@20091216 ¦ 479.x ¦ - RM84 */
/* mn@20091208 ¦ 479.x ¦ - CI90 + CI91 */
/* mn@20091111 ¦ 479.x ¦ - YDA0720 */
/* ¦ 479.x ¦ - CA51 + CA52 + CA53 + CA54 */
/*--------------+--------+-------------------------------------------*/
/* 2009-11-13 ¦ ¦ Niederhauser Markus, KCAB 323 */
/* mn@20090824 ¦ 479.x ¦ - YCD083A, C & D */
/*--------------+--------+-------------------------------------------*/
/* 2009-08-14 ¦ ¦ Niederhauser Markus, KCAB 323 */
/* mn@20090603 ¦ 479.x ¦ - YCD083B */
/*--------------+--------+-------------------------------------------*/
/* 2009-02-13 ¦ ¦ Shanthi Chinnadurai, KCAB 323 */
/* cs@20081106 ¦ 312.5 ¦ - RM0980R trace option */
/* mn@20081110 ¦ 312.5 ¦ - YCD080B */
/*--------------+--------+-------------------------------------------*/
/* 2008-05-09 ¦ ¦ Markus Niederhauser, KSFI 411 */
/* mn@20080310 ¦ 191.6 ¦ - Eliminate EPLI-Warnings */
/*--------------+--------+-------------------------------------------*/
/* 2007-11-09 ¦ ¦ Markus Niederhauser, KSFI 411 */
/* mn@20070705 ¦ 988.0 ¦ - explementation of @compvers */
/* gl20070813 ¦ 988.0 ¦ - Compvers included */
/* mn@20070913 ¦ 988.0 ¦ - explementation of ceetdli */
/*--------------+----------------------------------------------------*/
/* 2007-08-10 ¦ Markus Niederhauser, KSFA 521 */
/* mn@20070424 ¦ - TCD900A1 -> TCD153A1 */
/*--------------+----------------------------------------------------*/
/* 2007-05-11 ¦ Markus Niederhauser, KSFA 521 */
/* mn@20070323 ¦ - YRM065B-Process */
/*--------------+----------------------------------------------------*/
/* 2007-03-09 ¦ Markus Niederhauser, KSFA 521 */
/* mn@20061031 ¦ - TCD150 -> TCD900 */
/*--------------+----------------------------------------------------*/
/* 2006-03-10 ¦ Markus Niederhauser, KBIE 21 */
/* mn@20051221 ¦ - Init anpassen für _C__77_ */
/*--------------+----------------------------------------------------*/
/* */
/* 11.11.2005 Markus Niederhauser / KBIE 21 /* Start mn20050830 */
/* - CDADMIN erweitern mit Release-Nummer */
/* */
/* 12.08.2005 Markus Niederhauser / KBIE 21 /* Start tm 050406 */
/* - Region-Name in TCD150 einfügen */
/* */
/* 17.09.2004 Markus Niederhauser KASK 21 /* Start mn 040826 */
/* - Plausis überarbeiten */
/* - PID='NOSECUR ' zulassen */
/* */
/* 04.02.2002 Markus Niederhauser KASK 21 /* mn 040202 */
/* Erweiterung mit Array von PIDs */
/* */
/* */
/*********************************************************************/
/*********************************************************************/
/** **/
/*********************************************************************/
/** **/
/** A. Zusammenhang **/
/** =============== **/
/** Es gibt die Tabelle TCD150. Auf dieser Tabelle kann von Hand **/
/** spezifiziert werden, ob eine gewisse Transaktion in die **/
/** Region putten soll oder nicht. **/
/** **/
/** **/
/** **/
/** B. Zweck **/
/** ======== **/
/** - Das aufrufende Programm übergibt dem yCDPUT3 den Programm- **/
/** Namen (CD150001) und die Version (CD150003). **/
/** - yCDPUT3 sucht die vorhandene Row, die den Schlüssel-feldern **/
/** CD150001 bis CD150004 entspricht. **/
/** - Gibt es keine passende Row, wird eine Row in die Tabelle **/
/** TCD150 eingefügt mit traceLevel=0 und keine PIDs. **/
/** - Die gefundene/eingefügte Row wird an das aufrufende **/
/** Programm zurückgegeben. Und zwar den Trace-Level (CD150011), **/
/** alle PIDs (CD150012) plus die Bit-Batterie von Put-Flags **/
/** **/
/** **/
/** **/
/** **/
/** C. Inhaltsverzeichnis **/
/** ===================== **/
/** **/
/** 1.0 D e k l a r a t i o n e n **/
/** 1.1 Kommunikationsstruktur **/
/** 1.2 Files **/
/** 1.3 Datuemer **/
/** 1.4 DB2 Applikatorisch **/
/** 1.5 DB2 Infra **/
/** 1.6 Strukturen **/
/** 1.7 Uebrige Deklarationen **/
/** **/
/** 2.0 O n - U n i t s **/
/** **/
/** 3.0 I n i t i a l i s i e r u n g e n **/
/** 3.1 Datuemer **/
/** 3.2 Outputparameter **/
/** **/
/** 4.0 M a i n - L o g i c **/
/** **/
/** 5.0 P r o z e d u r e n **/
/** 5.1 plausi_input_fields_ok **/
/** 5.3 PutProc **/
/** **/
/** **/
/*********************************************************************/
1/**-----------------------------------------------------------------**/
/** **/
/** 1.0 D e k l a r a t i o n e n **/
/** **/
/**-----------------------------------------------------------------**/
DCL TCD152KEYS CHAR(13000) INIT( (
'CA0420 CA0420 '||
'CA0440 CA0440 '||
'CA0510 CA0510 '||
'CA0530 CA0530 '||
'CB1300 CIFRelations_1_0 '||
'CB1300 CIFRelations_1_1 '||
'CB1300 CIFRelations_1_2 '||
'CB1310 CIFRelations_1_0 '||
'CB1310 CIFRelations_1_1 '||
'CD0790 CD0790 '||
'CI0020 CI0020 '||
'CI0050 IMS-online '||
'CI0060 IMS-online '||
'CI0210 CI0210 '||
'CI0220 CI0220 '||
'CI0230 CI0230 '||
'CI0310 CI0310 '||
'CI0320 CI0320 '||
'CI0880 CI0880 '||
'CUS_0004 CIFS_CustomerClone_1_0 '||
'CUS_0004 CIFS_CustomerClone_1_1 '||
'CUS_0008 CIFS_ServicingHistory_1_0 '||
'CUS_0010 CIFS_Customer_1_0 '||
'CUS_0010 CIFS_Customer_1_1 '||
'CUS_0013 CIFS_Customer_1_1 '||
'CUS_0014 CIFS_GetDetailForCifs_1_0 '||
'CUS_0015 CIFS_GetDetailForCifs_1_0 '||
'CUS_0024 CIFS_EntireClient_1_0 '||
'CUS_0025 PARS_SearchPartner_1_0 '||
'CUS_0030 CIFS_CCSegmentation_1_0 '||
'CUS_0031 CIFS_CCSegmentation_Update_1_0 '||
'CUS_0032 CIFS_CCSegmentation_Update_1_0 '||
'CUS_0035 CIFS_CifHistory_1_0 '||
'CUS_0036 CIFS_CifSearch_1_0 '||
'CUS_0036 CIFS_CifSearch_1_1 '||
'CUS_0037 CIFS_CifSearch_1_0 '||
'CUS_0037 CIFS_CifSearch_1_1 '||
'CUS_0038 CIFS_CifSearch_1_0 '||
'CUS_0038 CIFS_CifSearch_1_1 '||
'CUS_0039 CIFS_CifSearch_1_1 '||
'CUS_1082 CIFS_CifCreate_3_0 '||
'CUS_1116 CIFS_CifsByFHolders_3_0 '||
'CUS_1235 CIFRelations_1_1 '||
'CUS_1235 CIFRelations_1_2 '||
'CUS_1245 CIFRelations_1_1 '||
'CUS_1245 CIFRelations_1_2 '||
'CUS_1415 CIFS_CifUpdate_2_0 '||
'CUS_1416 CIFS_CifUpdate_2_0 '||
'CUS_1417 CIFS_CifUpdate_2_0 '||
'CUS_1418 CIFS_CifUpdate_2_0 '||
'CUS_1444 CIFS_Servicing_Update_3_0 '||
'CUS_1445 CIFS_Servicing_Update_3_0 '||
'CUS_1446 CIFS_Servicing_Update_3_0 '||
'CUS_1447 CIFS_Servicing_Update_3_0 '||
'CUS_1527 PARS_Partner_update_7_0 '||
'CUS_1528 PARS_Partner_7_0 '||
'CUS_1529 PARS_Partner_update_7_0 '||
'CUS_1530 PARS_Partner_update_7_0 '||
'CUS_1574 PARS_Relship_6_0 '||
'CUS_1579 PARS_Relship_6_0 '||
'CUS_1584 PARS_Relship_6_0 '||
'CUS_1720 CIFS_LTInstructUpdate_1_0 '||
'CUS_1721 CIFS_LTInstructUpdate_1_0 '||
'CUS_1722 CIFS_LTInstructUpdate_1_0 '||
'CUS_1723 CIFS_LTInstructUpdate_1_0 '||
'CU5900 CU5900 '||
'CU5930 CU5930 '||
'IF001125 CUPA_BK_SearchCifsByFHolders_3_0 '||
'IF001137 PINS_AG_DeleteKuhat_2_0 '||
'IF001138 CUPA_BN_CreateKuhat_2_0 '||
'IF001139 CUPA_BN_GetKuhat_2_0 '||
'IF001490 CIFS_CifParticipant_Update_1_0 '||
'IF001490 CUS/PIIN/CUS_CifParticipant '||
'IF001490 PIIN_BG_deleteCifPart_3_0 '||
'IF001491 CIFS_CifParticipant_Update_1_0 '||
'IF001491 CUS/PIIN/CUS_CifParticipant '||
'IF001491 PIIN_BG_createCifPart_3_0 '||
'IF001492 CIFS_CifParticipant_Update_1_0 '||
'IF001492 CUS/PIIN/CUS_CifParticipant '||
'IF001492 PIIN_BG_UpdateCifPart_3_0 '||
'IF001493 CIFS_CifParticipant_Update_1_0 '||
'IF001493 CUS/PIIN/CUS_CifParticipant '||
'IF001493 PIIN_BG_GetCifPartByCifPartIdTec_3_0 '||
'IF001494 CIFS_CifParticipant_Update_1_0 '||
'IF001494 CUPA_BJ_GetCifPartAddress_1_0 0 '||
'IF001494 CUS/PIIN/CUS_CifParticipant '||
'IF001494 PIIN_BG_GetCifPartsByCifNo_3_0 '||
'IF001494 PIIN_BG_GetCifPartsByCifNo_4_0 '||
'IF001618 getPartnersWithGranitExt_1.0 '||
'IF001636 CIFS_DepositsForCifs_1_0 '||
'IF001748 CIFS_Associations_Update_1_0 '||
'IF001748 CUPA_AC_GetUpCifBusAssoc_2_0 '||
'IF001749 CIFS_Associations_Update_1_0 '||
'IF001750 CIFS_Associations_Update_1_0 '||
'IF001751 CIFS_Associations_Update_1_0 '||
'IF001753 CIFS_Associations_Update_1_0 '||
'IF001756 CIFS_Associations_Update_1_0 '||
'IF001757 CIFS_Associations_Update_1_0 '||
'IF001758 CIFS_Associations_Update_1_0 '||
'IF001764 CUPA_BL_GetCifCareFuncAssignments_2_0 '||
'IF001814 CIFS_ElectronicAddr_Update_1_1 '||
'IF001814 CUPA_BN_GetElectronicAddress_2_0 '||
'IF001815 CIFS_ElectronicAddr_Update_1_1 '||
'IF001815 CUPA_BN_DeleteElectronicAddress_2_0 '||
'IF001816 CIFS_ElectronicAddr_Update_1_0 '||
'IF001816 CIFS_ElectronicAddr_Update_1_1 '||
'IF001817 CIFS_ElectronicAddr_Update_1_0 '||
'IF001817 CIFS_ElectronicAddr_Update_1_1 '||
'IF001817 CUPA_BN_CreateElectronicAddress_2_0 '||
'IF001818 CIFS_ElectronicAddr_Update_1_0 '||
'IF001818 CIFS_ElectronicAddr_Update_1_1 '||
'IF001818 CUPA_BN_UpdateElectronicAddress_2_0 '||
'IF001923 CIFS_CifCif_Update_1_0 '||
'IF001925 CIFS_CifCif_Update_1_0 '||
'IF001926 CIFS_CifCif_Update_1_0 '||
'IF001926 PARL_AA_GetUpCifCifsForCifs_2 '||
'IF001929 CUPA_BK_SearchCif_2_0 '||
'IF002105 PIIN_BB_UpdateAmlHeader_2_0 '||
'IF002106 PIIN_BB_GetAmlHeaders_2_0 '||
'IF002106 PIIN_BB_GetAmlHeaders_3_0 '||
'IF002141 CUPA_BI_GetCifsLong_3_0 '||
'IF002141 CUPA_BI_GetCifsLong_4_0 '||
'IF002552 CIFS_GetCifNoWithAnyNo_1_0 '||
'IF002634 CIFS_GwVIndividualLimits_2_0 '||
'IF002635 CIFS_GwVIndividualLimits_2_0 '||
'IF002636 CIFS_GwVIndividualLimits_2_0 '||
'IF002637 CIFS_GwVIndividualLimits_2_0 '||
'IF003412 INST_AddrInstructionUpdate_1_0 '||
'IF003412 PINS_AD_GetAddrInstructions_2 '||
'IF003413 INST_AddrInstructionUpdate_1_0 '||
'IF123491 CUPA_BD_GetAgreementsOfCifs_2_0 '||
'IF123491 CUS/CUPA/CUS_Agreement '||
'IF123493 CUPA_BE_getProprietorsWithTaxProps_5_0 '||
'IF123493 CUPA_BE_getProprietorsWithTaxProps_6_0 '||
'IF123493 CUPA_BE_getProprietorsWithTaxProps_7_0 '||
'IF123493 CUPA_BE_GetProprietorsWithTaxProps_1_0 '||
'IF123493 CUPA_BE_GetProprietorsWithTaxProps_2_0 '||
'IF123493 CUPA_BE_GetProprietorsWithTaxProps_3_0 '||
'IF123493 CUPA_BE_GetProprietorsWithTaxProps_4_0 '||
'IF123499 CUS/CUPA/CUS_Address_Registered '||
'IF123500 CUS/CUPA/CUS_Address_Registered '||
'IF123501 CUS/CUPA/CUS_Address_Registered '||
'IF123502 CUS/CUPA/CUS_Address_Registered '||
'IF123555 PARL_AO_GetRelations_1_0 '||
'IF123578 PARL_AN_DeletePartner_1_0 '||
'IF123579 PARL_AN_CreatePartner_1_0 '||
'IF123594 PARL_AN_UpdatePartner_1_0 '||
'IF123595 PARL_AN_GetPartner_1_0 '||
'IF123615 CUPA_BE_UpdateTaxPropsOfProprietors_4_0 '||
'IF123615 CUPA_BE_UpdTaxPropsOfProprietors_1_0 '||
'IF123615 CUPA_BE_UpdTaxPropsOfProprietors_2_0 '||
'IF123615 CUPA_BN_UpdateTaxPropsOfProprietors_5_0 '||
'IF123615 CUPA_BN_UpdateTaxPropsOfProprietors_6_0 '||
'IF123615 CUPA_BN_UpdateTaxPropsOfProprietors_7_0 '||
'IF123739 CUPA_BG_creCifInvSuitabilityResult_1_0 '||
'IF123740 CUPA_BG_GetCifInvSuitabilityResult_1_0 '||
'IF123741 CUPA_BG_UpdCifInvSuitabilityResult_1_0 '||
'IF123761 PARL_AP_CreatePartnerAgreementRel_1_0 '||
'IF123763 PARL_AP_DeletePartnerAgreementRel_1_0 '||
'IF123767 PARL_AP_GetPartnerAgreementRel_1_0 '||
'IF123858 CUPA_BH_CreateCifBUChangeRequest_1_0 '||
'IF123860 CUPA_BH_DeleteCifBUChangeRequest_1_0 '||
'IF123862 CUPA_BH_GetCifBUChangeRequest_1_0 '||
'IF124117 CUPA_BI_GetCifsBaseData_1_0 '||
'IF124212 CUPA_BJ_CreateCifPartAddress_1_0 '||
'IF124214 CUPA_BJ_UpdateCifPartAddress_1_0 '||
'IF124235 CUPA_BJ_DeleteCifPartAddress_1_0 '||
'IF124274 PIIN_BG_CreateCifPartIdentifying_1_0 '||
'IF124275 CUPA_BJ_GetCifPartIdentifying_1_0 '||
'IF124276 CUPA_BJ_GetCifPartIdentifying_1_0 '||
'IF124393 CUPA_BE_GetTaxRelevanceProfile_1_0 '||
'IF124393 CUPA_BE_GetTaxRelevanceProfile_2_0 '||
'IF124406 CUPA_BE_UpdateProprietorsAssetRatios_1_0 '||
'IF124410 CUPA_BE_CreateTaxPropsOfProprietors_3_0 '||
'IF124410 CUPA_BE_CreateTaxPropsOfProprietors_4_0 '||
'IF124410 CUPA_BE_CreateTaxPropsOfProprietors_5_0 '||
'IF124410 CUPA_BE_CreTaxPropsOfProprietors_1_0 '||
'IF124410 CUPA_BE_CreTaxPropsOfProprietors_2_0 '||
'IF124556 CUPA_BM_GetAddresses_1_0 '||
'IF124557 CUPA_BM_CreateAddress_1_0 '||
'IF124558 PB_CUPA_BM_UpdateAddress_1_0 '||
'IF124559 PB_CUPA_BM_DeleteAddress_1_0 '||
'IF124852 PARL_AO_GetClientNetwork_1_0 '||
'IF124852 PARL_AO_GetClientNetwork_2_0 '||
'IF124853 PARL_AN_GetPartnerWithCifs_1_0 '||
'IF124853 PARL_AN_GetPartnerWithCifs_2_0 '||
'IF124855 PARL_AN_SearchPartnersByFHolder_1.0 '||
'IF125010 PIIN_BE_CreateCifExternalIdentifier_1_0 '||
'IF125024 PIIN_BE_GetCifExternalIdentifierC_1.0 '||
'IF125025 PIIN_BE_DeleteCifExternalIdentifier_1_0 '||
'IF125032 PIIN_BE_GetCifExternalIdentifier_1.0 '||
'IF125041 PIIN_BE_updateCifExternalIdentifier_1_0 '||
'SEC_1600 DEPS_Deposit_1_0 '||
'SEC_1601 DEPS_Deposit_1_0 '||
'SEC_1602 DEPS_Deposit_1_0 '||
'XR5080 XR5080 '||
'IF123595 PARL_AN_GetPartner_2_0 '||
'IF002552 CUPA_AR_GetCifNosWithAnyNo_2_0 '
));
DCL 1 tcd152KeyInfos,
3 tcd152KeysPtr pointer init((addr(tcd152Keys))) ,
3 tcd152KeysMax bin fixed(31) init(198) ,
3 tcd152KeysRep bin fixed(31) init(100000) ,
3 tcd152KeysStep bin fixed(31) init(37) ,
3 tcd152KeysJx bin fixed(31) init(1) ,
3 c152Found bin fixed(31) init(0) ,
3 c152SelInto bin fixed(31) init(0) ,
3 cPidClientNoFo bin fixed(31) init(0) ,
3 cPidClientFound bin fixed(31) init(0) ,
3 cPidClientErr bin fixed(31) init(0) ,
3 cPidClientOp bin fixed(31) init(0) ,
3 cPidClientF1 bin fixed(31) init(0) ,
3 cPidClientF2 bin fixed(31) init(0) ,
3 cPidClientCl bin fixed(31) init(0) ,
3 cPidClientInto bin fixed(31) init(0) ,
3 cCommit bin fixed(31) init(0) ,
3 noSql bit (1)aligned init('0'b),
3 noCommit bit (1)aligned init('1'b);
dcl tcd152KeysIx bin fixed(31) init(-1) ;
DCL 1 TCD152KEYSTR based(tcd152KeysPtr),
3 tcd152key (200) ,
5 SERVICEID char(21),
5 INTERFACENAME char(42);
dcl 1 ttGpcif ,
3 i ,
5 userPid char( 8) ,
5 clientId char(10) ,
5 padd_01 char( 2) ,
3 o ,
5 hasFound bit(1)aligned ,
5 padd_01 char( 3) ,
5 traceLevel bin fixed(31) ,
5 getRegionName char( 1) ,
5 padd_02 char( 3) ,
3 endOfStruc char( 0) ;
-/**-----------------------------------------------------------------**/
/** 1.01 Kommunikationsstruktur **/
/**-----------------------------------------------------------------**/
dcl $PyCDPUT3 ptr;
dcl 1 yCDPUT3SP char(1000) init('');
dcl PyCDPUT3 ptr init(addr(yCDPUT3SP));
dcl 1 yCDPUT3k based(pycdput3),
%include yCDPUT3K ;;
-/**-----------------------------------------------------------------**/
/** 1.02 Files **/
/**-----------------------------------------------------------------**/
dcl Sysprint file print output ;
-/**-----------------------------------------------------------------**/
/** 1.03 Datuemer **/
/**-----------------------------------------------------------------**/
%include YcdTS;
dcl TimeStamp char(26) init ('');
-/**-----------------------------------------------------------------**/
/** 1.03 IMS **/
/**-----------------------------------------------------------------**/
/*
dcl 1 tp based ( CDPUT3_ptrLtm ) ,
%include TPPCBW ; ;
*/
dcl c2 bin fixed(31) static init(2);
dcl c3 bin fixed(31) static init(3);
dcl isrt char(04) static init('ISRT');
dcl chng char(04) static init('CHNG');
dcl purg char(04) static init('PURG');
dcl ii bin fixed(31);
dcl len bin fixed(31); /* Länge */
/*
dcl totl bin fixed(31); /* Total Länge / Rest Länge*/
/*
dcl anzm bin fixed(31); /* Anzahl Messages */
dcl dtoutl bin fixed(31); /* Daten-Output-Länge */
dcl poutmsg ptr; /* Ptr für Outmsg */
dcl ltm ptr;
dcl pgm ptr;
%include nsotppcb;
dcl 1 outmsg ,
%include nsoppm;
2 isPutOn bit (1)aligned init('0'b), /* mn@20100204 */
2 processType char(1) ,
2 padd_01 char(2) ,
2 dtout char(5900) ; /* Daten-Output thb241003*/
poutmsg = addr(outmsg);
-/**-----------------------------------------------------------------**/
/** 1.2 Program-specific MDL049 2008-03-19 **/
/**-----------------------------------------------------------------**/
%DCL COMPILETIME BUILTIN;
%DCL COMP_TIME CHAR;
%COMP_TIME = '''compilation-time: ' || COMPILETIME || '''';
%DCL COMP_VERS CHAR;
%comp_VERS = '''EPLI-compiler : EPLI' || '''' ;
-/**-----------------------------------------------------------------**/
/** 1.05 DB2 TCD150 **/
/**-----------------------------------------------------------------**/
/* Table */
exec SQL
declare TCD150A1 table
%include TCD150D;;
dcl 1 TCD150,
%include TCD150;;
/* Cursor */
exec SQL
declare C_yCDPUT3 cursor for
select %include TCD150F;
from TCD150A1
where CD150001 = :CDPUT3_metaId
and CD150002 = 'YCD'
and CD150003 = 'PUT'
and CD150005 < :TimeStamp
and CD150006 >= :TimeStamp
order by CD150003 ;
/* Cursor */
exec SQL
declare C_region cursor for
select %include TCD150F;
from TCD150A1
where CD150001 = :CDPUT3_metaId
and CD150002 = 'REG'
and CD150003 = 'ION'
and CD150005 < :TimeStamp
and CD150006 >= :TimeStamp
order by CD150003 ;
/* Cursor */
exec SQL
declare C_tracePidClientId cursor for
select %include TCD150F;
from TCD150A1
where CD150001 = 'TRACE'
and
( ( CD150002 = 'CLIE'
and CD150003 = 'NTID'
)
or
(
CD150002 = 'PID '
and CD150003 = ' '
)
)
and CD150005 < :TimeStamp
and CD150006 >= :TimeStamp
;
-/**-----------------------------------------------------------------**/
/** 1.05 DB2 TCD152 **/
/**-----------------------------------------------------------------**/
/* Table */
exec SQL
declare TCD152A1 table
%include TCD152D;;
dcl 1 TCD152 ,
%include TCD152; ,
2 currentTs char(26) ,
2 dayOfWeek bin fixed(31) ;
/* Cursor */
exec SQL
declare C_tcd152 cursor for
select %include TCD152F;
, current timestamp
, dayOfWeek( current date )
from TCD152A1
where serviceId = :CDPUT3_serviceId
and interfaceName = :CDPUT3_interfaceName
;
-/**-----------------------------------------------------------------**/
/** 1.06 DB2 tcd153 **/
/**-----------------------------------------------------------------**/
/* Table */
exec SQL
declare tcd153A1 table
%include tcd153D;;
dcl tcd153_area char(1000) init('') ;
dcl 1 tcd153 based
( addr(tcd153_area) ) ,
%include tcd153; ;
-/**-----------------------------------------------------------------**/
/** 1.06 DB2 tcd900 **/
/**-----------------------------------------------------------------**/
/* Table */
exec SQL
declare tcd900A1 table
%include tcd900D;;
dcl tcd900_area char(1000) init('') ;
dcl 1 tcd900 based
( addr(tcd900_area) ) ,
%include tcd900; ;
1/**-----------------------------------------------------------------**/
/** 1.5 ceetdli **/
/**-----------------------------------------------------------------**/
/*
%include ceeibmaw ;
*/
/*
dcl ceetdli entry; mn@20070913
*/
1/**-----------------------------------------------------------------**/
/** 1.5 CDADMIN **/
/**-----------------------------------------------------------------**/
dcl 1 cdadmin based( CDPUT3_ptrCdadmin ) ,
%include cdadmins; ;
1/**-----------------------------------------------------------------**/
/** 1.5 DB2 Infrastruktur **/
/**-----------------------------------------------------------------**/
exec sql include SQLCA ;
-/**-----------------------------------------------------------------**/
/** 1.6 Strukturen **/
/**-----------------------------------------------------------------**/
dcl
1 aux , /* auxiliary */
3 isPutOn bit(1) aligned init('0'b) ,
3 putFlag(100) char(1) init((100)('')),
3 C_tcd152_open bit(1) aligned init('0'b) ,
3 C_yCDPUT3_open bit(1) aligned init('0'b) ,
3 c_region_open bit(1) aligned init('0'b) ,
3 c_tracePidClientId_open bit(1) aligned init('0'b) ,
3 ts char(26) init( '' ),
3 t bin fixed(31,0) init( 0 ) , /* tabulator */
3 p_9 pic'9' init( 0 ) ;
-/**-----------------------------------------------------------------**/
/** 1.7 Uebrige Deklarationen **/
/**-----------------------------------------------------------------**/
dcl ( addr
, cstg
, datetime
, hbound
, high
, length
, max
, min
, mod
, null
, ptradd
, string
, substr
, sysnull
, translate
, verify ) builtin;
1/**-----------------------------------------------------------------**/
/** **/
/** 2.0 O n - U n i t s **/
/** **/
/**-----------------------------------------------------------------**/
1/**-----------------------------------------------------------------**/
/** **/
/** 3.0 I n i t i a l i s i e r u n g e n **/
/** **/
/**-----------------------------------------------------------------**/
-/**-----------------------------------------------------------------**/
/** 3.1 Datuemer **/
/**-----------------------------------------------------------------**/
TimeStamp = YcdTS('E');
1/**-----------------------------------------------------------------**/
/** **/
/** 5.0 P r o z e d u r e n **/
/** **/
/**-----------------------------------------------------------------**/
/**-----------------------------------------------------------------**/
/** 5.1 plausi_input_fields_ok **/
/**-----------------------------------------------------------------**/
plausi_input_fields_ok:
Proc
returns ( bit(1) aligned );
dcl @hasFehler bit(1) aligned init('0'b);
YCDM616
do; /* Diese Prüfung muss vor dem ersten Put passieren */ YCDM616
DCL CDPUT3_whichSysprint based(addr(CDPUT3_sysprint)) char(4) ; YCDM61
if (CDPUT3_whichSysprint = '') then YCDPUT
do;
aux.isPutOn = '1'b;
CDPUT3_sysprint = sysprint;
call putM('*' ,70);
call putR('** CDPUT3_sysprint nicht abgefüllt' ,70);
call putR('** Service : ' || CDPUT3_metaId ,70);
call putM('*' ,70);
@hasFehler = '1'b ;
end;
end; /* Diese Prüfung muss vor dem ersten Put passieren */ YCDM616
if ( $PyCDPUT3 = null()) then
do;
aux.isPutOn = '1'b;
call putM('*' ,70);
call putR('** $pyCDPUT3 ist null' ,70);
call putR('** Service : ' || CDPUT3_metaId ,70);
call putM('*' ,70);
@hasFehler = '1'b ;
end;
if aux.isPutOn then
do;
call putFrame('start'
,'plausi_input_fields_ok' ,70);
call putR('** eye . . . . . : ' ||
CDPUT3_eye ,70);
call putR('** release . . . : ' ||
CDPUT3_release ,70);
call putR('** processType . : ' ||
in.CDPUT3_processType ,70);
call putR('** interfaceName : ' ||
in.CDPUT3_interfaceName ,70);
call putR('** operationName : ' ||
in.CDPUT3_operationName ,70);
call putR('** serviceId . . : ' ||
in.CDPUT3_serviceId ,70);
call putR('** pgmName . . . : ' ||
in.CDPUT3_pgmName ,70);
call putR('** metaId . . . : ' ||
in.CDPUT3_metaId ,70);
call putR('** bereich . . . : ' ||
in.CDPUT3_bereich ,70);
call putR('** pid . . . . . : ' ||
in.CDPUT3_pid ,70);
call putR('** mainPgmName . : ' ||
in.CDPUT3_mainPgmName ,70);
call putR('** traceLevel . : ' ||
bin31_to_char(in.CDPUT3_traceLevel) ,70);
/*
call putR('** comp . . . . : ' ||
in.CDPUT3_comp ,70);
*/
end;
if (CDPUT3_eye ^= '#@YCDPUT3@#') then
do;
aux.isPutOn = '1'b;
call putM('*' ,70);
call putR('** CDPUT3_eye ist nicht korrekt' ,70);
call putR('** Service : ' || CDPUT3_metaId ,70);
call putR('** Eye : ' || CDPUT3_eye ,70);
call putM('*' ,70);
@hasFehler = '1'b ;
end;
if ( CDPUT3_release = 'Rel.0004' ) then
do;
end;
else
do;
aux.isPutOn = '1'b;
call putM('*' ,70);
call putR('** CDPUT3_release ist falsch' ,70);
call putR('** Service : ' || CDPUT3_metaId ,70);
call putR('** Release : ' || CDPUT3_release ,70);
call putM('*' ,70);
@hasFehler = '1'b ;
end;
/*
if (in.CDPUT3_processType = '1') then /* Top-Module */
/*
do;
*/
if (in.CDPUT3_ptrCdadmin = null()) then
do;
aux.isPutOn = '1'b;
call putM('*' ,70);
call putR('** CDPUT3_ptrCdadmin ist null' ,70);
call putR('** Service : ' || CDPUT3_metaId ,70);
call putM('*' ,70);
@hasFehler = '1'b ;
end;
else
do;
if (cdadmin_01 ^= '#@CDADMIN@#') then
do;
aux.isPutOn = '1'b;
call putM('*' ,70);
call putR('** CDADMIN_01 ist nicht korrekt' ,70);
call putR('** CDADMIN_01 : ' || CDADMIN_01 ,70);
call putM('*' ,70);
@hasFehler = '1'b ;
end;
if (cdadmin_01a ^= 'Rel.0001') then
do;
aux.isPutOn = '1'b;
call putM('*' ,70);
call putR('** CDADMIN_01a ist falsch' ,70);
call putR('** CDADMIN_01a : ' || cdadmin_01a ,70);
call putM('*' ,70);
@hasFehler = '1'b ;
end;
end;
/*
end;
*/
if (CDPUT3_SQLCA = null()) then
do;
aux.isPutOn = '1'b;
call putM('*' ,70);
call putR('** CDPUT3_sqlca ist null' ,70);
call putR('** Service : ' || CDPUT3_metaId ,70);
call putM('*' ,70);
@hasFehler = '1'b ;
end;
if (in.CDPUT3_processType = '1') then /* Top-Module */
do;
if (CDPUT3_metaId = '') then
do;
aux.isPutOn = '1'b;
call putM('*' ,70);
call putR('** CDPUT3_metaId ist blank' ,70);
call putR('** Service : ' || CDPUT3_metaId ,70);
call putM('*' ,70);
@hasFehler = '1'b ;
end;
end;
if (in.CDPUT3_processType = '1') then /* Top-Module */
do;
if (in.CDPUT3_pid = '' |
in.CDPUT3_pid = 'specify') then
do;
aux.isPutOn = '1'b;
call putM('*' ,70);
call putR('** CDPUT3_pid muss abgefüllt werden' ,70);
call putR('** Service : ' || CDPUT3_metaId ,70);
call putM('*' ,70);
@hasFehler = '1'b ;
end;
end;
if (CDPUT3_mainPgmName = '' |
CDPUT3_mainPgmName = 'specify') then
do;
aux.isPutOn = '1'b;
call putM('*' ,70);
call putR('** CDPUT3_mainPgmName muss abgefüllt werden' ,70);
call putR('** Service : ' || CDPUT3_metaId ,70);
call putM('*' ,70);
@hasFehler = '1'b ;
end;
if (in.CDPUT3_processType = '1') then /* Top-Module */
do;
if ( in.CDPUT3_pid ^= 'nosecur '
& in.CDPUT3_pid ^= 'NOSECUR '
& in.CDPUT3_pid ^= 'specify '
& in.CDPUT3_pid ^= '' ) then
do;
if ((verify(substr(in.CDPUT3_pid ,1,1),
'ABCDEFGHIJKLMNOPQRSTUVWXYZ') ^= 0 |
verify(substr(in.CDPUT3_pid,2,7),'0123456789 ') ^= 0)) then
do;
aux.isPutOn = '1'b;
call putM('*' ,70);
call putR('** Service . : '|| CDPUT3_metaId ,70);
call putR('** CDPUT3_pid : '||in.CDPUT3_pid ,70);
call putR('** CDPUT3_pid ist ungueltig' ,70);
call putM('*' ,70);
@hasFehler = '1'b ;
end;
end;
end;
if aux.isPutOn then
do;
call putFrame('end ','plausi_input_fields_ok' ,70);
end;
/* Analse */
/* ------ */
if @hasFehler then
do;
CDPUT3_RC = 10;
return('0'b) ;
end;
else
do;
CDPUT3_RC = 0 ;
return('1'b) ;
end;
end plausi_input_fields_ok;
1/**-----------------------------------------------------------------**/
/** 5.22 Bin31_To_Char **/
/**-----------------------------------------------------------------**/
Bin31_To_Char: proc ( @bin31 )
returns ( char(5)var );
dcl @bin31 bin fixed(31) ;
dcl @charVar char(5) var init('') ;
select ;
when ( @bin31 < 10
& @bin31 > -10 )
do;
@charVar = bin31_to_char1( @bin31 );
end;
when ( @bin31 < 100
& @bin31 > -100 )
do;
@charVar = bin31_to_char2( @bin31 );
end;
when ( @bin31 < 1000
& @bin31 > -1000 )
do;
@charVar = bin31_to_char3( @bin31 );
end;
when ( @bin31 < 10000
& @bin31 > -10000 )
do;
@charVar = bin31_to_char4( @bin31 );
end;
otherwise
do;
@charVar = bin31_to_char5( @bin31 );
end;
end; /* select ( @bin31 ) */
if @bin31 < 0 then
do;
@charVar = '-' || @charVar ;
end;
return ( @charVar ) ;
end Bin31_To_Char ;
/*
Bin31_To_Char1 mdl MDL076
Bin31_To_Char2 mdl MDL004
Bin31_To_Char3 mdl MDL003
Bin31_To_Char4 mdl MDL005
Bin31_To_Char5 mdl MDL074
*/
1/**-----------------------------------------------------------------**/
/** 5.22 Bin31_To_Char1 **/
/**-----------------------------------------------------------------**/
Bin31_To_Char1: proc ( @bin31 )
returns ( char(1) );
dcl @bin31 bin fixed(31) ;
dcl @p9 pic'9' init( 0) ;
dcl @char1 based(addr(@p9)) char ( 1 );
@p9 = @bin31 ;
return ( @char1 ) ;
end Bin31_To_Char1 ;
1/**-----------------------------------------------------------------**/
/** 5.22 Bin31_To_Char2 **/
/**-----------------------------------------------------------------**/
Bin31_To_Char2: proc ( @bin31 )
returns ( char(2) );
dcl @bin31 bin fixed(31) ;
dcl @pz9 pic'z9' init( 0) ;
dcl @char2 based(addr(@pz9)) char ( 2 );
@pZ9 = @bin31 ;
return ( @char2 ) ;
end Bin31_To_Char2 ;
1/**-----------------------------------------------------------------**/
/** 5.21 Bin31_To_Char3 **/
/**-----------------------------------------------------------------**/
Bin31_To_Char3: proc ( @bin31 )
returns ( char(3) );
dcl @bin31 bin fixed(31) ;
dcl @pzz9 pic'zz9' init( 0) ;
dcl @char3 based(addr(@pzz9)) char ( 3 );
@pZZ9 = @bin31 ;
return ( @char3 ) ;
end Bin31_To_Char3 ;
1/**-----------------------------------------------------------------**/
/** 5.23 Bin31_To_Char4 **/
/**-----------------------------------------------------------------**/
Bin31_To_Char4: proc ( @bin31 )
returns ( char(4) );
dcl @bin31 bin fixed(31) ;
dcl @pzzz9 pic'---9' init( 0) ;
dcl @char4 based(addr(@pzzz9)) char ( 4 );
@pZZZ9 = @bin31 ;
return ( @char4 ) ;
end; /* Bin31_To_Char4 */
1/**-----------------------------------------------------------------**/
/** 5.23 Bin31_To_Char5 **/
/**-----------------------------------------------------------------**/
Bin31_To_Char5: proc ( @bin31 )
returns ( char(5) );
dcl @bin31 bin fixed(31) ;
dcl @pzzzz9 pic'zzzz9' init( 0) ;
dcl @char5 based(addr(@pzzzz9)) char ( 5 );
@pZZZZ9 = @bin31 ;
return ( @char5 ) ;
end Bin31_To_Char5 ;
1/**-----------------------------------------------------------------**/
/** 5.2 Fetch_C_tcd152_ok **/
/**-----------------------------------------------------------------**/
Fetch_C_tcd152_ok:
Proc ( $p_fcyo )
returns ( bit(1) aligned );
dcl $p_fcyo ptr ;
dcl 1 @fcyo based ($p_fcyo) ,
3 i ,
5 dummy char( 0) init('') ,
3 o ,
5 hasFound bit ( 1) aligned init('') ,
5 padd_01 char( 3) init('') ,
5 end char( 0) init('') ;
dcl @isOk bit(1)aligned init('1'b);
if aux.isPutOn then
do;
call putFrame('start','Fetch_C_tcd152_ok' ,70);
end;
/*
dcl 1 @tcd152 ,
%include tcd152 ;;
*/
/*****************/
/** Fetch Row **/
/*****************/
do;
if noSql then
sqlCode = 0;
else
exec SQL
fetch C_tcd152
into :TCD152 ;
select ( sqlca.sqlcode ) ;
when ( 0 )
do;
@fcyo.o.hasFound = '1'b;
end;
when ( 100 )
do;
@fcyo.o.hasFound = '0'b;
end;
otherwise
do;
aux.isPutOn = '1'b ;
@isOk = '0'b ;
CDPUT3_RC = 20 ;
if is_DB2_Error
( addr( sqlca )
, 'Fetch C_tcd152'
, '1010' /* traceId */
) then @isOk = '0'b ;
end;
end;
end;
if aux.isPutOn then
do;
call putR ('** @hasFound : ' ||
@fcyo.o.hasFound ,70);
call putR ('** @isOk . . : ' ||
@isOk ,70);
call putFrame('end ','Fetch_C_tcd152_ok' ,70);
end;
return( @isOk ) ;
end Fetch_C_tcd152_ok;
1/**-----------------------------------------------------------------**/
/** 5.2 Fetch_C_tracePidClientId_ok **/
/**-----------------------------------------------------------------**/
Fetch_C_tracePidClientId_ok:
Proc ( $p_ftpc )
returns ( bit(1) aligned );
dcl $p_ftpc ptr ;
dcl 1 @ftpc based ($p_ftpc) ,
3 i ,
5 userPid char( 8) ,
5 clientId char(10) ,
5 padd_01 char( 2) ,
3 o ,
5 hasFound bit ( 1) aligned ,
5 padd_01 char( 3) ,
5 uSwitch bin fixed(31) ,
/* 1 : userPid found */
/* 2 : clientId found */
5 userPid char( 8) ,
5 clientId char(10) ,
5 padd_02 char( 2) ,
3 endOfStruc char( 0) ;
dcl @isOk bit(1)aligned init('1'b);
if aux.isPutOn then
do;
call putFrame('start','Fetch_C_tracePidClientId_ok' ,70);
end;
@ftpc.o.hasFound = '0'b;
/*****************/
/** Fetch Row **/
/*****************/
exec SQL
fetch C_tracePidClientId
into :TCD150 ;
cPidClientF1 = cPidClientF1 + 1;
do while ( sqlca.sqlcode = 0
& ^@ftpc.o.hasFound
) ;
select ( sqlca.sqlcode ) ;
when ( 0 )
do;
select;
when ( @ftpc.i.userPid = substr(tcd150.cd150011,1,8) )
do;
@ftpc.o.hasFound = '1'b ;
@ftpc.o.uSwitch = 1 ;
@ftpc.o.userPid = substr(tcd150.cd150011,1,8) ;
aux.isPutOn = '1'b ;
call putR('** getRegionName is switched on by' ||
' userPid' ,70);
call putR('** on TCD150.' ,70);
end;
when ( @ftpc.i.clientId = substr(tcd150.cd150011,1,10) )
do;
@ftpc.o.hasFound = '1'b ;
@ftpc.o.uSwitch = 2 ;
@ftpc.o.clientId = substr(tcd150.cd150011,1,10) ;
aux.isPutOn = '1'b ;
call putR('** getRegionName is switched on by' ||
' clientId' ,70);
call putR('** on TCD150.' ,70);
end;
otherwise
do;
end;
end; /* select */
end;
when ( 100 )
do;
@ftpc.o.hasFound = '0'b;
end;
otherwise
do;
aux.isPutOn = '1'b ;
@isOk = '0'b ;
CDPUT3_RC = 20 ;
if is_DB2_Error
( addr( sqlca )
, 'Fetch C_tracePidClientId'
, '1010' /* traceId */
) then @isOk = '0'b ;
end;
end;
exec SQL
fetch C_tracePidClientId
into :TCD150 ;
cPidClientF2 = cPidClientF2 + 1;
end; /* do while (sqlca.sqlcode = 0) */
if aux.isPutOn then
do;
call putR ('** hasFound : ' ||
@ftpc.o.hasFound ,70);
call putR ('** uSwitch . : ' ||
bin31_to_char(@ftpc.o.uSwitch) ,70);
call putR ('** userPid . : ' ||
@ftpc.o.userPid ,70);
call putR ('** clientId : ' ||
@ftpc.o.clientId ,70);
call putR ('** @isOk . . : ' ||
@isOk ,70);
call putFrame('end ','Fetch_C_tracePidClientId_ok' ,70);
end;
return( @isOk ) ;
end Fetch_C_tracePidClientId_ok;
1/**-----------------------------------------------------------------**/
/** 5.2 Fetch_C_REGION_ok **/
/**-----------------------------------------------------------------**/
Fetch_C_REGION_ok:
Proc ( $p_fcro )
returns ( bit(1) aligned );
dcl $p_fcro ptr ;
dcl 1 @fcro based ($p_fcro) ,
3 i ,
5 dummy char( 0) ,
3 o ,
5 found bit ( 1) aligned ,
5 notFound bit ( 1) aligned ,
5 padd_01 char( 2) ,
5 end char( 0) ;
if aux.isPutOn then
do;
call putFrame('start'
,'Fetch_C_REGION_ok' ,70);
end;
/*****************/
/** Fetch Row **/
/*****************/
do;
exec SQL
fetch C_REGION
into %include TCD150V;;
select ( sqlca.sqlcode ) ;
when ( 0 )
do;
@fcro.o.found = '1'b;
end;
when ( 100 )
do;
@fcro.o.notFound = '1'b;
end;
otherwise
do;
aux.isPutOn = '1'b;
CDPUT3_RC = 20 ;
if is_DB2_Error
( addr( sqlca )
, 'Fetch C_REGION'
, '1010' /* traceId */
) then return('0'b);
end;
end;
end;
if aux.isPutOn then
do;
call putFrame('end '
,'Fetch_C_REGION_ok' ,70);
end;
return('1'b) ;
end Fetch_C_REGION_ok;
1/**-----------------------------------------------------------------**/
/** 5.26 putM **/
/**-----------------------------------------------------------------**/
putM: proc($str , $pos);
dcl $str char(*);
dcl $pos bin fixed(31);
dcl @pos bin fixed(31) init( 0) ;
dcl @i bin fixed(31) init( 0) ;
dcl @line char(200) var init('') ;
dcl 1 @l , /* length */
3 asa bin fixed(31) init( 1) ,
3 pgmName bin fixed(31) init( 8) ,
3 corr bin fixed(31) init( 1) , /* Korrektur */
3 str bin fixed(31) init( 0) ;
dcl 1 @p , /* position */
3 t1 bin fixed(31) init( 66) , /* Tabulator 1 */
3 t2 bin fixed(31) init( 96) , /* Tabulator 2 */
3 t3 bin fixed(31) init(115) ; /* Tabulator 3 */
/* PutProc mit Wiederholbarem Input */
if ( aux.isPutOn ) then
do;
@pos = $pos ;
do; /* Repeated Character */
do @i = @l.asa+@l.pgmName+1+@l.pgmName+1+@l.corr to @pos ;
@line = @line || $str ;
end; /* next */
@line = @line || ' ' ;
end; /* Repeated Character */
do; /* Füllen bis Tab1 */
do @i = @pos+@l.corr to @p.t1 ;
@line = @line || ' ' ;
end; /* next */
end; /* Füllen bis Datum */
@pos = max(@pos , @p.t1) ;
do; /* Zeit & Datum */
if ( @pos-@l.corr < @p.t2 ) then
do;
@line = @line || translate('ij:kl:mn:opq abcd-ef-gh'
, datetime()
,'abcdefghijklmnopq'
);
end;
end; /* Zeit & Datum */
put file(CDPUT3_Sysprint) edit( CDPUT3_mainPgmName || ' ' ||
'YCDPUT3 ' ||
@line )(skip,a);
end;
end; /* putM */
1/**-----------------------------------------------------------------**/
/** 5.26 putR **/
/**-----------------------------------------------------------------**/
putR: proc($str , $pos);
dcl $str char(*);
dcl $pos bin fixed(31);
dcl @pos bin fixed(31) init( 0) ;
dcl 1 @l , /* length */
3 asa bin fixed(31) init( 1) ,
3 pgmName bin fixed(31) init( 8) ,
3 corr bin fixed(31) init( 1) , /* Korrektur */
3 str bin fixed(31) init( 0) ;
dcl 1 @p , /* position */
3 t1 bin fixed(31) init( 66) , /* Tabulator 1 */
3 t2 bin fixed(31) init( 96) , /* Tabulator 2 */
3 t3 bin fixed(31) init(115) ; /* Tabulator 3 */
dcl @i bin fixed(31) init( 0) ;
dcl @line char(200) var init( '') ;
/* PutProc mit Rahmen */
/* Dieses Procedure schreibt nur, wenn der Puts-Flag */
/* auf "on" gesetzt ist. */
if ( aux.isPutOn ) then
do;
@pos = $pos ;
do; /* Vorbereitung */
@l.str = length($str) ;
do @i = @l.str to 1 by -1
while (substr($str, @i, 1) = '') ;
end;
@l.str = @i ;
end; /* Vorbereitung */
do; /* @str */
@line = substr( $str, 1, @l.str ) ;
end; /* @str */
@pos = max(@pos , @l.str+@l.asa+2*@l.pgmName+2+4) ;
do; /* Rahmen-Abschluss */
do @i = @l.asa+@l.pgmName+1
+@l.pgmName+1+@l.str to @pos-@l.corr-4 ;
@line = @line || ' ' ;
end; /* next */
if ( @pos-@l.corr < @p.t3 ) then
@line = @line || ' ** ' ;
end; /* Rahmen-Abschluss */
do; /* Füllen bis Tab1 */
do @i = @pos+@l.corr to @p.t1 ;
@line = @line || ' ' ;
end; /* next */
end; /* Füllen bis Tab1 */
do; /* Zeit & Datum */
if ( @pos-@l.corr < @p.t2 ) then
do;
@line = @line || translate('ij:kl:mn:opq abcd-ef-gh'
, datetime()
,'abcdefghijklmnopq'
);
end;
end; /* Zeit & Datum */
put file(CDPUT3_Sysprint) edit( CDPUT3_mainPgmName || ' ' ||
'YCDPUT3 ' ||
@line )(skip,a);
end;
end; /* putR */
/**-----------------------------------------------------------------**/
/** 5.1 getDataFromTCD152_ok **/
/**-----------------------------------------------------------------**/
getDataFromTCD152_ok:
Proc(p)
returns ( bit(1) aligned );
dcl p pointer;
/**--------**/
/** open **/
/**--------**/
if ^open_C_tcd152_ok () then
do;
put ('open_C_tcd152_ok not ok') skip;
end;
else
do;
/**---------**/
/** fetch **/
/**---------**/
dcl 1 @fcyo ,
3 i ,
5 dummy char( 0) init( '' ) ,
3 o ,
5 hasFound bit ( 1) aligned init('0'b) ,
5 padd_01 char( 3) init( '' ) ,
5 end char( 0) init( '' ) ;
if ^Fetch_C_tcd152_ok ( addr(@fcyo) ) then
do;
put ('Fetch_C_tcd152_ok not ok') skip;
end;
else
do;
if ( @fcyo.o.hasFound ) then
do;
c152Found = c152Found + 1;
/* put ('Fetch_C_tcd152_ok has found') skip; */
end;
else
do;
put ('Fetch_C_tcd152_ok has notfound') skip;
end;
end; /* fetch */
end; /* open */
/**---------**/
/** close **/
/**---------**/
if ^close_C_tcd152_ok () then
do;
put ('close_C_tcd152_ok not ok') skip;
end;
return('1'b);
end getDataFromTCD152_ok ;
/**-----------------------------------------------------------------**/
/** 5.1 getPidClientIdFromTCD150_ok **/
/**-----------------------------------------------------------------**/
getPidClientIdFromTCD150_ok:
Proc ( $p_gpcif )
returns ( bit(1) aligned );
dcl $p_gpcif ptr ;
dcl 1 @gpcif based( $p_gpcif ) ,
3 i ,
5 userPid char( 8) ,
5 clientId char(10) ,
5 padd_01 char( 2) ,
3 o ,
5 hasFound bit(1)aligned ,
5 padd_01 char( 3) ,
5 traceLevel bin fixed(31) ,
5 getRegionName char( 1) ,
5 padd_02 char( 3) ,
3 endOfStruc char( 0) ;
dcl @isOk bit(1)aligned init('1'b);
if aux.isPutOn then
do;
call putFrame('start','getPidClientIdFromTCD150_ok' ,70);
end;
/**------------------------**/
/** Initializing Output **/
/**------------------------**/
do;
@gpcif.o.getRegionName = 'N' ;
@gpcif.o.hasFound = '0'b ;
end;
/**--------**/
/** open **/
/**--------**/
/* get all "Trace" */
if ^open_C_tracePidClientId_ok () then
do;
@isOk = '0'b;
end;
else
do;
/**---------**/
/** fetch **/
/**---------**/
dcl 1 @ftpc ,
3 i ,
5 userPid char( 8) init( '' ) ,
5 clientId char(10) init( '' ) ,
5 padd_01 char( 2) init( '' ) ,
3 o ,
5 hasFound bit ( 1) aligned init('0'b) ,
5 padd_01 char( 3) init( '' ) ,
5 uSwitch bin fixed(31) init( 0 ) ,
5 userPid char( 8) init( '' ) ,
5 clientId char(10) init( '' ) ,
5 padd_02 char( 2) init( '' ) ,
3 endOfStruc char( 0) init( '' ) ;
@ftpc.i.userPid = @gpcif.i.userPid ;
@ftpc.i.clientId = @gpcif.i.clientId ;
if ^Fetch_C_tracePidClientId_ok ( addr(@ftpc) ) then
do;
@isOk = '0'b;
end;
else
do;
@gpcif.o.hasFound = @ftpc.o.hasFound ;
if ( @gpcif.o.hasFound ) then
do;
aux.isPutOn = '1'b ;
@gpcif.o.traceLevel = 0 ;
@gpcif.o.getRegionName = 'Y' ;
end;
end; /* fetch */
end; /* open */
/**---------**/
/** close **/
/**---------**/
if ^close_C_tracePidClientId_ok () then
do;
@isOk = '0'b;
end;
if aux.isPutOn then
do;
call putR ('**' ,70);
call putR ('** hasFound . . . : ' ||
@gpcif.o.hasFound ,70);
call putR ('** traceLevel . . : ' ||
bin31_to_char(@gpcif.o.traceLevel) ,70);
call putR ('** getRegionName : ' ||
@gpcif.o.getRegionName ,70);
call putR ('** @isOk . . . . : ' ||
@isOk ,70);
call putFrame('end ','getPidClientIdFromTCD150_ok' ,70);
end;
return( @isOk ) ;
end /* getPidClientIdFromTCD150_ok */ ;
/**-----------------------------------------------------------------**/
/** 5.1 putTcd152_ok **/
/**-----------------------------------------------------------------**/
putTcd152_ok:
Proc
returns ( bit(1) aligned );
dcl @isOk bit(1)aligned init('1'b);
dcl @i bin fixed(31) init( 0 );
dcl @m bin fixed(31) init( 0 );
if aux.isPutOn then
do;
call putFrame ('start','putTcd152_ok' ,70);
call putR ('** Key' ,70);
call putR ('** serviceId . . . . : ' ||
tcd152.serviceId ,70);
call putR ('** Alternative Key' ,70);
call putR ('** operationName . . : ' ||
tcd152.operationName ,70);
call putR ('** interfaceName . . : ' ||
tcd152.interfaceName ,70);
call putR ('** pgmName . . . . . : ' ||
tcd152.pgmName ,70);
call putR ('** Trace-Level' ,70);
call putR ('** general' ,70);
call putR ('** traceLvlAll . . : ' ||
tcd152.traceLvlAll ,70);
call putR ('** getRegionAll . : ' ||
tcd152.getRegionAll ,70);
/**------------**/
/** pidStruc **/
/**------------**/
do;
call putR ('** pidStruc' ,70);
dcl
1 @pidStruc based( addr (tcd152.pid_01) ) ,
3 a(10) ,
5 pid char( 8) ,
5 clientId char(10) ,
5 traceLvl char( 1) ,
5 getRegion char( 1) ,
3 endOfStruc char( 0) ;
@m = hbound(@pidStruc.a,1) ;
do @i=1 to @m
while( @pidStruc.a(@i).pid ^= ''
| @pidStruc.a(@i).clientId ^= '' );
call putR ('** '||putIP(@i,@m) ,70);
call putR ('** pid . . . . . : ' ||
@pidStruc.a(@i).pid ,70);
call putR ('** clientId . . : ' ||
@pidStruc.a(@i).clientId ,70);
call putR ('** traceLvl . . : ' ||
@pidStruc.a(@i).traceLvl ,70);
call putR ('** getRegion . . : ' ||
@pidStruc.a(@i).getRegion ,70);
end; /* do @i=1 to @m */
if @i=1 then
do;
call putR ('** none available' ,70);
end;
end;
/**--------------**/
/** components **/
/**--------------**/
do;
call putR ('** components' ,70);
dcl
1 @components based( addr (tcd152.componentName_01) ) ,
3 a(10) ,
5 componentName char( 8) ,
5 componentTLvl char( 1) ,
3 endOfStruc char( 0) ;
@m = hbound(@components.a,1) ;
do @i=1 to @m
while( @components.a(@i).componentName ^= '' );
call putR ('** '||putIP(@i,@m) ,70);
call putR ('** componentName . : ' ||
@components.a(@i).componentName ,70);
call putR ('** componentTLvl . : ' ||
@components.a(@i).componentTLvl ,70);
end; /* do @i=1 to @m */
if @i=1 then
do;
call putR ('** none available' ,70);
end;
end;
/**--------------**/
/** clientIdA **/
/**--------------**/
do;
call putR ('** clientId allowed' ,70);
call putR ('** inOrExclude . . . : ' ||
tcd152.inOrExclude ,70);
dcl
1 @clientIdA based( addr (tcd152.clientIdA_01) ) ,
3 a(10) ,
5 clientIdA char(10) ,
3 endOfStruc char( 0) ;
@m = hbound(@components.a,1) ;
do @i=1 to @m
while( @clientIdA.a(@i).clientIdA ^= '' );
call putR ('** '||putIP(@i,@m) ,70);
call putR ('** clientIdA . . . : ' ||
@clientIdA.a(@i).clientIdA ,70);
end; /* do @i=1 to @m */
if @i=1 then
do;
call putR ('** none available' ,70);
end;
end;
/**--------------**/
/** forApplUse **/
/**--------------**/
do;
call putR ('** forApplUse' ,70);
dcl
1 @forApplUse based( addr (tcd152.forApplUse_01) ) ,
3 a( 3) ,
5 forApplUse char(200) ,
3 endOfStruc char( 0) ;
@m = hbound(@forApplUse.a,1) ;
do @i=1 to @m
while( @forApplUse.a(@i).forApplUse ^= '' );
call putR ('** '||putIP(@i,@m) ,70);
call putR ('** forApplUse . . : ' ||
@forApplUse.a(@i).forApplUse ,70);
end; /* do @i=1 to @m */
if @i=1 then
do;
call putR ('** none available' ,70);
end;
end;
/**--------------**/
/** date **/
/**--------------**/
do;
call putR ('** date' ,70);
call putR ('** currentTs . . . : ' ||
tcd152.currentTs ,70);
call putR ('** dayOfWeek . . . : ' ||
bin31_to_char(tcd152.dayOfWeek) ,70);
end;
call putFrame ('end ','putTcd152_ok' ,70);
end;
return( @isOk ) ;
end putTcd152_ok ;
/**-----------------------------------------------------------------**/
/** 5.01 fill_tcd153_struc_ok **/
/**-----------------------------------------------------------------**/
fill_tcd153_struc_ok:
Proc
returns ( bit(1) aligned );
dcl @isOk bit(1) aligned init('1'b);
if aux.isPutOn then
do;
call putFrame('start','fill_tcd153_struc_ok' ,70);
end;
tcd153.start_ts = CDPUT3_start_ts ;
tcd153.interfaceName = CDPUT3_interfaceName ;
tcd153.operationName = CDPUT3_operationName ;
tcd153.trx = CDPUT3_trxName ;
tcd153.pgmName = CDPUT3_pgmName ;
tcd153.clientId = CDPUT3_clientId ;
tcd153.pid = in.CDPUT3_pid ;
tcd153.traceLevel = bin31_to_char1(out.CDPUT3_traceLevel) ;
tcd153.duration_ts = getDifference( CDPUT3_start_ts
, CDPUT3_end_ts );
tcd153.serviceId = CDPUT3_serviceId ;
tcd153.forApplUse_01 = CDPUT3_153ForApplUse_01;
;
if aux.isPutOn then
do;
call putR ('** start_ts . . : ' ||
tcd153.start_ts ,70);
call putR ('** interfaceName : ' ||
tcd153.interfaceName ,70);
call putR ('** operationName : ' ||
tcd153.operationName ,70);
call putR ('** trx . . . . . : ' ||
tcd153.trx ,70);
call putR ('** pgmName . . . : ' ||
tcd153.pgmName ,70);
call putR ('** clientId . . : ' ||
tcd153.clientId ,70);
call putR ('** pid . . . . . : ' ||
tcd153.pid ,70);
call putR ('** traceLevel . : ' ||
tcd153.traceLevel ,70);
call putR ('** regionName . : ' ||
tcd153.regionName ,70);
call putR ('** jobNr . . . . : ' ||
tcd153.jobNr ,70);
call putR ('** duration_ts . : ' ||
tcd153.duration_ts ,70);
call putR ('** serviceId . . : ' ||
tcd153.serviceId ,70);
call putR ('** forApplUse_01 : ' ||
tcd153.forApplUse_01 ,70);
end;
if aux.isPutOn then
do;
call putFrame('end ','fill_tcd153_struc_ok' ,70);
end;
return( @isOk ) ;
end fill_tcd153_struc_ok ;
/**-----------------------------------------------------------------**/
/** 5.01 getDifference **/
/**-----------------------------------------------------------------**/
getDifference:
Proc ( $start_ts
, $end_ts )
returns ( char(26) );
dcl $start_ts char(26) ;
dcl @start_ts char(26) ;
dcl 1 @start based( addr(@start_ts) ) ,
3 yyyy pic'9999' ,
3 strich1 char(1) ,
3 mo pic'99' ,
3 strich2 char(1) ,
3 dd pic'99' ,
3 strich3 char(1) ,
3 hh pic'99' ,
3 punkt1 char(1) ,
3 mi pic'99' ,
3 punkt2 char(1) ,
3 ss pic'99' ,
3 punkt3 char(1) ,
3 mmmmmm pic'999999' ,
3 ende char(0) ;
dcl $end_ts char(26) ;
dcl @end_ts char(26) ;
dcl 1 @ende based( addr(@end_ts) ) ,
3 yyyy pic'9999' ,
3 strich1 char(1) ,
3 mo pic'99' ,
3 strich2 char(1) ,
3 dd pic'99' ,
3 strich3 char(1) ,
3 hh pic'99' ,
3 punkt1 char(1) ,
3 mi pic'99' ,
3 punkt2 char(1) ,
3 ss pic'99' ,
3 punkt3 char(1) ,
3 mmmmmm pic'999999' ,
3 ende char(0) ;
dcl @difference_ts char(26) init('') ;
dcl 1 @diff based( addr(@difference_ts) ) ,
3 yyyy pic'9999' ,
3 strich1 char(1) ,
3 mo pic'99' ,
3 strich2 char(1) ,
3 dd pic'99' ,
3 strich3 char(1) ,
3 hh pic'99' ,
3 punkt1 char(1) ,
3 mi pic'99' ,
3 punkt2 char(1) ,
3 ss pic'99' ,
3 punkt3 char(1) ,
3 mmmmmm pic'999999' ,
3 ende char(0) ;
dcl @isOk bit ( 1) aligned init('1'b);
@start_ts = $start_ts ;
@end_ts = $end_ts ;
@diff.yyyy = '0001' ;
@diff.strich1 = '-' ;
@diff.mo = '01' ;
@diff.strich2 = '-' ;
@diff.dd = '01' ;
@diff.strich3 = '-' ;
@diff.hh = '' ;
@diff.punkt1 = '.' ;
@diff.mi = '' ;
@diff.punkt2 = '.' ;
@diff.ss = '' ;
@diff.punkt3 = '.' ;
@diff.mmmmmm = '' ;
if aux.isPutOn then
do;
call putFrame('start','getDifference' ,80);
call putR ('** end_ts . . . . : ' ||
$end_ts ,80);
call putR ('** start_ts . . . : ' ||
$start_ts ,80);
end;
if ( @ende.mmmmmm - @start.mmmmmm >= 0 ) then
do;
@diff.mmmmmm = @ende.mmmmmm - @start.mmmmmm ;
end;
else
do;
@diff.mmmmmm = @ende.mmmmmm - @start.mmmmmm + 1000000 ;
@start.ss = @start.ss + 1 ;
end;
if ( @ende.ss - @start.ss >= 0 ) then
do;
@diff.ss = @ende.ss - @start.ss ;
end;
else
do;
@diff.ss = @ende.ss - @start.ss + 60 ;
@start.mi = @start.mi + 1 ;
end;
if ( @ende.mi - @start.mi >= 0 ) then
do;
@diff.mi = @ende.mi - @start.mi ;
end;
else
do;
@diff.mi = @ende.mi - @start.mi + 60 ;
@start.hh = @start.hh + 1 ;
end;
if ( @ende.hh - @start.hh >= 0 ) then
do;
@diff.hh = @ende.hh - @start.hh ;
end;
else
do;
@diff.hh = @ende.hh - @start.hh + 24 ;
@start.dd = @start.dd + 1 ;
end;
/**--------**/
/** Tage **/
/**--------**/
if ( @ende.dd ^= @start.dd ) then
do;
@isOk = '0'b;
end;
if ^@isOk then
do;
@difference_ts = '0001-01-01-00.00.01.000000' ;
end;
if aux.isPutOn then
do;
call putR ('** difference_ts . : ' ||
@difference_ts ,80);
call putFrame('end ','getDifference' ,80);
end;
return( @difference_ts ) ;
end getDifference ;
/**-----------------------------------------------------------------**/
/** 5.1 open_C_tracePidClientId_ok **/
/**-----------------------------------------------------------------**/
open_C_tracePidClientId_ok:
Proc
returns ( bit(1) aligned );
dcl @isOk bit(1) aligned init('1'b);
exec SQL open C_tracePidClientId ;
cPidClientOp = cPidClientOp + 1;
aux.C_tracePidClientId_open = '1'b ;
select (sqlca.sqlcode) ;
when ( 0 )
do;
/* wunderbar */
@isOk = '1'b ;
end;
otherwise
do;
aux.isPutOn = '1'b;
CDPUT3_RC = 20 ;
if is_DB2_Error
( addr( sqlca )
, 'open von C_tracePidClientId'
, '1010' /* traceId */
) then @isOk = '0'b ;
@isOk = '0'b ;
end;
end; /* select */
return( @isOk ) ;
end open_C_tracePidClientId_ok ;
/**-----------------------------------------------------------------**/
/** 5.1 open_C_tcd152_ok **/
/**-----------------------------------------------------------------**/
open_C_tcd152_ok:
Proc
returns ( bit(1) aligned );
dcl @isOk bit(1) aligned init('1'b);
call putFrame('start','open_C_tcd152_ok' ,70);
call putR ('** serviceId . . : ' ||
CDPUT3_serviceId ,70);
call putR ('** interfaceName : ' ||
CDPUT3_interfaceName ,70);
if noSql then
sqlCode = 0;
else
exec SQL open C_tcd152 ;
aux.C_tcd152_open = '1'b ;
select (sqlca.sqlcode) ;
when ( 0 )
do;
/* wunderbar */
@isOk = '1'b ;
end;
otherwise
do;
aux.isPutOn = '1'b;
CDPUT3_RC = 20 ;
call sqlErr(sourceLine(), 'open C_tcd152');
if is_DB2_Error
( addr( sqlca )
, 'open von C_tcd152'
, '1010' /* traceId */
) then @isOk = '0'b ;
@isOk = '0'b ;
end;
end; /* select */
call putFrame('end ','open_C_tcd152_ok' ,70);
return( @isOk ) ;
end open_C_tcd152_ok ;
/**-----------------------------------------------------------------**/
/** 5.1 close_C_tcd152_ok **/
/**-----------------------------------------------------------------**/
close_C_tcd152_ok:
Proc
returns ( bit(1) aligned );
dcl @isOk bit(1) aligned init('1'b);
/***********************/
/** Cursor C_tcd152 **/
/***********************/
if aux.C_tcd152_open then
do;
if noSql then
sqlCode = 0;
else
exec SQL close C_tcd152;
select (sqlca.sqlcode) ;
when ( 0 )
do;
/* wunderbar */
@isOk = '1'b ;
aux.C_tcd152_open = '0'b ;
end;
otherwise
do;
aux.isPutOn = '1'b;
CDPUT3_RC = 20 ;
if is_DB2_Error
( addr( sqlca )
, 'closing of C_tcd152'
, '1010' /* traceId */
) then @isOk = '0'b ;
@isOk = '0'b ;
end;
end; /* select */
end;
return( @isOk ) ;
end close_C_tcd152_ok ;
/**-----------------------------------------------------------------**/
/** 5.1 close_C_tracePidClientId_ok **/
/**-----------------------------------------------------------------**/
close_C_tracePidClientId_ok:
Proc
returns ( bit(1) aligned );
dcl @isOk bit(1) aligned init('1'b);
/**********************************/
/** Cursor C_tracePidClientId **/
/**********************************/
if aux.C_tracePidClientId_open then
do;
exec SQL close C_tracePidClientId;
cPidClientCl = cPidClientCL + 1;
select (sqlca.sqlcode) ;
when ( 0 )
do;
/* wunderbar */
@isOk = '1'b ;
aux.C_tracePidClientId_open = '0'b ;
end;
otherwise
do;
aux.isPutOn = '1'b;
CDPUT3_RC = 20 ;
if is_DB2_Error
( addr( sqlca )
, 'closing of C_tracePidClientId'
, '1010' /* traceId */
) then @isOk = '0'b ;
@isOk = '0'b ;
end;
end; /* select */
end;
return( @isOk ) ;
end close_C_tracePidClientId_ok ;
/**-----------------------------------------------------------------**/
/** 5.1 open_C_REGION_ok **/
/**-----------------------------------------------------------------**/
open_C_REGION_ok:
Proc
returns ( bit(1) aligned );
dcl @isOk bit(1) aligned init('1'b);
exec SQL open C_REGION;
aux.C_REGION_open = '1'b ;
select (sqlca.sqlcode) ;
when ( 0 )
do;
/* wunderbar */
@isOk = '1'b ;
end;
otherwise
do;
aux.isPutOn = '1'b;
CDPUT3_RC = 20 ;
if is_DB2_Error
( addr( sqlca )
, 'open von C_REGION'
, '1010' /* traceId */
) then @isOk = '0'b ;
@isOk = '0'b ;
end;
end; /* select */
return( @isOk ) ;
end open_C_REGION_ok ;
/**-----------------------------------------------------------------**/
/** 5.1 update_REGION_data_ok **/
/**-----------------------------------------------------------------**/
update_REGION_data_ok:
Proc
returns ( bit(1) aligned );
if aux.isPutOn then
do;
call putFrame('start'
,'update_REGION_data_ok' ,70);
end;
exec SQL
update TCD150A1
set CD150008 = current timestamp
, CD150011 = :CD150011
, CD150012 = :CD150012
where CD150001 = :CDPUT3_metaId
and CD150002 = 'REG'
and CD150003 = 'ION'
and CD150005 < :TimeStamp
and CD150006 >= :TimeStamp ;
if ( sqlca.sqlcode ^= 0 ) then
do;
aux.isPutOn = '1'b;
CDPUT3_RC = 20 ;
if is_DB2_Error
( addr( sqlca )
, 'Update Region-Data'
, '1010' /* traceId */
) then return('0'b);
end;
if aux.isPutOn then
do;
call putFrame('end '
,'update_REGION_data_ok' ,70);
end;
return('1'b) ;
end update_REGION_data_ok ;
/**-----------------------------------------------------------------**/
/** 5.1 fill_REGION_data_ok **/
/**-----------------------------------------------------------------**/
fill_REGION_data_ok:
Proc
returns ( bit(1) aligned );
dcl 1 feld_1 based( addr( cd150011 ) ) ,
3 r (6) , Yc
5 rName char( 8) , Yc
5 fill01 char( 1) , Yc
5 rId char( 8) , Yc
5 fill02 char( 1) , Yc
5 rPid char( 8) , Yc
5 fill03 char( 1) , Yc
5 rTime char( 12) , Yc
5 fill04 char( 1) , Yc
3 end char( 0) ; Yc
dcl 1 feld_2 based( addr( cd150012 ) ) ,
3 r (6) , Yc
5 rName char( 8) , Yc
5 fill01 char( 1) , Yc
5 rId char( 8) , Yc
5 fill02 char( 1) , Yc
5 rPid char( 8) , Yc
5 fill03 char( 1) , Yc
5 rTime char( 12) , Yc
5 fill04 char( 1) , Yc
3 end char( 0) ; Yc
if aux.isPutOn then
do;
call putFrame('start','fill_REGION_data_ok' ,70);
end;
dcl @i bin fixed(31) init(0);
call putR('** feld_2' ,70);
do @i=6 to 2 by -1 ;
feld_2(@i).rName = feld_2(@i-1).rName ;
feld_2(@i).rId = feld_2(@i-1).rId ;
feld_2(@i).rPid = feld_2(@i-1).rPid ;
feld_2(@i).rTime = feld_2(@i-1).rTime ;
if aux.isPutOn then
do;
call putR('** ' || bin31_to_char(@i) ,70);
call putR('** rName : ' ||
feld_2(@i).rName ,70);
call putR('** rId . : ' ||
feld_2(@i).rId ,70);
call putR('** rPid : ' ||
feld_2(@i).rPid ,70);
call putR('** rTime : ' ||
feld_2(@i).rTime ,70);
end;
end; /* next @i */
feld_2(1).rName = feld_1(6).rName ;
feld_2(1).rId = feld_1(6).rId ;
feld_2(1).rPid = feld_1(6).rPid ;
feld_2(1).rTime = feld_1(6).rTime ;
if aux.isPutOn then
do;
call putR('** 1' ,70);
call putR('** rName : ' ||
feld_2( 1).rName ,70);
call putR('** rId . : ' ||
feld_2( 1).rId ,70);
call putR('** rPid : ' ||
feld_2( 1).rPid ,70);
call putR('** rTime : ' ||
feld_2( 1).rTime ,70);
end;
call putR('**' ,70);
call putR('** feld_1' ,70);
do @i=6 to 2 by -1 ;
feld_1(@i).rName = feld_1(@i-1).rName ;
feld_1(@i).rId = feld_1(@i-1).rId ;
feld_1(@i).rPid = feld_1(@i-1).rPid ;
feld_1(@i).rTime = feld_1(@i-1).rTime ;
if aux.isPutOn then
do;
call putR('** ' || bin31_to_char(@i) ,70);
call putR('** rName : ' ||
feld_1(@i).rName ,70);
call putR('** rId . : ' ||
feld_1(@i).rId ,70);
call putR('** rPid : ' ||
feld_1(@i).rPid ,70);
call putR('** rTime : ' ||
feld_1(@i).rTime ,70);
end;
end; /* next @i */
if aux.isPutOn then
do;
call putR('** 1' ,70);
call putR('** rName : ' ||
feld_1( 1).rName ,70);
call putR('** rId . : ' ||
feld_1( 1).rId ,70);
call putR('** rPid : ' ||
feld_1( 1).rPid ,70);
call putR('** rTime : ' ||
feld_1( 1).rTime ,70);
end;
if ^update_REGION_data_ok () then return('0'b);
if aux.isPutOn then
do;
call putFrame('end ','fill_REGION_data_ok' ,70);
end;
return('1'b) ;
end fill_REGION_data_ok ;
1/**-----------------------------------------------------------------**/
/** 5.60 putFrame **/
/**-----------------------------------------------------------------**/
putFrame: proc( $type , $str , $pos);
dcl $type char(5);
dcl $str char(*);
dcl $pos bin fixed(31);
if ( aux.isPutOn ) then
do;
select ( $type ) ;
when ( 'start','Start','START')
do;
call putM(' ' ,$pos);
call putM('*' ,$pos);
call putR('** ' || $str ,$pos);
call putM('*' ,$pos);
call putR('**' ,$pos);
end;
otherwise
do;
call putR('**' ,$pos);
if $str ^= '' then
call putR('** End of ' || $str ,$pos);
call putR('**' ,$pos);
call putM('*' ,$pos);
end;
end; /* select ( $type ) */
end;
end putFrame ;
1/**-----------------------------------------------------------------**/
/** 5.57 is_DB2_Error **/
/**-----------------------------------------------------------------**/
is_DB2_Error: Proc ( $ptr_sqlca
, $text
, $traceId )
returns ( bit(1) aligned ) ;
dcl $ptr_sqlca ptr ;
dcl $text char(*) ;
dcl $traceId char(4) ;
dcl 1 @SQLCA based( $ptr_sqlca ) ,
%include sqlState ;
if @sqlca.sqlcode ^= 0 then
do;
if aux.isPutOn then
do;
call putM('*' ,70);
call putR('** SQL-Maske' ,70);
call putM('*' ,70);
call putR('** SQLCAID = '||@sqlca.SQLCAID ,70);
call putR('** SQLCABC = '||@sqlca.SQLCABC ,70);
call putR('** SQLCODE = '||@sqlca.sqlcode ,70);
call putR('** SQLERRM = '||@sqlca.SQLERRM ,70);
call putR('** SQLERRP = '||@sqlca.SQLERRP ,70);
call putR('** SQLERRD = '||@sqlca.SQLERRd(1) ,70);
call putR('** '||@sqlca.SQLERRd(2) ,70);
call putR('** '||@sqlca.SQLERRd(3) ,70);
call putR('** '||@sqlca.SQLERRd(4) ,70);
call putR('** '||@sqlca.SQLERRd(5) ,70);
call putR('** '||@sqlca.SQLERRd(6) ,70);
call putR('** SQLWARN = '||STRING(@sqlca.SQLWARN) ,70);
call putR('** SQLEXT = '||string(@sqlca.SQLEXT ) ,70);
call putM('*' ,70);
end;
end;
select ( @sqlca.sqlcode ) ;
when ( 0 )
do;
/* Kein Fehler */
end;
when ( 100 )
do;
/* Ist an anderer Stelle codiert. */
end;
when ( -805 )
do;
if aux.isPutOn then do;
call putM('*' ,60);
call putR('** sqlCode : -805' ,60);
call putR('** --------------' ,60);
call putR('** - DBRM nicht aktuell' ,60);
call putR('** - Collection-ID fehlt' ,60);
call putM('*' ,60);
end;
call raiseEx
( 'GLO00002'
, 'S'
, '1501'
, $traceId
, ''
, '' , '' , '' , ''
, addr(@sqlca) , null()
, 'DBRM nicht aktuell RC:-805'
);
return('1'b);
end;
when ( -904 , -923 , -924 )
do;
if aux.isPutOn then do;
call putM('*' ,60);
call putR('** DB2 nicht verfügbar RC:-904/-923/-924',60);
call putM('*' ,60);
end;
call raiseEx
( 'GLO00002'
, 'S'
, '1501'
, $traceId
, ''
, '' , '' , '' , ''
, addr(@sqlca) , null()
, $text||': DB2 nicht verfügbar RC:-904/-923/-924'
);
return('1'b);
end;
otherwise
do;
if aux.isPutOn then do;
call putM('*' ,60);
call putR('** '||$text||' DB2-Fehler RC=' ||
bin31_to_char( @sqlca.sqlcode ) ,60);
call putM('*' ,60);
end;
call raiseEx
( 'GLO00002'
, 'S'
, '1501'
, $traceId
, ''
, '' , '' , '' , ''
, addr(@sqlca) , null()
, $text || 'DB2-Fehler RC='
|| bin31_to_char( @sqlca.sqlcode )
);
return('1'b);
end;
end;
return('0'b);
end is_DB2_Error ;
1/**-----------------------------------------------------------------**/
/** 5.37 raiseEx **/
/**-----------------------------------------------------------------**/
raiseEx: Proc( @mainID
, @level
, @3270
, @traceId
, @ctx
, @param1Temp
, @param2Temp
, @param3Temp
, @param4Temp
, @pSQL
, @pIMS
, @textTemp
) ;
dcl @mainID char( 8) ;
dcl @level char( 1) ;
dcl @3270 char( 4) ;
dcl @traceId char( 4) ;
dcl @ctx char( 8) ;
dcl @param1Temp char( * ) ;
dcl @param1 char( 30) init('');
dcl @param2Temp char( * ) ;
dcl @param2 char( 30) init('');
dcl @param3Temp char( * ) ;
dcl @param3 char( 30) init('');
dcl @param4Temp char( * ) ;
dcl @param4 char( 30) init('');
dcl @pSQL ptr ;
dcl @pIMS ptr ;
dcl @textTemp char( * ) ;
dcl @text char(200) init('');
@param1 = substr( @param1Temp,1,min( 30,length(@param1Temp)) ) ;
@param2 = substr( @param2Temp,1,min( 30,length(@param2Temp)) ) ;
@param3 = substr( @param3Temp,1,min( 30,length(@param3Temp)) ) ;
@param4 = substr( @param4Temp,1,min( 30,length(@param4Temp)) ) ;
@text = substr( @textTemp ,1,min(200,length(@textTemp )) ) ;
/***************************************/
/* */
/* Exception wird nicht geschrieben. */
/* Es macht keinen Sinn, wenn yCDPUT3 */
/* Exceptions raised. */
/* */
/***************************************/
end raiseEx ;
/**-----------------------------------------------------------------**/
/** 5.05 Fill_CDADMIN_from_CDPUT **/
/**-----------------------------------------------------------------**/
Fill_CDADMIN_from_CDPUT:
proc ;
dcl @i bin fixed(31) init( 0 ) ;
if aux.isPutOn then
do;
call putFrame('start','Fill_CDADMIN_from_CDPUT' ,70);
call putR('** Folgende putFlags sind gesetzt:' ,70);
end;
/**------------------------------**/
/** Compatibility with YCDPUT1 **/
/**------------------------------**/
do;
if ( out.CDPUT3_traceLevel > 1 ) then
do;
aux.putFlag (1) = 'Y' ;
cdadmin.cdadmin_07(1) = 'Y' ;
end;
else
do;
aux.putFlag (1) = 'N' ;
cdadmin.cdadmin_07(1) = 'N' ;
end;
end;
/**--------------------------------**/
/** Umfüllen: CDPUT --> CDADMIN **/
/**--------------------------------**/
do @i=1 to 100;
select ( aux.putFlag(@i) ) ;
when ( 'Y' , 'y' , 'J' , 'j' )
do;
cdadmin.cdadmin_07(@i) = 'Y' ;
call putR('** -' || bin31_to_char3(@i) ||
'. eingeschaltet' ,70);
end;
when ( 'N' , 'n' )
do;
cdadmin.cdadmin_07(@i) = 'N' ;
call putR('** -' || bin31_to_char3(@i) ||
'. ausgeschaltet' ,70);
end;
otherwise
do;
/* no action */
end;
end; /* select */
end; /* next */
cdadmin_traceLevel = out.CDPUT3_traceLevel ;
cdadmin_compName( 1) = tcd152.componentName_01 ;
cdadmin_compName( 2) = tcd152.componentName_02 ;
cdadmin_compName( 3) = tcd152.componentName_03 ;
cdadmin_compName( 4) = tcd152.componentName_04 ;
cdadmin_compName( 5) = tcd152.componentName_05 ;
cdadmin_compName( 6) = tcd152.componentName_06 ;
cdadmin_compName( 7) = tcd152.componentName_07 ;
cdadmin_compName( 8) = tcd152.componentName_08 ;
cdadmin_compName( 9) = tcd152.componentName_09 ;
cdadmin_compName(10) = tcd152.componentName_10 ;
cdadmin_compTLvl( 1) = tcd152.componentTLvl_01 ;
cdadmin_compTLvl( 2) = tcd152.componentTLvl_02 ;
cdadmin_compTLvl( 3) = tcd152.componentTLvl_03 ;
cdadmin_compTLvl( 4) = tcd152.componentTLvl_04 ;
cdadmin_compTLvl( 5) = tcd152.componentTLvl_05 ;
cdadmin_compTLvl( 6) = tcd152.componentTLvl_06 ;
cdadmin_compTLvl( 7) = tcd152.componentTLvl_07 ;
cdadmin_compTLvl( 8) = tcd152.componentTLvl_08 ;
cdadmin_compTLvl( 9) = tcd152.componentTLvl_09 ;
cdadmin_compTLvl(10) = tcd152.componentTLvl_10 ;
if aux.isPutOn then
do;
call putFrame('end ','Fill_CDADMIN_from_CDPUT' ,70);
end;
end; /* Fill_CDADMIN_from_CDPUT */
1/**-----------------------------------------------------------------**/
/** 5.03 isHeading_ok MDL093 2008-03-19 **/
/**-----------------------------------------------------------------**/
isHeading_ok:
proc ( $moduleName
, $pid )
returns ( bit(1)aligned ) ;
dcl $moduleName char(8) ;
dcl $pid char(8) ;
dcl @isOk bit (1)aligned init('1'b) ;
if aux.isPutOn then
do;
call putM(' ' ,79);
call putM('*' ,79);
call putM('*' ,79);
call putR('**' ,79);
call putR('** Start of '||$moduleName||' on ' ||
translate('rbcd-ef-gh at ij:kl'
, datetime()
,'rbcdefghijklmnopq'
) ,79);
call putR('**' ,79);
call putM('*' ,79);
call putM('*' ,79);
call putM(' ' ,79);
call putM('*' ,79);
call putR('**' ,79);
call putR('** ' || COMP_VERS ,79);
call putR('** ' || COMP_TIME ,79);
call putR('**' ,79);
call putR('** PID : ' ||
$pid ,79);
call putR('**' ,79);
call putM('*' ,79);
end;
return( @isOk ) ;
end /* isHeading_ok */ ;
/**-----------------------------------------------------------------**/
/** 5.1 set_default_output_values_ok **/
/**-----------------------------------------------------------------**/
set_default_output_values_ok:
Proc
returns ( bit(1) aligned ) ;
if aux.isPutOn then
do;
call putFrame('start'
,'set_default_output_values_ok' ,70);
end;
/**-----------------**/
/** Default-Werte **/
/**-----------------**/
do;
yCDPUT3k.out.CDPUT3_rc = 0 ;
yCDPUT3k.out.CDPUT3_traceLevel = 0 ;
yCDPUT3k.out.CDPUT3_traceLevelModule = 0 ;
yCDPUT3k.out.CDPUT3_pid( * ) = '' ;
yCDPUT3k.out.CDPUT3_inOrExclude = '' ;
yCDPUT3k.out.CDPUT3_clientIdA (*) = '' ;
yCDPUT3k.out.CDPUT3_forApplUse(*) = '' ;
end;
if aux.isPutOn then
do;
call putFrame('end '
,'set_default_output_values_ok' ,70);
end;
return('1'b);
end set_default_output_values_ok ;
/**-----------------------------------------------------------------**/
/** 5.05 getTraceLevelForPgmName_ok **/
/**-----------------------------------------------------------------**/
getTraceLevelForPgmName_ok:
proc ( $ptr_itofpn )
returns( bit(1)aligned );
dcl $ptr_itofpn ptr ;
dcl
1 @itofpn based( $ptr_itofpn ) ,
3 i ,
5 traceLevelMainPgm bin fixed(31) ,
5 moduleName char(8) ,
3 o ,
5 traceLevel bin fixed(31) ,
3 endOfStruc char(0) ;
dcl @isOk bit (1)aligned init('1'b) ;
dcl @i bin fixed(31) init( 0 ) ;
if aux.isPutOn then
do;
call putFrame ('start','getTraceLevelForPgmName_ok' ,70);
call putR ('** moduleName . : ' ||
@itofpn.i.moduleName ,70);
call putR ('**' ,70);
call putR ('** traceLevel (general) : ' ||
bin31_to_char(@itofpn.i.traceLevelMainPgm) ,70);
end;
@itofpn.o.traceLevel = @itofpn.i.traceLevelMainPgm ;
/*
if ( @itofpn.o.traceLevel > 0 ) then
do;
*/
call putR ('**' ,70);
do @i=1 to 10
while (cdadmin_compName(@i) ^= @itofpn.i.moduleName);
end;
call putR ('** Search for moduleName ' ||
@itofpn.i.moduleName || ' in table ...' ,70);
if ( @i = 11 ) then
do;
call putR ('** ... moduleName ' ||
@itofpn.i.moduleName || ' not found in table' ,70);
if ( @itofpn.o.traceLevel > 0 ) then
do;
aux.isPutOn = '1'b;
call putR ('** Trace is on because of' ||
' traceLevelMainPgm : ' ||
bin31_to_char(@itofpn.i.traceLevelMainPgm) ,70);
end;
end;
else
do;
call putR ('** ... moduleName ' ||
@itofpn.i.moduleName || ' found in table' ,70);
select ( cdadmin_compTLvl(@i) );
when ( ' ' )
do;
call putR ('** ... no traceLevel specified' ,70);
end;
when ( '0','1','2','3','4','5','6','7','8','9' )
do;
@itofpn.o.traceLevel =
char1_to_bin31(cdadmin_compTLvl(@i),0);
if ( @itofpn.o.traceLevel > 0 ) then aux.isPutOn = '1'b;
call putR ('** traceLevel . : ' ||
cdadmin_compTLvl(@i) ,70);
end;
otherwise
do;
aux.isPutOn = '1'b;
call putR ('** ... wrong traceLevel specified : ' ||
cdadmin_compTLvl(@i) ,70);
end;
end; /* select */
end;
/*
end;
*/
if aux.isPutOn then
do;
call putR ('**' ,70);
call putR ('** traceLevel : ' ||
bin31_to_char(@itofpn.o.traceLevel) ,70);
call putFrame('end ','getTraceLevelForPgmName_ok' ,70);
end;
return( @isOk );
end /* getTraceLevelForPgmName_ok */ ;
CDADMINP
/**-----------------------------------------------------------------**/
/** 5.42 Footing **/
/**-----------------------------------------------------------------**/
Footing:
proc ( @pgmName ) ;
dcl @pgmName char(8) ;
if aux.isPutOn then
do;
call putM(' ' ,79);
call putM('*' ,79);
call putM('*' ,79);
call putR('**' ,79);
call putR('** End of '||@pgmName||' on ' ||
translate('gh.ef.rbcd at ij:kl'
, datetime()
,'rbcdefghijklmnopq'
) ,79);
call putR('**' ,79);
call putM('*' ,79);
call putM('*' ,79);
call putM(' ' ,79);
end;
end Footing ;
1/**-----------------------------------------------------------------**/
/** 5.38 putIP MDL153 2008-03-07 **/
/**-----------------------------------------------------------------**/
putIP:
proc( $i
, $m )
returns ( char(40)var );
dcl $i bin fixed(31) ;
dcl $m bin fixed(31) ;
dcl @out char (40)var init('') ;
@out = bin31_to_char($i) ||
' (Possible: ' ||
bin31_to_char($m) ||
')' ;
return(@out) ;
end; /* putIP */
/**-----------------------------------------------------------------**/
/** 5.42 getTraceRegionForPid **/
/**-----------------------------------------------------------------**/
getTraceRegionForPid:
proc ( $ptr_gtrfp )
returns ( bit(1)aligned );
dcl $ptr_gtrfp ptr ;
dcl
1 @gtrfp based ( $ptr_gtrfp) ,
3 i ,
5 pid char( 8) ,
3 o ,
5 hasFound bit ( 1)aligned ,
5 getRegion char( 1) ,
5 traceLevel bin fixed(31) ,
5 padd_01 char( 1) ,
3 endOfStruc char( 0) ;
dcl @i bin fixed(31) init(0) ;
dcl @m bin fixed(31) init(0) ;
dcl @isOk bit(1)aligned init('1'b);
call putFrame('start','getTraceRegionForPid' ,70);
call putR ('** input' ,70);
call putR ('** pid . . . : ' ||
@gtrfp.i.pid ,70);
/**------------**/
/** pidStruc **/
/**------------**/
do;
dcl
1 @pidStruc based( addr (tcd152.pid_01) ) ,
3 a(10) ,
5 pid char( 8) ,
5 clientId char(10) ,
5 traceLvl char( 1) ,
5 getRegion char( 1) ,
3 endOfStruc char( 0) ;
@m = hbound(@pidStruc.a,1) ;
do @i=1 to @m
while( @pidStruc.a(@i).pid ^= @gtrfp.i.pid ) ;
end;
if ( @pidStruc.a(@i).pid = @gtrfp.i.pid ) then
do;
@gtrfp.o.hasFound = '1'b ;
@gtrfp.o.getRegion = @pidStruc.a(@i).getRegion ;
@gtrfp.o.traceLevel = Char1_To_Bin31
( @pidStruc.a(@i).traceLvl , 0) ;
end;
else
do;
@gtrfp.o.hasFound = '0'b ;
end;
end;
if ( @gtrfp.o.traceLevel > 0 ) then
do;
aux.isPutOn = '1'b ;
call putR('** trace is switched on by explicit' ||
' userPid' ,70);
call putR('** on TCD152.' ,70);
call putR('** userPid : ' ||
@gtrfp.i.pid ,70);
end;
if ( aux.isPutOn ) then
do;
call putR ('** output' ,70);
call putR ('** hasFound . : ' ||
@gtrfp.o.hasFound ,70);
call putR ('** getRegion : ' ||
@gtrfp.o.getRegion ,70);
call putR ('** traceLevel : ' ||
bin31_to_char(@gtrfp.o.traceLevel) ,70);
call putFrame('end ','getTraceRegionForPid' ,70);
end;
return( @isOk );
end getTraceRegionForPid ;
/**-----------------------------------------------------------------**/
/** 5.42 getTraceRegionForClientId **/
/**-----------------------------------------------------------------**/
getTraceRegionForClientId:
proc ( $ptr_gtrfc )
returns ( bit(1)aligned );
dcl $ptr_gtrfc ptr ;
dcl
1 @gtrfc based ( $ptr_gtrfc) ,
3 i ,
5 clientId char(10) ,
3 o ,
5 hasFound bit ( 1)aligned ,
5 getRegion char( 1) ,
5 traceLevel bin fixed(31) ,
5 padd_01 char( 1) ,
3 endOfStruc char( 0) ;
dcl @i bin fixed(31) init(0) ;
dcl @m bin fixed(31) init(0) ;
dcl @isOk bit(1)aligned init('1'b);
call putFrame('start','getTraceRegionForClientId' ,70);
call putR ('** input' ,70);
call putR ('** clientId . : ' ||
@gtrfc.i.clientId ,70);
/**------------**/
/** pidStruc **/
/**------------**/
do;
dcl
1 @pidStruc based( addr (tcd152.pid_01) ) ,
3 a(10) ,
5 pid char( 8) ,
5 clientId char(10) ,
5 traceLvl char( 1) ,
5 getRegion char( 1) ,
3 endOfStruc char( 0) ;
@m = hbound(@pidStruc.a,1) ;
do @i=1 to @m
while( @pidStruc.a(@i).clientId ^= @gtrfc.i.clientId ) ;
end;
if ( @pidStruc.a(@i).clientId = @gtrfc.i.clientId
& @pidStruc.a(@i).clientId ^= '' ) then /* mn@20120913 */
do;
@gtrfc.o.hasFound = '1'b ;
@gtrfc.o.getRegion = @pidStruc.a(@i).getRegion ;
@gtrfc.o.traceLevel = Char1_To_Bin31
( @pidStruc.a(@i).traceLvl , 0) ;
end;
else
do;
@gtrfc.o.hasFound = '0'b ;
end;
end;
if ( @gtrfc.o.traceLevel > 0 ) then
do;
aux.isPutOn = '1'b ;
call putR('** trace is switched on by explicit' ||
' clientId' ,70);
call putR('** on TCD152.' ,70);
call putR('** clientId : ' ||
@gtrfc.i.clientId ,70);
end;
if ( aux.isPutOn ) then
do;
call putR ('** output' ,70);
call putR ('** hasFound . : ' ||
@gtrfc.o.hasFound ,70);
call putR ('** getRegion : ' ||
@gtrfc.o.getRegion ,70);
call putR ('** traceLevel : ' ||
bin31_to_char(@gtrfc.o.traceLevel) ,70);
call putFrame('end ','getTraceRegionForClientId' ,70);
end;
return( @isOk );
end getTraceRegionForClientId ;
1/**-----------------------------------------------------------------**/
/** 5.05 Char_To_Bin31 MDL155 2008-05-16 **/
/**-----------------------------------------------------------------**/
Char_To_Bin31:
proc ( $charVar
, $errorCd )
returns ( bin fixed (31) );
dcl $charVar char ( 5 ) varying ;
dcl $errorCd bin fixed(31) ;
dcl @bin31 bin fixed(31) init( 0 ) ;
dcl @char1 char(1) init( '') ;
dcl @char2 char(2) init( '') ;
/* This function converts char(1) to bin fixed(31) */
/* In case of a conversion error the value of $errorCd */
/* is returned. */
call putFrame('start','Char_To_Bin31' ,80);
call putR('$charVar 1 : ' ||
$charVar ,80);
$charVar = trim ( $charVar ) ;
call putR('$charVar 2 : ' ||
$charVar ,80);
Select ( length($charVar) ) ;
when ( 1 )
do;
@char1 = $charVar ;
@bin31 = Char1_To_Bin31 ( @char1 , $errorCd ) ;
end;
when ( 2 )
do;
@char2 = $charVar ;
@bin31 = Char2_To_Bin31 ( @char2 , $errorCd ) ;
end;
otherwise
do;
@bin31 = $errorCd ;
end;
end; /* Select ( length($charVar) ) */
call putR('@bin31 . : ' ||
@bin31 ,80);
call putFrame('end ','Char_To_Bin31' ,80);
return ( @bin31 ) ;
end ; /* Char_To_Bin31 */
1/**-----------------------------------------------------------------**/
/** 5.05 Char1_To_Bin31 MDL135 2007-08-13 **/
/**-----------------------------------------------------------------**/
Char1_To_Bin31:
proc ( $char1
, $errorCd )
returns ( bin fixed (31) );
dcl $char1 char ( 1 ) ;
dcl @pic1 pic '9' based(addr($char1));
dcl $errorCd bin fixed(31) ;
dcl @bin31 bin fixed(31) init(0) ;
/* This function converts char(1) to bin fixed(31) */
/* In case of a conversion error the value of $errorCd */
/* is returned. */
on conversion
begin;
@bin31 = $errorCd ;
goto ende;
end; /* conversion */
@bin31 = @pic1 ;
revert conversion ;
ende:
return ( @bin31 ) ;
end ; /* Char1_To_Bin31 */
1/**-----------------------------------------------------------------**/
/** 5.05 Char2_To_Bin31 MDL151 2008-05-16 **/
/**-----------------------------------------------------------------**/
Char2_To_Bin31:
proc ( $Char2
, $errorCd )
returns ( bin fixed (31) );
dcl $Char2 char ( 2 ) ;
dcl @picz9 pic'Z9' based (addr($Char2)) ;
dcl $errorCd bin fixed(31) ;
dcl @bin31 bin fixed(31) init(0) ;
/* This function converts char(1) to bin fixed(31) */
/* In case of a conversion error the value of $errorCd */
/* is returned. */
on conversion
begin;
@bin31 = $errorCd ;
goto ende;
end; /* conversion */
@bin31 = @picz9 ;
revert conversion ;
ende:
return ( @bin31 ) ;
end ; /* Char2_To_Bin31 */
1/**-----------------------------------------------------------------**/
/** 5.07 TraceLevel1TimeDifference_Ok MDL152 2008-09-17 **/
/**-----------------------------------------------------------------**/
TraceLevel1TimeDifference_Ok:
proc ( $point
, $prevTs
, $traceLevel )
returns ( bit(1) aligned );
dcl $point char( 25 ) ;
dcl $prevTs char( 26 ) ;
dcl $traceLevel bin fixed(31) ;
dcl @puts bit(1) aligned init('0'b);
dcl
1 @prevPic based(addr($prevTs)) ,
3 yyyy pic'9999' ,
3 mo pic '99' ,
3 dd pic '99' ,
3 hh pic '99' ,
3 mm pic '99' ,
3 ss pic '99' ,
3 ttt pic '999' ;
dcl @actTs char( 17 ) ;
dcl
1 @actPic based(addr(@actTs)) ,
3 yyyy pic'9999' ,
3 mo pic '99' ,
3 dd pic '99' ,
3 hh pic '99' ,
3 mm pic '99' ,
3 ss pic '99' ,
3 ttt pic '999' ;
dcl @difference char( 12 ) init('00:00:00:000') ;
dcl
1 @diffPic based(addr(@difference)) ,
3 hh pic '99' ,
3 fill_hh char(1) ,
3 mm pic '99' ,
3 fill_mm char(1) ,
3 ss pic '99' ,
3 fill_ss char(1) ,
3 ttt pic '999' ;
/**-------------------**/
/** Trace-Level = 1 **/
/**-------------------**/
if ( $traceLevel = 1 ) then
do;
@puts = aux.isPutOn ;
aux.isPutOn = '1'b ;
if ( $prevTs = '' ) then
do;
$prevTs = dateTime ;
call putM ('*' ,70);
call putR ('**' ,70);
call putR ('** Trace-Level 1' ,70);
call putR ('** =============' ,70);
call putR ('** Point TimeDifference' ,70);
call putR ('** ----- --------------' ,70);
call putR ('** Start ' ,70);
end;
do;
@actTs = dateTime ;
/** Thousendths of Seconds **/
/** ---------------------- **/
do;
if ( @actPic.ttt - @prevPic.ttt >= 0 ) then
do;
@diffPic.ttt = @actPic.ttt - @prevPic.ttt ;
end;
else
do;
@diffPic.ttt = 1000 + @actPic.ttt - @prevPic.ttt ;
@prevPic.ss = @prevPic.ss + 1 ;
end;
end;
/** Seconds **/
/** ------- **/
do;
if ( @actPic.ss - @prevPic.ss >= 0 ) then
do;
@diffPic.ss = @actPic.ss - @prevPic.ss ;
end;
else
do;
@diffPic.ss = 60 + @actPic.ss - @prevPic.ss ;
@prevPic.mm = @prevPic.mm + 1 ;
end;
end;
/** Minutes **/
/** ------- **/
do;
if ( @actPic.mm - @prevPic.mm >= 0 ) then
do;
@diffPic.mm = @actPic.mm - @prevPic.mm ;
end;
else
do;
@diffPic.mm = 60 + @actPic.mm - @prevPic.mm ;
@prevPic.hh = @prevPic.hh + 1 ;
end;
end;
/** Hours **/
/** ----- **/
do;
if ( @actPic.hh - @prevPic.hh >= 0 ) then
do;
@diffPic.hh = @actPic.hh - @prevPic.hh ;
end;
else
do;
@diffPic.hh = 60 + @actPic.hh - @prevPic.hh ;
@prevPic.dd = @prevPic.dd + 1 ;
end;
end;
call putR ('** ' || $point || @difference ,70);
$prevTs = @actTs ;
end;
aux.isPutOn = @puts ;
end;
return('1'b);
end /* TraceLevel1TimeDifference_Ok */ ;
/**-----------------------------------------------------------------**/
/** 5.42 processType_1 **/
/**-----------------------------------------------------------------**/
processType_1:
proc
returns ( bit(1)aligned );
dcl @isOk bit(1)aligned init('1'b);
call putFrame('start','processType_1' ,70);
/**-------------------**/
/** Initialization **/
/**-------------------**/
do;
out.CDPUT3_rc = 0 ;
out.CDPUT3_traceLevel = 0 ;
out.CDPUT3_fillTcd153 = 'N' ;
out.CDPUT3_pid(*) = '' ;
out.CDPUT3_inOrExclude = '' ;
out.CDPUT3_clientIdA(*) = '' ;
out.CDPUT3_forApplUse(*) = '' ;
tcd152 = '' ;
end;
/* Am Anfang wegen cdadmin_sysprint */
if plausi_input_fields_ok () then
do;
if set_default_output_values_ok () then
do;
/**------------------------**/
/** getDataFromTCD152_ok **/
/**------------------------**/
dcl 1 @getTcd152 ,
3 i ,
5 dummy char( 0) init('') ,
3 o ,
5 getRegionName char( 1) init('') ,
5 hasFound bit(1)aligned init('') ,
5 padd_01 char( 2) init('') ,
5 end char( 0) init('') ;
if ^getDataFromTCD152_ok (addr(@getTcd152)) then
do;
@isOk = '0'b ;
CDPUT3_rc = 99 ;
end;
else
do;
/**----------------------------**/
/** insert_missing_tcd152_ok **/
/**----------------------------**/
if ^@getTcd152.o.hasFound then
do;
end;
if ( @getTcd152.o.hasFound
& @isOk ) then
do;
/* not necessary. see below |
out.CDPUT3_traceLevel = tcd152.traceLvlAll ;
out.CDPUT3_fillTcd153 = tcd152.getRegionAll ;
*/
/**------------------------**/
/** getTraceRegionForPid **/
/**------------------------**/
dcl
1 @gtrfp ,
3 i ,
5 pid char( 8) init( '' ) ,
3 o ,
5 hasFound bit ( 1)aligned init('0'b) ,
5 getRegion char( 1) init( '' ) ,
5 traceLevel bin fixed(31) init( 0 ) ,
5 padd_01 char( 1) init( '' ) ,
3 endOfStruc char( 0) init( '' ) ;
@gtrfp.i.pid = in.CDPUT3_pid ;
if ^getTraceRegionForPid (addr(@gtrfp)) then
do;
@isOk = '0'b ;
CDPUT3_rc = 99 ;
end;
else
do;
if ( @gtrfp.o.hasFound ) then
do;
call putR('**' ,70);
call putR('** PID found -> ' ||
'no need to check Client-IDs' ,70);
call putR('**' ,70);
out.CDPUT3_traceLevel = @gtrfp.o.traceLevel ;
out.CDPUT3_fillTcd153 = @gtrfp.o.getRegion ;
end;
else
do;
/**-----------------------------**/
/** getTraceRegionForClientId **/
/**-----------------------------**/
dcl
1 @gtrfc ,
3 i ,
5 clientId char(10) init( '' ) ,
3 o ,
5 hasFound bit ( 1)aligned init('0'b) ,
5 getRegion char( 1) init( '' ) ,
5 traceLevel bin fixed(31) init( '' ) ,
5 padd_01 char( 1) init( '' ) ,
3 endOfStruc char( 0) init( '' ) ;
@gtrfc.i.clientId = in.CDPUT3_clientId ;
if ^getTraceRegionForClientId (addr(@gtrfc)) then
do;
@isOk = '0'b ;
CDPUT3_rc = 99 ;
end;
else
do;
if ( @gtrfc.o.hasFound ) then
do;
out.CDPUT3_traceLevel = @gtrfc.o.traceLevel ;
out.CDPUT3_fillTcd153 = @gtrfc.o.getRegion ;
end;
else
do;
out.CDPUT3_traceLevel =
Char1_To_Bin31( tcd152.traceLvlAll , 0) ;
out.CDPUT3_fillTcd153 = tcd152.getRegionAll ;
if ( out.CDPUT3_traceLevel > 0 ) then
do;
aux.isPutOn = '1'b ;
call putR('** trace is switched on by' ||
' type "all"' ,70);
end;
end;
end;
end;
end;
end;
end; /* getDataFromTCD152_ok */
end; /* set_default_output_values_ok */
end; /* plausi_input_fields_ok */
if ( out.CDPUT3_traceLevel = 0 ) then
do;
/**--------------------------------**/
/** getPidClientIdFromTCD150_ok **/
/**--------------------------------**/
if TraceLevel1TimeDifference_Ok
( 'before TCD150'
, aux.ts /* by reference */
, in.CDPUT3_traceLevel
) then;
do; /* getPidClientIdFromTCD150_ok */
dcl 1 @gpcif ,
3 i ,
5 pid char( 8) init('') ,
5 clientId char(10) init('') ,
5 padd_01 char( 2) init('') ,
3 o ,
5 hasFound bit(1)aligned init('') ,
5 padd_01 char( 3) init('') ,
5 traceLevel bin fixed(31) init( 0) ,
5 getRegionName char( 1) init('') ,
5 padd_02 char( 3) init('') ,
5 endOfStruc char( 0) init('') ;
@gpcif.i.pid = in.CDPUT3_pid ;
@gpcif.i.clientId = CDPUT3_clientId ;
if ^getPidClientIdFromTCD150_ok (addr(@gpcif)) then
do;
@isOk = '0'b ;
CDPUT3_rc = 99 ;
end;
else
do;
if ( @gpcif.o.hasFound ) then
do;
call putR('**' ,70);
call putR('** Trace on for all services.' ,70);
call putR('**' ,70);
out.CDPUT3_traceLevel = @gpcif.o.traceLevel ;
out.CDPUT3_fillTcd153 = @gpcif.o.getRegionName ;
end;
end;
end; /* getPidClientIdFromTCD150_ok */
if TraceLevel1TimeDifference_Ok
( 'after TCD150'
, aux.ts /* by reference */
, in.CDPUT3_traceLevel
) then;
end;
call Fill_CDADMIN_from_CDPUT ;
if ( isFlagOn(out.CDPUT3_filltcd153) ) then
do;
if fill_tcd153_struc_ok () then
do;
end; /* fill_tcd153_struc_ok */
end;
dcl @i bin fixed(31) init(0);
if aux.isPutOn then
do;
call putR ('**' ,70);
call putR ('** output' ,70);
call putR ('** rc . . . . . . . : ' ||
bin31_to_char(out.CDPUT3_rc) ,70);
call putR ('** traceLevel . . . : ' ||
bin31_to_char(out.CDPUT3_traceLevel) ,70);
call putR ('** fillTcd153 . . . : ' ||
out.CDPUT3_fillTcd153 ,70);
call putR ('** clientId' ,70);
call putR ('** inOrExclude . . : ' ||
out.CDPUT3_inOrExclude ,70);
call putR ('** clientIdA' ,70);
do @i=1 to 10 while( out.CDPUT3_clientIdA(@i)^='');
call putR ('** ' || putIP(@i,10) ,70);
call putR ('** clientIdA . : ' ||
out.CDPUT3_clientIdA (@i) ,70);
end;
if @i=1 then
do;
call putR ('** none' ,70);
end;
call putR ('** forApplUse' ,70);
do @i=1 to 3;
call putR ('** ' || putIP(@i,3) ,70);
call putR ('** forApplUse . : ' ||
out.CDPUT3_forApplUse(@i) ,70);
end;
call putR ('** CDADMIN' ,70);
call putR ('** traceLevel . . : ' ||
bin31_to_char(cdadmin_traceLevel) ,70);
call putFrame('end ','processType_1' ,70);
end;
return( @isOk );
end processType_1 ;
1/**-----------------------------------------------------------------**/
/** 5.40 isFlagOn MDL184 2010-05-07 **/
/**-----------------------------------------------------------------**/
isFlagOn:
proc ( $char_1 )
returns( bit(1) );
dcl $char_1 char(1) ;
if ( $char_1 = 'Y'
| $char_1 = 'y'
| $char_1 = 'J'
| $char_1 = 'j' ) then
do;
return('1'b);
end;
else
do;
return('0'b);
end;
end /* isFlagOn */ ;
/**-----------------------------------------------------------------**/
/** 5.42 processType_3 **/
/**-----------------------------------------------------------------**/
processType_3:
proc returns( bit(1)aligned );
dcl @isOk bit(1)aligned init('1'b);
if aux.isPutOn then
do;
call putFrame('start','processType_3' ,70);
end;
/* Am Anfang wegen cdadmin_sysprint */
if plausi_input_fields_ok () then
do;
call putR ('** fillTcd153 : ' ||
in.CDPUT3_filltcd153 ,70);
if ( isFlagOn(in.CDPUT3_filltcd153) ) then
do;
if fill_tcd153_struc_ok () then
do;
end; /* fill_tcd153_struc_ok */
if ( yCDPUT3k.CDPUT3_isExpress ) then
do;
end;
else
do;
end;
end;
end;
if aux.isPutOn then
do;
call putFrame('end ','processType_3' ,70);
end;
return ( @isOk ) ;
end processType_3 ;
/**-----------------------------------------------------------------**/
/** 5.42 processType_2 **/
/**-----------------------------------------------------------------**/
processType_2:
proc
returns ( bit(1)aligned ) ;
dcl @isOk bit(1)aligned init('1'b);
/* Am Anfang wegen cdadmin_sysprint */
if plausi_input_fields_ok () then
do;
/* darf nicht ausgeführt werden.
applUse wird überschrieben.
if set_default_output_values_ok () then
do; */
if (in.CDPUT3_ptrCdadmin = null()) then
do;
yCDPUT3k.out.CDPUT3_traceLevelModule = 0 ;
end;
else
do;
dcl
1 @itofpn ,
3 i ,
5 traceLevelMainPgm bin fixed(31) init('') ,
5 moduleName char(8) init('') ,
3 o ,
5 traceLevel bin fixed(31) init( 0) ,
3 endOfStruc char(0) init('') ;
@itofpn.i.traceLevelMainPgm = cdadmin_traceLevel ;
@itofpn.i.moduleName = CDPUT3_pgmName ;
if ( getTraceLevelForPgmName_ok(addr( @itofpn ))) then
do;
yCDPUT3k.out.CDPUT3_traceLevelModule = @itofpn.o.traceLevel ;
end;
else
do;
yCDPUT3k.out.CDPUT3_traceLevelModule = 0 ;
end;
end;
/*
end; /* set_default_output_values_ok */
end; /* plausi_input_fields_ok */
dcl @i bin fixed(31) init(0);
if aux.isPutOn then
do;
call putR ('**' ,70);
call putR ('** output for ' || @itofpn.i.moduleName ,70);
call putR ('** rc . . . . : ' ||
bin31_to_char(out.CDPUT3_rc) ,70);
call putR ('** traceLevel : ' ||
bin31_to_char(out.CDPUT3_traceLevelModule) ,70);
end;
return ( @isOk );
end processType_2 ;
selectTcd152Into: proc;
tcd152.SERVICEID = '???';
tcd152.INTERFACENAME = '???';
if noSql then
sqlCode = 0;
else
exec sql
select %include TCD152F;
, current timestamp
, dayOfWeek( current date )
into :TCD152
from TCD152A1
where serviceId = :CDPUT3_serviceId
and interfaceName = :CDPUT3_interfaceName
;
if sqlCode = 0 then do
c152SelInto = c152SelInto + 1;
if tcd152.SERVICEID <> CDPUT3_serviceId & ^noSql then
put ('sId <>' || tcd152.SERVICEID
|| '<>' || cdPut3_SERVICEID) skip;
if tcd152.interfaceName <> CDPUT3_interfaceName & ^noSql then
put ('sId <>' || tcd152.interfaceName
|| '<>' || cdPut3_interfaceName) skip;
end;
else do;
call sqlErr(sourceLine(), 'selectTcd152Into');
end ;
end selectTcd152Into;
selectPidClientInto:
Proc ( $p_ftpc )
returns ( bit(1) aligned );
dcl $p_ftpc ptr ;
dcl 1 @ftpc based ($p_ftpc) ,
3 i ,
5 userPid char( 8) ,
5 clientId char(10) ,
5 padd_01 char( 2) ,
3 o ,
5 hasFound bit ( 1) aligned ,
5 padd_01 char( 3) ,
5 uSwitch bin fixed(31) ,
/* 1 : userPid found */
/* 2 : clientId found */
5 userPid char( 8) ,
5 clientId char(10) ,
5 padd_02 char( 2) ,
3 endOfStruc char( 0) ;
exec SQL
select %include TCD150F;
into :TCD150
from TCD150A1
where CD150001 = 'TRACE'
and
( ( CD150002 = 'CLIE'
and CD150003 = 'NTID'
)
or
(
CD150002 = 'PID '
and CD150003 = ' '
)
)
and
( substr(cd150011, 1, 8) = :@ftpc.i.userPid
or substr(cd150011, 1, 10) = :@ftpc.i.clientId
)
and CD150005 < :TimeStamp
and CD150006 >= :TimeStamp
fetch first 1 row only
;
cPidClientInto = cPidClientInto + 1;
select ( sqlca.sqlcode ) ;
when ( 0 )
do;
select;
when ( @ftpc.i.userPid = substr(tcd150.cd150011,1,8) )
do;
@ftpc.o.hasFound = '1'b ;
@ftpc.o.uSwitch = 1 ;
@ftpc.o.userPid = substr(tcd150.cd150011,1,8) ;
aux.isPutOn = '1'b ;
call putR('** getRegionName is switched on by' ||
' userPid' ,70);
call putR('** on TCD150.' ,70);
end;
when ( @ftpc.i.clientId = substr(tcd150.cd150011,1,10) )
do;
@ftpc.o.hasFound = '1'b ;
@ftpc.o.uSwitch = 2 ;
@ftpc.o.clientId = substr(tcd150.cd150011,1,10) ;
aux.isPutOn = '1'b ;
call putR('** getRegionName is switched on by' ||
' clientId' ,70);
call putR('** on TCD150.' ,70);
end;
otherwise
do;
put ('pidClient bad row found |||||') skip;
return ('0'b);
end;
end; /* select */
end;
when ( 100 )
do;
@ftpc.o.hasFound = '0'b;
end;
otherwise
do;
call sqlErr(sourceLine(), 'selectPidClientInto');
end;
end; /* select sqlCode */
return ('1'b);
end selectPidClientInto;
selectPidClientIxOnly:
Proc ( $p_ftpc )
returns ( bit(1) aligned );
dcl $p_ftpc ptr ;
dcl 1 @ftpc based ($p_ftpc) ,
3 i ,
5 userPid char( 8) ,
5 clientId char(10) ,
5 padd_01 char( 2) ,
3 o ,
5 hasFound bit ( 1) aligned ,
5 padd_01 char( 3) ,
5 uSwitch bin fixed(31) ,
/* 1 : userPid found */
/* 2 : clientId found */
5 userPid char( 8) ,
5 clientId char(10) ,
5 padd_02 char( 2) ,
3 endOfStruc char( 0) ;
exec SQL
select cd150011
into :tcd150.cd150011
from TCD150A1
where CD150001 = 'TRACE'
and
( ( CD150002 = 'CLIE'
and CD150003 = 'NTID'
)
or
(
CD150002 = 'PID '
and CD150003 = ' '
)
)
and
( substr(cd150011, 1, 8) = :@ftpc.i.userPid
or substr(cd150011, 1, 10) = :@ftpc.i.clientId
)
and CD150005 < :TimeStamp
and CD150006 >= :TimeStamp
fetch first 1 row only
;
cPidClientInto = cPidClientInto + 1;
select ( sqlca.sqlcode ) ;
when ( 0 )
do;
select;
when ( @ftpc.i.userPid = substr(tcd150.cd150011,1,8) )
do;
@ftpc.o.hasFound = '1'b ;
@ftpc.o.uSwitch = 1 ;
@ftpc.o.userPid = substr(tcd150.cd150011,1,8) ;
aux.isPutOn = '1'b ;
call putR('** getRegionName is switched on by' ||
' userPid' ,70);
call putR('** on TCD150.' ,70);
end;
when ( @ftpc.i.clientId = substr(tcd150.cd150011,1,10) )
do;
@ftpc.o.hasFound = '1'b ;
@ftpc.o.uSwitch = 2 ;
@ftpc.o.clientId = substr(tcd150.cd150011,1,10) ;
aux.isPutOn = '1'b ;
call putR('** getRegionName is switched on by' ||
' clientId' ,70);
call putR('** on TCD150.' ,70);
end;
otherwise
do;
put ('pidClient bad row found |||||') skip;
return ('0'b);
end;
end; /* select */
end;
when ( 100 )
do;
@ftpc.o.hasFound = '0'b;
end;
otherwise
do;
call sqlErr(sourceLine(), 'selectPidClientInto');
end;
end; /* select sqlCode */
return ('1'b);
end selectPidClientIxOnly;
/*
sqlConnect__________________________________________________________*/
%include yxrrsaf;
sqlConnect:proc();
dcl ssid char(04) init('DBOF');
dcl plan char(08) init('QZTEST');
if yxrrsaf('CONNECT',ssid,plan) ^= 0 then
put('QZPLB'
,'Error in YXRRSAF Call'
,'SSID - '||ssid
,'PLAN - '||plan);
end sqlConnect;
/*
commit_______________________________________________________________*/
sql_commit: proc();
if noCommit then
return;
if yxrrsaf('COMMIT') ^= 0 then
put('QZPLB'
,'Error in YXRRSAF Commit Call');
cCommit = cCommit + 1;
end sql_commit;
sql_rollback: proc();
if yxrrsaf('ROLLBACK') ^= 0 then
put('QZPLB'
,'Error in YXRRSAF ROLLBACK Call');
end sql_rollback;
DCL DSNTIAR ENTRY EXTERNAL OPTIONS(ASM INTER RETCODE);
sqlMsg: proc ();
DCL MSGWIDTH FIXED BIN(31) INIT(72);
DCL MSGBLEN FIXED BIN(15) INIT(20); /* MAX # SQL MESSAGES */
DCL i FIXED BIN(31) INIT(0);
DCL 01 MESSAGE /* MESSAGE RETURN BUFFER */
, 02 MESSAGEL FIXED BIN(15) INIT(1440) /* BUFFER LENGTH */
, 02 MESSAGET(MSGBLEN) CHAR(msgWidth) INIT((*)' ') /* TEXT */
;
/* NOW PRINT OUT SQL STATEMENT RESULTS VIA DSNTIAR */
CALL DSNTIAR(SQLCA,MESSAGE,MSGWIDTH);
IF PLIRETV ^= 0 THEN DO; /* IF THE RETURN CODE ISN'T ZERO@08*/
/* ISSUE AN ERROR MESSAGE @08*/
PUT EDIT (' RETURN CODE ', PLIRETV, /* @08*/
' FROM MESSAGE ROUTINE DSNTIAR.') /* @08*/
(COL(1), A(13), F(8), A(30)); /* ISSUE THE MESSAGE @08*/
END; /* END ISSUE AN ERROR MESSAGE @08*/
DO I = 1 TO MSGBLEN /* @08*/
WHILE (MESSAGET(I) ^= ''); /* @08*/
PUT EDIT ( MESSAGET(I) ) (COL(1), A(msgWIdth)); /* @08*/
END; /* @08*/
end SqlMsg;
sqlErr: proc (lNo, txt);
DCL lNo FIXED BIN(31);
dcl txt char(500) varying;
put ('error at ' || trim(edit(lNo, 'ZZZZZZZZZ9'))
|| ': ' || txt) skip;
call sqlMsg;
call sql_rollback;
put ('error signal error') skip;
signal error;
end sqlErr;
1/**-----------------------------------------------------------------**/
/** **/
/** 6.0 M a i n - L o g i c **/
/** **/
/**-----------------------------------------------------------------**/
put ('start qzCdPut parm=' || $parm || ',le', length($parm)) skip;
IF LENGTH($parm) >= 1 then
fun = substr($parm, 1, 1);
else
fun = 'A';
IF LENGTH($parm) >= 2 then
IF substr($parm, 2, 1) = '0' then
noSql = '1'b ;
put edit(' fun=', fun, ' noSql=', noSql)
(a(8), a(1), a(7), b(1)) skip;
call sqlConnect ;
if fun = 'A' then do;
put edit ('52max ', tcd152KeysMax) (a(20), f(5)) skip;
do tcd152KeysIx=1 to tcd152KeysRep;
tcd152KeysJx = tcd152KeysJx + tcd152KeysStep;
if (tcd152KeysJx > tcd152KeysMax) then
tcd152KeysJx = tcd152KeysJx - tcd152KeysMax;
put edit (tcd152KeysIx, ' jx=', tcd152KeysJx
, ' s=', tcd152key(tcd152KeysJx).SERVICEID
, ' i=', tcd152key(tcd152KeysJx).INTERFACENAME)
(f(6), a(4), f(4), a(3), a(20), a(3), a(30)) skip;
end;
end;
else if fun = 'E' then do;
put edit ('52max ', tcd152KeysMax) (a(20), f(5)) skip;
do tcd152KeysIx=1 to tcd152KeysRep;
tcd152KeysJx = tcd152KeysJx + tcd152KeysStep;
if (tcd152KeysJx > tcd152KeysMax) then
tcd152KeysJx = tcd152KeysJx - tcd152KeysMax;
CDPUT3_interfaceName = tcd152key(tcd152KeysJx).INTERFACENAME;
CDPUT3_serviceId = tcd152key(tcd152KeysJx).SERVICEID;
if ( getDataFromTCD152_ok(tcd152KeysPtr) ) then ;
call sql_commit;
end;
put edit(c152Found, ' tcd152 open/fetch/close')
(f(9), a(50)) skip;
end;
else if fun = 'F' then do;
put edit ('52max ', tcd152KeysMax) (a(20), f(5)) skip;
do tcd152KeysIx=1 to tcd152KeysRep;
tcd152KeysJx = tcd152KeysJx + tcd152KeysStep;
if (tcd152KeysJx > tcd152KeysMax) then
tcd152KeysJx = tcd152KeysJx - tcd152KeysMax;
CDPUT3_interfaceName = tcd152key(tcd152KeysJx).INTERFACENAME;
CDPUT3_serviceId = tcd152key(tcd152KeysJx).SERVICEID;
call selectTCD152Into ;
call sql_commit;
end;
put edit(c152selInto, ' tcd152 select Into')
(f(9), a(50)) skip;
end;
else if fun = 'P' then do;
put edit ('52max ', tcd152KeysMax) (a(20), f(5)) skip;
do tcd152KeysIx=1 to tcd152KeysRep;
tcd152KeysJx = tcd152KeysJx + tcd152KeysStep;
if (tcd152KeysJx > tcd152KeysMax) then
tcd152KeysJx = tcd152KeysJx - tcd152KeysMax;
ttgpcif.i.userPid = tcd152key(tcd152KeysJx).INTERFACENAME;
ttgpcif.i.clientId = tcd152key(tcd152KeysJx).SERVICEID;
if ^getPidClientIdFromTCD150_ok (addr(ttgpcif)) then
cPidClientErr = cPidClientErr + 1;
else if ttgpcif.o.hasFound then
cPidClientFound = cPidClientFound + 1;
else
cPidClientNoFo = cPidClientNoFo + 1;
call sql_commit;
end;
put edit(cPidClientNoFo , ' pidClient notFound')
(f(9), a(50)) skip;
put edit(cPidClientErr , ' pidClient error')
(f(9), a(50)) skip;
put edit(cPidClientFound, ' pidClient found')
(f(9), a(50)) skip;
put edit(cPidClientOp, ' pidClient open')
(f(9), a(50)) skip;
put edit(cPidClientF1, ' pidClient fetch 1')
(f(9), a(50)) skip;
put edit(cPidClientF2, ' pidClient fetch 2')
(f(9), a(50)) skip;
put edit(cPidClientCl, ' pidClient close')
(f(9), a(50)) skip;
end;
else if fun = 'Q' then do;
put edit ('52max ', tcd152KeysMax) (a(20), f(5)) skip;
do tcd152KeysIx=1 to tcd152KeysRep;
tcd152KeysJx = tcd152KeysJx + tcd152KeysStep;
if (tcd152KeysJx > tcd152KeysMax) then
tcd152KeysJx = tcd152KeysJx - tcd152KeysMax;
ttgpcif.i.userPid = tcd152key(tcd152KeysJx).INTERFACENAME;
ttgpcif.i.clientId = tcd152key(tcd152KeysJx).SERVICEID;
if ^ selectPidClientInto (addr(ttgpcif)) then
cPidClientErr = cPidClientErr + 1;
else if ttgpcif.o.hasFound then
cPidClientFound = cPidClientFound + 1;
else
cPidClientNoFo = cPidClientNoFo + 1;
call sql_commit;
end;
put edit(cPidClientNoFo , ' pidClient notFound')
(f(9), a(50)) skip;
put edit(cPidClientErr , ' pidClient error')
(f(9), a(50)) skip;
put edit(cPidClientFound, ' pidClient found')
(f(9), a(50)) skip;
put edit(cPidClientInto, ' pidClient select into')
(f(9), a(50)) skip;
end;
else if fun = 'R' then do;
put edit ('52max ', tcd152KeysMax) (a(20), f(5)) skip;
do tcd152KeysIx=1 to tcd152KeysRep;
tcd152KeysJx = tcd152KeysJx + tcd152KeysStep;
if (tcd152KeysJx > tcd152KeysMax) then
tcd152KeysJx = tcd152KeysJx - tcd152KeysMax;
ttgpcif.i.userPid = tcd152key(tcd152KeysJx).INTERFACENAME;
ttgpcif.i.clientId = tcd152key(tcd152KeysJx).SERVICEID;
if ^ selectPidClientIxOnly (addr(ttgpcif)) then
cPidClientErr = cPidClientErr + 1;
else if ttgpcif.o.hasFound then
cPidClientFound = cPidClientFound + 1;
else
cPidClientNoFo = cPidClientNoFo + 1;
call sql_commit;
end;
put edit(cPidClientNoFo , ' pidClient ixOnly notFound')
(f(9), a(50)) skip;
put edit(cPidClientErr , ' pidClient error')
(f(9), a(50)) skip;
put edit(cPidClientFound, ' pidClient found')
(f(9), a(50)) skip;
put edit(cPidClientInto, ' pidClient select into')
(f(9), a(50)) skip;
end;
else do;
put ('no Fun ' || fun) skip;
end;
put edit(cCommit , ' commits')
(f(9), a(50)) skip;
put ('end qzCdPut noSql=', noSql) skip;
if ( 1 = 0) then do;
if ( yCDPUT3k.in.CDPUT3_traceLevel > 1 ) then
aux.isPutOn = '1'b ;
else
aux.isPutOn = '0'b ;
if isHeading_ok ( 'YCDPUT3 '
, in.CDPUT3_pid ) then
do;
select ( CDPUT3_processType ) ;
when ( '1' ) /* Top-Module */
do;
if processType_1() then ;
end;
when ( '2' ) /* Sub-Module */
do;
if processType_2() then ;
end;
when ( '3' ) /* Top-Module duration schreiben */
do;
if processType_3() then ;
end;
otherwise
do;
/* kann leer sein. */
end;
end; /* select */
end;
call Footing ( 'YCDPUT3' ) ; /* pgmName */
end;
end QZCDPUT;
}¢--- DSN.TX.CASE(QBCDPREO) cre=2014-06-06 mod=2014-06-06-07.55.52 A540769 -----
//A540769S JOB (CP00,KE50),'DB2 reo',
// MSGCLASS=T,TIME=1440,SCHENV=DBOF,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//* ux utility generator reo
//* who RR2 DBOF A540769 2
//* 16.07.14 15:22:38 A540769S 09
//*
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBOF,'A540769S.UXUTIL'),
// REGION=0M
//DDL DD *
set current sqlid = 'S100447';
alter tablespace CD03A1P.A150A compress yes;
alter tablespace CD03A1P.A152A compress yes;
commit;
set current sqlid = 'S100447';
drop INDEX OA1$.ICD150A$1;
commit;
CREATE INDEX OA1$.ICD150A$1
ON OA1P.TCD150A1
(CD150001 ASC
,CD150002 ASC
,CD150003 ASC
,CD150005 ASC
,CD150006 ASC
,CD150011 ASC
)
not CLUSTER
DEFINE yes
COMPRESS NO
BUFFERPOOL BP3
CLOSE YES
DEFER yes
COPY NO
USING STOGROUP "GSMS "
PRIQTY -1
SECQTY -1
ERASE NO
FREEPAGE 10
PCTFREE 10
GBPCACHE CHANGED
PIECESIZE 2097152K;
commit;
//SYSPRINT DD SYSOUT=*
//*YSPRINT DD DSN=DSN.JOBRUN.A540769S.STEP1.#DT#,
//* DISP=(NEW,CATLG,CATLG),MGMTCLAS=BAT#NW,DSNTYPE=LARGE,
//* DCB=(RECFM=FB,LRECL=132,DSORG=PS),SPACE=(CYL,(1,1000))
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DBOF.DBAA.LISTDEF(TEMPL)
//INDUMMY DD DUMMY
//SYSIN DD *
LISTDEF TPLIST
INCLUDE TABLESPACE CD03A1P.A150A PARTLEVEL
INCLUDE TABLESPACE CD03A1P.A152A PARTLEVEL
---- reorg -------------------------------------------------------------
REORG TABLESPACE LIST TPLIST
LOG NO
SORTDATA
COPYDDN(TCOPYD)
SHRLEVEL CHANGE
-- Achtung mapping table zufällig gewählt|
MAPPINGTABLE S100447.MAPTAB09
DRAIN_WAIT 40
RETRY 20
RETRY_DELAY 180
MAXRO 40
DRAIN WRITERS
LONGLOG CONTINUE
DELAY 1200
TIMEOUT TERM
UNLDDN TSRECD
UNLOAD CONTINUE
PUNCHDDN TPUNCH
DISCARDDN TDISC
SORTKEYS
SORTDEVT DISK
STATISTICS
INDEX ALL KEYCARD
UPDATE ALL
}¢--- DSN.TX.CASE(QBCDPSND) cre=2014-06-04 mod=2014-06-04-17.26.39 A540769 -----
$*(
set current sqlid = 'S100447';
alter tablespace CD03A1P A150A compress yes;
alter tablespace CD03A1P A152A compress yes;
commit
....
//A540769W JOB (CP00,KE50),'DB2 REO',
// MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2
//*MAIN CLASS=LOG
//SEND EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99,PARM=WSH
//SYSPROC DD DISP=SHR,DSN=A540769.WK.REXX
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//*UT DD SYSOUT=*
//SYSTSIN DD DUMMY
//WSH DD *
$*)
$#@
$=pkg=CMN.DIV.P0.DB2J.#000197
$=rz=RR2
if 1 then $@¢
call csmCopL $pkg".llb(qzcdPut)" ,
, $rz"/A540769.WK.llb"
call csmcopy $pkg".dbr(qzcdPut)", $rz"/A540769.WK.dbr"
$!
$;
$>$rz/intRdr
$@=¢
//A540769W JOB (CP00,KE50),'DB2 REO',
// MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2
//*MAIN CLASS=LOG
//* bind
//BIND EXEC PGM=IKJEFT01,DYNAMNBR=30
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//DBRMLIB DD DISP=SHR,DSN=A540769.WK.DBR
//SYSTSIN DD *
DSN S(DBOF)
BIND PACKAGE(QZ) -
OWNER(CMNBATCH) -
QUALIFIER(OA1P) -
MEMBER(QZCDPUT) -
CURRENTDATA(NO) -
DEGREE(1) -
DYNAMICRULES(BIND) -
EXPLAIN(YES) -
FLAG(I) -
ISOLATION(CS) -
SQLERROR(NOPACKAGE) -
VALIDATE(BIND) - 00050800
ACTION(REPLACE) 00050900
//CURSCLPI EXEC PGM=QZCDPUT,PARM='P1' 00051000
//STEPLIB DD DISP=SHR,DSN=A540769.WK.LLB 00052000
//SYSPRINT DD SYSOUT=* 00053000
//INTOCLPI EXEC PGM=QZCDPUT,PARM='Q1' 00051000
//STEPLIB DD DISP=SHR,DSN=A540769.WK.LLB 00052000
//SYSPRINT DD SYSOUT=* 00053000
//CURS152 EXEC PGM=QZCDPUT,PARM='E1' 00051000
//STEPLIB DD DISP=SHR,DSN=A540769.WK.LLB 00052000
//SYSPRINT DD SYSOUT=* 00053000
//INTO152 EXEC PGM=QZCDPUT,PARM='F1' 00051000
//STEPLIB DD DISP=SHR,DSN=A540769.WK.LLB 00052000
//SYSPRINT DD SYSOUT=* 00053000
$*( 00053100
$*)
$!
$#out 20140604 16:08:47
$#out 20140604 15:27:39
}¢--- DSN.TX.CASE(QBDPS) cre=2014-02-17 mod=2014-02-20-16.46.52 A540769 --------
creDb trg 1
+ ok creDb DSN.TX.GENF(QBDPSt1) ::f
creDb src 2
+ ok creDb DSN.TX.GENF(QBDPSs2) ::f
}¢--- DSN.TX.CASE(QBDPSDDL) cre=2014-02-17 mod=2014-02-17-20.22.40 A540769 -----
------------$-¢right(userid() sysvar(sysnode) date(s) time(), 60, '-')$!
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
-----------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
SET CURRENT SCHEMA = $creator;
drop tablespace $db.ABDPS;
commit;
$@¢
if $phase >= 1 then $@=¢
CREATE TABLESPACE ABDPS in $db
USING STOGROUP GSMS
BUFFERPOOL BP2
NUMPARTS 128
CLOSE YES
GBPCACHE CHANGED
LOGGED
LOCKSIZE ANY LOCKMAX SYSTEM
CCSID EBCDIC
PCTFREE 18
FREEPAGE 20
COMPRESS YES
TRACKMOD YES
DEFINE NO
;
CREATE TABLE $creator.tQbDPS
(BE010001 INTEGER
NOT NULL
,BE010002 CHARACTER(16) FOR SBCS DATA
NOT NULL
,BE010003 DATE
NOT NULL
,BE010004 DATE
NOT NULL
,BE010005 TIMESTAMP (6) WITHOUT TIME ZONE
NOT NULL
WITH DEFAULT
,BE010006 CHARACTER(1) FOR SBCS DATA
NOT NULL
,BE010007 CHARACTER(1) FOR SBCS DATA
NOT NULL
,BE010009 CHARACTER(1) FOR SBCS DATA
,BE010010 CHARACTER(1) FOR SBCS DATA
,BE010011 CHARACTER(1) FOR SBCS DATA
,BE010012 CHARACTER(1) FOR SBCS DATA
,BE010013 CHARACTER(1) FOR SBCS DATA
,BE010014 CHARACTER(1) FOR SBCS DATA
,BE010015 CHARACTER(20) FOR SBCS DATA
,BE010016 INTEGER
,BE010017 INTEGER
,BE010018 DECIMAL(31, 8)
NOT NULL
,BE010019 DECIMAL(31, 8)
,BE010020 TIMESTAMP (6) WITHOUT TIME ZONE
,BE010021 TIMESTAMP (6) WITHOUT TIME ZONE
WITH DEFAULT
,BE010022 CHARACTER(8) FOR SBCS DATA
,BE010023 CHARACTER(1) FOR SBCS DATA
,BE010024 CHARACTER(1) FOR SBCS DATA
,BE010025 CHARACTER(1) FOR SBCS DATA
,BE010026 CHARACTER(1) FOR SBCS DATA
,BE010027 CHARACTER(36) FOR SBCS DATA
,BE010028 CHARACTER(1) FOR SBCS DATA
,BE010029 CHARACTER(5) FOR SBCS DATA
,BE010030 CHARACTER(5) FOR SBCS DATA
,BE010031 DATE
,BE010032 DATE
,BE010033 CHARACTER(2) FOR SBCS DATA
,BE010034 CHARACTER(20) FOR SBCS DATA
,BE010035 DATE
,BE010036 CHARACTER(35) FOR SBCS DATA
,BE010037 DATE
,BE010038 TIME
,BE010039 DATE
,BE010040 CHARACTER(2) FOR SBCS DATA
,BE010041 CHARACTER(4) FOR SBCS DATA
,BE010042 CHARACTER(20) FOR SBCS DATA
,BE010043 CHARACTER(35) FOR SBCS DATA
,BE010044 CHARACTER(8) FOR SBCS DATA
,BE010045 DATE
,BE010046 TIME
,BE010047 CHARACTER(8) FOR SBCS DATA
,BE010048 DATE
,BE010049 TIME
,BE010050 CHARACTER(8) FOR SBCS DATA
,BE010051 DATE
,BE010052 TIME
,BE010053 CHARACTER(8) FOR SBCS DATA
,BE010054 INTEGER
,BE010055 CHARACTER(2) FOR SBCS DATA
,BE010056 CHARACTER(1) FOR SBCS DATA
,BE010057 CHARACTER(2) FOR SBCS DATA
,BE010058 CHARACTER(1) FOR SBCS DATA
,BE010059 CHARACTER(4) FOR SBCS DATA
,BE010060 DECIMAL(31, 8)
,BE010061 CHARACTER(4) FOR SBCS DATA
,BE010062 DECIMAL(31, 8)
,BE010063 CHARACTER(4) FOR SBCS DATA
,BE010064 DECIMAL(31, 8)
,BE010065 FLOAT(53)
,BE010066 DATE
,BE010067 TIME
,BE010068 TIME
,BE010069 CHARACTER(5) FOR SBCS DATA
,BE010070 CHARACTER(5) FOR SBCS DATA
,BE010071 CHARACTER(4) FOR SBCS DATA
,BE010072 CHARACTER(2) FOR SBCS DATA
,BE010073 CHARACTER(2) FOR SBCS DATA
,BE010074 CHARACTER(20) FOR SBCS DATA
,BE010075 INTEGER
,BE010076 CHARACTER(4) FOR SBCS DATA
,BE010077 CHARACTER(1) FOR SBCS DATA
,BE010078 CHARACTER(35) FOR SBCS DATA
,BE010079 CHARACTER(2) FOR SBCS DATA
,BE010080 CHARACTER(1) FOR SBCS DATA
,BE010081 CHARACTER(1) FOR SBCS DATA
,BE010082 DECIMAL(7, 0)
,BE010083 CHARACTER(1) FOR SBCS DATA
,BE010084 CHARACTER(1) FOR SBCS DATA
,BE010085 CHARACTER(26) FOR SBCS DATA
,BE010086 CHARACTER(4) FOR SBCS DATA
,BE010087 INTEGER
,BE010088 DECIMAL(15, 3)
,BE010089 TIMESTAMP (6) WITHOUT TIME ZONE
,BE010090 CHARACTER(1) FOR SBCS DATA
,BE010091 CHARACTER(1) FOR SBCS DATA
,BE010092 CHARACTER(21) FOR SBCS DATA
,BE010093 DECIMAL(13, 5)
,BE010094 DECIMAL(7, 0)
,BE010095 CHARACTER(2) FOR SBCS DATA
,BE010096 CHARACTER(2) FOR SBCS DATA
,BE010097 CHARACTER(4) FOR SBCS DATA
,BE010098 CHARACTER(35) FOR SBCS DATA
,BE010099 CHARACTER(35) FOR SBCS DATA
,BE010100 CHARACTER(35) FOR SBCS DATA
,BE010101 CHARACTER(35) FOR SBCS DATA
,BE010102 CHARACTER(2) FOR SBCS DATA
,BE010103 VARCHAR(1000) FOR SBCS DATA
)
IN $db.aBDPS
APPEND NO
WITH RESTRICT ON DROP
NOT VOLATILE CARDINALITY
DATA CAPTURE CHANGES
AUDIT NONE
CCSID EBCDIC
PARTITION BY RANGE
(BE010001 NULLS LAST ASC
$@¢ if $phase = 1 then $@=¢
,BE010002 NULLS LAST ASC
,BE010003 NULLS LAST DESC
,BE010007 NULLS LAST DESC
,BE010018 NULLS LAST ASC
,BE010004 NULLS LAST DESC
,BE010005 NULLS LAST DESC
,BE010006 NULLS LAST DESC
$! $!
)
( PARTITION 1
ENDING ( 200
) INCLUSIVE
, PARTITION 2
ENDING ( 400
) INCLUSIVE
, PARTITION 3
ENDING ( 600
) INCLUSIVE
, PARTITION 4
ENDING ( 800
) INCLUSIVE
, PARTITION 5
ENDING ( 1000
) INCLUSIVE
, PARTITION 6
ENDING ( 1200
) INCLUSIVE
, PARTITION 7
ENDING ( 1400
) INCLUSIVE
, PARTITION 8
ENDING ( 1600
) INCLUSIVE
, PARTITION 9
ENDING ( 1800
) INCLUSIVE
, PARTITION 10
ENDING ( 2000
) INCLUSIVE
, PARTITION 11
ENDING ( 2200
) INCLUSIVE
, PARTITION 12
ENDING ( 2400
) INCLUSIVE
, PARTITION 13
ENDING ( 2600
) INCLUSIVE
, PARTITION 14
ENDING ( 2800
) INCLUSIVE
, PARTITION 15
ENDING ( 3000
) INCLUSIVE
, PARTITION 16
ENDING ( 3200
) INCLUSIVE
, PARTITION 17
ENDING ( 3400
) INCLUSIVE
, PARTITION 18
ENDING ( 3600
) INCLUSIVE
, PARTITION 19
ENDING ( 3800
) INCLUSIVE
, PARTITION 20
ENDING ( 4000
) INCLUSIVE
, PARTITION 21
ENDING ( 4200
) INCLUSIVE
, PARTITION 22
ENDING ( 4400
) INCLUSIVE
, PARTITION 23
ENDING ( 4600
) INCLUSIVE
, PARTITION 24
ENDING ( 4800
) INCLUSIVE
, PARTITION 25
ENDING ( 5000
) INCLUSIVE
, PARTITION 26
ENDING ( 5200
) INCLUSIVE
, PARTITION 27
ENDING ( 5400
) INCLUSIVE
, PARTITION 28
ENDING ( 5600
) INCLUSIVE
, PARTITION 29
ENDING ( 5800
) INCLUSIVE
, PARTITION 30
ENDING ( 6000
) INCLUSIVE
, PARTITION 31
ENDING ( 6200
) INCLUSIVE
, PARTITION 32
ENDING ( 6400
) INCLUSIVE
, PARTITION 33
ENDING ( 6600
) INCLUSIVE
, PARTITION 34
ENDING ( 6800
) INCLUSIVE
, PARTITION 35
ENDING ( 7000
) INCLUSIVE
, PARTITION 36
ENDING ( 7200
) INCLUSIVE
, PARTITION 37
ENDING ( 7400
) INCLUSIVE
, PARTITION 38
ENDING ( 7600
) INCLUSIVE
, PARTITION 39
ENDING ( 7800
) INCLUSIVE
, PARTITION 40
ENDING ( 8000
) INCLUSIVE
, PARTITION 41
ENDING ( 8200
) INCLUSIVE
, PARTITION 42
ENDING ( 8400
) INCLUSIVE
, PARTITION 43
ENDING ( 8600
) INCLUSIVE
, PARTITION 44
ENDING ( 8800
) INCLUSIVE
, PARTITION 45
ENDING ( 9000
) INCLUSIVE
, PARTITION 46
ENDING ( 9200
) INCLUSIVE
, PARTITION 47
ENDING ( 9400
) INCLUSIVE
, PARTITION 48
ENDING ( 9600
) INCLUSIVE
, PARTITION 49
ENDING ( 9800
) INCLUSIVE
, PARTITION 50
ENDING ( 10000
) INCLUSIVE
, PARTITION 51
ENDING ( 10200
) INCLUSIVE
, PARTITION 52
ENDING ( 10400
) INCLUSIVE
, PARTITION 53
ENDING ( 10600
) INCLUSIVE
, PARTITION 54
ENDING ( 10800
) INCLUSIVE
, PARTITION 55
ENDING ( 11000
) INCLUSIVE
, PARTITION 56
ENDING ( 11200
) INCLUSIVE
, PARTITION 57
ENDING ( 11400
) INCLUSIVE
, PARTITION 58
ENDING ( 11600
) INCLUSIVE
, PARTITION 59
ENDING ( 11800
) INCLUSIVE
, PARTITION 60
ENDING ( 12000
) INCLUSIVE
, PARTITION 61
ENDING ( 12200
) INCLUSIVE
, PARTITION 62
ENDING ( 12400
) INCLUSIVE
, PARTITION 63
ENDING ( 12600
) INCLUSIVE
, PARTITION 64
ENDING ( 12800
) INCLUSIVE
, PARTITION 65
ENDING ( 13000
) INCLUSIVE
, PARTITION 66
ENDING ( 13200
) INCLUSIVE
, PARTITION 67
ENDING ( 13400
) INCLUSIVE
, PARTITION 68
ENDING ( 13600
) INCLUSIVE
, PARTITION 69
ENDING ( 13800
) INCLUSIVE
, PARTITION 70
ENDING ( 14000
) INCLUSIVE
, PARTITION 71
ENDING ( 14200
) INCLUSIVE
, PARTITION 72
ENDING ( 14400
) INCLUSIVE
, PARTITION 73
ENDING ( 14600
) INCLUSIVE
, PARTITION 74
ENDING ( 14800
) INCLUSIVE
, PARTITION 75
ENDING ( 15000
) INCLUSIVE
, PARTITION 76
ENDING ( 15200
) INCLUSIVE
, PARTITION 77
ENDING ( 15400
) INCLUSIVE
, PARTITION 78
ENDING ( 15600
) INCLUSIVE
, PARTITION 79
ENDING ( 15800
) INCLUSIVE
, PARTITION 80
ENDING ( 16000
) INCLUSIVE
, PARTITION 81
ENDING ( 16200
) INCLUSIVE
, PARTITION 82
ENDING ( 16400
) INCLUSIVE
, PARTITION 83
ENDING ( 16600
) INCLUSIVE
, PARTITION 84
ENDING ( 16800
) INCLUSIVE
, PARTITION 85
ENDING ( 17000
) INCLUSIVE
, PARTITION 86
ENDING ( 17200
) INCLUSIVE
, PARTITION 87
ENDING ( 17400
) INCLUSIVE
, PARTITION 88
ENDING ( 17600
) INCLUSIVE
, PARTITION 89
ENDING ( 17800
) INCLUSIVE
, PARTITION 90
ENDING ( 18000
) INCLUSIVE
, PARTITION 91
ENDING ( 18200
) INCLUSIVE
, PARTITION 92
ENDING ( 18400
) INCLUSIVE
, PARTITION 93
ENDING ( 18600
) INCLUSIVE
, PARTITION 94
ENDING ( 18800
) INCLUSIVE
, PARTITION 95
ENDING ( 19000
) INCLUSIVE
, PARTITION 96
ENDING ( 19200
) INCLUSIVE
, PARTITION 97
ENDING ( 19400
) INCLUSIVE
, PARTITION 98
ENDING ( 19600
) INCLUSIVE
, PARTITION 99
ENDING ( 19800
) INCLUSIVE
, PARTITION 100
ENDING ( 20000
) INCLUSIVE
, PARTITION 101
ENDING ( 20200
) INCLUSIVE
, PARTITION 102
ENDING ( 20400
) INCLUSIVE
, PARTITION 103
ENDING ( 20600
) INCLUSIVE
, PARTITION 104
ENDING ( 20800
) INCLUSIVE
, PARTITION 105
ENDING ( 21000
) INCLUSIVE
, PARTITION 106
ENDING ( 21200
) INCLUSIVE
, PARTITION 107
ENDING ( 21400
) INCLUSIVE
, PARTITION 108
ENDING ( 21600
) INCLUSIVE
, PARTITION 109
ENDING ( 21800
) INCLUSIVE
, PARTITION 110
ENDING ( 22000
) INCLUSIVE
, PARTITION 111
ENDING ( 22200
) INCLUSIVE
, PARTITION 112
ENDING ( 22400
) INCLUSIVE
, PARTITION 113
ENDING ( 22600
) INCLUSIVE
, PARTITION 114
ENDING ( 22800
) INCLUSIVE
, PARTITION 115
ENDING ( 23000
) INCLUSIVE
, PARTITION 116
ENDING ( 23200
) INCLUSIVE
, PARTITION 117
ENDING ( 23400
) INCLUSIVE
, PARTITION 118
ENDING ( 23600
) INCLUSIVE
, PARTITION 119
ENDING ( 23800
) INCLUSIVE
, PARTITION 120
ENDING ( 24000
) INCLUSIVE
, PARTITION 121
ENDING ( 24200
) INCLUSIVE
, PARTITION 122
ENDING ( 24400
) INCLUSIVE
, PARTITION 123
ENDING ( 24600
) INCLUSIVE
, PARTITION 124
ENDING ( 24800
) INCLUSIVE
, PARTITION 125
ENDING ( 25000
) INCLUSIVE
, PARTITION 126
ENDING ( 25200
) INCLUSIVE
, PARTITION 127
ENDING ( 25400
) INCLUSIVE
, PARTITION 128
ENDING ( 25600
) INCLUSIVE
);
CREATE INDEX $creator.iQbDPS1
ON $creator.tQbDPS
(BE010001 ASC
,BE010002 ASC
,BE010089 ASC
)
NOT CLUSTER
PARTITIONED
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
DEFER NO
COPY NO
FREEPAGE 0
PCTFREE 15
GBPCACHE CHANGED
define no
;
CREATE INDEX $creator.iQbDPS3
ON $creator.tQbDPS
(BE010001 ASC
,BE010002 ASC
,BE010034 ASC
,BE010054 ASC
)
NOT CLUSTER
PARTITIONED
define no
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
DEFER NO
COPY NO
USING STOGROUP "GSMS "
PRIQTY -1
SECQTY -1
ERASE NO
FREEPAGE 0
PCTFREE 15
GBPCACHE CHANGED
;
CREATE UNIQUE INDEX $creator.iQbDPS0
ON $creator.tQbDPS
(BE010001 ASC
,BE010002 ASC
,BE010003 DESC
,BE010007 DESC
,BE010018 ASC
,BE010004 DESC
,BE010005 DESC
,BE010006 DESC
)
CLUSTER
PARTITIONED
DEFINE no
COMPRESS NO
BUFFERPOOL BP1
CLOSE NO
DEFER NO
COPY NO
USING STOGROUP "GSMS "
PRIQTY -1
SECQTY -1
ERASE NO
FREEPAGE 20
PCTFREE 18
GBPCACHE CHANGED
;
CREATE VIEW $creator.VqbDPS
( PROCBASE
, TECHBEZ
, DAT_BUCH
, DAT_VAL
, DAT_ERST_GB
, VERDTYP
, BUCHSEITE_KWA_VERD
, PFLEGE
, BUCHSEITE_BWA_VERD
, STORNOFEHLER
, STATUS_STORNO
, STORNOSICHT
, STORNOTEIL
, AUFTRAGS#_STORNO
, GF_LAUF#_STORNO
, ANZ_BEW_VERD
, BETR_KWA_VERD
, BETR_BWA_VERD
, SAMMEL2
, DAT_MUT
, PID_MUT
, PORTO_FREI
, ZAZ_FREI
, ZSK_FREI
, UMSATZKOMM_FREI
, ZUSATZTEXT
, ZUSATZTEXT_VERW
, TAGSCHNITT
, LIEFERANT
, DAT_LIEF
, DAT_TRADE
, AUFTRAGS#_QUAL
, AUFTRAGS#
, DAT_AUFTRAG
, KUNDREF
, DAT_ERFASS
, ZEIT_ERFASS
, DAT_BELEG
, AUFTRAGGEBER_QUAL
, BUID_AUFTRAGGEBER
, AUFTRAGGEBER
, AKTIONS#
, PID_ERFASS
, DAT_KONTROLL1
, ZEIT_KONTROLL1
, PID_KONTROLL1
, DAT_KONTROLL2
, ZEIT_KONTROLL2
, PID_KONTROLL2
, DAT_DISPOFREI
, ZEIT_DISPOFREI
, PID_DISPOFREI
, GF_LAUF#
, MELDETYP
, BUCHSEITE
, BEWEGART
, AUSSERBILANZ
, WHRG_KTO
, BETR_KTOWHRG
, WHRG_BUCH
, BETR_BUCHWHRG
, WHRG_TRANS
, BETR_TRANSWHRG
, KURS
, DAT_KURS
, ZEIT_KURS
, ZEIT_VAL
, PRODUKTE_NR
, PREISKOMP_NR
, AUSPRAEGUNGS_ID
, STORNOART
, STORNOUMFANG
, AUFTRAGS#_ORIG
, GF_LAUF#_ORIG
, REFGRUND
, SAMMELTYP
, SAMMELBEGRIFF
, OP_TYP
, OPOSTEN
, BELEG
, VORMERK#
, KRIT_VAL
, KOK_NVZ
, PROZPFAD
, STRUKTUREN
, SPESENART
, BETR_BUSP
, SAMMEL1
, VERARBEITART
, VM_ABL
, WS_ARTIKEL#
, WS_PREIS
, DE_SOUCHEN#
, DE_ERMITTLUNGART
, DE_MELDUNG
, DE_BUID_KONVERT
, SA_KARTEN#
, SA_TRANSORT
, SA_NAME
, SA_ORT
, ZV_QUAL
, ZV_ANGABEN
) AS
SELECT BE010001 , BE010002 , BE010003 , BE010004 , BE010005 , BE010006 ,
BE010007 , BE010009 , BE010010 , BE010011 , BE010012 , BE010013 ,
BE010014 , BE010015 , BE010016 , BE010017 , BE010018 , BE010019 ,
BE010020 , BE010021 , BE010022 , BE010023 , BE010024 , BE010025 ,
BE010026 , BE010027 , BE010028 , BE010029 , BE010030 , BE010031 ,
BE010032 , BE010033 , BE010034 , BE010035 , BE010036 , BE010037 ,
BE010038 , BE010039 , BE010040 , BE010041 , BE010042 , BE010043 ,
BE010044 , BE010045 , BE010046 , BE010047 , BE010048 , BE010049 ,
BE010050 , BE010051 , BE010052 , BE010053 , BE010054 , BE010055 ,
BE010056 , BE010057 , BE010058 , BE010059 , BE010060 , BE010061 ,
BE010062 , BE010063 , BE010064 , BE010065 , BE010066 , BE010067 ,
BE010068 , BE010069 , BE010070 , BE010071 , BE010072 , BE010073 ,
BE010074 , BE010075 , BE010076 , BE010077 , BE010078 , BE010079 ,
BE010080 , BE010081 , BE010082 , BE010083 , BE010084 , BE010085 ,
BE010086 , BE010087 , BE010088 , BE010089 , BE010090 , BE010091 ,
BE010092 , BE010093 , BE010094 , BE010095 , BE010096 , BE010097 ,
BE010098 , BE010099 , BE010100 , BE010101 , BE010102 , BE010103
from $creator.tQbDPS
;
commit
;
$!
$!
}¢--- DSN.TX.CASE(QBDPSEXP) cre=2014-02-20 mod=2014-02-20-18.06.09 A540769 -----
--- ausgewählte Explains analysieren
select *
-- from A540769.plan_view1
from A540769.plan_view2
-- from A540769.plan_view2Det
where bind_time > current timestamp - 1 hour
order by collid, progName, version, bind_time,
queryno, qBlockNo, planno, mixopSeq
with ur
;
select *
from A540769.DSN_PGRANGE_TABLE
where explain_time > current timestamp - 1 hour
order by collid, progName, applName, explain_time,
queryNo, qBlockNo, tabNo, range
with ur
;
select *
from A540769.plan_table
where bind_time > current timestamp - 1 hour
order by collid, progName, version, bind_time,
queryno, qBlockNo, planno, mixopSeq
with ur
;
select *
from A540769.plan_viewPred
where bind_time > current timestamp - 1 hour
order by collid, progName, applName, bind_time,
queryNo, qBlockNo, planno,
stage, predNo
with ur
;x;
delete from A540769.plan_table;
delete from A540769.DSN_PGRANGE_TABLE;
commit;
}¢--- DSN.TX.CASE(QBDPSINJ) cre=2014-02-20 mod=2014-02-20-21.17.39 A540769 -----
//A540769V JOB (CP00,KE50),'DB2 REO', 00010000
// MSGCLASS=T,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2 00030003
//*MAIN CLASS=LOG 00040003
//S01 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99 00020001
//SYSTSIN DD *
DSN SYSTEM(DP4G)
RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2)
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSIN DD *
insert into QTXcrY.tqbDPS (BE010001, BE010002, BE010003, BE010004
, BE010005, BE010006, BE010007, BE010009, BE010010
, BE010011, BE010012, BE010013, BE010014, BE010015, BE010016
, BE010017, BE010018, BE010089)
with r1 (c) as
(
select 1 from sysibm.sysdummy1
union all select c+1 from r1 where c < 100000
)
, r2 (c, r, t, l) as
(
select c, rand(c), cast('' as varchar(30)), 0 from r1
union all select c, rand(r * 2147483629 + 1)
, t || substr('abcdefghijklmnopqrstuvwxyz 0123456789<>.'
|| 'ABCDEFGHIJKLMNOPQRSTUVWXYZ+*%&/()=?\¢!{}'
, floor(r*80+1), 1)
, l+1
from r2 where l < 30
)
, r (c, i, j, d, e, t) as
(
select c
, int(floor(r * 2147483629 + 1))
, int(floor(rand(r * 2147483629 + 1) * 2147483629 + 1))
, date('01.01.2010') + floor(1000
* rand(1 + 2147483629 * rand(r * 2147483629 * 1))) days
, timestamp('2010-01-01-00.00.00')
+ floor(1000 * rand(1 + 2147483629
* rand(1 + 2147483629 * rand(1 + r * 2147483629)))) days
+ (floor(86400 * rand(1 + 2147483629 * rand(1 + 2147483629
* rand(1 + 2147483629 * rand(1 + 2147483629*r)))))+r) seconds
, t
from r2
where l = 30
)
, b as
(
select mod(c, 25600) + 1 b01
, 'techBez' || strip(mod(c, 7)) || 'und' || strip(mod(c, 7)) b02
, d b03
, d + mod(i, 211) days b04
, e b05
, case when mod(c, 97) = 0 then 'L'
when mod(c, 23) = 0 then 'D'
when mod(c, 7) = 0 then 'P'
else 'U' end b06
, substr(t, 18, 1) b07
, substr(t, 20, 1) b09
, substr(t, 21, 1) b10
, substr(t, 22, 1) b11
, substr(t, 23, 1) b12
, substr(t, 24, 1) b13
, substr(t, 25, 1) b14
, substr(t, 26, 5) || substr(t, 1,15) b15
, i b16
, j b17
, mod(j, 12345) + 0.0001 * mod(j, 5432) b18
, timestamp('2014-03-01.00.00.00') + mod(c, 31) days b89
from r
)
select * from b
;
commit
;
insert into QTXcrY.tqbDPS (BE010001, BE010002, BE010003, BE010004
, BE010005, BE010006, BE010007, BE010009, BE010010
, BE010011, BE010012, BE010013, BE010014, BE010015, BE010016
, BE010017, BE010018, BE010089)
with r1 (c) as
(
select 100001 from sysibm.sysdummy1
union all select c+1 from r1 where c < 1100000
)
, r2 (c, r, t, l) as
(
select c, rand(c), cast('' as varchar(30)), 0 from r1
union all select c, rand(r * 2147483629 + 1)
, t || substr('abcdefghijklmnopqrstuvwxyz 0123456789<>.'
|| 'ABCDEFGHIJKLMNOPQRSTUVWXYZ+*%&/()=?\¢!{}'
, floor(r*80+1), 1)
, l+1
from r2 where l < 30
)
, r (c, i, j, d, e, t) as
(
select mod(c, 25600)
, int(floor(r * 2147483629 + 1))
, int(floor(rand(r * 2147483629 + 1) * 2147483629 + 1))
, date('01.01.2010') + floor(1000
* rand(1 + 2147483629 * rand(r * 2147483629 * 1))) days
, timestamp('2010-01-01-00.00.00')
+ floor(1000 * rand(1 + 2147483629
* rand(1 + 2147483629 * rand(1 + r * 2147483629)))) days
+ (floor(86400 * rand(1 + 2147483629 * rand(1 + 2147483629
* rand(1 + 2147483629 * rand(1 + 2147483629*r)))))+r) seconds
, t
from r2
where l = 30
)
, b as
(
select mod(c, 25600) + 1 b01
, 'techBez' || strip(mod(c, 7)) || 'und' || strip(mod(c, 7)) b02
, d b03
, d + mod(i, 211) days b04
, e b05
, case when mod(c, 97) = 0 then 'L'
when mod(c, 23) = 0 then 'D'
when mod(c, 7) = 0 then 'P'
else 'U' end b06
, substr(t, 18, 1) b07
, substr(t, 20, 1) b09
, substr(t, 21, 1) b10
, substr(t, 22, 1) b11
, substr(t, 23, 1) b12
, substr(t, 24, 1) b13
, substr(t, 25, 1) b14
, substr(t, 26, 5) || substr(t, 1,15) b15
, i b16
, j b17
, mod(j, 12345) + 0.0001 * mod(j, 5432) b18
, timestamp('2014-03-01.00.00.00') + mod(c, 31) days b89
from r
)
select * from b
where mod(b01, 2000) between 1 and 200
;
commit
;
insert into QTXcrY.tqbDPS (BE010001, BE010002, BE010003, BE010004
, BE010005, BE010006, BE010007, BE010009, BE010010
, BE010011, BE010012, BE010013, BE010014, BE010015, BE010016
, BE010017, BE010018, BE010089)
with r0 (c) as
(
select 1 from sysibm.sysdummy1
union all select c+1 from r0 where c < 100000
)
, r1 (c) as
(
select 2560007 + 25600 * floor(c / 13) + 2000 * mod(c, 13)
from r0
)
, r2 (c, r, t, l) as
(
select c, rand(c), cast('' as varchar(30)), 0 from r1
union all select c, rand(r * 2147483629 + 1)
, t || substr('abcdefghijklmnopqrstuvwxyz 0123456789<>.'
|| 'ABCDEFGHIJKLMNOPQRSTUVWXYZ+*%&/()=?\¢!{}'
, floor(r*80+1), 1)
, l+1
from r2 where l < 30
)
, r (c, i, j, d, e, t) as
(
select mod(c, 25600)
, int(floor(r * 2147483629 + 1))
, int(floor(rand(r * 2147483629 + 1) * 2147483629 + 1))
, date('01.01.2010') + floor(1000
* rand(1 + 2147483629 * rand(r * 2147483629 * 1))) days
, timestamp('2010-01-01-00.00.00')
+ floor(1000 * rand(1 + 2147483629
* rand(1 + 2147483629 * rand(1 + r * 2147483629)))) days
+ (floor(86400 * rand(1 + 2147483629 * rand(1 + 2147483629
* rand(1 + 2147483629 * rand(1 + 2147483629*r)))))+r) seconds
, t
from r2
where l = 30
)
, b as
(
select mod(c, 25600) + 1 b01
, 'techBez' || strip(mod(c, 7)) || 'und' || strip(mod(c, 7)) b02
, d b03
, d + mod(i, 211) days b04
, e b05
, case when mod(c, 97) = 0 then 'L'
when mod(c, 23) = 0 then 'D'
when mod(c, 7) = 0 then 'P'
else 'U' end b06
, substr(t, 18, 1) b07
, substr(t, 20, 1) b09
, substr(t, 21, 1) b10
, substr(t, 22, 1) b11
, substr(t, 23, 1) b12
, substr(t, 24, 1) b13
, substr(t, 25, 1) b14
, substr(t, 26, 5) || substr(t, 1,15) b15
, i b16
, j b17
, mod(j, 12345) + 0.0001 * mod(j, 5432) b18
, timestamp('2014-03-01.00.00.00') + mod(c, 31) days b89
from r
)
select * from b
;
commit
}¢--- DSN.TX.CASE(QBDPSINS) cre=2014-02-18 mod=2014-02-20-16.07.56 A540769 -----
insert into QTXCRX.tqbDPS (BE010001, BE010002, BE010003, BE010004
, BE010005, BE010006, BE010007, BE010009, BE010010
, BE010011, BE010012, BE010013, BE010014, BE010015, BE010016
, BE010017, BE010018, BE010089)
with r1 (c) as
(
select 1 from sysibm.sysdummy1
union all select c+1 from r1 where c < 10000
)
, r2 (c, r, t, l) as
(
select c, rand(c), cast('' as varchar(30)), 0 from r1
union all select c, rand(r * 2147483629 + 1)
, t || substr('abcdefghijklmnopqrstuvwxyz 0123456789<>.'
|| 'ABCDEFGHIJKLMNOPQRSTUVWXYZ+*%&/()=?\¢!{}'
, floor(r*80+1), 1)
, l+1
from r2 where l < 30
)
, r (c, i, j, d, e, t) as
(
select c
, int(floor(r * 2147483629 + 1))
, int(floor(rand(r * 2147483629 + 1) * 2147483629 + 1))
, date('01.01.2010') + floor(1000
* rand(1 + 2147483629 * rand(r * 2147483629 * 1))) days
, timestamp('2010-01-01-00.00.00')
+ floor(1000 * rand(1 + 2147483629
* rand(1 + 2147483629 * rand(1 + r * 2147483629)))) days
+ (floor(86400 * rand(1 + 2147483629 * rand(1 + 2147483629
* rand(1 + 2147483629 * rand(1 + 2147483629*r)))))+r) seconds
, t
from r2
where l = 30
)
, b as
(
select mod(c, 25600) + 1 b01
, 'techBez' || strip(mod(c, 7)) || 'und' || strip(mod(c, 7)) b02
, d b03
, d + mod(i, 211) days b04
, e b05
, case when mod(c, 97) = 0 then 'L'
when mod(c, 23) = 0 then 'D'
when mod(c, 7) = 0 then 'P'
else 'U' end b06
, substr(t, 18, 1) b07
, substr(t, 20, 1) b09
, substr(t, 21, 1) b10
, substr(t, 22, 1) b11
, substr(t, 23, 1) b12
, substr(t, 24, 1) b13
, substr(t, 25, 1) b14
, substr(t, 26, 5) || substr(t, 1,15) b15
, i b16
, j b17
, mod(j, 12345) + 0.0001 * mod(j, 5432) b18
, timestamp('2014-03-01.00.00.00') + mod(c, 31) days b89
from r
)
select * from b
;
commit
}¢--- DSN.TX.CASE(QBDPSREO) cre= mod= ------------------------------------------
//A540769S JOB (CP00,KE50),'DB2 reo',
// MSGCLASS=T,TIME=1440,SCHENV=DP4G,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//* ux utility generator reo
//* who RZ4 DP4G A540769 2
//* 20.02.14 15:11:58 A540769S 09
//*
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DP4G,'A540769S.UXUTIL'),
// REGION=0M
//SYSPRINT DD SYSOUT=*
//*YSPRINT DD DSN=DSN.JOBRUN.A540769S.STEP1.#DT#,
//* DISP=(NEW,CATLG,CATLG),MGMTCLAS=BAT#NW,DSNTYPE=LARGE,
//* DCB=(RECFM=FB,LRECL=132,DSORG=PS),SPACE=(CYL,(1,1000))
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DP4G.DBAA.LISTDEF(TEMPL)
//INDUMMY DD DUMMY
//SYSIN DD *
LISTDEF TPLIST
INCLUDE TABLESPACE QTXDBX.ABDPS PARTLEVEL
INCLUDE TABLESPACE QTXDBY.ABDPS PARTLEVEL
---- reorg -------------------------------------------------------------
REORG TABLESPACE LIST TPLIST
LOG NO
SORTDATA
COPYDDN(TCOPYD)
SHRLEVEL CHANGE
-- Achtung mapping table zufällig gewählt|
MAPPINGTABLE S100447.MAPTAB09
DRAIN_WAIT 40
RETRY 20
RETRY_DELAY 180
MAXRO 40
DRAIN WRITERS
LONGLOG CONTINUE
DELAY 1200
TIMEOUT TERM
UNLDDN TSRECD
UNLOAD CONTINUE
PUNCHDDN TPUNCH
DISCARDDN TDISC
SORTKEYS
SORTDEVT DISK
STATISTICS
INDEX ALL KEYCARD
UPDATE ALL
}¢--- DSN.TX.CASE(QBDPSSEL) cre=2014-02-19 mod=2014-02-20-21.26.54 A540769 -----
select count(*), be010001, be010002
from QTXCRX.tQbDPS
group by be010001, be010002
order by 1 desc
fetch first 10 rows only
}¢--- DSN.TX.CASE(QBDPSSEW) cre=2014-02-20 mod=2014-02-20-21.55.01 A540769 -----
$#@
call sqlConnect dp4g
m.timing_say = 0
sqlSrc = "select AUFTRAGS#_STORNO aSto" ,
"from qtxcrX.VQBDPS v10" ,
"WHERE V10.PROCBASE = ? AND V10.TECHBEZ = ? " ,
"AND V10.SAMMEL1 = ? AND V10.VERDTYP IN ( ?, ?)"
if 0 then $@¢
call sqlUpdate ,"set current sqlid = 'A540769'"
call sqlUpdate ,'set current explain mode yes'
call sqlQueryPrep 3, sqlSrc
call sqlUpdate ,'set current explain mode no'
call sqlCommit
exit
$!
call sqlQueryPrep 3, sqlSrc
call timing
do cx = 1 to 1000
ix = cx * 997 // 1100179 // 25600
ix = 7 + 2000 * (ix // 13)
$** if (ix // 25600 + 1) // 2000 <> 8 then
$** iterate
$** if ix > 100000 then
$** if (ix // 25600 + 1) // 2000 > 200 then
$** iterate
$** say 'proc' (ix // 25600 + 1)
call sqlQueryArgs 3, ix // 25600 + 1,
, 'techBez' || (ix // 7) || 'und' || (ix // 7) ,
, '2014-03-' || (1 + ix // 31) || '-00.00.00',
, 'X', 'Y'
call timing 'open'
do fx=1 while sqlFetch(3,ff)
end
call timing 'fetch', fx, cx ix m.ff.aSto
call sqlClose 3
call timing 'close'
end
say sqlSrc
call timingSummary
call sqlDisconnect
$#out 20140220 21:48:09
$#out 20140220 21:47:16
$#out 20140220 21:46:43
$#out 20140220 21:44:46
$#out 20140220 21:43:46
$#out 20140220 21:41:44
$#out 20140220 21:39:03
$#out 20140220 21:36:49
}¢--- DSN.TX.CASE(QBLOB) cre=2016-02-04 mod=2016-06-19-10.27.12 A540769 --------
* alter Table with lob
* column fEnd char($-¢11-$phase$!)
*
creDb trg 2
+ ok creDb DSN.TX.GENF(QBLOBt2) ::f
creDb src 3
+ ok creDb DSN.TX.GENF(QBLOBs3) ::f
manual dbx c ie
+ wait dbx c ie
creDb src 2
creDb trg 1
}¢--- DSN.TX.CASE(QBLOBDDL) cre=2014-02-03 mod=2016-06-19-10.27.02 A540769 -----
------------$-¢right(userid() sysvar(sysnode) date(s) time(), 60, '-')$!
-- testCase $dsn
-- env $env phase $phase
-- dbSys $dbSys db $db creator $creator
-----------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
SET CURRENT SCHEMA = $creator;
drop tablespace $db.ABLOBORI;
drop tablespace $db.ABLOBLOB;
commit;
$@¢
if $phase >= 1 then $@=¢
CREATE TABLESPACE ABLOBORI in $db
USING STOGROUP GSMS
BUFFERPOOL BP2
SEGSIZE 64
CLOSE YES
GBPCACHE CHANGED
DEFINE YES
LOGGED
LOCKSIZE ANY LOCKMAX SYSTEM
CCSID EBCDIC
;
CREATE LOB TABLESPACE ABLOBLOB in $db
USING STOGROUP GSMS
BUFFERPOOL BP2
CLOSE yes
DSSIZE 4G
LOCKSIZE ANY LOCKMAX SYSTEM
GBPCACHE CHANGED
DEFINE YES
LOGGED
;
CREATE TABLE $creator.tqz91qbLobORI
( name CHARACTER(16) not null
, text char(30) not null
, ix int
-- ,EXLOBNTRIES_ROWID ROWID GENERATED ALWAYS
, lob1 clob(1G) with default null
, fEnd char($-¢11-$phase$!) not null with default
) in $db.ABLOBORI
APPEND NO
NOT VOLATILE CARDINALITY
DATA CAPTURE NONE
AUDIT NONE
CCSID EBCDIC
;
create UNIQUE INDEX $creator.iqz91qbLobORI1
on $creator.tqz91qbLobORI
(name)
CLUSTER
DEFINE YES
COMPRESS NO
BUFFERPOOL BP1
CLOSE yes
DEFER NO
COPY NO
USING STOGROUP GSMS
GBPCACHE CHANGED
PIECESIZE 2M
;
create auxiliary table $creator.tqz91qbLobLOB
in $db.aBloblob
stores $creator.tqz91qbLobORI
append no
column lob1
;
-- auxilary index ist notwendig
create UNIQUE INDEX $creator.iqz91qbLobLOB1
on $creator.tqz91qbLobLOB
DEFINE YES
COMPRESS NO
BUFFERPOOL BP1
CLOSE yes
COPY NO
USING STOGROUP GSMS
GBPCACHE CHANGED
PIECESIZE 2M
;
insert into $creator.tqz91qbLobOri
(name, text, ix, lob1, fEnd)
with u (ix, ll) as
(
select -1, cast(null as clob) from sysibm.sysDummy1
union all select -2, cast(null as clob) from sysibm.sysDummy1
union all select 0, cast('' as clob) from sysibm.sysDummy1
union all select ix+1
, clob('<' || strip(ix+1) || '--- ') || ll
|| clob(' ---' || strip(ix+1) || '--- ') || ll
|| clob(' ---' || strip(ix+1) || '>')
from u where ix < 18 and ix >= 0
) -- 20 --> 22MB, groesser gibt meist abend
select 'name ' || strip(ix)
, 'text ' || strip(ix)
, ix
, ll
, 'end ' || strip(ix)
from u where ix < 99
;
commit
$!
$!
}¢--- DSN.TX.CASE(QBLOBINS) cre=2014-02-03 mod=2014-02-03-17.09.10 A540769 -----
delete from QTXCRY.tQblobOri
;
insert into QTXCRY.tQBLobOri
(name, text, ix, lob1, fEnd)
with u (ix, ll) as
(
select -1, cast(null as clob) from sysibm.sysDummy1
union all select -2, cast(null as clob) from sysibm.sysDummy1
union all select 0, cast('' as clob) from sysibm.sysDummy1
union all select ix+1
, clob('<' || strip(ix+1) || '--- ') || ll
|| clob(' ---' || strip(ix+1) || '--- ') || ll
|| clob(' ---' || strip(ix+1) || '>')
from u where ix < 20 and ix >= 0
) -- 20 --> 22MB, groesser gibt meist abend
select 'name ' || strip(ix)
, 'text ' || strip(ix)
, ix
, ll
, 'end ' || strip(ix)
from u where ix < 99
;
commit
}¢--- DSN.TX.CASE(QBLOBLOA) cre=2014-02-03 mod=2016-02-05-09.44.02 A540769 -----
//A540769W JOB (CP00,KE50),'DB2 ADMIN', 00010002
// TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2ALL, 00020004
// MSGCLASS=T,NOTIFY=&SYSUID 00021002
//*
//***************************************************
//* load trg=2: TS mit LOBs
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DP4G,'A540769V.UNLOAC'),
// REGION=0M
//*DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSTEMPL DD DSN=DP4G.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE FLBUQVBQ
DSN('DSN.TST.QLOBUNL.ABLOBORI.P00000.REC')
DISP(OLD,KEEP,KEEP)
LOAD DATA INDDN FLBUQVBQ LOG NO RESUME NO REPLACE
STATISTICS INDEX(ALL)
SORTDEVT DISK
WORKDDN(TSYUTD,TSOUTD)
EBCDIC CCSID(00500,00000,00000)
FORMAT SPANNED YES
INTO TABLE
"QZ92CRT".
"TQZ91QBLOGORI"
NUMRECS 21
IGNOREFIELDS YES
( "NAME"
POSITION( 00003:00018) CHAR(00016)
, "TEXT"
POSITION( 00019:00048) CHAR(00030)
, "IX"
POSITION( 00050:00053) INTEGER
NULLIF(00049)=X'FF'
, "FEND"
POSITION( 00054:00062) CHAR(00009)
, "DSN_ROWID"
POSITION( 00063) ROWID
, "DSN_NULL_IND_00006" POSITION( *) CHAR(1)
, "LOB1"
POSITION( *) CLOB
NULLIF(DSN_NULL_IND_00006)=X'FF'
)
LISTDEF LST
INCLUDE TABLESPACE QZ92A1T.ABLOBORI PARTLEVEL ALL
COPY LIST LST COPYDDN(TCOPYD)
PARALLEL
SHRLEVEL CHANGE
RUNSTATS TABLESPACE LIST LST
INDEX ALL KEYCARD
}¢--- DSN.TX.CASE(QBLOBSEL) cre=2014-02-03 mod=2016-02-05-09.34.39 A540769 -----
select name
, length(lob1) lob1Len
, substr(lob1, 1, 30) left
, substr(lob1, max(length(lob1)-29, 1), 30) right
, substr(lob1, max(length(lob1) / 2, 1), 30) middle
from QZ92CRT.TQZ91QBLOGORI
;
}¢--- DSN.TX.CASE(QBLOBUNL) cre=2014-02-03 mod=2016-02-05-09.47.15 A540769 -----
//A540769W JOB (CP00,KE50),'DB2 ADMIN', 00010002
// TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2ALL, 00020004
// MSGCLASS=T,NOTIFY=&SYSUID 00021002
//*
//***************************************************
//* unload trg 2
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DP4G,'A540769V.UNLOAC'),
// REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSTEMPL DD DSN=DP4G.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE TREC -- UNLDDN FUER UNLOAD
DSN('DSN.TST.QLOBUNL.&SN..P&PART..REC')
DATACLAS(ENN35) MGMTCLAS(COM#A041)
SPACE TRK MAXPRIME 600
TEMPLATE TPUN -- PUNCHDDN FUER REORG UNLOAD
DSN('DSN.TST.QLOBUNL.&SN..PUN')
DATACLAS(NULL8) MGMTCLAS(COM#A041)
SPACE(1,10) TRK
UNLOAD FROM TABLE QZ92CRT.TQZ91QBLOGORI
( NAME CHAR
, TEXT CHAR
, IX INTEGER
, FEND CHAR
, DB2_GENERATED_ROWID_FOR_LOBS ROWID
, LOB1 CLOB
)
PUNCHDDN TPUN UNLDDN TREC
MAXERR 20
SPANNED YES
SHRLEVEL CHANGE
}¢--- DSN.TX.CASE(QBPRB) cre= mod= ---------------------------------------------
credb src 1
+ ok creDb DSN.TX.GENF(QBPRBs1) ::f
}¢--- DSN.TX.CASE(QBPRBCNT) cre=2014-07-10 mod=2014-07-11-09.34.04 A540769 -----
select count(*), planName, date
from A540769.tacct_program20140701
group by planName, date
;x;
select count(*), planName, date
from A540769.tacct_general20140701
group by planName, date
}¢--- DSN.TX.CASE(QBPRBDDL) cre=2014-07-10 mod=2014-07-10-20.32.25 A540769 -----
SET CURRENT SQLID = 'S100447';
$= db = DA540769
$= creator = A540769
drop TABLESPACE $db.qbprbG;
drop TABLESPACE $db.qbprbP;
-- drop TABLE $creator.Tacct_general20140701;
commit;
$@¢
if $phase >= 1 then $@=¢
CREATE TABLESPACE qbprbG
in $db
BUFFERPOOL BP2
CLOSE YES
LOCKMAX SYSTEM
DEFINE YES
LOGGED
LOCKSIZE ANY
MAXROWS 255
CCSID unicode
SEGSIZE 64
USING STOGROUP GSMS
PRIQTY -1
SECQTY -1
ERASE NO
GBPCACHE CHANGED
COMPRESS YES
;
CREATE TABLESPACE qbprbP
in $db
BUFFERPOOL BP2
CLOSE YES
LOCKMAX SYSTEM
DEFINE YES
LOGGED
LOCKSIZE ANY
MAXROWS 255
CCSID unicode
SEGSIZE 64
USING STOGROUP GSMS
PRIQTY -1
SECQTY -1
ERASE NO
GBPCACHE CHANGED
COMPRESS YES
;
CREATE TABLE $creator.Tacct_general20140701
like pbxx.tacct_general_20140701
in $db.qbprbG
WITH RESTRICT ON DROP
NOT VOLATILE CARDINALITY
DATA CAPTURE changes
AUDIT NONE
CCSID unicode
;
CREATE TABLE $creator.Tacct_program20140701
like pbxx.tacct_program_20140701
in $db.qbprbP
WITH RESTRICT ON DROP
NOT VOLATILE CARDINALITY
DATA CAPTURE changes
AUDIT NONE
CCSID unicode
;
commit;
$!
$!
}¢--- DSN.TX.CASE(QBPRBLOG) cre=2014-07-10 mod=2014-07-10-20.33.27 A540769 -----
//A540769W JOB (CP00,KE50),'DB2 REO', 00010000
// MSGCLASS=T,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2 00030003
//*MAIN CLASS=LOG 00040003
//S1 EXEC PGM=DSNUTILB,PARM='DP4G,A540769L.LOAD' 00020001
//SYSMAP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSERR DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DP4G.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
EXEC SQL
DECLARE CUR1 CURSOR FOR
SELECT *
FROM PBXX.TACCT_GENERAL_20140701
WHERE PLANNAME LIKE 'BE077%'
UNION ALL SELECT *
FROM PBXX.TACCT_GENERAL_20140702
WHERE PLANNAME LIKE 'BE077%'
ENDEXEC
LOAD DATA INCURSOR CUR1 LOG NO RESUME NO REPLACE
COPYDDN(TCOPYD) STATISTICS INDEX ALL
SORTDEVT DISK SORTNUM 50
WORKDDN(TSYUTS,TSOUTS)
INTO TABLE A540769.TACCT_GENERAL20140701
}¢--- DSN.TX.CASE(QBPRBLOP) cre=2014-07-10 mod=2014-07-10-20.34.29 A540769 -----
//A540769P JOB (CP00,KE50),'DB2 REO', 00010000
// MSGCLASS=T,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2 00030003
//*MAIN CLASS=LOG 00040003
//S1 EXEC PGM=DSNUTILB,PARM='DP4G,A540769P.LOAD' 00020001
//SYSMAP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSERR DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DP4G.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
EXEC SQL
DECLARE CUR1 CURSOR FOR
SELECT *
FROM PBXX.TACCT_PROGRAM_20140701
WHERE PLANNAME LIKE 'BE077%'
UNION ALL SELECT *
FROM PBXX.TACCT_PROGRAM_20140702
WHERE PLANNAME LIKE 'BE077%'
ENDEXEC
LOAD DATA INCURSOR CUR1 LOG NO RESUME NO REPLACE
COPYDDN(TCOPYD) STATISTICS INDEX ALL
SORTDEVT DISK SORTNUM 50
WORKDDN(TSYUTS,TSOUTS)
INTO TABLE A540769.TACCT_PROGRAM20140701
}¢--- DSN.TX.CASE(QBRI) cre=2016-02-08 mod=2016-02-08-10.43.30 A540769 ---------
credb src 1
+ ok creDb DSN.TX.GENF(QBRIs1) ::f
credb trg 1
+ ok creDb DSN.TX.GENF(QBRIt1) ::f
}¢--- DSN.TX.CASE(QBRIDDL) cre=2016-02-08 mod=2016-02-08-10.43.22 A540769 ------
----------$-¢right(userid() sysvar(sysnode) date(s) time(), 60, '-')$!
-- testCase $dsn
-- env $env phase $phase
-- dbSys $dbSys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
drop TABLESPACE $db.aQbRiPar;
drop TABLESPACE $db.aQbRiChi;
commit;
$@ if $phase >= 1 then $@=/cre/
CREATE TABLESPACE aQbRiPar
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
segsize 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255;
CREATE TABLESPACE aQbRiChi
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
segsize 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255;
CREATE TABLE $creator.Tqz91qbriPar
(id int not null
,txt char(10) not null with default
,refPP int
, constraint prim primary key(id)
)
IN $db.aQbRiPar
;
CREATE unique INDEX $creator.iQz91qbriPar
ON $creator.Tqz91qbriPar
(id asc
)
USING STOGROUP GSMS
ERASE NO
GBPCACHE CHANGED
CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G
;
alter table $creator.Tqz91qbRIPar
add constraint refPP foreign key (refPP)
references $creator.Tqz91qbRIPar on delete cascade
;
CREATE TABLE $creator.Tqz91qbriChi
(chi int not null
,txt char(10) not null with default
,refCP int
-- , constraint prim primary key(id)
, constraint refPP foreign key (refCP)
references $creator.Tqz91qbRIPar on delete cascade
)
IN $db.aQbRiCHI
; $*(
CREATE unique INDEX $creator.iQz91qbriPar
ON $creator.Tqz91qbriPar
(id asc
)
USING STOGROUP GSMS
ERASE NO
GBPCACHE CHANGED
CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G
; $*)
COMMIT;
insert into $creator.Tqz91qbriPar (id, txt) values(1, 'root') ;
insert into $creator.Tqz91qbriPar values(11, 'chi11', 1) ;
insert into $creator.Tqz91qbriPar values(12, 'chi12', 1) ;
insert into $creator.Tqz91qbriPar values(121, 'grCh121', 12);
insert into $creator.Tqz91qbriPar values(3, 'cycle3', 3);
insert into $creator.Tqz91qbriChi
select id, txt, refPP from $creator.Tqz91qbriPar;
$/cre/
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(QBSEQ) cre= mod= ---------------------------------------------
credb src 3
+ ok creDb DSN.TX.GENF(QBSEQs3) ::f
* credb trg 1
}¢--- DSN.TX.CASE(QBSEQDDL) cre=2014-03-29 mod=2014-10-22-15.45.06 A540769 -----
set current sqlid = 'S100447';
drop TABLESPACE $db.qbSeq;
drop sequence $creator.sQbSeq1;
commit;
$@¢
if $phase = 1 then $@=¢
create sequence $creator.sQbSeq1;
$! else if $phase = 2 then $@=¢
create sequence $creator.sQbSeq1 no cache order;
$! else if $phase = 3 then $@=¢
create sequence $creator.sQbSeq1 no cache order;
SET CURRENT SQLID = 'S100447';
CREATE TABLESPACE qbSeq
in $db
BUFFERPOOL BP2
SEGSIZE 64
DEFINE YES
LOGGED
LOCKSIZE ANY
MAXROWS 255
CCSID EBCDIC
USING STOGROUP GSMS
PRIQTY -1
SECQTY -1
ERASE NO
PCTFREE 5
FREEPAGE 0
GBPCACHE CHANGED
COMPRESS YES
TRACKMOD YES
;
CREATE TABLE $creator.TqbSeqA1
(id int not null generated always as identity
,txt char(20) not null
,num int not null with default
)
IN $db.qbSeq
APPEND NO
WITH RESTRICT ON DROP
NOT VOLATILE CARDINALITY
DATA CAPTURE CHANGES
AUDIT NONE
CCSID EBCDIC
;
CREATE TRIGGER $creator.TqbSeqUpd
no cascade before update ON $creator.TqbSeqA1
REFERENCING new AS new
FOR EACH ROW MODE DB2SQL
set new.num = next value for $creator.sQbSeq1
;
CREATE TRIGGER $creator.TqbSeqIns
no cascade before insert ON $creator.TqbSeqA1
REFERENCING new AS new
FOR EACH ROW MODE DB2SQL
set new.num = next value for $creator.sQbSeq1
;
commit;
insert into $creator.tQbSeqA1 (txt, num) values ('eins', 100);
insert into $creator.tQbSeqA1 (txt, num) values ('zwei', 200);
select * from $creator.tQbSeqa1;
update $creator.tQbSeqA1 set txt = strip(txt) || '+';
update $creator.tQbSeqA1 set txt = strip(txt) || '+';
select * from $creator.tQbSeqa1;
$!
$!
commit;
}¢--- DSN.TX.CASE(QBSEQNX) cre=2014-03-29 mod=2014-03-29-09.46.11 A540769 ------
select next value for qTxCrX.sQbSeq1 next from sysibm.sysDummy1;
select previous value for qTxCrX.sQbSeq1 prev from sysibm.sysDummy1;
select next value for qTxCrX.sQbSeq1 next from sysibm.sysDummy1;
select current timestamp from sysibm.sysDummy1;
declare global temporary table session.nx(nx int);
insert into session.nx
with l(l) as
(
select 1 from sysibm.sysDummy1
union all select l+1 from l where l < 100000
)
select next value for qTxCrX.sQbSeq1
from l
;
select count(*) c, min(nx), max(nx)
from session.nx;
select current timestamp from sysibm.sysDummy1;
rollback;
;x;
select current timestamp from sysibm.sysDummy1;
with l(l) as
(
select 1 from sysibm.sysDummy1
union all select l+1 from l where l < 1000000
)
select min(l), max(l), count(*)
from l
;
select current timestamp from sysibm.sysDummy1;
}¢--- DSN.TX.CASE(QBXC5) cre=2014-04-29 mod=2014-05-05-17.11.58 A540769 --------
credb trg 1
+ ok creDb DSN.TX.GENF(QBXC5t1) ::f
}¢--- DSN.TX.CASE(QBXC5COP) cre=2014-05-05 mod=2014-05-05-17.11.36 A540769 -----
//A540769O JOB (CP00,KE50),'DB2 co',
// MSGCLASS=T,TIME=1440,SCHENV=DP4G,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//* ux utility generator co
//* who RZ4 DP4G A540769 2
//* 05.05.14 15:56:34 A540769O 05
//*
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DP4G,'A540769O.UXUTIL'),
// REGION=0M
//SYSPRINT DD SYSOUT=*
//*YSPRINT DD DSN=DSN.JOBRUN.A540769O.STEP1.#DT#,
//* DISP=(NEW,CATLG,CATLG),MGMTCLAS=BAT#NW,DSNTYPE=LARGE,
//* DCB=(RECFM=FB,LRECL=132,DSORG=PS),SPACE=(CYL,(1,1000))
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DP4G.DBAA.LISTDEF(TEMPL)
//INDUMMY DD DUMMY
//SYSIN DD *
LISTDEF TPLIST
INCLUDE TABLESPACE QTXDBY.QBXC5 PARTLEVEL
---- copy --------------------------------------------------------------
COPY LIST TPLIST COPYDDN(TCOPYD)
FULL NO
PARALLEL
SHRLEVEL CHANGE
}¢--- DSN.TX.CASE(QBXC5DDL) cre=2014-04-29 mod=2014-05-05-16.18.18 A540769 -----
SET CURRENT SQLID = 'S100447';
drop TABLESPACE $db.qbxc5;
commit;
CREATE TABLESPACE qbXC5
in $db
BUFFERPOOL BP32K
DSSIZE 16G
CLOSE YES
LOCKMAX SYSTEM
SEGSIZE 64
DEFINE YES
LOGGED
LOCKSIZE ANY
MAXROWS 255
CCSID EBCDIC
NUMPARTS 5
USING STOGROUP "GSMS "
PRIQTY -1
SECQTY -1
ERASE NO
PCTFREE 5
FREEPAGE 0
GBPCACHE CHANGED
COMPRESS YES
TRACKMOD YES
;
CREATE TABLE $creator.TQBXC5A1
(XC502_PART_NUMBER CHARACTER(3) FOR SBCS DATA
NOT NULL
,XC502_DOC_UUID CHARACTER(36) FOR SBCS DATA
NOT NULL
,XC502_DOC_FORMAT CHARACTER(3) FOR SBCS DATA
NOT NULL
,XC502_DOC_CONTENT_SEQ INTEGER
NOT NULL
WITH DEFAULT
,XC502_DOC_CONTENT VARCHAR(32000) FOR BIT DATA
NOT NULL
,CONSTRAINT XC502_PART_NUMBER PRIMARY KEY
(XC502_PART_NUMBER
,XC502_DOC_UUID
,XC502_DOC_FORMAT
,XC502_DOC_CONTENT_SEQ
)
)
IN $db.qbXC5
APPEND NO
WITH RESTRICT ON DROP
NOT VOLATILE CARDINALITY
DATA CAPTURE CHANGES
AUDIT NONE
CCSID EBCDIC
PARTITION BY RANGE
(XC502_PART_NUMBER NULLS LAST ASC
)
( PARTITION 1
ENDING ( '001'
) INCLUSIVE
, PARTITION 2
ENDING ( '002'
) INCLUSIVE
, PARTITION 3
ENDING ( '003'
) INCLUSIVE
, PARTITION 4
ENDING ( '004'
) INCLUSIVE
, PARTITION 5
ENDING ( '005'
) INCLUSIVE
);
create unique index $creator.iqbxc5a0
on $creator.tqbxc5a1
(XC502_PART_NUMBER ASC
,XC502_DOC_UUID ASC
,XC502_DOC_FORMAT ASC
,XC502_DOC_CONTENT_SEQ ASC
)
CLUSTER
PARTITIONED
DEFINE YES
COMPRESS NO
BUFFERPOOL BP16K0
USING STOGROUP "GSMS "
PRIQTY -1
SECQTY -1
ERASE NO
pctFree 50
CLOSE YES
DEFER NO
COPY NO
;
}¢--- DSN.TX.CASE(QBXC5INS) cre=2014-04-29 mod=2014-05-05-17.27.33 A540769 -----
$#@
call sqlConnect dp4g
call sql2St "select strip(left(name, 30)) from sysibm.sysTables",
"where name like 'SYS%'", nn, ":m.dst"
say m.nn.0 m.nn.1 m.nn.2
m.timing_say = 1
if 1 then $@¢
call sqlQueryPrep 5, "select",
"value(max(XC502_DOC_CONTENT_SEQ)+1, 1)" ,
"from qtxCry.tQBXC5a1 where XC502_PART_NUMBER = ?",
"and XC502_doc_uuid = ? and XC502_doc_format = ?" ,
, ":m.ii"
call sqlUpdPrep 7, "insert into qtxCry.tQBXC5a1",
"values(cast(? as char(3)), cast(? as char(30))" ,
", cast(? as char(3))" ,
", ?" ,
", cast(? as varchar(5000)))"
cIns = 0
call timing , , 'start'
do cx=1 to 10
do nx=1 to m.nn.0
cIns = cIns + 1
fo = 'fo' || (nx // 5)
px = right((nx // 5) + 1, 3, 0)
call sqlQueryArgs 5, px, m.nn.nx, fo
call sqlFetch 5
call sqlClose 5
call sqlUpdArgs 7, px, m.nn.nx, fo, m.ii ,
, copies(cx nx m.nn.nx '/ ',99)
end
end
call timing , , 'sels+inserts' cIns
$! else if 0 then $@¢
call sqlUpdPrep 7, "insert into qtxCry.tQBXC5a1",
"select cast(? as char(3)), cast(? as char(30))" ,
", cast(? as char(3))" ,
", value(max(XC502_DOC_CONTENT_SEQ)+1, 1)" ,
", cast(? as varchar(5000))" ,
"from qtxCry.tQBXC5a1 where XC502_PART_NUMBER = ?",
"and XC502_doc_uuid = ? and XC502_doc_format = ?"
cIns = 0
call timing , , 'start'
do cx=1 to 10
do nx=1 to m.nn.0
cIns = cIns + 1
fo = 'fo' || (nx // 5)
px = right((nx // 5) + 1, 3, 0)
call sqlUpdArgs 7, px, m.nn.nx, fo,
, copies(cx nx m.nn.nx '/ ',99),
, px, m.nn.nx, fo
end
end
call timing , , 'inserts' cIns
$! else if 0 then $@¢
call sqlUpdPrep 7, "insert into qtxCry.tQBXC5a1",
"with d (p, u, f) as" ,
"(select cast(? as char(3)), cast(? as char(30)), 'fo' " ,
"from sysibm.SysDummy1)",
"select p, u, f, (select value(max(XC502_DOC_CONTENT_SEQ)+1, 1)" ,
"from qtxCry.tQBXC5a1 where XC502_PART_NUMBER = d.p",
"and XC502_doc_uuid = d.u and XC502_doc_format = d.f)" ,
", cast(? as varchar(5000))" ,
"from d"
do cx=1 to 5
do nx=1 to m.nn.0
px = right((nx // 5) + 1, 3, 0)
call sqlUpdArgs 7, px, m.nn.nx, copies(cx nx m.nn.nx '/ ',99)
end
end
$!
$#out 20140505 17:27:16
$#out 20140505 17:15:42
$#out 20140505 17:12:12
$#out 20140505 16:28:50
$#out 20140505 16:28:15
}¢--- DSN.TX.CASE(QBXC5JCL) cre=2014-04-30 mod=2014-04-30-12.19.13 A540769 -----
//A540769W JOB (CP00,KE50),'DB2 REO', 00010000
// MSGCLASS=T,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2 00030000
//*MAIN CLASS=LOG 00040000
// SET PKG=CMN.DIV.P0.DB2J.#000197 00041000
//E01 EXEC PGM=IKJEFT01,DYNAMNBR=30 00049000
//SYSTSPRT DD SYSOUT=* 00049100
//DBRMLIB DD DISP=SHR,DSN=&PKG..DBR 00049200
//SYSTSIN DD * 00049500
DSN S(DP4G) 00049600
BIND PACKAGE(QZ) - 00049700
OWNER(CMNBATCH) - 00049800
QUALIFIER(OA1A) - 00049900
MEMBER(QZPLB) - 00050000
CURRENTDATA(NO) - 00050100
DEGREE(1) - 00050200
DYNAMICRULES(BIND) - 00050300
EXPLAIN(YES) - 00050400
FLAG(I) - 00050500
ISOLATION(CS) - 00050600
SQLERROR(NOPACKAGE) - 00050700
VALIDATE(BIND) - 00050800
ACTION(REPLACE) 00050900
//V3 EXEC PGM=QZPLB,PARM='A3' 00051000
//STEPLIB DD DISP=SHR,DSN=&PKG..LLB 00052000
//SYSPRINT DD SYSOUT=* 00053000
//V2 EXEC PGM=QZPLB,PARM='A2' 00080000
//STEPLIB DD DISP=SHR,DSN=&PKG..LLB 00090000
//SYSPRINT DD SYSOUT=* 00100000
//V1 EXEC PGM=QZPLB,PARM='A1' 00140000
//STEPLIB DD DISP=SHR,DSN=&PKG..LLB 00150000
//SYSPRINT DD SYSOUT=* 00160000
}¢--- DSN.TX.CASE(QBXC5LOA) cre=2014-05-05 mod=2014-05-05-20.06.42 A540769 -----
//A540769L JOB (CP00,KE50),'DB2 REO', 00010000
// MSGCLASS=T,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2 00030003
//*MAIN CLASS=LOG0 00040003
//S1 EXEC PGM=DSNUTILB,PARM='DP4G,A540769L.LOAD' 00020001
//SYSMAP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSERR DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DP4G.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
EXEC SQL
DECLARE CUR1 CURSOR FOR
SELECT '001' XC502_PART_NUMBER
, LEFT(NAME, 30) XC502_DOC_UUID
, 'FOR' XC502_DOC_FORMAT
, ROW_NUMBER() OVER() + 4E6 XC502_DOC_CONTENT_SEQ
, CREATOR || NAME XC502_DOC_CONTENT
FROM SYSIBM.SYSTables where 1 = 0
FETCH FIRST 1000 ROWS ONLY
ENDEXEC
LOAD
SORTDEVT DISK
WORKDDN(TSYUTS,TSOUTS)
LOG YES
INTO TABLE QTXCRY.TQBXC5A1 PART 1
INCURSOR CUR1 RESUME YES
EXEC SQL
DECLARE CUR2 CURSOR FOR
SELECT '002' XC502_PART_NUMBER
, LEFT(NAME, 30) XC502_DOC_UUID
, 'FOR' XC502_DOC_FORMAT
, ROW_NUMBER() OVER() + 4E6 XC502_DOC_CONTENT_SEQ
, CREATOR || NAME XC502_DOC_CONTENT
FROM SYSIBM.SYSTables where 1 = 0
FETCH FIRST 1000 ROWS ONLY
ENDEXEC
LOAD
SORTDEVT DISK
WORKDDN(TSYUTS,TSOUTS)
LOG YES
INTO TABLE QTXCRY.TQBXC5A1 PART 2
RESUME NO REPLACE
INCURSOR CUR2
EXEC SQL
DECLARE CUR3 CURSOR FOR
SELECT '003' XC502_PART_NUMBER
, LEFT(NAME, 30) XC502_DOC_UUID
, 'FOR' XC502_DOC_FORMAT
, ROW_NUMBER() OVER() + 4E6 XC502_DOC_CONTENT_SEQ
, CREATOR || NAME XC502_DOC_CONTENT
FROM SYSIBM.SYSTables where 1 = 0
FETCH FIRST 1000 ROWS ONLY
ENDEXEC
LOAD
SORTDEVT DISK
WORKDDN(TSYUTS,TSOUTS)
LOG NO NOCOPYPEND
INTO TABLE QTXCRY.TQBXC5A1 PART 3
INCURSOR CUR3 RESUME YES
EXEC SQL
DECLARE CUR4 CURSOR FOR
SELECT '004' XC502_PART_NUMBER
, LEFT(NAME, 30) XC502_DOC_UUID
, 'FOR' XC502_DOC_FORMAT
, ROW_NUMBER() OVER() + 4E6 XC502_DOC_CONTENT_SEQ
, CREATOR || NAME XC502_DOC_CONTENT
FROM SYSIBM.SYSTables where 1 = 0
FETCH FIRST 1000 ROWS ONLY
ENDEXEC
LOAD
SORTDEVT DISK
WORKDDN(TSYUTS,TSOUTS)
LOG NO NOCOPYPEND
INTO TABLE QTXCRY.TQBXC5A1 PART 4
RESUME NO REPLACE
INCURSOR CUR4
}¢--- DSN.TX.CASE(QBXC5PLB) cre= mod= ------------------------------------------
*process default(connected);
QZPLB: proc($parm) options(main);
/*_____________________________________________________________________
declarationS */
%include pgmanfa; /* On Error */
dcl $parm char(80) varying;
/* printer file */
dcl sysprint file print;
/* sqlca struc */
exec sql include sqlca;
/* db cursor (dynamic sql) sql */
exec sql declare c1 cursor for s1;
/* counters decl */
dcl 1 cnt
, 5 cnt bin fixed(31) init(0)
, 5 sel bin fixed(31) init(0)
, 5 ins bin fixed(31) init(0)
, 5 write_ddout bin fixed(31) init(0)
, 5 errors bin fixed(31) init(0)
, 5 commit_counter bin fixed(31) init(0)
, 5 tst char(26) init('')
, 5 fun char(126) varying init('')
;
/* builtins decl */
dcl (length, pliRetv,trim, string) builtin;
/*_____________________________________________________________________
main */
/* inits */
put ('start of qzPlb') skip;
put (' parm ', length($parm), ':', $parm, '|') skip;
call sql_connect();
put ('connected') skip;
if substr($parm, 1, 1) = 'A' then
call doA(substr($parm, 2, 1));
else if substr($parm, 1, 1) = 'B' then
call doB;
else do;
put (' no test ') skip;
cnt.tst = '';
cnt.sel = 123;
cnt.tst = 'sel = ' || edit(sel, '9999') || ' und schluss';
put (' sel=123: ', cnt.tst) skip;
exec sql
select current timestamp into :cnt.tst
from sysibm.sysDummy1
;
put ('sql code: ', sqlCode) skip;
if sqlCode <> 0 THEN
call sqlMsg;
put ('selected current timestamp: ', cnt.tst) skip;
end;
RETURN;
/*_____________________________________________________________________
subroutines */
doA:proc($f);
dcl $f char(1);
dcl (ix, jx) bin fixed(31) init(0);
dcl (pa, fo)char(3);
dcl uu char(36);
dcl tx char(10000) varying;
do jx=1 to 5;
do ix=1 to 10000;
pa = edit(1 + mod(ix, 5), '999');
uu = 'uuid' || edit(ix, '9999') || '=uuid';
fo = 'for';
tx = copy('p=' || pa || ' uuid=' || uu || ' fo=' || fo
|| '... ', 40);
if $f = '1' then
call doV1(pa, uu, fo, tx);
else if $f = '2' then
call doV2(pa, uu, fo, tx);
else if $f = '3' then
call doV3(pa, uu, fo, tx);
end;
end;
call sql_commit;
put ('commit after ' || trim(edit(cnt.cnt, 'zzzzzz9'))
|| ' ' || $f || ': ' || cnt.fun) skip;
end doA;
doV1: proc(pa, uu, fo, tx);
dcl (pa, fo)char(3);
dcl uu char(36);
dcl tx char(10000) varying;
DCL seq BIN(31) INIT(-1);
/* put ('V1 ' || pa || ' u=' || uu || ' fo=' || fo) skip */
exec sql
select value(max(XC502_DOC_CONTENT_SEQ)+1, 1)
into :seq
from qtxCry.tQBXC5a1 where XC502_PART_NUMBER = :pa
and XC502_doc_uuid = :uu and XC502_doc_format = :fo
;
if sqlCode <> 0 then
call sqlErr(sourceLine(), 'select value ...');
/* put ('seq ' || trim(edit(seq, 'zzzzz9'))
|| ' ' || substr(tx, 1, 60)) skip */
exec sql
insert into qtxCry.tQBXC5a1
values(:pa, :uu, :fo, :seq, :tx)
;
if sqlCode <> 0 then
call sqlErr(sourceLine(), 'insert values ...');
cnt.cnt = cnt.cnt + 1;
cnt.fun = 'select & insert';
end doV1;
doV2: proc(pa, uu, fo, tx);
dcl (pa, fo)char(3);
dcl uu char(36);
dcl tx char(10000) varying;
/* put ('V2 ' || pa || ' u=' || uu || ' fo=' || fo) skip */
exec sql
insert into qtxCry.tQBXC5a1
select :pa, :uu, :fo
, value(max(XC502_DOC_CONTENT_SEQ)+1, 1)
, :tx
from qtxCry.tQBXC5a1 where XC502_PART_NUMBER = :pa
and XC502_doc_uuid = :uu and XC502_doc_format = :fo
;
if sqlCode <> 0 then
call sqlErr(sourceLine(), 'insert ... select');
cnt.cnt = cnt.cnt + 1;
cnt.fun = 'insert from select';
end doV2;
doV3: proc(pa, uu, fo, tx);
dcl (pa, fo)char(3);
dcl uu char(36);
dcl tx char(10000) varying;
DCL seq BIN(31) INIT(-1);
/* put ('V3 ' || pa || ' u=' || uu || ' fo=' || fo) skip */
exec sql
select XC502_DOC_CONTENT_SEQ into :seq
from final table
(
insert into qtxCry.tQBXC5a1
select :pa, :uu, :fo
, value(max(XC502_DOC_CONTENT_SEQ)+1, 1)
, :tx
from qtxCry.tQBXC5a1 where XC502_PART_NUMBER = :pa
and XC502_doc_uuid = :uu and XC502_doc_format = :fo
) ;
/* put ('got seq', seq) skip */
if sqlCode <> 0 then
call sqlErr(sourceLine(), 'select ... insert ... select');
cnt.cnt = cnt.cnt + 1;
cnt.fun = 'select from insert from select';
end doV3;
doB:proc();
end doB;
/*
sql connect__________________________________________________________*/
%include yxrrsaf;
sql_connect:proc();
dcl ssid char(04) init('DP4G');
dcl plan char(08) init('QZTEST');
if yxrrsaf('CONNECT',ssid,plan) ^= 0 then
put('QZPLB'
,'Error in YXRRSAF Call'
,'SSID - '||ssid
,'PLAN - '||plan);
end sql_connect;
/*
commit_______________________________________________________________*/
sql_commit: proc();
if yxrrsaf('COMMIT') ^= 0 then
put('QZPLB'
,'Error in YXRRSAF Commit Call');
end sql_commit;
sql_rollback: proc();
if yxrrsaf('ROLLBACK') ^= 0 then
put('QZPLB'
,'Error in YXRRSAF ROLLBACK Call');
end sql_rollback;
DCL DSNTIAR ENTRY EXTERNAL OPTIONS(ASM INTER RETCODE);
sqlMsg: proc ();
DCL MSGWIDTH FIXED BIN(31) INIT(72);
DCL MSGBLEN FIXED BIN(15) INIT(20); /* MAX # SQL MESSAGES */
DCL i FIXED BIN(31) INIT(0);
DCL 01 MESSAGE /* MESSAGE RETURN BUFFER */
, 02 MESSAGEL FIXED BIN(15) INIT(1440) /* BUFFER LENGTH */
, 02 MESSAGET(MSGBLEN) CHAR(msgWidth) INIT((*)' ') /* TEXT */
;
/* NOW PRINT OUT SQL STATEMENT RESULTS VIA DSNTIAR */
CALL DSNTIAR(SQLCA,MESSAGE,MSGWIDTH);
IF PLIRETV ^= 0 THEN DO; /* IF THE RETURN CODE ISN'T ZERO@08*/
/* ISSUE AN ERROR MESSAGE @08*/
PUT EDIT (' RETURN CODE ', PLIRETV, /* @08*/
' FROM MESSAGE ROUTINE DSNTIAR.') /* @08*/
(COL(1), A(13), F(8), A(30)); /* ISSUE THE MESSAGE @08*/
END; /* END ISSUE AN ERROR MESSAGE @08*/
DO I = 1 TO MSGBLEN /* @08*/
WHILE (MESSAGET(I) ^= ''); /* @08*/
PUT EDIT ( MESSAGET(I) ) (COL(1), A(msgWIdth)); /* @08*/
END; /* @08*/
end SqlMsg;
sqlErr: proc (lNo, txt);
DCL lNo FIXED BIN(31);
dcl txt char(500) varying;
put ('error at ' || trim(edit(lNo, 'ZZZZZZZZZ9'))
|| ': ' || txt) skip;
call sqlMsg;
call sql_rollback;
put ('error signal error') skip;
signal error;
end sqlErr;
end QZPLB;
}¢--- DSN.TX.CASE(QBXC5SEL) cre=2014-05-05 mod=2014-05-05-16.52.53 A540769 -----
select XC502_PART_NUMBER, count(*)
from QTXCRY.tqbxc5a1
group by XC502_PART_NUMBER
}¢--- DSN.TX.CASE(QT001) cre=2016-11-18 mod=2016-11-18-09.56.32 A540769 --------
* check data exception table braucht auch identity generated..
* error ew49
*
creDb trg 1
+ ok creDb DSN.TX.GENF(QT001t1)
creDb src 3
+ ok creDb DSN.TX.GENF(QT001s3)
* create exception table with qr001exc
}¢--- DSN.TX.CASE(QT001CHK) cre=2013-11-25 mod=2016-11-18-09.56.20 A540769 -----
//A540769X JOB (CP00,KE50),'DB2 ce',
// TIME=1440,REGION=0M,SCHENV=DB2ALL,CLASS=M1,
// MSGCLASS=T,NOTIFY=&SYSUID
//*
//* ux utility generator ce
//* who RZ4 DP4G A540769 2
//* 18.11.16 09:43:37 A540769X
//*
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DP4G,'A540769X.UXUTIL'),
// REGION=0M
//SYSPRINT DD SYSOUT=*
//*YSPRINT DD DSN=DSN.JOBRUN.A540769X.STEP1.#DT#,
//* DISP=(NEW,CATLG,CATLG),MGMTCLAS=BAT#NW,DSNTYPE=LARGE,
//* DCB=(RECFM=FB,LRECL=132,DSORG=PS),SPACE=(CYL,(1,1000))
//SYSUDUMP DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DP4G.DBAA.LISTDEF(TEMPL)
//UTPRINT DD SYSOUT=*
//RNPRIN01 DD SYSOUT=*
//STPRIN01 DD SYSOUT=*
//INDUMMY DD DUMMY
//SYSIN DD *
-- OPTIONS PREVIEW
---- checkData ---------------------------------------------------------
CHECK DATA
TABLESPACE QZ91A1S.QT001A
SHRLEVEL REFERENCE
SCOPE ALL
EXCEPTIONS 0
FOR EXCEPTION
IN QZ91CRS.TQZ91QT001
USE QZ91CRS.TQZ91QT001EXC
DELETE YES LOG YES
WORKDDN(TSYUTS, TSOUTS) ERRDDN TERRD
SORTDEVT DISK
}¢--- DSN.TX.CASE(QT001DDL) cre=2013-11-21 mod=2016-11-18-09.52.54 A540769 -----
------------$-¢right(userid() sysvar(sysnode) date(s) time(), 60, '-')$!
-- testCase $dsn
-- env $env phase $phase
-- dbSys $dbSys db $db creator $creator
-----------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
SET CURRENT SCHEMA = $creator;
drop tablespace $db.QT001A;
drop tablespace $db.QT001E;
commit;
$@¢
if $phase >= 1 then $@=¢
CREATE TABLESPACE QT001A
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
TRACKMOD YES
segsize 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255;
CREATE TABLESPACE QT001E -- for exception table, create by qt001exc
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
TRACKMOD YES
segsize 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255;
CREATE TABLE $creator.tQZ91QT001
(qt001Int int not null
$!
if $phase = 2 then $@=¢
GENERATED BY DEFAULT AS IDENTITY ( START WITH 1 )
$! else if $phase >= 3 then $@=¢
GENERATED always AS IDENTITY ( START WITH 1 )
$!
if $phase >= 1 then $@=¢
,qt001Par int
,qt001chb char(10) NOT NULL
, primary key(qt001Int)
)
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE
in $db.QT001A
;
CREATE Unique INDEX $creator.Iqz91QT001A0
ON $creator.Tqz91QT001
(qt001Int asc
)
USING STOGROUP GSMS
ERASE NO
GBPCACHE CHANGED
CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
;
commit;
$@¢ if $phase < 3 then $@=¢
insert into $creator.tqz91QT001 (qt001int,qt001chb) values (1,'eins');
insert into $creator.tqz91QT001 values (2, 1, 'zwei');
insert into $creator.tqz91QT001 values (3, 7, 'drei');
insert into $creator.tqz91QT001 values (4, 3, 'vier');
$! else $@=¢
insert into $creator.tqz91QT001 (qt001chb) values ('eins');
insert into $creator.tqz91QT001 (qt001Par, qt001chb) values (1, 'zwei');
insert into $creator.tqz91QT001 (qt001Par, qt001chb) values (7, 'drei');
insert into $creator.tqz91QT001 (qt001Par, qt001chb) values (3, 'vier');
$!
$!
commit;
alter table $creator.tqz91QT001
add
constraint qz91QT001par
foreign key
(qt001par
)
references $creator.tqz91QT001 on delete cascade
enforced
;
commit;
$!
$!
}¢--- DSN.TX.CASE(QT001EXC) cre=2013-11-25 mod=2016-11-18-09.53.58 A540769 -----
set current sqlid = 'S100447';
drop table QZ91CRS.tqz91QT001Exc;
create table QZ91CRS.tqz91QT001Exc
like QZ91CRS.tqz91QT001
including identity
in QZ91A1S.QT001E
;
commit
}¢--- DSN.TX.CASE(QT002) cre= mod= ---------------------------------------------
* compression on insert kommt nicht immmer
credb src 1
+ ok creDb DSN.TX.GENF(QT002s1) ::f
}¢--- DSN.TX.CASE(QT002DDL) cre=2013-11-21 mod=2014-01-29-08.09.58 A540769 -----
------------$-¢right(userid() sysvar(sysnode) date(s) time(), 60, '-')$!
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
-----------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
SET CURRENT SCHEMA = $creator;
drop tablespace $db.qt002;
commit;
$@¢
if $phase >= 1 then $@=¢
CREATE TABLESPACE QT002
IN $db
BUFFERPOOL BP32K
DSSIZE 1G
CLOSE NO
LOCKMAX SYSTEM
LOGGED
LOCKSIZE ANY
MAXROWS 255
COMPRESS YES
CCSID EBCDIC
NUMPARTS 20
define no
;
CREATE TABLE $creator.TQT002
(qt002Part int not null
,qt002Int int not null
,qt002Data VARCHAR(32000) FOR SBCS DATA NOT NULL
)
IN $db.QT002
APPEND NO
WITH RESTRICT ON DROP
NOT VOLATILE CARDINALITY
DATA CAPTURE NONE
AUDIT NONE
CCSID EBCDIC
PARTITION BY RANGE
(QT002Part)
( partition 1 ending (1)
$@do px=2 to 20 $@=¢
, PARTITION $px ending ($px)
$!
)
;
CREATE INDEX $creator.Iqt002A0
ON $creator.TQT002
(qt002Part asc
,qt002Int asc
)
partitioned
USING STOGROUP GSMS
ERASE NO
GBPCACHE CHANGED
CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE no
;
commit;
$!
$!
}¢--- DSN.TX.CASE(QT002INS) cre=2013-11-25 mod=2013-11-26-13.33.07 A540769 -----
//A540769Y JOB (CP00,KE50),'DB2 REO', 00010000
// MSGCLASS=T,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2 00030000
//*MAIN CLASS=LOG 00040000
//*
//S1 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99, 00020001
// PARM='WS3'
//SYSPROC DD DSN=A540769.WK.REXX,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//OUT DD SYSOUT=*
//SYSTSIN DD DUMMY
//WSH DD *
$#@
call sqlConnect dp4g
if sql2st("select qt002part part, qt002int int from A540769x.tqt002" ,
"order by qt002int desc" ,
"fetch first row only", ll) > 0 then $@¢
$= pa =- m.ll.1.part+1
$= in =- m.ll.1.int
$! else $@¢
$= pa =- 1
$= in =- 0
$!
say 'last Int' $in 'part' $pa
$= cnt = 1000
ins = 0
$do ix=$in by $cnt $@¢
call sqlUpdate ,"insert into A540769x.tqt002" ,
"with n(n) as ( select" $-¢ix+1$! "from sysibm.sysDummy1" ,
" union all select n+1 from n where n<" $-¢ix+$cnt$! ")",
"select" $pa ", n, repeat('ab' || space(30),1000) from n"
ins = ins + m.sql..updateCount
say ins 'rows inserted at' time()
call sqlCommit
$** call sleep 2
if ix // 100000 = 0 then$@¢
$=pa =- 1 + $pa
say 'next partition' $pa
$!
$!
call sqlDisConnect
$#out 20131125 14:55:54
}¢--- DSN.TX.CASE(QT002REO) cre= mod= ------------------------------------------
//A540769P JOB (CP00,KE50),'DB2 reo',
// MSGCLASS=T,TIME=1440,SCHENV=DP4G,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//* ux utility generator reo
//* who RZ4 DP4G A540769 2
//* 25.11.13 15:32:05 A540769P 06
//*
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DP4G,'A540769P.UXUTIL'),
// REGION=0M
//SYSPRINT DD SYSOUT=*
//*YSPRINT DD DSN=DSN.JOBRUN.A540769P.STEP1.#DT#,
//* DISP=(NEW,CATLG,CATLG),MGMTCLAS=BAT#NW,DSNTYPE=LARGE,
//* DCB=(RECFM=FB,LRECL=132,DSORG=PS),SPACE=(CYL,(1,1000))
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DP4G.DBAA.LISTDEF(TEMPL)
//INDUMMY DD DUMMY
//SYSIN DD *
LISTDEF TPLIST
INCLUDE TABLESPACE DA54076X.QT002 PARTLEVEL
---- reorg -------------------------------------------------------------
REORG TABLESPACE LIST TPLIST
LOG NO
SORTDATA
COPYDDN(TCOPYD)
SHRLEVEL CHANGE
-- Achtung mapping table zufällig gewählt|
MAPPINGTABLE S100447.MAPTAB06
DRAIN_WAIT 40
RETRY 20
RETRY_DELAY 180
MAXRO 40
DRAIN WRITERS
LONGLOG CONTINUE
DELAY 1200
TIMEOUT TERM
UNLDDN TSRECD
UNLOAD CONTINUE
PUNCHDDN TPUNCH
DISCARDDN TDISC
SORTKEYS
SORTDEVT DISK
STATISTICS
INDEX ALL KEYCARD
UPDATE ALL
}¢--- DSN.TX.CASE(QT003) cre=2016-06-06 mod=2016-11-07-10.43.21 A540769 --------
* versioning table must be loaded with resume yes
* phase 1 a table
* 2 a+h table
* 4 col laenger
* 5 add column between
* vers 0 no versioning
* 1 with versioning
=vers= 1
credb trg 4
+ ok creDb DSN.TX.GENF(QT003t4) ::f
credb src 2
+ ok creDb DSN.TX.GENF(QT003s2) ::f
manual cre with dbx
+ ok cre with dbx
credb src 3
+ ok creDb DSN.TX.GENF(QT003s3)
credb trg 2
+ ok creDb DSN.TX.GENF(QT003t2)
}¢--- DSN.TX.CASE(QT003DDL) cre=2013-12-23 mod=2016-08-10-09.36.53 A540769 -----
------------$-¢right(userid() sysvar(sysnode) date(s) time(), 60, '-')$!
-- testCase $dsn
-- env $env phase $phase
-- subsys $dbSys db $db creator $creator
-----------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
SET CURRENT SCHEMA = $creator;
-- alter TABLE $creator.Tqz91qt003A drop RESTRICT ON DROP ;
-- alter TABLE $creator.Tqz91qt003H drop RESTRICT ON DROP ;
-- alter TABLE $creator.Tqz91qt003A drop versioning;
drop tablespace $db.aqt003A;
drop tablespace $db.aqt003H;
commit;
$@ say versioning $vers
$@¢
if $phase >= 1 then $@=¢
$= pgmLen =- 4 * (2 + ($phase = 4))
CREATE TABLESPACE aqt003A
IN $db
BUFFERPOOL BP2
CLOSE NO
LOCKMAX SYSTEM
DEFINE YES
LOGGED
LOCKSIZE ANY
MAXROWS 255
COMPRESS YES
CCSID EBCDIC
SEGSIZE 64
;
$!
if $phase >= 2 then $@=¢
CREATE TABLESPACE aqt003H
IN $db
BUFFERPOOL BP2
CLOSE NO
LOCKMAX SYSTEM
DEFINE YES
LOGGED
LOCKSIZE ANY
MAXROWS 255
COMPRESS YES
CCSID EBCDIC
SEGSIZE 64
;
$!
if $phase >= 1 then $@=¢
CREATE TABLE $creator.Tqz91qt003A
( appl CHAR(4) NOT NULL default '%'
, pgm CHAR($pgmLen) NOT NULL default '%'
, PRIO smallint NOT NULL
, rdl char(10) NOT NULL default 'default'
, cq char(10) NOT NULL default 'default'
$@ if $phase >= 5 then
, c2 char(10) NOT NULL default 'c zwei'
, ov char(10) NOT NULL default 'default'
, installBegin date NOT NULL WITH DEFAULT
, installEnd date NOT NULL WITH DEFAULT '31.12.9999'
, rowBegin not null generated always as row begin
, rowEnd not null generated always as row end
, rowtrans not null generated always as transaction start id
, period business_time (installBegin, installEnd)
, period system_time (rowBegin, rowEnd)
, primary key (appl, pgm, business_time without overlaps)
--, primary key (appl, pgm, prio)
)
in $db.aqt003A
with RESTRICT ON DROP
;
CREATE UNIQUE INDEX $creator.Iqz91qt003A
ON $creator.tqz91qt003A
(appl, pgm, business_time without overlaps)
include (prio, rdl, cq, ov)
USING STOGROUP GSMS
ERASE NO
GBPCACHE CHANGED
not CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES
;
CREATE UNIQUE INDEX $creator.Iqz91qt003B
ON $creator.tqz91qt003A
(appl, pgm, prio)
USING STOGROUP GSMS
ERASE NO
GBPCACHE CHANGED
not CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES
;
$!
if $phase >= 2 then $@=¢
CREATE TABLE $creator.tqz91qt003H
like $creator.tqz91qt003A
in $db.aqt003H
AUDIT NONE
DATA CAPTURE NONE
NOT VOLATILE
with RESTRICT ON DROP
;
$@¢ if $vers then $@=¢
alter table $creator.tqz91qt003A add versioning
use history table $creator.tqz91qt003H
;
$! $!
commit;
insert into $creator.tqz91qt003H (appL, prio,rowBegin,rowEnd,rowTrans)
values ('his0', 0, current timestamp - 113 years
, current timestamp - 112 year
, current timestamp - 111 year); COMMIT;
insert into $creator.tqz91qt003A (appL, prio) values ('app1',1);COMMIT;
insert into $creator.tqz91qt003A (appL, prio) values ('app2',2);COMMIT;
update $creator.tqz91qt003A set pgm = 'pgm2'; COMMIT;
delete from $creator.tqz91qt003A where appl = 'app1'; COMMIT;
select * from $creator.tqz91qt003H
;
$!
$!
}¢--- DSN.TX.CASE(QT003RI) cre=2016-05-04 mod=2016-05-04-12.01.14 A540769 ------
set current sqlid = 'S100447';
-- Achtung geht nicht without overlaps in primary key|
alter table qz92crt.TQZ91QT003A
add foreign key (appl, pgm, prio)
references qz92crt.TQZ91QT003A (appl, pgm, prio)
on delete no action
;
}¢--- DSN.TX.CASE(QT003SEL) cre=2016-02-05 mod=2016-02-05-12.48.44 A540769 -----
select * from qz92crt.tqz91qt003a;
select * from qz92crt.tqz91qt003h;
}¢--- DSN.TX.CASE(REC01) cre=2015-09-10 mod=2015-09-10-08.34.45 A540769 --------
credb trg 2
+ ok creDb DSN.TX.GENF(REC01t2) ::f
}¢--- DSN.TX.CASE(REC01ADD) cre=2015-09-10 mod=2015-09-10-08.16.51 A540769 -----
ALTER TABLE QZ92CRT.TQXREC01
ADD PARTITION ENDING AT (4)
}¢--- DSN.TX.CASE(REC01DDL) cre=2010-09-06 mod=2015-09-10-08.34.05 A540769 -----
------------$-¢right(userid() sysvar(sysnode) date(s) time(), 60, '-')$!
-- testCase $dsn
-- env $env phase $phase
-- subsys $dbSys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
drop tablespace $db.Rec01;
drop tablespace $db.aRec01;
commit;
$@ if $phase > 0 then $@=/create/
CREATE TABLESPACE Rec01
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
GBPCACHE CHANGED
TRACKMOD YES
segsize 64
$@ if $phase = 2 then $@=¢
numParts 3
$!
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID ebcdic
DEFINE NO
MAXROWS 255
; ---------------------------------------------------------------------
--- set current isolation level = 'UR';
CREATE TABLE $creator.tqxRec01
( pa smallint not null
, txt char(20) not null
, tst timestamp not null with default
)
IN $db.Rec01
$@ if $phase = 2 then $@=¢
partition by (pa)
( part 1 values (1)
, part 2 values (2)
, part 3 values (3)
)
$!
AUDIT NONE
DATA CAPTURE NONE
CCSID ebcdic
NOT VOLATILE ;
CREATE unique INDEX $creator.IQXrec01
ON $creator.tQXrec01
(pa, txt, tst)
$@ if $phase = 2 then $@=¢
partitioned
$!
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE NO ;
commit;
$/create/
$*(
if $phase = 10 then $@=¢
$@do i=1 to 4 $@=¢
$@do j=1 to 3 $@=¢
insert into $creator.trec01
select 'c1=Abcdefg', 'c2=Ijklmno', current timestamp,
strip(tbCreator) || '.' || strip(tbName) || '.' || strip(name),
colType || '(' || strip(char(length)) || ', '
|| strip(char(scale)) || ') nulls ' || nulls
|| ' /tran $i loop $j'
from sysibm.sysColumns
where tbCreator like 'SYS%'
order by tbCreator, tbName, name
fetch first 10 rows only
;
$!
commit;
$!
$*)
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(REC01IDS) cre=2010-09-06 mod=2010-09-06-14.13.27 A540769 -----
select substr(strip(s.dbName) || '.' || strip(s.name), 1, 17),
s.dbid, psid, s.obid,
t.obid, substr(strip(t.creator) || '.' || strip(t.name), 1, 27)
from sysibm.sysTablespace s
left join sysibm.sysTables t
on t.dbName = s.dbName and t.tsName = s.name
where s.dbName = 'DA540769' and s.name like 'ARE%'
order by 1
}¢--- DSN.TX.CASE(REC01INS) cre=2015-09-09 mod=2015-09-10-08.17.24 A540769 -----
insert into QZ92CRT.TQXREC01 (pa, txt)
select row_number () over ()
, 'nach add Part'
from sysibm.sysTables
fetch first 4 rows only
}¢--- DSN.TX.CASE(REC01LOA) cre=2015-09-10 mod=2015-09-10-08.30.43 A540769 -----
//A540769L JOB (CP00,KE50), 00010001
// MSGCLASS=T,TIME=1440,LINES=(999999,WARNING),
// NOTIFY=A540769
//*MAIN CLASS=LOG
//S1 EXEC PGM=DSNUTILB,PARM='DP4G,A540769L.LOAD' 00020001
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DP4G.DBAA.LISTDEF(TEMPL),DISP=SHR
//DDI1 DD *
1,LOAD DELIM LOGREP
2,LOAD DELIM LOGREP
3,LOAD DELIM LOGREP
//SYSIN DD *
LOAD INDDN DDI1
-- LOG NO NOCOPYPEND
LOG YES
-- RESUME YES
RESUME NO REPLACE
FORMAT DELIMITED
WORKDDN(TSYUTS, TSOUTS)
INTO TABLE QZ92CRT.TQXREC01
(PA, TXT)
}¢--- DSN.TX.CASE(REC01REC) cre=2015-09-09 mod=2015-09-10-08.28.41 A540769 -----
//A540769R JOB (CP00,KE50),'DB2 rec bu',
// MSGCLASS=T,TIME=1440,SCHENV=DP4G,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//* ux utility generator rec bu
//* who RZ4 DP4G A540769 2
//* 09.09.15 11:41:35 A540769P 06
//*
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DP4G,'A540769R.UXUTIL'),
// REGION=0M
//SYSPRINT DD SYSOUT=*
//*YSPRINT DD DSN=DSN.JOBRUN.A540769P.STEP1.#DT#,
//* DISP=(NEW,CATLG,CATLG),MGMTCLAS=BAT#NW,DSNTYPE=LARGE,
//* DCB=(RECFM=FB,LRECL=132,DSORG=PS),SPACE=(CYL,(1,1000))
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DP4G.DBAA.LISTDEF(TEMPL)
//INDUMMY DD DUMMY
//SYSIN DD *
OPTIONS(EVENT ITEMERROR SKIP)
LISTDEF TPLIST
INCLUDE TABLESPACE QZ92A1T.REC01 PARTLEVEL
LISTDEF IPLIST INCLUDE INDEXSPACES LIST TPLIST
---- recover -----------------------------------------------------------
-- Tipp: mit TSO LRSN logPoints umwandeln
RECOVER LIST TPLIST
PARALLEL
-- TOLOGPOINT X'00' -- max start_rba
-- TOLOGPOINT X'FFFFFFFFFF' -- min start_rba
-- LOGONLY BACKOUT YES
-- RESTOREBEFORE FFFFFFFFFF
-- TOLASTCOPY
-- TOLASTFULLCOPY
--RECOVER TABLESPACE ?.? DSNUM ?
-- TOCOPY
---- rebuild index -----------------------------------------------------
REBUILD INDEX LIST IPLIST
SORTDEVT SYSDA
STATISTICS UPDATE ALL
}¢--- DSN.TX.CASE(REC01ROL) cre=2015-09-09 mod=2015-09-09-12.18.59 A540769 -----
//A540769L JOB (CP00,KE50),'DB2 reo',
// MSGCLASS=T,TIME=1440,SCHENV=DP4G,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//* reorg Log=NO, copy=NO
//*
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DP4G,'A540769L.UXUTIL'),
// REGION=0M
//SYSPRINT DD SYSOUT=*
//*YSPRINT DD DSN=DSN.JOBRUN.A540769M.STEP1.#DT#,
//* DISP=(NEW,CATLG,CATLG),MGMTCLAS=BAT#NW,DSNTYPE=LARGE,
//* DCB=(RECFM=FB,LRECL=132,DSORG=PS),SPACE=(CYL,(1,1000))
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DP4G.DBAA.LISTDEF(TEMPL)
//INDUMMY DD DUMMY
//SYSIN DD *
LISTDEF TPLIST
INCLUDE TABLESPACE QZ92A1T.REC01 PARTLEVEL 0
---- reorg -------------------------------------------------------------
REORG TABLESPACE LIST TPLIST
LOG YES
SORTDATA
-- COPYDDN(TCOPYD)
SHRLEVEL NONE
UNLDDN TSRECO
UNLOAD CONTINUE
PUNCHDDN TPUNCH
DISCARDDN TDISC
SORTKEYS
SORTDEVT DISK
STATISTICS
INDEX ALL KEYCARD
UPDATE ALL
}¢--- DSN.TX.CASE(REC01RON) cre=2015-09-09 mod=2015-09-09-12.15.24 A540769 -----
//A540769N JOB (CP00,KE50),'DB2 reo',
// MSGCLASS=T,TIME=1440,SCHENV=DP4G,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//* reorg Log=NO, copy=NO
//*
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DP4G,'A540769N.UXUTIL'),
// REGION=0M
//SYSPRINT DD SYSOUT=*
//*YSPRINT DD DSN=DSN.JOBRUN.A540769M.STEP1.#DT#,
//* DISP=(NEW,CATLG,CATLG),MGMTCLAS=BAT#NW,DSNTYPE=LARGE,
//* DCB=(RECFM=FB,LRECL=132,DSORG=PS),SPACE=(CYL,(1,1000))
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DP4G.DBAA.LISTDEF(TEMPL)
//INDUMMY DD DUMMY
//SYSIN DD *
LISTDEF TPLIST
INCLUDE TABLESPACE QZ92A1T.REC01 PARTLEVEL 0
---- reorg -------------------------------------------------------------
REORG TABLESPACE LIST TPLIST
LOG NO
SORTDATA
-- COPYDDN(TCOPYD)
SHRLEVEL NONE
UNLDDN TSRECO
UNLOAD CONTINUE
PUNCHDDN TPUNCH
DISCARDDN TDISC
SORTKEYS
SORTDEVT DISK
STATISTICS
INDEX ALL KEYCARD
UPDATE ALL
}¢--- DSN.TX.CASE(SZ001) cre=2016-10-31 mod=2016-10-31-10.16.57 A586114 --------
*
* DBX - Test Case DBX Development
*
* phase 1: Konfiguration in Ziel (phase 1 = alt)
* phase 2: Konfiguration in Prototyp (phase 2 = neu)
*
*
creDb trg 1
+ ok creDb DSN.TX.GENF(SZ001t1)
creDb src 2
+ ok creDb DSN.TX.GENF(SZ001s2)
}¢--- DSN.TX.CASE(SZ001DDL) cre=2016-10-31 mod=2016-10-31-10.16.27 A586114 -----
$=db=DA586114
$=creator=A586114
------------------------------------------------------------------------
SET CURRENT SQLID='S100447';
------------------------------------------------------------------------
DROP TABLESPACE $db.ASZ001A;
------------------------------------------------------------------------
COMMIT;
------------------------------------------------------------------------
$@ if $phase >= 1 then $@=/pha1/ $**************************************
CREATE TABLESPACE ASZ001A
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0
PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
SEGSIZE 64
MAXPARTITIONS 10
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255
;
------------------------------------------------------------------------
CREATE TABLE $creator.TQZ91SZ001A1
(SZ001CH20 CHAR(20) FOR SBCS DATA not null with default
,SZ001CH5 CHAR(5) FOR SBCS DATA not null with default
,SZ001CH2 CHAR(2) FOR SBCS DATA not null with default
,SZ001TST TIMESTAMP not null with default
$@ if $phase = 1 then $@=¢ $********************************************
$! $@ else $@=¢ $*******************************************************
,SZ001CH3 CHAR(3) FOR SBCS DATA not null with default
$! $********************************************************************
)
IN $db.ASZ001A
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE
;
------------------------------------------------------------------------
COMMIT;
------------------------------------------------------------------------
CREATE INDEX $creator.IQZ91SZ001A0
ON $creator.TQZ91SZ001A1
(SZ001CH20 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0
PCTFREE 10
GBPCACHE CHANGED
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 2 G
CLUSTER
;
------------------------------------------------------------------------
COMMIT;
------------------------------------------------------------------------
$@ if $phase = 1 then $@=¢ $********************************************
INSERT INTO $creator.Tqz91SZ001A1
(SZ001CH20, SZ001CH5, SZ001CH2, SZ001TST ) VALUES
('erstens', 'e' , '1' , current timestamp );
INSERT INTO $creator.Tqz91SZ001A1
(SZ001CH20, SZ001CH5, SZ001CH2, SZ001TST ) VALUES
('zweitens', 'zw' , '2' , current timestamp - 2 minute);
INSERT INTO $creator.Tqz91SZ001A1
(SZ001CH20, SZ001CH5, SZ001CH2, SZ001TST ) VALUES
('drittens', 'dre' , '3' , current timestamp - 3 hours);
INSERT INTO $creator.Tqz91SZ001A1
(SZ001CH20, SZ001CH5, SZ001CH2, SZ001TST ) VALUES
('viertens', 'vier', '4', current timestamp - 4 days);
INSERT INTO $creator.Tqz91SZ001A1
(SZ001CH20, SZ001CH5, SZ001CH2, SZ001TST ) VALUES
('fuenftens', 'fuenf', '5' , current timestamp - 5 months );
$! $@ else $@=¢ $*******************************************************
INSERT INTO $creator.Tqz91SZ001A1
(SZ001CH20, SZ001CH5, SZ001CH2, SZ001TST, SZ001CH3 ) VALUES
('erstens', 'e' , '1' , current timestamp ,
'C11');
INSERT INTO $creator.Tqz91SZ001A1
(SZ001CH20, SZ001CH5, SZ001CH2, SZ001TST, SZ001CH3 ) VALUES
('zweitens', 'zw' , '2' , current timestamp - 2 minute,
'C22');
INSERT INTO $creator.Tqz91SZ001A1
(SZ001CH20, SZ001CH5, SZ001CH2, SZ001TST, SZ001CH3 ) VALUES
('drittens', 'dre' , '3' , current timestamp - 3 hours,
'C33');
INSERT INTO $creator.Tqz91SZ001A1
(SZ001CH20, SZ001CH5, SZ001CH2, SZ001TST, SZ001CH3 ) VALUES
('viertens', 'vier', '4', current timestamp - 4 days,
'C44');
INSERT INTO $creator.Tqz91SZ001A1
(SZ001CH20, SZ001CH5, SZ001CH2, SZ001TST, SZ001CH3 ) VALUES
('fuenftens', 'fuenf', '5' , current timestamp - 5 months,
'C55');
$! $********************************************************************
$/pha1/ $***************************************************************
}¢--- DSN.TX.CASE(SZ002) cre=2016-11-10 mod=2016-11-17-10.32.05 A586114 --------
*
* DBX - Test Case DBX Development
*
* phase 1: Konfiguration in Ziel (phase 1 = alt)
* phase 2: Konfiguration in Prototyp (phase 2 = neu)
*
* Es werden 2 tablespaces mit je einer Tabelle erstellt.
* Bei beiden Tabellen wird je eine Spalte hinzugefügt.
*
* TS: ASZ002A ist standardkonform bis auf PCTFREE
* DX0G: PCTFREE 7
* DE0G: PCTFREE 6
* Wir wollen beobachten, dass DBX hier den
* Standard (PCTFREE 5) setzt, also wie in DBX V.3.2
*
* TS: ASZ002B ist überhaupt nicht standardkonform
* Mit diesem TS wollen wir das Exception Handling testen.
* DE0G: Alles standardkonform
* DX0G: Alle mit Special Handling behandelbaren Attribute
* sind nicht standard.
*
* creDb trg 1
*
*
* Wir nutzen eine eigenes INI file... DSN.TX.CASE(INI2)
ini =- dsnSetMbr($ini, ini2)
creDb src 2
+ ok creDb DSN.TX.GENF(SZ002s2)
}¢--- DSN.TX.CASE(SZ002DDL) cre=2016-11-10 mod=2016-11-18-12.06.32 A586114 -----
------------------------------------------------------------------------
SET CURRENT SQLID='S100447';
------------------------------------------------------------------------
DROP TABLESPACE $db.ASZ02A;
DROP TABLESPACE $db.ASZ02B;
------------------------------------------------------------------------
COMMIT;
------------------------------------------------------------------------
$@ if $phase >= 1 then $@=/pha1/ $**************************************
CREATE TABLESPACE ASZ02A
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0
PCTFREE $-¢5+$phase$! -- SRC: 7 TRG: 6
GBPCACHE CHANGED
TRACKMOD YES
SEGSIZE 64
MAXPARTITIONS 10
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255
;
CREATE TABLESPACE ASZ02B
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
$@ if $phase = 1 then $@=¢
FREEPAGE 0 -- Standard
$! $@ else $@=¢
FREEPAGE 4
$!
$@ if $phase = 1 then $@=¢
PCTFREE 5 -- Standard
$! $@ else $@=¢
PCTFREE 10
$!
GBPCACHE CHANGED
$@ if $phase = 1 then $@=¢
TRACKMOD YES -- Standard
$! $@ else $@=¢
TRACKMOD NO
$!
SEGSIZE 64
$@ if $phase = 1 then $@=¢
MAXPARTITIONS 10 -- Standard
$! $@ else $@=¢
MAXPARTITIONS 20
$!
$@ if $phase = 1 then $@=¢
BUFFERPOOL BP2 -- Standard
$! $@ else $@=¢
BUFFERPOOL BP0
$!
$@ if $phase = 1 then $@=¢
LOCKSIZE ANY -- Standard
$! $@ else $@=¢
LOCKSIZE ROW
$!
$@ if $phase = 1 then $@=¢
LOCKMAX SYSTEM -- Standard
$! $@ else $@=¢
LOCKMAX 1000
$!
$@ if $phase = 1 then $@=¢
CLOSE YES -- Standard
$! $@ else $@=¢
CLOSE NO
$!
$@ if $phase = 1 then $@=¢
COMPRESS YES -- Standard
$! $@ else $@=¢
COMPRESS NO
$!
CCSID EBCDIC
DEFINE YES
$@ if $phase = 1 then $@=¢
MAXROWS 255 -- Standard
$! $@ else $@=¢
MAXROWS 155
$!
$@ if $phase = 1 then $@=¢
-- Standard
$! $@ else $@=¢
MEMBER CLUSTER
$!
;
------------------------------------------------------------------------
CREATE TABLE $creator.TDASZ02A
(SZ002CH20 CHAR(20) FOR SBCS DATA not null with default
,SZ002CH5 CHAR(5) FOR SBCS DATA not null with default
,SZ002CH2 CHAR(2) FOR SBCS DATA not null with default
,SZ002TST TIMESTAMP not null with default
$@ if $phase = 1 then $@=¢ $********************************************
$! $@ else $@=¢ $*******************************************************
,SZ002CH3 CHAR(3) FOR SBCS DATA not null with default
$! $********************************************************************
)
IN $db.ASZ02A
AUDIT NONE
DATA CAPTURE CHANGES
CCSID EBCDIC
NOT VOLATILE
;
CREATE TABLE $creator.TDASZ02B
(SZ002CH20 CHAR(20) FOR SBCS DATA not null with default
,SZ002CH5 CHAR(5) FOR SBCS DATA not null with default
,SZ002CH2 CHAR(2) FOR SBCS DATA not null with default
,SZ002TST TIMESTAMP not null with default
$@ if $phase = 1 then $@=¢ $********************************************
$! $@ else $@=¢ $*******************************************************
,SZ002CH3 CHAR(3) FOR SBCS DATA not null with default
$! $********************************************************************
)
IN $db.ASZ02B
AUDIT NONE
DATA CAPTURE CHANGES
CCSID EBCDIC
NOT VOLATILE
;
------------------------------------------------------------------------
COMMIT;
------------------------------------------------------------------------
CREATE UNIQUE INDEX $creator.IDASZ02A
ON $creator.TDASZ02A
(SZ002CH20 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0
PCTFREE 10
GBPCACHE CHANGED
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 2 G
CLUSTER
COMPRESS NO
;
CREATE UNIQUE INDEX $creator.IDASZ02B
ON $creator.TDASZ02B
(SZ002CH20 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
$@ if $phase = 1 then $@=¢
FREEPAGE 0 -- Standard
$! $@ else $@=¢
FREEPAGE 4
$!
$@ if $phase = 1 then $@=¢
PCTFREE 10 -- Standard
$! $@ else $@=¢
PCTFREE 20
$!
GBPCACHE CHANGED
$@ if $phase = 1 then $@=¢
BUFFERPOOL BP1 -- Standard
$! $@ else $@=¢
BUFFERPOOL BP32K7 -- BP32K wäre Standard bei COMPRESSED=YES
$!
$@ if $phase = 1 then $@=¢
CLOSE YES -- Standard
$! $@ else $@=¢
CLOSE NO
$!
COPY NO
DEFINE YES
PIECESIZE 2 G
CLUSTER
$@ if $phase = 1 then $@=¢
COMPRESS NO -- Standard
$! $@ else $@=¢
COMPRESS YES
$!
;
ALTER TABLE OA1P.TDASZ02A
ADD CONSTRAINT PK_TDASZ02A
PRIMARY KEY (SZ002CH20);
ALTER TABLE OA1P.TDASZ02B
ADD CONSTRAINT PK_TDASZ02B
PRIMARY KEY (SZ002CH20);
ALTER TABLE OA1P.TDASZ02A
ADD RESTRICT ON DROP;
ALTER TABLE OA1P.TDASZ02B
ADD RESTRICT ON DROP;
------------------------------------------------------------------------
COMMIT;
------------------------------------------------------------------------
$@ if $phase = 1 then $@=¢ $********************************************
INSERT INTO $creator.TDASZ02A
(SZ002CH20, SZ002CH5, SZ002CH2, SZ002TST ) VALUES
('erstens', 'e' , '1' , current timestamp );
INSERT INTO $creator.TDASZ02A
(SZ002CH20, SZ002CH5, SZ002CH2, SZ002TST ) VALUES
('zweitens', 'zw' , '2' , current timestamp - 2 minute);
INSERT INTO $creator.TDASZ02A
(SZ002CH20, SZ002CH5, SZ002CH2, SZ002TST ) VALUES
('drittens', 'dre' , '3' , current timestamp - 3 hours);
INSERT INTO $creator.TDASZ02A
(SZ002CH20, SZ002CH5, SZ002CH2, SZ002TST ) VALUES
('viertens', 'vier', '4', current timestamp - 4 days);
INSERT INTO $creator.TDASZ02A
(SZ002CH20, SZ002CH5, SZ002CH2, SZ002TST ) VALUES
('fuenftens', 'fuenf', '5' , current timestamp - 5 months );
------------------------------------------------------------------------
INSERT INTO $creator.TDASZ02B
(SZ002CH20, SZ002CH5, SZ002CH2, SZ002TST ) VALUES
('erstens', 'e' , '1' , current timestamp );
INSERT INTO $creator.TDASZ02B
(SZ002CH20, SZ002CH5, SZ002CH2, SZ002TST ) VALUES
('zweitens', 'zw' , '2' , current timestamp - 2 minute);
INSERT INTO $creator.TDASZ02B
(SZ002CH20, SZ002CH5, SZ002CH2, SZ002TST ) VALUES
('drittens', 'dre' , '3' , current timestamp - 3 hours);
INSERT INTO $creator.TDASZ02B
(SZ002CH20, SZ002CH5, SZ002CH2, SZ002TST ) VALUES
('viertens', 'vier', '4', current timestamp - 4 days);
INSERT INTO $creator.TDASZ02B
(SZ002CH20, SZ002CH5, SZ002CH2, SZ002TST ) VALUES
('fuenftens', 'fuenf', '5' , current timestamp - 5 months );
$! $@ else $@=¢ $*******************************************************
INSERT INTO $creator.TDASZ02A
(SZ002CH20, SZ002CH5, SZ002CH2, SZ002TST, SZ002CH3 ) VALUES
('erstens', 'e' , '1' , current timestamp ,
'C11');
INSERT INTO $creator.TDASZ02A
(SZ002CH20, SZ002CH5, SZ002CH2, SZ002TST, SZ002CH3 ) VALUES
('zweitens', 'zw' , '2' , current timestamp - 2 minute,
'C22');
INSERT INTO $creator.TDASZ02A
(SZ002CH20, SZ002CH5, SZ002CH2, SZ002TST, SZ002CH3 ) VALUES
('drittens', 'dre' , '3' , current timestamp - 3 hours,
'C33');
INSERT INTO $creator.TDASZ02A
(SZ002CH20, SZ002CH5, SZ002CH2, SZ002TST, SZ002CH3 ) VALUES
('viertens', 'vier', '4', current timestamp - 4 days,
'C44');
INSERT INTO $creator.TDASZ02A
(SZ002CH20, SZ002CH5, SZ002CH2, SZ002TST, SZ002CH3 ) VALUES
('fuenftens', 'fuenf', '5' , current timestamp - 5 months,
'C55');
----------------------------------------------------------------------
INSERT INTO $creator.TDASZ02B
(SZ002CH20, SZ002CH5, SZ002CH2, SZ002TST, SZ002CH3 ) VALUES
('erstens', 'e' , '1' , current timestamp ,
'C11');
INSERT INTO $creator.TDASZ02B
(SZ002CH20, SZ002CH5, SZ002CH2, SZ002TST, SZ002CH3 ) VALUES
('zweitens', 'zw' , '2' , current timestamp - 2 minute,
'C22');
INSERT INTO $creator.TDASZ02B
(SZ002CH20, SZ002CH5, SZ002CH2, SZ002TST, SZ002CH3 ) VALUES
('drittens', 'dre' , '3' , current timestamp - 3 hours,
'C33');
INSERT INTO $creator.TDASZ02B
(SZ002CH20, SZ002CH5, SZ002CH2, SZ002TST, SZ002CH3 ) VALUES
('viertens', 'vier', '4', current timestamp - 4 days,
'C44');
INSERT INTO $creator.TDASZ02B
(SZ002CH20, SZ002CH5, SZ002CH2, SZ002TST, SZ002CH3 ) VALUES
('fuenftens', 'fuenf', '5' , current timestamp - 5 months,
'C55');
$! $********************************************************************
$/pha1/ $***************************************************************
}¢--- DSN.TX.CASE(SZ003) cre=2016-06-20 mod=2016-08-08-10.50.13 A586114 --------
*
* DBX - Test Case EC182
*
* phase 1:
*
*
*
creDb trg 1
+ ok creDb DSN.TX.GENF(SZ003t1) ::f
creDb src 2
+ ok creDb DSN.TX.GENF(SZ003s2) ::f
}¢--- DSN.TX.CASE(SZ003DDL) cre=2016-06-20 mod=2016-06-21-14.32.38 A586114 -----
------------------------------------------------------------------------
SET CURRENT SQLID='S100447';
------------------------------------------------------------------------
DROP TABLESPACE $db.ASZ003A;
------------------------------------------------------------------------
COMMIT;
------------------------------------------------------------------------
$@ if $phase >= 1 then $@=/pha1/
CREATE TABLESPACE ASZ003A
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0
PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
SEGSIZE 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255
;
------------------------------------------------------------------------
CREATE TABLE $creator.Tqz91SZ003A1
(SZ003CH20 CHAR(20) FOR SBCS DATA not null with default
,SZ003CH5 CHAR(5) FOR SBCS DATA not null with default
,SZ003CH2 CHAR(2) FOR SBCS DATA not null with default
,SZ003TST TIMESTAMP not null with default
)
IN $db.ASZ003A
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE
;
------------------------------------------------------------------------
COMMIT;
------------------------------------------------------------------------
CREATE INDEX $creator.Iqz91SZ003A0
ON $creator.Tqz91SZ003A1
(SZ003CH20 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0
PCTFREE 10
GBPCACHE CHANGED
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 2 G
$@ if $phase = 1 then $@=¢
CLUSTER
$! $@ else $@=¢
NOT CLUSTER
$!
;
------------------------------------------------------------------------
COMMIT;
------------------------------------------------------------------------
CREATE INDEX $creator.Iqz91SZ003A1
ON $creator.Tqz91SZ003A1
(SZ003CH5 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0
PCTFREE 10
GBPCACHE CHANGED
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 2 G
$@ if $phase = 1 then $@=¢
not CLUSTER
$! $@ else $@=¢
CLUSTER
$!
;
------------------------------------------------------------------------
COMMIT;
------------------------------------------------------------------------
INSERT INTO $creator.Tqz91SZ003A1
(SZ003CH20, SZ003CH5, SZ003CH2, SZ003TST ) VALUES
('erstens', 'e' , '1' , current timestamp );
INSERT INTO $creator.Tqz91SZ003A1
(SZ003CH20, SZ003CH5, SZ003CH2, SZ003TST ) VALUES
('zweitens', 'zw' , '2' , current timestamp - 2 minute);
INSERT INTO $creator.Tqz91SZ003A1
(SZ003CH20, SZ003CH5, SZ003CH2, SZ003TST ) VALUES
('drittens', 'dre' , '3' , current timestamp - 3 hours);
INSERT INTO $creator.Tqz91SZ003A1
(SZ003CH20, SZ003CH5, SZ003CH2, SZ003TST ) VALUES
('viertens', 'vier', '4', current timestamp - 4 days);
INSERT INTO $creator.Tqz91SZ003A1
(SZ003CH20, SZ003CH5, SZ003CH2, SZ003TST ) VALUES
('fuenftens', 'fuenf', '5' , current timestamp - 5 months );
$/pha1/
}¢--- DSN.TX.CASE(T) cre=2010-09-30 mod=2010-09-30-14.05.53 A540769 ------------
//YVVUNL01 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBAF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.T719P001.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.MFUNL.T719P001.UNL,
// DCB=(LRECL=661,RECFM=FB,BLKSIZE=31728),
// SPACE=(CYL,(2,1000)),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oa1a.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 1)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 1)
order by vv719002 asc
fetch first 100 rows only
;
select t.*
from oa1a.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 2)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 2)
order by vv719002 asc
;
}¢--- DSN.TX.CASE(TAT) cre=2016-04-15 mod=2016-04-15-14.45.49 A540769 ----------
credb trg 2
}¢--- DSN.TX.CASE(TATDDL) cre=2016-04-15 mod=2016-04-15-14.57.19 A540769 -------
set current sqlid = 'S100447';
--ter table $creator.tqz91TATA disable archive;
DROP TABLESPACE $db.aTatH ;
DROP TABLESPACE $db.aTatA ;
COMMIT ;
CREATE TABLESPACE aTATa
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
GBPCACHE CHANGED
TRACKMOD NO
LOGGED
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID ebcdic
DEFINE YES
SEGSIZE 64
maxpartitions 100 -- uts PBG partitioned by growth
dssize 1 G
MAXROWS 255
FREEPAGE 0
;
CREATE TABLESPACE aTATH
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
GBPCACHE CHANGED
TRACKMOD NO
LOGGED
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID ebcdic
DEFINE YES
SEGSIZE 64
maxpartitions 100 -- uts PBG partitioned by growth
dssize 1 G
MAXROWS 255
FREEPAGE 0
;
CREATE TABLE $creator.tqz91TATA
( i1 integer not null generated always as identity
, c2 varchar(4000) not null with default
$@ if $phase = 2 then $@=¢
, rowBegin timestamp(12) not null generated always as row begin
, rowEnd timestamp(12) not null generated always as row end
, rowChange not null generated always
for each row on update as row change timestamp
$!
)
in $db.aTATa;
CREATE INDEX $creator.ITATA1
ON $creator.tqz91TATA
(i1 asc
)
CLUSTER
DEFINE YES
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
DEFER NO
COPY NO
USING STOGROUP "GSMS "
PRIQTY -1
SECQTY -1
ERASE NO
PIECESIZE 8M
FREEPAGE 0
PCTFREE 0
GBPCACHE CHANGED
;
-- like does not work with row change .......
--EATE TABLE $creator.tqz91TATH like $creator.tqz91TATA
-- in $db.aTATH;
CREATE TABLE $creator.tqz91TATH
( i1 integer not null -- generated always as identity
, c2 varchar(4000) not null with default
$@ if $phase = 2 then $@=¢
, rowBegin timestamp(12) not null -- generated always as row begin
, rowEnd timestamp(12) not null -- generated always as row end
, rowChange not null generated always
for each row on update as row change timestamp
$!
)
in $db.aTATH;
CREATE INDEX $creator.ITATH1
ON $creator.tqz91TATH
(i1 asc
)
CLUSTER
DEFINE YES
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
DEFER NO
COPY NO
USING STOGROUP "GSMS "
PRIQTY -1
SECQTY -1
ERASE NO
PIECESIZE 8M
FREEPAGE 0
PCTFREE 0
GBPCACHE CHANGED
;
alter table $creator.tqz91TATA enable archive
use $creator.tqz91TATH
;
CREATE view $creator.vqz91TATA as
select * from $creator.tqz91TATA;
commit
;
insert into $creator.tqz91TATA (c2)
select char(current timestamp)
|| repeat(left(' ' || strip(creator) || '.' || strip(name)
|| ' in ' || strip(dbName) || '.' || tsname
, 50), 70)
from sysibm.sysTables fetch first 1000 rows only;
;
commit
;
insert into $creator.tqz91TATH select * from $creator.tqz91TATA
}¢--- DSN.TX.CASE(TATDEL) cre=2016-04-15 mod=2016-04-15-14.30.55 A540769 -------
set current application compatibility 'V11R1';
select SYSIBMADM.MOVE_TO_ARCHIVE from sysibm.sysDummy1;
set SYSIBMADM.MOVE_TO_ARCHIVE = 'Y';
select SYSIBMADM.MOVE_TO_ARCHIVE from sysibm.sysDummy1;
select count(*) from qz92CrT.tqz91TatH where mod(i1, 123) = 19;
delete from qz92CrT.vqz91TatA where mod(i1, 123) = 19
skip locked data;
select count(*) from qz92CrT.tqz91TatH where mod(i1, 123) = 19;
commit;
select SYSIBMADM.MOVE_TO_ARCHIVE from sysibm.sysDummy1;
select count(*) from qz92CrT.tqz91TatH where mod(i1, 123) = 19;
}¢--- DSN.TX.CASE(TATFUN) cre=2016-04-15 mod=2016-10-03-07.56.51 A540769 -------
set current sqlid = 'S100447';
drop function qz92crT.countTAT(i int);
--#SET TERMINATOR ?
create function qz92crT.countTAT(i int) returns varchar(100)
applCompat V11R1
begin
declare c int;
declare res varchar(100) default '';
select count(*) into c
from qz92crT.tqz91TATA
where i1 = i;
set res = 'cnt=' || c || ' getArc=' || SYSIBMADM.get_ARCHIVE;
set SYSIBMADM.get_ARCHIVE = 'Y';
select count(*) into c
from qz92crT.tqz91TATA
where i1 = i;
return res || '... cnt=' || c || ' getArc=' || SYSIBMADM.get_ARCHIVE;
end
?
--#SET TERMINATOR ;
set current sqlid = 'S100447';
create view qz92crT.vCountTAT7 as
select qz92crT.countTAT(7) tat7 from sysibm.sysDummy1;
select * from qz92crT.vCountTAT7
set current sqlid = 'S100447';
drop function qz92crT.countTAT(i int);
}¢--- DSN.TX.CASE(TATSEL) cre=2016-04-15 mod=2016-04-15-14.04.29 A540769 -------
set current application compatibility 'V11R1';
select SYSIBMADM.get_ARCHIVE from sysibm.sysDummy1;
select i1, left(c2, 40)
from qz92CrT.tqz91TatA
where i1 <= 007
order by i1 desc
fetch first 20 rows only
;
select i1, left(c2, 40)
from qz92CrT.tqz91TatH
where i1 <= 007
order by i1 desc
fetch first 20 rows only
;
select SYSIBMADM.get_ARCHIVE from sysibm.sysDummy1;
set SYSIBMADM.get_ARCHIVE = 'Y';
select SYSIBMADM.get_ARCHIVE from sysibm.sysDummy1;
select SYSIBMADM.get_ARCHIVE from sysibm.sysDummy1;
select current temporal system_time from sysibm.sysDummy1;
set current temporal system_time '2016-04-15-12.55.11.168313';
select current temporal system_time from sysibm.sysDummy1;
select i1, left(c2, 40)
from qz92CrT.tqz91TatA
-- for system_time as of '2016-04-15-12.55.11.168313'
where i1 = 007
order by i1 desc
fetch first 20 rows only
;
select i1, left(c2, 40)
from qz92CrT.tqz91TatH
where i1 = 007
order by i1 desc
fetch first 20 rows only
;
}¢--- DSN.TX.CASE(TBADP) cre=2016-01-25 mod=2016-01-25-12.00.50 A540769 --------
$=partsT=3
$=partsS=5
creDb trg 1
+ ok creDb DSN.TX.GENF(TBADPt1) ::f
creDb src 1
+ ok creDb DSN.TX.GENF(TBADPs1) ::f
}¢--- DSN.TX.CASE(TBADPDDL) cre=2016-01-25 mod=2016-01-25-08.18.41 A540769 -----
set current sqlid = 'S100447';
DROP TABLESPACE $db.aTbAdP ;
COMMIT ;
$= parts =- if($env='src', $partsS, $partsT)
$= freePg =- if($env='src', 0, 77)
$@ say $env 'parts='$parts 'freePage='$freePg
$@ if $phase >= 1 then $@=/p1/
CREATE TABLESPACE aTbAdP
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
GBPCACHE CHANGED
TRACKMOD NO
LOGGED
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID ebcdic
DEFINE YES
SEGSIZE 64 -- segmented
numParts $partsT
dssize 16 g
MAXROWS 255
FREEPAGE $freePg
;
CREATE TABLE $creator.tqz91tbAdP
( pa smallint not null
, c2 char(10) not null with default
, c3 char(10) not null with default
)
IN $db.aTbAdP
partition by (pa)
( partition 1 ending at (1)
$do px=2 to $partsT $@=¢
, partition $px ending at ($px)
$!
)
CCSID EBCDIC
;
CREATE UNIQUE INDEX $creator.Iqz91tbAdPA1
ON $creator.tqz91tbAdP
(pa, c2) partitioned
CLUSTER
DEFINE YES
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
DEFER NO
COPY NO
USING STOGROUP "GSMS "
PRIQTY -1
SECQTY -1
ERASE NO
FREEPAGE $freePg
GBPCACHE CHANGED
;
commit;
$do px= $partsT+1 to $parts $@=¢
alter table $creator.tqz91tbAdP
add partition ending at ($px);
$!
commit;
insert into $creator.tqz91tbAdP values(1, 'zehn', '10');
$do px=1 to $parts $@=¢
insert into $creator.tqz91tbAdP values($px, 'c1 ' || $px || 'a'
, 'c2 ' || $px || 'b');
insert into $creator.tqz91tbAdP values($px, 'c1 ' || $px || 'e'
, 'c2 ' || $px || 'f');
$!
commit;
$/p1/
}¢--- DSN.TX.CASE(TQ001SEL) cre=2013-11-25 mod=2013-11-25-14.06.53 A540769 -----
select * from A540769x.tqt001; 00010000
select * from A540769x.tqt001exc; 00011000
00020000
00030000
00040000
00050000
00060000
00070000
00080000
00090000
00100000
00110000
00120000
00130000
00140000
00150000
00160000
00170000
00180000
00190000
00200000
00210000
00220000
00230000
00240000
00250000
00260000
00270000
00280000
00290000
00300000
00310000
00320000
00330000
00340000
00350000
}¢--- DSN.TX.CASE(TQ002RTS) cre=2013-11-25 mod=2013-11-25-15.29.12 A540769 -----
select * 00010000
from sysibm.sysTableSpaceStats 00020001
where dbName = 'DA54076X' and name = 'QT002' 00030002
order by partition 00040004
}¢--- DSN.TX.CASE(TSALT) cre=2015-12-21 mod=2016-02-11-21.04.56 A540769 --------
* alter ts
* bufferPool (phase // 10) 1 ==> BP1, 3 ==> bp32K else bp2
* dsSize ($phase % 10 // 2) = 0 ==> 16g else 4g
* segsize ($phase % 20 // 2) = 0 ==> 64 else 8
creDb src 23
+ ok creDb DSN.TX.GENF(TSALTs23) ::f
creDb trg 3
+ ok creDb DSN.TX.GENF(TSALTt3) ::f
}¢--- DSN.TX.CASE(TSALTDDL) cre=2015-12-21 mod=2015-12-21-14.31.55 A540769 -----
set current sqlid = 'S100447';
DROP TABLESPACE $db.atsAlt ;
COMMIT ;
$@ if $phase >= 1 then $@=/p1/
CREATE TABLESPACE aTsAlt
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
GBPCACHE CHANGED
TRACKMOD NO
LOGGED
$@ if ($phase // 10) = 1 then
BUFFERPOOL BP1
$@ else if ($phase // 10) = 3 then
BUFFERPOOL BP32K
$@ else
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID ebcdic
DEFINE YES
$@ if ($phase % 20 // 2) = 0 then
SEGSIZE 64 -- segmented
$@ else
SEGSIZE 8 -- segmented
maxPartitions 1
$@ if ($phase % 10 // 2) = 0 then
dssize 16 g
$@ else
dssize 4 g
MAXROWS 255
FREEPAGE 0
;
CREATE TABLE $creator.tqztsAlt
( c1 char(15) not null with default
, c2 char(10) not null with default
, c3 char(10) not null with default
, c4 char(10) not null with default
)
IN $db.atsAlt
CCSID EBCDIC
;
CREATE UNIQUE INDEX $creator.ItsAltA1
ON $creator.tQZtsAlt
(c1 asc
,c2 asc
)
CLUSTER
DEFINE YES
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
DEFER NO
COPY NO
USING STOGROUP "GSMS "
PRIQTY -1
SECQTY -1
ERASE NO
FREEPAGE 0
PCTFREE 0
GBPCACHE CHANGED
;
insert into $creator.tQZTsAlt (c1, c2) values('eins', 'eins 1');
insert into $creator.tQZTsAlt (c1, c2) values('zwei', 'zwei 2');
insert into $creator.tQZTsAlt (c1, c2) values('drei', 'drei 3');
insert into $creator.tQZTsAlt (c1, c2) values('vier', 'vier 4');
insert into $creator.tQZTsAlt (c1, c2) values('fuenf', 'fuenf 5');
insert into $creator.tQZTsAlt (c1, c2) values('sechs', 'sechs 6');
commit;
$/p1/
}¢--- DSN.TX.CASE(TSALTDIV) cre=2015-12-21 mod=2015-12-21-14.28.27 A540769 -----
set current sqlid = 'S100447';
ALTER TABLESPACE QZ92A1T.ATSALT
BUFFERPOOL BP32K
;
set current sqlid = 'S100447';
ALTER TABLESPACE QZ92A1T.ATSALT
dsSize 4G
;
}¢--- DSN.TX.CASE(TT01) cre= mod= ----------------------------------------------
credb trg 1
+ ok creDb A540769.TX.GENF(TT01t1) ::f
}¢--- DSN.TX.CASE(TT01DDL) cre=2010-12-06 mod=2010-12-06-14.45.17 A540769 ------
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
drop TABLESPACE $db.ATT01;
commit;
$@¢
if $phase > 0 then $@=¢
CREATE TABLESPACE ATT01
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
SEGSIZE 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255;
COMMIT;
------------------------------------------------------------------------
CREATE TABLE $creator.TWKTT01A1
(i int NOT NULL
,USR CHAR(20) NOT NULL WITH DEFAULT USER
-- GENErated always
,SQLD CHAR(20) NOT NULL WITH DEFAULT current sqlid
-- GENErated always
,tst timestamp not null with default
-- GENErated always
)
IN $db.ATT01
CCSID EBCDIC
NOT VOLATILE;
insert into $creator.TWKTT01A1 (i) values (1);
insert into $creator.TWKTT01A1 (i) values (2);
COMMIT;
$!
$!
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(T001) cre=2015-06-22 mod=2015-06-22-15.36.57 A540769 ---------
* handle long creator and table names
credb src 2
+ ok creDb DSN.TX.GENF(T001s2) ::f
credb trg 1
+ ok creDb DSN.TX.GENF(T001t1) ::f
}¢--- DSN.TX.CASE(T001DDL) cre=2015-06-22 mod=2015-06-22-15.36.51 A540769 ------
SET CURRENT SQLID='S100447';
SET CURRENT SCHEMA='$creator';
drop tablespace $db.T001A;
commit;
$@ if $phase > 0 then $@=/phaseGtr0/
CREATE TABLESPACE T001A
IN $db
USING STOGROUP GSMS
PRIQTY 48 SECQTY 100
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
SEGSIZE $-¢if($phase = 2, 8, 64)$!
$-¢if($phase =41, MAXPARTITIONS 5)$!
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255
;
create TABLE
${creator} $*(
${creator}lllllllllllllllllllllllllllllllllllllllllllllllllllllllllll70
$*)
.tqzT001lllllllllllllllllllllllllllllllllllllllllllllllllllllllllllll70
(
ch1 CHAR(20) FOR SBCS DATA not null with default
, ch2 CHAR($-¢20 - $phase$!)
FOR SBCS DATA not null with default
, ch3 CHAR(10) FOR SBCS DATA not null with default
)
IN $db.T001A
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE
; $*(
$@¢
if $phase = 1 then $@=¢
CREATE UNIQUE INDEX $creator.Iwk401A0
$! else $@=¢
CREATE UNIQUE INDEX $creator.Iwk401A1
$!
$!
ON $creator.Twk401A
( wk401CH20 ASC
$@ if $phase = 31 then $@=¢
, wk401CH5 ASC
$!
)
$@ if $phase = 32 then $@=¢
include (wk401Tst )
$!
USING STOGROUP GSMS
PRIQTY 12 SECQTY 12
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 2 G
;
$@ if $phase = 21 then $@=¢
CREATE INDEX $creator.Iwk401A2
ON $creator.Twk401A
( wk401CH2 ASC)
USING STOGROUP GSMS
PRIQTY 12 SECQTY 12
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 2 G
;
$!
$@ if $phase = 4 then $@=¢
ALTER TABLE $creator.TWK401A
ALTER WK401TST SET DATA TYPE TIMESTAMP(10);
commit;
$!
$@ if $phase >= 3 then $@=¢
CREATE view $creator.vWk401A1 as
select * from $creator.twk401A
;
CREATE view $creator.vWk401A2 as
select * from $creator.vWk401A1
;
$!
$@ if $phase = 24 then $@=¢
CREATE view $creator.vWk401A24 as
select 'wk401CH20=' || wk401CH20 || ', wk401CH5=' || wk401CH5
|| ' longStringConstant 30 longer 40 longer 50 longer 6
0 longer 70 longer 80 longer 90 longer100 longer110 longer120 longer130
longer140 longer150 longer160 longer170' || ', wk401CH2='||wk401CH2 ll
from $creator.vwk401A2
;
$!
commit
;
insert into $creator.Twk401A
(wk401ch20, wk401ch5, wk401ch2, wk401tst ) values
('erstens', 'e' , '1' , current timestamp );
insert into $creator.Twk401A
(wk401ch20, wk401ch5, wk401ch2, wk401tst ) values
('zweitens', 'zw', '2' , current timestamp - 2 minute);
insert into $creator.Twk401A
(wk401ch20, wk401ch5, wk401ch2, wk401tst ) values
('drittens', 'dre', '3', current timestamp - 3 hours);
insert into $creator.Twk401A
(wk401ch20, wk401ch5, wk401ch2, wk401tst ) values
('viertens', 'vier', '4', current timestamp - 4 days);
insert into $creator.Twk401A
(wk401ch20, wk401ch5, wk401ch2, wk401tst ) values
('fuenftens', 'fuenf', '5' , current timestamp - 5 months );
$*)
commit
;
$/phaseGtr0/
}¢--- DSN.TX.CASE(VV71) cre= mod= ----------------------------------------------
credb trg 1
+ ok creDb A540769.TX.GENF(VV71t1) ::f
}¢--- DSN.TX.CASE(VV71CNP) cre=2010-09-30 mod=2010-09-30-15.21.34 A540769 ------
//A540769P JOB (CP00,KE50), 00010001
// MSGCLASS=T,TIME=1440,
// NOTIFY=A540769
//*MAIN CLASS=DBTF ,SYSTEM=S12
//S01 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99 00020001
//SYSTSIN DD *
DSN SYSTEM(DBAF)
RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2)
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSIN DD *
select part, (select count(*)
from OA1A.TVV719A1
where vv719002 > VV719002von
and vv719002 <= VV719002bis ) cnt
from A540769.TVV719Limits
order by part
//
$=stp=4
$=max=64
$=jx=0
$@do ct=1 by $stp to $max $@¢
$=von=- right(ct, 3, 0)
$=bis=- min(ct+$stp-1, $max)
$=jx=- right($jx+1, 2, 0)
say 'job'$jx $von '-' $bis
$@=¢
/ YVVUNL$jx JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBAF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.T719P$von.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
$!
$=dx= -1
$@do px = $von to $bis $@=¢
$=px=- right(px, 3, 0)
$=dx=- right($dx+1, 2, 0)
//SYSREC$dx DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.T719P$px.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
$!
$@=¢
//SYSIN DD *
$!
$@do px = $von to $bis $@=¢
select t.*
from oa1a.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = $px)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = $px)
order by vv719002 asc
;
$!
$!
$#out 20100930 14:13:17
$#out 20100930 14:10:24
$#out 20100930 14:09:27
$#out 20100930 14:07:37
$#out 20100930 13:59:57
}¢--- DSN.TX.CASE(VV71CNT) cre=2010-09-30 mod=2011-01-10-09.49.35 A540769 ------
//A540769C JOB (CP00,KE50), 00010001
// MSGCLASS=T,TIME=1440,
// NOTIFY=A540769
//*MAIN CLASS=DBOF ,SYSTEM=S12
//S01 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99 00020001
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2)
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSIN DD *
select count(*) from OA1P.TVV719A1
}¢--- DSN.TX.CASE(VV71COP) cre=2010-09-30 mod=2011-01-10-09.47.25 A540769 ------
//A540769L JOB (CP00,KE50),'DB2 COPY',
// MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG SYSTEM=S14
//*
//P02 EXEC PGM=DSNUTILB,
// PARM='DBOF,A540769F.FULCOPL'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTEMPL DD DSN=DBOF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
LISTDEF C#LIST 00010000
INCLUDE TABLESPACE VV20A1P.A719A PARTLEVEL 8620
COPY LIST C#LIST COPYDDN(TCOPYD)
PARALLEL
FULL YES
SHRLEVEL REFERENCE
//*
}¢--- DSN.TX.CASE(VV71DDJ) cre=2010-09-30 mod=2011-01-10-09.50.47 A540769 ------
//A540769E JOB (CP00,KE50), 00010001
// MSGCLASS=T,TIME=1440,
// NOTIFY=A540769
//*MAIN CLASS=DBOF ,SYSTEM=S12
//S01 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99 00020001
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2)
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSIN DD *
SET CURRENT SQLID = 'S100447' ;
??OP TABLESPACE VV20A1P.A719A ;
commit;
CREATE TABLESPACE A719A
IN VV20A1P
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
TRACKMOD YES
LOGGED
NUMPARTS 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255 DSSIZE 16 G
;
CREATE TABLE OA1P.TVV719A1
(VV719001 CHAR(37) FOR SBCS DATA NOT NULL,
VV719002 CHAR(59) FOR SBCS DATA NOT NULL,
VV719003 CHAR(37) FOR SBCS DATA NOT NULL,
VV719004 CHAR(9) FOR SBCS DATA NOT NULL,
VV719005 CHAR(3) FOR SBCS DATA NOT NULL,
VV719006 CHAR(2) FOR SBCS DATA NOT NULL,
VV719007 CHAR(1) FOR SBCS DATA NOT NULL,
VV719008 CHAR(22) FOR SBCS DATA NOT NULL,
VV719009 CHAR(26) FOR SBCS DATA WITH DEFAULT NULL)
IN VV20A1P.A719A
PARTITION BY (VV719002 ASC)
(PART 1 VALUES('B18'),
PART 2 VALUES('ICHG'),
PART 3 VALUES('IDE000A'),
PART 4 VALUES('IDE000CL'),
PART 5 VALUES('IDE000D'),
PART 6 VALUES('IDE0001'),
PART 7 VALUES('IH'),
PART 8 VALUES('IR'),
PART 9 VALUES('IUS7'),
PART 10 VALUES('IXS04'),
PART 11 VALUES('K03'),
PART 12 VALUES('K08'),
PART 13 VALUES('K23'),
PART 14 VALUES('K299352'),
PART 15 VALUES('K30'),
PART 16 VALUES('K38'),
PART 17 VALUES('K5'),
PART 18 VALUES('K7'),
PART 19 VALUES('NAT0003'),
PART 20 VALUES('NBBD'),
PART 21 VALUES('NBD'),
PART 22 VALUES('NCH0007'),
PART 23 VALUES('NCH0014'),
PART 24 VALUES('NCH0022'),
PART 25 VALUES('NCH0030'),
PART 26 VALUES('NCH0038'),
PART 27 VALUES('NCH0047'),
PART 28 VALUES('NCH0104'),
PART 29 VALUES('NCH0111'),
PART 30 VALUES('NCSFI12'),
PART 31 VALUES('NCSFI15'),
PART 32 VALUES('NCSFI17'),
PART 33 VALUES('NCSFI19'),
PART 34 VALUES('NCSFI21'),
PART 35 VALUES('NCSFI3'),
PART 36 VALUES('NCS0Z'),
PART 37 VALUES('NDE000A'),
PART 38 VALUES('NDE000CL'),
PART 39 VALUES('NDE000D'),
PART 40 VALUES('NDE000U'),
PART 41 VALUES('NDE0008'),
PART 42 VALUES('NGB00BZ'),
PART 43 VALUES('NGB00B2'),
PART 44 VALUES('NGB00B5'),
PART 45 VALUES('NGB006'),
PART 46 VALUES('NUS0'),
PART 47 VALUES('NXS0Z'),
PART 48 VALUES('NXS016'),
PART 49 VALUES('NXS028'),
PART 50 VALUES('NXS041'),
PART 51 VALUES('NXS049'),
PART 52 VALUES('QH'),
PART 53 VALUES('RA'),
PART 54 VALUES('RL'),
PART 55 VALUES('RZ'),
PART 56 VALUES('TA'),
PART 57 VALUES('TD'),
PART 58 VALUES('TH'),
PART 59 VALUES('TM'),
PART 60 VALUES('TQ'),
PART 61 VALUES('TR'),
PART 62 VALUES('TV'),
PART 63 VALUES('T2'),
PART 64 VALUES(MAXVALUE))
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE
APPEND NO ;
CREATE UNIQUE INDEX OA1P.IVV719A1
ON OA1P.TVV719A1
(VV719002 ASC)
PARTITIONED
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 5 PCTFREE 5
GBPCACHE CHANGED
CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES;
CREATE INDEX OA1P.IVV719A2
ON OA1P.TVV719A1
(VV719001 ASC,
VV719008 ASC)
PARTITIONED
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 5 PCTFREE 5
GBPCACHE CHANGED
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES;
CREATE INDEX OA1P.IVV719A3
ON OA1P.TVV719A1
(VV719003 ASC)
PARTITIONED
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 5 PCTFREE 5
GBPCACHE CHANGED
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES;
CREATE INDEX OA1P.IVV719A4
ON OA1P.TVV719A1
(VV719004 ASC,
VV719005 ASC,
VV719006 ASC,
VV719007 ASC,
VV719008 ASC)
PARTITIONED
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 5 PCTFREE 5
GBPCACHE CHANGED
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES;
CREATE VIEW OA1P.VVV719A1(PRIMKEYTS, SECKEYTS, PRIMKEYK1, VR4204S,
VR4204L, VR4204G, VR4204P, TS4204, CREATE_TS) AS
SELECT VV719001, VV719002, VV719003, VV719004, VV719005, VV719006,
VV719007, VV719008, VV719009
FROM OA1P.TVV719A1 ;
COMMIT ;
}¢--- DSN.TX.CASE(VV71DDL) cre=2010-09-30 mod=2010-10-01-21.31.06 A540769 ------
set current sqlid = 's100447';
drop TABLESPACE $db.aVV71A;
commit;
CREATE TABLESPACE aVV71A
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 5 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255 SEGSIZE 64;
CREATE TABLE $creator.TVV719Limits
(part integer NOT NULL,
VV719002von CHAR(59) NOT NULL,
VV719002bis CHAR(59) NOT NULL
)
in $db.aVV71A
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
CREATE unique INDEX $creator.IVV71I1
ON $creator.TVV719Limits
(part ASC,
VV719002von ASC,
VV719002bis ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 2 G
;
$*(
insert into $creator.TVV719Limits
select partition, '?', limitKey_internal
from sysibm.systablepart p
where dbName = 'DGDB0376'
and tsName = 'A719A'
;
update $creator.TVV719Limits u set VV719002von =
case when u.part = 1 then repeat(x'00', 59)
else (select VV719002bis
from $creator.TVV719Limits r
where u.part-1 = r.part )
end
;
$*)
commit;
}¢--- DSN.TX.CASE(VV71LLO) cre=2010-10-01 mod=2010-11-29-10.57.22 A540769 ------
//A540769L JOB (CP00,KE50), 00010001
// MSGCLASS=T,TIME=1440,LINES=(999999,WARNING),
// RESTART=S2LOA,
// NOTIFY=A540769
//*MAIN CLASS=LOG
//S1DDL EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBTF)
RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2)
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSIN DD *
SET CURRENT SQLID = 'S100447' ;
-- DROP TABLESPACE DA540769.AVV71A;
commit;
CREATE TABLESPACE aVV71A
IN DA540769
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 5 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255 SEGSIZE 64;
CREATE TABLE A540769.TVV719Limits
(part integer NOT NULL,
VV719002von CHAR(59) NOT NULL,
VV719002bis CHAR(59) NOT NULL
)
in DA540769.aVV71A
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
CREATE unique INDEX A540769.IVV71I1
ON A540769.TVV719Limits
(part ASC,
VV719002von ASC,
VV719002bis ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 2 G
;
commit;
//S2LOA EXEC PGM=DSNUTILB,PARM='DBTF,A540769L.LOAD' 00020001
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBTF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE TIN
DSN('A540769.VVUL.DA540769.AVV71A.UNL')
LOAD DATA LOG NO RESUME NO REPLACE COPYDDN(TCOPYD)
STATISTICS INDEX(ALL) REPORT NO UPDATE ALL
INDDN TIN
EBCDIC CCSID(00500,00000,00000)
SORTKEYS
SORTDEVT DISK
SORTNUM 2
WORKDDN(TSYUTD,TSOUTD)
INTO TABLE
"A540769".
"TVV719LIMITS"
WHEN(00001:00002) = X'02BC'
NUMRECS 64
( "PART"
POSITION( 00003:00006) INTEGER
, "VV719002VON"
POSITION( 00007:00065) CHAR(00059)
, "VV719002BIS"
POSITION( 00066:00124) CHAR(00059)
)
}¢--- DSN.TX.CASE(VV71LLU) cre=2010-10-01 mod=2010-10-01-21.36.02 A540769 ------
//A540769U JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//***************************************************
//* UNLOAD COPY
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBAF,'A540769.UNLOAC'),
// REGION=0M
//*DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSTEMPL DD DSN=DBAF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE TSRE2 DSN('A540769.VVUL.&DB..&TS..UNL')
DATACLAS (NULL30) MGMTCLAS(COM#A092)
SPACE (10,1250) CYL
TEMPLATE TSPU2 DSN('A540769.VVUL.&DB..&TS..PUN')
DATACLAS (NULL12) MGMTCLAS(COM#A092)
SPACE (10,250) CYL
UNLOAD TABLESPACE DA540769.AVV71A
PUNCHDDN TSPU2 UNLDDN TSRE2
SHRLEVEL CHANGE
}¢--- DSN.TX.CASE(VV71LOA) cre=2010-09-30 mod=2011-01-10-09.51.48 A540769 ------
$**$>.jclSub()
$@=¢
$=max=64
//YVV719LO JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBOF
//S1 EXEC PGM=DSNUTILB,PARM='DBOF,YMFNVYLO.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBOF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE TIN DSN('DSN.VVUNL.DBOF.T719P&PART(3)..UNL')
LOAD DATA
EBCDIC CCSID(00500,00000,00000)
STATISTICS INDEX(ALL) KEYCARD UPDATE ALL
LOG NO
SORTDEVT DISK SORTNUM 150
WORKDDN(TSYUTS, TSOUTS)
$@do px=1 to $max $@=¢
INTO TABLE OA1P.TVV719A1 PART $px
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
$!
$!
$#out 20110110 09:51:32
//YVV719LO JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBOF
//S1 EXEC PGM=DSNUTILB,PARM='DBOF,YMFNVYLO.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBOF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE TIN DSN('DSN.VVUNL.DBOF.T719P&PART(3)..UNL')
LOAD DATA
EBCDIC CCSID(00500,00000,00000)
STATISTICS INDEX(ALL) KEYCARD UPDATE ALL
LOG NO
SORTDEVT DISK SORTNUM 150
WORKDDN(TSYUTS, TSOUTS)
INTO TABLE OA1P.TVV719A1 PART 1
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 2
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 3
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 4
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 5
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 6
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 7
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 8
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 9
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 10
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 11
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 12
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 13
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 14
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 15
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 16
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 17
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 18
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 19
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 20
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 21
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 22
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 23
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 24
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 25
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 26
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 27
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 28
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 29
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 30
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 31
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 32
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 33
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 34
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 35
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 36
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 37
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 38
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 39
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 40
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 41
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 42
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 43
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 44
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 45
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 46
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 47
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 48
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 49
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 50
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 51
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 52
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 53
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 54
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 55
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 56
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 57
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 58
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 59
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 60
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 61
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 62
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 63
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 64
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
$#out 20101129 11:32:07
$#out 20100930 15:31:04
$#out 20100904 12:51:36
}¢--- DSN.TX.CASE(VV71LOAJ) cre=2011-01-10 mod=2011-01-10-09.51.45 A540769 -----
//YVV719LO JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBOF
//S1 EXEC PGM=DSNUTILB,PARM='DBOF,YMFNVYLO.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBOF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE TIN DSN('DSN.VVUNL.DBOF.T719P&PART(3)..UNL')
LOAD DATA
EBCDIC CCSID(00500,00000,00000)
STATISTICS INDEX(ALL) KEYCARD UPDATE ALL
LOG NO
SORTDEVT DISK SORTNUM 150
WORKDDN(TSYUTS, TSOUTS)
INTO TABLE OA1P.TVV719A1 PART 1
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 2
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 3
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 4
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 5
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 6
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 7
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 8
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 9
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 10
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 11
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 12
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 13
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 14
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 15
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 16
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 17
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 18
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 19
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 20
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 21
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 22
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 23
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 24
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 25
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 26
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 27
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 28
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 29
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 30
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 31
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 32
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 33
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 34
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 35
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 36
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 37
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 38
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 39
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 40
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 41
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 42
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 43
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 44
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 45
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 46
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 47
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 48
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 49
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 50
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 51
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 52
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 53
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 54
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 55
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 56
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 57
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 58
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 59
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 60
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 61
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 62
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 63
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
INTO TABLE OA1P.TVV719A1 PART 64
RESUME NO REPLACE COPYDDN(TCOPYD) INDDN TIN
(
VV719001 POSITION( 1 )
CHAR( 37) ,
VV719002 POSITION( 38 )
CHAR( 59) ,
VV719003 POSITION( 97 )
CHAR( 37) ,
VV719004 POSITION( 134 )
CHAR( 9) ,
VV719005 POSITION( 143 )
CHAR( 3) ,
VV719006 POSITION( 146 )
CHAR( 2) ,
VV719007 POSITION( 148 )
CHAR( 1) ,
VV719008 POSITION( 149 )
CHAR( 22) ,
VV719009 POSITION( 171 )
CHAR( 26)
NULLIF( 197)='?'
)
}¢--- DSN.TX.CASE(VV71REBI) cre=2010-09-30 mod=2011-01-10-09.50.04 A540769 -----
//A540769P JOB (PD00,KE50,,SP00000000),
// 'FULLCOPY',
// MSGCLASS=T,TIME=1440,LINES=100000
//*MAIN CLASS=LOG
//P04 EXEC PGM=IKJEFT01
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTSXX DD *
alter table OA1P.TVV719A1
//SYSTSIN DD *
DSN SYS(DBOF)
-- generating rebinds in DBOF at 11:18:54 29/11/10 for A540769
-- for 0 tablespace, 1 table, 0 view, 0 index, 0 alias, 0 synonym
-- table OA1P.TVV719A1
REBIND PACKAGE(VV.VV9050.(VDPS000216));
REBIND PACKAGE(VV.VV9050.(VDPS000221));
REBIND PACKAGE(VV.VV9050.(VDPS000232));
REBIND PACKAGE(VV.YVVLAYE.(VDPS000118));
REBIND PACKAGE(VV.YVVLAYE.(VDPS000190));
REBIND PACKAGE(VV.YVVLAYE.(VDPS000216));
REBIND PACKAGE(VV.YVVLAYE.(VDPS000221));
REBIND PACKAGE(VV.YVVLAYP.(VDPS000067));
REBIND PACKAGE(VV.YVVPTS.(VDSS000094));
REBIND PACKAGE(VV.YVVPTS.(VDSS000103));
REBIND PACKAGE(VV.YVVPTSE.(VDSS000103));
REBIND PACKAGE(VV.YVVPTSE.(VDSS000183));
REBIND PACKAGE(VV.YVVPTSE.(VDSS000205));
REBIND PACKAGE(VV.YVVPTTS.(VDSS000094));
REBIND PACKAGE(VV.YVVPTVR.(VDSS000094));
REBIND PACKAGE(VV.YVVPVR.(VDSS000094));
REBIND PACKAGE(VV.YVVPVR.(VDSS000103));
REBIND PACKAGE(VV.YVVPVRE.(VDSS000103));
REBIND PACKAGE(VV.YVVPVRE.(VDSS000183));
REBIND PACKAGE(VV.YVVPVRE.(VDSS000205));
REBIND PACKAGE(VV.YVVSLTE.(VDPS000117));
REBIND PACKAGE(VV.YVVSLTE.(VDPS000118));
REBIND PACKAGE(VV.YVVSLTE.(VDPS000176));
REBIND PACKAGE(VV.YVVSLTE.(VDPS000216));
REBIND PACKAGE(VV.YVVSLTE.(VDPS000221));
REBIND PACKAGE(VV.YVVSLTS.(VDPS000067));
REBIND PACKAGE(VV.YVVSLTS.(VDPS000114));
REBIND PACKAGE(VV.YVVSLTS.(VDPS000117));
REBIND PACKAGE(VV.YVVSLTS.(VDPS000176));
REBIND PACKAGE(VV.YVVSLVA.(VDPS000118));
REBIND PACKAGE(VV.YVVSLVA.(VDPS000190));
REBIND PACKAGE(VV.YVVSLVA.(VDPS000216));
REBIND PACKAGE(VV.YVVSLVA.(VDPS000221));
REBIND PACKAGE(VV.YVVSLVR.(VDPS000067));
REBIND PACKAGE(VV.YVVSLVR.(VDPS000114));
REBIND PACKAGE(VV.YVVSLVR.(VDPS000118));
REBIND PACKAGE(VV.YVVSLVR.(VDPS000190));
REBIND PACKAGE(VV.YVVSQL1.(VDPS000055));
REBIND PACKAGE(VV.YVVSQL1.(VDPS000067));
REBIND PACKAGE(VV.YVVSQL1.(VDPS000114));
REBIND PACKAGE(VV.YVVSQL1.(VDPS000118));
REBIND PACKAGE(VV.YVVSQL1.(VDPS000190));
REBIND PACKAGE(VV.YVVSQL2.(VDPS000067));
REBIND PACKAGE(VV.YVVSQL2.(VDPS000114));
REBIND PACKAGE(VV.YVVSQL2.(VDPS000190));
REBIND PACKAGE(VV.YVVSQLA.(VDPS000055));
REBIND PACKAGE(VV.YVVSQLB.(VDPS000055));
REBIND PACKAGE(VV.YVVSQLE.(BKUR000276));
REBIND PACKAGE(VV.YVVSQLE.(TRAI000380));
REBIND PACKAGE(VV.YVVSQLE.(VDPS000114));
REBIND PACKAGE(VV.YVVSQLE.(VDPS000118));
REBIND PACKAGE(VV.YVVSQLE.(VDPS000190));
REBIND PACKAGE(VV.YVVSQLE.(VDPS000216));
REBIND PACKAGE(VV.YVVSQLE.(VDPS000221));
REBIND PACKAGE(VV.YVVSQLE.(VDPS000232));
REBIND PACKAGE(VV.YVVSQLF.(VDPS000114));
REBIND PACKAGE(VV.YVVSQLF.(VDPS000190));
REBIND PACKAGE(VV.YVVSQLF.(VDPS000216));
}¢--- DSN.TX.CASE(VV71SEL) cre=2010-09-30 mod=2010-09-30-13.48.37 A540769 ------
select t.*
from oa1a.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 17)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 17)
order by vv719002 asc
fetch first 100 rows only
with ur
;x;
select hex(VV719002von), hex(VV719002bis), t.*
from A540769.TVV719Limits t
;
}¢--- DSN.TX.CASE(VV71UNL) cre=2010-09-30 mod=2011-01-10-09.48.21 A540769 ------
$**$>.jclSub()
$=stp=4
$=max=64
$=jx=0
$@do ct=1 by $stp to $max $@¢
$=von=- right(ct, 3, 0)
$=bis=- min(ct+$stp-1, $max)
$=jx=- right($jx+1, 2, 0)
say 'job'$jx $von '-' $bis
$@=¢
//YVVUNL$jx JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P$von.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
$!
$=dx= -1
$@do px = $von to $bis $@=¢
$=px=- right(px, 3, 0)
$=dx=- right($dx+1, 2, 0)
//SYSREC$dx DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P$px.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
$!
$@=¢
//SYSIN DD *
$!
$@do px = $von to $bis $@=¢
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = $px)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = $px)
order by vv719002 asc
;
$!
$!
$#out 20110110 09:47:59
//YVVUNL01 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P001.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P001.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P002.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P003.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P004.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 1)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 1)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 2)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 2)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 3)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 3)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 4)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 4)
order by vv719002 asc
;
//YVVUNL02 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P005.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P005.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P006.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P007.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P008.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 5)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 5)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 6)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 6)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 7)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 7)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 8)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 8)
order by vv719002 asc
;
//YVVUNL03 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P009.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P009.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P010.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P011.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P012.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 9)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 9)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 10)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 10)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 11)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 11)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 12)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 12)
order by vv719002 asc
;
//YVVUNL04 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P013.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P013.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P014.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P015.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P016.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 13)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 13)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 14)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 14)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 15)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 15)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 16)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 16)
order by vv719002 asc
;
//YVVUNL05 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P017.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P017.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P018.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P019.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P020.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 17)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 17)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 18)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 18)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 19)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 19)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 20)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 20)
order by vv719002 asc
;
//YVVUNL06 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P021.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P021.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P022.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P023.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P024.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 21)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 21)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 22)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 22)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 23)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 23)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 24)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 24)
order by vv719002 asc
;
//YVVUNL07 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P025.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P025.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P026.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P027.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P028.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 25)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 25)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 26)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 26)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 27)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 27)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 28)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 28)
order by vv719002 asc
;
//YVVUNL08 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P029.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P029.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P030.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P031.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P032.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 29)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 29)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 30)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 30)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 31)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 31)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 32)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 32)
order by vv719002 asc
;
//YVVUNL09 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P033.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P033.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P034.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P035.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P036.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 33)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 33)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 34)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 34)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 35)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 35)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 36)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 36)
order by vv719002 asc
;
//YVVUNL10 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P037.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P037.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P038.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P039.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P040.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 37)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 37)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 38)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 38)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 39)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 39)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 40)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 40)
order by vv719002 asc
;
//YVVUNL11 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P041.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P041.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P042.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P043.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P044.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 41)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 41)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 42)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 42)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 43)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 43)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 44)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 44)
order by vv719002 asc
;
//YVVUNL12 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P045.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P045.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P046.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P047.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P048.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 45)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 45)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 46)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 46)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 47)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 47)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 48)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 48)
order by vv719002 asc
;
//YVVUNL13 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P049.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P049.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P050.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P051.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P052.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 49)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 49)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 50)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 50)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 51)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 51)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 52)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 52)
order by vv719002 asc
;
//YVVUNL14 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P053.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P053.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P054.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P055.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P056.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 53)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 53)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 54)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 54)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 55)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 55)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 56)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 56)
order by vv719002 asc
;
//YVVUNL15 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P057.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P057.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P058.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P059.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P060.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 57)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 57)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 58)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 58)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 59)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 59)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 60)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 60)
order by vv719002 asc
;
//YVVUNL16 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P061.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P061.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P062.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P063.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P064.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 61)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 61)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 62)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 62)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 63)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 63)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 64)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 64)
order by vv719002 asc
;
$#out 20110110 09:46:08
}¢--- DSN.TX.CASE(VV71UNLJ) cre=2011-01-10 mod=2011-01-10-09.48.19 A540769 -----
//YVVUNL01 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P001.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P001.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P002.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P003.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P004.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 1)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 1)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 2)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 2)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 3)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 3)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 4)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 4)
order by vv719002 asc
;
//YVVUNL02 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P005.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P005.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P006.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P007.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P008.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 5)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 5)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 6)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 6)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 7)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 7)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 8)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 8)
order by vv719002 asc
;
//YVVUNL03 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P009.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P009.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P010.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P011.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P012.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 9)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 9)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 10)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 10)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 11)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 11)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 12)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 12)
order by vv719002 asc
;
//YVVUNL04 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P013.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P013.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P014.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P015.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P016.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 13)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 13)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 14)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 14)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 15)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 15)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 16)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 16)
order by vv719002 asc
;
//YVVUNL05 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P017.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P017.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P018.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P019.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P020.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 17)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 17)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 18)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 18)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 19)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 19)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 20)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 20)
order by vv719002 asc
;
//YVVUNL06 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P021.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P021.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P022.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P023.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P024.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 21)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 21)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 22)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 22)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 23)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 23)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 24)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 24)
order by vv719002 asc
;
//YVVUNL07 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P025.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P025.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P026.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P027.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P028.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 25)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 25)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 26)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 26)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 27)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 27)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 28)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 28)
order by vv719002 asc
;
//YVVUNL08 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P029.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P029.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P030.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P031.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P032.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 29)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 29)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 30)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 30)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 31)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 31)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 32)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 32)
order by vv719002 asc
;
//YVVUNL09 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P033.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P033.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P034.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P035.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P036.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 33)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 33)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 34)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 34)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 35)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 35)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 36)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 36)
order by vv719002 asc
;
//YVVUNL10 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P037.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P037.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P038.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P039.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P040.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 37)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 37)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 38)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 38)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 39)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 39)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 40)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 40)
order by vv719002 asc
;
//YVVUNL11 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P041.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P041.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P042.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P043.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P044.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 41)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 41)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 42)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 42)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 43)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 43)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 44)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 44)
order by vv719002 asc
;
//YVVUNL12 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P045.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P045.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P046.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P047.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P048.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 45)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 45)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 46)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 46)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 47)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 47)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 48)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 48)
order by vv719002 asc
;
//YVVUNL13 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P049.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P049.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P050.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P051.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P052.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 49)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 49)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 50)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 50)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 51)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 51)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 52)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 52)
order by vv719002 asc
;
//YVVUNL14 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P053.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P053.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P054.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P055.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P056.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 53)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 53)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 54)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 54)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 55)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 55)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 56)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 56)
order by vv719002 asc
;
//YVVUNL15 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P057.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P057.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P058.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P059.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P060.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 57)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 57)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 58)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 58)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 59)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 59)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 60)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 60)
order by vv719002 asc
;
//YVVUNL16 JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//P01 EXEC PGM=IKJEFT01,
// DYNAMNBR=200,
// TIME=99
//SYSTSIN DD *
DSN SYSTEM(DBOF)
RUN PROGRAM(DSNTIAUL) PARMS('SQL')
END
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM DD DUMMY
//SYSPUNCH DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P061.PUN,
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=4000),
// SPACE=(TRK,(1,1)),
// MGMTCLAS=COM#A064
//SYSREC00 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P061.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC01 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P062.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC02 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P063.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSREC03 DD DISP=(NEW,CATLG),DSN=DSN.VVUNL.DBOF.T719P064.UNL,
// SPACE=(CYL,(1000,500)),
// DCB=(RECFM=FB,BLKSIZE=31728),
// MGMTCLAS=COM#A064,DATACLAS=EYY0X
//SYSIN DD *
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 61)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 61)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 62)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 62)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 63)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 63)
order by vv719002 asc
;
select t.*
from oA1P.tvv719a1 t
where vv719002 > (select VV719002von
from A540769.TVV719Limits
where part = 64)
and vv719002 <= (select VV719002bis
from A540769.TVV719Limits
where part = 64)
order by vv719002 asc
;
}¢--- DSN.TX.CASE(WKA01) cre=2013-05-31 mod=2013-05-31-10.18.14 A540769 --------
creDb src 9
+ ok creDb DSN.TX.GENF(WKA01s9) ::f
creDb trg 0
+ ok creDb DSN.TX.GENF(WKA01t0) ::f
}¢--- DSN.TX.CASE(WKA01DDL) cre=2013-05-31 mod=2013-05-31-10.18.05 A540769 -----
set current sqlid = 'S100447';
drop TABLE $creator.twka01Act;
drop TABLE $creator.twka01Hist;
drop TABLESPACE $db.aa01h;
drop TABLESPACE $db.aa01a;
commit;
$@¢
if $phase >= 1 then $@=¢
CREATE TABLESPACE aa01a
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
SEGSIZE 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID UNICODE
DEFINE YES
MAXROWS 255
;
CREATE TABLESPACE aa01h
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
SEGSIZE 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID UNICODE
DEFINE YES
MAXROWS 255
;
commit;
CREATE TABLE $creator.twka01Act
(
id char(3) NOT NULL
, txt char(20) NOT NULL
, rowChg timestamp not null generated always
for each row on update as row change timestamp
, busTimFr date NOT NULL WITH DEFAULT
, busTimTo date NOT NULL WITH DEFAULT '31.12.9999'
$!
if $phase >= 2 then $@=¢
, period business_time (busTimFr, busTimTo)
, unique (id, business_time without overlaps)
$!
if $phase >= 3 then $@=¢
, rowBegin not null generated always as row begin
, rowEnd not null generated always as row end
, rowtrans not null generated always as transaction start id
$!
if $phase >= 4 then $@=¢
, period system_time (rowBegin, rowEnd)
$!
if $phase >= 1 then $@=¢
) in $db.aa01a
;
$!
if $phase >= 2 then $@=¢
CREATE UNIQUE INDEX $creator.iwka01Act1
ON $creator.twka01Act
(id, business_time without overlaps)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
;
$!
if $phase >= 1 then $@=¢
CREATE TABLE $creator.twka01Hist like $creator.twka01Act
in $db.aa01h
;
$!
if $phase >= 6 then $@=¢
alter table $creator.twka01Act add versioning
use history table $creator.twka01Hist
;
$!
if $phase >= 1 then $@=¢
commit;
insert into $creator.twka01Act (id, txt, busTimFr)
values ('a', ' von 1.1', '01.01.2013');
update $creator.twka01Act set busTimTo = '01.02.2013',
txt = 'alter to 1.2'
where id = 'a';
insert into $creator.twka01Act (id, txt, busTimFr)
values ('a', 'von 1.2', '01.02.2013');
select * from $creator.twka01Act;
select * from $creator.twka01Hist;
select * from $creator.twka01Act
for system_time from '1900-01-01-00.00.00'
to '9999-12-31-24.00.00' ;
insert into $creator.twka01Act (id, txt, busTimFr)
values ('b', ' von 1.1', '01.01.2013');
commit;
update $creator.twka01Act set busTimTo = '01.02.2013',
txt = 'alter to 1.2'
where id = 'b';
commit;
insert into $creator.twka01Act (id, txt, busTimFr)
values ('b', 'von 1.2', '01.02.2013');
commit;
select * from $creator.twka01Act;
select * from $creator.twka01Act
for system_time from '1900-01-01-00.00.00'
to '9999-12-31-24.00.00' ;
$*(
xnsert into $creator.tBiPaCo2 (colls, seq, txt, qua, busTimFr)
values ('defIns', 1, 'AV','', '01.02.2011');
insert into $creator.tBiPaCo2 (colls, seq, txt, qua, busTimFr)
values ('defIns', 1, 'AV','', '01.02.2011');
select * from $creator.tBiPaCo2;
select * from $creator.tBiPaCoH;
select * from $creator.tBiPaCo2
for business_time as of '30.05.1997' ;
select * from $creator.tBiPaCo2
for business_time as of '31.12.1999' ;
select * from $creator.tBiPaCo2
for business_time as of '01.01.2000' ;
select * from $creator.tBiPaCo2
for business_time as of '31.01.2011' ;
select * from $creator.tBiPaCo2
for business_time as of '01.02.2011' ;
select * from $creator.tBiPaCo2
for business_time as of '02.02.2011' ;
$*)
$!
$!
}¢--- DSN.TX.CASE(WKA01SEL) cre=2013-05-31 mod=2013-05-31-09.33.44 A540769 -----
select * from A540769.twka01Act;
select * from A540769.twka01Hist;
select * from A540769.twka01Act for business_time as of '31.12.2012';
select * from A540769.twka01Act for business_time as of '01.01.2013';
select * from A540769.twka01Act for business_time as of '31.01.2013';
select * from A540769.twka01Act for business_time as of '01.02.2013';
select * from A540769.twka01Act for business_time as of '02.02.2013';
select * from A540769.twka01Act
for business_time between '01.12.2012' and '31.12.2012';
select * from A540769.twka01Act
for business_time between '01.12.2012' and '01.01.2013';
select * from A540769.twka01Act
for business_time between '01.12.2012' and '02.01.2013';
select * from A540769.twka01Act
for business_time between '01.12.2012' and '31.01.2013';
select * from A540769.twka01Act
for business_time between '01.12.2012' and '01.02.2013';
select * from A540769.twka01Act
for business_time from '01.12.2012' to '31.12.2012';
select * from A540769.twka01Act
for business_time from '01.12.2012' to '01.01.2013';
select * from A540769.twka01Act
for business_time from '01.12.2012' to '02.01.2013';
select * from A540769.twka01Act
for business_time from '01.12.2012' to '31.01.2013';
select * from A540769.twka01Act
for business_time from '01.12.2012' to '01.02.2013';
select * from A540769.twka01Act
for business_time from '01.12.2012' to '02.02.2013';
select * from A540769.twka01Act
for business_time from '01.01.1900'
to '31.12.9999';
select * from A540769.twka01Act
for system_time from '1900-01-01-00.00.00'
to '9999-12-30-23.59.00' ;
}¢--- DSN.TX.CASE(WK000) cre=2011-12-13 mod=2011-12-13-10.16.22 A540769 --------
* database erstellten$
creDb src 1
creDb trg 1
}¢--- DSN.TX.CASE(WK000DDL) cre=2011-12-13 mod=2011-12-13-10.17.06 A540769 -----
SET CURRENT SQLID='S100447';
CREATE DATABASE $db
BUFFERPOOL BP2
INDEXBP BP1
CCSID EBCDIC
STOGROUP GSMS;
COMMIT;
}¢--- DSN.TX.CASE(WK401) cre=2010-05-31 mod=2016-06-13-16.49.41 A540769 --------
* 0 -> 1 create table+index
* 1 -> 2 Feldverkürzung
* 2 -> 3 Feldverlängerung
* 1 -> 3 Feldverlängerung
*
*
*
* Sequenz von Nachträgen zum Testen des AdminTools
* 01) wk401dd1
* 02) compare dgdb9998.a401a mit leerem Trg ==> dbaf und durchführen
* 03) wk401dda --> Daten ins Dbaf
*
* 11) wk401dd2 Feld Verkürzung, index rename
* 12) compare dgdb9xc .a401a mit dA540769.a401, import dbaf run
*
* 15) import dbtf, run ==> beide gemergt, gibt neue table
*
* 21) wk401dd3 Feld Verlängerung
* 22) compare dgdb9998.a401a mit dA540769.a401
* 23) mehrmals compare und ändern
* 24) import dbaf durchführen
* 25) nochmals ändern und i =
* 26) ausführen im dbaf
creDb trg 1
+ ok creDb DSN.TX.GENF(WK401t1) ::f
credb src 3
+ ok creDb DSN.TX.GENF(WK401s3) ::f
manual dbx c dgdb9998.a401A, dbx i dbaf, ana, run
+ wait dbx c dgdb9998.a401A, dbx i dbaf, ana, run
creDb trg 1
creDb src 2
manual dbx c dgdb9998.a401A, dbx i dbaf, ana, run
creDb trg 2
creDb src 3
manual dbx c dgdb9998.a401A, dbx i dbaf, ana, run
* direkter Uebergang von 1 auf 3 (ohne drop ...)
creDb trg 2
creDb src 3
}¢--- DSN.TX.CASE(WK401A) cre= mod= --------------------------------------------
* 0 -> 1 create table+index
* 1 -> 2 Feldverkürzung, index create
* 2 -> 3 Feldverlängerung
* 1 -> 3 Feldverlängerung index create
*
* 10 -> 21 add index
* 10 -> 22 append column
* 10 -> 23 append column columName len 30
* 10 -> 24 add view with long text
* 10 -> 31 index add column
* 10 -> 32 index add include
* 10 -> 41 classic -> pbg
* 10 -> 42 add primary key constraint
credb src 24
+ ok creDb DSN.TX.GENF(WK401s24) ::f
creDb trg 10
+ ok creDb DSN.TX.GENF(WK401t10) ::f
}¢--- DSN.TX.CASE(WK401ALT) cre=2015-04-20 mod=2015-04-20-12.25.59 A540769 -----
set current sqlid = 'S100447';
alter tablespace QZ91A1S.a401a maxPartitions 5;
alter tablespace QZ91A1S.a401a dsSize 16G;
alter tablespace QZ91A1S.a401a segsize 32;
}¢--- DSN.TX.CASE(WK401B) cre=2013-01-19 mod=2013-01-19-18.46.50 A540769 -------
* alter timestamp precision
creDb trg 3
+ ok creDb DSN.TX.GENF(WK401t3) ::f
creDb src 4
+ ok creDb DSN.TX.GENF(WK401s4) ::f
}¢--- DSN.TX.CASE(WK401C) cre=2014-09-22 mod=2015-09-03-10.36.34 A540769 -------
* alter timestamp precision
creDb trg 1
+ ok creDb DSN.TX.GENF(WK401t1) ::f
creDb src 41
+ ok creDb DSN.TX.GENF(WK401s41) ::f
}¢--- DSN.TX.CASE(WK401DDL) cre=2010-05-31 mod=2016-05-30-10.23.23 A540769 -----
SET CURRENT SQLID='S100447';
SET CURRENT SCHEMA='$creator';
drop tablespace $db.A401A;
drop tablespace $db.awk401A;
commit;
$@ if $phase > 0 then $@=/phaseGtr0/
CREATE TABLESPACE aWk401a
IN $db
USING STOGROUP GSMS
PRIQTY 48 SECQTY 100
ERASE NO
$@ if $phase <> 41 then $@=¢
FREEPAGE 0 PCTFREE 10
COMPRESS YES
MAXROWS 255
$! $@ else $@=¢
FREEPAGE 41 PCTFREE 41
COMPRESS no
MAXROWS 41
$!
GBPCACHE CHANGED
TRACKMOD YES
SEGSIZE $-¢if($phase = 2, 8, 64)$!
$-¢if($phase =41, MAXPARTITIONS 5)$!
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
CCSID EBCDIC
DEFINE YES
;
create TABLE $creator.Tqz91wk401A
(
$@¢
if $phase = 1 then $@=¢
wk401CH20 VARCHAR(20) FOR SBCS DATA not null with default
$! else if $phase = 2 then $@=¢
wk401CH20 VARCHAR(12) FOR SBCS DATA not null with default
$! else if $phase >= 3 then $@=¢
wk401CH20 VARCHAR(22) FOR SBCS DATA not null with default
$!
$!
, wk401CH5 CHAR(5) FOR SBCS DATA not null with default
, wk401CH2 CHAR(2) FOR SBCS DATA not null with default
, wk401TST TIMESTAMP not null with default
$@ if $phase = 22 then $@=¢
, wk401CHApp CHAR(5) FOR SBCS DATA not null with default
$!
$@ if $phase = 23 then $@=¢
, wk401CHlength30lll20abcdefgh30
CHAR(5) FOR SBCS DATA not null with default
$!
$@ if $phase = 42 then $@=¢
, primary key (wk401CH20)
$!
)
IN $db.aWk401a
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE
;
$@¢
if $phase = 1 then $@=¢
CREATE UNIQUE INDEX $creator.Iqz91wk401A0
$! else $@=¢
CREATE UNIQUE INDEX $creator.Iqz91wk401A1
$!
$!
ON $creator.Tqz91wk401A
( wk401CH20 ASC
$@ if $phase = 31 then $@=¢
, wk401CH5 ASC
$!
)
$@ if $phase = 32 then $@=¢
include (wk401Tst )
$!
USING STOGROUP GSMS
PRIQTY 12 SECQTY 12
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 2 G
;
$@ if $phase = 21 then $@=¢
CREATE INDEX $creator.Iqz91wk401A2
ON $creator.Tqz91wk401A
( wk401CH2 ASC)
USING STOGROUP GSMS
PRIQTY 12 SECQTY 12
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 2 G
;
$!
$@ if $phase = 4 then $@=¢
ALTER TABLE $creator.Tqz91wk401A
ALTER WK401TST SET DATA TYPE TIMESTAMP(10);
commit;
$!
$@ if $phase >= 3 then $@=¢
CREATE view $creator.vqz91wk401A1 as
select * from $creator.tqz91wk401A
;
CREATE view $creator.vqz91wk401A2 as
select * from $creator.vqz91wk401A1
;
$!
$@ if $phase = 24 then $@=¢
CREATE view $creator.vqz91wk401A24 as
select 'wk401CH20=' || wk401CH20 || ', wk401CH5=' || wk401CH5
|| ' longStringConstant 30 longer 40 longer 50 longer 6
0 longer 70 longer 80 longer 90 longer100 longer110 longer120 longer130
longer140 longer150 longer160 longer170' || ', wk401CH2='||wk401CH2 ll
from $creator.vqz91wk401A2
;
$!
commit
;
insert into $creator.Tqz91wk401A
(wk401ch20, wk401ch5, wk401ch2, wk401tst ) values
('erstens', 'e' , '1' , current timestamp );
insert into $creator.Tqz91wk401A
(wk401ch20, wk401ch5, wk401ch2, wk401tst ) values
('zweitens', 'zw', '2' , current timestamp - 2 minute);
insert into $creator.Tqz91wk401A
(wk401ch20, wk401ch5, wk401ch2, wk401tst ) values
('drittens', 'dre', '3', current timestamp - 3 hours);
insert into $creator.Tqz91wk401A
(wk401ch20, wk401ch5, wk401ch2, wk401tst ) values
('viertens', 'vier', '4', current timestamp - 4 days);
insert into $creator.Tqz91wk401A
(wk401ch20, wk401ch5, wk401ch2, wk401tst ) values
('fuenftens', 'fuenf', '5' , current timestamp - 5 months );
commit
;
$/phaseGtr0/
}¢--- DSN.TX.CASE(WK401INS) cre=2014-09-22 mod=2016-06-03-08.28.42 A540769 -----
insert into qz92crt.TQZ91WK401A
select left(name, 20), left(name, 5), left(name, 2), createdTs
from sysibm.sysColumns
fetch first 10 rows only
;
}¢--- DSN.TX.CASE(WK401SEL) cre=2010-05-31 mod=2016-06-03-08.29.04 A540769 -----
select * from qz92crt.TQZ91WK401A
}¢--- DSN.TX.CASE(WK402) cre=2012-09-24 mod=2016-06-01-13.58.55 A540769 --------
* Sequenz von Nachträgen zum Testen des changeProcesses
* trg src
* 0 1 neu erstellen
* Korrektur Prototype segSize, *qty, bp, compress
* 1 1
* wie vergleichen, dass obige korrekturen nicht rückgängig
* 1 2
* feld wk420ch20 verkürzen, view anfügen
* 2 3
* feld wk420ch20 verlängern, ix und view on view anfügen
* 1 3
* feld wk420ch20 verlängern, ix und views anfügen
creDb trg 0
+ ok creDb DSN.TX.GENF(WK402t0) ::f
credb src 1
+ ok creDb DSN.TX.GENF(WK402s1) ::f
creDb trg 1
+ ok creDb DSN.TX.GENF(WK402t1) ::f
creDb src 2
+ ok creDb DSN.TX.GENF(WK402s2) ::f
manual test
+ wait test
creDb trg 2
creDb src 3
manual dbx c dgdb9998.a402A, dbx i dbaf, ana, run
* direkter Uebergang von 1 auf 3 (ohne drop ...)
creDb trg 1
creDb src 3
}¢--- DSN.TX.CASE(WK402DDL) cre=2012-09-24 mod=2012-09-24-15.28.23 A540769 -----
SET CURRENT SQLID='S100447';
SET CURRENT SCHEMA='$creator';
drop tablespace $db.A402A;
commit;
$@¢
if $phase > 0 then $@=¢
CREATE TABLESPACE A402A
IN $db
USING STOGROUP GSMS
$@¢
if $env = 'src' then $@=¢
PRIQTY 48 SECQTY 100
ERASE NO
SEGSIZE 8
COMPRESS NO
BUFFERPOOL BP0
$! else $@=¢
PRIQTY -1 SECQTY -1
ERASE NO
SEGSIZE 64
COMPRESS YES
BUFFERPOOL BP2
$!
$!
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255;
--
CREATE TABLE $creator.Twk402A
(
$@¢
if $phase = 1 then $@=¢
wk402CH20 CHAR(20) FOR SBCS DATA not null with default,
$! else if $phase = 2 then $@=¢
wk402CH20 CHAR(12) FOR SBCS DATA not null with default,
$! else if $phase = 3 then $@=¢
wk402CH20 CHAR(22) FOR SBCS DATA not null with default,
$!
$!
wk402CH5 CHAR(5) FOR SBCS DATA not null with default,
wk402CH2 CHAR(2) FOR SBCS DATA not null with default,
wk402TST TIMESTAMP not null with default )
IN $db.A402A
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
--
$@¢
if $phase > 0 then $@=¢
CREATE INDEX $creator.Iwk402A0
$! else $@=¢
CREATE INDEX $creator.Iwk402A1
$!
$!
ON $creator.Twk402A
(wk402CH20 ASC)
USING STOGROUP GSMS
$@¢
if $env = 'src' then $@=¢
PRIQTY 12 SECQTY 12
ERASE NO
BUFFERPOOL BP2
$! else $@=¢
PRIQTY -1 SECQTY -1
ERASE NO
BUFFERPOOL BP1
$!
$!
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 2 G;
--
$@¢ if $phase >= 3 then $@=¢
CREATE INDEX $creator.Iwk402A3
ON $creator.Twk402A
(wk402CH5 asc, wk402tst desC)
USING STOGROUP GSMS
$@¢
if $env = 'src' then $@=¢
PRIQTY 12 SECQTY 12
ERASE NO
BUFFERPOOL BP2
$! else $@=¢
PRIQTY -1 SECQTY -1
ERASE NO
BUFFERPOOL BP1
$!
$!
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 2 G;
$!
$!
$@¢
if $phase > 0 then $@=¢
insert into $creator.Twk402A values
('erstens', 'e', '1', current timestamp );
insert into $creator.Twk402A values
('zweitens', 'zw', '2', current timestamp );
insert into $creator.Twk402A values
('drittens', 'dre', '3', current timestamp );
insert into $creator.Twk402A values
('viertens', 'vier', '4', current timestamp );
insert into $creator.Twk402A values
('fuenftens', 'fuenf', '5', current timestamp );
$!
$!
$@¢
if $phase >= 2 then $@=¢
CREATE view $creator.vwk402ATwo as
select * from $creator.twk402A ;
$!
if $phase >= 3 then $@=¢
CREATE view $creator.vwk402AThree as
select * from $creator.vwk402ATwo ;
$!
$!
COMMIT;
--
$!
$!
}¢--- DSN.TX.CASE(WK402SEL) cre=2012-09-24 mod=2012-09-24-15.22.21 A540769 -----
select * from A540769.twk402a ;
select * from gdb9998.twk402a ;
}¢--- DSN.TX.CASE(WK403) cre=2016-03-14 mod=2016-03-15-09.05.10 A540769 --------
* test naming old/new for db/table/index/view/ri
* override priqty, secqty, segsize compress
*
* $phase 1
* alter tb, add view *2, index *2, ri on name
* $phase 2
* drop/re tb, add view *3, index *3, ri *3
* $phase 3
* drop/re tb, t1 only - all check done?
* auch p1 only....
* $phase 4
* >0 alter, <0 drop, =0 no change
=delta= -3
credb src 1
+ ok creDb DSN.TX.GENF(WK403s1) ::f
credb trg 0
+ ok creDb DSN.TX.GENF(WK403t0) ::f
manual dbx create new objects
+ok it dbx create new objects
credb src 2
+ ok creDb DSN.TX.GENF(WK403s2) ::f
credb trg 1
+ ok creDb DSN.TX.GENF(WK403t1) ::f
manual dbx alter and create new
+ ok dbx alter and create new
credb src 3
+ ok creDb DSN.TX.GENF(WK403s3) ::f
credb trg 2
+ ok creDb DSN.TX.GENF(WK403t2) ::f
manual dbx c
+ wait dbx c
credb src 4
credb trg 3
}¢--- DSN.TX.CASE(WK403CHE) cre=2012-12-17 mod=2012-12-17-15.52.00 A540769 -----
//A540769C JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG0
//*
//***************************************************
//* CREATED BY : A540769
//* TIMESTAMP : 06/20/2006.09.40.21
//* ENVIRONMENT: ISPF 5.7MVS TSO
//* RELEASE : V7.4.02 08/31/2004
//* DB2 VERSION: 810
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,
// PARM=(DBAF,'A540769C.CHECK'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DBAF.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
CHECK DATA
TABLESPACE DA540769.A403P1 ,
TABLESPACE DA540769.A403P2 ,
TABLESPACE DA540769.A403P3
SHRLEVEL REFERENCE
SCOPE ALL
WORKDDN(TSYUTD, TSOUTD) ERRDDN TERRD
SORTDEVT DISK -- SORTNUM 32
}¢--- DSN.TX.CASE(WK403CHK) cre=2013-02-06 mod=2013-02-06-17.05.29 A540769 -----
//A540769C JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//***************************************************
//* CREATED BY : A540769
//* TIMESTAMP : 06/20/2006.09.40.21
//* ENVIRONMENT: ISPF 5.7MVS TSO
//* RELEASE : V7.4.02 08/31/2004
//* DB2 VERSION: 810
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,
// PARM=(DBAF,'A540769C.CHECK'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DBAF.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
CHECK DATA
TABLESPACE DA540769.A403P1 ,
TABLESPACE DA540769.A403P2 ,
TABLESPACE DA540769.A403P3
SHRLEVEL REFERENCE
SCOPE PENDING
WORKDDN(TSYUTD, TSOUTD) ERRDDN TERRD
SORTDEVT DISK
}¢--- DSN.TX.CASE(WK403DDL) cre=2012-11-08 mod=2016-03-14-08.17.28 A540769 -----
SET CURRENT SQLID='S100447';
SET CURRENT SCHEMA='$creator';
drop tablespace $db.A403P1;
drop tablespace $db.A403P2;
drop tablespace $db.A403P3;
drop tablespace $db.A403P4;
drop tablespace $db.WK403P1;
drop tablespace $db.WK403P2;
drop tablespace $db.WK403P3;
drop tablespace $db.WK403P4;
commit;
$@¢
if $env = 'src' then $@¢
$=qty=48
$=segsz=8
$=comp=NO
$=ixbp=BP7
$=tsbp=BP7
$! else $@¢
$=qty= -1
$=segsz=64
$=comp=YES
$=ixbp=BP1
$=tsbp=BP2
$!
$=pha3=- min(3,$phase)
$=nameL=- 20 + $delta * $pha3
$=textA=- 30 + $delta * $pha3
$=text1=- 30 + $delta * $phase
$$ -- env=$env phase=$phase qty=$qty segsz=$segsz comp=$comp
$@do px=1 to $pha3 $@=/phase/
$=textL=- if($px=1, $text1, $textA)
$=bp =- if($px<3,BP$px,BP32K)
-- px=$px ixbp=$ixbp tsbp=$tsbp nameL=$nameL textL=$textL
CREATE TABLESPACE WK403P$px
IN $db
USING STOGROUP GSMS
PRIQTY $qty SECQTY $qty
ERASE NO
SEGSIZE $segsz
COMPRESS $comp
BUFFERPOOL $bp
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
CCSID EBCDIC
DEFINE YES
MAXROWS 123;
CREATE TABLE $creator.Tqz91wk403P$px
(
id int not null
, name char($nameL) FOR SBCS DATA not null
, text char($textL) FOR SBCS DATA not null
, parent int
, par2 int
, wk403TST TIMESTAMP not null with default
, primary key (id)
)
IN $db.wk403P$px
with restrict on drop
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
CREATE unique INDEX $creator.Iqz91wk403P${px}1
ON $creator.Tqz91wk403P$px
(id asc) include(name)
USING STOGROUP GSMS
PRIQTY $qty SECQTY $qty
ERASE NO
BUFFERPOOL $bp
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
CLUSTER
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 2 G;
CREATE unique INDEX $creator.Iqz91wk403P${px}p1
ON $creator.Tqz91wk403P$px
(id asc) include(name)
USING STOGROUP GSMS
PRIQTY $qty SECQTY $qty
ERASE NO
BUFFERPOOL $bp
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
not CLUSTER
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 1 G;
$*(
CREATE unique INDEX $creator.Iqz91wk403P${px}p2
ON $creator.Tqz91wk403P$px
(id asc) include(name)
USING STOGROUP GSMS
PRIQTY $qty SECQTY $qty
ERASE NO
BUFFERPOOL $bp
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
not CLUSTER
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 2 G;
CREATE unique INDEX $creator.Iqz91wk403P${px}p4
ON $creator.Tqz91wk403P$px
(id asc) include(name)
USING STOGROUP GSMS
PRIQTY $qty SECQTY $qty
ERASE NO
BUFFERPOOL $bp
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
not CLUSTER
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 4 G;
$*)
$@¢
if $phase >= 2 then $@=¢
CREATE INDEX $creator.Iqz91wk403P${px}Changing
ON $creator.Tqz91wk403P$px
($-¢word(parent par2 text, $pha3//3 + 1)$! asc)
USING STOGROUP GSMS
PRIQTY $qty SECQTY $qty
ERASE NO
BUFFERPOOL $ixbp
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 2 G;
$!
if $phase >= 3 then $@=¢
CREATE INDEX $creator.Iqz91wk403P${px}3
ON $creator.Tqz91wk403P$px
(name asc)
USING STOGROUP GSMS
PRIQTY $qty SECQTY $qty
ERASE NO
BUFFERPOOL $ixbp
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 2 G;
$!
$!
$@do py=1 to $px $@=¢
alter table $creator.tqz91wk403P$px add constraint for${px}to$py
foreign key(parent)references $creator.tqz91wk403P$py
on delete cascade ;
$!
alter table $creator.tqz91wk403P$px add constraint for${px}changing
foreign key(par2)references
$creator.tqz91wk403P$-¢$pha3 // $px + 1$!
on delete cascade ;
$@do py=1 to $px $@=¢
CREATE view $creator.vqz91wk403ComC${px}P$py as
select c.*, p.name paCh${px}Pa${py}
from $creator.tqz91wk403P$px c
left join $creator.tqz91wk403P$py p
on c.parent = p.id ;
$!
CREATE view $creator.vqz91wk403P${px}TXTCHANGING as
select c.*, p.name paCh${px}Ph$pha3
from $creator.tqz91wk403P$px c
left join $creator.tqz91wk403P$px p
on c.parent = p.id ;
CREATE view $creator.vqz91wk403P${px}changing as
select c.*, p.name paCh${px}
from $creator.tqz91wk403P$px c
left join $creator.tqz91wk403P$-¢$pha3 // $px + 1$! p
on c.parent = p.id ;
insert into $creator.Tqz91wk403P$px (id,name,text) values
(1, 'walter$px', 'waPha$pha3 tb$px id1');
insert into $creator.Tqz91wk403P$px (id,name,text, parent) values
(2, 'gregor$px', 'grPha$pha3 tb$px id2', 1);
insert into $creator.Tqz91wk403P$px (id,name,text, parent) values
(3, 'david$px', 'daPha$pha3 tb$px id3', 1);
insert into $creator.Tqz91wk403P$px (id,name,text, parent) values
(4, 'hori$px', 'hoPha$pha3 tb$px id4', 1);
insert into $creator.Tqz91wk403P$px (id,name,text, parent) values
(5, 'gabriel$px', 'gaPha$pha3 tb$px id5', 4);
update $creator.Tqz91wk403P$px set par2 = parent ;
$/phase/
if $phase = 3 then $@=¢
create view $creator.vqz91wk403Joining as
select p1.* from $creator.Tqz91wk403P1 p1
;
$! else if $phase > 3 then $@=¢
create view $creator.vqz91wk403Joining as
select c1.ibmReqD, c2.dbid, p1.*
from sysibm.sysDummy1 c1
inner join sysibm.sysDatabase c2 on c2.name = c1.ibmReqD
inner join sysibm.sysTables c3 on c3.dbName = c2.name
inner join $creator.Tqz91wk403P1 p1 on p1.Name = c3.name
;
$!
$!
commit;
}¢--- DSN.TX.CASE(WK403DRB) cre=2012-11-08 mod=2012-11-09-09.40.12 A540769 -----
set current sqlid = 'S100447';
drop tablespace dA54076b.A403P1; COMMIT;
drop tablespace dA54076b.A403P2; COMMIT;
drop tablespace dA54076b.A403P3; COMMIT;
drop view A540769b.vwk403c1p1; COMMIT;
}¢--- DSN.TX.CASE(WK403SEL) cre=2012-11-08 mod=2013-01-24-21.23.40 A540769 -----
select * from A540769.vwk403comc1p1;
select * from A540769.vwk403comc2p1;
select * from A540769.vwk403comc2p2;
}¢--- DSN.TX.CASE(WK576) cre=2009-08-18 mod=2009-08-18-14.39.12 A540769 --------
=DQ0G=1
credb trg 1
+ ok creDb A540769.TX.GENF(WK576t1)
credb src 2
+ ok creDb A540769.TX.GENF(WK576s2)
* dbx ...run
* check credb trg 2
creDb src 3
+ ok creDb A540769.TX.GENF(WK576s3)
credb trg 1
+ ok creDb A540769.TX.GENF(WK576t1)
manual
+ wait
* absturz im merge
zuerst dds, dann ddr -> zwei interessante Merge, die keinen Drop machen
sollten
a) wk576dds, wk576ddt compare dgdb9998.a576*, import execute
b) wk576ddr compare dgdb9998.a576*, import execute
(wk576ddu gibt gleichen Stand für Target)
c) wk576dds import a+b, execute (sollte keine drop machen|)
}¢--- DSN.TX.CASE(WK576A) cre=2009-08-18 mod=2009-08-20-10.16.20 A540769 -------
=DQ0G=1
creDb trg 1
+ok
creDb src 2
+ok
manual dbx c and i (avoid override of cdl 0)
+ ok t dbx c and i (avoid override of cdl 0)
credb trg 2
+ ok creDb A540769.TX.GENF(WK576t2)
credb src 3
+ ok creDb A540769.TX.GENF(WK576s3)
manual dbx c import 0+1
+ wait dbx c import 0+1
creDb trg 1
manual ana run -> should be no drop but empty change
}¢--- DSN.TX.CASE(WK576B) cre=2009-08-20 mod=2009-11-26-16.14.28 A540769 -------
* test import mask
nop
= trgDb = DQ540769
=DQ0G=1
creDb trg 0
+ ok creDb A540769.TX.GENF(WK576t0)
creDb src 2
+ ok creDb A540769.TX.GENF(WK576s2)
* dbx c and i mit mask twala2q
* drop database DQ540769 --> wk576DB in spufi
+ ok creDb A540769.TX.GENF(WK576t0)
* ana --> error database does not exist
* create database DQ540769 --> wk576DB in spufi
* ana, run
manual dbx c mit mask twalp2q --> should find no differences
+ wait dbx c mit mask twalp2q --> should find no differences
credb trg 2
credb src 3
* dbx c import (with mask twalProt) and dbx i (mask twala2q)
* ana run
manual dbx c mit mask twalp2q --> should find no differences
}¢--- DSN.TX.CASE(WK576C) cre=2009-10-01 mod=2009-11-26-16.30.46 A540769 -------
=DQ0G=1
* test merge 2 cdl
creDb trg 1
+ ok creDb A540769.TX.GENF(WK576t1)
creDb src 2
+ ok creDb A540769.TX.GENF(WK576s2)
manual dbx c and i mit mask DBTWAL
+ ok t dbx c and i mit mask DBTWAL
credb trg 2
+ ok creDb A540769.TX.GENF(WK576t2)
credb src 3
+ ok creDb A540769.TX.GENF(WK576s3)
manual dbx c and i letzte 2 cdls mit mask DBTWAL
+ ok t dbx c and i letzte 2 cdls mit mask DBTWAL
* target auf alten Stand zurückstellen , damit analyze funktioniert
creDb trg 1
+ ok creDb A540769.TX.GENF(WK576t1)
* ana run
manual check nur alter kein drop
+ wait check nur alter kein drop
dbx c vergleich dass wieder alles gleich
}¢--- DSN.TX.CASE(WK576DB) cre=2009-11-26 mod=2009-11-26-16.08.08 A540769 ------
SET CURRENT SQLID='S100447';
-- ödrop database DQ540769;
commit;
-- x
CREATE DATABASE DQ540769
BUFFERPOOL BP2
INDEXBP BP1
CCSID EBCDIC
STOGROUP GSMS;
COMMIT;
}¢--- DSN.TX.CASE(WK576DDL) cre=2009-08-18 mod=2009-11-26-14.35.42 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
drop TABLESPACE $db.A576A ;
drop TABLESPACE $db.A576B ;
commit;
$@¢
if $phase > 0 then $@=¢
------------------------------------------------------------------------
CREATE TABLESPACE A576A
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 5 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255 SEGSIZE 64
;
CREATE TABLE $creator.TWK576A1
(WB510001 CHAR(4) FOR SBCS DATA NOT NULL,
WB510002 CHAR(12) FOR SBCS DATA NOT NULL,
WB510003 CHAR(1) FOR SBCS DATA NOT NULL,
WB510004 CHAR(20) FOR SBCS DATA NOT NULL,
WB510005 CHAR(5) FOR SBCS DATA NOT NULL,
WB510006 CHAR(3) FOR SBCS DATA NOT NULL,
WB510007 DECIMAL(15, 3) NOT NULL,
WB510008 DECIMAL(15, 3) NOT NULL,
WB510009 DECIMAL(13, 5) NOT NULL,
WB510010 CHAR(2) FOR SBCS DATA NOT NULL,
WB510011 CHAR(8) FOR SBCS DATA NOT NULL,
WB510012 CHAR(3) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WB510013 DATE NOT NULL WITH DEFAULT,
WB510014 TIMESTAMP NOT NULL,
WB510015 TIMESTAMP NOT NULL,
WB510016 CHAR(64) FOR BIT DATA NOT NULL,
WB510017 CHAR(64) FOR BIT DATA NOT NULL,
WB510018 DECIMAL(13, 5) NOT NULL WITH DEFAULT,
WB510019 DATE NOT NULL WITH DEFAULT,
WB510020 CHAR(2) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WB510021 CHAR(13) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WB510022 CHAR(4) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WB510023 CHAR(4) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WB510024 CHAR(13) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WB510025 CHAR(3) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WB510026 DATE NOT NULL WITH DEFAULT,
WB510027 DATE NOT NULL WITH DEFAULT,
WB510028 DATE NOT NULL WITH DEFAULT,
WB510029 CHAR(2) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WB510030 DATE NOT NULL WITH DEFAULT,
WB510031 CHAR(2) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WB510032 TIMESTAMP NOT NULL WITH DEFAULT
$@¢
if $phase = 2 then $@=¢
, WB510033 CHAR(10) FOR SBCS DATA NOT NULL
WITH DEFAULT
$** , WB510034 CHAR(10) FOR SBCS DATA NOT NULL
$! else if $phase >= 2 then $@=¢
$** , WB510033bef CHAR(22) FOR SBCS DATA NOT NULL
$** WITH DEFAULT
, WB510033 CHAR(2) FOR SBCS DATA NOT NULL
WITH DEFAULT
$** , WB510034 CHAR(7) FOR SBCS DATA NOT NULL
$** WITH DEFAULT
$!
$!
, PRIMARY KEY (WB510004)
)
IN $db.A576A
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
COMMENT ON TABLE $creator.TWK576A1
IS 'Order Daten WS80-Börse (P90-Extrakt)';
LABEL ON $creator.TWK576A1
(
$@¢
if $phase >= 2 then $@=¢
WB510033 IS 'ACTION_ID',
$!
$!
WB510032 IS 'TS_MUTATION',
WB510031 IS 'LAUFNR_GA90',
WB510030 IS 'STATUS_61_DATE',
WB510029 IS 'ANZAHL_GA90',
WB510028 IS 'NEXT_VERARB',
WB510027 IS 'LAST_VERARB',
WB510026 IS 'PFLEGE_DATE',
WB510025 IS 'DEPOT_ART_KEY',
WB510024 IS 'DEPOT',
WB510023 IS 'INT_HANDELSBKST',
WB510022 IS 'KUND_BKST',
WB510021 IS 'DEPOT_EBSTA',
WB510020 IS 'AUFTR_PHASE',
WB510019 IS 'REKAP_DATE',
WB510018 IS 'LIMITE_AUSLOESUNG',
WB510017 IS 'STATUS',
WB510016 IS 'EIGENSCHAFT',
WB510015 IS 'TS_INSERT',
WB510014 IS 'EINGANGSZEIT',
WB510013 IS 'GUELTIG_BIS',
WB510012 IS 'BOERSENPLATZ',
WB510011 IS 'AUFTRAGSART',
WB510010 IS 'LIQ_ULTIMO',
WB510009 IS 'LIMITE',
WB510008 IS 'PRAEMIE_AUFTRAG',
WB510007 IS 'NOMINAL_STUECK',
WB510006 IS 'GESCHAEFTSART',
WB510005 IS 'HANDELSKREIS',
WB510004 IS 'AUFTRAGSNUMMER',
WB510003 IS 'INT_HANDELSSTELLE',
WB510002 IS 'VALORENNUMMER',
WB510001 IS 'ABWICKLUNGSBKST');
--
COMMIT;
CREATE INDEX $creator.IWK576A3
ON $creator.TWK576A1
(WB510001 ASC,
WB510003 ASC,
WB510004 ASC,
WB510005 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 2 G;
--
COMMIT;
--
------------------------------------------------------------------------
-- Database=$db
-- Index=$creator.IWK576A1 On $creator.TWK576A1
------------------------------------------------------------------------
--
CREATE INDEX $creator.IWK576A1
ON $creator.TWK576A1
(WB510003 ASC,
WB510001 ASC,
WB510005 ASC,
WB510002 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
------------------------------------------------------------------------
CREATE INDEX $creator.IWK576A2
ON $creator.TWK576A1
(WB510002 ASC,
WB510001 ASC,
WB510003 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
------------------------------------------------------------------------
CREATE INDEX $creator.IWK576A4
ON $creator.TWK576A1
(WB510012 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
------------------------------------------------------------------------
CREATE INDEX $creator.IWK576A5
ON $creator.TWK576A1
(WB510005 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
------------------------------------------------------------------------
CREATE UNIQUE INDEX $creator.IWK576A0
ON $creator.TWK576A1
(WB510004 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
------------------------------------------------------------------------
CREATE TABLESPACE A576B
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 5 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255 SEGSIZE 64
;
CREATE TABLE $creator.TWK576B1
(WB5121 CHAR(1) FOR SBCS DATA NOT NULL,
WB5122 CHAR(3) FOR SBCS DATA NOT NULL,
WB5123 CHAR(20) FOR SBCS DATA NOT NULL,
$@¢
if $phase = 2 then $@=¢
WB5124 CHAR(10) FOR SBCS DATA NOT NULL
WITH DEFAULT,
$! else if $phase >= 3 then $@=¢
WB5124RENA CHAR(8) FOR SBCS DATA NOT NULL
WITH DEFAULT,
$!
$!
PRIMARY KEY (WB5123,
WB5122,
WB5121))
IN $db.A576B
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
LABEL ON TABLE $creator.TWK576B1 IS 'Auftragsstati';
COMMENT ON TABLE $creator.TWK576B1
IS 'Order Daten WS80-Börse: Stati, Eigenschaften, Flags';
LABEL ON $creator.TWK576B1
(
$@¢
if $phase = 2 then $@=¢
WB5124 IS 'Action_ID',
$! else if $phase >= 3 then $@=¢
WB5124Rena IS 'Action_ID Rena',
$!
$!
WB5123 IS 'Auftragsnummer',
WB5122 IS 'Kennung',
WB5121 IS 'Typ');
COMMIT;
------------------------------------------------------------------------
$@¢
if $phase >= 2 then $@=¢
CREATE INDEX $creator.IWK576B2
ON $creator.TWK576B1
(
$@¢
if $phase <= 2 then $@=¢
WB5124 ASC,
$! else if $phase >= 3 then $@=¢
WB5124Rena ASC,
$!
$!
WB5123 ASC,
WB5122 ASC,
WB5121 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
$!
$!
------------------------------------------------------------------------
CREATE INDEX $creator.IWK576B1
ON $creator.TWK576B1
(WB5122 ASC,
WB5121 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 40
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
------------------------------------------------------------------------
CREATE UNIQUE INDEX $creator.IWK576B0
ON $creator.TWK576B1
(WB5123 ASC,
WB5122 ASC,
WB5121 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 40
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
------------------------------------------------------------------------
--SET CURRENT PATH = '"SYSIBM"','"SYSFUN"',"SYSPROC","S100447" ;
CREATE VIEW $creator.VWB510A1V(ABWICKLUNGSBKST, VALORENNUMMER,
INT_HANDELSSTELLE, AUFTRAGSNUMMER, HANDELSKREIS, GESCHAEFTSART,
NOMINAL_STUECK, PRAEMIE_AUFTRAG, LIMITE, LIQ_ULTIMO,
AUFTRAGSART, BOERSENPLATZ, GUELTIG_BIS, EINGANGSZEIT, TS_INSERT,
EIGENSCHAFT, STATUS, LIMITE_AUSLOESUNG, REKAP_DATE, AUFTR_PHASE,
DEPOT_EBSTA, KUND_BKST, INT_HANDELSBKST, DEPOT, DEPOT_ART_KEY,
PFLEGE_DATE, LAST_VERARB, NEXT_VERARB, ANZAHL_GA90,
STATUS_61_DATE, LAUFNR_GA90, TS_MUTATION) AS
SELECT ALL WB510001, WB510002, WB510003, WB510004, WB510005,
WB510006, WB510007, WB510008, WB510009, WB510010, WB510011,
WB510012, WB510013, WB510014, WB510015, WB510016, WB510017,
WB510018, WB510019, WB510020, WB510021, WB510022, WB510023,
WB510024, WB510025, WB510026, WB510027, WB510028, WB510029,
WB510030, WB510031, WB510032
FROM $creator.TWK576A1 ;
COMMIT;
------------------------------------------------------------------------
$@¢
if $phase >= 2 then $@=¢
CREATE VIEW $creator.VWB510A2V(ABWICKLUNGSBKST, VALORENNUMMER,
INT_HANDELSSTELLE, AUFTRAGSNUMMER, HANDELSKREIS, GESCHAEFTSART,
NOMINAL_STUECK, PRAEMIE_AUFTRAG, LIMITE, LIQ_ULTIMO,
AUFTRAGSART, BOERSENPLATZ, GUELTIG_BIS, EINGANGSZEIT, TS_INSERT,
EIGENSCHAFT, STATUS, LIMITE_AUSLOESUNG, REKAP_DATE, AUFTR_PHASE,
DEPOT_EBSTA, KUND_BKST, INT_HANDELSBKST, DEPOT, DEPOT_ART_KEY,
PFLEGE_DATE, LAST_VERARB, NEXT_VERARB, ANZAHL_GA90,
STATUS_61_DATE, LAUFNR_GA90, TS_MUTATION, ACTION_ID) AS
SELECT ALL WB510001, WB510002, WB510003, WB510004, WB510005,
WB510006, WB510007, WB510008, WB510009, WB510010, WB510011,
WB510012, WB510013, WB510014, WB510015, WB510016, WB510017,
WB510018, WB510019, WB510020, WB510021, WB510022, WB510023,
WB510024, WB510025, WB510026, WB510027, WB510028, WB510029,
WB510030, WB510031, WB510032, WB510033
FROM $creator.TWK576A1 ;
$!
$!
------------------------------------------------------------------------
CREATE VIEW $creator.VWB512A1V(Typ, Kennung, Auftragsnummer) AS
SELECT ALL WB5121, WB5122, WB5123
FROM $creator.TWK576B1 ;
COMMIT;
------------------------------------------------------------------------
$@¢
if $phase >= 2 then $@=¢
CREATE VIEW $creator.VWB512A2V(TYP, KENNUNG, AUFTRAGSNUMMER, ACTION_ID)
AS
SELECT ALL WB5121, WB5122, WB5123,
$@¢
if $phase <= 2 then $@=¢
WB5124
$! else if $phase >= 3 then $@=¢
WB5124Rena
$!
$!
FROM $creator.TWK576B1 ;
$!
$!
------------------------------------------------------------------------
ALTER TABLE $creator.TWK576B1 FOREIGN KEY CWB510A
(WB5123)
REFERENCES $creator.TWK576A1
(WB510004)
ON DELETE CASCADE ENFORCED ;
COMMIT;
$!
$!
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(WK579) cre=2009-08-20 mod=2009-08-20-11.29.19 A540769 --------
* dbadmin tool fails for label
=DQ0G=1
creDb trg 1
+ ok creDb A540769.TX.GENF(WK579t1)
creDb src 2
+ ok creDb A540769.TX.GENF(WK579s2)
* manual dbx c i
manual ana with validate
+ ok ana with validate
creDb trg 2
+ ok creDb A540769.TX.GENF(WK579t2)
creDb src 3
+ ok creDb A540769.TX.GENF(WK579s3)
* manual dbx c i
manual ana with validate
+ wait ana with validate
3) analyse the change with validate, validate fails with
4) analyse the change without validate, then run fails with
5) compare source and target (altes Verfahren): WSL fails with
}¢--- DSN.TX.CASE(WK579A) cre=2009-08-20 mod=2010-02-18-14.18.42 A540769 -------
* dbadmin drops and recreates table
* instead of ... alter col set with default / drop default
=DQ0G=1
=noViews=1
creDb trg 2
+ ok creDb A540769.TX.GENF(WK579t2) ::f
creDb src 3
+ ok creDb A540769.TX.GENF(WK579s3) ::f
* manual dbx c i
manual ana with validate
+ wait ana with validate
}¢--- DSN.TX.CASE(WK579ALT) cre=2009-08-20 mod=2009-08-20-13.12.55 A540769 -----
--- sql alter default value ------------------------
SET CURRENT SQLID='S100447';
alter TABLE A540769.TWK579K1
alter WK579K006 set WITH DEFAULT;
}¢--- DSN.TX.CASE(WK579B) cre=2009-08-20 mod=2010-02-18-14.10.38 A540769 -------
* dbadmin drops and recreates table
* instead of ... alter col set with default / drop default
* and dropping and recreation the views
=DQ0G=1
=noViews=0
creDb trg 2
+ ok creDb A540769.TX.GENF(WK579t2) ::f
creDb src 3
+ ok creDb A540769.TX.GENF(WK579s3) ::f
* manual dbx c i
manual ana with validate
+ wait ana with validate
}¢--- DSN.TX.CASE(WK579DDL) cre=2009-08-20 mod=2010-02-18-14.10.11 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
drop TABLESPACE $db.A579K;
commit;
CREATE TABLESPACE A579K
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
DSSIZE 32 G
NUMPARTS 10
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255;
COMMIT;
------------------------------------------------------------------------
CREATE TABLE $creator.TWK579K1
(WK579K001 CHAR(1) FOR SBCS DATA NOT NULL,
WK579K002 CHAR(4) FOR SBCS DATA NOT NULL,
WK579K003 CHAR(20) FOR SBCS DATA NOT NULL,
WK579K004 DATE NOT NULL WITH DEFAULT,
WK579K005 CHAR(3) FOR SBCS DATA NOT NULL,
$@¢
if $phase <= 1 then $@=¢
WK579K006 SMALLINT NOT NULL,
$! else if $phase = 2 then $@=¢
WK579K006 DECIMAL(15, 0) NOT NULL,
$! else $@=¢
WK579K006 DECIMAL(15, 0) NOT NULL WITH DEFAULT,
$!
$!
WK579K007 TIMESTAMP NOT NULL WITH DEFAULT,
WK579K008 CHAR(4) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK579K009 CHAR(3) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK579K010 CHAR(3) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK579K011 CHAR(20) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK579K012 CHAR(3) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK579K013 CHAR(4) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK579K014 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
WK579K015 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
WK579K016 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
WK579K017 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
WK579K018 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
WK579K019 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
WK579K020 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
WK579K021 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
WK579K022 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
WK579K023 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
WK579K024 CHAR(18) FOR SBCS DATA NOT NULL
WITH DEFAULT,
$@¢
if $phase <= 1 then $@=¢
WK579K025 SMALLINT NOT NULL WITH DEFAULT,
$! else if $phase = 2 then $@=¢
WK579K025 DECIMAL(15, 0) NOT NULL WITH DEFAULT,
$! else $@=¢
WK579K025 DECIMAL(15, 0) NOT NULL,
$!
$!
WK579K026 CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK579K027 DATE NOT NULL WITH DEFAULT,
WK579K028 CHAR(4) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK579K029 CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK579K030 DATE NOT NULL WITH DEFAULT,
WK579K031 DATE NOT NULL WITH DEFAULT,
WK579K032 DATE NOT NULL WITH DEFAULT,
WK579K033 DATE NOT NULL WITH DEFAULT,
WK579K034 DATE NOT NULL WITH DEFAULT,
WK579K035 DATE NOT NULL WITH DEFAULT,
$@¢
if $phase <= 1 then $@=¢
WK579K036 SMALLINT NOT NULL WITH DEFAULT,
WK579K037 SMALLINT NOT NULL WITH DEFAULT,
$! else $@=¢
WK579K036 DECIMAL(15, 0) NOT NULL WITH DEFAULT,
WK579K037 DECIMAL(15, 0) NOT NULL WITH DEFAULT,
$!
$!
WK579K038 CHAR(30) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK579K039 CHAR(30) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK579K040 CHAR(8) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK579K041 CHAR(8) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK579K042 CHAR(8) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK579K043 CHAR(8) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK579K044 CHAR(8) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK579K045 CHAR(8) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK579K046 TIMESTAMP NOT NULL WITH DEFAULT,
WK579K047 TIMESTAMP NOT NULL WITH DEFAULT,
WK579K048 TIMESTAMP NOT NULL WITH DEFAULT,
WK579K049 TIMESTAMP NOT NULL WITH DEFAULT,
WK579K050 TIMESTAMP NOT NULL WITH DEFAULT,
WK579K051 TIMESTAMP NOT NULL WITH DEFAULT,
WK579K052 CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK579K053 CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK579K054 CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK579K055 CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK579K056 CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK579K057 CHAR(8) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK579K058 CHAR(8) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK579K059 CHAR(8) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK579K060 CHAR(8) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK579K061 CHAR(8) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK579K062 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
WK579K063 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
WK579K064 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
WK579K065 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
WK579K066 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
CONSTRAINT WK579K001
PRIMARY KEY (WK579K001,
WK579K002,
WK579K003,
WK579K004,
WK579K005,
WK579K006))
IN $db.A579K
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
LABEL ON TABLE $creator.TWK579K1 IS ' NAC FEE SHADOW pha $phase';
LABEL ON $creator.TWK579K1
(WK579K066 IS 'RESERVE',
WK579K065 IS 'RESERVE',
WK579K064 IS 'RESERVE',
WK579K063 IS 'RESERVE',
WK579K062 IS 'RESERVE',
WK579K061 IS 'RESERVE',
WK579K060 IS 'RESERVE',
WK579K059 IS 'RESERVE',
WK579K058 IS 'RESERVE',
WK579K057 IS 'MODEL pha $phase',
WK579K056 IS 'RESERVE',
WK579K055 IS 'RESERVE',
WK579K054 IS 'RESERVE',
WK579K053 IS 'RESERVE',
WK579K052 IS 'RESERVE',
WK579K051 IS 'TS - RECALCULATED',
WK579K050 IS 'TS - DEBIT',
WK579K049 IS 'TS - SURCHRGE',
WK579K048 IS 'TS - DISCOUNT',
WK579K047 IS 'TS - CANCEL',
WK579K046 IS 'TS - INSERT',
WK579K045 IS 'PID - RECALCULATED',
WK579K044 IS 'PID - DEBIT',
WK579K043 IS 'PID - SURCHRGE',
WK579K042 IS 'PID - DISCOUNT',
WK579K041 IS 'PID - CANCEL',
WK579K040 IS 'PID - INSERT',
WK579K039 IS 'DEBIT INTERNAL TEXT',
WK579K038 IS 'DEBIT INTERNAL TEXT',
WK579K037 IS 'DEBIT FREQUENCY',
WK579K036 IS 'CALCULATION FREQUENCY',
WK579K035 IS 'DEBIT PERIOD TO',
WK579K034 IS 'DEBIT PERIOD FROM',
WK579K033 IS 'DEBIT DATE',
WK579K032 IS 'CALCULATION PERIOD TO',
WK579K031 IS 'CALCULATION PERIOD FROM',
WK579K030 IS 'CALCULATION DATE',
WK579K029 IS 'CLOSURE TRANSFER CODE',
WK579K028 IS 'CANCELLATION CODE',
WK579K027 IS 'VALUE DATE',
WK579K026 IS 'NAC CODE 1 (Y/N) pha $phase',
WK579K025 IS 'CALCULATION STATUS',
WK579K024 IS 'ORDER NUMBER',
WK579K023 IS 'NAC - NETTO',
WK579K022 IS 'NAC - BRUTTO',
WK579K021 IS 'TECHNICAL DISCOUNT',
WK579K020 IS 'TECHNICAL SURCHARGE',
WK579K019 IS 'ADHOC DISCOUNT',
WK579K018 IS 'ADHOC SURCHARGE',
WK579K017 IS 'SC DISCOUNT AMOUNT',
WK579K016 IS 'SC DISCOUNT %',
WK579K015 IS 'NAC FLAT AMOUNT',
WK579K014 IS 'NAC DEFAULT AMOUNT',
WK579K013 IS 'ACCOUNT CURRENCY',
WK579K012 IS 'ACCOUNT TYPE',
WK579K011 IS 'ACCOUNT NUMBER',
WK579K010 IS 'DOMICILE',
WK579K009 IS 'CUSTOMER TYPE',
WK579K008 IS 'BUID',
WK579K007 IS 'TECH MUTATION DATE',
WK579K006 IS 'KEY RUNNING NUMBER',
WK579K005 IS 'KEY DUE DATE',
WK579K004 IS 'KEY POSITION AS DATE',
WK579K003 IS 'KEY CIF NUMBER',
WK579K002 IS 'KEY CALCULATION YEAR',
WK579K001 IS 'KEY PARTITION');
COMMIT;
------------------------------------------------------------------------
CREATE UNIQUE INDEX $creator.IWK579K1
ON $creator.TWK579K1
(WK579K001 ASC,
WK579K002 ASC,
WK579K003 ASC,
WK579K004 ASC,
WK579K005 ASC,
WK579K006 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
CLUSTER
(PART 1 VALUES('0'),
PART 2 VALUES('1'),
PART 3 VALUES('2'),
PART 4 VALUES('3'),
PART 5 VALUES('4'),
PART 6 VALUES('5'),
PART 7 VALUES('6'),
PART 8 VALUES('7'),
PART 9 VALUES('8'),
PART 10 VALUES('9'))
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES;
COMMIT;
------------------------------------------------------------------------
CREATE INDEX $creator.IWK579K2
ON $creator.TWK579K1
(WK579K001 ASC,
WK579K002 ASC,
WK579K003 ASC,
WK579K005 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 4 G;
COMMIT;
------------------------------------------------------------------------
CREATE INDEX $creator.IWK579K3
ON $creator.TWK579K1
(WK579K025 ASC,
WK579K024 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 4 G;
COMMIT;
------------------------------------------------------------------------
$@¢
if \ ${? noViews } then
$=noViews=0
if $noViews then $@=¢
-- no views because $"$noViews = 1"
$! else $@=¢
CREATE VIEW $creator.VWK579K1A(WK579K001, WK579K002, WK579K003,
WK579K004, WK579K005, WK579K006, WK579K007, WK579K008,
WK579K009, WK579K010, WK579K011, WK579K012, WK579K013,
WK579K014, WK579K015, WK579K016, WK579K017, WK579K018,
WK579K019, WK579K020, WK579K021, WK579K022, WK579K023,
WK579K024, WK579K025, WK579K026, WK579K027, WK579K028,
WK579K029, WK579K030, WK579K031, WK579K032, WK579K033,
WK579K034, WK579K035, WK579K036, WK579K037, WK579K038,
WK579K039, WK579K040, WK579K041, WK579K042, WK579K043,
WK579K044, WK579K045, WK579K046, WK579K047, WK579K048,
WK579K049, WK579K050, WK579K051, WK579K052, WK579K053,
WK579K054, WK579K055, WK579K056, WK579K057, WK579K058,
WK579K059, WK579K060, WK579K061, WK579K062, WK579K063,
WK579K064, WK579K065, WK579K066) AS
SELECT WK579K001, WK579K002, WK579K003, WK579K004, WK579K005,
WK579K006, WK579K007, WK579K008, WK579K009, WK579K010,
WK579K011, WK579K012, WK579K013, WK579K014, WK579K015,
WK579K016, WK579K017, WK579K018, WK579K019, WK579K020,
WK579K021, WK579K022, WK579K023, WK579K024, WK579K025,
WK579K026, WK579K027, WK579K028, WK579K029, WK579K030,
WK579K031, WK579K032, WK579K033, WK579K034, WK579K035,
WK579K036, WK579K037, WK579K038, WK579K039, WK579K040,
WK579K041, WK579K042, WK579K043, WK579K044, WK579K045,
WK579K046, WK579K047, WK579K048, WK579K049, WK579K050,
WK579K051, WK579K052, WK579K053, WK579K054, WK579K055,
WK579K056, WK579K057, WK579K058, WK579K059, WK579K060,
WK579K061, WK579K062, WK579K063, WK579K064, WK579K065,
WK579K066
FROM $creator.TWK579K1 ;
$@¢
if $phase <= 1 then $@=¢
LABEL ON TABLE $creator.VWK579K1A IS 'NAC FEE SHDW TABLE';
$!
$!
LABEL ON $creator.VWK579K1A
(WK579K066 IS 'RESERVE',
WK579K065 IS 'RESERVE',
WK579K064 IS 'RESERVE',
WK579K063 IS 'RESERVE',
WK579K062 IS 'RESERVE',
WK579K061 IS 'RESERVE',
WK579K060 IS 'RESERVE',
WK579K059 IS 'RESERVE',
WK579K058 IS 'RESERVE',
WK579K057 IS 'MODEL pha $phase',
WK579K056 IS 'RESERVE',
WK579K055 IS 'RESERVE',
$@¢
if $phase <= 1 then $@=¢
WK579K054 IS 'RESERVE pha $phase',
$! else $@=¢
WK579K053 IS 'RESERVE pha $phase',
$!
$!
WK579K052 IS 'RESERVE',
WK579K051 IS 'TS - RECALCULATED',
WK579K050 IS 'TS - DEBIT',
WK579K049 IS 'TS - SURCHRGE',
WK579K048 IS 'TS - DISCOUNT',
WK579K047 IS 'TS - CANCEL',
WK579K046 IS 'TS - INSERT',
WK579K045 IS 'PID - RECALCULATED',
WK579K044 IS 'PID - DEBIT',
WK579K043 IS 'PID - SURCHRGE',
WK579K042 IS 'PID - DISCOUNT',
WK579K041 IS 'PID - CANCEL',
WK579K040 IS 'PID - INSERT',
WK579K039 IS 'DEBIT INTERNAL TEXT',
WK579K038 IS 'DEBIT INTERNAL TEXT',
WK579K037 IS 'DEBIT FREQUENCY',
WK579K036 IS 'CALCULATION FREQUENCY',
WK579K035 IS 'DEBIT PERIOD TO',
WK579K034 IS 'DEBIT PERIOD FROM',
WK579K033 IS 'DEBIT DATE',
WK579K032 IS 'CALCULATION PERIOD TO',
WK579K031 IS 'CALCULATION PERIOD FROM',
WK579K030 IS 'CALCULATION DATE',
WK579K029 IS 'CLOSURE TRANSFER CODE',
WK579K028 IS 'CANCELLATION CODE',
WK579K027 IS 'VALUE DATE',
WK579K026 IS 'NAC CODE 1 (Y/N) pha $phase',
WK579K025 IS 'CALCULATION STATUS',
WK579K024 IS 'ORDER NUMBER',
WK579K023 IS 'NAC - NETTO',
WK579K022 IS 'NAC - BRUTTO',
WK579K021 IS 'TECHNICAL DISCOUNT',
WK579K020 IS 'TECHNICAL SURCHARGE',
WK579K019 IS 'ADHOC DISCOUNT',
WK579K018 IS 'ADHOC SURCHARGE',
WK579K017 IS 'SC DISCOUNT AMOUNT',
WK579K016 IS 'SC DISCOUNT %',
WK579K015 IS 'NAC FLAT AMOUNT',
WK579K014 IS 'NAC DEFAULT AMOUNT',
WK579K013 IS 'ACCOUNT CURRENCY',
WK579K012 IS 'ACCOUNT TYPE',
WK579K011 IS 'ACCOUNT NUMBER',
WK579K010 IS 'DOMICILE',
WK579K009 IS 'CUSTOMER TYPE',
WK579K008 IS 'BUID',
WK579K007 IS 'TECH MUTATION DATE',
WK579K006 IS 'KEY RUNNING NUMBER',
WK579K005 IS 'KEY DUE DATE',
WK579K004 IS 'KEY POSITION AS DATE',
WK579K003 IS 'KEY CIF NUMBER',
WK579K002 IS 'KEY CALCULATION YEAR',
WK579K001 IS 'KEY PARTITION');
COMMIT;
$!
$!
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(WK600) cre=2010-01-26 mod=2010-01-29-11.34.40 A540769 --------
= ini = dsn.marec.tx(WK600INI)
nop
-= nopCount = 1
+ ok nop
- nop opts =
- nop opts =
=tFr=47
=tTo=49
creDb src 1
+ ok creDb ~TMPTX.GENF(WK600s1) ::f
}¢--- DSN.TX.CASE(WK600COF) cre=2010-01-26 mod=2012-10-01-15.13.52 A540769 -----
//A540769C JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG0 SYSTEM=S13
//*
//P02 EXEC PGM=DSNUTILB,
// PARM='DBAF,A540769C.FULCOPL'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTEMPL DD DSN=DSN.MAREC.TX(WK600TMP),DISP=SHR
//SYSIN DD *
OPTIONS EVENT(ITEMERROR, SKIP)
LISTDEF C#LIST 00010000
INCLUDE TABLESPACE DA540769.A600A04* PARTLEVEL 8620
--INCLUDE TABLESPACE DA540769.A600A001 PARTLEVEL 8620
--INCLUDE TABLESPACE DA540769.A600A02* PARTLEVEL 8620
--INCLUDE TABLESPACE DA540769.A600A03* PARTLEVEL 8620
--INCLUDE TABLESPACE DA540769.A600A04* PARTLEVEL 8620
--INCLUDE TABLESPACE DA540769.A601A18* PARTLEVEL 8620
--INCLUDE TABLESPACE DA540769.A600A009 PARTLEVEL 8620
--INCLUDE TABLESPACE DA540769.A600A010 PARTLEVEL 8620
COPY LIST C#LIST COPYDDN(TCOPYD8)
PARALLEL
FULL YES
SHRLEVEL CHANGE
}¢--- DSN.TX.CASE(WK600D) cre=2010-01-29 mod=2010-01-29-14.24.39 A540769 -------
= ini = DSN.MAREC.TX(WK600INI)
nop
-= nopCount = 1
+ ok nop
- nop opts =
- nop opts =
= ddl = DSN.MAREC.TX(WK600ddb)
creDb src 1
}¢--- DSN.TX.CASE(WK600DDB) cre=2010-01-29 mod=2010-01-29-14.23.52 A540769 -----
SET CURRENT SQLID='S100447 ';
drop database $db;
drop STOGROUP $sg;
CREATE STOGROUP $sg
VOLUMES("*")
VCAT $sg ;
COMMIT;
CREATE DATABASE $db
BUFFERPOOL BP2
INDEXBP BP1
CCSID EBCDIC
STOGROUP $sg;
COMMIT;
}¢--- DSN.TX.CASE(WK600DDL) cre=2010-01-26 mod=2010-01-26-15.18.34 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
-- tb $tb tx $ts ix $ix
-- from $tFr to $tTo
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
$**>~wk.testcase(wk600dds) $@¢
-->>>>> generated by WK600DDL >>>>> changes there ||||||||||||||||||||||
SET CURRENT SQLID='S100447';
$@do tY = $tFr to $tTo $@=¢
$=tX=-right($tY, 3, 0)
drop TABLESPACE $db.$ts$tX; commit;
$!
-- create $-{$tTo + 1 - $tFr} tables
$@do tY = $tFr to $tTo $@=¢
$=tX =- right(tY, 3, 0)
-- table $creator.$tb$tX in $db.$ts
-- with index $creator.$ix${tX}A
CREATE TABLESPACE $ts$tX
IN $db
USING STOGROUP $sg
PRIQTY -1 SECQTY -1
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
NUMPARTS 8
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE NO
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255 DSSIZE 32 G
;
CREATE TABLE $creator.$tb$tX
(part integer,
i1 integer,
i2 integer,
v1 varchar(1000),
v2 varchar(1000),
v3 varchar(1000)
)
IN $db.$ts$tX
partition by (part)
(PART 1 VALUES(1),
PART 2 VALUES(2),
PART 3 VALUES(3),
PART 4 VALUES(4),
PART 5 VALUES(5),
PART 6 VALUES(6),
PART 7 VALUES(7),
PART 8 VALUES(8)
)
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
CREATE INDEX $creator.$ix${tX}A
ON $creator.$tb$tX
(i1 ASC, v2 asc)
USING STOGROUP $sg
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE NO
COPY NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
$!
$***out 20090504 15:30:58
$***out 20090504 12:43:18
}¢--- DSN.TX.CASE(WK600DSN) cre=2010-01-29 mod=2010-01-29-12.37.30 A540769 -----
call compRun '@', 'DSN.MAREC.TX(wk600ins)'
$=src=$-=/src/
with ts as (
select dbName db, name ts
from sysibm.sysTableSpace
order by 1, 2
)
select ty, 'DBAF.DSNDBC.' || parts.db || '.' || parts.sp
|| '.' || iPrefix || '0001'
|| '.A' || digits(dec(max(1, partition), 3)) ds
from ts
join ( select 'ts' ty, dbName db, tsName ts, tsName sp,
partition, iPrefix
from sysibm.sysTablePart
union all select 'ix' ty, t.dbName db, t.tsName ts, i.indexSpace sp,
p.partition, p.iPrefix
from sysibm.sysTables t
join sysibm.sysIndexes i
on i.tbCreator = t.creator and i.tbName = t.name
join sysibm.sysIndexPart p
on p.ixCreator = i.creator and p.ixName = i.name
) parts
on ts.db = parts.db and ts.ts = parts.ts
where ts.db = '$db' and ts.ts like '$ts%'
order by ts.db, ts.ts, ty desc, sp, partition
$/src/
call sqlConnect $subsys
call sqlPreOpen 1, $src
do while sqlFetchInto(1, ':ty, :ds')
$$- ty ds
end
call sqlDisconnect
$#out 20100129 12:36:06
ts DBAF.DSNDBC.DA540769.A600A000.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A000.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A000.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A000.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A000.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A000.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A000.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A000.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK600A0.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A001.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A001.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A001.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A001.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A001.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A001.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A001.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A001.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61T71.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A002.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A002.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A002.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A002.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A002.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A002.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A002.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A002.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61H33.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A003.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A003.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A003.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A003.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A003.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A003.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A003.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A003.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61L66.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A004.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A004.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A004.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A004.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A004.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A004.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A004.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A004.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61F28.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A005.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A005.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A005.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A005.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A005.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A005.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A005.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A005.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61SSX.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A006.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A006.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A006.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A006.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A006.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A006.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A006.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A006.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK6198A.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A007.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A007.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A007.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A007.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A007.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A007.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A007.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A007.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61IU4.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A008.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A008.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A008.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A008.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A008.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A008.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A008.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A008.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61309.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A009.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A009.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A009.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A009.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A009.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A009.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A009.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A009.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61TMZ.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A010.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A010.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A010.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A010.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A010.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A010.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A010.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A010.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61FYB.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A011.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A011.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A011.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A011.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A011.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A011.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A011.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A011.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK6194E.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A012.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A012.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A012.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A012.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A012.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A012.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A012.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A012.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61HWG.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A013.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A013.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A013.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A013.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A013.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A013.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A013.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A013.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61CTJ.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A014.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A014.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A014.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A014.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A014.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A014.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A014.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A014.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61TOM.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A015.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A015.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A015.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A015.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A015.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A015.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A015.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A015.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61NWP.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A016.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A016.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A016.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A016.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A016.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A016.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A016.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A016.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61MPS.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A017.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A017.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A017.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A017.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A017.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A017.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A017.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A017.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61UIU.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A018.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A018.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A018.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A018.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A018.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A018.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A018.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A018.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61DGX.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A019.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A019.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A019.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A019.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A019.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A019.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A019.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A019.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61TSZ.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A020.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A020.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A020.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A020.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A020.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A020.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A020.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A020.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61GZ3.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A021.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A021.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A021.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A021.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A021.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A021.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A021.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A021.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61945.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A022.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A022.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A022.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A022.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A022.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A022.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A022.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A022.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61RJ8.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A023.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A023.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A023.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A023.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A023.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A023.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A023.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A023.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61ZAY.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A024.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A024.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A024.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A024.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A024.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A024.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A024.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A024.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61TMB.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A025.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A025.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A025.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A025.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A025.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A025.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A025.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A025.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61FTE.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A026.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A026.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A026.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A026.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A026.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A026.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A026.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A026.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61YUT.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A027.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A027.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A027.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A027.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A027.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A027.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A027.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A027.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61O0Y.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A028.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A028.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A028.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A028.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A028.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A028.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A028.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A028.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61B52.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A029.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A029.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A029.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A029.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A029.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A029.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A029.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A029.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61667.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A030.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A030.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A030.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A030.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A030.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A030.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A030.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A030.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK611TA.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A031.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A031.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A031.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A031.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A031.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A031.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A031.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A031.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK610DD.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A032.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A032.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A032.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A032.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A032.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A032.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A032.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A032.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK6126G.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A033.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A033.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A033.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A033.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A033.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A033.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A033.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A033.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61N6K.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A034.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A034.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A034.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A034.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A034.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A034.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A034.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A034.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61IBO.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A035.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A035.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A035.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A035.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A035.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A035.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A035.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A035.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61LSR.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A036.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A036.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A036.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A036.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A036.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A036.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A036.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A036.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK615ZV.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A037.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A037.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A037.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A037.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A037.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A037.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A037.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A037.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61PXY.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A038.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A038.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A038.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A038.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A038.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A038.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A038.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A038.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61FB0.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A039.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A039.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A039.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A039.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A039.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A039.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A039.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A039.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61YS3.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A040.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A040.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A040.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A040.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A040.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A040.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A040.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A040.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61F05.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A041.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A041.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A041.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A041.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A041.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A041.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A041.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A041.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61V98.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A042.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A042.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A042.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A042.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A042.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A042.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A042.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A042.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61E7Z.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A043.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A043.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A043.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A043.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A043.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A043.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A043.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A043.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61KVD.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A044.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A044.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A044.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A044.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A044.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A044.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A044.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A044.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61QRF.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A045.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A045.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A045.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A045.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A045.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A045.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A045.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A045.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61QLI.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A046.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A046.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A046.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A046.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A046.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A046.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A046.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A046.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61YTL.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A047.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A047.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A047.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A047.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A047.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A047.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A047.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A047.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61EZV.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A048.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A048.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A048.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A048.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A048.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A048.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A048.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A048.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61Z7Y.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A049.I0001.A001
ts DBAF.DSNDBC.DA540769.A600A049.I0001.A002
ts DBAF.DSNDBC.DA540769.A600A049.I0001.A003
ts DBAF.DSNDBC.DA540769.A600A049.I0001.A004
ts DBAF.DSNDBC.DA540769.A600A049.I0001.A005
ts DBAF.DSNDBC.DA540769.A600A049.I0001.A006
ts DBAF.DSNDBC.DA540769.A600A049.I0001.A007
ts DBAF.DSNDBC.DA540769.A600A049.I0001.A008
ix DBAF.DSNDBC.DA540769.IWK61TG1.I0001.A001
$#out 20100129 09:13:51
}¢--- DSN.TX.CASE(WK600INI) cre=2010-01-26 mod=2012-05-11-15.27.11 A540769 -----
say 'start wsh dsn.tx.case(wk600INI)'
$= srcSubsys = DBAF
$= srcDb = DA540769
$= srcCreator = A540769
$= trgSubsys = DBAF
$= trgDb = DA540769
$= trgCreator = A540769
$= ddl = $pds(${mpr}DDL)
$= gen = ~TMPTX.GENF
$= sg = GSMS
$= ts = A600A
$= tb = TWK600A
$= ix = IWK600A
}¢--- DSN.TX.CASE(WK600INS) cre=2010-01-26 mod=2012-05-11-15.34.03 A540769 -----
say 'start wsh DSN.tx.case(WK600INS)'
$=pds = DSN.TX.CASE
$=mpr = WK600
call compRun '@', file($pds'('$mpr'INI)')
$= subsys = $srcSubsys
$= db = $srcDb
$= creator = $srcCreator
}¢--- DSN.TX.CASE(WK600JES) cre=2010-01-29 mod=2010-01-29-14.28.40 A540769 -----
$#@
$*( extract jobs from eJes and copy to pds mbr
$*)
$>.jclSub()
$<=/jcl/
$=out=dsn.marec.pta.test09.jobout
//YMARCJES JOB (SK01,KE10,A979074,S),'BATCH EJES',
// NOTIFY=&SYSUID,MSGCLASS=T,TIME=1440
//*MAIN CLASS=LOG,SYSTEM=R23 (EJES IST NUR AUF R23/S23 LIZENZIERT)
//*
//* JOB OUTPUT VOM SPOOL IN DATASETS EXTRAHIEREN
//* - IN LIB 'DSN.MAREC.TEST09.EJES.CTRL' FÜR JEDEN JOB EINEN MEMBER MIT
//* FOLGENDEM INHALT SPEICHERN (COMMANDS FÜR EJES):
//* EJES J=A979074E,STATUS BATCH
//* :E
//* - DIESE KONTROLLMEMBER KÖNNEN MIT REXX GENMEMBR GENERIERT WERDEN
//* (KONTROLLIEREN, OB ALLFÄLLIGE ANPASSUNGEN NOTWENDIG SIND)
//* - PROC AUFRUFE ENTSPRECHEND DEN VORHANDENEN JOBS ANPASSEN
//* - CSM AUS DEM RR2 IST NICHT ERLAUBT, DESHALB DATEN VOM RZ1 HER HOLEN
//* (JOB IM RZ1 A979074.RZ1.CNTL(CSM#PTA1) )
//*
//*------------------------------------------------------- JCL PROC
//EXT PROC MBR=VERGESSEN
//* HOUSEKEEPING
//*ELETE EXEC PGM=IEFBR14
//*1 DD UNIT=DISK,DISP=(MOD,DELETE,DELETE),
//* DSN=&PREF..&JOB..&SUFF.
//* EXTRACT JOB OUTPUT
//EXTRACT EXEC PGM=IKJEFT01,DYNAMNBR=24
//EJESEXT DD DISP=SHR,DSN=DSN.MARECRE.PTAMF.JOBOUT(&MBR)
//SYSABEND DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
// PEND
$@do jx=40 to 40 $@=¢
$=jy=-right($jx, 3, 0)
$=dsn=DSN.MAREC.PTA.TEST09.YMRCO$jy.JOB.OUTPUT
//S$jy EXEC EXT,MBR=MGRB$jy <--- JOBNAMEN ANPASSEN,
//EXTRACT.SYSTSIN DD *
EJES J=YMRBU$jy,STATUS BATCH
:E
$!
$/jcl/
$#out 20091219 12:01:20
$#out 20091219 11:57:42
$#out 20091219 11:56:02
}¢--- DSN.TX.CASE(WK600JOU) cre=2010-01-29 mod=2010-01-29-14.29.55 A540769 -----
$*( copy output files to pds
$*)
$=out=dsn.marecre.jobout
$=in=DSN.MAREC.DBOF.D091217.T103831.JOB018.JOBOUT
$;
call lmm $in
$|
$@for mbr $@¢
if \ abbrev($mbr, 'YMR') then
iterate
mbOu = 'MH'substr($mbr, 3, 2)substr($mbr, 7, 2)
call readDsn $in'('$mbr')', i.
call writeDsn $out'('mbOu') ::v', i., , 1
$!
$#end
mbr = strip($mbr)
if mbr = '' then
leave
say mbr
end
ca
$=jy=-right($jx, 3, 0)
$=dsn=DSN.MAREC.PTA.TEST09.YMRCO$jy.JOB.OUTPUT
call readDsn $dsn, i.
call writeDsn $out'(mbrc'$jy') ::v', i., , 1
$!
$#out 20091224 17:03:07
$#out 20091224 17:01:26
$#out 20091224 17:02:43
$#out 20091224 17:01:05
$#out 20091224 17:00:24
$#out 20091224 16:56:38
$#out
$#out 20091224 16:56:15
}¢--- DSN.TX.CASE(WK600LOA) cre=2010-01-28 mod=2010-01-29-12.35.54 A540769 -----
$*(
submit a job on different systems
to load tables
$*)
call compRun '@', 'DSN.MAREC.TX(wk600ins)'
$=paFr=1
$=paTo=8
$=sys=0
$;
$>.jclSub()
$<=/parm/
$*( A 0 1
B 2 3
C 4 4
$*) D 5 6
$/parm/
$@for parm $@/parmLine/
parse value $parm with jCha tFrom tTo
$=sys = 1 + (sys // 4)
$=jCha=- jCha
$=job=A540769$jCha
$@=/jcl/
//$job JOB (CP00,KE50), 00010001
// MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID
//*MAIN CLASS=LOG,SYSTEM=S1$sys
//S1 EXEC PGM=DSNUTILB,PARM='$subsys,$job.LOAD' 00020001
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=$pds(${mpr}TMP),DISP=SHR
//SYSIN DD *
$@do ty = tFrom to tTo $@=/table/
$= tx =- right(ty, 3, 0)
TEMPLATE TIN$tx
DSN('A540769.RECUN.DGDB9998.A600A190.P&PA..UN2')
DISP(SHR,KEEP,KEEP)
LOAD DATA -- LOG NO RESUME NO REPLACE COPYDDN(TCOPYD)
-- LOG YES RESUME YES SHRLEVEL CHANGE
LOG NO RESUME YES
EBCDIC CCSID(00500,00000,00000)
-- SORTKEYS
-- ENFORCE NO
SORTDEVT DISK
SORTNUM 50
WORKDDN(TSYUTD,TSOUTD)
$@do pa=$paFr to $paTo $@=/part/
INTO TABLE $creator.$tb$tx
PART $pa INDDN TIN$tx
( "PART"
POSITION( 00004:00007) INTEGER
NULLIF(00003)=X'FF'
, "I1"
POSITION( 00009:00012) INTEGER
NULLIF(00008)=X'FF'
, "I2"
POSITION( 00014:00017) INTEGER
NULLIF(00013)=X'FF'
, "V1"
POSITION( 00019:01020) VARCHAR
NULLIF(00018)=X'FF'
, "V2"
POSITION( 01022:02023) VARCHAR
NULLIF(01021)=X'FF'
, "V3"
POSITION( 02025:03026) VARCHAR
NULLIF(02024)=X'FF'
)
$/part/
$/table/
$/jcl/
$/parmLine/
}¢--- DSN.TX.CASE(WK600LOD) cre=2012-05-11 mod=2012-05-11-17.47.53 A540769 -----
$#@
$*(
submit a job on different systems
to load dummy tables
$*)
call compRun '@', file('DSN.TX.CASE(wk600ins)')
$=paFr=1
$=paTo=8
$=sys=0
$;
$>.fEdit()
$<=/parm/
$*( A 0 1
B 2 3
C 4 4
$*) D 10 10
$/parm/
$@for parm $@/parmLine/
parse value $parm with jCha tFrom tTo
$=sys =- 1 + ($sys // 4)
$=jCha=- jCha
$=job=A540769$jCha
$@=/jcl/
//$job JOB (CP00,KE50),
// MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID
//*MAIN CLASS=LOG,SYSTEM=S1$sys
//S1 EXEC PGM=DSNUTILB,PARM='$subsys,$job.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//DUMIN DD DUMMY
//SYSTEMPL DD DSN=$pds(${mpr}TMP),DISP=SHR
//SYSIN DD *
$@do ty = tFrom to tTo $@=/table/
$= tx =- right(ty, 3, 0)
LOAD DATA LOG NO RESUME NO REPLACE COPYDDN(TCOPYS)
INDDN DUMIN
EBCDIC CCSID(00500,00000,00000)
-- SORTKEYS
-- ENFORCE NO
SORTDEVT DISK
SORTNUM 50
WORKDDN(TSYUTS,TSOUTS)
INTO TABLE $creator.$tb$tx
( "PART"
POSITION( 00004:00007) INTEGER
NULLIF(00003)=X'FF'
, "I1"
POSITION( 00009:00012) INTEGER
NULLIF(00008)=X'FF'
, "I2"
POSITION( 00014:00017) INTEGER
NULLIF(00013)=X'FF'
, "V1"
POSITION( 00019:01020) VARCHAR
NULLIF(00018)=X'FF'
, "V2"
POSITION( 01022:02023) VARCHAR
NULLIF(01021)=X'FF'
, "V3"
POSITION( 02025:03026) VARCHAR
NULLIF(02024)=X'FF'
)
$/table/
$/jcl/
$/parmLine/
}¢--- DSN.TX.CASE(WK600RUN) cre=2010-01-29 mod=2010-01-29-14.31.36 A540769 -----
$*(
runstats all tablespaces (without index|)
with runstats much smaller than realTimeStats
such that rebuild will not fail for sort allocations
$*)
call sqlConnect DBOF
$;
$>.jclSub()
call sqlPreOpen 1,
, "select t.cardf, sum(real(r.totalRows)),",
" strip(t.dbName) || '.' || strip (t.tsName)",
"from sysibm.sysTables t,",
"sysibm.sysTablespace s,",
"sysibm.sysTableSpaceStats r",
"where",
"s.dbName = t.dbName and s.name = t.tsName" ,
"and r.dbName = s.dbName and r.name = s.name" ,
"and r.dbid = s.dbid and r.psid = s.psid" ,
"and s.dbName = 'DMAREC'",
"group by t.dbName, t.tsName, t.cardf",
"having" ,
"t.cardf < sum(real(r.totalRows)) * .3",
"and max(t.cardf, sum(real(r.totalRows))) > 1e7"
$@do ix=1 while sqlFetchInto(1, ":ca, :ro, :ts") $@=¢
$=iy =- right(ix, 3, 0)
$=ts =- ts
//YMRUN$iy JOB (CP00,KE50),
// 'DB2 RUN',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBOF,'YMRUN$iy.RUNSTA'),
// REGION=0M
//*DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//RNPRIN01 DD SYSOUT=*
//SYSIN DD *
LISTDEF LST#STA INCLUDE TABLESPACE $ts
OPTIONS EVENT (ITEMERROR, SKIP)
RUNSTATS TABLESPACE LIST LST#STA
SHRLEVEL CHANGE
$!
call sqlDisconnect
$#out 20091221 09:33:53
$#out 20091221 09:33:30
$#out 20091221 09:33:01
$#out 20091221 09:32:26
}¢--- DSN.TX.CASE(WK600SIJ) cre=2010-01-26 mod=2012-05-11-15.56.48 A540769 -----
$*(
submit a job on each system sysX
to insert on different partitions
$*)
$>.FSub()
$@do sysX=1 to 4 $@=/sys/
//YWK600I$sysX JOB (CP00,KE50),TIME=99
//*MAIN CLASS=LOG,SYSTEM=S1$sysX
//*
//S1 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99,
// PARM='%WSH'
//SYSPROC DD DSN=A540769.WK.REXX,DISP=SHR
//ISPPLIB DD DSN=TSO.ISPF.ISPPLIB,DISP=SHR
//ISPMLIB DD DSN=TSO.ISPF.ISPMLIB,DISP=SHR
// DD DSN=ISP.SISPMENU,DISP=SHR
//ISPSLIB DD DSN=TSO.ISPF.ISPSLIB,DISP=SHR
//ISPTLIB DD DSN=TSO.ISPF.ISPTLIB,DISP=SHR
//ISPPROF DD DISP=(,PASS),UNIT=VIO,
// SPACE=(CYL,(1,1,30)),RECFM=FB,LRECL=80
//ISPLOG DD SYSOUT=*
//ISPLIST DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//OUT DD SYSOUT=*
//SYSTSIN DD DUMMY
//WSH DD *
$'$=paFr =' $-{$sysX*2-1}
$'$=paTo =' $-{$sysX*2}
// DD *
$"say 'partitions' $paFr '-' $paTo"
$@<DSN.TX.CASE(WK600SIN)
$/sys/
$***out 20091030 13:33:40
$***out 20091030 11:59:19
$***out 20091030 11:39:48
$***out 20090924 15:09:57
$***out 20090924 14:47:17
$***out 20090922 13:29:58
$***out 20090922 13:21:20
}¢--- DSN.TX.CASE(WK600SIN) cre=2010-01-26 mod=2012-05-11-15.56.41 A540769 -----
$*(
insert loop
$loops time
insert into tables specified in parmLine
from partition $paFr to partition $paTo
max $maIn inserts in one statement
after $maIn (or more) inserts
commit
sleep $sleep
$*)
call compRun '@', file('DSN.TX.CASE(wk600ins)')
$=cr = $creator
$=maIn=1000 $**max inserts per commit
$=loops=3333
$=sleep=5
call sqlConnect $subsys
$= insCnt = 0
$= insTot = 0
if \ ${?paFr} then
$= paFr = 1
if \ ${?paTo} then
$= paTo = 8
say 'partitions' $paFr '-' $paTo
$@do loop=1 to $loops $@/loop/
$** tFrom = from table
$** | tTo = to table
$** | | number of inserts
$** | | | maxStringLen
$** | | | |
$$ 0 3 200 1000
$$ 4 6 20 123
$$ 7 15 22 345
$** 0 0 10000 1000
$** 1 9 1000 500
$** 10 20 100 100
$$ 16 30 10 100
$$ 31 49 2 100
$** 100 200 10 100
$| $@for parm $@/parmLine/
parse value $parm with tFrom tTo ins maLe
$= maLe =- maLe
$@do tx=tFrom to tTo $@/tx table/
$=tx =- right($tx, 3, 0)
cc = sql2one('select coalesce(max(i1),0) max from' $cr'.'$tb$tx,
'with ur')
$@do ix=cc by $maIn to cc+ins $@/insert/
$=ixTo =- min($ix+$maIn, cc+ins)-1
$=rnd=- (($tx*100 +$paFr) * 10000+ix) // 214748357
call sqlExec $-$insSql
$** say sqlerrd.3 'rows inserted into' $cr'.'$tb$tx,
$** 'from' $ix '-' $ixTo
$=insCnt =- $insCnt + $ixTo - $ix + 1
if $insCnt >= $maIn then do
call sleep $sleep
call sqlCommit
$=insTot =- $insTot + $insCnt
say time() ,
'commit after' $insCnt 'from total' $insTot,
'last' $cr'.'$tb$tx 'loop' $loop'/'$loops
$=insCnt = 0
end
$/insert/
$/tx table/
$/parmLine/
$/loop/
call sqlCommit
$=insTot =- $insTot + $insCnt
say 'commit after' $insCnt 'from total' $insTot ,
'last' $cr'.'$tb$tx 'loop' $loop'/'$loops
$@proc insSql $@=/insSql/
insert into $cr.$tb$tx (part, I1, i2, v1, v2, v3)
with n (n) as
( select $ix from sysibm.sysDummy1
union all select n+1 from n where n < $ixTo
),
nc (n, l1, l2, lv2, s1, s2) as
( select n, int(rand(${rnd}1)*$maLe), int(rand(${rnd}2)*$maLe),
0, varchar('',$maLe), varchar('',$maLe) from n
union all select n, l1, l2, lv2+1, s1 ||
case when length (s1) >= l1 then ''
else substr('abcdefghijklmnopqrstuvwxyz 0123456789<>.'
|| 'ABCDEFGHIJKLMNOPQRSTUVWXYZ+*%&/()=?\¢!{}'
, int(rand(${rnd}3)*80)+1, 1)
|| case when length(s1) < 10 then ''
else left(s2, min(length(s2), l1-length(s1)-1)) end end
, s2 ||
case when length (s2) >= l2 then ''
else substr('abcdefghijklmnopqrstuvwxyz 0123456789<>.'
|| 'ABCDEFGHIJKLMNOPQRSTUVWXYZ+*%&/()=?\¢!{}'
, int(rand(${rnd}4)*80)+1, 1)
|| case when length(s2) < 10 then ''
else left(s1, min(length(s1), l2-length(s2)-1)) end end
from nc
where (length(s1) < l1 or length(s2) < l2) and lv2 < 2*$maLe
)
select
int($paFr + $-{$paTo + .99 - $paFr} * rand(${rnd}5)),
n,
int(1e6*rand(${rnd}6)- .5e6),
s1, s2, ''
from nc
where length(s1) = l1 and length(s2) = l2
$/insSql/
$***out 20090924 15:07:24
$***out 20090924 15:06:33
$***out 20090924 15:06:00
$***out 20090924 15:05:39
$***out 20090924 15:05:17
$***out 20090924 15:03:35
}¢--- DSN.TX.CASE(WK600SPA) cre=2010-01-29 mod=2010-01-29-14.38.11 A540769 -----
with rtsSpace (sp, db, ts, pa, ix) as
(
select s.space, s.dbName, name, partition, ''
from sysIbm.sysTableSpaceStats s
union all select s.space, s.dbName, t.tsName, partition, s.name
from sysIbm.sysIndexSpaceStats s
join sysIbm.sysIndexes i
on s.dbName = i.dbName and s.name = i.name
and s.dbId = i.dbId and s.isobid = i.isobid
join sysibm.sysTables t
on s.dbName = t.dbName
and i.tbCreator = t.creator and i.tbName = t.name
)
, sp as
(
select sum(case when ix = '' then sp else 0 end) tsSp,
sum(case when ix = '' then 0 else sp end) ixSp,
'*' db, '*' ts
from rtsSpace
where db = 'DA540769'
union all select sum(case when ix = '' then sp else 0 end) tsSp,
sum(case when ix = '' then 0 else sp end) ixSp,
char(db, 8) db, char(ts, 8) ts
from rtsSpace
where db = 'DMAREC'
group by db, ts
)
select * from sp
-- where tsSp > 1.4e6 and tsSp < 1.6e6
order by 2 desc
with ur
;
x
select i.indexSpace, t.name
from sysibm.sysTables t, sysibm.sysindexes i
where i.tbCreator = t.creator
and i.tbName = t.name
and t.dbName = 'DMAREC'
and t.tsName in
('A600A000', 'A600A019', 'A600A001', 'A600A003'
,'A601A368', 'A600A099', 'A601A399'
)
;
x
x
with rtsSpace (sp, db, ts, pa, ix) as
(
select s.space, s.dbName, name, partition, ''
from sysIbm.sysTableSpaceStats s
union all select s.space, s.dbName, t.tsName, partition, s.name
from sysIbm.sysIndexSpaceStats s
join sysIbm.sysIndexes i
on s.dbName = i.dbName and s.name = i.name
and s.dbId = i.dbId and s.isobid = i.isobid
join sysibm.sysTables t
on s.dbName = t.dbName
and i.tbCreator = t.creator and i.tbName = t.name
)
select sp, char(db, 8) db, char(ts, 8) ts, pa, ix
from rtsSpace
where db = 'DMAREC'
order by 1 desc, 2 asc,3,4,5
with ur
;
}¢--- DSN.TX.CASE(WK600SP2) cre=2010-01-29 mod=2010-01-29-14.38.24 A540769 -----
select t.cardf, sum(real(r.totalRows)),
strip(t.dbName) || '.' || strip (t.tsName)
from sysibm.sysTables t,
sysibm.sysTablespace s,
sysibm.sysTableSpaceStats r
where
s.dbName = t.dbName and s.name = t.tsName
and r.dbName = s.dbName and r.name = s.name
and r.dbid = s.dbid and r.psid = s.psid
and s.dbName = 'DA540769'
group by t.dbName, t.tsName, t.cardf
having
t.cardf < sum(real(r.totalRows)) * .3
and max(t.cardf, sum(real(r.totalRows))) > 1e7
order by 1 desc
;
x
with rtsSpace (sp, db, ts, pa, ix) as
(
select s.space, s.dbName, name, partition, ''
from sysIbm.sysTableSpaceStats s
union all select s.space, s.dbName, t.tsName, partition, s.name
from sysIbm.sysIndexSpaceStats s
join sysIbm.sysIndexes i
on s.dbName = i.dbName and s.name = i.name
and s.dbId = i.dbId and s.isobid = i.isobid
join sysibm.sysTables t
on s.dbName = t.dbName
and i.tbCreator = t.creator and i.tbName = t.name
)
, sp as
(
select sum(case when ix = '' then sp else 0 end) tsSp,
sum(case when ix = '' then 0 else sp end) ixSp,
'*' db, '*' ts
from rtsSpace
where db = 'DMAREC'
union all select sum(case when ix = '' then sp else 0 end) tsSp,
sum(case when ix = '' then 0 else sp end) ixSp,
char(db, 8) db, char(ts, 8) ts
from rtsSpace
where db = 'DMAREC'
group by db, ts
)
select * from sp
-- where tsSp > 1.4e6 and tsSp < 1.6e6
order by 2 desc
with ur
;
x
select i.indexSpace, t.name
from sysibm.sysTables t, sysibm.sysindexes i
where i.tbCreator = t.creator
and i.tbName = t.name
and t.dbName = 'DMAREC'
and t.tsName in
('A600A000', 'A600A019', 'A600A001', 'A600A003'
,'A601A368', 'A600A099', 'A601A399'
)
;
x
x
with rtsSpace (sp, db, ts, pa, ix) as
(
select s.space, s.dbName, name, partition, ''
from sysIbm.sysTableSpaceStats s
union all select s.space, s.dbName, t.tsName, partition, s.name
from sysIbm.sysIndexSpaceStats s
join sysIbm.sysIndexes i
on s.dbName = i.dbName and s.name = i.name
and s.dbId = i.dbId and s.isobid = i.isobid
join sysibm.sysTables t
on s.dbName = t.dbName
and i.tbCreator = t.creator and i.tbName = t.name
)
select sp, char(db, 8) db, char(ts, 8) ts, pa, ix
from rtsSpace
where db = 'DMAREC'
order by 1 desc, 2 asc,3,4,5
with ur
;
}¢--- DSN.TX.CASE(WK600SQL) cre=2011-11-17 mod=2012-10-01-13.38.44 A540769 -----
//A540769R JOB (CP00,KE50),'DB2 REO', 00010000
// MSGCLASS=T,TIME=1440, 00020000
// NOTIFY=&SYSUID,REGION=0M 00030000
//*MAIN SYSTEM=S13,CLASS=LOG0 00040000
//*
//S1 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99, 00020001
// PARM='WSH'
//SYSPROC DD DSN=A540769.WK.REXX,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//OUT DD SYSOUT=*
//SYSTSIN DD DUMMY
//WSH DD *
$=pds = DSN.TX.CASE
$=mpr = WK600
call compRun '@', file($pds'(WK600INI)')
call sqlConnect $trgSubsys
$=cr= $trgCreator
say $cr'.'$tb
$=t1 = $cr.${tb}002
$=f1=0
$=f2=0
$=u3=0
/* error handling: don't continue silently with errors| */
m.sqlRetOk = '* say'
m.sqlRetOk = '-904 -501 say'
$@do wi=1 to 1e5 $@¢
$=t1 =- $cr'.'${tb}right(1 + wi // 49, 3, 0)
$=wv= %abc$wi%
m.st.0 = 0
call sqlPreAllCl 1, 'select i1, v1, upd from' $t1 ,
"where i1 =" $wi "and (v1 like '"$wv"' or 1=1)",
, st, ':m.ii.sx, :m.vv.sx, :m.uu.sx'
$=f1=- $f1 + m.st.0
$*( say 'fetched 1' m.st.0
do sx=1 to m.st.0
say m.ii.sx m.uu.sx m.vv.sx
end $*)
call sqlPreDeclare 2, "select i1, upd, strip(char(i1)) || ' ' " ,
"|| char(upd) || ' ' || strip(char(length(v1)))||': '||left(v1,30)",
'from' $t1 'where i1 = ? and (v1 like ? or 1 = 1)'
m.st.0 = 0
call sqlOpAllCl 2, st, ':m.ii.sx, :m.uu.sx, :m.vv.sx',
, $wi+456, $wv
$=f2=- $f2 + m.st.0
$*( say 'fetched 2' m.st.0
do sx=1 to m.st.0
say m.ii.sx m.uu.sx m.vv.sx
end
$*)
call sqlPrepare 3, 'update' $t1 'set v1 = translate(v1, ?, ?)' ,
'where i1 = ?'
call sqlExecStmt 3, 'abcABC', 'ABCabc', $wi
$=u3=- $u3 + sqlErrd.3
$** say 'update' sqlCode 'errd3' sqlErrd.3
if wi // 10 = 0 then do
say $wi 'fe1='$f1 'fe2='$f2 'up3='$u3 'table' $t1
call sleep 1
end
call sqlCommit
$!
}¢--- DSN.TX.CASE(WK600TMP) cre=2010-01-26 mod=2010-01-26-17.04.36 A540769 -----
-- standard templates begin 00010000
-- tCopyD: COPYDDN fuer copy etc. (1 Tag auf Disk, bzw. 1 Woche) 00020000
-- mit copy alter 1 Woche auf Disk A008Y001->COM#A041 00030000
-- ohne sofort archivieren SUB#ADB1 00040000
-- geaendert: uniq, ENN35,SUB#ADB1 bzw A008Y001,kein space 00050000
-- geaendert: enn0x zu ENN35, 03.06.09 / pk 00060000
TEMPLATE TCOPYD DSN('&SSID..&DB..&SN..P&PART..&UNIQ.') 00070000
DATACLAS(ENN35) MGMTCLAS(COM#A041) STORCLAS(FAR$N) 00080000
-- SPACE TRK MAXPRIME 600 00090000
SPACE (1500,10000) TRK 00100000
00110000
-- tCopyS: anlog TCOPYD, aber mit space 00120000
-- neu 00130000
TEMPLATE TCOPYS DSN('&SSID..&DB..&SN..P&PART..&UNIQ.') 00140000
DATACLAS(ENN35) MGMTCLAS(COM#A041) STORCLAS(FAR$N) 00150000
SPACE (800,500) CYL 00160000
00170000
TEMPLATE TCOPYD8 DSN('&SSID..&DB..&SN..P&PART..&UNIQ.') 00180000
DATACLAS(ENN35) MGMTCLAS(COM#A041) STORCLAS(FAR$N) 00190000
-- SPACE TRK MAXPRIME 600 00200000
SPACE (1500,10000) TRK 00210000
00220000
-- tCopyT: COPYDDN auf Tape 00230000
TEMPLATE TCOPYT DSN('&SSID..&DB..&SN..P&PART..&UNIQ.') 00240000
UNIT 3490 00250000
RETPD 23 00260000
STACK YES 00270000
00280000
-- tSRecD: UNLDDN fuer Unload 00290000
-- geaendert: ENN35,kein space 00300000
TEMPLATE TSRECD DSN('&SSID..&DB..&SN..P&PART..D&YE(3).&MO.&DA..REC') 00310000
DATACLAS(ENN35) MGMTCLAS(COM#A032) 00320000
SPACE TRK MAXPRIME 600 00330000
-- SPACE (100,10000) TRK 00340000
00350000
-- tSRecO: analog tSRecD fuer offline Reorg, mit sofortigem Delete 00360000
TEMPLATE TSRECO DSN('&SSID..&DB..&SN..P&PART..&UNIQ..REO') 00370000
DATACLAS(ENN35) MGMTCLAS(COM#E001) 00380000
SPACE TRK MAXPRIME 600 00390000
-- SPACE (100,10000) TRK 00400000
00410000
-- tSyUtD: WORKDDN(1,) ¢SYSUT1! fuer check, load, merge 00420000
-- geaendert: uniq, ENN35,kein space 00430000
TEMPLATE TSYUTD DSN('&SSID..&DB..&SN..P&PART..&UNIQ..UT') 00440000
DATACLAS(ENN35) MGMTCLAS(COM#E001) 00450000
SPACE TRK MAXPRIME 600 00460000
-- SPACE (100,10000) TRK 00470000
00480000
-- tSyUtS: analog tSyUtD aber mit Space 00490000
TEMPLATE TSYUTS DSN('&SSID..&DB..&SN..P&PART..&UNIQ..UT') 00500000
DATACLAS(ENN35) MGMTCLAS(COM#E001) 00510000
SPACE (100,10000) TRK 00520000
00530000
-- tSOutD: WORKDDN(,2) ¢SORTOUT! fuer checkData, load 00540000
-- geaendert: uniq, ENN35,kein space 00550000
TEMPLATE TSOUTD DSN('&SSID..&DB..&SN..P&PART..&UNIQ..SRT') 00560000
DATACLAS(ENN35) MGMTCLAS(COM#E001) 00570000
SPACE TRK MAXPRIME 600 00580000
-- SPACE (100,10000) TRK 00590000
00600000
-- tSOutS: analog tSOutD mit Space 00610000
TEMPLATE TSOUTS DSN('&SSID..&DB..&SN..P&PART..&UNIQ..SRT') 00620000
DATACLAS(ENN35) MGMTCLAS(COM#E001) 00630000
SPACE (100,10000) TRK 00640000
00650000
-- tErrD: ERRDDN fuer Load, CheckData 00660000
-- geaendert: ENN35,kein space 00670000
TEMPLATE TERRD DSN('&SSID..&DB..&SN..P&PART..D&YE(3).&MO.&DA..ERR') 00680000
DATACLAS(ENN35) MGMTCLAS(COM#A032) 00690000
SPACE (100,10000) TRK 00700000
00710000
-- tMapD: MAPDDN fuer load mit enforce constraints 00720000
-- geaendert: uniq, ENN35,kein space 00730000
TEMPLATE TMAPD DSN('&SSID..&DB..&SN..P&PART..&UNIQ..MAP') 00740000
DATACLAS(ENN35) MGMTCLAS(COM#E001) 00750000
SPACE (100,10000) TRK 00760000
00770000
-- tDisc: DISCARDDN fuer Load, Reorg 00780000
-- geaendert: ENN35,kein space 00790000
TEMPLATE TDISC DSN('&SSID..&DB..&SN..P&PART..D&YE(3).&MO.&DA..DIS') 00800000
DATACLAS(ENN35) MGMTCLAS(COM#A032) 00810000
SPACE (100,10000) TRK 00820000
00830000
-- tPunch: PUNCHDDN fuer reorg unload 00840000
TEMPLATE TPUNCH DSN('&SSID..&DB..&SN..P&PART..D&YE(3).&MO.&DA..PUN') 00850000
DATACLAS(NULL8) MGMTCLAS(COM#A032) 00860000
SPACE(1,10) TRK 00870000
--- standard templates end -------------------------------------------- 00880000
}¢--- DSN.TX.CASE(WK600TRN) cre=2010-01-28 mod=2010-01-29-08.21.22 A540769 -----
//A540769W JOB (CP00,KE50),TIME=9999
//*MAIN CLASS=LOG
//*
//S1 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99,
// PARM='WSH'
//SYSPROC DD DISP=SHR,DSN=A540769.WK.REXX
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//OUT DD SYSOUT=*
//SYSTSIN DD DUMMY
//WSH DD *
$#@
$****** transfer unload files with csm from rz1 to rr2
$<#/dsn/
A540769.RECUN.DGDB9998.A600A190.P0000
A540769.RECUN.DGDB9998.A600A000.P0000
A540769.RECUN.DGDB9998.A600A001.P0000
A540769.RECUN.DGDB9998.A600A002.P0000
A540769.RECUN.DGDB9998.A600A003.P0000
A540769.RECUN.DGDB9998.A600A004.P0000
A540769.RECUN.DGDB9998.A600A005.P0000
A540769.RECUN.DGDB9998.A600A006.P0000
A540769.RECUN.DGDB9998.A600A007.P0000
A540769.RECUN.DGDB9998.A600A008.P0000
A540769.RECUN.DGDB9998.A600A009.P0000
A540769.RECUN.DGDB9998.A600A010.P0000
A540769.RECUN.DGDB9998.A600A020.P0000
A540769.RECUN.DGDB9998.A600A050.P0000
A540769.RECUN.DGDB9998.A600A060.P0000
$/dsn/ $@for v $@¢
pre = strip($v)
say pre
suf = '.UN2'
do i=1 to 8
dsn = pre || i || suf
call csmCopy 'RZ1/'dsn, 'RZ2/'dsn
end
$!
}¢--- DSN.TX.CASE(WK906) cre=2009-08-13 mod=2009-11-24-16.55.00 A540769 --------
=DQ0G=1
creDb trg 1
+ ok creDb A540769.TX.GENF(WK906t1)
creDb src 3
+ ok creDb A540769.TX.GENF(WK906s3)
* dbx c
* check: compare detects add column but no label for it in cdl
* dbx i dq0g
* dbx i dq0g
manual na
+ ok na
* run
* dbx c
* check: compare detects missing label but creates empty cdl
creDb trg 2
+ ok creDb A540769.TX.GENF(WK906t2)
creDb src 3
+ ok creDb A540769.TX.GENF(WK906s3)
}¢--- DSN.TX.CASE(WK906DDL) cre=2009-08-13 mod=2009-11-24-16.49.04 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
drop tablespace $db.a906a;
commit;
------------------------------------------------------------------------
CREATE TABLESPACE A906A
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
SEGSIZE 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255
; ---------------------------------------------------------------------
CREATE TABLE $creator.TWK906A1
(WK906CH20 CHAR(20) FOR SBCS DATA not null with default
$@¢
if $phase >= 2 then $@=¢
,WK906CH5 CHAR(4) FOR SBCS DATA not null with default
$! if $phase >= 3 then $@=¢
,WK906CH2 CHAR(2) FOR SBCS DATA not null with default
$! if $phase >= 4 then $@=¢
,WK906TST TIMESTAMP not null with default
$! if $phase >= 5 then $@=¢
,WK906CH7 CHAR(7) FOR SBCS DATA not null with default
$!
$!
)
IN $db.A906A
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE ;
LABEL ON TABLE $creator.TWK906A1 IS 'Modellversion';
LABEL ON $creator.TWK906A1
(WK906CH20 is 'ch20 char(20)'
$@¢
if $phase >= 2 then $@=¢
,WK906CH5 is 'ch5 char(5)'
$! if $phase >= 3 then $@=¢
,WK906CH2 is 'ch2 char(2)'
$! if $phase >= 4 then $@=¢
,WK906TST is 'tst timestamp'
$! if $phase >= 5 then $@=¢
,WK906CH7 is 'ch7 char(7)'
$!
$!
)
;
commit
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(WK907) cre=2009-08-13 mod=2010-02-18-14.25.31 A540769 --------
=DQ0G=1
creDb trg 1
+ ok creDb A540769.TX.GENF(WK907t1) ::f
creDb src 2
+ ok creDb A540769.TX.GENF(WK907s2) ::f
manual dbx c
+ wait dbx c
manual check compare finds missing label but creates empty cdl
}¢--- DSN.TX.CASE(WK907DDL) cre=2009-08-13 mod=2010-02-18-14.25.20 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
drop tablespace $db.a907a;
commit;
------------------------------------------------------------------------
CREATE TABLESPACE A907A
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
SEGSIZE 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255
; ---------------------------------------------------------------------
CREATE TABLE $creator.TWK907A1
(WK907CH20 CHAR(20) FOR SBCS DATA not null with default
,WK907CH5 CHAR(4) FOR SBCS DATA not null with default
)
IN $db.A907A
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE ;
LABEL ON TABLE $creator.TWK907A1 IS 'Modellversion';
LABEL ON $creator.TWK907A1
(WK907CH20 is 'ch20 char(20)'
$@¢
if $phase >= 2 then $@=¢
,WK907CH5 is 'ch5 char(5)'
$!
$!
)
; ---------------------------------------------------------------------
COMMIT;
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(WK908) cre=2009-08-14 mod=2011-06-06-13.07.03 A540769 --------
*
* change clustering index ==> test reorg/runstats||?
*
=DQ0G=0
creDb trg 1
+ ok creDb A540769.TX.GENF(WK908t1) ::f
creDb src 2
+ ok creDb A540769.TX.GENF(WK908s2) ::f
}¢--- DSN.TX.CASE(WK908DDL) cre=2009-08-14 mod=2010-08-06-11.20.54 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
drop tablespace $db.a908a;
commit;
------------------------------------------------------------------------
CREATE TABLESPACE A908A
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
SEGSIZE 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255
; ---------------------------------------------------------------------
CREATE TABLE $creator.TWK908A1
(WK908CH20 CHAR(20) FOR SBCS DATA not null with default
,WK908CH5 CHAR(4) FOR SBCS DATA not null with default
,WK908CH2 CHAR(2) FOR SBCS DATA not null with default
,WK908TST TIMESTAMP not null with default
,WK908CH7 CHAR(7) FOR SBCS DATA not null with default
)
IN $db.A908A
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE ;
commit
; ---------------------------------------------------------------------
CREATE INDEX $creator.IWK908A0
ON $creator.TWK908A1
(WK908CH20 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
$@¢
if $phase <= 1 then $@=¢
CLUSTER
$! else $@=¢
not CLUSTER
$!
$!
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 2 G
;
CREATE INDEX $creator.IWK908A1
ON $creator.TWK908A1
(WK908CH5 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
$@¢
if $phase > 1 then $@=¢
CLUSTER
$! else $@=¢
not CLUSTER
$!
$!
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES
PIECESIZE 2 G
;
commit
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(WK909) cre=2009-08-18 mod=2009-08-18-16.07.17 A540769 --------
=DQ0G=1
=ddl = A540769.TX.CASE(wk906ddl)
creDb trg 1
+ ok creDb A540769.TX.GENF(WK909t1)
creDb src 2
+ ok creDb A540769.TX.GENF(WK909s2)
manual dbx c
+ ok t dbx c
credb trg 2
+ ok creDb A540769.TX.GENF(WK909t2)
credb src 1
+ ok creDb A540769.TX.GENF(WK909s1)
manual dbx c import 0+1
+ ok t dbx c import 0+1, ana
creDb trg 1
+ ok creDb A540769.TX.GENF(WK909t1)
manual ana run -> should be no drop but empty change
+ wait ana run -> should be no drop but empty change
}¢--- DSN.TX.CASE(WK910) cre=2009-08-18 mod=2009-08-18-18.00.06 A540769 --------
/* rexx ****************************************************************
rexx exec sql gives sql error for set path
***********************************************************************/
address tso "SUBCOM DSNREXX"
if rc <> 0 then do
sRc = RXSUBCOM('ADD','DSNREXX','DSNREXX') /* ADD HOST CMD ENV */
if sRc <> 0 then
call err 'rc' sRc 'from RXSUBCOM(ADD, DSNREXX, DSNREXX)'
end
address dsnRexx "connect DBAF"
say 'connect sqlCode' sqlMsg()
address dsnRexx "execSql set :var = current timestamp"
say 'set var' sqlCode 'var=' var
address dsnRexx "execSql set path = 'SYSIBM'"
say "set path = 'SYSIBM' sqlCode" sqlCode sqlMsg()
address dsnRexx "execSql set path = SYSIBM"
say "set path = SYSIBM sqlCode" sqlCode sqlMsg()
address dsnRexx "execSql set path = ""SYSIBM"""
say "set path = ""SYSIBM"" sqlCode" sqlCode sqlMsg()
address dsnRexx "execSql set path = 'SYSIBM','SYSPROC'"
say "set path = 'SYSIBM','SYSPROC' sqlCode" sqlCode sqlMsg()
address dsnRexx "disconnect"
say 'disconnect sqlCode' sqlCode
exit
/*--- issue an sql error message -------------------------------------*/
sqlMsg: /* no procedure, to keep variables sql... */
signal on syntax name sqlMsgOnSyntax
ggRes = 'sqlCode' sqlCodeT(sqlCode, sqlErrMc, sqlwarn.0':' ,
|| sqlwarn.1||sqlwarn.2||sqlwarn.3||sqlwarn.4||sqlwarn.5',',
|| sqlwarn.6||sqlwarn.7||sqlwarn.8||sqlwarn.9||sqlwarn.10)
if 0 then
sqlMsgOnSyntax: do
ggRes = 'sqlCode' sqlCode translate(sqlErrMc, ',', 'ff'x),
'<<rexx sqlCodeT not found or syntax>>\nwarnings'
do ggX=0 to 10
if sqlWarn.ggx <> '' then
ggRes = ggRes ggx'='sqlWarn.ggx
end
end
signal off syntax
ggRes = ggRes'\nstate' sqlState'\nstmt = ' ggSqlStmt
ggPref = '\nwith'
ggXX = pos(':', ggSqlStmt)+1
do 12 while ggXX > 1
ggYY = verify(ggSqlStmt, ' ,:+-*/&%?|()¢!', 'm', ggXX)
if ggYY < 1 then
ggYY = length(ggSqlStmt) + 1
ggVar = substr(ggSqlStmt, ggXX, ggYY - ggXX)
if ggVar <> '' then do
ggRes = ggRes || ggPref ggVar '=' value(ggVar)
ggPref = '\n '
end
ggXX = pos(':', ggSqlStmt, ggYY+1) + 1
end
return ggRes
endSubroutine sqlMsg
}¢--- DSN.TX.CASE(WK911) cre=2016-06-23 mod=2016-06-23-08.35.19 A540769 --------
* repartitionierung
* test mit wk911sel
* Achtung Aenderung von indexPartitionsGrenzen
* darf mit CA nicht funktionieren
* - nur Migration von ix auf tb based|
=DQ0G=0
creDb trg 1
+ ok creDb DSN.TX.GENF(WK911t1) ::f
creDb src 2
+ ok creDb DSN.TX.GENF(WK911s2) ::f
* dbx c i, ana run
manual check drop and recreate tablespace
+ wait check drop and recreate tablespace
* credb trg 2
=partKeys=1
credb src 3
* dbx c, i ; ana run
* check number of partitioning columns changed --> drop/recreate
manual dbx c check equal
credb trg 2
=partKeys=wrong
credb src 3
* dbx c, i ; ana run
* check partitioning keys changed --> drop/recreate
manual verify in catalog differen part keys|
=partKeys=2
credb trg 3
=partKeys=wrong
credb src 3
* dbx c
manual check that copare detects change of partition keys
*********************************** split last partition
=partKeys=2
credb trg 2
credb src 3
* dbx i c; ana run
manual check alter und add (kein Drop) copy, reorg, runstats
*********************************** add last partition only
credb trg 3
credb src 4
* dbx i c; ana run
manual check alter und add (kein Drop) copy?, runstats?
*********************************** change last two parts forward add 1
credb trg 4
credb src 5
* dbx i c; ana run
manual check alter und add (kein Drop) copy?, runstats?
*********************************** change last two parts backward add 1
credb trg 5
credb src 6
* dbx i c; ana run
manual check alter und add (kein Drop) copy?, runstats?
*********************************** rotate first to last
credb trg 6
credb src 7
* dbx i c; ana run
manual check kein rotate sondern???
}¢--- DSN.TX.CASE(WK911A) cre=2009-08-20 mod=2010-02-18-14.02.42 A540769 -------
* db2Admin generates add partition, even when partitioning keys changed
=DQ0G=1
credb trg 2
+ ok creDb A540769.TX.GENF(WK911t2) ::f
=partKeys=wrong
credb src 3
+ ok creDb A540769.TX.GENF(WK911s3) ::f
* dbx c, i ; ana run
* check partitioning columns changed --> drop/recreate
manual with ddl that partitioning columns are the same
+ wait with ddl that partitioning columns are the same
}¢--- DSN.TX.CASE(WK911B) cre=2009-08-21 mod=2010-02-18-14.08.38 A540769 -------
* db2Admin generates add partition, even when partitioning keys changed
=DQ0G=1
=partKeys=2
credb trg 3
+ ok creDb A540769.TX.GENF(WK911t3) ::f
=partKeys=wrong
credb src 3
+ ok creDb A540769.TX.GENF(WK911s3) ::f
* dbx c
manual check that copare detects change of partition keys
+ wait check that copare detects change of partition keys
}¢--- DSN.TX.CASE(WK911DDL) cre=2009-08-20 mod=2016-06-23-08.34.55 A540769 -----
------------$-¢right(userid() sysvar(sysnode) date(s) time(),60, '-')$!
-- testCase $dsn
-- env $env phase $phase
-- subsys $dbSys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
drop TABLESPACE $db.awk911k;
commit;
CREATE TABLESPACE awk911k
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
DSSIZE 32 G
NUMPARTS $-¢min(9, $phase+3)$!
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255;
COMMIT;
------------------------------------------------------------------------
CREATE TABLE $creator.Tqz91wk911k1
(WK911K001 CHAR(3) FOR SBCS DATA NOT NULL,
WK911K002 CHAR(4) FOR SBCS DATA NOT NULL,
WK911K003 CHAR(20) FOR SBCS DATA NOT NULL,
WK911K004 DATE NOT NULL WITH DEFAULT
)
IN $db.awk911k
$@¢
$=tt=900
if $phase > 2 then $@¢
if \ ${?partKeys} then
$=partKeys=2
if $partKeys = 1 then $@=¢
partition by (WK911K001)
$! else if $partKeys = 'wrong' then $@=¢
partition by (WK911K001, WK911K003)
$! else if $partKeys = 2 then $@=¢
partition by (WK911K001, WK911K002)
$!
if $phase < 7 then $@=¢
(PART 1 VALUES('100')
,PART 2 VALUES('200')
,PART 3 VALUES('300')
,PART 4 VALUES('400')
,PART 5 VALUES('500')
$@¢
if $phase <= 3 then $@=¢
,PART 6 VALUES('900')
$! else if $phase = 4 then $@=¢
,PART 6 VALUES('900')
,PART 7 VALUES('950')
$=tt=950
$! else if $phase = 5 then $@=¢
,PART 6 VALUES('600')
,PART 7 VALUES('700')
,PART 8 VALUES('900')
$! else if $phase = 6 then $@=¢
,PART 6 VALUES('600')
,PART 7 VALUES('970')
,PART 8 VALUES('980')
,PART 9 VALUES('990')
$=tt=990
$!
$!
$! else if $phase = 7 then $@=¢
(PART 1 VALUES('200')
,PART 2 VALUES('300')
,PART 3 VALUES('400')
,PART 4 VALUES('500')
,PART 5 VALUES('600')
,PART 6 VALUES('970')
,PART 7 VALUES('980')
,PART 8 VALUES('990')
,PART 9 VALUES('999')
$=tt=999
$!
$@=¢
)
$!
$! $** $phase >= 2
$!
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
COMMIT;
------------------------------------------------------------------------
CREATE INDEX $creator.Iqz91wk911k1
ON $creator.Tqz91wk911k1
(WK911K001 ASC
,WK911K002 ASC
-- ,WK911K003 ASC
)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
CLUSTER
PARTITIONED
$@¢
if $phase <= 2 then $@=¢
(PART 1 VALUES('100')
,PART 2 VALUES('200')
,PART 3 VALUES('300')
$@¢
if $phase <= 1 then $@=¢
,PART 4 VALUES('900')
$! else $@=¢
,PART 4 VALUES('400')
,PART 5 VALUES('900')
$!
$!
)
$!
$!
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES;
COMMIT;
set current schema = $creator;
$=i=insert into Tqz91wk911k1 values
$i ('001', '001b', '001c', '01.01.1001');
$i ('102', '102b', '102c', '02.02.1102');
$i ('203', '203b', '203c', '03.03.1203');
$i ('304', '304b', '304c', '04.04.1304');
$i ('405', '405b', '405c', '05.05.1405');
$i ('506', '506b', '506c', '06.06.1506');
$i ('607', '607b', '607c', '07.07.1607');
$i ('708', '708b', '708c', '08.08.1708');
$i ('899', '899b', '899c', '09.09.1899');
$i ('$tt', '${tt}b'
, '$tt ctop', '12.12.1$tt');
commit;
------------------------------------------------------------------------
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(WK911SEL) cre=2011-12-12 mod=2011-12-12-15.05.26 A540769 -----
select *
from A540769.twk911k1
;
select *
from gdb9998.twk911k1
}¢--- DSN.TX.CASE(WK912) cre=2009-08-21 mod=2011-06-06-12.59.27 A540769 --------
* ueberfluessiges drop Aug09
* stringRange Aug10
=DQ0G=0
credb trg 1
+ ok creDb A540769.TX.GENF(WK912t1) ::f
credb src 2
+ ok creDb A540769.TX.GENF(WK912s2) ::f
* dbx c, i mit dbaCheck 0
}¢--- DSN.TX.CASE(WK912DDL) cre=2009-08-21 mod=2010-08-06-15.04.30 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
drop TABLESPACE $db.A912K;
commit;
CREATE TABLESPACE A912K
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
DSSIZE 32 G
NUMPARTS $-{$phase+2}
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255;
COMMIT;
------------------------------------------------------------------------
CREATE TABLE $creator.TWK912K1
(WK912K001 CHAR(3) FOR SBCS DATA NOT NULL
,WK912K002 CHAR(4) FOR SBCS DATA NOT NULL
,WK912K003 CHAR(20) FOR SBCS DATA NOT NULL
$@¢
if $phase >= 2 then $@=¢
,WK912K004 DATE NOT NULL WITH DEFAULT
$!
$!
)
IN $db.A912K
$@¢
if $phase >= 2 then $@=¢
partition by (WK912K001)
(PART 1 VALUES('100')
,PART 2 VALUES('200')
,PART 3 VALUES('300')
,PART 4 VALUES('400')
)
$!
$!
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
COMMIT;
------------------------------------------------------------------------
CREATE INDEX $creator.IWK912K1
ON $creator.TWK912K1
(WK912K001 ASC
)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
CLUSTER
$@¢
if $phase = 1 then $@=¢
(PART 1 VALUES('100')
,PART 2 VALUES('200')
,PART 3 VALUES('300')
)
$!
$!
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES;
COMMIT;
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(WK913) cre=2016-01-08 mod=2016-01-08-12.01.10 A540769 --------
************************ ana.merge row not found
************************ only index- to table-partitioned
=DQ0G=0
credb trg 1
+ ok creDb DSN.TX.GENF(WK913t1) ::f
manual check ana does not fail, changed to table controlled partitioning
+ wait check ana does not fail, changed to table controlled partitioning
credb src 2
* dbx c i; ana run
}¢--- DSN.TX.CASE(WK913ALT) cre=2016-01-07 mod=2016-01-07-15.16.19 A540769 -----
set current sqlid = 'S100447';
alter index qz92crT.iWK913K1 not cluster;
alter index qz92crT.iWK913K1 cluster ;
commit
}¢--- DSN.TX.CASE(WK913DDL) cre=2009-08-21 mod=2016-01-08-12.00.47 A540769 -----
------------$-¢right(userid() sysvar(sysnode) date(s) time(), 60, '-')$!
-- testCase $dsn
-- env $env phase $phase
-- dbSys $dbSys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
drop TABLESPACE $db.A913K;
commit;
CREATE TABLESPACE A913K
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
NUMPARTS 4
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255;
COMMIT;
------------------------------------------------------------------------
CREATE TABLE $creator.TWK913K1
(WK913K001 CHAR(3) FOR SBCS DATA NOT NULL
,WK913K002 CHAR(4) FOR SBCS DATA NOT NULL
,WK913K003 CHAR(20) FOR SBCS DATA NOT NULL
)
IN $db.A913K
$@¢
if $phase >= 2 then $@=¢
partition by (WK913K001)
(PART 1 VALUES('100')
,PART 2 VALUES('200')
,PART 3 VALUES('300')
,PART 4 VALUES('400')
)
$!
$!
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
COMMIT;
------------------------------------------------------------------------
CREATE INDEX $creator.IWK913K1
ON $creator.TWK913K1
(WK913K001 ASC
,WK913K002 ASC
)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
CLUSTER
$@¢
if $phase = 1 then $@=¢
(PART 1 VALUES('100')
,PART 2 VALUES('200')
,PART 3 VALUES('300')
,PART 4 VALUES('400')
)
$! else $@=¢
partitioned
$!
$!
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES;
COMMIT;
insert into $creator.TWK913K1 values('010', '010+', '010*****');
insert into $creator.TWK913K1 values('110', '110+', '110*****');
insert into $creator.TWK913K1 values('210', '210+', '210*****');
insert into $creator.TWK913K1 values('310', '310+', '310*****');
commit;
insert into $creator.TWK913K1 values('410', '410+', '410*****');
insert into $creator.TWK913K1 values('510', '510+', '510*****');
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(WK914) cre=2009-08-21 mod=2010-02-18-13.58.59 A540769 --------
************************ ana.merge row not found
************************ only index- to table-partitioned
=DQ0G=1
credb trg 1
+ ok creDb A540769.TX.GENF(WK914t1) ::f
credb src 2
+ ok creDb A540769.TX.GENF(WK914s2) ::f
* dbx c i; ana run
manual check ana does not fail, changed to table controlled partitioning
+ wait check ana does not fail, changed to table controlled partitioning
}¢--- DSN.TX.CASE(WK914DDL) cre=2009-08-21 mod=2010-02-18-13.50.10 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
drop TABLESPACE $db.A914S;
drop TABLESPACE $db.A914P;
commit;
$@¢
if $phase >= 2 then $@=¢
CREATE TABLESPACE A914S
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255;
COMMIT;
CREATE TABLESPACE A914P
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
NUMPARTS 4
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255;
COMMIT;
------------------------------------------------------------------------
CREATE TABLE $creator.TWK914S1
(WK914K001 CHAR(3) FOR SBCS DATA NOT NULL
,WK914K002 CHAR(4) FOR SBCS DATA NOT NULL
,WK914K003 CHAR(20) FOR SBCS DATA NOT NULL
)
IN $db.A914S
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
COMMIT;
------------------------------------------------------------------------
CREATE TABLE $creator.TWK914P1
(WK914K001 CHAR(3) FOR SBCS DATA NOT NULL
,WK914K002 CHAR(4) FOR SBCS DATA NOT NULL
,WK914K003 CHAR(20) FOR SBCS DATA NOT NULL
)
IN $db.A914P
partition by (WK914K001)
(PART 1 VALUES('100')
,PART 2 VALUES('200')
,PART 3 VALUES('300')
,PART 4 VALUES('400')
)
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
COMMIT;
$!
$!
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(WK915) cre=2009-08-25 mod=2012-04-17-11.18.41 A540769 --------
* fehler 174 passiert nicht bei neu generiertem Target
* fehler 182: convert for alter fails (cm and object compare)
=DQ0G=0
creDb trg 1
creDb src 2
* dbx c with twalpro3 ingore4, i, ana run
manual check run ok and data with wk915sel
* dito mit object compare
}¢--- DSN.TX.CASE(WK915B) cre=2011-12-16 mod=2012-12-14-14.03.59 A754048 -------
* Daten Conversion ohne drop identity
=DQ0G=0
creDb trg 2
+ ok creDb DSN.TX.GENF(WK915t2) ::f
creDb src 3
+ ok creDb DSN.TX.GENF(WK915s3) ::f
}¢--- DSN.TX.CASE(WK915C) cre=2009-10-08 mod=2009-10-08-17.01.25 A540769 -------
* testdaten im dbzf
nop
-= nopCount = 1
+ ok nop
- nop opts =
- nop opts =
= srcSubsys = DBZF
creDb src 1
+ ok creDb A540769.TX.GENF(WK915s1)
}¢--- DSN.TX.CASE(WK915DDL) cre=2009-08-25 mod=2012-12-13-15.29.08 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
drop TABLESPACE $db.A915A;
commit;
CREATE TABLESPACE A915A
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255;
COMMIT;
SET CURRENT SQLID='S100447';
CREATE TABLE $creator.TWK915A1
(
$@¢
if $phase > -9 then $@=¢
WK91501I DECIMAL(7, 0) NOT NULL GENERATED BY DEFAULT
AS IDENTITY
(START WITH 290000, INCREMENT BY 1, CACHE 20, NO CYCLE,
NO ORDER, MAXVALUE 9999999, MINVALUE 290000),
$! else $@=¢
WK91501I DECIMAL(7, 0) NOT NULL,
$!
$!
WK91502A CHAR(6) FOR SBCS DATA NOT NULL,
WK91503A CHAR(6) FOR SBCS DATA NOT NULL,
WK91504A CHAR(6) FOR SBCS DATA NOT NULL,
WK91505A CHAR(6) FOR SBCS DATA NOT NULL,
WK91506A CHAR(30) FOR SBCS DATA NOT NULL,
WK91507A CHAR(6) FOR SBCS DATA NOT NULL,
WK91508A CHAR(8) FOR SBCS DATA NOT NULL,
WK91509A CHAR(6) FOR SBCS DATA NOT NULL,
WK91510A CHAR(6) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK91511A CHAR(8) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK91512A CHAR(6) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK91513A CHAR(6) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WK91514A CHAR(8) FOR SBCS DATA NOT NULL
WITH DEFAULT,
$@¢
if $phase <= 2 then $@=¢
WK91515A CHAR(8) FOR SBCS DATA NOT NULL
WITH DEFAULT,
$! else $@=¢
WK91515A CHAR(6) FOR SBCS DATA NOT NULL
WITH DEFAULT,
$!
$!
WK91516A CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
CONSTRAINT WK91501I
PRIMARY KEY (WK91501I
$@¢
if $phase > 1 then $@=¢
, WK91514A
$!
$!
)
)
IN $db.A915A
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
LABEL ON TABLE $creator.TWK915A1 IS 'EUREX-Kontrahenten';
COMMENT ON TABLE $creator.TWK915A1 IS '?';
COMMENT ON $creator.TWK915A1
(WK91516A IS 'KENNZEICHEN EBS-REPORTED / DB2: EKZ',
WK91515A IS 'GUELTIG-BIS-DATUM / DB2: EGUELBIS',
WK91514A IS 'GUELTIG-AB-DATUM / DB2: EGUELVON',
WK91513A IS 'ANERKANNTE BÖRSE / DB2: ECEDEL',
WK91512A IS 'EUROCLEAR / DB2: EEUROCLR',
WK91511A IS 'SECOM / DB2: ESECOM',
WK91510A IS 'SEGA-NR / DB2: ESEGA',
WK91509A IS 'MUTATIONSZEIT / DB2: EMUTTIM',
WK91508A IS 'MUTATIONSDATUM / DB2: EMUTDAT',
WK91507A IS 'MUTATIONSPROGRAMM / DB2: EMUTPGM',
WK91506A IS 'WS80-GESCHAEFTSART-BEZEICHUNG / DB2: ENAME30',
WK91505A IS 'WS80-GESCHAEFTSART / DB2: EKBZ',
WK91504A IS 'ISO-CODE-BEZEICHNUNG / DB2: ECODISO',
WK91503A IS 'TELEKURS-CODE-BEZEICHNUNG / DB2: ECODTK',
WK91502A IS 'SKA-CODE-BEZEICHUNG / DB2: ECODSKA',
WK91501I IS 'Objekt-Id der Tabellenrow Primary-Key');
LABEL ON $creator.TWK915A1
(WK91516A IS 'EKZ',
WK91515A IS 'EGUELBIS',
WK91514A IS 'EGUELVON',
WK91513A IS 'ECEDEL',
WK91512A IS 'EEUROCLR',
WK91511A IS 'ESECOM',
WK91510A IS 'ESEGA',
WK91509A IS 'EMUTTIM',
WK91508A IS 'EMUTDAT',
WK91507A IS 'EMUTPGM',
WK91506A IS 'ENAME30',
WK91505A IS 'EKBZ',
WK91504A IS 'ECODISO',
WK91503A IS 'ECODTK',
WK91502A IS 'ECODSKA',
WK91501I IS 'EOBJID#');
COMMIT;
------------------------------------------------------------------------
CREATE UNIQUE INDEX $creator.IWK915A1
ON $creator.TWK915A1
( WK91501I ASC
$@¢
if $phase > 1 then $@=¢
, WK91514A ASC
$!
$!
)
USING STOGROUP GSMS
PRIQTY 40 SECQTY 40
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
$@¢
if $phase > 1 then $@=¢
insert into $creator.Twk915A1 values (
111, 'eins02', 'eins03', 'eins04', 'eins05', 'eins06 eins06 eins06',
'eins07', 'eins08', 'eins09', 'eins10', 'eins11', 'eins12',
'eins13', 'eins14qr', 'eins15', '1');
insert into $creator.Twk915A1 values (
222, 'zwei02', 'zwei03', 'zwei04', 'zwei05', 'zwei06 zwei06 zwei06',
'zwei07', 'zwei08', 'zwei09', 'zwei10', 'zwei11', 'zwei12',
'zwei13', 'zwei14qr', 'zwei15', '2');
insert into $creator.Twk915A1 values (
333, 'drei02', 'drei03', 'drei04', 'drei05', 'drei06 drei06 drei06',
'drei07', 'drei08', 'drei09', 'drei10', 'drei11', 'drei12',
'drei13', 'drei14qr', 'drei15', '3');
insert into $creator.Twk915A1 values (
444, 'vier02', 'vier03', 'vier04', 'vier05', 'vier06 vier06 vier06',
'vier07', 'vier08', 'vier09', 'vier10', 'vier11', 'vier12',
'vier13', 'vier14qr', 'vier15', '4');
insert into $creator.Twk915A1 values (
555, 'fünf02', 'fünf03', 'fünf04', 'fünf05', 'fünf06 fünf06 fünf06',
'fünf07', 'fünf08', 'fünf09', 'fünf10', 'fünf11', 'fünf12',
'fünf13', 'fünf14qr', 'fünf15', '5');
$@¢
if $phase <= 2 then $@=¢
update $creator.Twk915A1 set WK91515A= strip(WK91515A) || 'st';
$!
$!
commit;
alter TABLE $creator.TWK915A1 alter WK91501I
set generated always set minValue 290000
set maxValue 9999999
set CACHE 20
set NO CYCLE
set NO ORDER
;
COMMIT;
$!
$!
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(WK915DDS) cre=2009-08-25 mod=2009-08-25-13.12.32 A540769 -----
------------------------------------------------------------------------
-- --
-- Database 2 Administration Tool (DB2 Admin) , program 5697-L90 --
-- --
-- ADB2GEN - Extract object definitions from the DB2 Catalog tables --
-- --
-- Title : SRC WB01007C 0 --
-- --
-- Input prepared on : DBAF (915) Extract time : 2009-08-25 10:12 --
-- --
-- Catalog values overridden : none
-- --
-- Generate : SG=N DB=Y TS=Y TB=Y VW=Y IX=Y SY=Y AL=Y LB=Y CM=Y FK=Y --
-- TG=Y UT=N UF=N SP=N SQ=N RO=N --
-- Grants : SG=N DB=N TS=N TB=N VW=N SC=N UT=N UF=N SP=N SQ=N --
-- --
------------------------------------------------------------------------
------------------------------------------------------------------------
-- --
-- ADB2GEN: Generate DDL for Table=GDB0135.TWBXYZA1
-- --
------------------------------------------------------------------------
--
------------------------------------------------------------------------
-- Table=GDB0135.TWBXYZA1 In DGDB0135.AXYZA
------------------------------------------------------------------------
--
SET CURRENT SQLID='S100447';
--drop TABLESPACE $db.A915A;
commit;
CREATE TABLESPACE AXYZA
IN DGDB0135
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255;
COMMIT;
--
CREATE TABLE GDB0135.TWBXYZA1
(WBXYZ01I DECIMAL(7, 0) NOT NULL,
WBXYZ02A CHAR(6) FOR SBCS DATA NOT NULL,
WBXYZ03A CHAR(6) FOR SBCS DATA NOT NULL,
WBXYZ04A CHAR(6) FOR SBCS DATA NOT NULL,
WBXYZ05A CHAR(6) FOR SBCS DATA NOT NULL,
WBXYZ06A CHAR(30) FOR SBCS DATA NOT NULL,
WBXYZ07A CHAR(6) FOR SBCS DATA NOT NULL,
WBXYZ08A CHAR(8) FOR SBCS DATA NOT NULL,
WBXYZ09A CHAR(6) FOR SBCS DATA NOT NULL,
WBXYZ10A CHAR(6) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WBXYZ11A CHAR(8) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WBXYZ12A CHAR(6) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WBXYZ13A CHAR(6) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WBXYZ14A CHAR(8) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WBXYZ15A CHAR(8) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WBXYZ16A CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
CONSTRAINT WBXYZ01I
PRIMARY KEY (WBXYZ01I,
WBXYZ14A))
IN DGDB0135.AXYZA
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
--
LABEL ON TABLE GDB0135.TWBXYZA1 IS 'EUREX-Kontrahenten';
--
COMMENT ON TABLE GDB0135.TWBXYZA1 IS '?';
--
COMMENT ON GDB0135.TWBXYZA1
(WBXYZ16A IS 'KENNZEICHEN EBS-REPORTED / DB2: EKZ',
WBXYZ15A IS 'GUELTIG-BIS-DATUM / DB2: EGUELBIS',
WBXYZ14A IS 'GUELTIG-AB-DATUM / DB2: EGUELVON',
WBXYZ13A IS 'ANERKANNTE BÖRSE / DB2: ECEDEL',
WBXYZ12A IS 'EUROCLEAR / DB2: EEUROCLR',
WBXYZ11A IS 'SECOM / DB2: ESECOM',
WBXYZ10A IS 'SEGA-NR / DB2: ESEGA',
WBXYZ09A IS 'MUTATIONSZEIT / DB2: EMUTTIM',
WBXYZ08A IS 'MUTATIONSDATUM / DB2: EMUTDAT',
WBXYZ07A IS 'MUTATIONSPROGRAMM / DB2: EMUTPGM',
WBXYZ06A IS 'WS80-GESCHAEFTSART-BEZEICHUNG / DB2: ENAME30',
WBXYZ05A IS 'WS80-GESCHAEFTSART / DB2: EKBZ',
WBXYZ04A IS 'ISO-CODE-BEZEICHNUNG / DB2: ECODISO',
WBXYZ03A IS 'TELEKURS-CODE-BEZEICHNUNG / DB2: ECODTK',
WBXYZ02A IS 'SKA-CODE-BEZEICHUNG / DB2: ECODSKA',
WBXYZ01I IS 'Objekt-Id der Tabellenrow Primary-Key');
--
LABEL ON GDB0135.TWBXYZA1
(WBXYZ16A IS 'EKZ',
WBXYZ15A IS 'EGUELBIS',
WBXYZ14A IS 'EGUELVON',
WBXYZ13A IS 'ECEDEL',
WBXYZ12A IS 'EEUROCLR',
WBXYZ11A IS 'ESECOM',
WBXYZ10A IS 'ESEGA',
WBXYZ09A IS 'EMUTTIM',
WBXYZ08A IS 'EMUTDAT',
WBXYZ07A IS 'EMUTPGM',
WBXYZ06A IS 'ENAME30',
WBXYZ05A IS 'EKBZ',
WBXYZ04A IS 'ECODISO',
WBXYZ03A IS 'ECODTK',
WBXYZ02A IS 'ECODSKA',
WBXYZ01I IS 'EOBJID#');
--
COMMIT;
--
------------------------------------------------------------------------
-- Database=DGDB0135
-- Index=GDB0135.IWBXYZA1 On GDB0135.TWBXYZA1
------------------------------------------------------------------------
--
CREATE UNIQUE INDEX GDB0135.IWBXYZA1
ON GDB0135.TWBXYZA1
(WBXYZ01I ASC,
WBXYZ14A ASC)
USING STOGROUP GSMS
PRIQTY 40 SECQTY 40
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=GDB0135.VWBXYZA1A
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","GDB0135" ;
--
CREATE VIEW GDB0135.VWBXYZA1A(EOBJID#, ECODSKA, ECODTK, ECODISO,
EKBZ, ENAME30, EMUTPGM, EMUTDAT, EMUTTIM, ESEGA, ESECOM,
EEUROCLR, ECEDEL, EGUELVON, EGUELBIS, EKZ) AS
SELECT ALL WBXYZ01I, WBXYZ02A, WBXYZ03A, WBXYZ04A, WBXYZ05A,
WBXYZ06A, WBXYZ07A, WBXYZ08A, WBXYZ09A, WBXYZ10A, WBXYZ11A,
WBXYZ12A, WBXYZ13A, WBXYZ14A, WBXYZ15A, WBXYZ16A
FROM GDB0135.TWBXYZA1 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL --
------------------------------------------------------------------------
--
}¢--- DSN.TX.CASE(WK915DDT) cre=2009-08-25 mod=2009-08-25-14.56.34 A540769 -----
------------------------------------------------------------------------
-- --
-- Database 2 Administration Tool (DB2 Admin) , program 5697-L90 --
-- --
-- ADB2GEN - Extract object definitions from the DB2 Catalog tables --
-- --
-- Title : TRG WB01007C 0 --
-- --
-- Input prepared on : DBAF (915) Extract time : 2009-08-25 10:12 --
-- --
-- Catalog values overridden : none
-- --
-- Generate : SG=Y DB=Y TS=Y TB=Y VW=Y IX=Y SY=Y AL=Y LB=Y CM=Y FK=Y --
-- TG=Y UT=Y UF=Y SP=Y SQ=Y RO=Y --
-- Grants : SG=N DB=Y TS=Y TB=Y VW=Y SC=Y UT=Y UF=Y SP=Y SQ=Y --
-- --
------------------------------------------------------------------------
------------------------------------------------------------------------
-- --
-- ADB2GEN: Generate DDL for Table=OA1A.TWBXYZA1
-- --
------------------------------------------------------------------------
--
------------------------------------------------------------------------
-- Table=OA1A.TWBXYZA1 In WB01A1A.AXYZA
------------------------------------------------------------------------
--
SET CURRENT SQLID='S100447';
-- drop TABLESPACE $db.A915A;
commit;
CREATE TABLESPACE AXYZA
IN WB01A1A
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255;
COMMIT;
--
CREATE TABLE OA1A.TWBXYZA1
(WBXYZ01I DECIMAL(7, 0) NOT NULL GENERATED ALWAYS
AS IDENTITY
(START WITH 290000, INCREMENT BY 1, CACHE 20, NO CYCLE,
NO ORDER, MAXVALUE 9999999, MINVALUE 290000),
WBXYZ02A CHAR(6) FOR SBCS DATA NOT NULL,
WBXYZ03A CHAR(6) FOR SBCS DATA NOT NULL,
WBXYZ04A CHAR(6) FOR SBCS DATA NOT NULL,
WBXYZ05A CHAR(6) FOR SBCS DATA NOT NULL,
WBXYZ06A CHAR(30) FOR SBCS DATA NOT NULL,
WBXYZ07A CHAR(6) FOR SBCS DATA NOT NULL,
WBXYZ08A CHAR(8) FOR SBCS DATA NOT NULL,
WBXYZ09A CHAR(6) FOR SBCS DATA NOT NULL,
WBXYZ10A CHAR(6) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WBXYZ11A CHAR(8) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WBXYZ12A CHAR(6) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WBXYZ13A CHAR(6) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WBXYZ14A CHAR(8) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WBXYZ15A CHAR(8) FOR SBCS DATA NOT NULL
WITH DEFAULT,
WBXYZ16A CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
CONSTRAINT WBXYZ01I
PRIMARY KEY (WBXYZ01I))
IN WB01A1A.AXYZA
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
--
LABEL ON TABLE OA1A.TWBXYZA1 IS 'CODES';
--
COMMENT ON OA1A.TWBXYZA1
(WBXYZ16A IS 'KENNZEICHEN EBS-REPORTED / DB2: EKZ',
WBXYZ15A IS 'GUELTIG-BIS-DATUM / DB2: EGUELBIS',
WBXYZ14A IS 'GUELTIG-AB-DATUM / DB2: EGUELVON',
WBXYZ13A IS 'ANERKANNTE BÖRSE / DB2: ECEDEL',
WBXYZ12A IS 'EUROCLEAR / DB2: EEUROCLR',
WBXYZ11A IS 'SECOM / DB2: ESECOM',
WBXYZ10A IS 'SEGA-NR / DB2: ESEGA',
WBXYZ09A IS 'MUTATIONSZEIT / DB2: EMUTTIM',
WBXYZ08A IS 'MUTATIONSDATUM / DB2: EMUTDAT',
WBXYZ07A IS 'MUTATIONSPROGRAMM / DB2: EMUTPGM',
WBXYZ06A IS 'WS80-GESCHAEFTSART-BEZEICHUNG / DB2: ENAME30',
WBXYZ05A IS 'WS80-GESCHAEFTSART / DB2: EKBZ',
WBXYZ04A IS 'ISO-CODE-BEZEICHNUNG / DB2: ECODISO',
WBXYZ03A IS 'TELEKURS-CODE-BEZEICHNUNG / DB2: ECODTK',
WBXYZ02A IS 'SKA-CODE-BEZEICHUNG / DB2: ECODSKA',
WBXYZ01I IS 'Objekt-Id der Tabellenrow Primary-Key');
--
LABEL ON OA1A.TWBXYZA1
(WBXYZ16A IS 'EKZ',
WBXYZ15A IS 'EGUELBIS',
WBXYZ14A IS 'EGUELVON',
WBXYZ13A IS 'ECEDEL',
WBXYZ12A IS 'EEUROCLR',
WBXYZ11A IS 'ESECOM',
WBXYZ10A IS 'ESEGA',
WBXYZ09A IS 'EMUTTIM',
WBXYZ08A IS 'EMUTDAT',
WBXYZ07A IS 'EMUTPGM',
WBXYZ06A IS 'ENAME30',
WBXYZ05A IS 'EKBZ',
WBXYZ04A IS 'ECODISO',
WBXYZ03A IS 'ECODTK',
WBXYZ02A IS 'ECODSKA',
WBXYZ01I IS 'EOBJID#');
--
COMMIT;
--
--
------------------------------------------------------------------------
-- Stogroup=GSMS
------------------------------------------------------------------------
--
--
------------------------------------------------------------------------
CREATE UNIQUE INDEX OA1A.IWBXYZA1
ON OA1A.TWBXYZA1
(WBXYZ01I ASC)
USING STOGROUP GSMS
PRIQTY 12 SECQTY 7200
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=OA1A.VWBXYZA1A
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","GDB0135" ;
--
CREATE VIEW OA1A.VWBXYZA1A(EOBJID#, ECODSKA, ECODTK, ECODISO, EKBZ,
ENAME30, EMUTPGM, EMUTDAT, EMUTTIM, ESEGA, ESECOM, EEUROCLR,
ECEDEL, EGUELVON, EGUELBIS, EKZ) AS
SELECT ALL WBXYZ01I, WBXYZ02A, WBXYZ03A, WBXYZ04A, WBXYZ05A,
WBXYZ06A, WBXYZ07A, WBXYZ08A, WBXYZ09A, WBXYZ10A, WBXYZ11A,
WBXYZ12A, WBXYZ13A, WBXYZ14A, WBXYZ15A, WBXYZ16A
FROM oa1a.TWBXYZA1 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL --
------------------------------------------------------------------------
--
}¢--- DSN.TX.CASE(WK915INS) cre=2012-04-17 mod=2012-04-17-11.36.51 A540769 -----
select * from gdb9998.twk915a1;
insert into gdb9998.Twk915A1 ( -- WK91501I ,
WK91502A
, WK91503A
, WK91504A
, WK91505A
, WK91506A
, WK91507A
, WK91508A
, WK91509A )
values ( -- case when 1=0 then 1 else null end ,
'tttt02', 'tttt03', 'tttt04', 'tttt05', 'tttt06 tttt06 tttt06',
'tttt07', 'tttt08', 'tttt09');
select * from gdb9998.twk915a1;
}¢--- DSN.TX.CASE(WK915SEL) cre=2009-08-28 mod=2009-08-28-17.38.36 A540769 -----
select * from a540769.twk915a1
}¢--- DSN.TX.CASE(WK916) cre=2009-08-27 mod=2011-12-19-07.32.51 A540769 --------
* dataconversion
=DQ0G=0
credb trg 1
+ ok creDb DSN.TX.GENF(WK916t1) ::f
credb src 2
+ ok creDb DSN.TX.GENF(WK916s2) ::f
manual dbx c.. run ==> only one rebuild
+ ok t dbx c.. run ==> only one rebuild
credb trg 2
+ ok creDb DSN.TX.GENF(WK916t2) ::f
credb src 3
+ ok creDb DSN.TX.GENF(WK916s3) ::f
manual dbx c ... run drop index
+ ok t dbx c ... run drop index
credb trg 3
+ ok creDb DSN.TX.GENF(WK916t3) ::f
credb src 6
+ ok creDb DSN.TX.GENF(WK916s6) ::f
manual dbx c.. run ==> only one rebuild
+ wait dbx c.. run ==> only one rebuild
}¢--- DSN.TX.CASE(WK916DDL) cre=2009-08-27 mod=2011-12-19-07.28.07 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
$=tb=TWK916A1
SET CURRENT SQLID='S100447';
drop tablespace $db.a916a;
commit;
------------------------------------------------------------------------
CREATE TABLESPACE A916A
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
SEGSIZE 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255
; ---------------------------------------------------------------------
CREATE TABLE $creator.$tb
( WK916CH20 CHAR(20) FOR SBCS DATA not null with default
, WK916CH5 CHAR(5) FOR SBCS DATA not null with default
$@¢
if $phase = 1 then $@=¢
, WK916FL float(21) not null with default
$! else if $phase >= 2 then $@=¢
, WK916FL float(53) not null with default
$!
$!
, WK916CH1 CHAR(1) FOR SBCS DATA not null with default
)
IN $db.A916A
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE ;
commit;
------------------------------------------------------------------------
CREATE UNIQUE INDEX $creator.IWK916A0
ON $creator.$tb
( WK916CH20 ASC
)
USING STOGROUP GSMS
PRIQTY 40 SECQTY 40
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
BUFFERPOOL BP1
CLUSTER
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
$@¢
if $phase = 2 | $phase > 5 then $@=¢
LABEL ON TABLE $creator.$tb IS 'CASH BOOKING ORDERS' ;
CREATE UNIQUE INDEX $creator.IWK916A1
ON $creator.$tb
( WK916CH5 ASC
)
USING STOGROUP GSMS
PRIQTY 40 SECQTY 40
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
BUFFERPOOL BP1
not CLUSTER
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
CREATE INDEX $creator.IWK916A2
ON $creator.$tb
( WK916FL ASC
)
USING STOGROUP GSMS
PRIQTY 40 SECQTY 40
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
not CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
$!
$!
insert into $creator.$tb values
('erstens', 'eins', 1, '');
insert into $creator.$tb values
('zweitens', 'zwei', 22, '');
insert into $creator.$tb values
('drittens', 'drei', 333, '');
insert into $creator.$tb values
('viertens', 'vier', 4444e-4, '');
insert into $creator.$tb values
('fuenftens', 'fuenf', 55555e5, '');
commit;
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(WK916SEL) cre=2009-08-27 mod=2010-08-06-14.49.00 A540769 -----
select * from a540769.twk916a1;
select * from gdb9998.twk916a1;
}¢--- DSN.TX.CASE(WK917) cre=2009-08-28 mod=2012-12-05-14.17.19 A540769 --------
* rename colums with sql alter
=DQ0G=0
creDb trg 1
+ ok creDb DSN.TX.GENF(WK917t1) ::f
credb src 2
+ ok creDb DSN.TX.GENF(WK917s2) ::f
* dbx c mit WK917Mas WK917IGN
* in rsu0907 wird * in creator von renameCol ignoriert|
manual check col rename nicht drop/add (* creator in mask, rsu09
+ ok check col rename nicht drop/add (* creator in mask, rsu09
* dbx c mit twalpro4 ignore4
* manual check col rename nicht drop/add
* dbx i ana run
manual check col rename nicht drop/add UND DATEM MIT WK917SEL
+ ok t check col rename nicht drop/add UND DATEM MIT WK917SEL
creDb trg 2
+ ok creDb DSN.TX.GENF(WK917t2) ::f
credb src 3
+ ok creDb DSN.TX.GENF(WK917s3) ::f
* dbx c mit twalpro4 ignore4
* dbx i ana run
manual check drop/recreate UND DATEM MIT WK917SEL
+ wait check drop/recreate UND DATEM MIT WK917SEL
}¢--- DSN.TX.CASE(WK917DDL) cre=2009-08-28 mod=2012-12-05-14.12.55 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
$=tb=TWK917A1
SET CURRENT SQLID='S100447';
drop tablespace $db.a917a;
commit;
------------------------------------------------------------------------
CREATE TABLESPACE A917A
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
SEGSIZE 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255
; ---------------------------------------------------------------------
CREATE TABLE $creator.$tb
( WK917CH20 CHAR(20) FOR SBCS DATA not null with default
$@¢
if $phase = 1 then $@=¢
, WK917CH5 CHAR(5) FOR SBCS DATA not null with default
, WK917FL float(21) not null with default
, WK917CHEnd CHAR(5) FOR SBCS DATA not null with default
$! else if $phase = 2 then $@=¢
, WK917CH5Ren2 CHAR(5) FOR SBCS DATA not null with default
, WK917FLren2 float(53) not null with default
, WK917CHEnd CHAR(5) FOR SBCS DATA not null with default
$! else if $phase >= 3 then $@=¢
, WK917CH5Ren3 CHAR(5) FOR SBCS DATA not null with default
, WK917FLren3 float(53) not null with default
, WK917CHEnd CHAR(1) FOR SBCS DATA not null with default
$!
$!
)
IN $db.A917A
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE ;
commit;
------------------------------------------------------------------------
$@¢
if $phase < 3 then $@=¢
insert into $creator.$tb values
('erstens', 'eins', 1, '1.23');
insert into $creator.$tb values
('zweitens', 'zwei', 22, '2');
insert into $creator.$tb values
('drittens', 'drei', 333, ' 3');
insert into $creator.$tb values
('viertens', 'vier', 4444e-4, '12345');
insert into $creator.$tb values
('fuenftens', 'fuenf', 55555e5, '5');
commit;
$!
$!
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(WK917IGN) cre=2009-09-08 mod=2009-09-08-09.27.28 A540769 -----
SPACE
STORAGE
SYSTABLES:OWNER,OWNERTYPE
SYSTABLEPART:PQTY,SQTY,COMPRESS
SYSTABLESPACE:CREATOR,SEGSIZE,DSSIZE
SYSDATABASE:CREATOR
SYSINDEXPART:PQTY,SQTY
SYSINDEXES:PIECESIZE,OWNER,OWNERTYPE
SYSVIEWS:OWNER,OWNERTYPE
}¢--- DSN.TX.CASE(WK917MAS) cre=2009-09-08 mod=2009-09-08-09.26.46 A540769 -----
COMPRESS:*.*,NO 00010000
SEGSIZE:*.*,64 00020000
DEFER:*.*,YES 00030000
DBNAME:DGDB9998,DA540769 00040000
AUTHID:GDB9998*,A540769* 00050000
RENAMECOL:*.TWK917A1.WK917CH5,WK917CH5REN2 00060000
RENAMECOL:*.TWK917A1.WK917FL,WK917FLREN2 00070000
RENAMECOL:*.TWK917A1.WK917CH5REN2,WK917CH5REN3 00080000
RENAMECOL:*.TWK917A1.WK917FLREN2,WK917FLREN3 00090000
}¢--- DSN.TX.CASE(WK917SEL) cre=2009-08-28 mod=2010-08-06-13.53.19 A540769 -----
select * from a540769.twk917a1;
select * from gdb9998.twk917a1
}¢--- DSN.TX.CASE(WK918) cre=2009-08-28 mod=2010-02-17-09.15.21 A540769 --------
* drop primary key and it's index in correct sequence
=DQ0G=1
creDb trg 1
+ ok creDb A540769.TX.GENF(WK918t1) ::f
creDb src 2
+ ok creDb A540769.TX.GENF(WK918s2) ::f
}¢--- DSN.TX.CASE(WK918DDL) cre=2009-08-28 mod=2010-02-17-09.15.16 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
$=tb=TWK918A1
SET CURRENT SQLID='S100447';
drop tablespace $db.a918a;
commit;
------------------------------------------------------------------------
CREATE TABLESPACE A918A
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
SEGSIZE 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255
; ---------------------------------------------------------------------
CREATE TABLE $creator.$tb
( WK918CH20 CHAR(20) FOR SBCS DATA not null with default
, WK918FL float(21) not null with default
$@¢
if $phase = 1 then $@=¢
, CONSTRAINT WF063TAG
primary key(WK918ch20)
$! else if $phase = 2 then $@=¢
, WK918CH5 CHAR(5) FOR SBCS DATA not null with default
, CONSTRAINT WF063TAG
primary key(WK918ch20, WK918Ch5)
$!
$!
)
IN $db.A918A
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE ;
commit;
------------------------------------------------------------------------
CREATE UNIQUE INDEX $creator.IWK918A0
ON $creator.$tb
( WK918CH20 ASC
$@¢
if $phase = 2 then $@=¢
, WK918CH5 asc
$!
$!
)
USING STOGROUP GSMS
PRIQTY 40 SECQTY 40
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
BUFFERPOOL BP1
CLUSTER
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
$@¢
if $phase = 1 then $@=¢
PIECESIZE 1 G;
$! else $@=¢
PIECESIZE 2 G;
$!
$!
COMMIT;
commit;
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(WK919) cre=2009-08-28 mod=2009-08-28-14.46.25 A540769 --------
* if trg has been create BEFORE v9
* primary key and it's enforcing index are dropped in wrong sequence
* thus, not reproducible here |
}¢--- DSN.TX.CASE(WK919DDS) cre=2009-08-28 mod=2009-08-28-13.43.47 A540769 -----
------------------------------------------------------------------------
-- --
-- Database 2 Administration Tool (DB2 Admin) , program 5697-L90 --
-- --
-- ADB2GEN - Extract object definitions from the DB2 Catalog tables --
-- --
-- Title : SRC WF01018C 0 --
-- --
-- Input prepared on : DBAF (915) Extract time : 2009-08-28 08:39 --
-- --
-- Catalog values overridden : none
-- --
-- Generate : SG=N DB=Y TS=Y TB=Y VW=Y IX=Y SY=Y AL=Y LB=Y CM=Y FK=Y --
-- TG=Y UT=N UF=N SP=N SQ=N RO=N --
-- Grants : SG=N DB=N TS=N TB=N VW=N SC=N UT=N UF=N SP=N SQ=N --
-- --
------------------------------------------------------------------------
------------------------------------------------------------------------
-- --
-- ADB2GEN: Generate DDL for Table=GDB0189.TWF063A1
-- --
------------------------------------------------------------------------
--
------------------------------------------------------------------------
-- Table=GDB0189.TWF063A1 In DGDB0189.S063A
------------------------------------------------------------------------
--
SET CURRENT SQLID='GDB0189';
--
CREATE TABLE GDB0189.TWF063A1
(WF063TAG CHAR(3) FOR SBCS DATA NOT NULL,
WF063QUA CHAR(4) FOR SBCS DATA NOT NULL,
WF063SP1 CHAR(3) FOR SBCS DATA NOT NULL,
WF063LA1 CHAR(3) FOR SBCS DATA NOT NULL,
WF063RI1 CHAR(40) FOR SBCS DATA NOT NULL,
WF063RF1 CHAR(40) FOR SBCS DATA NOT NULL,
WF063ZUS CHAR(10) FOR SBCS DATA NOT NULL,
WF063SP2 CHAR(3) FOR SBCS DATA NOT NULL,
WF063LA2 CHAR(3) FOR SBCS DATA NOT NULL,
WF063RI2 CHAR(40) FOR SBCS DATA NOT NULL,
WF063RF2 CHAR(40) FOR SBCS DATA NOT NULL,
WF063PRI CHAR(3) FOR SBCS DATA NOT NULL,
WF063TYP CHAR(3) FOR SBCS DATA NOT NULL
WITH DEFAULT,
CONSTRAINT WF063TAG
PRIMARY KEY (WF063TAG,
WF063QUA,
WF063RI1,
WF063RF1,
WF063ZUS,
WF063TYP))
IN DGDB9998.A918A
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
--
LABEL ON TABLE GDB0189.TWF063A1 IS 'Routing Handling';
--
LABEL ON GDB0189.TWF063A1
(WF063TYP IS 'Message Type',
WF063PRI IS 'Priorität',
WF063RF2 IS 'Routing Fuellen 2',
WF063RI2 IS 'Routing Inhalt 2',
WF063LA2 IS 'Laenge 2',
WF063SP2 IS 'Startposition 2',
WF063ZUS IS 'Zusatzbedingung',
WF063RF1 IS 'Routing Fuellen 1',
WF063RI1 IS 'Routing Inhalt 1',
WF063LA1 IS 'Laenge 1',
WF063SP1 IS 'Startposition 1',
WF063QUA IS 'Qualifier',
WF063TAG IS 'Tag');
--
COMMIT;
--
------------------------------------------------------------------------
-- Database=DGDB0189
-- Index=GDB0189.IWF063A1 On GDB0189.TWF063A1
------------------------------------------------------------------------
--
CREATE UNIQUE INDEX GDB0189.IWF063A1
ON GDB0189.TWF063A1
(WF063TAG ASC,
WF063QUA ASC,
WF063RI1 ASC,
WF063RF1 ASC,
WF063ZUS ASC,
WF063TYP ASC)
USING STOGROUP GSMS
PRIQTY 48 SECQTY 7200
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
--
COMMIT;
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL --
------------------------------------------------------------------------
--
}¢--- DSN.TX.CASE(WK919DDT) cre=2009-08-28 mod=2009-08-28-13.39.15 A540769 -----
------------------------------------------------------------------------
-- --
-- Database 2 Administration Tool (DB2 Admin) , program 5697-L90 --
-- --
-- ADB2GEN - Extract object definitions from the DB2 Catalog tables --
-- --
-- Title : TRG WF01018C 0 --
-- --
-- Input prepared on : DBAF (915) Extract time : 2009-08-28 08:39 --
-- --
-- Catalog values overridden : none
-- --
-- Generate : SG=Y DB=Y TS=Y TB=Y VW=Y IX=Y SY=Y AL=Y LB=Y CM=Y FK=Y --
-- TG=Y UT=Y UF=Y SP=Y SQ=Y RO=Y --
-- Grants : SG=N DB=Y TS=Y TB=Y VW=Y SC=Y UT=Y UF=Y SP=Y SQ=Y --
-- --
------------------------------------------------------------------------
------------------------------------------------------------------------
-- --
-- ADB2GEN: Generate DDL for Table=OA1A.TWF063A1
-- --
------------------------------------------------------------------------
--
------------------------------------------------------------------------
-- Table=OA1A.TWF063A1 In WF01A1A.A063A
------------------------------------------------------------------------
--
SET CURRENT SQLID='OA1A';
--
CREATE TABLE OA1A.TWF063A1
(WF063TAG CHAR(3) FOR SBCS DATA NOT NULL,
WF063QUA CHAR(4) FOR SBCS DATA NOT NULL,
WF063SP1 CHAR(3) FOR SBCS DATA NOT NULL,
WF063LA1 CHAR(3) FOR SBCS DATA NOT NULL,
WF063RI1 CHAR(40) FOR SBCS DATA NOT NULL,
WF063RF1 CHAR(40) FOR SBCS DATA NOT NULL,
WF063ZUS CHAR(10) FOR SBCS DATA NOT NULL,
WF063SP2 CHAR(3) FOR SBCS DATA NOT NULL,
WF063LA2 CHAR(3) FOR SBCS DATA NOT NULL,
WF063RI2 CHAR(40) FOR SBCS DATA NOT NULL,
WF063RF2 CHAR(40) FOR SBCS DATA NOT NULL,
WF063PRI CHAR(3) FOR SBCS DATA NOT NULL,
CONSTRAINT WF063TAG
PRIMARY KEY (WF063TAG,
WF063QUA,
WF063RI1,
WF063RF1,
WF063ZUS))
IN WF01A1A.A063A
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
--
LABEL ON TABLE OA1A.TWF063A1 IS 'Routing Handling';
--
LABEL ON OA1A.TWF063A1
(WF063PRI IS 'Priorität',
WF063RF2 IS 'Routing Fuellen 2',
WF063RI2 IS 'Routing Inhalt 2',
WF063LA2 IS 'Laenge 2',
WF063SP2 IS 'Startposition 2',
WF063ZUS IS 'Zusatzbedingung',
WF063RF1 IS 'Routing Fuellen 1',
WF063RI1 IS 'Routing Inhalt 1',
WF063LA1 IS 'Laenge 1',
WF063SP1 IS 'Startposition 1',
WF063QUA IS 'Qualifier',
WF063TAG IS 'Tag');
--
COMMIT;
--
--
------------------------------------------------------------------------
-- Stogroup=GSMS
------------------------------------------------------------------------
--
SET CURRENT SQLID='A547484';
--
CREATE STOGROUP GSMS
VOLUMES("*")
VCAT DBAF ;
--
COMMIT;
--
------------------------------------------------------------------------
-- Database=WF01A1A
-- Index=OA1A.IWF063A1 On OA1A.TWF063A1
------------------------------------------------------------------------
--
SET CURRENT SQLID='OA1A';
--
CREATE UNIQUE INDEX OA1A.IWF063A1
ON OA1A.TWF063A1
(WF063TAG ASC,
WF063QUA ASC,
WF063RI1 ASC,
WF063RF1 ASC,
WF063ZUS ASC)
USING STOGROUP GSMS
PRIQTY 12 SECQTY 7200
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
--
COMMIT;
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL --
------------------------------------------------------------------------
--
}¢--- DSN.TX.CASE(WK920) cre=2009-09-04 mod=2009-11-24-13.27.50 A540769 --------
=DQ0G=1
creDb src 1
+ ok creDb A540769.TX.GENF(WK920s1)
* dbx TS DGDB9998.A920*, mask=WK920MAS, igno=WK920IGN
manual check: keine Owner unterschied, table gleich
+ wait check: keine Owner unterschied, table gleich
* (falls OA1A nicht verändert ...)
}¢--- DSN.TX.CASE(WK920DDL) cre=2009-09-04 mod=2009-11-24-13.27.22 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
$=tb=TWK920A1
SET CURRENT SQLID='S100447';
drop tablespace $db.a920a;
drop tablespace $db.a920B;
commit;
------------------------------------------------------------------------
CREATE TABLESPACE A920A
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
SEGSIZE 64
BUFFERPOOL BP32K
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255
;
CREATE TABLESPACE A920B
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
SEGSIZE 64
BUFFERPOOL BP32K
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255
;
commit;
------------------------------------------------------------------------
CREATE TABLE $creator.VTLISTING
(INSTRUMENTID INTEGER NOT NULL,
LISTINGNO INTEGER NOT NULL,
PROVIDER1ID CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
PROVIDER2ID CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
PROVIDER3ID CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
CREATETIMESTAMP VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
UPDATETIMESTAMP VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
ISMAINTRADINGPLACE SMALLINT WITH DEFAULT NULL,
ISHOMETRADINGPLACE SMALLINT WITH DEFAULT NULL,
ISONLIMITEDHALT SMALLINT WITH DEFAULT NULL,
HASNOMCURRSETTLE SMALLINT WITH DEFAULT NULL,
TRADINGPLACE INTEGER WITH DEFAULT NULL,
CURRENCY INTEGER WITH DEFAULT NULL,
MARKTPRACTIDSYMBOL CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
FIRSTTRADINGDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
LASTTRADINGDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
HALTFROMDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
HALTUNTILDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
FIRSTTRDDTAFHALT VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
TRADINGSTATUSTYPE SMALLINT WITH DEFAULT NULL,
LISTINGSTATUSTYPE SMALLINT WITH DEFAULT NULL,
EXCHANGERATETYPE SMALLINT WITH DEFAULT NULL,
LISTPURPOSETYPE SMALLINT WITH DEFAULT NULL,
TRADINGSTATUSTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
LISTINGSTATUSTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
EXCHANGERATETYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
LISTPURPOSETYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_G VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_E VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_F VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_I VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_N VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_G VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_E VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_F VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_I VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_N VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
CSLISTINGCODETYPE SMALLINT WITH DEFAULT NULL,
CSLISTINGCODETYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
HASINDMARPRACTICE SMALLINT WITH DEFAULT NULL,
PRICINGUNITNO FLOAT WITH DEFAULT NULL,
PRICINGCORRFACTOR FLOAT WITH DEFAULT NULL,
NONVERSEAMOUNT FLOAT WITH DEFAULT NULL,
VOLUMEAMOUNT FLOAT WITH DEFAULT NULL,
TRADINGUNITNO FLOAT WITH DEFAULT NULL,
PRICINGUNITTYPE SMALLINT WITH DEFAULT NULL,
QUOTATIONTYPE SMALLINT WITH DEFAULT NULL,
VOLUMEUNITTYPE SMALLINT WITH DEFAULT NULL,
ACCRUEDINTCALCTP SMALLINT WITH DEFAULT NULL,
FLATREASONTYPE SMALLINT WITH DEFAULT NULL,
TRADINGUNITTYPE SMALLINT WITH DEFAULT NULL,
TRADINGRULETYPE SMALLINT WITH DEFAULT NULL,
PRICINGUNITTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
QUOTATIONTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
VOLUMEUNITTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
ACCRUEDINTCALCTPV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
FLATREASONTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
TRADINGUNITTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
TRADINGRULETYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
VALUEPRICETYPE SMALLINT WITH DEFAULT NULL,
VALUEPRICETYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
HASLISTINGDETAIL SMALLINT WITH DEFAULT NULL,
EXCHANGETYPE SMALLINT WITH DEFAULT NULL,
EXCHANGETYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
LISTINGCLASSTYPE SMALLINT WITH DEFAULT NULL,
HASREDUNDANTINFO SMALLINT WITH DEFAULT NULL,
HASBESTTRADINGVENUE SMALLINT WITH DEFAULT NULL,
ISBESTVOLUMEBESTSPREAD SMALLINT WITH DEFAULT NULL,
ISBESTVOLUME SMALLINT WITH DEFAULT NULL,
ISBESTSPREAD SMALLINT WITH DEFAULT NULL,
ISHIGHESTTICKS SMALLINT WITH DEFAULT NULL,
ISBESTVOLUMEPERCURR SMALLINT WITH DEFAULT NULL,
ISBESTSPREADPERCURR SMALLINT WITH DEFAULT NULL,
ISPRIMARYMARKETUSA SMALLINT WITH DEFAULT NULL,
ISSINGLETRADINGPLACE SMALLINT WITH DEFAULT NULL,
ISISSUERPRICEPROVIDER SMALLINT WITH DEFAULT NULL,
ISNAVINDEPENDENTSOURCE SMALLINT WITH DEFAULT NULL,
ISFUNDASSESSMENTSOURCE SMALLINT WITH DEFAULT NULL,
ISCSBESTVENUEOVERALL SMALLINT WITH DEFAULT NULL,
ISCSBESTVENUEPERCURR SMALLINT WITH DEFAULT NULL,
CSBVOVERALLUPDATEUSER CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
CSBVPERCURRUPDATEUSER CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
CSBVOVERALLUPDATETS VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
CSBVPERCURRUPDATETS VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
ISPLACEOFQUOTE SMALLINT WITH DEFAULT NULL,
ISPLACEOFLISTING SMALLINT WITH DEFAULT NULL,
ISPLACEOFTRADING SMALLINT WITH DEFAULT NULL,
TRADINGGROUPSYMBOL1 CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
TRADINGGROUPSYMBOL2 CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
TRADINGGROUPSYMBOL3 CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
TRADINGGROUPSYMBOL4 CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
TRADINGGROUPSYMBOL5 CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
LISTINGSYMBOLTK CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
LISTINGSYMBOLRT CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
LISTINGSYMBOLBB CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TRADINGPLACE_BCN CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TRADINGPLACE_RTX CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TRADINGPLACE_MIC CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TRADINGPLACE_BBX CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
CURRENCY_I1 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
CURRENCY_I2 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
CURRENCY_WS80 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TRADINGPLACE_WS80 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
PARENTTRADINGPLACE INTEGER WITH DEFAULT NULL,
PARENTTRADINGPLACE_BCN CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
PARENTTRADINGPLACE_RTX CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
PARENTTRADINGPLACE_MIC CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
PARENTTRADINGPLACE_BBX CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
PARENTTRADINGPLACE_WS80 CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
TRADINGPLACESYMBOLRIC CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
TRADINGPLACESYMBOLBBI CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
MINTRADINGUNITNO FLOAT WITH DEFAULT NULL,
REGULARTRADINGUNITNO FLOAT WITH DEFAULT NULL,
NOMINALTRADINGUNITNO FLOAT WITH DEFAULT NULL,
NMSTRADINGUNITNO FLOAT WITH DEFAULT NULL,
EMSTRADINGUNITNO FLOAT WITH DEFAULT NULL,
SMSTRADINGUNITNO FLOAT WITH DEFAULT NULL,
PTSTRADINGUNITNO FLOAT WITH DEFAULT NULL,
BBMARKETSECTORTYPE SMALLINT WITH DEFAULT NULL,
CONSTRAINT INSTRUMENTID
PRIMARY KEY (INSTRUMENTID,
LISTINGNO))
IN $db.A920A
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
COMMIT;
------------------------------------------------------------------------
CREATE UNIQUE INDEX $creator.VTXLISTING1
ON $creator.VTLISTING
(INSTRUMENTID ASC,
LISTINGNO ASC)
USING STOGROUP GSMS
PRIQTY 428400 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
------------------------------------------------------------------------
CREATE INDEX $creator.VTXLISTING5
ON $creator.VTLISTING
(EXCHANGETYPE ASC)
USING STOGROUP GSMS
PRIQTY 151200 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
------------------------------------------------------------------------
CREATE TABLE $creator.VTINSTITUTION
(INSTITUTIONID INTEGER NOT NULL,
HISTORYID INTEGER WITH DEFAULT NULL,
INSTITUTIONTYPE SMALLINT WITH DEFAULT NULL,
ROWSTATUS SMALLINT WITH DEFAULT NULL,
VSTQUALITY SMALLINT WITH DEFAULT NULL,
REVISIONNO SMALLINT WITH DEFAULT NULL,
VSTREQUIREDQUALITY SMALLINT WITH DEFAULT NULL,
VSTMAXIMUMQUALITY SMALLINT WITH DEFAULT NULL,
ISGLOBALREGACC SMALLINT WITH DEFAULT NULL,
HASPENDINGACTVTY SMALLINT WITH DEFAULT NULL,
ISRELEVANT SMALLINT WITH DEFAULT NULL,
HASFUTUREMESSAGES SMALLINT WITH DEFAULT NULL,
FOTWIZISDISABLED SMALLINT WITH DEFAULT NULL,
ISONDB SMALLINT WITH DEFAULT NULL,
LOCATION INTEGER WITH DEFAULT NULL,
VSTNAME CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
VSTVERSION CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
CREATEUSERID CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
UPDATEUSERID CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
PROVIDER1SYMBOL CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
PROVIDER2SYMBOL CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
PROVIDER3SYMBOL CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
DELETIONDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
CREATETIMESTAMP VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
UPDATETIMESTAMP VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
STATUSTYPE SMALLINT WITH DEFAULT NULL,
DELETEREASONTYPE SMALLINT WITH DEFAULT NULL,
MAINLANGUAGETYPE SMALLINT WITH DEFAULT NULL,
FOTYPE SMALLINT WITH DEFAULT NULL,
DATASTATUSTYPE SMALLINT WITH DEFAULT NULL,
BLOCKINGCODETYPE SMALLINT WITH DEFAULT NULL,
LOGICDELETIONTYPE SMALLINT WITH DEFAULT NULL,
STATUSTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
DELETEREASONTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
MAINLANGUAGETYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
FOTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
DATASTATUSTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
BLOCKINGCODETYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
LOGICDELETIONTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_G VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_E VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_F VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_I VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_N VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
NAME_G VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
NAME_E VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
NAME_F VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
NAME_I VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
NAME_N VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
MODIFICATIONREASON VARCHAR(2000) FOR SBCS DATA
WITH DEFAULT NULL,
REMARKS VARCHAR(2000) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_G VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_E VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_F VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_I VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_N VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
KANTONSCODETYPE SMALLINT WITH DEFAULT NULL,
KANTONSCODETYPEV VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
PORTFOLIONO INTEGER WITH DEFAULT NULL,
HASADDRESS SMALLINT WITH DEFAULT NULL,
DOMICILE INTEGER WITH DEFAULT NULL,
TAXDOMICILE INTEGER WITH DEFAULT NULL,
ADDRESSLOCATION INTEGER WITH DEFAULT NULL,
ACCOUNTINGCURR INTEGER WITH DEFAULT NULL,
INITIALMARGINRATE FLOAT WITH DEFAULT NULL,
DOMICILE_A2 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
DOMICILE_WS80 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TAXDOMICILE_A2 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TAXDOMICILE_WS80 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
INDUSTRYCS CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
INDUSTRYTKBN CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
INDUSTRYMSCI CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
INDUSTRYDJ CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
INDUSTRYFTSE CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
INDUSTRYMFIB CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
INDUSTRYMFIS CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
INDUSTRYICB CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
INDUSTRYBDF CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TAXNUMBER CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
NONTAXABLENUMBER CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
HOUSENUMBER CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
ZIP CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TELEFAXNUMBER CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
BANKACCOUNTNUMBER CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
NATIONALBANKCODE CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
FOUNDATIONDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
PREVFINYEARENDDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
ACTFINYEARENDDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
REGISTERENTRYDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
REGENTRYDELETIONDT VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
YEARENDDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
NEXTSEMESTERREPORT VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
NONTAXABLEDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
PREVIOUSYEARENDDT VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
LEGALFORMTYPE SMALLINT WITH DEFAULT NULL,
TRUSTLEGALGUIDETP SMALLINT WITH DEFAULT NULL,
TRUSTSTATUSTYPE SMALLINT WITH DEFAULT NULL,
LEGALFORMTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
TRUSTLEGALGUIDETPV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
TRUSTSTATUSTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
CITY VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
INTERNETDOMAIN VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
STREET VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
EMAILNAME VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
PHONENUMBER VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
IBAN VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
ADDRESS VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
ADDRESSDESCR VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
HEADOFFICEDESCR VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
ADDRESSLOCATION_A2 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
ADDRESSLOCATION_WS80 CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
HASREDUNDANTINFO SMALLINT WITH DEFAULT NULL,
MDYISSUERRATING CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
MDYISSUERRATINGDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
MDYISSUERWATCHLISTSTATUSTYPE SMALLINT WITH DEFAULT NULL,
SPISSUERRATING CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
SPISSUERRATINGDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
SPISSUERWATCHLISTSTATUSTYPE SMALLINT WITH DEFAULT NULL,
FITCHISSUERRATING CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
FITCHISSUERRATINGDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
FITCHISSUERWATCHLISTSTATUSTYPE SMALLINT WITH DEFAULT NULL,
DOMICILE_A3 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TAXDOMICILE_A3 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
ADDRESSLOCATION_A3 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
DOWRITETOSHADOWTABLES SMALLINT WITH DEFAULT NULL,
CSASSEMBLYNOTIFICATIONTYPE SMALLINT WITH DEFAULT NULL,
INDUSTRYSIC CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
CONSTRAINT INSTITUTIONID
PRIMARY KEY (INSTITUTIONID))
IN $db.A920B
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
COMMIT;
------------------------------------------------------------------------
CREATE UNIQUE INDEX $creator.VTXINSTITUTION1
ON $creator.VTINSTITUTION
(INSTITUTIONID ASC)
USING STOGROUP GSMS
PRIQTY 10800 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
------------------------------------------------------------------------
CREATE INDEX $creator.VTXINSTITUTION20
ON $creator.VTINSTITUTION
(INSTITUTIONTYPE ASC)
USING STOGROUP GSMS
PRIQTY 4320 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
------------------------------------------------------------------------
CREATE INDEX $creator.VTXINSTITUTION5
ON $creator.VTINSTITUTION
(CREATETIMESTAMP ASC)
PADDED
USING STOGROUP GSMS
PRIQTY 15120 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
------------------------------------------------------------------------
CREATE INDEX $creator.VTXINSTITUTION50
ON $creator.VTINSTITUTION
(STATUSTYPE ASC)
USING STOGROUP GSMS
PRIQTY 4320 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
------------------------------------------------------------------------
CREATE INDEX $creator.VTXINSTITUTION6
ON $creator.VTINSTITUTION
(UPDATETIMESTAMP ASC)
PADDED
USING STOGROUP GSMS
PRIQTY 7200 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
------------------------------------------------------------------------
CREATE INDEX $creator.VTXINSTITUTION7
ON $creator.VTINSTITUTION
(FOTYPE ASC)
USING STOGROUP GSMS
PRIQTY 4320 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(WK920DDS) cre=2009-09-04 mod=2009-09-04-10.52.11 A540769 -----
------------------------------------------------------------------------
-- --
-- Database 2 Administration Tool (DB2 Admin) , program 5697-L90 --
-- --
-- ADB2GEN - Extract object definitions from the DB2 Catalog tables --
-- --
-- Title : SRC VDPS442C 0 --
-- --
-- Input prepared on : DBAF (915) Extract time : 2009-09-04 10:02 --
-- --
-- Catalog values overridden : none
-- --
-- Generate : SG=N DB=Y TS=Y TB=Y VW=Y IX=Y SY=Y AL=Y LB=Y CM=Y FK=Y --
-- TG=Y UT=N UF=N SP=N SQ=N RO=N --
-- Grants : SG=N DB=N TS=N TB=N VW=N SC=N UT=N UF=N SP=N SQ=N --
-- --
------------------------------------------------------------------------
------------------------------------------------------------------------
-- --
-- ADB2GEN: Generate DDL for Table=VDPSX.VTLISTING
-- --
------------------------------------------------------------------------
--
------------------------------------------------------------------------
-- Table=VDPSX.VTLISTING In VV24A1X.VDPS185
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPSX';
--
CREATE TABLE VDPSX.VTLISTING
(INSTRUMENTID INTEGER NOT NULL,
LISTINGNO INTEGER NOT NULL,
PROVIDER1ID CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
PROVIDER2ID CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
PROVIDER3ID CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
CREATETIMESTAMP VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
UPDATETIMESTAMP VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
ISMAINTRADINGPLACE SMALLINT WITH DEFAULT NULL,
ISHOMETRADINGPLACE SMALLINT WITH DEFAULT NULL,
ISONLIMITEDHALT SMALLINT WITH DEFAULT NULL,
HASNOMCURRSETTLE SMALLINT WITH DEFAULT NULL,
TRADINGPLACE INTEGER WITH DEFAULT NULL,
CURRENCY INTEGER WITH DEFAULT NULL,
MARKTPRACTIDSYMBOL CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
FIRSTTRADINGDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
LASTTRADINGDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
HALTFROMDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
HALTUNTILDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
FIRSTTRDDTAFHALT VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
TRADINGSTATUSTYPE SMALLINT WITH DEFAULT NULL,
LISTINGSTATUSTYPE SMALLINT WITH DEFAULT NULL,
EXCHANGERATETYPE SMALLINT WITH DEFAULT NULL,
LISTPURPOSETYPE SMALLINT WITH DEFAULT NULL,
TRADINGSTATUSTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
LISTINGSTATUSTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
EXCHANGERATETYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
LISTPURPOSETYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_G VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_E VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_F VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_I VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_N VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_G VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_E VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_F VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_I VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_N VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
CSLISTINGCODETYPE SMALLINT WITH DEFAULT NULL,
CSLISTINGCODETYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
HASINDMARPRACTICE SMALLINT WITH DEFAULT NULL,
PRICINGUNITNO FLOAT WITH DEFAULT NULL,
PRICINGCORRFACTOR FLOAT WITH DEFAULT NULL,
NONVERSEAMOUNT FLOAT WITH DEFAULT NULL,
VOLUMEAMOUNT FLOAT WITH DEFAULT NULL,
TRADINGUNITNO FLOAT WITH DEFAULT NULL,
PRICINGUNITTYPE SMALLINT WITH DEFAULT NULL,
QUOTATIONTYPE SMALLINT WITH DEFAULT NULL,
VOLUMEUNITTYPE SMALLINT WITH DEFAULT NULL,
ACCRUEDINTCALCTP SMALLINT WITH DEFAULT NULL,
FLATREASONTYPE SMALLINT WITH DEFAULT NULL,
TRADINGUNITTYPE SMALLINT WITH DEFAULT NULL,
TRADINGRULETYPE SMALLINT WITH DEFAULT NULL,
PRICINGUNITTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
QUOTATIONTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
VOLUMEUNITTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
ACCRUEDINTCALCTPV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
FLATREASONTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
TRADINGUNITTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
TRADINGRULETYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
VALUEPRICETYPE SMALLINT WITH DEFAULT NULL,
VALUEPRICETYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
HASLISTINGDETAIL SMALLINT WITH DEFAULT NULL,
EXCHANGETYPE SMALLINT WITH DEFAULT NULL,
EXCHANGETYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
LISTINGCLASSTYPE SMALLINT WITH DEFAULT NULL,
HASREDUNDANTINFO SMALLINT WITH DEFAULT NULL,
HASBESTTRADINGVENUE SMALLINT WITH DEFAULT NULL,
ISBESTVOLUMEBESTSPREAD SMALLINT WITH DEFAULT NULL,
ISBESTVOLUME SMALLINT WITH DEFAULT NULL,
ISBESTSPREAD SMALLINT WITH DEFAULT NULL,
ISHIGHESTTICKS SMALLINT WITH DEFAULT NULL,
ISBESTVOLUMEPERCURR SMALLINT WITH DEFAULT NULL,
ISBESTSPREADPERCURR SMALLINT WITH DEFAULT NULL,
ISPRIMARYMARKETUSA SMALLINT WITH DEFAULT NULL,
ISSINGLETRADINGPLACE SMALLINT WITH DEFAULT NULL,
ISISSUERPRICEPROVIDER SMALLINT WITH DEFAULT NULL,
ISNAVINDEPENDENTSOURCE SMALLINT WITH DEFAULT NULL,
ISFUNDASSESSMENTSOURCE SMALLINT WITH DEFAULT NULL,
ISCSBESTVENUEOVERALL SMALLINT WITH DEFAULT NULL,
ISCSBESTVENUEPERCURR SMALLINT WITH DEFAULT NULL,
CSBVOVERALLUPDATEUSER CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
CSBVPERCURRUPDATEUSER CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
CSBVOVERALLUPDATETS VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
CSBVPERCURRUPDATETS VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
ISPLACEOFQUOTE SMALLINT WITH DEFAULT NULL,
ISPLACEOFLISTING SMALLINT WITH DEFAULT NULL,
ISPLACEOFTRADING SMALLINT WITH DEFAULT NULL,
TRADINGGROUPSYMBOL1 CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
TRADINGGROUPSYMBOL2 CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
TRADINGGROUPSYMBOL3 CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
TRADINGGROUPSYMBOL4 CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
TRADINGGROUPSYMBOL5 CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
LISTINGSYMBOLTK CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
LISTINGSYMBOLRT CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
LISTINGSYMBOLBB CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TRADINGPLACE_BCN CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TRADINGPLACE_RTX CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TRADINGPLACE_MIC CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TRADINGPLACE_BBX CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
CURRENCY_I1 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
CURRENCY_I2 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
CURRENCY_WS80 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TRADINGPLACE_WS80 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
PARENTTRADINGPLACE INTEGER WITH DEFAULT NULL,
PARENTTRADINGPLACE_BCN CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
PARENTTRADINGPLACE_RTX CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
PARENTTRADINGPLACE_MIC CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
PARENTTRADINGPLACE_BBX CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
PARENTTRADINGPLACE_WS80 CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
TRADINGPLACESYMBOLRIC CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
TRADINGPLACESYMBOLBBI CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
MINTRADINGUNITNO FLOAT WITH DEFAULT NULL,
REGULARTRADINGUNITNO FLOAT WITH DEFAULT NULL,
NOMINALTRADINGUNITNO FLOAT WITH DEFAULT NULL,
NMSTRADINGUNITNO FLOAT WITH DEFAULT NULL,
EMSTRADINGUNITNO FLOAT WITH DEFAULT NULL,
SMSTRADINGUNITNO FLOAT WITH DEFAULT NULL,
PTSTRADINGUNITNO FLOAT WITH DEFAULT NULL,
BBMARKETSECTORTYPE SMALLINT WITH DEFAULT NULL,
CONSTRAINT INSTRUMENTID
PRIMARY KEY (INSTRUMENTID,
LISTINGNO))
IN VV24A1X.VDPS185
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
--
COMMIT;
--
------------------------------------------------------------------------
-- Database=VV24A1X
-- Index=VDPSX.VTXLISTING1 On VDPSX.VTLISTING
------------------------------------------------------------------------
--
CREATE UNIQUE INDEX VDPSX.VTXLISTING1
ON VDPSX.VTLISTING
(INSTRUMENTID ASC,
LISTINGNO ASC)
USING STOGROUP GSMS
PRIQTY 428400 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
--
COMMIT;
--
------------------------------------------------------------------------
-- Database=VV24A1X
-- Index=VDPSX.VTXLISTING5 On VDPSX.VTLISTING
------------------------------------------------------------------------
--
CREATE INDEX VDPSX.VTXLISTING5
ON VDPSX.VTLISTING
(EXCHANGETYPE ASC)
USING STOGROUP GSMS
PRIQTY 151200 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
--
COMMIT;
------------------------------------------------------------------------
-- --
-- ADB2GEN: Generate DDL for Table=VDPSX.VTINSTITUTION
-- --
------------------------------------------------------------------------
--
------------------------------------------------------------------------
-- Table=VDPSX.VTINSTITUTION In VV23A1X.VDPS121
------------------------------------------------------------------------
--
CREATE TABLE VDPSX.VTINSTITUTION
(INSTITUTIONID INTEGER NOT NULL,
HISTORYID INTEGER WITH DEFAULT NULL,
INSTITUTIONTYPE SMALLINT WITH DEFAULT NULL,
ROWSTATUS SMALLINT WITH DEFAULT NULL,
VSTQUALITY SMALLINT WITH DEFAULT NULL,
REVISIONNO SMALLINT WITH DEFAULT NULL,
VSTREQUIREDQUALITY SMALLINT WITH DEFAULT NULL,
VSTMAXIMUMQUALITY SMALLINT WITH DEFAULT NULL,
ISGLOBALREGACC SMALLINT WITH DEFAULT NULL,
HASPENDINGACTVTY SMALLINT WITH DEFAULT NULL,
ISRELEVANT SMALLINT WITH DEFAULT NULL,
HASFUTUREMESSAGES SMALLINT WITH DEFAULT NULL,
FOTWIZISDISABLED SMALLINT WITH DEFAULT NULL,
ISONDB SMALLINT WITH DEFAULT NULL,
LOCATION INTEGER WITH DEFAULT NULL,
VSTNAME CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
VSTVERSION CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
CREATEUSERID CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
UPDATEUSERID CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
PROVIDER1SYMBOL CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
PROVIDER2SYMBOL CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
PROVIDER3SYMBOL CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
DELETIONDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
CREATETIMESTAMP VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
UPDATETIMESTAMP VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
STATUSTYPE SMALLINT WITH DEFAULT NULL,
DELETEREASONTYPE SMALLINT WITH DEFAULT NULL,
MAINLANGUAGETYPE SMALLINT WITH DEFAULT NULL,
FOTYPE SMALLINT WITH DEFAULT NULL,
DATASTATUSTYPE SMALLINT WITH DEFAULT NULL,
BLOCKINGCODETYPE SMALLINT WITH DEFAULT NULL,
LOGICDELETIONTYPE SMALLINT WITH DEFAULT NULL,
STATUSTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
DELETEREASONTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
MAINLANGUAGETYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
FOTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
DATASTATUSTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
BLOCKINGCODETYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
LOGICDELETIONTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_G VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_E VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_F VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_I VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_N VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
NAME_G VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
NAME_E VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
NAME_F VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
NAME_I VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
NAME_N VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
MODIFICATIONREASON VARCHAR(2000) FOR SBCS DATA
WITH DEFAULT NULL,
REMARKS VARCHAR(2000) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_G VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_E VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_F VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_I VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_N VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
KANTONSCODETYPE SMALLINT WITH DEFAULT NULL,
KANTONSCODETYPEV VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
PORTFOLIONO INTEGER WITH DEFAULT NULL,
HASADDRESS SMALLINT WITH DEFAULT NULL,
DOMICILE INTEGER WITH DEFAULT NULL,
TAXDOMICILE INTEGER WITH DEFAULT NULL,
ADDRESSLOCATION INTEGER WITH DEFAULT NULL,
ACCOUNTINGCURR INTEGER WITH DEFAULT NULL,
INITIALMARGINRATE FLOAT WITH DEFAULT NULL,
DOMICILE_A2 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
DOMICILE_WS80 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TAXDOMICILE_A2 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TAXDOMICILE_WS80 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
INDUSTRYCS CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
INDUSTRYTKBN CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
INDUSTRYMSCI CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
INDUSTRYDJ CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
INDUSTRYFTSE CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
INDUSTRYMFIB CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
INDUSTRYMFIS CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
INDUSTRYICB CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
INDUSTRYBDF CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TAXNUMBER CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
NONTAXABLENUMBER CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
HOUSENUMBER CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
ZIP CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TELEFAXNUMBER CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
BANKACCOUNTNUMBER CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
NATIONALBANKCODE CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
FOUNDATIONDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
PREVFINYEARENDDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
ACTFINYEARENDDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
REGISTERENTRYDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
REGENTRYDELETIONDT VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
YEARENDDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
NEXTSEMESTERREPORT VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
NONTAXABLEDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
PREVIOUSYEARENDDT VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
LEGALFORMTYPE SMALLINT WITH DEFAULT NULL,
TRUSTLEGALGUIDETP SMALLINT WITH DEFAULT NULL,
TRUSTSTATUSTYPE SMALLINT WITH DEFAULT NULL,
LEGALFORMTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
TRUSTLEGALGUIDETPV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
TRUSTSTATUSTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
CITY VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
INTERNETDOMAIN VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
STREET VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
EMAILNAME VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
PHONENUMBER VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
IBAN VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
ADDRESS VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
ADDRESSDESCR VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
HEADOFFICEDESCR VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
ADDRESSLOCATION_A2 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
ADDRESSLOCATION_WS80 CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
HASREDUNDANTINFO SMALLINT WITH DEFAULT NULL,
MDYISSUERRATING CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
MDYISSUERRATINGDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
MDYISSUERWATCHLISTSTATUSTYPE SMALLINT WITH DEFAULT NULL,
SPISSUERRATING CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
SPISSUERRATINGDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
SPISSUERWATCHLISTSTATUSTYPE SMALLINT WITH DEFAULT NULL,
FITCHISSUERRATING CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
FITCHISSUERRATINGDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
FITCHISSUERWATCHLISTSTATUSTYPE SMALLINT WITH DEFAULT NULL,
DOMICILE_A3 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TAXDOMICILE_A3 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
ADDRESSLOCATION_A3 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
DOWRITETOSHADOWTABLES SMALLINT WITH DEFAULT NULL,
CSASSEMBLYNOTIFICATIONTYPE SMALLINT WITH DEFAULT NULL,
INDUSTRYSIC CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
CONSTRAINT INSTITUTIONID
PRIMARY KEY (INSTITUTIONID))
IN VV23A1X.VDPS121
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
--
COMMIT;
--
------------------------------------------------------------------------
-- Database=VV23A1X
-- Index=VDPSX.VTXINSTITUTION1 On VDPSX.VTINSTITUTION
------------------------------------------------------------------------
--
CREATE UNIQUE INDEX VDPSX.VTXINSTITUTION1
ON VDPSX.VTINSTITUTION
(INSTITUTIONID ASC)
USING STOGROUP GSMS
PRIQTY 10800 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
--
COMMIT;
--
------------------------------------------------------------------------
-- Database=VV23A1X
-- Index=VDPSX.VTXINSTITUTION20 On VDPSX.VTINSTITUTION
------------------------------------------------------------------------
--
CREATE INDEX VDPSX.VTXINSTITUTION20
ON VDPSX.VTINSTITUTION
(INSTITUTIONTYPE ASC)
USING STOGROUP GSMS
PRIQTY 4320 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
--
COMMIT;
--
------------------------------------------------------------------------
-- Database=VV23A1X
-- Index=VDPSX.VTXINSTITUTION5 On VDPSX.VTINSTITUTION
------------------------------------------------------------------------
--
CREATE INDEX VDPSX.VTXINSTITUTION5
ON VDPSX.VTINSTITUTION
(CREATETIMESTAMP ASC)
PADDED
USING STOGROUP GSMS
PRIQTY 15120 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
--
COMMIT;
--
------------------------------------------------------------------------
-- Database=VV23A1X
-- Index=VDPSX.VTXINSTITUTION50 On VDPSX.VTINSTITUTION
------------------------------------------------------------------------
--
CREATE INDEX VDPSX.VTXINSTITUTION50
ON VDPSX.VTINSTITUTION
(STATUSTYPE ASC)
USING STOGROUP GSMS
PRIQTY 4320 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
--
COMMIT;
--
------------------------------------------------------------------------
-- Database=VV23A1X
-- Index=VDPSX.VTXINSTITUTION6 On VDPSX.VTINSTITUTION
------------------------------------------------------------------------
--
CREATE INDEX VDPSX.VTXINSTITUTION6
ON VDPSX.VTINSTITUTION
(UPDATETIMESTAMP ASC)
PADDED
USING STOGROUP GSMS
PRIQTY 7200 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
--
COMMIT;
--
------------------------------------------------------------------------
-- Database=VV23A1X
-- Index=VDPSX.VTXINSTITUTION7 On VDPSX.VTINSTITUTION
------------------------------------------------------------------------
--
CREATE INDEX VDPSX.VTXINSTITUTION7
ON VDPSX.VTINSTITUTION
(FOTYPE ASC)
USING STOGROUP GSMS
PRIQTY 4320 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_SMDSA101
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F326930" ;
--
CREATE VIEW VDPSX.IDS_SMDSA101 AS
SELECT T1.INSTRUMENTID, T1.SYMBOLCH, T1.SYMBOLCSFI, T1.SYMBOLISIN,
T1.CSSTATUSTYPE, T1.CATEGORYVDPS, T1.CATEGORYCSGTA,
T1.CATEGORYEUZS, T2.STATUSTYPE, T2.NAME45_G, T2.NAME45_E,
T2.NAME45_F, T2.NAME45_I, T2.NAME45_N, T2.SHORTNAME_G,
T2.SHORTNAME_E, T2.SHORTNAME_F, T2.SHORTNAME_I,
T2.SHORTNAME_N, T2.ISSUER_GK, T2.EFFINTERESTRATE,
T2.BORROWERCATTYPE, T2.CSMAINTRADPLACE_WS80,
T2.CSMAINTRADPLACE_BCN, T2.CSMAINTRADPLACE_RTX,
T2.CSMAINTRADPLACE_BBX, T2.MATURITYDATE, T2.NOMINALAMOUNT,
T2.NOMINALCURR_WS80, T2.NOMINALCURR_I1, T2.NOMINALCURR_I2,
T2.BORROWINGLIMITTYPE, T2.CSFUNDTYPE, T2.CSLISTINGCODETYPE,
T2.ISCSMIFIDCOMPLEX, T2.EXPIRATIONDATE,
T2.HASMULTIUNDERLYERS, T2.HASWITHHOLDINGTAX,
T2.INTERESTTYPE, T2.ISREDEEMABLE, T2.LIQUIDATIONRIGHTTYPE,
T2.REGISTRATIONTYPE, T2.CSUNITTYPE,
T2.MOSTLIQUIDMARKETLOCATION_WS80,
T2.MOSTLIQUIDMARKETLOCATION_A3,
T2.MOSTLIQUIDMARKETLOCATION_A2, T2.EXPIRATIONTYPE,
T3.TRADINGPLACE, T4.ISSET02, T5.IDSYMBOL SYMBOLCSGIV,
T1.INSTRUMENTCREATETIMESTAMP, T1.INSTRUMENTUPDATETIMESTAMP
FROM VDPSX.VTINSTRFLATSYMBOLS T1
INNER JOIN
VDPSX.VTINSTRFLATDATA T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPSX.VTLISTING T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID AND T3.
ISMAINTRADINGPLACE = 1
LEFT OUTER JOIN
VDPSX.CTCODESET T4
ON T4.INSTRUMENTID = T1.INSTRUMENTID AND T4.CODETYPE = 7
LEFT OUTER JOIN
VDPSX.VTINSTRINGROUP T5
ON T5.INSTRUMENTID = T1.INSTRUMENTID AND T5.SCHEMESYMBOL =
'CSGIV' ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_SMDSA104
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.IDS_SMDSA104 AS
SELECT T1.INSTITUTIONID, T2.IDSYMBOL SYMBOLGK, T1.INDUSTRYCS,
T1.INDUSTRYTKBN, T1.INDUSTRYMSCI, T1.INDUSTRYBDF,
T1.INDUSTRYICB, T1.INDUSTRYMFIB, T1.INDUSTRYMFIS,
T3.IDSYMBOL SYMBOLUIC, T4.IDSYMBOL SYMBOLUKCN,
T5.IDSYMBOL SYMBOLOENB, T6.IDSYMBOL SYMBOLCVR,
T7.IDSYMBOL SYMBOLTVABE, T8.IDSYMBOL SYMBOLRCS,
T9.IDSYMBOL SYMBOLDUNS, T1.DOMICILE_A2, T1.DOMICILE_WS80,
T1.DOMICILE_A3, T10.IDSYMBOL DOMICILE_ISON,
T11.IDSYMBOL DOMICILE_TKN, T12.IDSYMBOL DOMICILE_TKR,
T1.CREATETIMESTAMP, T1.UPDATETIMESTAMP
FROM VDPSX.VTINSTITUTION T1
INNER JOIN
VDPSX.VTINSTIIDENT T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND T2.SCHEMESYMBOL
= 'GK'
LEFT OUTER JOIN
VDPSX.VTINSTIIDENT T3
ON T3.INSTITUTIONID = T1.INSTITUTIONID AND T3.SCHEMESYMBOL
= 'UIC'
LEFT OUTER JOIN
VDPSX.VTINSTIIDENT T4
ON T4.INSTITUTIONID = T1.INSTITUTIONID AND T4.SCHEMESYMBOL
= 'UKCN'
LEFT OUTER JOIN
VDPSX.VTINSTIIDENT T5
ON T5.INSTITUTIONID = T1.INSTITUTIONID AND T5.SCHEMESYMBOL
= 'OENB'
LEFT OUTER JOIN
VDPSX.VTINSTIIDENT T6
ON T6.INSTITUTIONID = T1.INSTITUTIONID AND T6.SCHEMESYMBOL
= 'CVR'
LEFT OUTER JOIN
VDPSX.VTINSTIIDENT T7
ON T7.INSTITUTIONID = T1.INSTITUTIONID AND T7.SCHEMESYMBOL
= 'TVABE'
LEFT OUTER JOIN
VDPSX.VTINSTIIDENT T8
ON T8.INSTITUTIONID = T1.INSTITUTIONID AND T8.SCHEMESYMBOL
= 'RCS'
LEFT OUTER JOIN
VDPSX.VTINSTIIDENT T9
ON T9.INSTITUTIONID = T1.INSTITUTIONID AND T9.SCHEMESYMBOL
= 'DUNS'
LEFT OUTER JOIN
VDPSX.VTGEOUNITIDENT T10
ON T10.GEOUNITID = T1.DOMICILE AND T10.SCHEMESYMBOL =
'ISON'
LEFT OUTER JOIN
VDPSX.VTGEOUNITIDENT T11
ON T11.GEOUNITID = T1.DOMICILE AND T11.SCHEMESYMBOL = 'TKN'
LEFT OUTER JOIN
VDPSX.VTGEOUNITIDENT T12
ON T12.GEOUNITID = T1.DOMICILE AND T12.SCHEMESYMBOL = 'TKR' ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_SMDSA106
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.IDS_SMDSA106 AS
SELECT T1.INSTITUTIONID, T1.SYMBOLGK, T1.SYMBOLSP, T1.SYMBOLMDY,
T1.SYMBOLIBEI, T1.CATEGORYVDPS, T1.STATUSTYPE,
T1.ROWSTATUS, T2.NAME_G, T2.NAME_E, T2.NAME_F, T2.NAME_I,
T2.NAME_N, T2.SHORTNAME_G, T2.SHORTNAME_E, T2.SHORTNAME_F,
T2.SHORTNAME_I, T2.SHORTNAME_N, T2.INDUSTRYCS,
T2.DOMICILE_A3 DOMICILE_A3, T2.DOMICILE_WS80 DOMICILE_CS,
T2.DOMICILE_A2 DOMICILE_ISO, T2.LEGALFORMTYPE,
T2.PREVFINYEARENDDATE, T2.REGISTERENTRYDATE,
T2.REGENTRYDELETIONDT, T2.MAINLANGUAGETYPE,
T2.INTERNETDOMAIN, T2.CREATETIMESTAMP, T2.UPDATETIMESTAMP
FROM VDPSX.VTINSTIFLATSYMBOLS T1
INNER JOIN
VDPSX.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_SMDSA107
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.IDS_SMDSA107 AS
SELECT T1.INSTITUTIONID, T1.SYMBOLGK, T2.NAME_G, T2.NAME_E,
T2.NAME_F, T2.NAME_I, T2.NAME_N, T2.CREATETIMESTAMP,
T2.UPDATETIMESTAMP
FROM VDPSX.VTINSTIFLATSYMBOLS T1
INNER JOIN
VDPSX.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_SMDSA112
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.IDS_SMDSA112 AS
SELECT T1.INSTITUTIONID, T1.SYMBOLGK, T2.IDSYMBOL IDSYMBOL_RATING,
T2.SCHEMESYMBOL SCHEME_RATING, T2.RATINGDATE,
T2.WATCHLISTSTATTYPE, T2.RATINGSTATUSTYPE, T2.REVIEWDATE,
T2.SOURCETYPE, T2.UNIQUENUMBER, T3.CREATETIMESTAMP,
T3.UPDATETIMESTAMP
FROM VDPSX.VTINSTIFLATSYMBOLS T1
INNER JOIN
(SELECT TA.INSTITUTIONID, TA.IDSYMBOL, TA.SCHEMESYMBOL,
TA.RATINGDATE, TA.WATCHLISTSTATTYPE,
TA.RATINGSTATUSTYPE, TA.REVIEWDATE, TA.SOURCETYPE,
TA.UNIQUENUMBER
FROM VDPSX.VTINSTIRATING TA
WHERE TA.SCHEMESYMBOL = 'CSIB'
AND TA.RATINGDATE = (
SELECT MAX(TC.RATINGDATE)
FROM VDPSX.VTINSTIRATING TC
WHERE TC.INSTITUTIONID = TA.INSTITUTIONID
AND TC.SCHEMESYMBOL = 'CSIB')) T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID
INNER JOIN
VDPSX.VTINSTITUTION T3
ON T3.INSTITUTIONID = T1.INSTITUTIONID ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_SMDSA114
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.IDS_SMDSA114 AS
SELECT T1.INSTITUTIONID, T1.SYMBOLGK, T2.IDSYMBOL IDSYMBOL_RATING,
T2.SCHEMESYMBOL SCHEME_RATING, T2.RATINGDATE,
T2.WATCHLISTSTATTYPE, T2.RATINGSTATUSTYPE, T2.REVIEWDATE,
T2.SOURCETYPE, T2.UNIQUENUMBER, T4.CREATETIMESTAMP,
T4.UPDATETIMESTAMP
FROM VDPSX.VTINSTIFLATSYMBOLS T1
INNER JOIN
(SELECT TA.INSTITUTIONID, TA.IDSYMBOL, TA.SCHEMESYMBOL,
TA.RATINGDATE, TA.WATCHLISTSTATTYPE,
TA.RATINGSTATUSTYPE, TA.REVIEWDATE, TA.SOURCETYPE,
TA.UNIQUENUMBER
FROM VDPSX.VTINSTIRATING TA
WHERE TA.SCHEMESYMBOL IN(
SELECT DISTINCT TB.SCHEMESYMBOL
FROM VDPSX.VTINSTIRATING TB
WHERE TA.INSTITUTIONID = TB.INSTITUTIONID)
AND TA.RATINGDATE = (
SELECT MAX(TC.RATINGDATE)
FROM VDPSX.VTINSTIRATING TC
WHERE TC.INSTITUTIONID = TA.INSTITUTIONID
AND TC.SCHEMESYMBOL = TA.SCHEMESYMBOL
GROUP BY TC.SCHEMESYMBOL)) T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID
INNER JOIN
VDPSX.VTRATINGSCHEME T3
ON T3.SCHEMESYMBOL = T2.SCHEMESYMBOL AND T3.INSTITUTIONID
= 10052339
INNER JOIN
VDPSX.VTINSTITUTION T4
ON T4.INSTITUTIONID = T1.INSTITUTIONID ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_SMDSA116
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.IDS_SMDSA116 AS
SELECT T1.INSTITUTIONID, T1.SYMBOLGK, T2.IDSYMBOL IDSYMBOL_RATING,
T2.SCHEMESYMBOL SCHEME_RATING, T2.RATINGDATE,
T2.WATCHLISTSTATTYPE, T2.RATINGSTATUSTYPE, T2.REVIEWDATE,
T2.SOURCETYPE, T2.UNIQUENUMBER, T4.CREATETIMESTAMP,
T4.UPDATETIMESTAMP
FROM VDPSX.VTINSTIFLATSYMBOLS T1
INNER JOIN
(SELECT TA.INSTITUTIONID, TA.IDSYMBOL, TA.SCHEMESYMBOL,
TA.RATINGDATE, TA.WATCHLISTSTATTYPE,
TA.RATINGSTATUSTYPE, TA.REVIEWDATE, TA.SOURCETYPE,
TA.UNIQUENUMBER
FROM VDPSX.VTINSTIRATING TA
WHERE TA.SCHEMESYMBOL IN(
SELECT DISTINCT TB.SCHEMESYMBOL
FROM VDPSX.VTINSTIRATING TB
WHERE TA.INSTITUTIONID = TB.INSTITUTIONID)
AND TA.RATINGDATE = (
SELECT MAX(TC.RATINGDATE)
FROM VDPSX.VTINSTIRATING TC
WHERE TC.INSTITUTIONID = TA.INSTITUTIONID
AND TC.SCHEMESYMBOL = TA.SCHEMESYMBOL
GROUP BY TC.SCHEMESYMBOL)) T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID
INNER JOIN
VDPSX.VTRATINGSCHEME T3
ON T3.SCHEMESYMBOL = T2.SCHEMESYMBOL AND T3.INSTITUTIONID
= 10052338
INNER JOIN
VDPSX.VTINSTITUTION T4
ON T4.INSTITUTIONID = T1.INSTITUTIONID ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_SMDS1501
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F578271" ;
--
CREATE VIEW VDPSX.IDS_SMDS1501 AS
SELECT T1.INSTRUMENTID, T2.SYMBOLCH, T2.SYMBOLCSFI, T2.SYMBOLISIN,
T2.CATEGORYVDPS, T2.STATUSTYPE, T2.ROWSTATUS,
T2.UPDATETIMESTAMP, T2.CREATETIMESTAMP,
T2.INSTRUMENTUPDATETIMESTAMP, T2.INSTRUMENTCREATETIMESTAMP,
T1.LISTINGSYMBOLTK, T1.CURRENCY_WS80, T1.CURRENCY_I2,
T1.CURRENCY_I1, T1.MARKTPRACTIDSYMBOL, T1.FIRSTTRADINGDATE,
T1.LASTTRADINGDATE, T1.ISMAINTRADINGPLACE,
T1.ISHOMETRADINGPLACE, T1.ISBESTSPREAD,
T1.ISBESTSPREADPERCURR, T1.ISBESTVOLUME,
T1.ISBESTVOLUMEBESTSPREAD, T1.ISBESTVOLUMEPERCURR,
T1.ISCSBESTVENUEOVERALL, T1.ISCSBESTVENUEPERCURR,
T1.ISFUNDASSESSMENTSOURCE, T1.ISHIGHESTTICKS,
T1.ISNAVINDEPENDENTSOURCE, T1.ISPLACEOFQUOTE,
T1.ISPLACEOFLISTING, T1.ISPLACEOFTRADING,
T1.ISPRIMARYMARKETUSA, T1.ISSINGLETRADINGPLACE,
T1.LISTINGCLASSTYPE, T1.LISTINGSTATUSTYPE,
T1.PRICINGUNITNO, T1.PRICINGUNITTYPE, T1.TRADINGPLACE_BBX,
T1.TRADINGPLACE_BCN, T1.TRADINGPLACE_WS80,
T1.TRADINGPLACE_MIC, T1.TRADINGPLACE_RTX,
T1.PARENTTRADINGPLACE_BBX, T1.PARENTTRADINGPLACE_BCN,
T1.PARENTTRADINGPLACE_WS80, T1.PARENTTRADINGPLACE_MIC,
T1.PARENTTRADINGPLACE_RTX, T1.TRADINGSTATUSTYPE,
T1.TRADINGUNITTYPE, T1.LISTINGSYMBOLRT, T1.LISTINGSYMBOLBB,
T1.MINTRADINGUNITNO, T1.REGULARTRADINGUNITNO,
T1.NOMINALTRADINGUNITNO, T1.NMSTRADINGUNITNO,
T1.EMSTRADINGUNITNO, T1.SMSTRADINGUNITNO,
T1.PTSTRADINGUNITNO, T1.LISTINGNO, T3.CSLISTINGCODETYPE,
T3.CSMAINTRADPLACE_BBX, T3.CSMAINTRADPLACE_BCN,
T3.CSMAINTRADPLACE_WS80, T3.CSMAINTRADPLACE_MIC,
T3.CSMAINTRADPLACE_RTX, T4.IDSYMBOL IDSYMBOL_TKM,
T4.SCHEMESYMBOL SCHEMESYMBOL_TKM, T5.IDSYMBOL IDSYMBOL_TKL,
T5.SCHEMESYMBOL SCHEMESYMBOL_TKL, T6.IDSYMBOL IDSYMBOL_TKE,
T6.SCHEMESYMBOL SCHEMESYMBOL_TKE
FROM VDPSX.VTLISTING T1
INNER JOIN
VDPSX.VTINSTRFLATSYMBOLS T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTRFLATDATA T3
ON T3.INSTRUMENTID = T2.INSTRUMENTID
LEFT OUTER JOIN
VDPSX.VTLISTINGIDENT T4
ON T4.INSTRUMENTID = T1.INSTRUMENTID AND T4.LISTINGNO = T1.
LISTINGNO AND T4.SCHEMESYMBOL = 'TKM'
LEFT OUTER JOIN
VDPSX.VTLISTINGIDENT T5
ON T5.INSTRUMENTID = T1.INSTRUMENTID AND T5.LISTINGNO = T1.
LISTINGNO AND T5.SCHEMESYMBOL = 'TKL'
LEFT OUTER JOIN
VDPSX.VTLISTINGIDENT T6
ON T6.INSTRUMENTID = T1.INSTRUMENTID AND T6.LISTINGNO = T1.
LISTINGNO AND T6.SCHEMESYMBOL = 'TKE' ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_VCLDP148_V02
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F473828" ;
--
CREATE VIEW VDPSX.IDS_VCLDP148_V02 AS
SELECT A.INSTRUMENTID, B.INSTITUTIONID_GK, C.CLEARINGSYSTEMTYPE,
C.DELIVERYMODETYPE, D.SHORTNAME_G, D.SHORTNAME_E,
D.SHORTNAME_F, D.SHORTNAME_I, D.SHORTNAME_N
FROM VDPSX.VTINSTRFLATSYMBOLS A
INNER JOIN
VDPSX.VTINSTIROLE B
ON B.INSTRUMENTID = A.INSTRUMENTID AND B.ROLETYPE = 6
INNER JOIN
VDPSX.VTCLEARINGCUSTODY C
ON C.INSTRUMENTID = B.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTITUTION D
ON D.INSTITUTIONID = B.INSTITUTIONID ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_VGNTY113
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.IDS_VGNTY113 AS
SELECT A.INSTRUMENTID, A.SYMBOLCH,
B.PROVIDER1ID AS PROVIDER1ID_INSTIROLE,
B.PROVIDER2ID AS PROVIDER2ID_INSTIROLE,
B.PROVIDER3ID AS PROVIDER3ID_INSTIROLE, B.INSTITUTIONID,
B.DESCRIPTION_G, B.DESCRIPTION_E, B.DESCRIPTION_F,
B.DESCRIPTION_I, B.DESCRIPTION_N, B.ROLETYPE,
B.GUARANTORROLETYPE, B.INSTITUTIONID_GK, C.GUARANTYNO,
C.PROVIDER1ID AS PROVIDER1ID_GNTY,
C.PROVIDER2ID AS PROVIDER2ID_GNTY,
C.PROVIDER3ID AS PROVIDER3ID_GNTY, C.GUARANTYVALUE,
C.GUARANTYCLAUSETYPE, D.SHORTNAME_G, D.SHORTNAME_E,
D.SHORTNAME_F, D.SHORTNAME_I, D.SHORTNAME_N, D.NAME_G,
D.NAME_E, D.NAME_F, D.NAME_I, D.NAME_N,
D.DESCRIPTION_G DESCRIPTION_G_INSTI,
D.DESCRIPTION_E DESCRIPTION_E_INSTI,
D.DESCRIPTION_F DESCRIPTION_F_INSTI,
D.DESCRIPTION_I DESCRIPTION_I_INSTI,
D.DESCRIPTION_N DESCRIPTION_N_INSTI, D.PORTFOLIONO,
D.DOMICILE, D.TAXDOMICILE, D.ADDRESSLOCATION,
D.ACCOUNTINGCURR, D.INITIALMARGINRATE, D.DOMICILE_A2,
D.DOMICILE_WS80, D.TAXDOMICILE_A2, D.TAXDOMICILE_WS80,
D.INDUSTRYCS, D.INDUSTRYTKBN, D.INDUSTRYMSCI, D.INDUSTRYDJ,
D.INDUSTRYFTSE, D.INDUSTRYMFIB, D.INDUSTRYMFIS,
D.INDUSTRYICB, D.INDUSTRYBDF, D.TAXNUMBER,
D.BANKACCOUNTNUMBER, D.NATIONALBANKCODE, D.DOMICILE_A3,
D.TAXDOMICILE_A3
FROM VDPSX.VTINSTRFLATSYMBOLS A
INNER JOIN
VDPSX.VTINSTIROLE B
ON B.INSTRUMENTID = A.INSTRUMENTID AND B.ROLETYPE = 2
INNER JOIN
VDPSX.VTGUARANTY C
ON C.INSTRUMENTID = B.INSTRUMENTID AND C.INSTIROLENO = B.
INSTIROLENO
INNER JOIN
VDPSX.VTINSTITUTION D
ON D.INSTITUTIONID = B.INSTITUTIONID ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_VINIR133_V02
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F326930" ;
--
CREATE VIEW VDPSX.IDS_VINIR133_V02 AS
SELECT T1.INSTRUMENTID, T1.INSTITUTIONID, T1.ROLETYPE,
T1.GUARANTORROLETYPE, T2.ROWSTATUS, T2.SYMBOLGK,
T2.SYMBOLCSINSTIID, T2.SYMBOLFITCH, T2.SYMBOLSP,
T2.SYMBOLMDY, T2.SYMBOLIBEI, T2.SYMBOLBCN, T2.SYMBOLBCA,
T2.SYMBOLRTX, T2.SYMBOLBBX, T2.SYMBOLBBCX, T2.SYMBOLMIC,
T2.SYMBOLCSGHDST, T2.SYMBOLCSAREG, T2.SYMBOLCSWS80BPL,
T2.SYMBOLCSID01, T2.SYMBOLCSID03, T2.SYMBOLCSID05,
T2.SYMBOLCSID06, T2.CATEGORYVDPS, T2.CATEGORYCSGDIV,
T2.CATEGORYCSGME, T2.CATEGORYCSDG,
T2.CATEGORYTKINSTITUTION, T2.STATUSTYPE, T3.ISGLOBALREGACC,
T3.HASFUTUREMESSAGES, T3.MAINLANGUAGETYPE, T3.FOTYPE,
T3.SHORTNAME_G, T3.SHORTNAME_E, T3.SHORTNAME_F,
T3.SHORTNAME_I, T3.SHORTNAME_N, T3.NAME_G, T3.NAME_E,
T3.NAME_F, T3.NAME_I, T3.NAME_N, T3.KANTONSCODETYPE,
T3.DOMICILE, T3.TAXDOMICILE, T3.ACCOUNTINGCURR,
T3.INITIALMARGINRATE, T3.DOMICILE_A2, T3.DOMICILE_WS80,
T3.TAXDOMICILE_A2, T3.TAXDOMICILE_WS80, T3.INDUSTRYCS,
T3.INDUSTRYTKBN, T3.INDUSTRYMSCI, T3.INDUSTRYDJ,
T3.INDUSTRYFTSE, T3.INDUSTRYMFIB, T3.INDUSTRYMFIS,
T3.INDUSTRYICB, T3.INDUSTRYBDF, T3.TAXNUMBER,
T3.NONTAXABLENUMBER, T3.HOUSENUMBER, T3.ZIP,
T3.TELEFAXNUMBER, T3.BANKACCOUNTNUMBER,
T3.NATIONALBANKCODE, T3.FOUNDATIONDATE,
T3.PREVFINYEARENDDATE, T3.ACTFINYEARENDDATE,
T3.REGISTERENTRYDATE, T3.REGENTRYDELETIONDT,
T3.YEARENDDATE, T3.NEXTSEMESTERREPORT, T3.NONTAXABLEDATE,
T3.PREVIOUSYEARENDDT, T3.LEGALFORMTYPE,
T3.TRUSTLEGALGUIDETP, T3.TRUSTSTATUSTYPE, T3.CITY,
T3.INTERNETDOMAIN, T3.STREET, T3.EMAILNAME, T3.PHONENUMBER,
T3.IBAN, T3.ADDRESS, T3.ADDRESSDESCR, T3.HEADOFFICEDESCR,
T3.ADDRESSLOCATION_A2, T3.ADDRESSLOCATION_WS80,
T3.HASREDUNDANTINFO, T3.MDYISSUERRATING,
T3.MDYISSUERRATINGDATE, T3.MDYISSUERWATCHLISTSTATUSTYPE,
T3.SPISSUERRATING, T3.SPISSUERRATINGDATE,
T3.SPISSUERWATCHLISTSTATUSTYPE, T3.FITCHISSUERRATING,
T3.FITCHISSUERRATINGDATE,
T3.FITCHISSUERWATCHLISTSTATUSTYPE, T3.DOMICILE_A3,
T3.TAXDOMICILE_A3, T3.ADDRESSLOCATION_A3
FROM VDPSX.VTINSTIROLE T1
INNER JOIN
VDPSX.VTINSTIFLATSYMBOLS T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID
INNER JOIN
VDPSX.VTINSTITUTION T3
ON T3.INSTITUTIONID = T2.INSTITUTIONID ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_VINOP131
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F273764" ;
--
CREATE VIEW VDPSX.IDS_VINOP131 AS
SELECT T1.INSTRUMENTID, T1.ROWSTATUS, T1.SYMBOLCSFI, T1.SYMBOLCH,
T1.SYMBOLISIN, T1.SYMBOLUS, T1.SYMBOLXS, T1.SYMBOLGB,
T1.SYMBOLLU, T1.SYMBOLDE, T1.SYMBOLAT, T1.SYMBOLFR,
T1.SYMBOLBE, T1.SYMBOLIT, T1.SYMBOLNL, T1.SYMBOLJP,
T1.SYMBOLJ2, T1.SYMBOLDK, T1.SYMBOLSE, T1.SYMBOLI2,
T1.SYMBOLI1, T1.SYMBOLT1, T1.SYMBOLT2, T1.SYMBOLCSCURR,
T2.INCOMEMODETYPE, T2.MATURITYDATE, T2.EFFINTERESTRATE,
T2.FIRSTPAYDATE, T2.FIRSTPYDATEPERYEAR,
T2.ISCALLFORTXREONLY, T2.ISREDEEMABLE, T2.ISRETRACTABLE,
T2.ISCONVERTBYHOLDER, T2.ISCONVERTBYISSUER,
T2.INTRSTDVDENFRDATE, T2.INTERESTTYPE, T2.INTERESTCALCTYPE,
T2.PAYFREQUENCY, T2.PYFREQUNITTYPE, T2.REPAYPRICEAMOUNT,
T2.REPAYPRICERATE, T2.REPAYPRICECURR, T2.REPAYPRICECURR_I2,
T2.REPAYPRICECURR_I1, T2.REPAYPRICECURR_WS80,
T2.POOLFACTOR, T2.VOTINGRIGHTNO, T2.HASVOTINGRIGHTNO,
T2.HASREDMPINVARCURR, T2.HASWITHHOLDINGTAX,
T2.HASFEDERALSTAMPDUTY, T2.OUTSTANDINGCAPITAL,
T2.ISSUEDCAPITAL, T2.ISCSMIFIDCOMPLEX,
T2.MOSTLIQUIDMARKETLOCATION,
T2.MOSTLIQUIDMARKETLOCATION_A2,
T2.MOSTLIQUIDMARKETLOCATION_A3,
T2.MOSTLIQUIDMARKETLOCATION_WS80, T2.OUTSTANDCAPITALNO,
T2.ISSUEDCAPITALNO, T2.ISSUEAMOUNT, T2.ISSUEPRICE,
T2.ISSUEPRICECURR, T2.ISSUEPRICECURR_I2,
T2.ISSUEPRICECURR_I1, T2.ISSUEPRICECURR_WS80,
T2.SUBSCRBEGINDATE, T2.SUBSCRPLNDENDDATE,
T2.SUBSCRMETHODTYPE, T2.PAYMENTDATE, T2.PLACEMENTTYPE,
T2.ORIGINALISSUER, T2.ORIGINALISSUER_GK, T2.ISSUER,
T2.ISSUER_GK, T2.NAME35_G, T2.NAME35_E, T2.NAME35_F,
T2.NAME35_I, T2.NAME35_N, T2.NAME45_G, T2.NAME45_E,
T2.NAME45_F, T2.NAME45_I, T2.NAME45_N,
T2.SHORTNAME_G SHORTNAME_G_FLTDATA,
T2.SHORTNAME_E SHORTNAME_E_FLTDATA,
T2.SHORTNAME_F SHORTNAME_F_FLTDATA,
T2.SHORTNAME_I SHORTNAME_I_FLTDATA,
T2.SHORTNAME_N SHORTNAME_N_FLTDATA,
T3.SHORTNAME_G SHORTNAME_G_ORG_ISSUER,
T3.SHORTNAME_E SHORTNAME_E_ORG_ISSUER,
T3.SHORTNAME_F SHORTNAME_F_ORG_ISSUER,
T3.SHORTNAME_I SHORTNAME_I_ORG_ISSUER,
T3.SHORTNAME_N SHORTNAME_N_ORG_ISSUER,
T3.DOMICILE DOMICILE_ORG_ISSUER,
T3.DOMICILE_A2 DOMICILE_A2_ORG_ISSUER,
T3.DOMICILE_A3 DOMICILE_A3_ORG_ISSUER,
T3.DOMICILE_WS80 DOMICILE_WS80_ORG_ISSUER,
T3.NAME_G NAME_G_ORG_ISSUER, T3.NAME_E NAME_E_ORG_ISSUER,
T3.NAME_F NAME_F_ORG_ISSUER, T3.NAME_I NAME_I_ORG_ISSUER,
T3.NAME_N NAME_N_ORG_ISSUER,
T3.INDUSTRYCS INDUSTRYCS_ORG_ISSUER,
T3.INDUSTRYTKBN INDUSTRYTKBN_ORG_ISSUER,
T3.INDUSTRYMSCI INDUSTRYMSCI_ORG_ISSUER,
T4.SHORTNAME_G SHORTNAME_G_ISSUER,
T4.SHORTNAME_E SHORTNAME_E_ISSUER,
T4.SHORTNAME_F SHORTNAME_F_ISSUER,
T4.SHORTNAME_I SHORTNAME_I_ISSUER,
T4.SHORTNAME_N SHORTNAME_N_ISSUER,
T4.DOMICILE DOMICILE_ISSUER,
T4.DOMICILE_A2 DOMICILE_A2_ISSUER,
T4.DOMICILE_A3 DOMICILE_A3_ISSUER,
T4.DOMICILE_WS80 DOMICILE_WS80_ISSUER,
T4.NAME_G NAME_G_ISSUER, T4.NAME_E NAME_E_ISSUER,
T4.NAME_F NAME_F_ISSUER, T4.NAME_I NAME_I_ISSUER,
T4.NAME_N NAME_N_ISSUER, T4.INDUSTRYCS INDUSTRYCS_ISSUER,
T4.INDUSTRYTKBN INDUSTRYTKBN_ISSUER,
T4.INDUSTRYMSCI INDUSTRYMSCI_ISSUER, T2.NOMINALCURR_I1,
T2.NOMINALCURR_I2, T2.NOMINALCURR_WS80
FROM VDPSX.VTINSTRFLATSYMBOLS T1
INNER JOIN
VDPSX.VTINSTRFLATDATA T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTITUTION T3
ON T3.INSTITUTIONID = T2.ORIGINALISSUER
INNER JOIN
VDPSX.VTINSTITUTION T4
ON T4.INSTITUTIONID = T2.ISSUER ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_VINOP140
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
--
CREATE VIEW VDPSX.IDS_VINOP140 AS
SELECT T1.INSTRUMENTID, T1.ROWSTATUS ROWSTATUS_FLTSYMB,
T1.SYMBOLCSFI, T1.SYMBOLCH, T1.SYMBOLISIN, T1.SYMBOLUS,
T1.SYMBOLXS, T1.SYMBOLGB, T1.SYMBOLLU, T1.SYMBOLDE,
T1.SYMBOLAT, T1.SYMBOLFR, T1.SYMBOLBE, T1.SYMBOLIT,
T1.SYMBOLNL, T1.SYMBOLJP, T1.SYMBOLJ2, T1.SYMBOLDK,
T1.SYMBOLSE, T1.SYMBOLI2, T1.SYMBOLI1, T1.SYMBOLT1,
T1.SYMBOLT2, T1.SYMBOLCSCURR, T1.CATEGORYVDPS,
T1.CATEGORYTKT, T1.CATEGORYTKSK, T1.CATEGORYTKZUS,
T1.CATEGORYTKPRK, T1.CATEGORYTKTZ, T1.CATEGORYMAZU,
T1.CATEGORYECBTR, T1.CATEGORYCFI, T1.CATEGORYEUZS,
T1.CATEGORYCSGTA, T1.CATEGORYCSGMS, T1.CATEGUSTAXREPORT,
T1.CATEGUSIRSADDITION,
T1.CSSTATUSTYPE CSSTATUSTYPE_FLTSYMB,
T1.STATUSTYPE STATUSTYPE_FLTSYMB, T2.PAYFREQUENCY,
T2.ISCALLFORTXREONLY, T2.ISREDEEMABLE, T2.ISRETRACTABLE,
T2.ISCONVERTBYHOLDER, T2.ISCONVERTBYISSUER,
T2.HASVOTINGRIGHTNO, T2.HASREDMPINVARCURR,
T2.HASMULTIUNDERLYERS, T2.MAINDEPOSITARY, T2.NOMINALAMOUNT,
T2.MINDENOMINATION, T2.EFFINTERESTRATE,
T2.REPAYPRICEAMOUNT, T2.REPAYPRICERATE, T2.POOLFACTOR,
T2.VOTINGRIGHTNO, T2.OUTSTANDINGCAPITAL, T2.ISSUEDCAPITAL,
T2.OUTSTANDCAPITALNO, T2.ISSUEDCAPITALNO, T2.ISSUEAMOUNT,
T2.ISSUEPRICE, T2.EXERCISEAMOUNT, T2.MINEXERCISEAMOUNT,
T2.HELDAMOUNT, T2.PAYAMOUNT, T2.INCOMETAXRATE,
T2.PREMIUMRATE, T2.PARTICIPATIONRATE, T2.REBATE,
T2.CSRATING, T2.CSRISKINDIDSYMBOL, T2.CSRISKINDSCHEMESYM,
T2.CSRISKINSTGRPIDSYM, T2.CSRISKINSGRPSCHSYM, T2.MDYRATING,
T2.SPRATING, T2.FITCHRATING, T2.LISTINGSYMBOLTKH,
T2.LISTINGSYMBOLRIC, T2.LISTINGSYMBOLBBI,
T2.NOMINALCURR_I1, T2.NOMINALCURR_I2, T2.NOMINALCURR_WS80,
T2.CSRISKCURRENCY_I1, T2.CSRISKCURRENCY_I2,
T2.CSRISKCURRENCY_WS80, T2.CSRISINSTRUMENT_CH,
T2.CSRISINSTRUMENT_ISIN, T2.CSRISINSTRUMENT_CSFI,
T2.CSRISKCOUNTRY_A2, T2.CSRISKCOUNTRY_WS80,
T2.REPAYPRICECURR_I1, T2.REPAYPRICECURR_I2,
T2.REPAYPRICECURR_WS80, T2.ISSUEPRICECURR_I1,
T2.ISSUEPRICECURR_I2, T2.ISSUEPRICECURR_WS80,
T2.EXERCISECURR_I1, T2.EXERCISECURR_I2,
T2.EXERCISECURR_WS80, T2.CSMAINTRADPLACE_BCN,
T2.CSMAINTRADPLACE_WS80, T2.CSMAINTRADPLACE_RTX,
T2.CSMAINTRADPLACE_BBX, T2.UNDERINSTRUMENT_CH,
T2.UNDERINSTRUMENT, T2.UNDERINSTRUMENT_ISIN,
T2.UNDERINSTRUMENT_CSFI, T2.ORIGINALISSUER_GK,
T2.ISSUER_GK, T2.MAINDEPOSITARY_GK, T2.EXPIRATIONDATE,
T2.MATURITYDATE, T2.FIRSTPAYDATE, T2.FIRSTPYDATEPERYEAR,
T2.INTRSTDVDENFRDATE, T2.CSRATINGDATE, T2.MDYRATINGDATE,
T2.SPRATINGDATE, T2.FITCHRATINGDATE, T2.SUBSCRBEGINDATE,
T2.PAYMENTDATE, T2.EXERCISEBEGINDATE, T2.SUBSCRPLNDENDDATE,
T2.EXERCISEENDDATE, T2.BVGTYPE, T2.CREDITWORTHINESSTP,
T2.COMMISSIONCODETYPE, T2.UNITTYPE, T2.CSUNITTYPE,
T2.EXPIRATIONTYPE, T2.STATUSTYPE STATUSTYPE_FLTDATA,
T2.REGISTRATIONTYPE, T2.BORROWERCATTYPE,
T2.CSLISTINGCODETYPE, T2.CSSTATUSTYPE CSSTATUSTYPE_FLTDATA,
T2.STATUSDETAILTYPE, T2.INCOMEMODETYPE,
T2.INTERESTCALCTYPE, T2.INTERESTTYPE, T2.PYFREQUNITTYPE,
T2.SUBSCRMETHODTYPE, T2.PLACEMENTTYPE, T2.PAYDIRECTIONTYPE,
T2.OPTIONTYPE, T2.SETTLESTYLETYPE, T2.CSFUNDTYPE,
T2.TRADINGSTATUSTYPE, T2.LISTINGSTATUSTYPE,
T2.EXERCISEPLACE, T2.NAME35_G, T2.NAME35_E, T2.NAME35_F,
T2.NAME35_I, T2.NAME35_N, T2.NAME45_G, T2.NAME45_E,
T2.NAME45_F, T2.NAME45_I, T2.NAME45_N, T2.SHORTNAME_G,
T2.SHORTNAME_E, T2.SHORTNAME_F, T2.SHORTNAME_I,
T2.SHORTNAME_N, T2.ISINTERNAL, T2.ISOTC,
T2.HASWITHHOLDINGTAX, T2.HASFEDERALSTAMPDUTY,
T2.ISCSMIFIDCOMPLEX, T2.MOSTLIQUIDMARKETLOCATION_A2,
T2.MOSTLIQUIDMARKETLOCATION_A3,
T2.MOSTLIQUIDMARKETLOCATION_WS80,
T2.MDYWATCHLISTSTATUSTYPE, T2.SPWATCHLISTSTATUSTYPE,
T2.FITCHWATCHLISTSTATUSTYPE, T2.OPTIONSTYLETYPE,
T2.CSMAINTRADINGCURR_I1, T2.CSMAINTRADINGCURR_I2,
T2.CSMAINTRADINGCURR_WS80, T2.CSRISKCOUNTRY_A3,
T2.LIQUIDATIONRIGHTTYPE, T2.CSMAINPARENTTRADINGPLACE_BCN,
T2.CSMAINPARENTTRADINGPLACE_RTX,
T2.CSMAINPARENTTRADINGPLACE_MIC,
T2.CSMAINPARENTTRADINGPLACE_BBX,
T2.CSMAINPARENTTRADINGPLACE_WS80, T2.PREPARTICLE_G,
T2.PREPARTICLE_E, T2.PREPARTICLE_F, T2.PREPARTICLE_I,
T2.PREPARTICLE_N, T2.POSTPARTICLE_G, T2.POSTPARTICLE_E,
T2.POSTPARTICLE_F, T2.POSTPARTICLE_I, T2.POSTPARTICLE_N,
T3.INSTITUTIONID INSTITUTIONID_ORG_ISSUER,
T3.ROWSTATUS ROWSTATUS_ORG_ISSUER,
T3.SYMBOLGK SYMBOLGK_ORG_ISSUER,
T3.SYMBOLCSINSTIID SYMBOLCSINSTIID_ORG_ISSUER,
T3.SYMBOLFITCH SYMBOLFITCH_ORG_ISSUER,
T3.SYMBOLSP SYMBOLSP_ORG_ISSUER,
T3.SYMBOLMDY SYMBOLMDY_ORG_ISSUER,
T3.SYMBOLCSGHDST SYMBOLCSGHDST_ORG_ISSUER,
T3.SYMBOLCSAREG SYMBOLCSAREG_ORG_ISSUER,
T3.SYMBOLIBEI SYMBOLIBEI_ORG_ISSUER,
T3.SYMBOLBCN SYMBOLBCN_ORG_ISSUER,
T3.SYMBOLBCA SYMBOLBCA_ORG_ISSUER,
T3.SYMBOLRTX SYMBOLRTX_ORG_ISSUER,
T3.SYMBOLBBX SYMBOLBBX_ORG_ISSUER,
T3.SYMBOLBBCX SYMBOLBBCX_ORG_ISSUER,
T3.SYMBOLMIC SYMBOLMIC_ORG_ISSUER,
T3.SYMBOLCSWS80BPL SYMBOLCSWS80BPL_ORG_ISSUER,
T3.SYMBOLCSID01 SYMBOLCSID01_ORG_ISSUER,
T3.SYMBOLCSID03 SYMBOLCSID03_ORG_ISSUER,
T3.SYMBOLCSID05 SYMBOLCSID05_ORG_ISSUER,
T3.SYMBOLCSID06 SYMBOLCSID06_ORG_ISSUER,
T3.CATEGORYVDPS CATEGORYVDPS_ORG_ISSUER,
T3.CATEGORYCSGDIV CATEGORYCSGDIV_ORG_ISSUER,
T3.CATEGORYCSGME CATEGORYCSGME_ORG_ISSUER,
T3.CATEGORYCSDG CATEGORYCSDG_ORG_ISSUER,
T3.CATEGORYTKINSTITUTION CATEGORYTKINSTI_ORG_ISSUER,
T3.STATUSTYPE STATUSTYPE_ORG_ISSUER,
T4.INSTITUTIONTYPE INSTITUTIONTYPE_ORG_ISSUER,
T4.ISGLOBALREGACC ISGLOBALREGACC_ORG_ISSUER,
T4.HASPENDINGACTVTY HASPENDINGACTVTY_ORG_ISSUER,
T4.ISRELEVANT ISRELEVANTV_ORG_ISSUER,
T4.ISONDB ISONDB_ORG_ISSUER,
T4.ACCOUNTINGCURR ACCOUNTINGCURR_ORG_ISSUER,
T4.INITIALMARGINRATE INITIALMARGINRATE_ORG_ISSUER,
T4.DOMICILE_A2 DOMICILE_A2_ORG_ISSUER,
T4.DOMICILE_WS80 DOMICILE_WS80_ORG_ISSUER,
T4.TAXDOMICILE_A2 TAXDOMICILE_A2_ORG_ISSUER,
T4.TAXDOMICILE_WS80 TAXDOMICILE_WS80_ORG_ISSUER,
T4.INDUSTRYCS INDUSTRYCS_ORG_ISSUER,
T4.INDUSTRYTKBN INDUSTRYTKBN_ORG_ISSUER,
T4.INDUSTRYMSCI INDUSTRYMSCI_ORG_ISSUER,
T4.INDUSTRYDJ INDUSTRYDJ_ORG_ISSUER,
T4.INDUSTRYFTSE INDUSTRYFTSE_ORG_ISSUER,
T4.INDUSTRYMFIB INDUSTRYMFIB_ORG_ISSUER,
T4.INDUSTRYMFIS INDUSTRYMFIS_ORG_ISSUER,
T4.INDUSTRYICB INDUSTRYICB_ORG_ISSUER,
T4.INDUSTRYBDF INDUSTRYBDF_ORG_ISSUER,
T4.TAXNUMBER TAXNUMBER_ORG_ISSUER,
T4.NONTAXABLENUMBER NONTAXABLENUMBER_ORG_ISSUER,
T4.HOUSENUMBER HOUSENUMBER_ORG_ISSUER,
T4.ZIP ZIP_ORG_ISSUER,
T4.TELEFAXNUMBER TELEFAXNUMBER_ORG_ISSUER,
T4.NATIONALBANKCODE NATIONALBANKCODE_ORG_ISSUER,
T4.BANKACCOUNTNUMBER BANKACCOUNTNUMBER_ORG_ISSUER,
T4.FOUNDATIONDATE FOUNDATIONDATE_ORG_ISSUER,
T4.PREVFINYEARENDDATE PREVFINYEARENDDATE_ORG_ISSUER,
T4.ACTFINYEARENDDATE ACTFINYEARENDDATE_ORG_ISSUER,
T4.REGISTERENTRYDATE REGISTERENTRYDATE_ORG_ISSUER,
T4.REGENTRYDELETIONDT REGENTRYDELETIONDT_ORG_ISSUER,
T4.YEARENDDATE YEARENDDATE_ORG_ISSUER,
T4.NEXTSEMESTERREPORT NEXTSEMESTERREPORT_ORG_ISSUER,
T4.NONTAXABLEDATE NONTAXABLEDATE_ORG_ISSUER,
T4.PREVIOUSYEARENDDT PREVIOUSYEARENDDT_ORG_ISSUER,
T4.CREATETIMESTAMP CREATETIMESTAMP_ORG_ISSUER,
T4.UPDATETIMESTAMP UPDATETIMESTAMP_ORG_ISSUER,
T4.MAINLANGUAGETYPE MAINLANGUAGETYPE_ORG_ISSUER,
T4.KANTONSCODETYPE KANTONSCODETYPE_ORG_ISSUER,
T4.LEGALFORMTYPE LEGALFORMTYPE_ORG_ISSUER,
T4.TRUSTLEGALGUIDETP TRUSTLEGALGUIDETP_ORG_ISSUER,
T4.TRUSTSTATUSTYPE TRUSTSTATUSTYPE_ORG_ISSUER,
T4.FOTYPE FOTYPE_ORG_ISSUER,
T4.DATASTATUSTYPE DATASTATUSTYPE_ORG_ISSUER,
T4.BLOCKINGCODETYPE BLOCKINGCODETYPE_ORG_ISSUER,
T4.CITY CITY_ORG_ISSUER,
T4.INTERNETDOMAIN INTERNETDOMAIN_ORG_ISSUER,
T4.STREET STREET_ORG_ISSUER,
T4.EMAILNAME EMAILNAME_ORG_ISSUER,
T4.PHONENUMBER PHONENUMBER_ORG_ISSUER,
T4.IBAN IBAN_ORG_ISSUER,
T4.SHORTNAME_G SHORTNAME_G_ORG_ISSUER,
T4.SHORTNAME_E SHORTNAME_E_ORG_ISSUER,
T4.SHORTNAME_F SHORTNAME_F_ORG_ISSUER,
T4.SHORTNAME_I SHORTNAME_I_ORG_ISSUER,
T4.SHORTNAME_N SHORTNAME_N_ORG_ISSUER,
T4.NAME_G NAME_G_ORG_ISSUER, T4.NAME_E NAME_E_ORG_ISSUER,
T4.NAME_F NAME_F_ORG_ISSUER, T4.NAME_I NAME_I_ORG_ISSUER,
T4.NAME_N NAME_N_ORG_ISSUER,
T4.HASADDRESS HASADDRESS_ORG_ISSUER,
T4.ADDRESS ADDRESS_ORG_ISSUER,
T4.ADDRESSDESCR ADDRESSDESCR_ORG_ISSUER,
T4.HEADOFFICEDESCR HEADOFFICEDESCR_ORG_ISSUER,
T4.MDYISSUERRATING MDYISSUERRATING_ORG_ISSUER,
T4.MDYISSUERRATINGDATE MDYISSUERRATINGDT_ORG_ISSUER,
T4.MDYISSUERWATCHLISTSTATUSTYPE
MDYWLISTSTATUSTYPE_ORG_ISSUER,
T4.SPISSUERRATING SPISSUERRATING_ORG_ISSUER,
T4.SPISSUERRATINGDATE SPISSUERRATINGDATE_ORG_ISSUER,
T4.SPISSUERWATCHLISTSTATUSTYPE SPLISTSTATUSTYPE_ORG_ISSUER,
T4.FITCHISSUERRATING FITCHISSUERRT_ORG_ISSUER,
T4.FITCHISSUERRATINGDATE FITCHISSUERRTDT_ORG_ISSUER,
T4.FITCHISSUERWATCHLISTSTATUSTYPE FITCHWATCHSTTP_ORG_ISSUER,
T4.DOMICILE_A3 DOMICILE_A3_ORG_ISSUER,
T4.TAXDOMICILE_A3 TAXDOMICILE_A3_ORG_ISSUER,
T4.ADDRESSLOCATION_A2 ADDRESS_A2_ORG_ISSUER,
T4.ADDRESSLOCATION_A3 ADDRESS_A3_ORG_ISSUER,
T4.ADDRESSLOCATION_WS80 ADDRESS_WS80_ORG_ISSUER,
T5.INSTITUTIONID INSTITUTIONID_ISSUER,
T5.ROWSTATUS ROWSTATUS_ISSUER, T5.SYMBOLGK SYMBOLGK_ISSUER,
T5.SYMBOLCSINSTIID SYMBOLCSINSTIID_ISSUER,
T5.SYMBOLFITCH SYMBOLFITCH_ISSUER,
T5.SYMBOLSP SYMBOLSP_ISSUER, T5.SYMBOLMDY SYMBOLMDY_ISSUER,
T5.SYMBOLCSGHDST SYMBOLCSGHDST_ISSUER,
T5.SYMBOLCSAREG SYMBOLCSAREG_ISSUER,
T5.SYMBOLIBEI SYMBOLIBEI_ISSUER,
T5.SYMBOLBCN SYMBOLBCN_ISSUER,
T5.SYMBOLBCA SYMBOLBCA_ISSUER,
T5.SYMBOLRTX SYMBOLRTX_ISSUER,
T5.SYMBOLBBX SYMBOLBBX_ISSUER,
T5.SYMBOLBBCX SYMBOLBBCX_ISSUER,
T5.SYMBOLMIC SYMBOLMIC_ISSUER,
T5.SYMBOLCSWS80BPL SYMBOLCSWS80BPL_ISSUER,
T5.SYMBOLCSID01 SYMBOLCSID01_ISSUER,
T5.SYMBOLCSID03 SYMBOLCSID03_ISSUER,
T5.SYMBOLCSID05 SYMBOLCSID05_ISSUER,
T5.SYMBOLCSID06 SYMBOLCSID06_ISSUER,
T5.CATEGORYVDPS CATEGORYVDPS_ISSUER,
T5.CATEGORYCSGDIV CATEGORYCSGDIV_ISSUER,
T5.CATEGORYCSGME CATEGORYCSGME_ISSUER,
T5.CATEGORYCSDG CATEGORYCSDG_ISSUER,
T5.CATEGORYTKINSTITUTION CATEGORYTKINSTITUTION_ISSUER,
T5.STATUSTYPE STATUSTYPE_ISSUER,
T6.INSTITUTIONTYPE INSTITUTIONTYPE_ISSUER,
T6.ISGLOBALREGACC ISGLOBALREGACC_ISSUER,
T6.HASPENDINGACTVTY HASPENDINGACTVTY_ISSUER,
T6.ISRELEVANT ISRELEVANTV_ISSUER, T6.ISONDB ISONDB_ISSUER,
T6.INITIALMARGINRATE INITIALMARGINRATE_ISSUER,
T6.DOMICILE_A2 DOMICILE_A2_ISSUER,
T6.DOMICILE_WS80 DOMICILE_WS80_ISSUER,
T6.TAXDOMICILE_A2 TAXDOMICILE_A2_ISSUER,
T6.TAXDOMICILE_WS80 TAXDOMICILE_WS80_ISSUER,
T6.INDUSTRYCS INDUSTRYCS_ISSUER,
T6.INDUSTRYTKBN INDUSTRYTKBN_ISSUER,
T6.INDUSTRYMSCI INDUSTRYMSCI_ISSUER,
T6.INDUSTRYDJ INDUSTRYDJ_ISSUER,
T6.INDUSTRYFTSE INDUSTRYFTSE_ISSUER,
T6.INDUSTRYMFIB INDUSTRYMFIB_ISSUER,
T6.INDUSTRYMFIS INDUSTRYMFIS_ISSUER,
T6.INDUSTRYICB INDUSTRYICB_ISSUER,
T6.INDUSTRYBDF INDUSTRYBDF_ISSUER,
T6.TAXNUMBER TAXNUMBER_ISSUER,
T6.NONTAXABLENUMBER NONTAXABLENUMBER_ISSUER,
T6.HOUSENUMBER HOUSENUMBER_ISSUER, T6.ZIP ZIP_ISSUER,
T6.TELEFAXNUMBER TELEFAXNUMBER_ISSUER,
T6.NATIONALBANKCODE NATIONALBANKCODE_ISSUER,
T6.BANKACCOUNTNUMBER BANKACCOUNTNUMBER_ISSUER,
T6.FOUNDATIONDATE FOUNDATIONDATE_ISSUER,
T6.PREVFINYEARENDDATE PREVFINYEARENDDATE_ISSUER,
T6.ACTFINYEARENDDATE ACTFINYEARENDDATE_ISSUER,
T6.REGISTERENTRYDATE REGISTERENTRYDATE_ISSUER,
T6.REGENTRYDELETIONDT REGENTRYDELETIONDT_ISSUER,
T6.YEARENDDATE YEARENDDATE_ISSUER,
T6.NEXTSEMESTERREPORT NEXTSEMESTERREPORT_ISSUER,
T6.NONTAXABLEDATE NONTAXABLEDATE_ISSUER,
T6.PREVIOUSYEARENDDT PREVIOUSYEARENDDT_ISSUER,
T6.CREATETIMESTAMP CREATETIMESTAMP_ISSUER,
T6.UPDATETIMESTAMP UPDATETIMESTAMP_ISSUER,
T6.MAINLANGUAGETYPE MAINLANGUAGETYPE_ISSUER,
T6.KANTONSCODETYPE KANTONSCODETYPE_ISSUER,
T6.LEGALFORMTYPE LEGALFORMTYPE_ISSUER,
T6.TRUSTLEGALGUIDETP TRUSTLEGALGUIDETP_ISSUER,
T6.TRUSTSTATUSTYPE TRUSTSTATUSTYPE_ISSUER,
T6.FOTYPE FOTYPE_ISSUER,
T6.DATASTATUSTYPE DATASTATUSTYPE_ISSUER,
T6.BLOCKINGCODETYPE BLOCKINGCODETYPE_ISSUER,
T6.CITY CITY_ISSUER,
T6.INTERNETDOMAIN INTERNETDOMAIN_ISSUER,
T6.STREET STREET_ISSUER, T6.EMAILNAME EMAILNAME_ISSUER,
T6.PHONENUMBER PHONENUMBER_ISSUER, T6.IBAN IBAN_ISSUER,
T6.SHORTNAME_G SHORTNAME_G_ISSUER,
T6.SHORTNAME_E SHORTNAME_E_ISSUER,
T6.SHORTNAME_F SHORTNAME_F_ISSUER,
T6.SHORTNAME_I SHORTNAME_I_ISSUER,
T6.SHORTNAME_N SHORTNAME_N_ISSUER, T6.NAME_G NAME_G_ISSUER,
T6.NAME_E NAME_E_ISSUER, T6.NAME_F NAME_F_ISSUER,
T6.NAME_I NAME_I_ISSUER, T6.NAME_N NAME_N_ISSUER,
T6.HASADDRESS HASADDRESS_ISSUER, T6.ADDRESS ADDRESS_ISSUER,
T6.ADDRESSDESCR ADDRESSDESCR_ISSUER,
T6.HEADOFFICEDESCR HEADOFFICEDESCR_ISSUER,
T6.MODIFICATIONREASON MODIFICATIONREASON_ISSUER,
T6.MDYISSUERRATING MDYISSUERRATING_ISSUER,
T6.MDYISSUERRATINGDATE MDYISSUERRATINGDATE_ISSUER,
T6.MDYISSUERWATCHLISTSTATUSTYPE
MDYWATCHLISTSTATUSTYPE_ISSUER,
T6.SPISSUERRATING SPISSUERRATING_ISSUER,
T6.SPISSUERRATINGDATE SPISSUERRATINGDATE_ISSUER,
T6.SPISSUERWATCHLISTSTATUSTYPE SPWATCHLISTSTATUSTYPE_ISSUER,
T6.FITCHISSUERRATING FITCHISSUERRATING_ISSUER,
T6.FITCHISSUERRATINGDATE FITCHISSUERRATINGDATE_ISSUER,
T6.FITCHISSUERWATCHLISTSTATUSTYPE FITCHWATCHLISTSTTP_ISSUER,
T6.DOMICILE_A3 DOMICILE_A3_ISSUER,
T6.TAXDOMICILE_A3 TAXDOMICILE_A3_ISSUER,
T6.ADDRESSLOCATION_A2 ADDRESSLOCATION_A2_ISSUER,
T6.ADDRESSLOCATION_A3 ADDRESSLOCATION_A3_ISSUER,
T6.ADDRESSLOCATION_WS80 ADDRESSLOCATION_WS80_ISSUER,
T7.BESTVENUEUPDATETS, T7.EUROCLEARDEPO, T7.FISNPOOLNUMBER,
T7.FISNPROGRAM, T7.FISNTRANCHE, T7.FISNTRUST,
T7.FISNUNDERLYING, T7.HYBRIDACRONYMTYPE, T7.IDFORMATTYPE,
T7.ISAUTOMATEDDISTRIB, T7.ISBLUECHIP, T7.NTIPTYPE,
T7.OTEXMARKETMAKER, T7.OTEXORDERDESK, T7.OTEXRISKDOMICILE,
T7.BRANDNAME, T7.PRODUCTNAME, T7.CSPRODUCTCATEGORY,
T7.ISMANAGEDBYCS, T7.CSBTVRELEVANCETYPE,
T8.DEFREPAYMENTPERIOD, T8.POSITIONLIMIT,
T8.MARGININPERCENT, T8.MARGININITIALAMOUN,
T8.MARGINSPREADAMOUNT, T8.TICKAMOUNT, T8.TICKSIZE,
T8.CONTRACTSIZE, T8.CONTSIZEUNDERLYING, T8.BONDFLOOR,
T8.DISCOUNT, T8.GUARANTEREPAYPRICE, T8.RESERVENUMBER1,
T8.RESERVENUMBER2, T8.RESERVENUMBER3, T8.RESERVENUMBER4,
T8.RESERVENUMBER5, T8.RESERVENUMBER6, T8.MANDATOR,
T8.RESERVETEXT1, T8.RESERVETEXT2, T8.RESERVETEXT3,
T8.CSBOARDLOT, T8.CSINCOMETAXTYPE, T8.POSITIONCURRTYPE,
T8.KANTONSCODETYPE, T8.CSEVENTDTCODETYPE,
T8.CSFUNDTYPE CSFUNDTYPE_SP42, T8.CSRELEVANCEDATE,
T8.HASQUOTESBLOCK, T8.HASFUNDSUNBUNDLING,
T8.FUNDDEPOSITARY, T8.FUNDCATEGORY,
T9.CREATETIMESTAMP CREATETIMESTAMP_INSTR,
T9.UPDATETIMESTAMP UPDATETIMESTAMP_INSTR, T1.SYMBOLSPIRIT
FROM VDPSX.VTINSTRFLATSYMBOLS T1
INNER JOIN
VDPSX.VTINSTRFLATDATA T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTIFLATSYMBOLS T3
ON T3.INSTITUTIONID = T2.ORIGINALISSUER
INNER JOIN
VDPSX.VTINSTITUTION T4
ON T4.INSTITUTIONID = T2.ORIGINALISSUER
INNER JOIN
VDPSX.VTINSTRUMENT T9
ON T9.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTIFLATSYMBOLS T5
ON T5.INSTITUTIONID = T2.ISSUER
INNER JOIN
VDPSX.VTINSTITUTION T6
ON T6.INSTITUTIONID = T2.ISSUER
LEFT OUTER JOIN
VDPSX.CTINSTRDETAILS T7
ON T7.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPSX.CTINSTRSP42DETAILS T8
ON T8.INSTRUMENTID = T1.INSTRUMENTID ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_VINOP140_V02
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F273764" ;
--
CREATE VIEW VDPSX.IDS_VINOP140_V02 AS
SELECT T1.INSTRUMENTID, T1.ROWSTATUS ROWSTATUS_FLTSYMB,
T1.SYMBOLCSFI, T1.SYMBOLCH, T1.SYMBOLISIN, T1.SYMBOLUS,
T1.SYMBOLXS, T1.SYMBOLGB, T1.SYMBOLLU, T1.SYMBOLDE,
T1.SYMBOLAT, T1.SYMBOLFR, T1.SYMBOLBE, T1.SYMBOLIT,
T1.SYMBOLNL, T1.SYMBOLJP, T1.SYMBOLJ2, T1.SYMBOLDK,
T1.SYMBOLSE, T1.SYMBOLI2, T1.SYMBOLI1, T1.SYMBOLT1,
T1.SYMBOLT2, T1.SYMBOLCSCURR, T1.CATEGORYVDPS,
T1.CATEGORYTKT, T1.CATEGORYTKSK, T1.CATEGORYTKZUS,
T1.CATEGORYTKPRK, T1.CATEGORYTKTZ, T1.CATEGORYMAZU,
T1.CATEGORYECBTR, T1.CATEGORYCFI, T1.CATEGORYEUZS,
T1.CATEGORYCSGTA, T1.CATEGORYCSGMS, T1.CATEGUSTAXREPORT,
T1.CATEGUSIRSADDITION,
T1.CSSTATUSTYPE CSSTATUSTYPE_FLTSYMB,
T1.STATUSTYPE STATUSTYPE_FLTSYMB, T2.PAYFREQUENCY,
T2.ISCALLFORTXREONLY, T2.ISREDEEMABLE, T2.ISRETRACTABLE,
T2.ISCONVERTBYHOLDER, T2.ISCONVERTBYISSUER,
T2.HASVOTINGRIGHTNO, T2.HASREDMPINVARCURR,
T2.HASMULTIUNDERLYERS, T2.MAINDEPOSITARY, T2.NOMINALAMOUNT,
T2.MINDENOMINATION, T2.EFFINTERESTRATE,
T2.REPAYPRICEAMOUNT, T2.REPAYPRICERATE, T2.POOLFACTOR,
T2.VOTINGRIGHTNO, T2.OUTSTANDINGCAPITAL, T2.ISSUEDCAPITAL,
T2.OUTSTANDCAPITALNO, T2.ISSUEDCAPITALNO, T2.ISSUEAMOUNT,
T2.ISSUEPRICE, T2.EXERCISEAMOUNT, T2.MINEXERCISEAMOUNT,
T2.HELDAMOUNT, T2.PAYAMOUNT, T2.INCOMETAXRATE,
T2.PREMIUMRATE, T2.PARTICIPATIONRATE, T2.REBATE,
T2.CSRATING, T2.CSRISKINDIDSYMBOL, T2.CSRISKINDSCHEMESYM,
T2.CSRISKINSTGRPIDSYM, T2.CSRISKINSGRPSCHSYM, T2.MDYRATING,
T2.SPRATING, T2.FITCHRATING, T2.LISTINGSYMBOLTKH,
T2.LISTINGSYMBOLRIC, T2.LISTINGSYMBOLBBI,
T2.NOMINALCURR_I1, T2.NOMINALCURR_I2, T2.NOMINALCURR_WS80,
T2.CSRISKCURRENCY_I1, T2.CSRISKCURRENCY_I2,
T2.CSRISKCURRENCY_WS80, T2.CSRISINSTRUMENT_CH,
T2.CSRISINSTRUMENT_ISIN, T2.CSRISINSTRUMENT_CSFI,
T2.CSRISKCOUNTRY_A2, T2.CSRISKCOUNTRY_WS80,
T2.REPAYPRICECURR_I1, T2.REPAYPRICECURR_I2,
T2.REPAYPRICECURR_WS80, T2.ISSUEPRICECURR_I1,
T2.ISSUEPRICECURR_I2, T2.ISSUEPRICECURR_WS80,
T2.EXERCISECURR_I1, T2.EXERCISECURR_I2,
T2.EXERCISECURR_WS80, T2.CSMAINTRADPLACE_BCN,
T2.CSMAINTRADPLACE_WS80, T2.CSMAINTRADPLACE_RTX,
T2.CSMAINTRADPLACE_BBX, T2.UNDERINSTRUMENT_CH,
T2.UNDERINSTRUMENT_ISIN, T2.UNDERINSTRUMENT_CSFI,
T2.ORIGINALISSUER_GK, T2.ISSUER_GK, T2.MAINDEPOSITARY_GK,
T2.EXPIRATIONDATE, T2.MATURITYDATE, T2.FIRSTPAYDATE,
T2.FIRSTPYDATEPERYEAR, T2.INTRSTDVDENFRDATE,
T2.CSRATINGDATE, T2.MDYRATINGDATE, T2.SPRATINGDATE,
T2.FITCHRATINGDATE, T2.SUBSCRBEGINDATE, T2.PAYMENTDATE,
T2.EXERCISEBEGINDATE, T2.SUBSCRPLNDENDDATE,
T2.EXERCISEENDDATE, T2.BVGTYPE, T2.CREDITWORTHINESSTP,
T2.COMMISSIONCODETYPE, T2.UNITTYPE, T2.CSUNITTYPE,
T2.EXPIRATIONTYPE, T2.STATUSTYPE STATUSTYPE_FLTDATA,
T2.REGISTRATIONTYPE, T2.BORROWERCATTYPE,
T2.CSLISTINGCODETYPE, T2.CSSTATUSTYPE CSSTATUSTYPE_FLTDATA,
T2.STATUSDETAILTYPE, T2.INCOMEMODETYPE,
T2.INTERESTCALCTYPE, T2.INTERESTTYPE, T2.PYFREQUNITTYPE,
T2.SUBSCRMETHODTYPE, T2.PLACEMENTTYPE, T2.PAYDIRECTIONTYPE,
T2.OPTIONTYPE, T2.SETTLESTYLETYPE, T2.CSFUNDTYPE,
T2.TRADINGSTATUSTYPE, T2.LISTINGSTATUSTYPE,
T2.EXERCISEPLACE, T2.NAME35_G, T2.NAME35_E, T2.NAME35_F,
T2.NAME35_I, T2.NAME35_N, T2.NAME45_G, T2.NAME45_E,
T2.NAME45_F, T2.NAME45_I, T2.NAME45_N, T2.SHORTNAME_G,
T2.SHORTNAME_E, T2.SHORTNAME_F, T2.SHORTNAME_I,
T2.SHORTNAME_N, T2.ISINTERNAL, T2.ISOTC,
T2.HASWITHHOLDINGTAX, T2.HASFEDERALSTAMPDUTY,
T2.ISCSMIFIDCOMPLEX, T2.MOSTLIQUIDMARKETLOCATION_A2,
T2.MOSTLIQUIDMARKETLOCATION_A3,
T2.MOSTLIQUIDMARKETLOCATION_WS80,
T2.MDYWATCHLISTSTATUSTYPE, T2.SPWATCHLISTSTATUSTYPE,
T2.FITCHWATCHLISTSTATUSTYPE, T2.OPTIONSTYLETYPE,
T2.CSMAINTRADINGCURR_I1, T2.CSMAINTRADINGCURR_I2,
T2.CSMAINTRADINGCURR_WS80, T2.CSRISKCOUNTRY_A3,
T2.LIQUIDATIONRIGHTTYPE, T2.CSMAINPARENTTRADINGPLACE_BCN,
T2.CSMAINPARENTTRADINGPLACE_RTX,
T2.CSMAINPARENTTRADINGPLACE_MIC,
T2.CSMAINPARENTTRADINGPLACE_BBX,
T2.CSMAINPARENTTRADINGPLACE_WS80,
T3.INSTITUTIONID INSTITUTIONID_ORG_ISSUER,
T3.ROWSTATUS ROWSTATUS_ORG_ISSUER,
T3.SYMBOLGK SYMBOLGK_ORG_ISSUER,
T3.SYMBOLCSINSTIID SYMBOLCSINSTIID_ORG_ISSUER,
T3.SYMBOLFITCH SYMBOLFITCH_ORG_ISSUER,
T3.SYMBOLSP SYMBOLSP_ORG_ISSUER,
T3.SYMBOLMDY SYMBOLMDY_ORG_ISSUER,
T3.SYMBOLCSGHDST SYMBOLCSGHDST_ORG_ISSUER,
T3.SYMBOLCSAREG SYMBOLCSAREG_ORG_ISSUER,
T3.SYMBOLIBEI SYMBOLIBEI_ORG_ISSUER,
T3.SYMBOLBCN SYMBOLBCN_ORG_ISSUER,
T3.SYMBOLBCA SYMBOLBCA_ORG_ISSUER,
T3.SYMBOLRTX SYMBOLRTX_ORG_ISSUER,
T3.SYMBOLBBX SYMBOLBBX_ORG_ISSUER,
T3.SYMBOLBBCX SYMBOLBBCX_ORG_ISSUER,
T3.SYMBOLMIC SYMBOLMIC_ORG_ISSUER,
T3.SYMBOLCSWS80BPL SYMBOLCSWS80BPL_ORG_ISSUER,
T3.SYMBOLCSID01 SYMBOLCSID01_ORG_ISSUER,
T3.SYMBOLCSID03 SYMBOLCSID03_ORG_ISSUER,
T3.SYMBOLCSID05 SYMBOLCSID05_ORG_ISSUER,
T3.SYMBOLCSID06 SYMBOLCSID06_ORG_ISSUER,
T3.CATEGORYVDPS CATEGORYVDPS_ORG_ISSUER,
T3.CATEGORYCSGDIV CATEGORYCSGDIV_ORG_ISSUER,
T3.CATEGORYCSGME CATEGORYCSGME_ORG_ISSUER,
T3.CATEGORYCSDG CATEGORYCSDG_ORG_ISSUER,
T3.CATEGORYTKINSTITUTION CATEGORYTKINSTI_ORG_ISSUER,
T3.STATUSTYPE STATUSTYPE_ORG_ISSUER,
T4.INSTITUTIONTYPE INSTITUTIONTYPE_ORG_ISSUER,
T4.ISGLOBALREGACC ISGLOBALREGACC_ORG_ISSUER,
T4.HASPENDINGACTVTY HASPENDINGACTVTY_ORG_ISSUER,
T4.ISRELEVANT ISRELEVANTV_ORG_ISSUER,
T4.ISONDB ISONDB_ORG_ISSUER,
T4.ACCOUNTINGCURR ACCOUNTINGCURR_ORG_ISSUER,
T4.INITIALMARGINRATE INITIALMARGINRATE_ORG_ISSUER,
T4.DOMICILE_A2 DOMICILE_A2_ORG_ISSUER,
T4.DOMICILE_WS80 DOMICILE_WS80_ORG_ISSUER,
T4.TAXDOMICILE_A2 TAXDOMICILE_A2_ORG_ISSUER,
T4.TAXDOMICILE_WS80 TAXDOMICILE_WS80_ORG_ISSUER,
T4.INDUSTRYCS INDUSTRYCS_ORG_ISSUER,
T4.INDUSTRYTKBN INDUSTRYTKBN_ORG_ISSUER,
T4.INDUSTRYMSCI INDUSTRYMSCI_ORG_ISSUER,
T4.INDUSTRYDJ INDUSTRYDJ_ORG_ISSUER,
T4.INDUSTRYFTSE INDUSTRYFTSE_ORG_ISSUER,
T4.INDUSTRYMFIB INDUSTRYMFIB_ORG_ISSUER,
T4.INDUSTRYMFIS INDUSTRYMFIS_ORG_ISSUER,
T4.INDUSTRYICB INDUSTRYICB_ORG_ISSUER,
T4.INDUSTRYBDF INDUSTRYBDF_ORG_ISSUER,
T4.TAXNUMBER TAXNUMBER_ORG_ISSUER,
T4.NONTAXABLENUMBER NONTAXABLENUMBER_ORG_ISSUER,
T4.HOUSENUMBER HOUSENUMBER_ORG_ISSUER,
T4.ZIP ZIP_ORG_ISSUER,
T4.TELEFAXNUMBER TELEFAXNUMBER_ORG_ISSUER,
T4.NATIONALBANKCODE NATIONALBANKCODE_ORG_ISSUER,
T4.BANKACCOUNTNUMBER BANKACCOUNTNUMBER_ORG_ISSUER,
T4.FOUNDATIONDATE FOUNDATIONDATE_ORG_ISSUER,
T4.PREVFINYEARENDDATE PREVFINYEARENDDATE_ORG_ISSUER,
T4.ACTFINYEARENDDATE ACTFINYEARENDDATE_ORG_ISSUER,
T4.REGISTERENTRYDATE REGISTERENTRYDATE_ORG_ISSUER,
T4.REGENTRYDELETIONDT REGENTRYDELETIONDT_ORG_ISSUER,
T4.YEARENDDATE YEARENDDATE_ORG_ISSUER,
T4.NEXTSEMESTERREPORT NEXTSEMESTERREPORT_ORG_ISSUER,
T4.NONTAXABLEDATE NONTAXABLEDATE_ORG_ISSUER,
T4.PREVIOUSYEARENDDT PREVIOUSYEARENDDT_ORG_ISSUER,
T4.CREATETIMESTAMP CREATETIMESTAMP_ORG_ISSUER,
T4.UPDATETIMESTAMP UPDATETIMESTAMP_ORG_ISSUER,
T4.MAINLANGUAGETYPE MAINLANGUAGETYPE_ORG_ISSUER,
T4.KANTONSCODETYPE KANTONSCODETYPE_ORG_ISSUER,
T4.LEGALFORMTYPE LEGALFORMTYPE_ORG_ISSUER,
T4.TRUSTLEGALGUIDETP TRUSTLEGALGUIDETP_ORG_ISSUER,
T4.TRUSTSTATUSTYPE TRUSTSTATUSTYPE_ORG_ISSUER,
T4.FOTYPE FOTYPE_ORG_ISSUER,
T4.DATASTATUSTYPE DATASTATUSTYPE_ORG_ISSUER,
T4.BLOCKINGCODETYPE BLOCKINGCODETYPE_ORG_ISSUER,
T4.CITY CITY_ORG_ISSUER,
T4.INTERNETDOMAIN INTERNETDOMAIN_ORG_ISSUER,
T4.STREET STREET_ORG_ISSUER,
T4.EMAILNAME EMAILNAME_ORG_ISSUER,
T4.PHONENUMBER PHONENUMBER_ORG_ISSUER,
T4.IBAN IBAN_ORG_ISSUER,
T4.SHORTNAME_G SHORTNAME_G_ORG_ISSUER,
T4.SHORTNAME_E SHORTNAME_E_ORG_ISSUER,
T4.SHORTNAME_F SHORTNAME_F_ORG_ISSUER,
T4.SHORTNAME_I SHORTNAME_I_ORG_ISSUER,
T4.SHORTNAME_N SHORTNAME_N_ORG_ISSUER,
T4.NAME_G NAME_G_ORG_ISSUER, T4.NAME_E NAME_E_ORG_ISSUER,
T4.NAME_F NAME_F_ORG_ISSUER, T4.NAME_I NAME_I_ORG_ISSUER,
T4.NAME_N NAME_N_ORG_ISSUER,
T4.HASADDRESS HASADDRESS_ORG_ISSUER,
T4.ADDRESS ADDRESS_ORG_ISSUER,
T4.ADDRESSDESCR ADDRESSDESCR_ORG_ISSUER,
T4.HEADOFFICEDESCR HEADOFFICEDESCR_ORG_ISSUER,
T4.MDYISSUERRATING MDYISSUERRATING_ORG_ISSUER,
T4.MDYISSUERRATINGDATE MDYISSUERRATINGDT_ORG_ISSUER,
T4.MDYISSUERWATCHLISTSTATUSTYPE
MDYWLISTSTATUSTYPE_ORG_ISSUER,
T4.SPISSUERRATING SPISSUERRATING_ORG_ISSUER,
T4.SPISSUERRATINGDATE SPISSUERRATINGDATE_ORG_ISSUER,
T4.SPISSUERWATCHLISTSTATUSTYPE SPLISTSTATUSTYPE_ORG_ISSUER,
T4.FITCHISSUERRATING FITCHISSUERRT_ORG_ISSUER,
T4.FITCHISSUERRATINGDATE FITCHISSUERRTDT_ORG_ISSUER,
T4.FITCHISSUERWATCHLISTSTATUSTYPE FITCHWATCHSTTP_ORG_ISSUER,
T4.DOMICILE_A3 DOMICILE_A3_ORG_ISSUER,
T4.TAXDOMICILE_A3 TAXDOMICILE_A3_ORG_ISSUER,
T4.ADDRESSLOCATION_A2 ADDRESS_A2_ORG_ISSUER,
T4.ADDRESSLOCATION_A3 ADDRESS_A3_ORG_ISSUER,
T4.ADDRESSLOCATION_WS80 ADDRESS_WS80_ORG_ISSUER,
T5.INSTITUTIONID INSTITUTIONID_ISSUER,
T5.ROWSTATUS ROWSTATUS_ISSUER, T5.SYMBOLGK SYMBOLGK_ISSUER,
T5.SYMBOLCSINSTIID SYMBOLCSINSTIID_ISSUER,
T5.SYMBOLFITCH SYMBOLFITCH_ISSUER,
T5.SYMBOLSP SYMBOLSP_ISSUER, T5.SYMBOLMDY SYMBOLMDY_ISSUER,
T5.SYMBOLCSGHDST SYMBOLCSGHDST_ISSUER,
T5.SYMBOLCSAREG SYMBOLCSAREG_ISSUER,
T5.SYMBOLIBEI SYMBOLIBEI_ISSUER,
T5.SYMBOLBCN SYMBOLBCN_ISSUER,
T5.SYMBOLBCA SYMBOLBCA_ISSUER,
T5.SYMBOLRTX SYMBOLRTX_ISSUER,
T5.SYMBOLBBX SYMBOLBBX_ISSUER,
T5.SYMBOLBBCX SYMBOLBBCX_ISSUER,
T5.SYMBOLMIC SYMBOLMIC_ISSUER,
T5.SYMBOLCSWS80BPL SYMBOLCSWS80BPL_ISSUER,
T5.SYMBOLCSID01 SYMBOLCSID01_ISSUER,
T5.SYMBOLCSID03 SYMBOLCSID03_ISSUER,
T5.SYMBOLCSID05 SYMBOLCSID05_ISSUER,
T5.SYMBOLCSID06 SYMBOLCSID06_ISSUER,
T5.CATEGORYVDPS CATEGORYVDPS_ISSUER,
T5.CATEGORYCSGDIV CATEGORYCSGDIV_ISSUER,
T5.CATEGORYCSGME CATEGORYCSGME_ISSUER,
T5.CATEGORYCSDG CATEGORYCSDG_ISSUER,
T5.CATEGORYTKINSTITUTION CATEGORYTKINSTITUTION_ISSUER,
T5.STATUSTYPE STATUSTYPE_ISSUER,
T6.INSTITUTIONTYPE INSTITUTIONTYPE_ISSUER,
T6.ISGLOBALREGACC ISGLOBALREGACC_ISSUER,
T6.HASPENDINGACTVTY HASPENDINGACTVTY_ISSUER,
T6.ISRELEVANT ISRELEVANTV_ISSUER, T6.ISONDB ISONDB_ISSUER,
T6.INITIALMARGINRATE INITIALMARGINRATE_ISSUER,
T6.DOMICILE_A2 DOMICILE_A2_ISSUER,
T6.DOMICILE_WS80 DOMICILE_WS80_ISSUER,
T6.TAXDOMICILE_A2 TAXDOMICILE_A2_ISSUER,
T6.TAXDOMICILE_WS80 TAXDOMICILE_WS80_ISSUER,
T6.INDUSTRYCS INDUSTRYCS_ISSUER,
T6.INDUSTRYTKBN INDUSTRYTKBN_ISSUER,
T6.INDUSTRYMSCI INDUSTRYMSCI_ISSUER,
T6.INDUSTRYDJ INDUSTRYDJ_ISSUER,
T6.INDUSTRYFTSE INDUSTRYFTSE_ISSUER,
T6.INDUSTRYMFIB INDUSTRYMFIB_ISSUER,
T6.INDUSTRYMFIS INDUSTRYMFIS_ISSUER,
T6.INDUSTRYICB INDUSTRYICB_ISSUER,
T6.INDUSTRYBDF INDUSTRYBDF_ISSUER,
T6.TAXNUMBER TAXNUMBER_ISSUER,
T6.NONTAXABLENUMBER NONTAXABLENUMBER_ISSUER,
T6.HOUSENUMBER HOUSENUMBER_ISSUER, T6.ZIP ZIP_ISSUER,
T6.TELEFAXNUMBER TELEFAXNUMBER_ISSUER,
T6.NATIONALBANKCODE NATIONALBANKCODE_ISSUER,
T6.BANKACCOUNTNUMBER BANKACCOUNTNUMBER_ISSUER,
T6.FOUNDATIONDATE FOUNDATIONDATE_ISSUER,
T6.PREVFINYEARENDDATE PREVFINYEARENDDATE_ISSUER,
T6.ACTFINYEARENDDATE ACTFINYEARENDDATE_ISSUER,
T6.REGISTERENTRYDATE REGISTERENTRYDATE_ISSUER,
T6.REGENTRYDELETIONDT REGENTRYDELETIONDT_ISSUER,
T6.YEARENDDATE YEARENDDATE_ISSUER,
T6.NEXTSEMESTERREPORT NEXTSEMESTERREPORT_ISSUER,
T6.NONTAXABLEDATE NONTAXABLEDATE_ISSUER,
T6.PREVIOUSYEARENDDT PREVIOUSYEARENDDT_ISSUER,
T6.CREATETIMESTAMP CREATETIMESTAMP_ISSUER,
T6.UPDATETIMESTAMP UPDATETIMESTAMP_ISSUER,
T6.MAINLANGUAGETYPE MAINLANGUAGETYPE_ISSUER,
T6.KANTONSCODETYPE KANTONSCODETYPE_ISSUER,
T6.LEGALFORMTYPE LEGALFORMTYPE_ISSUER,
T6.TRUSTLEGALGUIDETP TRUSTLEGALGUIDETP_ISSUER,
T6.TRUSTSTATUSTYPE TRUSTSTATUSTYPE_ISSUER,
T6.FOTYPE FOTYPE_ISSUER,
T6.DATASTATUSTYPE DATASTATUSTYPE_ISSUER,
T6.BLOCKINGCODETYPE BLOCKINGCODETYPE_ISSUER,
T6.CITY CITY_ISSUER,
T6.INTERNETDOMAIN INTERNETDOMAIN_ISSUER,
T6.STREET STREET_ISSUER, T6.EMAILNAME EMAILNAME_ISSUER,
T6.PHONENUMBER PHONENUMBER_ISSUER, T6.IBAN IBAN_ISSUER,
T6.SHORTNAME_G SHORTNAME_G_ISSUER,
T6.SHORTNAME_E SHORTNAME_E_ISSUER,
T6.SHORTNAME_F SHORTNAME_F_ISSUER,
T6.SHORTNAME_I SHORTNAME_I_ISSUER,
T6.SHORTNAME_N SHORTNAME_N_ISSUER, T6.NAME_G NAME_G_ISSUER,
T6.NAME_E NAME_E_ISSUER, T6.NAME_F NAME_F_ISSUER,
T6.NAME_I NAME_I_ISSUER, T6.NAME_N NAME_N_ISSUER,
T6.HASADDRESS HASADDRESS_ISSUER, T6.ADDRESS ADDRESS_ISSUER,
T6.ADDRESSDESCR ADDRESSDESCR_ISSUER,
T6.HEADOFFICEDESCR HEADOFFICEDESCR_ISSUER,
T6.MODIFICATIONREASON MODIFICATIONREASON_ISSUER,
T6.MDYISSUERRATING MDYISSUERRATING_ISSUER,
T6.MDYISSUERRATINGDATE MDYISSUERRATINGDATE_ISSUER,
T6.MDYISSUERWATCHLISTSTATUSTYPE
MDYWATCHLISTSTATUSTYPE_ISSUER,
T6.SPISSUERRATING SPISSUERRATING_ISSUER,
T6.SPISSUERRATINGDATE SPISSUERRATINGDATE_ISSUER,
T6.SPISSUERWATCHLISTSTATUSTYPE SPWATCHLISTSTATUSTYPE_ISSUER,
T6.FITCHISSUERRATING FITCHISSUERRATING_ISSUER,
T6.FITCHISSUERRATINGDATE FITCHISSUERRATINGDATE_ISSUER,
T6.FITCHISSUERWATCHLISTSTATUSTYPE FITCHWATCHLISTSTTP_ISSUER,
T6.DOMICILE_A3 DOMICILE_A3_ISSUER,
T6.TAXDOMICILE_A3 TAXDOMICILE_A3_ISSUER,
T6.ADDRESSLOCATION_A2 ADDRESSLOCATION_A2_ISSUER,
T6.ADDRESSLOCATION_A3 ADDRESSLOCATION_A3_ISSUER,
T6.ADDRESSLOCATION_WS80 ADDRESSLOCATION_WS80_ISSUER,
T7.BESTVENUEUPDATETS, T7.EUROCLEARDEPO, T7.FISNPOOLNUMBER,
T7.FISNPROGRAM, T7.FISNTRANCHE, T7.FISNTRUST,
T7.FISNUNDERLYING, T7.HYBRIDACRONYMTYPE, T7.IDFORMATTYPE,
T7.ISAUTOMATEDDISTRIB, T7.ISBLUECHIP, T7.NTIPTYPE,
T7.OTEXMARKETMAKER, T7.OTEXORDERDESK, T7.OTEXRISKDOMICILE,
T7.BRANDNAME, T7.PRODUCTNAME, T7.CSPRODUCTCATEGORY,
T7.ISMANAGEDBYCS, T7.CSBTVRELEVANCETYPE,
T8.DEFREPAYMENTPERIOD, T8.POSITIONLIMIT,
T8.MARGININPERCENT, T8.MARGININITIALAMOUN,
T8.MARGINSPREADAMOUNT, T8.TICKAMOUNT, T8.TICKSIZE,
T8.CONTRACTSIZE, T8.CONTSIZEUNDERLYING, T8.BONDFLOOR,
T8.DISCOUNT, T8.GUARANTEREPAYPRICE, T8.RESERVENUMBER1,
T8.RESERVENUMBER2, T8.RESERVENUMBER3, T8.RESERVENUMBER4,
T8.RESERVENUMBER5, T8.RESERVENUMBER6, T8.MANDATOR,
T8.RESERVETEXT1, T8.RESERVETEXT2, T8.RESERVETEXT3,
T8.CSBOARDLOT, T8.CSINCOMETAXTYPE, T8.POSITIONCURRTYPE,
T8.KANTONSCODETYPE, T8.CSEVENTDTCODETYPE,
T8.CSFUNDTYPE CSFUNDTYPE_SP42, T8.CSRELEVANCEDATE,
T8.HASQUOTESBLOCK, T8.HASFUNDSUNBUNDLING,
T8.FUNDDEPOSITARY, T8.FUNDCATEGORY,
T9.CREATETIMESTAMP CREATETIMESTAMP_INSTR,
T9.UPDATETIMESTAMP UPDATETIMESTAMP_INSTR, T1.SYMBOLSPIRIT,
T2.UNDERINSTRUMENT, T2.PREPARTICLE_G, T2.PREPARTICLE_E,
T2.PREPARTICLE_F, T2.PREPARTICLE_I, T2.PREPARTICLE_N,
T2.POSTPARTICLE_G, T2.POSTPARTICLE_E, T2.POSTPARTICLE_F,
T2.POSTPARTICLE_I, T2.POSTPARTICLE_N, T9.NAME_G, T9.NAME_E,
T9.NAME_F, T9.NAME_I, T9.NAME_N,
T9.ISRELEVANT ISRELEVANT_INSTR, T2.MAINLANGUAGETYPE,
T2.ISSUEPRICERATE, T2.TITELARTZUSATZTEXT,
T2.BORROWINGLIMITTYPE, T2.ISVSTQUALITYCHECKED
FROM VDPSX.VTINSTRFLATSYMBOLS T1
INNER JOIN
VDPSX.VTINSTRFLATDATA T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTIFLATSYMBOLS T3
ON T3.INSTITUTIONID = T2.ORIGINALISSUER
INNER JOIN
VDPSX.VTINSTITUTION T4
ON T4.INSTITUTIONID = T2.ORIGINALISSUER
INNER JOIN
VDPSX.VTINSTRUMENT T9
ON T9.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTIFLATSYMBOLS T5
ON T5.INSTITUTIONID = T2.ISSUER
INNER JOIN
VDPSX.VTINSTITUTION T6
ON T6.INSTITUTIONID = T2.ISSUER
LEFT OUTER JOIN
VDPSX.CTINSTRDETAILS T7
ON T7.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPSX.CTINSTRSP42DETAILS T8
ON T8.INSTRUMENTID = T1.INSTRUMENTID ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_VINOP140_V03
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F578255" ;
--
CREATE VIEW VDPSX.IDS_VINOP140_V03 AS
SELECT T1.INSTRUMENTID, T1.ROWSTATUS ROWSTATUS_FLTSYMB,
T1.SYMBOLCSFI, T1.SYMBOLCH, T1.SYMBOLISIN, T1.SYMBOLUS,
T1.SYMBOLXS, T1.SYMBOLGB, T1.SYMBOLLU, T1.SYMBOLDE,
T1.SYMBOLAT, T1.SYMBOLFR, T1.SYMBOLBE, T1.SYMBOLIT,
T1.SYMBOLNL, T1.SYMBOLJP, T1.SYMBOLJ2, T1.SYMBOLDK,
T1.SYMBOLSE, T1.SYMBOLI2, T1.SYMBOLI1, T1.SYMBOLT1,
T1.SYMBOLT2, T1.SYMBOLCSCURR, T1.CATEGORYVDPS,
T1.CATEGORYTKT, T1.CATEGORYTKSK, T1.CATEGORYTKZUS,
T1.CATEGORYTKPRK, T1.CATEGORYTKTZ, T1.CATEGORYMAZU,
T1.CATEGORYECBTR, T1.CATEGORYCFI, T1.CATEGORYEUZS,
T1.CATEGORYCSGTA, T1.CATEGORYCSGMS, T1.CATEGUSTAXREPORT,
T1.CATEGUSIRSADDITION,
T1.CSSTATUSTYPE CSSTATUSTYPE_FLTSYMB,
T1.STATUSTYPE STATUSTYPE_FLTSYMB, T2.PAYFREQUENCY,
T2.ISCALLFORTXREONLY, T2.ISREDEEMABLE, T2.ISRETRACTABLE,
T2.ISCONVERTBYHOLDER, T2.ISCONVERTBYISSUER,
T2.HASVOTINGRIGHTNO, T2.HASREDMPINVARCURR,
T2.HASMULTIUNDERLYERS, T2.MAINDEPOSITARY, T2.NOMINALAMOUNT,
T2.MINDENOMINATION, T2.EFFINTERESTRATE,
T2.REPAYPRICEAMOUNT, T2.REPAYPRICERATE, T2.POOLFACTOR,
T2.VOTINGRIGHTNO, T2.OUTSTANDINGCAPITAL, T2.ISSUEDCAPITAL,
T2.OUTSTANDCAPITALNO, T2.ISSUEDCAPITALNO, T2.ISSUEAMOUNT,
T2.ISSUEPRICE, T2.EXERCISEAMOUNT, T2.MINEXERCISEAMOUNT,
T2.HELDAMOUNT, T2.PAYAMOUNT, T2.INCOMETAXRATE,
T2.PREMIUMRATE, T2.PARTICIPATIONRATE, T2.REBATE,
T2.CSRATING, T2.CSRISKINDIDSYMBOL, T2.CSRISKINDSCHEMESYM,
T2.CSRISKINSTGRPIDSYM, T2.CSRISKINSGRPSCHSYM, T2.MDYRATING,
T2.SPRATING, T2.FITCHRATING, T2.LISTINGSYMBOLTKH,
T2.LISTINGSYMBOLRIC, T2.LISTINGSYMBOLBBI,
T2.NOMINALCURR_I1, T2.NOMINALCURR_I2, T2.NOMINALCURR_WS80,
T2.CSRISKCURRENCY_I1, T2.CSRISKCURRENCY_I2,
T2.CSRISKCURRENCY_WS80, T2.CSRISINSTRUMENT_CH,
T2.CSRISINSTRUMENT_ISIN, T2.CSRISINSTRUMENT_CSFI,
T2.CSRISKCOUNTRY_A2, T2.CSRISKCOUNTRY_WS80,
T2.REPAYPRICECURR_I1, T2.REPAYPRICECURR_I2,
T2.REPAYPRICECURR_WS80, T2.ISSUEPRICECURR_I1,
T2.ISSUEPRICECURR_I2, T2.ISSUEPRICECURR_WS80,
T2.EXERCISECURR_I1, T2.EXERCISECURR_I2,
T2.EXERCISECURR_WS80, T2.CSMAINTRADPLACE_BCN,
T2.CSMAINTRADPLACE_WS80, T2.CSMAINTRADPLACE_RTX,
T2.CSMAINTRADPLACE_BBX, T2.UNDERINSTRUMENT_CH,
T2.UNDERINSTRUMENT_ISIN, T2.UNDERINSTRUMENT_CSFI,
T2.ORIGINALISSUER_GK, T2.ISSUER_GK, T2.MAINDEPOSITARY_GK,
T2.EXPIRATIONDATE, T2.MATURITYDATE, T2.FIRSTPAYDATE,
T2.FIRSTPYDATEPERYEAR, T2.INTRSTDVDENFRDATE,
T2.CSRATINGDATE, T2.MDYRATINGDATE, T2.SPRATINGDATE,
T2.FITCHRATINGDATE, T2.SUBSCRBEGINDATE, T2.PAYMENTDATE,
T2.EXERCISEBEGINDATE, T2.SUBSCRPLNDENDDATE,
T2.EXERCISEENDDATE, T2.BVGTYPE, T2.CREDITWORTHINESSTP,
T2.COMMISSIONCODETYPE, T2.UNITTYPE, T2.CSUNITTYPE,
T2.EXPIRATIONTYPE, T2.STATUSTYPE STATUSTYPE_FLTDATA,
T2.REGISTRATIONTYPE, T2.BORROWERCATTYPE,
T2.CSLISTINGCODETYPE, T2.CSSTATUSTYPE CSSTATUSTYPE_FLTDATA,
T2.STATUSDETAILTYPE, T2.INCOMEMODETYPE,
T2.INTERESTCALCTYPE, T2.INTERESTTYPE, T2.PYFREQUNITTYPE,
T2.SUBSCRMETHODTYPE, T2.PLACEMENTTYPE, T2.PAYDIRECTIONTYPE,
T2.OPTIONTYPE, T2.SETTLESTYLETYPE, T2.CSFUNDTYPE,
T2.TRADINGSTATUSTYPE, T2.LISTINGSTATUSTYPE,
T2.EXERCISEPLACE, T2.NAME35_G, T2.NAME35_E, T2.NAME35_F,
T2.NAME35_I, T2.NAME35_N, T2.NAME45_G, T2.NAME45_E,
T2.NAME45_F, T2.NAME45_I, T2.NAME45_N, T2.SHORTNAME_G,
T2.SHORTNAME_E, T2.SHORTNAME_F, T2.SHORTNAME_I,
T2.SHORTNAME_N, T2.ISINTERNAL, T2.ISOTC,
T2.HASWITHHOLDINGTAX, T2.HASFEDERALSTAMPDUTY,
T2.ISCSMIFIDCOMPLEX, T2.MOSTLIQUIDMARKETLOCATION_A2,
T2.MOSTLIQUIDMARKETLOCATION_A3,
T2.MOSTLIQUIDMARKETLOCATION_WS80,
T2.MDYWATCHLISTSTATUSTYPE, T2.SPWATCHLISTSTATUSTYPE,
T2.FITCHWATCHLISTSTATUSTYPE, T2.OPTIONSTYLETYPE,
T2.CSMAINTRADINGCURR_I1, T2.CSMAINTRADINGCURR_I2,
T2.CSMAINTRADINGCURR_WS80, T2.CSRISKCOUNTRY_A3,
T2.LIQUIDATIONRIGHTTYPE, T2.CSMAINPARENTTRADINGPLACE_BCN,
T2.CSMAINPARENTTRADINGPLACE_RTX,
T2.CSMAINPARENTTRADINGPLACE_MIC,
T2.CSMAINPARENTTRADINGPLACE_BBX,
T2.CSMAINPARENTTRADINGPLACE_WS80,
T3.INSTITUTIONID INSTITUTIONID_ORG_ISSUER,
T3.ROWSTATUS ROWSTATUS_ORG_ISSUER,
T3.SYMBOLGK SYMBOLGK_ORG_ISSUER,
T3.SYMBOLCSINSTIID SYMBOLCSINSTIID_ORG_ISSUER,
T3.SYMBOLFITCH SYMBOLFITCH_ORG_ISSUER,
T3.SYMBOLSP SYMBOLSP_ORG_ISSUER,
T3.SYMBOLMDY SYMBOLMDY_ORG_ISSUER,
T3.SYMBOLCSGHDST SYMBOLCSGHDST_ORG_ISSUER,
T3.SYMBOLCSAREG SYMBOLCSAREG_ORG_ISSUER,
T3.SYMBOLIBEI SYMBOLIBEI_ORG_ISSUER,
T3.SYMBOLBCN SYMBOLBCN_ORG_ISSUER,
T3.SYMBOLBCA SYMBOLBCA_ORG_ISSUER,
T3.SYMBOLRTX SYMBOLRTX_ORG_ISSUER,
T3.SYMBOLBBX SYMBOLBBX_ORG_ISSUER,
T3.SYMBOLBBCX SYMBOLBBCX_ORG_ISSUER,
T3.SYMBOLMIC SYMBOLMIC_ORG_ISSUER,
T3.SYMBOLCSWS80BPL SYMBOLCSWS80BPL_ORG_ISSUER,
T3.SYMBOLCSID01 SYMBOLCSID01_ORG_ISSUER,
T3.SYMBOLCSID03 SYMBOLCSID03_ORG_ISSUER,
T3.SYMBOLCSID05 SYMBOLCSID05_ORG_ISSUER,
T3.SYMBOLCSID06 SYMBOLCSID06_ORG_ISSUER,
T3.CATEGORYVDPS CATEGORYVDPS_ORG_ISSUER,
T3.CATEGORYCSGDIV CATEGORYCSGDIV_ORG_ISSUER,
T3.CATEGORYCSGME CATEGORYCSGME_ORG_ISSUER,
T3.CATEGORYCSDG CATEGORYCSDG_ORG_ISSUER,
T3.CATEGORYTKINSTITUTION CATEGORYTKINSTI_ORG_ISSUER,
T3.STATUSTYPE STATUSTYPE_ORG_ISSUER,
T4.INSTITUTIONTYPE INSTITUTIONTYPE_ORG_ISSUER,
T4.ISGLOBALREGACC ISGLOBALREGACC_ORG_ISSUER,
T4.HASPENDINGACTVTY HASPENDINGACTVTY_ORG_ISSUER,
T4.ISRELEVANT ISRELEVANTV_ORG_ISSUER,
T4.ISONDB ISONDB_ORG_ISSUER,
T4.ACCOUNTINGCURR ACCOUNTINGCURR_ORG_ISSUER,
T4.INITIALMARGINRATE INITIALMARGINRATE_ORG_ISSUER,
T4.DOMICILE_A2 DOMICILE_A2_ORG_ISSUER,
T4.DOMICILE_WS80 DOMICILE_WS80_ORG_ISSUER,
T4.TAXDOMICILE_A2 TAXDOMICILE_A2_ORG_ISSUER,
T4.TAXDOMICILE_WS80 TAXDOMICILE_WS80_ORG_ISSUER,
T4.INDUSTRYCS INDUSTRYCS_ORG_ISSUER,
T4.INDUSTRYTKBN INDUSTRYTKBN_ORG_ISSUER,
T4.INDUSTRYMSCI INDUSTRYMSCI_ORG_ISSUER,
T4.INDUSTRYDJ INDUSTRYDJ_ORG_ISSUER,
T4.INDUSTRYFTSE INDUSTRYFTSE_ORG_ISSUER,
T4.INDUSTRYMFIB INDUSTRYMFIB_ORG_ISSUER,
T4.INDUSTRYMFIS INDUSTRYMFIS_ORG_ISSUER,
T4.INDUSTRYICB INDUSTRYICB_ORG_ISSUER,
T4.INDUSTRYBDF INDUSTRYBDF_ORG_ISSUER,
T4.TAXNUMBER TAXNUMBER_ORG_ISSUER,
T4.NONTAXABLENUMBER NONTAXABLENUMBER_ORG_ISSUER,
T4.HOUSENUMBER HOUSENUMBER_ORG_ISSUER,
T4.ZIP ZIP_ORG_ISSUER,
T4.TELEFAXNUMBER TELEFAXNUMBER_ORG_ISSUER,
T4.NATIONALBANKCODE NATIONALBANKCODE_ORG_ISSUER,
T4.BANKACCOUNTNUMBER BANKACCOUNTNUMBER_ORG_ISSUER,
T4.FOUNDATIONDATE FOUNDATIONDATE_ORG_ISSUER,
T4.PREVFINYEARENDDATE PREVFINYEARENDDATE_ORG_ISSUER,
T4.ACTFINYEARENDDATE ACTFINYEARENDDATE_ORG_ISSUER,
T4.REGISTERENTRYDATE REGISTERENTRYDATE_ORG_ISSUER,
T4.REGENTRYDELETIONDT REGENTRYDELETIONDT_ORG_ISSUER,
T4.YEARENDDATE YEARENDDATE_ORG_ISSUER,
T4.NEXTSEMESTERREPORT NEXTSEMESTERREPORT_ORG_ISSUER,
T4.NONTAXABLEDATE NONTAXABLEDATE_ORG_ISSUER,
T4.PREVIOUSYEARENDDT PREVIOUSYEARENDDT_ORG_ISSUER,
T4.CREATETIMESTAMP CREATETIMESTAMP_ORG_ISSUER,
T4.UPDATETIMESTAMP UPDATETIMESTAMP_ORG_ISSUER,
T4.MAINLANGUAGETYPE MAINLANGUAGETYPE_ORG_ISSUER,
T4.KANTONSCODETYPE KANTONSCODETYPE_ORG_ISSUER,
T4.LEGALFORMTYPE LEGALFORMTYPE_ORG_ISSUER,
T4.TRUSTLEGALGUIDETP TRUSTLEGALGUIDETP_ORG_ISSUER,
T4.TRUSTSTATUSTYPE TRUSTSTATUSTYPE_ORG_ISSUER,
T4.FOTYPE FOTYPE_ORG_ISSUER,
T4.DATASTATUSTYPE DATASTATUSTYPE_ORG_ISSUER,
T4.BLOCKINGCODETYPE BLOCKINGCODETYPE_ORG_ISSUER,
T4.CITY CITY_ORG_ISSUER,
T4.INTERNETDOMAIN INTERNETDOMAIN_ORG_ISSUER,
T4.STREET STREET_ORG_ISSUER,
T4.EMAILNAME EMAILNAME_ORG_ISSUER,
T4.PHONENUMBER PHONENUMBER_ORG_ISSUER,
T4.IBAN IBAN_ORG_ISSUER,
T4.SHORTNAME_G SHORTNAME_G_ORG_ISSUER,
T4.SHORTNAME_E SHORTNAME_E_ORG_ISSUER,
T4.SHORTNAME_F SHORTNAME_F_ORG_ISSUER,
T4.SHORTNAME_I SHORTNAME_I_ORG_ISSUER,
T4.SHORTNAME_N SHORTNAME_N_ORG_ISSUER,
T4.NAME_G NAME_G_ORG_ISSUER, T4.NAME_E NAME_E_ORG_ISSUER,
T4.NAME_F NAME_F_ORG_ISSUER, T4.NAME_I NAME_I_ORG_ISSUER,
T4.NAME_N NAME_N_ORG_ISSUER,
T4.HASADDRESS HASADDRESS_ORG_ISSUER,
T4.ADDRESS ADDRESS_ORG_ISSUER,
T4.ADDRESSDESCR ADDRESSDESCR_ORG_ISSUER,
T4.HEADOFFICEDESCR HEADOFFICEDESCR_ORG_ISSUER,
T4.MDYISSUERRATING MDYISSUERRATING_ORG_ISSUER,
T4.MDYISSUERRATINGDATE MDYISSUERRATINGDT_ORG_ISSUER,
T4.MDYISSUERWATCHLISTSTATUSTYPE
MDYWLISTSTATUSTYPE_ORG_ISSUER,
T4.SPISSUERRATING SPISSUERRATING_ORG_ISSUER,
T4.SPISSUERRATINGDATE SPISSUERRATINGDATE_ORG_ISSUER,
T4.SPISSUERWATCHLISTSTATUSTYPE SPLISTSTATUSTYPE_ORG_ISSUER,
T4.FITCHISSUERRATING FITCHISSUERRT_ORG_ISSUER,
T4.FITCHISSUERRATINGDATE FITCHISSUERRTDT_ORG_ISSUER,
T4.FITCHISSUERWATCHLISTSTATUSTYPE FITCHWATCHSTTP_ORG_ISSUER,
T4.DOMICILE_A3 DOMICILE_A3_ORG_ISSUER,
T4.TAXDOMICILE_A3 TAXDOMICILE_A3_ORG_ISSUER,
T4.ADDRESSLOCATION_A2 ADDRESS_A2_ORG_ISSUER,
T4.ADDRESSLOCATION_A3 ADDRESS_A3_ORG_ISSUER,
T4.ADDRESSLOCATION_WS80 ADDRESS_WS80_ORG_ISSUER,
T5.INSTITUTIONID INSTITUTIONID_ISSUER,
T5.ROWSTATUS ROWSTATUS_ISSUER, T5.SYMBOLGK SYMBOLGK_ISSUER,
T5.SYMBOLCSINSTIID SYMBOLCSINSTIID_ISSUER,
T5.SYMBOLFITCH SYMBOLFITCH_ISSUER,
T5.SYMBOLSP SYMBOLSP_ISSUER, T5.SYMBOLMDY SYMBOLMDY_ISSUER,
T5.SYMBOLCSGHDST SYMBOLCSGHDST_ISSUER,
T5.SYMBOLCSAREG SYMBOLCSAREG_ISSUER,
T5.SYMBOLIBEI SYMBOLIBEI_ISSUER,
T5.SYMBOLBCN SYMBOLBCN_ISSUER,
T5.SYMBOLBCA SYMBOLBCA_ISSUER,
T5.SYMBOLRTX SYMBOLRTX_ISSUER,
T5.SYMBOLBBX SYMBOLBBX_ISSUER,
T5.SYMBOLBBCX SYMBOLBBCX_ISSUER,
T5.SYMBOLMIC SYMBOLMIC_ISSUER,
T5.SYMBOLCSWS80BPL SYMBOLCSWS80BPL_ISSUER,
T5.SYMBOLCSID01 SYMBOLCSID01_ISSUER,
T5.SYMBOLCSID03 SYMBOLCSID03_ISSUER,
T5.SYMBOLCSID05 SYMBOLCSID05_ISSUER,
T5.SYMBOLCSID06 SYMBOLCSID06_ISSUER,
T5.CATEGORYVDPS CATEGORYVDPS_ISSUER,
T5.CATEGORYCSGDIV CATEGORYCSGDIV_ISSUER,
T5.CATEGORYCSGME CATEGORYCSGME_ISSUER,
T5.CATEGORYCSDG CATEGORYCSDG_ISSUER,
T5.CATEGORYTKINSTITUTION CATEGORYTKINSTITUTION_ISSUER,
T5.STATUSTYPE STATUSTYPE_ISSUER,
T6.INSTITUTIONTYPE INSTITUTIONTYPE_ISSUER,
T6.ISGLOBALREGACC ISGLOBALREGACC_ISSUER,
T6.HASPENDINGACTVTY HASPENDINGACTVTY_ISSUER,
T6.ISRELEVANT ISRELEVANTV_ISSUER, T6.ISONDB ISONDB_ISSUER,
T6.INITIALMARGINRATE INITIALMARGINRATE_ISSUER,
T6.DOMICILE_A2 DOMICILE_A2_ISSUER,
T6.DOMICILE_WS80 DOMICILE_WS80_ISSUER,
T6.TAXDOMICILE_A2 TAXDOMICILE_A2_ISSUER,
T6.TAXDOMICILE_WS80 TAXDOMICILE_WS80_ISSUER,
T6.INDUSTRYCS INDUSTRYCS_ISSUER,
T6.INDUSTRYTKBN INDUSTRYTKBN_ISSUER,
T6.INDUSTRYMSCI INDUSTRYMSCI_ISSUER,
T6.INDUSTRYDJ INDUSTRYDJ_ISSUER,
T6.INDUSTRYFTSE INDUSTRYFTSE_ISSUER,
T6.INDUSTRYMFIB INDUSTRYMFIB_ISSUER,
T6.INDUSTRYMFIS INDUSTRYMFIS_ISSUER,
T6.INDUSTRYICB INDUSTRYICB_ISSUER,
T6.INDUSTRYBDF INDUSTRYBDF_ISSUER,
T6.TAXNUMBER TAXNUMBER_ISSUER,
T6.NONTAXABLENUMBER NONTAXABLENUMBER_ISSUER,
T6.HOUSENUMBER HOUSENUMBER_ISSUER, T6.ZIP ZIP_ISSUER,
T6.TELEFAXNUMBER TELEFAXNUMBER_ISSUER,
T6.NATIONALBANKCODE NATIONALBANKCODE_ISSUER,
T6.BANKACCOUNTNUMBER BANKACCOUNTNUMBER_ISSUER,
T6.FOUNDATIONDATE FOUNDATIONDATE_ISSUER,
T6.PREVFINYEARENDDATE PREVFINYEARENDDATE_ISSUER,
T6.ACTFINYEARENDDATE ACTFINYEARENDDATE_ISSUER,
T6.REGISTERENTRYDATE REGISTERENTRYDATE_ISSUER,
T6.REGENTRYDELETIONDT REGENTRYDELETIONDT_ISSUER,
T6.YEARENDDATE YEARENDDATE_ISSUER,
T6.NEXTSEMESTERREPORT NEXTSEMESTERREPORT_ISSUER,
T6.NONTAXABLEDATE NONTAXABLEDATE_ISSUER,
T6.PREVIOUSYEARENDDT PREVIOUSYEARENDDT_ISSUER,
T6.CREATETIMESTAMP CREATETIMESTAMP_ISSUER,
T6.UPDATETIMESTAMP UPDATETIMESTAMP_ISSUER,
T6.MAINLANGUAGETYPE MAINLANGUAGETYPE_ISSUER,
T6.KANTONSCODETYPE KANTONSCODETYPE_ISSUER,
T6.LEGALFORMTYPE LEGALFORMTYPE_ISSUER,
T6.TRUSTLEGALGUIDETP TRUSTLEGALGUIDETP_ISSUER,
T6.TRUSTSTATUSTYPE TRUSTSTATUSTYPE_ISSUER,
T6.FOTYPE FOTYPE_ISSUER,
T6.DATASTATUSTYPE DATASTATUSTYPE_ISSUER,
T6.BLOCKINGCODETYPE BLOCKINGCODETYPE_ISSUER,
T6.CITY CITY_ISSUER,
T6.INTERNETDOMAIN INTERNETDOMAIN_ISSUER,
T6.STREET STREET_ISSUER, T6.EMAILNAME EMAILNAME_ISSUER,
T6.PHONENUMBER PHONENUMBER_ISSUER, T6.IBAN IBAN_ISSUER,
T6.SHORTNAME_G SHORTNAME_G_ISSUER,
T6.SHORTNAME_E SHORTNAME_E_ISSUER,
T6.SHORTNAME_F SHORTNAME_F_ISSUER,
T6.SHORTNAME_I SHORTNAME_I_ISSUER,
T6.SHORTNAME_N SHORTNAME_N_ISSUER, T6.NAME_G NAME_G_ISSUER,
T6.NAME_E NAME_E_ISSUER, T6.NAME_F NAME_F_ISSUER,
T6.NAME_I NAME_I_ISSUER, T6.NAME_N NAME_N_ISSUER,
T6.HASADDRESS HASADDRESS_ISSUER, T6.ADDRESS ADDRESS_ISSUER,
T6.ADDRESSDESCR ADDRESSDESCR_ISSUER,
T6.HEADOFFICEDESCR HEADOFFICEDESCR_ISSUER,
T6.MODIFICATIONREASON MODIFICATIONREASON_ISSUER,
T6.MDYISSUERRATING MDYISSUERRATING_ISSUER,
T6.MDYISSUERRATINGDATE MDYISSUERRATINGDATE_ISSUER,
T6.MDYISSUERWATCHLISTSTATUSTYPE
MDYWATCHLISTSTATUSTYPE_ISSUER,
T6.SPISSUERRATING SPISSUERRATING_ISSUER,
T6.SPISSUERRATINGDATE SPISSUERRATINGDATE_ISSUER,
T6.SPISSUERWATCHLISTSTATUSTYPE SPWATCHLISTSTATUSTYPE_ISSUER,
T6.FITCHISSUERRATING FITCHISSUERRATING_ISSUER,
T6.FITCHISSUERRATINGDATE FITCHISSUERRATINGDATE_ISSUER,
T6.FITCHISSUERWATCHLISTSTATUSTYPE FITCHWATCHLISTSTTP_ISSUER,
T6.DOMICILE_A3 DOMICILE_A3_ISSUER,
T6.TAXDOMICILE_A3 TAXDOMICILE_A3_ISSUER,
T6.ADDRESSLOCATION_A2 ADDRESSLOCATION_A2_ISSUER,
T6.ADDRESSLOCATION_A3 ADDRESSLOCATION_A3_ISSUER,
T6.ADDRESSLOCATION_WS80 ADDRESSLOCATION_WS80_ISSUER,
T7.BESTVENUEUPDATETS, T7.EUROCLEARDEPO, T7.FISNPOOLNUMBER,
T7.FISNPROGRAM, T7.FISNTRANCHE, T7.FISNTRUST,
T7.FISNUNDERLYING, T7.HYBRIDACRONYMTYPE, T7.IDFORMATTYPE,
T7.ISAUTOMATEDDISTRIB, T7.ISBLUECHIP, T7.NTIPTYPE,
T7.OTEXMARKETMAKER, T7.OTEXORDERDESK, T7.OTEXRISKDOMICILE,
T7.BRANDNAME, T7.PRODUCTNAME, T7.CSPRODUCTCATEGORY,
T7.ISMANAGEDBYCS, T7.CSBTVRELEVANCETYPE,
T7.INVESTORINFOTYPE, T7.UNDERLYINGMGMTTYPE,
T7.INITIALBONDFLOORRATE, T7.FINALBONDFLOORRATE,
T7.SWAPRATE, T7.ISUNDERLYINGLINKED, T7.RIGHTISSUETYPE,
T7.ISRIGHTISSUETRADING, T7.RIGHTISSUETRADINGFROMDATE,
T7.RIGHTISSUETRADINGUNTILDATE, T7.RIGHTISSUETRADINGAT,
T7.RIGHTISSUEFRACTIONTYPE, T7.RIGHTISSUELASTSPLITDATE,
T7.HASUNDERLYINGUSSECURITIES, T7.ISISSUERESNATIONALS,
T7.ISISSUERESNONNATIONALS, T7.SHAREREGISTRYTYPE,
T7.ACCRUEDINTERESTTYPE, T8.DEFREPAYMENTPERIOD,
T8.POSITIONLIMIT, T8.BONDFLOOR, T8.DISCOUNT,
T8.GUARANTEREPAYPRICE, T8.RESERVENUMBER2,
T8.RESERVENUMBER3, T8.RESERVENUMBER4, T8.RESERVENUMBER5,
T8.MANDATOR, T8.RESERVETEXT1, T8.RESERVETEXT3,
T8.CSBOARDLOT, T8.CSINCOMETAXTYPE, T8.POSITIONCURRTYPE,
T8.KANTONSCODETYPE, T8.CSEVENTDTCODETYPE,
T8.CSFUNDTYPE CSFUNDTYPE_SP42, T8.CSRELEVANCEDATE,
T8.HASQUOTESBLOCK, T8.HASFUNDSUNBUNDLING,
T8.FUNDDEPOSITARY, T8.FUNDCATEGORY,
T9.CREATETIMESTAMP CREATETIMESTAMP_INSTR,
T9.UPDATETIMESTAMP UPDATETIMESTAMP_INSTR, T1.SYMBOLSPIRIT,
T2.UNDERINSTRUMENT, T2.PREPARTICLE_G, T2.PREPARTICLE_E,
T2.PREPARTICLE_F, T2.PREPARTICLE_I, T2.PREPARTICLE_N,
T2.POSTPARTICLE_G, T2.POSTPARTICLE_E, T2.POSTPARTICLE_F,
T2.POSTPARTICLE_I, T2.POSTPARTICLE_N, T9.NAME_G, T9.NAME_E,
T9.NAME_F, T9.NAME_I, T9.NAME_N,
T9.ISRELEVANT ISRELEVANT_INSTR, T2.MAINLANGUAGETYPE,
T9.NOMINALCURR, T9.COMPOUNDTYPE, T9.PORTFOLIONO,
T9.ISINSTANCE, T9.CAPMARKETLOCATION, T9.STATUSDATE,
T9.TOFFUNDERTYPE, T9.DESCRIPTION_G, T9.DESCRIPTION_E,
T9.DESCRIPTION_F, T9.DESCRIPTION_I, T9.DESCRIPTION_N,
T2.ISSUEPRICERATE, T2.TITELARTZUSATZTEXT,
T2.BORROWINGLIMITTYPE, T2.ISVSTQUALITYCHECKED
FROM VDPSX.VTINSTRFLATSYMBOLS T1
INNER JOIN
VDPSX.VTINSTRFLATDATA T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTIFLATSYMBOLS T3
ON T3.INSTITUTIONID = T2.ORIGINALISSUER
INNER JOIN
VDPSX.VTINSTITUTION T4
ON T4.INSTITUTIONID = T2.ORIGINALISSUER
INNER JOIN
VDPSX.VTINSTRUMENT T9
ON T9.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTIFLATSYMBOLS T5
ON T5.INSTITUTIONID = T2.ISSUER
INNER JOIN
VDPSX.VTINSTITUTION T6
ON T6.INSTITUTIONID = T2.ISSUER
LEFT OUTER JOIN
VDPSX.CTINSTRDETAILS T7
ON T7.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPSX.CTINSTRSP42DETAILS T8
ON T8.INSTRUMENTID = T1.INSTRUMENTID ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_VINSS105
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
--
CREATE VIEW VDPSX.IDS_VINSS105 AS
SELECT T1.INSTRUMENTID, T1.EXERCISEAMOUNT, T1.MINEXERCISEAMOUNT,
T1.EXERCISECURR, T1.EXERCISECURR_I2, T1.EXERCISECURR_I1,
T1.EXERCISECURR_WS80, T1.UNDERINSTRUMENT,
T1.UNDERINSTRUMENT_CH, T1.UNDERINSTRUMENT_ISIN,
T1.UNDERINSTRUMENT_CSFI, T1.HASMULTIUNDERLYERS,
T2.NOMINALCURR, T2.NOMINALCURR_I2, T2.NOMINALCURR_I1,
T2.NOMINALCURR_WS80, T3.DOMICILE, T3.DOMICILE_A2,
T3.DOMICILE_A3, T3.DOMICILE_WS80, T1.HELDAMOUNT,
T1.PAYAMOUNT, T1.PAYDIRECTIONTYPE, T1.OPTIONTYPE,
T1.SETTLESTYLETYPE, T1.OPTIONSTYLETYPE,
T1.EXERCISEBEGINDATE, T1.EXERCISEENDDATE, T1.EXERCISEPLACE,
T1.INCOMETAXRATE, T1.PREMIUMRATE, T1.PARTICIPATIONRATE,
T1.REBATE
FROM VDPSX.VTINSTRFLATDATA T1
LEFT OUTER JOIN
VDPSX.VTINSTRFLATDATA T2
ON T2.INSTRUMENTID = T1.UNDERINSTRUMENT
INNER JOIN
VDPSX.VTINSTITUTION T3
ON T3.INSTITUTIONID = T2.ISSUER ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_VISCD103
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","S100447" ;
--
CREATE VIEW VDPSX.IDS_VISCD103 AS
SELECT T1.INSTRUMENTID, T1.ISSUEAMOUNT, T1.ISSUEPRICE,
T1.ISSUEPRICECURR, T1.ISSUEPRICECURR_I2,
T1.ISSUEPRICECURR_I1, T1.ISSUEPRICECURR_WS80,
T1.SUBSCRBEGINDATE, T1.SUBSCRPLNDENDDATE,
T1.SUBSCRMETHODTYPE, T1.PAYMENTDATE, T1.PLACEMENTTYPE,
T1.ORIGINALISSUER, T1.ORIGINALISSUER_GK, T1.ISSUER,
T1.ISSUER_GK, T2.SHORTNAME_G SHORTNAME_G_ORG_ISSUER,
T2.SHORTNAME_E SHORTNAME_E_ORG_ISSUER,
T2.SHORTNAME_F SHORTNAME_F_ORG_ISSUER,
T2.SHORTNAME_I SHORTNAME_I_ORG_ISSUER,
T2.SHORTNAME_N SHORTNAME_N_ORG_ISSUER,
T2.DOMICILE DOMICILE_ORG_ISSUER,
T2.DOMICILE_A2 DOMICILE_A2_ORG_ISSUER,
T2.DOMICILE_A3 DOMICILE_A3_ORG_ISSUER,
T2.DOMICILE_WS80 DOMICILE_WS80_ORG_ISSUER, T2.NAME_G,
T2.NAME_E, T2.NAME_F, T2.NAME_I, T2.NAME_N,
T2.STATUSTYPE STATUSTYPE_ORG_ISSUER, T2.INDUSTRYCS,
T2.INDUSTRYTKBN, T2.INDUSTRYMSCI,
T3.SHORTNAME_G SHORTNAME_G_ISSUER,
T3.SHORTNAME_E SHORTNAME_E_ISSUER,
T3.SHORTNAME_F SHORTNAME_F_ISSUER,
T3.SHORTNAME_I SHORTNAME_I_ISSUER,
T3.SHORTNAME_N SHORTNAME_N_ISSUER,
T3.DOMICILE DOMICILE_ISSUER,
T3.DOMICILE_A2 DOMICILE_A2_ISSUER,
T3.DOMICILE_A3 DOMICILE_A3_ISSUER,
T3.DOMICILE_WS80 DOMICILE_WS80_ISSUER,
T3.STATUSTYPE STATUSTYPE_ISSUER,
T1.CREATETIMESTAMP CREATETIMESTAMP_FLTDATA,
T1.UPDATETIMESTAMP UPDATETIMESTAMP_FLTDATA,
T2.CREATETIMESTAMP CREATETIMESTAMP_INSTI,
T2.UPDATETIMESTAMP UPDATETIMESTAMP_INSTI
FROM VDPSX.VTINSTRFLATDATA T1
INNER JOIN
VDPSX.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.ORIGINALISSUER
INNER JOIN
VDPSX.VTINSTITUTION T3
ON T3.INSTITUTIONID = T1.ISSUER ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_VITBD112
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.IDS_VITBD112 AS
SELECT T1.INSTITUTIONID, T2.SYMBOLGK, T1.SHORTNAME_G,
T1.SHORTNAME_E, T1.SHORTNAME_F, T1.SHORTNAME_I,
T1.SHORTNAME_N, T1.NAME_G, T1.NAME_E, T1.NAME_F, T1.NAME_I,
T1.NAME_N, T1.FOTYPE, T1.STATUSTYPE, T1.MAINLANGUAGETYPE,
T1.DOMICILE, T1.DOMICILE_A2, T1.DOMICILE_A3,
T1.DOMICILE_WS80, T1.INTERNETDOMAIN, T1.INDUSTRYCS,
T1.INDUSTRYTKBN, T1.INDUSTRYMSCI, T1.INDUSTRYMFIB,
T1.INDUSTRYMFIS, T1.INDUSTRYICB, T1.INDUSTRYBDF,
T1.LEGALFORMTYPE, T1.PREVFINYEARENDDATE,
T1.REGISTERENTRYDATE, T1.REGENTRYDELETIONDT,
T1.MDYISSUERRATING, T1.MDYISSUERRATINGDATE,
T1.MDYISSUERWATCHLISTSTATUSTYPE, T1.SPISSUERRATING,
T1.SPISSUERRATINGDATE, T1.SPISSUERWATCHLISTSTATUSTYPE,
T1.FITCHISSUERRATING, T1.FITCHISSUERRATINGDATE,
T1.FITCHISSUERWATCHLISTSTATUSTYPE,
T1.CREATETIMESTAMP CREATETIMESTAMP_INSTI,
T1.UPDATETIMESTAMP UPDATETIMESTAMP_INSTI,
T2.CREATETIMESTAMP CREATETIMESTAMP_FLTSYMB,
T2.UPDATETIMESTAMP UPDATETIMESTAMP_FLTSYMB
FROM VDPSX.VTINSTITUTION T1
INNER JOIN
VDPSX.VTINSTIFLATSYMBOLS T2
ON T1.INSTITUTIONID = T2.INSTITUTIONID ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_VITCR118_V02
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F326930" ;
--
CREATE VIEW VDPSX.IDS_VITCR118_V02 AS
SELECT T1.SYMBOLCH, T1.INSTRUMENTID, T2.ROLETYPE,
T3.IDSYMBOL IDSYMBOL_RATING, T3.SCHEMESYMBOL SCHEME_RATING,
T3.RATINGDATE, T3.WATCHLISTSTATTYPE, T3.RATINGSTATUSTYPE,
T4.RATINGSCALEVALUE, T6.IDSYMBOL IDSYMBOL_INSTI_RATING,
T6.SCHEMESYMBOL SCHEME_INSTI_RATING,
T7.IDSYMBOL IDSYMBOL_INSTI, T7.SCHEMESYMBOL SCHEME_INSTI,
T8.STATUSTYPE
FROM VDPSX.VTINSTRFLATSYMBOLS T1
INNER JOIN
VDPSX.VTINSTIROLE T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTIRATING T3
ON T3.INSTITUTIONID = T2.INSTITUTIONID
INNER JOIN
VDPSX.VTRATINGSYMBOL T4
ON T4.RATINGSYMBOLID = T3.INSTIRATINGNO
INNER JOIN
VDPSX.VTRATINGSCHEME T5
ON T5.SCHEMESYMBOL = T3.SCHEMESYMBOL
INNER JOIN
VDPSX.VTINSTIIDENT T6
ON T6.INSTITUTIONID = T5.INSTITUTIONID
INNER JOIN
VDPSX.VTINSTIIDENT T7
ON T7.INSTITUTIONID = T2.INSTITUTIONID
INNER JOIN
VDPSX.VTINSTITUTION T8
ON T8.INSTITUTIONID = T2.INSTITUTIONID ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_VLSTG111
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
--
CREATE VIEW VDPSX.IDS_VLSTG111 AS
SELECT T1.INSTRUMENTID, T1.LISTINGNO, T2.SYMBOLCH, T2.SYMBOLISIN,
T2.SYMBOLCSFI, T1.CURRENCY, T1.CURRENCY_I2, T1.CURRENCY_I1,
T1.CURRENCY_WS80, T1.TRADINGPLACE, T1.TRADINGPLACE_BCN,
T1.TRADINGPLACE_MIC, T1.TRADINGPLACE_RTX,
T1.TRADINGPLACE_BBX, T1.TRADINGPLACE_WS80,
T3.SHORTNAME_G SHORTNAME_G_INSTI,
T3.SHORTNAME_E SHORTNAME_E_INSTI,
T3.SHORTNAME_F SHORTNAME_F_INSTI,
T3.SHORTNAME_I SHORTNAME_I_INSTI,
T3.SHORTNAME_N SHORTNAME_N_INSTI, T1.LISTINGSYMBOLTK,
T1.LISTINGSYMBOLRT, T1.LISTINGSYMBOLBB,
T1.SHORTNAME_G SHORTNAME_G_LISG,
T1.SHORTNAME_E SHORTNAME_E_LISG,
T1.SHORTNAME_F SHORTNAME_F_LISG,
T1.SHORTNAME_I SHORTNAME_I_LISG,
T1.SHORTNAME_N SHORTNAME_N_LISG, T1.LISTINGSTATUSTYPE,
T1.TRADINGSTATUSTYPE, T1.FIRSTTRADINGDATE,
T1.LASTTRADINGDATE, T1.ISMAINTRADINGPLACE,
T1.ISHOMETRADINGPLACE, T1.LISTINGCLASSTYPE,
T1.PRICINGUNITNO, T1.PRICINGUNITTYPE, T1.TRADINGUNITNO,
T1.TRADINGUNITTYPE, T1.TRADINGRULETYPE,
T1.ISCSBESTVENUEOVERALL, T1.ISCSBESTVENUEPERCURR,
T1.ISBESTVOLUMEBESTSPREAD, T1.ISBESTVOLUME,
T1.ISBESTSPREAD, T1.ISHIGHESTTICKS, T1.ISBESTVOLUMEPERCURR,
T1.ISBESTSPREADPERCURR, T1.ISPRIMARYMARKETUSA,
T1.ISSINGLETRADINGPLACE, T1.ISISSUERPRICEPROVIDER,
T1.ISNAVINDEPENDENTSOURCE, T1.ISFUNDASSESSMENTSOURCE,
T1.ISPLACEOFLISTING, T1.ISPLACEOFTRADING, T1.ISPLACEOFQUOTE
FROM VDPSX.VTLISTING T1
INNER JOIN
VDPSX.VTINSTRFLATSYMBOLS T2
ON T1.INSTRUMENTID = T2.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTITUTION T3
ON T3.INSTITUTIONID = T1.TRADINGPLACE ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_VLSTG111_V02
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F578255" ;
--
CREATE VIEW VDPSX.IDS_VLSTG111_V02 AS
SELECT T1.INSTRUMENTID, T1.LISTINGNO, T3.SYMBOLCH, T3.SYMBOLISIN,
T3.SYMBOLCSFI, T1.CURRENCY, T1.CURRENCY_I2, T1.CURRENCY_I1,
T1.CURRENCY_WS80, T1.TRADINGPLACE, T1.TRADINGPLACE_BCN,
T1.TRADINGPLACE_MIC, T1.TRADINGPLACE_RTX,
T1.TRADINGPLACE_BBX, T1.TRADINGPLACE_WS80,
T4.SHORTNAME_G SHORTNAME_G_INSTI,
T4.SHORTNAME_E SHORTNAME_E_INSTI,
T4.SHORTNAME_F SHORTNAME_F_INSTI,
T4.SHORTNAME_I SHORTNAME_I_INSTI,
T4.SHORTNAME_N SHORTNAME_N_INSTI, T1.LISTINGSYMBOLTK,
T1.LISTINGSYMBOLRT, T1.LISTINGSYMBOLBB,
T1.SHORTNAME_G SHORTNAME_G_LISG,
T1.SHORTNAME_E SHORTNAME_E_LISG,
T1.SHORTNAME_F SHORTNAME_F_LISG,
T1.SHORTNAME_I SHORTNAME_I_LISG,
T1.SHORTNAME_N SHORTNAME_N_LISG, T1.LISTINGSTATUSTYPE,
T1.TRADINGSTATUSTYPE, T1.FIRSTTRADINGDATE,
T1.LASTTRADINGDATE, T1.ISMAINTRADINGPLACE,
T1.ISHOMETRADINGPLACE, T1.LISTINGCLASSTYPE,
T1.PRICINGUNITNO, T1.PRICINGUNITTYPE,
T1.TRADINGUNITTYPE TRADINGUNITTYPE_LISTING,
T1.ISCSBESTVENUEOVERALL, T1.ISCSBESTVENUEPERCURR,
T1.ISBESTVOLUMEBESTSPREAD, T1.ISBESTVOLUME,
T1.ISBESTSPREAD, T1.ISHIGHESTTICKS, T1.ISBESTVOLUMEPERCURR,
T1.ISBESTSPREADPERCURR, T1.ISPRIMARYMARKETUSA,
T1.ISSINGLETRADINGPLACE, T1.ISISSUERPRICEPROVIDER,
T1.ISNAVINDEPENDENTSOURCE, T1.ISFUNDASSESSMENTSOURCE,
T1.ISPLACEOFLISTING, T1.ISPLACEOFTRADING,
T1.ISPLACEOFQUOTE, T1.PARENTTRADINGPLACE,
T1.PARENTTRADINGPLACE_BCN, T1.PARENTTRADINGPLACE_RTX,
T1.PARENTTRADINGPLACE_MIC, T1.PARENTTRADINGPLACE_BBX,
T1.PARENTTRADINGPLACE_WS80, T2.CONVERSIONFACTOR,
T2.ISSTEERINGFLAG1, T2.ISSTEERINGFLAG2, T2.ISSTEERINGFLAG3,
T2.ISSTEERINGFLAG4, T2.ISSTEERINGFLAG5, T2.ISSTEERINGFLAG6,
T2.ISSTEERINGFLAG7, T2.ISSTEERINGFLAG8, T2.PRIORITYCODE,
T2.RESERVESYMBOL,
T2.TRADINGUNITTYPE TRADINGUNITTYPE_CSLISTING, T2.MANDATOR
FROM VDPSX.VTLISTING T1
INNER JOIN
VDPSX.CTLISTING T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND T2.LISTINGNO = T1.
LISTINGNO
INNER JOIN
VDPSX.VTINSTRFLATSYMBOLS T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTITUTION T4
ON T4.INSTITUTIONID = T1.TRADINGPLACE ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_VTOFF110
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
--
CREATE VIEW VDPSX.IDS_VTOFF110 AS
SELECT T1.INSTRUMENTID, T1.TOFFCHIDSYMBOL, T1.TOFFISINIDSYMBOL,
T1.TOFFCSFIIDSYMBOL, T1.FOTYPE, T1.CONTRACTSIZE,
T1.CONTRACTUNITTYPE, T1.EXERCISECURR, T1.EXERCISECURR_I2,
T1.EXERCISECURR_I1, T1.EXERCISECURR_WS80,
T1.EXERCISEAMOUNT, T1.EXPIRATIONMONTH,
T1.FINALSETTLEMENTTP, T1.FINALUNDERINSTR,
T1.FINALUNDERINSTR_CH, T1.FINALUNDERINSTR_ISIN,
T1.FINALUNDERINSTR_CSFI, T1.MULTIPLIER, T1.OPTIONP42TYPE,
T1.OPTIONSTYLETYPE, T1.OPTIONTYPE, T1.UNDERAMOUNT,
T1.UNDERINSTRUMENT, T1.UNDERINSTRUMENT_CH,
T1.UNDERINSTRUMENT_ISIN, T1.UNDERINSTRUMENT_CSFI,
T1.UNDERUNITTYPE, T1.VERSIONSYMBOL, T1.UNDERLYINGNAME_G,
T1.UNDERLYINGNAME_E, T1.UNDERLYINGNAME_F,
T1.UNDERLYINGNAME_I, T1.UNDERLYINGNAME_N,
T1.UNDERFIXINIDSYMBOL, T1.CSSTATUSTYPE, T1.EXPIRATIONDATE,
T1.NAME_G, T1.NAME_E, T1.NAME_F, T1.NAME_I, T1.NAME_N,
T1.TOFFUNDERTYPE, T1.CSEXPIRATIONDATE, T1.TICK,
T1.TICKSIZE, T2.NOMINALCURR, T2.NOMINALCURR_I2,
T2.NOMINALCURR_I1, T2.NOMINALCURR_WS80, T3.DOMICILE,
T3.DOMICILE_A2, T3.DOMICILE_A3, T3.DOMICILE_WS80,
T3.SHORTNAME_G SHORTNAME_G_ISSUER,
T3.SHORTNAME_E SHORTNAME_E_ISSUER,
T3.SHORTNAME_F SHORTNAME_F_ISSUER,
T3.SHORTNAME_I SHORTNAME_I_ISSUER,
T3.SHORTNAME_N SHORTNAME_N_ISSUER, T3.NAME_G NAME_G_ISSUER,
T3.NAME_E NAME_E_ISSUER, T3.NAME_F NAME_F_ISSUER,
T3.NAME_I NAME_I_ISSUER, T3.NAME_N NAME_N_ISSUER,
T3.INDUSTRYTKBN INDUSTRYTKBN_ISSUER,
T3.INDUSTRYMSCI INDUSTRYMSCI_ISSUER, T4.ISOTC,
T4.SHORTNAME_G, T4.SHORTNAME_E, T4.SHORTNAME_F,
T4.SHORTNAME_I, T4.SHORTNAME_N, T4.NAME45_G, T4.NAME45_E,
T4.NAME45_F, T4.NAME45_I, T4.NAME45_N, T4.NAME35_G,
T4.NAME35_E, T4.NAME35_F, T4.NAME35_I, T4.NAME35_N,
T4.PREPARTICLE_G, T4.PREPARTICLE_E, T4.PREPARTICLE_F,
T4.PREPARTICLE_I, T4.PREPARTICLE_N, T4.POSTPARTICLE_G,
T4.POSTPARTICLE_E, T4.POSTPARTICLE_F, T4.POSTPARTICLE_I,
T4.POSTPARTICLE_N, T4.STATUSTYPE, T5.CATEGORYTKT,
T5.CATEGORYCSGTA, T6.NOMINALCURR_I2 NOMINALCURR_I2_UI,
T6.NOMINALCURR_I1 NOMINALCURR_I1_UI,
T6.NOMINALCURR_WS80 NOMINALCURR_WS80_UI,
T7.DOMICILE_A2 DOMICILE_A2_UI,
T7.DOMICILE_A3 DOMICILE_A3_UI,
T7.DOMICILE_WS80 DOMICILE_WS80_UI,
T7.SHORTNAME_G SHORTNAME_G_ISSUER_UI,
T7.SHORTNAME_E SHORTNAME_E_ISSUER_UI,
T7.SHORTNAME_F SHORTNAME_F_ISSUER_UI,
T7.SHORTNAME_I SHORTNAME_I_ISSUER_UI,
T7.SHORTNAME_N SHORTNAME_N_ISSUER_UI,
T7.NAME_G NAME_G_ISSUER_UI, T7.NAME_E NAME_E_ISSUER_UI,
T7.NAME_F NAME_F_ISSUER_UI, T7.NAME_I NAME_I_ISSUER_UI,
T7.NAME_N NAME_N_ISSUER_UI,
T7.INDUSTRYTKBN INDUSTRYTKBN_ISSUER_UI,
T7.INDUSTRYMSCI INDUSTRYMSCI_ISSUER_UI,
T1.UNDERINSTRUMENT_CUSIP, T1.FINALUNDERINSTR_CUSIP
FROM VDPSX.VTTOFF T1
INNER JOIN
VDPSX.VTINSTRFLATDATA T2
ON T2.INSTRUMENTID = T1.FINALUNDERINSTR
INNER JOIN
VDPSX.VTINSTITUTION T3
ON T3.INSTITUTIONID = T2.ISSUER
INNER JOIN
VDPSX.VTINSTRFLATDATA T4
ON T4.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTRFLATSYMBOLS T5
ON T5.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTRFLATDATA T6
ON T6.INSTRUMENTID = T1.UNDERINSTRUMENT
INNER JOIN
VDPSX.VTINSTITUTION T7
ON T7.INSTITUTIONID = T6.ISSUER ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.SMDS_RA08_V03
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F326930" ;
--
CREATE VIEW VDPSX.SMDS_RA08_V03 AS
SELECT DISTINCT '08' RECORD_TYPE,
SUBSTR(T1.IDSYMBOL, 1, 6) IDSYMBOL_GK,
SUBSTR(T3.SHORTNAME_E, 1, 20) SHORT_E,
SUBSTR(T3.SHORTNAME_G, 1, 20) SHORT_G,
SUBSTR(T3.SHORTNAME_I, 1, 20) SHORT_I,
SUBSTR(T3.SHORTNAME_F, 1, 20) SHORT_F,
SUBSTR(T3.SHORTNAME_N, 1, 20) SHORT_N,
SUBSTR(T3.NAME_E, 1, 80) LONG_E,
SUBSTR(T3.NAME_G, 1, 80) LONG_G,
SUBSTR(T3.NAME_I, 1, 80) LONG_I,
SUBSTR(T3.NAME_F, 1, 80) LONG_F,
SUBSTR(T3.NAME_N, 1, 80) LONG_N, T3.MAINLANGUAGETYPE,
T3.CREATETIMESTAMP, T3.UPDATETIMESTAMP, T3.STATUSTYPE,
T3.DOMICILE_A2 DOMICILE_A2,
T3.TAXDOMICILE_A2 TAXDOMICILE_A2, T3.INDUSTRYTKBN TKBN
FROM VDPSX.VTINSTIIDENT T1
INNER JOIN
VDPSX.VTINSTIROLE T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND T2.ROLETYPE IN(1
, 25)
INNER JOIN
VDPSX.VTINSTITUTION T3
ON T3.INSTITUTIONID = T1.INSTITUTIONID AND (T3.ROWSTATUS
IS NULL OR T3.ROWSTATUS <> 2)
WHERE T1.SCHEMESYMBOL = 'GK'
AND T1.ROWSTATUS = 1 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.SMDS_RA15
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F273764" ;
--
CREATE VIEW VDPSX.SMDS_RA15 AS
SELECT DISTINCT '15' RECORD_TYPE, T1.IDSYMBOL TKKEY,
T9.IDSYMBOL ISIN, T3.IDSYMBOL CURRENCY_CS,
T6.TRADINGPLACE_BCN EXCHANGE_CODE, T7.IDSYMBOL TICKER,
SUBSTR(T5.SHORTNAME_G, 1, 20) SHORTNAME_G,
SUBSTR(T5.SHORTNAME_E, 1, 20) SHORTNAME_E,
SUBSTR(T5.SHORTNAME_I, 1, 20) SHORTNAME_I,
SUBSTR(T5.SHORTNAME_F, 1, 20) SHORTNAME_F,
SUBSTR(T5.SHORTNAME_N, 1, 20) SHORTNAME_N,
T6.CURRENCY LISTING_CURRENCY,
SUBSTR(T6.SHORTNAME_G, 1, 20) LISTINGNAME_G,
SUBSTR(T6.SHORTNAME_E, 1, 20) LISTINGNAME_E,
SUBSTR(T6.SHORTNAME_I, 1, 20) LISTINGNAME_I,
SUBSTR(T6.SHORTNAME_F, 1, 20) LISTINGNAME_F,
SUBSTR(T6.SHORTNAME_N, 1, 20) LISTINGNAME_N,
T6.MARKTPRACTIDSYMBOL, T6.FIRSTTRADINGDATE,
T6.LASTTRADINGDATE, T6.ISMAINTRADINGPLACE,
T6.ISHOMETRADINGPLACE, T6.CREATETIMESTAMP,
T6.UPDATETIMESTAMP, T6.LISTINGSTATUSTYPE,
T8.INSTITUTIONID INSTRSERVICEID, T8.HASPHYSICALTRADING,
T8.HASELTRONICTRADING, T8.HASELTRONICMATCH
FROM VDPSX.VTLISTING T6
INNER JOIN
VDPSX.VTINSTRIDENT T1
ON T1.INSTRUMENTID = T6.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND T2.ROWSTATUS IS
NULL AND T2.ISRELEVANT = 1
INNER JOIN
VDPSX.VTINSTITUTION T5
ON T5.INSTITUTIONID = T6.TRADINGPLACE AND T5.ROWSTATUS IS
NULL
INNER JOIN
VDPSX.VTTRADINGPLACE T8
ON T8.INSTITUTIONID = T6.TRADINGPLACE
LEFT OUTER JOIN
VDPSX.VTINSTRIDENT T9
ON T9.INSTRUMENTID = T1.INSTRUMENTID AND T9.SCHEMESYMBOL =
'I-' AND T9.ROWSTATUS = 1
LEFT OUTER JOIN
VDPSX.VTINSTRIDENT T3
ON T3.INSTRUMENTID = T6.CURRENCY AND T3.SCHEMESYMBOL =
'I2' AND T3.ROWSTATUS = 1
LEFT OUTER JOIN
VDPSX.VTLISTINGIDENT T7
ON T7.INSTRUMENTID = T6.INSTRUMENTID AND T7.LISTINGNO = T6.
LISTINGNO AND T7.SCHEMESYMBOL = 'TKH'
WHERE T1.SCHEMESYMBOL = 'CH'
AND T1.ROWSTATUS = 1
AND T7.IDSYMBOL IS NOT NULL
AND T6.LISTINGSTATUSTYPE <> 9
AND T6.LISTINGSTATUSTYPE <> 18 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.VVV_XPS_IL#VLIID_V01
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.VVV_XPS_IL#VLIID_V01 AS
SELECT CHAR(T1.IDSYMBOL, 9) AS VALORNR,
CHAR(T8.IDSYMBOL, 4) AS CURRENCY_CS, T3.LISTINGSTATUSTYPE,
T3.TRADINGSTATUSTYPE, T3.ISHOMETRADINGPLACE,
CHAR(T4.IDSYMBOL, 4) AS IDSYMBOL_BCN,
CHAR(T5.DOMICILE_WS80, 3) AS DOMICILE_CS,
T7.ISSTEERINGFLAG4 AS CS_HAUPTBOEPLATZ,
T3.ISMAINTRADINGPLACE AS TK_HAUPTBOEPLATZ,
T3.ISCSBESTVENUEOVERALL, T3.ISCSBESTVENUEPERCURR,
CHAR(T6.SCHEMESYMBOL, 3) AS SCHEME_TICKER,
SUBSTR(T6.IDSYMBOL, 1, 30) AS IDSYMBOL_TICKER,
T3.DESCRIPTION_E AS EXTERNTRADINGCURR
FROM VDPSX.VTINSTRIDENT T1
INNER JOIN
VDPSX.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2) AND T2.CSSTATUSTYPE BETWEEN 4
AND 9
INNER JOIN
VDPSX.VTLISTING T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPSX.VTINSTIIDENT T4
ON T4.INSTITUTIONID = T3.TRADINGPLACE AND T4.SCHEMESYMBOL
= 'BCN' AND T4.ROWSTATUS = 1
INNER JOIN
VDPSX.VTINSTITUTION T5
ON T5.INSTITUTIONID = T3.TRADINGPLACE AND (T5.ROWSTATUS IS
NULL OR T5.ROWSTATUS <> 2)
LEFT OUTER JOIN
VDPSX.VTLISTINGIDENT T6
ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
LISTINGNO AND T6.SCHEMESYMBOL IN('TKH', 'RIC', 'BBI', 'TKE')
LEFT OUTER JOIN
VDPSX.CTLISTING T7
ON T7.INSTRUMENTID = T3.INSTRUMENTID AND T7.LISTINGNO = T3.
LISTINGNO AND T7.MANDATOR = 1
LEFT OUTER JOIN
VDPSX.VTINSTRIDENT T8
ON T8.INSTRUMENTID = T3.CURRENCY AND T8.SCHEMESYMBOL =
'CS-WS80-WHRG' AND T8.ROWSTATUS = 1
WHERE T1.SCHEMESYMBOL = 'CH'
AND T1.ROWSTATUS = 1
AND (T3.LISTINGSTATUSTYPE IN(1, 4, 13, 17, 21)
OR T7.ISSTEERINGFLAG4 = 1) ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.VVV_XPS_VLIID002_V07
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.VVV_XPS_VLIID002_V07 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T1.INSTRUMENTID,
T3.CREATETIMESTAMP, T3.UPDATETIMESTAMP, T3.LISTINGNO,
T6.LISTINGIDENTNO, T3.LISTINGSTATUSTYPE,
T3.TRADINGSTATUSTYPE, T3.FIRSTTRADINGDATE,
T3.LASTTRADINGDATE, T3.ISHOMETRADINGPLACE,
T3.ISMAINTRADINGPLACE TK_HAUPTBOEPLATZ,
T7.ISSTEERINGFLAG4 CS_HAUPTBOEPLATZ,
T3.ISCSBESTVENUEOVERALL, T3.ISCSBESTVENUEPERCURR,
T3.TRADINGPLACE, T3.CURRENCY, T8.IDSYMBOL CURRENCY_CS,
T4.IDSYMBOL IDSYMBOL_BCN, T5.DOMICILE,
T5.DOMICILE_WS80 DOMICILE_CS,
T6.SCHEMESYMBOL SCHEME_TICKER, T6.IDSYMBOL IDSYMBOL_TICKER,
T6.VALIDFROMDATE, T6.VALIDUNTILDATE,
T3.DESCRIPTION_E EXTERNTRADINGCURR
FROM VDPSX.VTINSTRIDENT T1
INNER JOIN
VDPSX.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPSX.VTLISTING T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPSX.VTINSTIIDENT T4
ON T4.INSTITUTIONID = T3.TRADINGPLACE AND T4.SCHEMESYMBOL
= 'BCN' AND T4.ROWSTATUS = 1
INNER JOIN
VDPSX.VTINSTITUTION T5
ON T5.INSTITUTIONID = T3.TRADINGPLACE AND (T5.ROWSTATUS IS
NULL OR T5.ROWSTATUS <> 2)
LEFT OUTER JOIN
VDPSX.VTLISTINGIDENT T6
ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
LISTINGNO AND T6.SCHEMESYMBOL IN('TKH', 'RIC', 'BBI', 'TKE')
LEFT OUTER JOIN
VDPSX.CTLISTING T7
ON T7.INSTRUMENTID = T3.INSTRUMENTID AND T7.LISTINGNO = T3.
LISTINGNO AND T7.MANDATOR = 1
LEFT OUTER JOIN
VDPSX.VTINSTRIDENT T8
ON T8.INSTRUMENTID = T3.CURRENCY AND T8.SCHEMESYMBOL =
'CS-WS80-WHRG' AND T8.ROWSTATUS = 1
WHERE T1.ROWSTATUS = 1
AND T3.LISTINGSTATUSTYPE <> 9
AND T3.LISTINGSTATUSTYPE <> 18 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_IL#VINLI
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F326930" ;
--
CREATE VIEW VDPSX.XPS_IL#VINLI AS
SELECT CHAR(T1.IDSYMBOL, 9) AS VALORNR,
T5.IDSYMBOL AS IDSYMBOL_GK,
CHAR(T4.DOMICILE_WS80, 3) AS DOMICILE_CS, T4.SHORTNAME_G,
T4.SHORTNAME_E, T4.SHORTNAME_F, T4.SHORTNAME_I,
T4.SHORTNAME_N, T4.NAME_G, T4.NAME_E, T4.NAME_F, T4.NAME_I,
T4.NAME_N, DEC(T6.RESERVENUMBER6, 15, 6) AS RESNR6,
CHAR(T4.INDUSTRYCS, 3) AS CS_BRAN,
CHAR(T4.INDUSTRYTKBN, 2) AS TKBN
FROM VDPSX.VTINSTRIDENT T1
INNER JOIN
VDPSX.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPSX.VTINSTIROLE T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID AND T3.ROLETYPE IN(1,
25)
INNER JOIN
VDPSX.VTINSTITUTION T4
ON T4.INSTITUTIONID = T3.INSTITUTIONID AND (T4.ROWSTATUS
IS NULL OR T4.ROWSTATUS <> 2)
INNER JOIN
VDPSX.VTINSTIIDENT T5
ON T5.INSTITUTIONID = T4.INSTITUTIONID AND T5.SCHEMESYMBOL
= 'GK' AND T5.ROWSTATUS = 1
LEFT OUTER JOIN
VDPSX.CTINSTRSP42DETAILS T6
ON T6.INSTRUMENTID = T2.INSTRUMENTID AND T6.MANDATOR = 1
WHERE T1.SCHEMESYMBOL = 'CH'
AND T1.ROWSTATUS = 1 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_IL#VLIID
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F273764" ;
--
CREATE VIEW VDPSX.XPS_IL#VLIID AS
SELECT CHAR(T1.IDSYMBOL, 9) AS VALORNR,
CHAR(T8.IDSYMBOL, 4) AS CURRENCY_CS, T3.LISTINGSTATUSTYPE,
T3.TRADINGSTATUSTYPE, T3.ISHOMETRADINGPLACE,
CHAR(T4.IDSYMBOL, 4) AS IDSYMBOL_BCN,
CHAR(T5.DOMICILE_WS80, 3) AS DOMICILE_CS,
T7.ISSTEERINGFLAG4 AS CS_HAUPTBOEPLATZ,
T3.ISMAINTRADINGPLACE AS TK_HAUPTBOEPLATZ,
T3.ISCSBESTVENUEOVERALL, T3.ISCSBESTVENUEPERCURR,
CHAR(T6.SCHEMESYMBOL, 3) AS SCHEME_TICKER,
SUBSTR(T6.IDSYMBOL, 1, 30) AS IDSYMBOL_TICKER,
T3.DESCRIPTION_E AS EXTERNTRADINGCURR
FROM VDPSX.VTINSTRIDENT T1
INNER JOIN
VDPSX.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2) AND T2.CSSTATUSTYPE BETWEEN 4
AND 9
INNER JOIN
VDPSX.VTLISTING T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPSX.VTINSTIIDENT T4
ON T4.INSTITUTIONID = T3.TRADINGPLACE AND T4.SCHEMESYMBOL
= 'BCN' AND T4.ROWSTATUS = 1
INNER JOIN
VDPSX.VTINSTITUTION T5
ON T5.INSTITUTIONID = T3.TRADINGPLACE AND (T5.ROWSTATUS IS
NULL OR T5.ROWSTATUS <> 2)
LEFT OUTER JOIN
VDPSX.VTLISTINGIDENT T6
ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
LISTINGNO AND T6.SCHEMESYMBOL IN('TKH', 'RIC', 'BBI', 'TKE')
LEFT OUTER JOIN
VDPSX.CTLISTING T7
ON T7.INSTRUMENTID = T3.INSTRUMENTID AND T7.LISTINGNO = T3.
LISTINGNO AND T7.MANDATOR = 1
LEFT OUTER JOIN
VDPSX.VTINSTRIDENT T8
ON T8.INSTRUMENTID = T3.CURRENCY AND T8.SCHEMESYMBOL =
'CS-WS80-WHRG' AND T8.ROWSTATUS = 1
WHERE T1.SCHEMESYMBOL = 'CH'
AND T1.ROWSTATUS = 1
AND (T3.LISTINGSTATUSTYPE IN(1, 4, 13, 17, 21)
OR T7.ISSTEERINGFLAG4 = 1) ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VCOMP000
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F326930" ;
--
CREATE VIEW VDPSX.XPS_VCOMP000 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T1.INSTITUTIONID,
T2.PORTFOLIONO, T2.ACCOUNTINGCURR,
T4.IDSYMBOL ACCOUNTINGCURR_I2,
T5.IDSYMBOL ACCOUNTINGCURR_CS, T2.FOUNDATIONDATE,
T2.PREVFINYEARENDDATE, T2.ACTFINYEARENDDATE,
T2.REGISTERENTRYDATE, T2.REGENTRYDELETIONDT,
T2.LEGALFORMTYPE, T2.CREATETIMESTAMP, T2.UPDATETIMESTAMP
FROM VDPSX.VTINSTIIDENT T1
INNER JOIN
VDPSX.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND (T2.ROWSTATUS
IS NULL OR T2.ROWSTATUS <> 2)
LEFT OUTER JOIN
VDPSX.VTINSTRIDENT T4
ON T4.INSTRUMENTID = T2.ACCOUNTINGCURR AND T4.SCHEMESYMBOL
= 'I2' AND T4.ROWSTATUS = 1
LEFT OUTER JOIN
VDPSX.VTINSTRIDENT T5
ON T5.INSTRUMENTID = T2.ACCOUNTINGCURR AND T5.SCHEMESYMBOL
= 'CS-WS80-WHRG' AND T5.ROWSTATUS = 1
WHERE T1.ROWSTATUS = 1 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VCOPR002_V02
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.XPS_VCOPR002_V02 AS
SELECT T1.SYMBOLCH, T1.SYMBOLISIN IDSYMBOL_ISIN,
T1.CATEGORYCSGTA IDSYMBOL_CSGTA, T2.STATUSTYPE, T2.NAME_G,
T2.NAME_E, T2.NAME_F, T2.NAME_I, T2.NAME_N,
T4.IDSYMBOL NOMINALCURR_I2, T7.MATURITYDATE,
A1.SYMBOLCH IDSYMBOL_SNB,
CAST(A2.SHORTNAME_E AS CHAR( 30)) SHORTNAME_E_SNB,
T8.ROLETYPE, T8.INSTITUTIONID, T9.IDSYMBOL IDSYMBOL_GK,
T10.SHORTNAME_G, T10.SHORTNAME_E, T10.SHORTNAME_F,
T10.SHORTNAME_I, T10.SHORTNAME_N, T2.CREATETIMESTAMP,
T2.UPDATETIMESTAMP, T10.CREATETIMESTAMP CREATETIMESTAMP_IS,
T10.UPDATETIMESTAMP UPDATETIMESTAMP_IS
FROM VDPSX.VTINSTRFLATSYMBOLS A1
INNER JOIN
VDPSX.VTINSTRUMENT A2
ON A2.INSTRUMENTID = A1.INSTRUMENTID AND (A2.ROWSTATUS IS
NULL OR A2.ROWSTATUS <> 2)
INNER JOIN
VDPSX.VTINSTRSTRUCT A3
ON A3.INSTRUMENTID = A1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTRFLATSYMBOLS T1
ON T1.INSTRUMENTID = A3.CHILDINSTRID AND T1.ROWSTATUS = 1
INNER JOIN
VDPSX.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND T1.ROWSTATUS = 1
AND (T2.ROWSTATUS IS NULL OR T2.ROWSTATUS <> 2)
LEFT OUTER JOIN
VDPSX.VTINSTRIDENT T4
ON T4.INSTRUMENTID = T2.NOMINALCURR AND T4.SCHEMESYMBOL =
'I2' AND T4.ROWSTATUS = 1
LEFT OUTER JOIN
VDPSX.VTINSTRWITHCF T7
ON T7.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPSX.VTINSTIROLE T8
ON T8.INSTRUMENTID = T1.INSTRUMENTID AND T8.ROLETYPE = 2
LEFT OUTER JOIN
VDPSX.VTINSTIIDENT T9
ON T9.INSTITUTIONID = T8.INSTITUTIONID AND T9.SCHEMESYMBOL
= 'GK' AND T9.ROWSTATUS = 1
LEFT OUTER JOIN
VDPSX.VTINSTITUTION T10
ON T10.INSTITUTIONID = T9.INSTITUTIONID AND (T10.ROWSTATUS
IS NULL OR T10.ROWSTATUS <> 2)
WHERE A1.ROWSTATUS = 1
AND A1.SYMBOLCH IN('2584417', '2584418', '1609728') ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VDISP000
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F281992" ;
--
CREATE VIEW VDPSX.XPS_VDISP000 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL,
T5.SCHEMESYMBOL PARENT_SCHEME, T5.IDSYMBOL PARENT_IDSYMBOL,
T3.BEGINDATE, T3.ENDDATE, T3.TYPEX, T3.MGMTCONTRACTTYPE,
T3.CHILDINSTIID, T3.PARENTINSTIID, T3.INSTISTRUCTNO,
T3.CREATETIMESTAMP, T3.UPDATETIMESTAMP,
T2.CREATETIMESTAMP CREATETIMESTAMP_IC,
T2.UPDATETIMESTAMP UPDATETIMESTAMP_IC,
T4.CREATETIMESTAMP CREATETIMESTAMP_IP,
T4.UPDATETIMESTAMP UPDATETIMESTAMP_IP
FROM VDPSX.VTINSTIIDENT T1
INNER JOIN
VDPSX.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND (T2.ROWSTATUS
IS NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPSX.VTINSTISTRUCT T3
ON T3.CHILDINSTIID = T2.INSTITUTIONID
INNER JOIN
VDPSX.VTINSTITUTION T4
ON T4.INSTITUTIONID = T3.PARENTINSTIID AND (T4.ROWSTATUS
IS NULL OR T4.ROWSTATUS <> 2)
INNER JOIN
VDPSX.VTINSTIIDENT T5
ON T5.INSTITUTIONID = T4.INSTITUTIONID AND T5.ROWSTATUS = 1
WHERE T1.ROWSTATUS = 1 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VDOMI000_V02
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
--
CREATE VIEW VDPSX.XPS_VDOMI000_V02 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T1.INSTITUTIONID,
T2.DOMICILE, T2.DOMICILE_WS80, T2.DOMICILE_A2,
T2.DOMICILE_A3, T2.CREATETIMESTAMP CREATETIMESTAMP_DO,
T2.UPDATETIMESTAMP UPDATETIMESTAMP_DO, T5.FOTYPE,
T5.LOCATIONTYPE, T5.REGIONTYPE, T5.VALIDFROMDATE,
T5.VALIDUNTILDATE, T5.CREATETIMESTAMP CREATETIMESTAMP_GU,
T5.UPDATETIMESTAMP UPDATETIMESTAMP_GU, T5.SHORTNAME_G,
T5.SHORTNAME_E, T5.SHORTNAME_F, T5.SHORTNAME_I,
T5.SHORTNAME_N, T5.NAME_G, T5.NAME_E, T5.NAME_F, T5.NAME_I,
T5.NAME_N
FROM VDPSX.VTINSTIIDENT T1
INNER JOIN
VDPSX.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND (T2.ROWSTATUS
IS NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPSX.VTGEOUNIT T5
ON T5.GEOUNITID = T2.DOMICILE AND (T5.ROWSTATUS IS NULL
OR T5.ROWSTATUS <> 2)
WHERE T1.ROWSTATUS = 1 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VGEUC000_V02
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.XPS_VGEUC000_V02 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL,
T6.SCHEMESYMBOL CURRENCY_SCHEME,
T6.IDSYMBOL CURRENCY_IDSYMBOL, T5.FUNCTIONTYPE,
T5.ISLEGALTENDER, T5.VALIDFROMDATE, T5.VALIDUNTILDATE,
T1.INSTITUTIONID, T2.DOMICILE, T5.GEOUNITCURRNO,
T5.CURRENCY, T2.CREATETIMESTAMP CREATETIMESTAMP_DO,
T2.UPDATETIMESTAMP UPDATETIMESTAMP_DO,
T4.CREATETIMESTAMP CREATETIMESTAMP_GU,
T4.UPDATETIMESTAMP UPDATETIMESTAMP_GU,
T5.CREATETIMESTAMP CREATETIMESTAMP_GC,
T5.UPDATETIMESTAMP UPDATETIMESTAMP_GC
FROM VDPSX.VTINSTIIDENT T1
INNER JOIN
VDPSX.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND (T2.ROWSTATUS
IS NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPSX.VTGEOUNIT T4
ON T4.GEOUNITID = T2.DOMICILE AND (T4.ROWSTATUS IS NULL
OR T4.ROWSTATUS <> 2)
INNER JOIN
VDPSX.VTGEOUNITCURR T5
ON T5.GEOUNITID = T4.GEOUNITID
LEFT OUTER JOIN
VDPSX.VTINSTRIDENT T6
ON T6.INSTRUMENTID = T5.CURRENCY AND T6.ROWSTATUS = 1
WHERE T1.ROWSTATUS = 1 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VINAC002_V02
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.XPS_VINAC002_V02 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T2.CREATETIMESTAMP,
T2.UPDATETIMESTAMP, T2.INDUSTRYCS, T2.INDUSTRYTKBN,
T2.INDUSTRYMSCI, T2.INDUSTRYDJ, T2.INDUSTRYFTSE,
T2.INDUSTRYMFIB, T2.INDUSTRYMFIS, T2.INDUSTRYICB,
T2.INDUSTRYBDF
FROM VDPSX.VTINSTIIDENT T1
INNER JOIN
VDPSX.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND (T2.ROWSTATUS
IS NULL OR T2.ROWSTATUS <> 2)
WHERE T1.ROWSTATUS = 1 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VINAC003_V02
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.XPS_VINAC003_V02 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL,
T1.ROWSTATUS ROWSTATUS_INSTIIDENT,
T2.ROWSTATUS ROWSTATUS_INSTITUTION,
T2.CREATETIMESTAMP CREATETIMESTAMP_INDUSTRYACT,
T2.UPDATETIMESTAMP UPDATETIMESTAMP_INDUSTRYACT,
T2.INDUSTRYCS, T2.INDUSTRYTKBN, T2.INDUSTRYMSCI,
T2.INDUSTRYDJ, T2.INDUSTRYFTSE, T2.INDUSTRYMFIB,
T2.INDUSTRYMFIS, T2.INDUSTRYICB, T2.INDUSTRYBDF
FROM VDPSX.VTINSTIIDENT T1
INNER JOIN
VDPSX.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VINFD003
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.XPS_VINFD003 AS
SELECT T1.INSTRUMENTID,
T1.CREATETIMESTAMP CREATETIMESTAMP_FLATSYMB,
T1.UPDATETIMESTAMP UPDATETIMESTAMP_FLATSYMB, T1.SYMBOLCH,
T1.SYMBOLCSFI, T1.SYMBOLISIN, T1.SYMBOLGB, T1.SYMBOLUS,
T1.SYMBOLDE, T1.SYMBOLXS, T1.ROWSTATUS, T2.CSSTATUSTYPE,
T2.ISSUEAMOUNT, T2.ISSUEPRICE, T2.ISSUEPRICECURR,
T2.ISSUEPRICECURR_I1, T2.ISSUEPRICECURR_I2,
T2.ISSUEPRICECURR_WS80, T2.SUBSCRBEGINDATE,
T2.SUBSCRPLNDENDDATE, T2.SUBSCRMETHODTYPE, T2.PAYMENTDATE,
T2.PLACEMENTTYPE, T2.ORIGINALISSUER, T2.ORIGINALISSUER_GK,
T2.ISSUER, T2.ISSUER_GK, T3.SHORTNAME_G ISSUER_SHORTNAME_G,
T3.SHORTNAME_E ISSUER_SHORTNAME_E,
T3.SHORTNAME_F ISSUER_SHORTNAME_F,
T3.SHORTNAME_I ISSUER_SHORTNAME_I,
T3.SHORTNAME_N ISSUER_SHORTNAME_N, T3.NAME_G ISSUER_NAME_G,
T3.NAME_E ISSUER_NAME_E, T3.NAME_F ISSUER_NAME_F,
T3.NAME_I ISSUER_NAME_I, T3.NAME_N ISSUER_NAME_N,
T3.DOMICILE ISSUER_DOMICILE,
T3.DOMICILE_A2 ISSUER_DOMICILE_A2,
T3.DOMICILE_A3 ISSUER_DOMICILE_A3,
T3.DOMICILE_WS80 ISSUER_DOMICILE_WS80,
T3.INDUSTRYCS ISSUER_INDUSTRYCS,
T3.INDUSTRYMSCI ISSUER_INDUSTRYMSCI,
T3.INDUSTRYTKBN ISSUER_INDUSTRYTKBN,
T4.SHORTNAME_G ORIG_ISSUER_SHORTNAME_G,
T4.SHORTNAME_E ORIG_ISSUER_SHORTNAME_E,
T4.SHORTNAME_F ORIG_ISSUER_SHORTNAME_F,
T4.SHORTNAME_I ORIG_ISSUER_SHORTNAME_I,
T4.SHORTNAME_N ORIG_ISSUER_SHORTNAME_N,
T4.NAME_G ORIG_ISSUER_NAME_G, T4.NAME_E ORIG_ISSUER_NAME_E,
T4.NAME_F ORIG_ISSUER_NAME_F, T4.NAME_I ORIG_ISSUER_NAME_I,
T4.NAME_N ORIG_ISSUER_NAME_N,
T4.DOMICILE ORIG_ISSUER_DOMICILE,
T4.DOMICILE_A2 ORIG_ISSUER_DOMICILE_A2,
T4.DOMICILE_A3 ORIG_ISSUER_DOMICILE_A3,
T4.DOMICILE_WS80 ORIG_ISSUER_DOMICILE_WS80,
T4.INDUSTRYCS ORIG_ISSUER_INDUSTRYCS,
T4.INDUSTRYMSCI ORIG_ISSUER_INDUSTRYMSCI,
T4.INDUSTRYTKBN ORIG_ISSUER_INDUSTRYTKBN
FROM VDPSX.VTINSTRFLATSYMBOLS T1
INNER JOIN
VDPSX.VTINSTRFLATDATA T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTITUTION T3
ON T3.INSTITUTIONID = T2.ISSUER
LEFT OUTER JOIN
VDPSX.VTINSTITUTION T4
ON T4.INSTITUTIONID = T2.ORIGINALISSUER ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VINFD008_V02
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","A394898" ;
--
CREATE VIEW VDPSX.XPS_VINFD008_V02 AS
SELECT T1.INSTRUMENTID, T2.LISTINGNO, T2.CURRENCY, T2.CURRENCY_I1,
T2.CURRENCY_I2, T2.CURRENCY_WS80, T2.TRADINGPLACE,
T2.TRADINGPLACE_BCN, T2.TRADINGPLACE_MIC,
T2.TRADINGPLACE_RTX, T2.TRADINGPLACE_BBX,
T2.SHORTNAME_G LIST_SHORTNAME_G,
T2.SHORTNAME_E LIST_SHORTNAME_E,
T2.SHORTNAME_F LIST_SHORTNAME_F,
T2.SHORTNAME_I LIST_SHORTNAME_I,
T2.SHORTNAME_N LIST_SHORTNAME_N, T2.ISMAINTRADINGPLACE,
T2.LISTINGSYMBOLTK, T2.LISTINGSYMBOLRT, T2.LISTINGSYMBOLBB,
T2.LISTINGSTATUSTYPE, T2.TRADINGSTATUSTYPE,
T2.FIRSTTRADINGDATE, T2.LASTTRADINGDATE,
T2.ISHOMETRADINGPLACE, T2.LISTINGCLASSTYPE,
T2.PRICINGUNITNO, T2.PRICINGUNITTYPE, T2.TRADINGUNITTYPE,
T2.ISCSBESTVENUEOVERALL, T2.ISCSBESTVENUEPERCURR,
T2.ISBESTVOLUMEBESTSPREAD, T2.ISBESTVOLUME,
T2.ISBESTSPREAD, T2.ISHIGHESTTICKS, T2.ISBESTVOLUMEPERCURR,
T2.ISBESTSPREADPERCURR, T2.ISPRIMARYMARKETUSA,
T2.ISSINGLETRADINGPLACE, T2.ISISSUERPRICEPROVIDER,
T2.ISNAVINDEPENDENTSOURCE, T2.ISFUNDASSESSMENTSOURCE,
T2.ISPLACEOFLISTING, T2.ISPLACEOFTRADING,
T2.ISPLACEOFQUOTE, T3.SHORTNAME_G TRAD_SHORTNAME_G,
T3.SHORTNAME_E TRAD_SHORTNAME_E,
T3.SHORTNAME_F TRAD_SHORTNAME_F,
T3.SHORTNAME_I TRAD_SHORTNAME_I,
T3.SHORTNAME_N TRAD_SHORTNAME_N
FROM VDPSX.VTINSTRFLATDATA T1
INNER JOIN
VDPSX.VTLISTING T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPSX.VTINSTITUTION T3
ON T3.INSTITUTIONID = T1.ISSUER ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VINGR009_V02
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F326930" ;
--
CREATE VIEW VDPSX.XPS_VINGR009_V02 AS
SELECT T1.SYMBOLCH, T1.SYMBOLISIN IDSYMBOL_ISIN,
T1.CATEGORYCSGTA IDSYMBOL_CSGTA, T2.STATUSTYPE, T2.NAME_G,
T2.NAME_E, T2.NAME_F, T2.NAME_I, T2.NAME_N,
T4.IDSYMBOL NOMINALCURR_I2, T7.MATURITYDATE,
T3.SCHEMESYMBOL SCHEME_ECBTR, T3.IDSYMBOL IDSYMBOL_ECBTR,
T8.ROLETYPE, T8.INSTITUTIONID, T9.IDSYMBOL IDSYMBOL_GK,
T10.SHORTNAME_G, T10.SHORTNAME_E, T10.SHORTNAME_F,
T10.SHORTNAME_I, T10.SHORTNAME_N, T2.CREATETIMESTAMP,
T2.UPDATETIMESTAMP, T10.CREATETIMESTAMP CREATETIMESTAMP_IS,
T10.UPDATETIMESTAMP UPDATETIMESTAMP_IS
FROM VDPSX.VTINSTRFLATSYMBOLS T1
INNER JOIN
VDPSX.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPSX.VTINSTRINGROUP T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID AND T3.SCHEMESYMBOL =
'ECBTR'
LEFT OUTER JOIN
VDPSX.VTINSTRIDENT T4
ON T4.INSTRUMENTID = T2.NOMINALCURR AND T4.SCHEMESYMBOL =
'I2' AND T4.ROWSTATUS = 1
LEFT OUTER JOIN
VDPSX.VTINSTRWITHCF T7
ON T7.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPSX.VTINSTIROLE T8
ON T8.INSTRUMENTID = T1.INSTRUMENTID AND T8.ROLETYPE = 2
LEFT OUTER JOIN
VDPSX.VTINSTIIDENT T9
ON T9.INSTITUTIONID = T8.INSTITUTIONID AND T9.SCHEMESYMBOL
= 'GK' AND T9.ROWSTATUS = 1
LEFT OUTER JOIN
VDPSX.VTINSTITUTION T10
ON T10.INSTITUTIONID = T9.INSTITUTIONID AND (T10.ROWSTATUS
IS NULL OR T10.ROWSTATUS <> 2)
WHERE T1.ROWSTATUS = 1 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VINLI000_V05
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.XPS_VINLI000_V05 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.ROLETYPE,
T4.DOMICILE_WS80 DOMICILE_CS,
T4.DOMICILE_A2 DOMICILE_ISOA2,
T4.DOMICILE_A3 DOMICILE_ISOA3,
T4.TAXDOMICILE_WS80 TAXDOMICILE_CS,
T4.TAXDOMICILE_A2 TAXDOMICILE_ISOA2,
T4.TAXDOMICILE_A3 TAXDOMICILE_ISOA3,
T5.IDSYMBOL IDSYMBOL_INSTI, T5.SCHEMESYMBOL SCHEME_INSTI,
T5.VALIDFROMDATE VALIDFROMDATE_INSTI,
T5.VALIDUNTILDATE VALIDUNTILDATE_INSTI,
T3.GUARANTORROLETYPE, T4.ISGLOBALREGACC, T4.DELETIONDATE,
T4.STATUSTYPE, T4.DELETEREASONTYPE, T4.MAINLANGUAGETYPE,
T4.FOTYPE, T4.KANTONSCODETYPE, T4.INDUSTRYCS BRANCH_CS,
T4.INDUSTRYTKBN BRANCH_TKBN, T4.SHORTNAME_G,
T4.SHORTNAME_E, T4.SHORTNAME_F, T4.SHORTNAME_I,
T4.SHORTNAME_N, T4.NAME_G, T4.NAME_E, T4.NAME_F, T4.NAME_I,
T4.NAME_N, T4.CREATETIMESTAMP CREATETIMESTAMP_INSTI,
T4.UPDATETIMESTAMP UPDATETIMESTAMP_INSTI,
T6.CREDITWORTHINESSTP, T4.CSASSEMBLYNOTIFICATIONTYPE,
T1.ROWSTATUS ROWSTATUS_INSTRIDENT,
T2.ROWSTATUS ROWSTATUS_INSTRUMENT,
T4.ROWSTATUS ROWSTATUS_INSTITUTION,
T5.ROWSTATUS ROWSTATUS_INSTIIDENT,
T2.UPDATETIMESTAMP UPDATETIMESTAMP_INSTRUMENT,
T3.CREATETIMESTAMP CREATETIMESTAMP_RT,
T3.UPDATETIMESTAMP UPDATETIMESTAMP_RT
FROM VDPSX.VTINSTRIDENT T1
INNER JOIN
VDPSX.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTIROLE T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTITUTION T4
ON T4.INSTITUTIONID = T3.INSTITUTIONID
INNER JOIN
VDPSX.VTINSTIIDENT T5
ON T5.INSTITUTIONID = T4.INSTITUTIONID
INNER JOIN
VDPSX.VTINSTRFLATDATA T6
ON T6.INSTRUMENTID = T1.INSTRUMENTID ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VINLI007_V02
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.XPS_VINLI007_V02 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.ROLETYPE,
T3.GUARANTORROLETYPE,
T3.CREATETIMESTAMP CREATETIMESTAMP_RT,
T3.UPDATETIMESTAMP UPDATETIMESTAMP_RT,
T5.IDSYMBOL IDSYMBOL_INSTI, T5.SCHEMESYMBOL SCHEME_INSTI,
T5.VALIDFROMDATE VALIDFROMDATE_GK,
T5.VALIDUNTILDATE VALIDUNTILDATE_GK,
T4.CREATETIMESTAMP CREATETIMESTAMP_GK,
T4.UPDATETIMESTAMP UPDATETIMESTAMP_GK, T4.ISGLOBALREGACC,
T4.DELETIONDATE, T4.STATUSTYPE, T4.DELETEREASONTYPE,
T4.FOTYPE, T4.KANTONSCODETYPE, T4.MAINLANGUAGETYPE,
T4.SHORTNAME_G, T4.SHORTNAME_E, T4.SHORTNAME_F,
T4.SHORTNAME_I, T4.SHORTNAME_N, T4.NAME_G, T4.NAME_E,
T4.NAME_F, T4.NAME_I, T4.NAME_N,
T1.ROWSTATUS ROWSTATUS_INSTRIDENT,
T2.ROWSTATUS ROWSTATUS_INSTRUMENT,
T5.ROWSTATUS ROWSTATUS_INSTIIDENT,
T4.ROWSTATUS ROWSTATUS_INSTITUTION
FROM VDPSX.VTINSTRIDENT T1
INNER JOIN
VDPSX.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTIROLE T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTITUTION T4
ON T4.INSTITUTIONID = T3.INSTITUTIONID
INNER JOIN
VDPSX.VTINSTIIDENT T5
ON T5.INSTITUTIONID = T4.INSTITUTIONID ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VINLI008_V03
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.XPS_VINLI008_V03 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.ROLETYPE,
T0.SCHEMESYMBOL SCHEMESYMB_CSGME, T4.DOMICILE,
T4.TAXDOMICILE, T4.DOMICILE_WS80 DOMICILE_CS,
T4.TAXDOMICILE_WS80 TAXDOMICILE_CS,
T5.IDSYMBOL IDSYMBOL_INSTI, T5.SCHEMESYMBOL SCHEME_INSTI,
T4.ISGLOBALREGACC, T4.DELETIONDATE, T4.STATUSTYPE,
T4.DELETEREASONTYPE, T4.MAINLANGUAGETYPE, T4.FOTYPE,
T4.KANTONSCODETYPE, T4.SHORTNAME_G, T4.SHORTNAME_E,
T4.SHORTNAME_F, T4.SHORTNAME_I, T4.SHORTNAME_N, T4.NAME_G,
T4.NAME_E, T4.NAME_F, T4.NAME_I, T4.NAME_N,
T4.CREATETIMESTAMP, T4.UPDATETIMESTAMP,
T1.ROWSTATUS ROWSTATUS_INSTRIDENT,
T2.ROWSTATUS ROWSTATUS_INSTRUMENT,
T4.ROWSTATUS ROWSTATUS_INSTITUTION,
T5.ROWSTATUS ROWSTATUS_INSTIIDENT
FROM VDPSX.VTINSTRIDENT T1
INNER JOIN
VDPSX.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTIROLE T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTITUTION T4
ON T4.INSTITUTIONID = T3.INSTITUTIONID
LEFT OUTER JOIN
VDPSX.VTINSTIGROUPKEY T0
ON T0.INSTITUTIONID = T3.INSTITUTIONID
INNER JOIN
VDPSX.VTINSTIIDENT T5
ON T5.INSTITUTIONID = T4.INSTITUTIONID ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VINLI010_V01
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.XPS_VINLI010_V01 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T1.ROWSTATUS,
T1.INSTRUMENTID, T2.ROLETYPE, T2.GUARANTORROLETYPE,
T2.CREATETIMESTAMP CREATETIMESTAMP_RT,
T2.UPDATETIMESTAMP UPDATETIMESTAMP_RT, T2.INSTITUTIONID,
T4.ROWSTATUS ROWSTATUS_GK, T4.IDSYMBOL IDSYMBOL_GK,
T4.VALIDFROMDATE VALIDFROMDATE_GK,
T4.VALIDUNTILDATE VALIDUNTILDATE_GK,
T3.CREATETIMESTAMP CREATETIMESTAMP_GK,
T3.UPDATETIMESTAMP UPDATETIMESTAMP_GK, T3.ISGLOBALREGACC,
T3.DELETIONDATE, T3.STATUSTYPE, T3.DELETEREASONTYPE,
T3.FOTYPE, T3.KANTONSCODETYPE, T3.MAINLANGUAGETYPE,
T3.SHORTNAME_G, T3.SHORTNAME_E, T3.SHORTNAME_F,
T3.SHORTNAME_I, T3.SHORTNAME_N, T3.NAME_G, T3.NAME_E,
T3.NAME_F, T3.NAME_I, T3.NAME_N, T3.DOMICILE_A3,
T3.DOMICILE_A2, T3.DOMICILE_WS80, T3.INDUSTRYTKBN,
T3.INDUSTRYCS, T3.INDUSTRYMSCI, T5.SYMBOLCSID01,
T5.SYMBOLCSID03, T5.SYMBOLCSID05, T5.SYMBOLCSID06,
T6.NAME_G NAME_INDUSTRY_TKBN_G,
T6.NAME_E NAME_INDUSTRY_TKBN_E,
T6.NAME_F NAME_INDUSTRY_TKBN_F,
T6.NAME_I NAME_INDUSTRY_TKBN_I,
T6.NAME_N NAME_INDUSTRY_TKBN_N,
T7.NAME_G NAME_INDUSTRY_CS_G, T7.NAME_E NAME_INDUSTRY_CS_E,
T7.NAME_F NAME_INDUSTRY_CS_F, T7.NAME_I NAME_INDUSTRY_CS_I,
T7.NAME_N NAME_INDUSTRY_CS_N,
T8.NAME_G NAME_INDUSTRY_MSCI_G,
T8.NAME_E NAME_INDUSTRY_MSCI_E,
T8.NAME_F NAME_INDUSTRY_MSCI_F,
T8.NAME_I NAME_INDUSTRY_MSCI_I,
T8.NAME_N NAME_INDUSTRY_MSCI_N
FROM VDPSX.VTINSTRIDENT T1
INNER JOIN
VDPSX.VTINSTIROLE T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTITUTION T3
ON T3.INSTITUTIONID = T2.INSTITUTIONID
INNER JOIN
VDPSX.VTINSTIIDENT T4
ON T4.INSTITUTIONID = T3.INSTITUTIONID AND T4.SCHEMESYMBOL
= 'GK' AND T4.ROWSTATUS IN(1, 2)
INNER JOIN
VDPSX.VTINSTIFLATSYMBOLS T5
ON T5.INSTITUTIONID = T2.INSTITUTIONID AND T5.ROWSTATUS = 1
LEFT OUTER JOIN
VDPSX.VTINDUSTRY T6
ON T6.IDSYMBOL = T3.INDUSTRYTKBN AND T6.SCHEMESYMBOL =
'TKBN'
LEFT OUTER JOIN
VDPSX.VTINDUSTRY T7
ON T7.IDSYMBOL = T3.INDUSTRYCS AND T7.SCHEMESYMBOL =
'CS-WS80-BRAN'
LEFT OUTER JOIN
VDPSX.VTINDUSTRY T8
ON T8.IDSYMBOL = T3.INDUSTRYMSCI AND T8.SCHEMESYMBOL =
'MSCI'
WHERE T1.ROWSTATUS IN(1, 2) ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VINSH000
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F616617" ;
--
CREATE VIEW VDPSX.XPS_VINSH000 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T5.CREATETIMESTAMP,
T5.UPDATETIMESTAMP, T4.IDSYMBOL IDSYMBOL_BCN, T5.MANDATOR,
T5.CONVERSIONFACTOR, T5.ISSTEERINGFLAG1,
T5.ISSTEERINGFLAG2, T5.ISSTEERINGFLAG3, T5.ISSTEERINGFLAG4,
T5.ISSTEERINGFLAG5, T5.ISSTEERINGFLAG6, T5.ISSTEERINGFLAG7,
T5.ISSTEERINGFLAG8, T5.PRIORITYCODE, T5.RESERVESYMBOL,
T5.TRADINGUNITTYPE
FROM VDPSX.VTINSTRIDENT T1
INNER JOIN
VDPSX.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTLISTING T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.CTLISTING T5
ON T5.INSTRUMENTID = T3.INSTRUMENTID AND T5.LISTINGNO = T3.
LISTINGNO AND T5.ISSTEERINGFLAG4 = 1
INNER JOIN
VDPSX.VTINSTIIDENT T4
ON T4.INSTITUTIONID = T3.TRADINGPLACE AND T4.SCHEMESYMBOL
= 'BCN' AND T4.ROWSTATUS = 1
WHERE T1.ROWSTATUS = 1
AND (T2.ROWSTATUS IS NULL
OR T2.ROWSTATUS <> 2)
AND T3.LISTINGSTATUSTYPE <> 9
AND T3.LISTINGSTATUSTYPE <> 18 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VINSH001
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F281992" ;
--
CREATE VIEW VDPSX.XPS_VINSH001 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T5.IDSYMBOL IDSYMBOL_BCN,
T9.IDSYMBOL CURRENCY_I2, T3.CURRENCY, T3.TRADINGSTATUSTYPE,
T3.LISTINGSTATUSTYPE, T4.ISSTEERINGFLAG4, T4.MANDATOR,
T6.IDSYMBOL IDSYMBOL_RIC, T7.IDSYMBOL IDSYMBOL_BBI,
T8.IDSYMBOL IDSYMBOL_TK_79,
T3.CREATETIMESTAMP CREATETIMESTAMP_VL,
T3.UPDATETIMESTAMP UPDATETIMESTAMP_VL,
T4.CREATETIMESTAMP CREATETIMESTAMP_CL,
T4.UPDATETIMESTAMP UPDATETIMESTAMP_CL
FROM VDPSX.VTINSTRIDENT T1
INNER JOIN
VDPSX.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPSX.VTLISTING T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.CTLISTING T4
ON T4.INSTRUMENTID = T3.INSTRUMENTID AND T4.LISTINGNO = T3.
LISTINGNO AND T4.ISSTEERINGFLAG4 = 1
INNER JOIN
VDPSX.VTINSTIIDENT T5
ON T5.INSTITUTIONID = T3.TRADINGPLACE AND T5.SCHEMESYMBOL
= 'BCN' AND T5.ROWSTATUS = 1
LEFT OUTER JOIN
VDPSX.VTLISTINGIDENT T6
ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
LISTINGNO AND T6.SCHEMESYMBOL = 'RIC' AND (T6.ISSECONDARY
IS NULL OR T6.ISSECONDARY = 0)
LEFT OUTER JOIN
VDPSX.VTLISTINGIDENT T7
ON T7.INSTRUMENTID = T3.INSTRUMENTID AND T7.LISTINGNO = T3.
LISTINGNO AND T7.SCHEMESYMBOL = 'BBI' AND (T7.ISSECONDARY
IS NULL OR T7.ISSECONDARY = 0)
LEFT OUTER JOIN
VDPSX.VTLISTINGGRPKEY T8
ON T8.INSTRUMENTID = T3.INSTRUMENTID AND T8.LISTINGNO = T3.
LISTINGNO AND T8.INSTRGRSCHMSYMBOL = 'TK' AND T8.IDSYMBOL
= '79'
LEFT OUTER JOIN
VDPSX.VTINSTRIDENT T9
ON T9.INSTRUMENTID = T3.CURRENCY AND T9.SCHEMESYMBOL =
'I2' AND T9.ROWSTATUS = 1
WHERE T1.ROWSTATUS = 1 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VINSH002
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.XPS_VINSH002 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T5.IDSYMBOL IDSYMBOL_BCN,
T9.IDSYMBOL CURRENCY_I2, T3.CURRENCY, T3.TRADINGSTATUSTYPE,
T3.LISTINGSTATUSTYPE, T4.ISSTEERINGFLAG4, T4.MANDATOR,
T6.IDSYMBOL IDSYMBOL_RIC, T7.IDSYMBOL IDSYMBOL_BBI,
T8.IDSYMBOL IDSYMBOL_TK_79,
T3.CREATETIMESTAMP CREATETIMESTAMP_VL,
T3.UPDATETIMESTAMP UPDATETIMESTAMP_VL,
T4.CREATETIMESTAMP CREATETIMESTAMP_CL,
T4.UPDATETIMESTAMP UPDATETIMESTAMP_CL
FROM VDPSX.VTINSTRIDENT T1
INNER JOIN
VDPSX.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPSX.VTLISTING T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.CTLISTING T4
ON T4.INSTRUMENTID = T3.INSTRUMENTID AND T4.LISTINGNO = T3.
LISTINGNO AND T4.ISSTEERINGFLAG4 = 1
INNER JOIN
VDPSX.VTINSTIIDENT T5
ON T5.INSTITUTIONID = T3.TRADINGPLACE AND T5.SCHEMESYMBOL
= 'BCN' AND T5.ROWSTATUS = 1
LEFT OUTER JOIN
VDPSX.VTLISTINGIDENT T6
ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
LISTINGNO AND T6.SCHEMESYMBOL = 'RIC' AND (T6.ISSECONDARY
IS NULL OR T6.ISSECONDARY = 0)
LEFT OUTER JOIN
VDPSX.VTLISTINGIDENT T7
ON T7.INSTRUMENTID = T3.INSTRUMENTID AND T7.LISTINGNO = T3.
LISTINGNO AND T7.SCHEMESYMBOL = 'BBI' AND (T7.ISSECONDARY
IS NULL OR T7.ISSECONDARY = 0)
LEFT OUTER JOIN
VDPSX.VTLISTINGGRPKEY T8
ON T8.INSTRUMENTID = T3.INSTRUMENTID AND T8.LISTINGNO = T3.
LISTINGNO AND T8.INSTRGRSCHMSYMBOL = 'TK' AND T8.IDSYMBOL
= '79'
LEFT OUTER JOIN
VDPSX.VTINSTRIDENT T9
ON T9.INSTRUMENTID = T3.CURRENCY AND T9.SCHEMESYMBOL =
'I2' AND T9.ROWSTATUS = 1
WHERE T1.ROWSTATUS = 1 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VISID001
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.XPS_VISID001 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.IDSYMBOL IDSYMBOL_ID,
T3.SCHEMESYMBOL SCHEMESYMBOL_ID, T1.INSTITUTIONID,
T1.CREATETIMESTAMP, T1.UPDATETIMESTAMP, T1.VALIDFROMDATE,
T1.VALIDUNTILDATE, T3.CREATETIMESTAMP CREATETIMESTAMP_ID,
T3.UPDATETIMESTAMP UPDATETIMESTAMP_ID,
T3.VALIDFROMDATE VALIDFROMDATE_ID,
T3.VALIDUNTILDATE VALIDUNTILDATE_ID
FROM VDPSX.VTINSTIIDENT T1
INNER JOIN
VDPSX.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND (T2.ROWSTATUS
IS NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPSX.VTINSTIIDENT T3
ON T3.INSTITUTIONID = T1.INSTITUTIONID AND T3.ROWSTATUS = 1
WHERE T1.ROWSTATUS = 1 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VISID002
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.XPS_VISID002 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.IDSYMBOL IDSYMBOL_ID,
T3.SCHEMESYMBOL SCHEMESYMBOL_ID, T1.INSTITUTIONID,
T1.VALIDFROMDATE, T1.VALIDUNTILDATE, T1.CREATETIMESTAMP,
T1.UPDATETIMESTAMP, T3.VALIDFROMDATE VALIDFROMDATE_ID,
T3.VALIDUNTILDATE VALIDUNTILDATE_ID,
T3.CREATETIMESTAMP CREATETIMESTAMP_ID,
T3.UPDATETIMESTAMP UPDATETIMESTAMP_ID,
T4.VALIDFROMDATE VALIDFROMDATE_IS,
T4.VALIDUNTILDATE VALIDUNTILDATE_IS,
T4.CREATETIMESTAMP CREATETIMESTAMP_IS,
T4.UPDATETIMESTAMP UPDATETIMESTAMP_IS, T4.NAME_G,
T4.NAME_E, T4.NAME_F, T4.NAME_I, T4.NAME_N
FROM VDPSX.VTINSTIIDENT T1
INNER JOIN
VDPSX.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND (T2.ROWSTATUS
IS NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPSX.VTINSTIIDENT T3
ON T3.INSTITUTIONID = T1.INSTITUTIONID AND T3.ROWSTATUS = 1
INNER JOIN
VDPSX.VTINSTIIDSCHEME T4
ON T4.SCHEMESYMBOL = T3.SCHEMESYMBOL AND (T4.ROWSTATUS IS
NULL OR T4.ROWSTATUS <> 2)
WHERE T1.ROWSTATUS = 1 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VISRG000_V02
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F326930" ;
--
CREATE VIEW VDPSX.XPS_VISRG000_V02 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.ROLETYPE,
T5.IDSYMBOL IDSYMBOL_INSTI, T5.SCHEMESYMBOL SCHEME_INSTI,
T6.IDSYMBOL IDSYMBOL_RATING, T6.SCHEMESYMBOL SCHEME_RATING,
T6.RATINGDATE, T6.RATINGSTATUSTYPE, T6.REVIEWDATE,
T6.WATCHLISTSTATTYPE, T6.SOURCETYPE, T6.UNIQUENUMBER,
T6.CREATETIMESTAMP, T6.UPDATETIMESTAMP,
T1.ROWSTATUS ROWSTATUS_INSTRIDENT,
T2.ROWSTATUS ROWSTATUS_INSTRUMENT,
T5.ROWSTATUS ROWSTATUS_INSTIIDENT,
T4.ROWSTATUS ROWSTATUS_INSTITUTION
FROM VDPSX.VTINSTRIDENT T1
INNER JOIN
VDPSX.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTIROLE T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTITUTION T4
ON T4.INSTITUTIONID = T3.INSTITUTIONID
INNER JOIN
VDPSX.VTINSTIIDENT T5
ON T5.INSTITUTIONID = T4.INSTITUTIONID
INNER JOIN
VDPSX.VTINSTIRATING T6
ON T6.INSTITUTIONID = T3.INSTITUTIONID ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VISRG002
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F281992" ;
--
CREATE VIEW VDPSX.XPS_VISRG002 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL,
T3.SCHEMESYMBOL SCHEME_RATING, T3.IDSYMBOL IDSYMBOL_RATING,
T1.INSTITUTIONID, T3.INSTIRATINGNO, T3.RATINGDATE,
T3.RATINGSTATUSTYPE, T3.REVIEWDATE, T3.WATCHLISTSTATTYPE,
T3.SOURCETYPE, T3.UNIQUENUMBER, T3.CREATETIMESTAMP,
T3.UPDATETIMESTAMP
FROM VDPSX.VTINSTIIDENT T1
INNER JOIN
VDPSX.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND T2.ROWSTATUS IS
NULL
INNER JOIN
VDPSX.VTINSTIRATING T3
ON T3.INSTITUTIONID = T2.INSTITUTIONID
WHERE T1.ROWSTATUS = 1 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VISTI000
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F273764" ;
--
CREATE VIEW VDPSX.XPS_VISTI000 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T1.INSTITUTIONID,
T2.PORTFOLIONO, T2.FOTYPE, T2.STATUSTYPE,
T2.ISGLOBALREGACC, T2.DELETIONDATE, T2.DELETEREASONTYPE,
T2.KANTONSCODETYPE, T2.MAINLANGUAGETYPE, T2.DOMICILE,
T2.DOMICILE_A2, T2.DOMICILE_WS80, T2.TAXDOMICILE,
T2.TAXDOMICILE_A2, T2.TAXDOMICILE_WS80, T2.INDUSTRYCS,
T2.INDUSTRYTKBN, T2.INDUSTRYMSCI, T2.INDUSTRYDJ,
T2.INDUSTRYFTSE, T2.INDUSTRYMFIB, T2.INDUSTRYMFIS,
T2.INDUSTRYICB, T2.INDUSTRYBDF, T2.CREATETIMESTAMP,
T2.UPDATETIMESTAMP, T2.ACCOUNTINGCURR,
T2.ACTFINYEARENDDATE, T2.FOUNDATIONDATE, T2.LEGALFORMTYPE,
T2.PREVFINYEARENDDATE, T2.REGISTERENTRYDATE,
T2.REGENTRYDELETIONDT, T2.LOCATION, T2.INITIALMARGINRATE,
T2.NEXTSEMESTERREPORT, T2.NONTAXABLEDATE,
T2.NONTAXABLENUMBER, T2.PREVIOUSYEARENDDT, T2.TAXNUMBER,
T2.TRUSTLEGALGUIDETP, T2.TRUSTSTATUSTYPE, T2.YEARENDDATE,
T2.ADDRESS, T2.ADDRESSDESCR, T2.ADDRESSLOCATION,
T2.BANKACCOUNTNUMBER, T2.CITY, T2.EMAILNAME,
T2.HEADOFFICEDESCR, T2.HOUSENUMBER, T2.IBAN,
T2.INTERNETDOMAIN, T2.NATIONALBANKCODE, T2.PHONENUMBER,
T2.STREET, T2.TELEFAXNUMBER, T2.ZIP, T2.SHORTNAME_G,
T2.SHORTNAME_E, T2.SHORTNAME_F, T2.SHORTNAME_I,
T2.SHORTNAME_N, T2.NAME_G, T2.NAME_E, T2.NAME_F, T2.NAME_I,
T2.NAME_N
FROM VDPSX.VTINSTIIDENT T1
INNER JOIN
VDPSX.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND (T2.ROWSTATUS
IS NULL OR T2.ROWSTATUS <> 2)
WHERE T1.ROWSTATUS = 1 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VITGK002
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.XPS_VITGK002 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T1.INSTITUTIONID, T2.FOTYPE,
T2.CREATETIMESTAMP CREATETIMESTAMP_IST,
T2.UPDATETIMESTAMP UPDATETIMESTAMP_IST,
T3.IDSYMBOL IDSYMBOL_GROUP,
T3.SCHEMESYMBOL SCHEMESYMBOL_GROUP,
T3.CREATETIMESTAMP CREATETIMESTAMP_IGK,
T3.UPDATETIMESTAMP UPDATETIMESTAMP_IGK, T4.NAME_G,
T4.NAME_E, T4.NAME_F, T4.NAME_I, T4.NAME_N
FROM VDPSX.VTINSTIIDENT T1
INNER JOIN
VDPSX.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND (T2.ROWSTATUS
IS NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPSX.VTINSTIGROUPKEY T3
ON T3.INSTITUTIONID = T1.INSTITUTIONID
INNER JOIN
VDPSX.VTINSTITUTIONGROUP T4
ON T4.IDSYMBOL = T3.IDSYMBOL AND T4.SCHEMESYMBOL = T3.
SCHEMESYMBOL AND (T4.ROWSTATUS IS NULL OR T4.ROWSTATUS <>
2)
WHERE T1.ROWSTATUS = 1 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VLIID000_V02
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F616617" ;
--
CREATE VIEW VDPSX.XPS_VLIID000_V02 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL,
LID.SCHEMESYMBOL SCHEME_TICKER,
LI1.CREATETIMESTAMP VTLISTCREATETIME,
LI1.UPDATETIMESTAMP VTLISTUPDATETIME,
LI2.CREATETIMESTAMP CTLISTCREATETIME,
LI2.UPDATETIMESTAMP CTLISTUPDATETIME,
LID.CREATETIMESTAMP LISTIDCREATETIME,
LID.UPDATETIMESTAMP LISTIDUPDATETIME,
LI1.ISMAINTRADINGPLACE TK_HAUPTBOEPLATZ,
LI1.ISHOMETRADINGPLACE, LI1.ISONLIMITEDHALT,
LI1.HASNOMCURRSETTLE, LI1.CURRENCY, LI1.MARKTPRACTIDSYMBOL,
LI1.FIRSTTRADINGDATE, LI1.LASTTRADINGDATE,
LI1.HALTFROMDATE, LI1.HALTUNTILDATE, LI1.FIRSTTRDDTAFHALT,
LI1.TRADINGSTATUSTYPE, LI1.LISTINGSTATUSTYPE,
LI1.EXCHANGERATETYPE, LI1.LISTPURPOSETYPE, LI1.SHORTNAME_G,
LI1.SHORTNAME_E, LI1.SHORTNAME_F, LI1.SHORTNAME_I,
LI1.SHORTNAME_N, LI1.DESCRIPTION_G, LI1.DESCRIPTION_E,
LI1.DESCRIPTION_F, LI1.DESCRIPTION_I, LI1.DESCRIPTION_N,
LI1.CSLISTINGCODETYPE, LI2.PRIORITYCODE,
LI2.ISSTEERINGFLAG1, LI2.ISSTEERINGFLAG2,
LI2.ISSTEERINGFLAG3, LI2.ISSTEERINGFLAG4 CS_HAUPTBOEPLATZ,
LI2.ISSTEERINGFLAG5, LI2.ISSTEERINGFLAG6,
LI2.ISSTEERINGFLAG7, LI2.ISSTEERINGFLAG8,
LI2.CONVERSIONFACTOR, LI2.RESERVESYMBOL,
LI2.TRADINGUNITTYPE, LID.IDSYMBOL IDSYMBOL_TICKER,
LID.VALIDFROMDATE, LID.VALIDUNTILDATE,
BCN.IDSYMBOL IDSYMBOL_BCN, BCNCS.IDSYMBOL IDSYMBOL_BCNCS,
BCA.IDSYMBOL IDSYMBOL_BCA, LI2.MANDATOR
FROM VDPSX.VTINSTRIDENT T1
INNER JOIN
VDPSX.VTINSTRUMENT
ON T1.INSTRUMENTID = VDPSX.VTINSTRUMENT.INSTRUMENTID AND (
VDPSX.VTINSTRUMENT.ROWSTATUS IS NULL OR VDPSX.
VTINSTRUMENT.ROWSTATUS <> 2) AND T1.ROWSTATUS = 1
INNER JOIN
VDPSX.VTLISTING LI1
ON T1.INSTRUMENTID = LI1.INSTRUMENTID AND LI1.
LISTINGSTATUSTYPE <> 9 AND LI1.LISTINGSTATUSTYPE <> 18
LEFT OUTER JOIN
VDPSX.CTLISTING LI2
ON LI1.INSTRUMENTID = LI2.INSTRUMENTID AND LI1.LISTINGNO =
LI2.LISTINGNO
LEFT OUTER JOIN
VDPSX.VTLISTINGIDENT LID
ON LI1.INSTRUMENTID = LID.INSTRUMENTID AND LI1.LISTINGNO =
LID.LISTINGNO
INNER JOIN
VDPSX.VTINSTIIDENT BCN
ON LI1.TRADINGPLACE = BCN.INSTITUTIONID AND BCN.
SCHEMESYMBOL = 'BCN' AND BCN.ROWSTATUS = 1
LEFT OUTER JOIN
VDPSX.VTINSTIIDENT BCNCS
ON LI1.TRADINGPLACE = BCNCS.INSTITUTIONID AND BCNCS.
SCHEMESYMBOL = 'CS-WS80-BPL' AND BCNCS.ROWSTATUS = 1
LEFT OUTER JOIN
VDPSX.VTINSTIIDENT BCA
ON LI1.TRADINGPLACE = BCA.INSTITUTIONID AND BCA.
SCHEMESYMBOL = 'BCA' AND BCA.ROWSTATUS = 1 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VLIID001_V03
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.XPS_VLIID001_V03 AS
SELECT T9.IDSYMBOL, IID.IDSYMBOL IDSYMBOL_BCN,
VDPSX.CTLISTING.ISSTEERINGFLAG1 BPL_ST,
VDPSX.CTLISTING.ISSTEERINGFLAG2,
VDPSX.CTLISTING.ISSTEERINGFLAG3 BPL_KS,
VDPSX.CTLISTING.ISSTEERINGFLAG4,
VDPSX.CTLISTING.ISSTEERINGFLAG5 BPL_HA,
VDPSX.CTLISTING.ISSTEERINGFLAG6 AIS_SP,
VDPSX.CTLISTING.ISSTEERINGFLAG7 BPL_IN,
VDPSX.CTLISTING.ISSTEERINGFLAG8 BPL_SP,
VDPSX.CTLISTING.CONVERSIONFACTOR SIZE_UAMT,
VDPSX.CTLISTING.PRIORITYCODE AIS_PRIO,
VDPSX.CTLISTING.TRADINGUNITTYPE HANDLHEIT,
LI1.TRADINGSTATUSTYPE, LI1.LISTINGSTATUSTYPE,
X.IDSYMBOL CURRENCY_CS, T1.SCHEMESYMBOL,
T1.IDSYMBOL IDSYMBOL_TICKER, LI3.RESERVENUMBER2 GENERATION,
LI1.LASTTRADINGDATE GUELTIG_VON
FROM VDPSX.VTINSTRIDENT T9
INNER JOIN
VDPSX.VTINSTRUMENT
ON T9.INSTRUMENTID = VDPSX.VTINSTRUMENT.INSTRUMENTID
INNER JOIN
VDPSX.VTLISTING LI1
ON T9.INSTRUMENTID = LI1.INSTRUMENTID
LEFT OUTER JOIN
VDPSX.CTINSTRSP42DETAILS LI3
ON T9.INSTRUMENTID = LI3.INSTRUMENTID
LEFT OUTER JOIN
VDPSX.VTINSTRIDENT X
ON LI1.CURRENCY = X.INSTRUMENTID AND X.SCHEMESYMBOL =
'CS-WS80-WHRG'
LEFT OUTER JOIN
VDPSX.VTLISTINGIDENT T1
ON LI1.INSTRUMENTID = T1.INSTRUMENTID AND T1.SCHEMESYMBOL
IN('TKH', 'TKE', 'TKL', 'TKM', 'TKT', 'TKS', 'RIC') AND T1.
LISTINGNO = LI1.LISTINGNO
LEFT OUTER JOIN
VDPSX.CTLISTING
ON LI1.INSTRUMENTID = VDPSX.CTLISTING.INSTRUMENTID AND
VDPSX.CTLISTING.LISTINGNO = LI1.LISTINGNO AND VDPSX.
CTLISTING.MANDATOR = 1,
VDPSX.VTINSTIIDENT IID
WHERE T9.SCHEMESYMBOL = 'CH'
AND T9.ROWSTATUS = 1
AND (VDPSX.VTINSTRUMENT.ROWSTATUS IS NULL
OR VDPSX.VTINSTRUMENT.ROWSTATUS <> 2)
AND IID.INSTITUTIONID = LI1.TRADINGPLACE
AND IID.SCHEMESYMBOL = 'CS-WS80-BPL'
AND IID.ROWSTATUS = 1 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VLIID001_V04
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F326930" ;
--
CREATE VIEW VDPSX.XPS_VLIID001_V04 AS
SELECT T1.IDSYMBOL, T7.IDSYMBOL IDSYMBOL_BCN,
T6.ISSTEERINGFLAG1 BPL_ST, T6.ISSTEERINGFLAG2,
T6.ISSTEERINGFLAG3 BPL_KS, T6.ISSTEERINGFLAG4,
T6.ISSTEERINGFLAG5 BPL_HA, T6.ISSTEERINGFLAG6 AIS_SP,
T6.ISSTEERINGFLAG7 BPL_IN, T6.ISSTEERINGFLAG8 BPL_SP,
T6.CONVERSIONFACTOR SIZE_UAMT, T6.PRIORITYCODE AIS_PRIO,
T6.TRADINGUNITTYPE HANDLHEIT, T3.TRADINGSTATUSTYPE,
T3.LISTINGSTATUSTYPE, T4.IDSYMBOL CURRENCY_CS,
T5.SCHEMESYMBOL, T5.IDSYMBOL IDSYMBOL_TICKER,
T3.LASTTRADINGDATE GUELTIG_VON, T3.NONVERSEAMOUNT,
T6.PRICECALCTYPE
FROM VDPSX.VTINSTRIDENT T1
INNER JOIN
VDPSX.VTINSTRUMENT T2
ON T1.INSTRUMENTID = T2.INSTRUMENTID
INNER JOIN
VDPSX.VTLISTING T3
ON T1.INSTRUMENTID = T3.INSTRUMENTID
LEFT OUTER JOIN
VDPSX.VTINSTRIDENT T4
ON T3.CURRENCY = T4.INSTRUMENTID AND T4.SCHEMESYMBOL =
'CS-WS80-WHRG'
LEFT OUTER JOIN
VDPSX.VTLISTINGIDENT T5
ON T3.INSTRUMENTID = T5.INSTRUMENTID AND T5.SCHEMESYMBOL IN
('TKH', 'TKE', 'TKL', 'TKM', 'TKT', 'TKS', 'RIC') AND T5.
LISTINGNO = T3.LISTINGNO
LEFT OUTER JOIN
VDPSX.CTLISTING T6
ON T3.INSTRUMENTID = T6.INSTRUMENTID AND T6.LISTINGNO = T3.
LISTINGNO AND T6.MANDATOR = 1
INNER JOIN
VDPSX.VTINSTIIDENT T7
ON T7.INSTITUTIONID = T3.TRADINGPLACE AND T7.SCHEMESYMBOL
= 'CS-WS80-BPL' AND T7.ROWSTATUS = 1
WHERE T1.SCHEMESYMBOL = 'CH'
AND T1.ROWSTATUS = 1
AND (T2.ROWSTATUS IS NULL
OR T2.ROWSTATUS <> 2) ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VLIID002_V07
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F273764" ;
--
CREATE VIEW VDPSX.XPS_VLIID002_V07 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T1.INSTRUMENTID,
T3.CREATETIMESTAMP, T3.UPDATETIMESTAMP, T3.LISTINGNO,
T6.LISTINGIDENTNO, T3.LISTINGSTATUSTYPE,
T3.TRADINGSTATUSTYPE, T3.FIRSTTRADINGDATE,
T3.LASTTRADINGDATE, T3.ISHOMETRADINGPLACE,
T3.ISMAINTRADINGPLACE TK_HAUPTBOEPLATZ,
T7.ISSTEERINGFLAG4 CS_HAUPTBOEPLATZ,
T3.ISCSBESTVENUEOVERALL, T3.ISCSBESTVENUEPERCURR,
T3.TRADINGPLACE, T3.CURRENCY, T8.IDSYMBOL CURRENCY_CS,
T4.IDSYMBOL IDSYMBOL_BCN, T5.DOMICILE,
T5.DOMICILE_WS80 DOMICILE_CS,
T6.SCHEMESYMBOL SCHEME_TICKER, T6.IDSYMBOL IDSYMBOL_TICKER,
T6.VALIDFROMDATE, T6.VALIDUNTILDATE,
T3.DESCRIPTION_E EXTERNTRADINGCURR
FROM VDPSX.VTINSTRIDENT T1
INNER JOIN
VDPSX.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPSX.VTLISTING T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPSX.VTINSTIIDENT T4
ON T4.INSTITUTIONID = T3.TRADINGPLACE AND T4.SCHEMESYMBOL
= 'BCN' AND T4.ROWSTATUS = 1
INNER JOIN
VDPSX.VTINSTITUTION T5
ON T5.INSTITUTIONID = T3.TRADINGPLACE AND (T5.ROWSTATUS IS
NULL OR T5.ROWSTATUS <> 2)
LEFT OUTER JOIN
VDPSX.VTLISTINGIDENT T6
ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
LISTINGNO AND T6.SCHEMESYMBOL IN('TKH', 'RIC', 'BBI', 'TKE')
LEFT OUTER JOIN
VDPSX.CTLISTING T7
ON T7.INSTRUMENTID = T3.INSTRUMENTID AND T7.LISTINGNO = T3.
LISTINGNO AND T7.MANDATOR = 1
LEFT OUTER JOIN
VDPSX.VTINSTRIDENT T8
ON T8.INSTRUMENTID = T3.CURRENCY AND T8.SCHEMESYMBOL =
'CS-WS80-WHRG' AND T8.ROWSTATUS = 1
WHERE T1.ROWSTATUS = 1
AND T3.LISTINGSTATUSTYPE <> 9
AND T3.LISTINGSTATUSTYPE <> 18 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VLIID003
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F281992" ;
--
CREATE VIEW VDPSX.XPS_VLIID003 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.LISTINGNO,
T4.IDSYMBOL IDSYMBOL_BCN, T5.IDSYMBOL CURRENCY_I2,
T3.TRADINGPLACE, T3.CURRENCY, T3.TRADINGSTATUSTYPE,
T3.LISTINGSTATUSTYPE, T3.EXCHANGETYPE, T3.CREATETIMESTAMP,
T3.UPDATETIMESTAMP, T6.IDSYMBOL IDSYMBOL_RIC,
T7.IDSYMBOL IDSYMBOL_BBI
FROM VDPSX.VTINSTRIDENT T1
INNER JOIN
VDPSX.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPSX.VTLISTING T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTIIDENT T4
ON T4.INSTITUTIONID = T3.TRADINGPLACE AND T4.SCHEMESYMBOL
= 'BCN' AND T4.ROWSTATUS = 1
LEFT OUTER JOIN
VDPSX.VTINSTRIDENT T5
ON T5.INSTRUMENTID = T3.CURRENCY AND T5.SCHEMESYMBOL =
'I2' AND T5.ROWSTATUS = 1
LEFT OUTER JOIN
VDPSX.VTLISTINGIDENT T6
ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
LISTINGNO AND T6.SCHEMESYMBOL = 'RIC' AND (T6.ISSECONDARY
IS NULL OR T6.ISSECONDARY = 0)
LEFT OUTER JOIN
VDPSX.VTLISTINGIDENT T7
ON T7.INSTRUMENTID = T3.INSTRUMENTID AND T7.LISTINGNO = T3.
LISTINGNO AND T7.SCHEMESYMBOL = 'BBI' AND (T7.ISSECONDARY
IS NULL OR T7.ISSECONDARY = 0)
WHERE T1.ROWSTATUS = 1 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VLIID004
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.XPS_VLIID004 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.LISTINGNO,
T4.IDSYMBOL IDSYMBOL_BCN, T5.IDSYMBOL CURRENCY_I2,
T3.TRADINGPLACE, T3.CURRENCY, T3.TRADINGSTATUSTYPE,
T3.LISTINGSTATUSTYPE, T3.EXCHANGETYPE, T3.CREATETIMESTAMP,
T3.UPDATETIMESTAMP, T6.IDSYMBOL IDSYMBOL_RIC,
T7.IDSYMBOL IDSYMBOL_BBI
FROM VDPSX.VTINSTRIDENT T1
INNER JOIN
VDPSX.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPSX.VTLISTING T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTIIDENT T4
ON T4.INSTITUTIONID = T3.TRADINGPLACE AND T4.SCHEMESYMBOL
= 'BCN' AND T4.ROWSTATUS = 1
LEFT OUTER JOIN
VDPSX.VTINSTRIDENT T5
ON T5.INSTRUMENTID = T3.CURRENCY AND T5.SCHEMESYMBOL =
'I2' AND T5.ROWSTATUS = 1
LEFT OUTER JOIN
VDPSX.VTLISTINGIDENT T6
ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
LISTINGNO AND T6.SCHEMESYMBOL = 'RIC' AND (T6.ISSECONDARY
IS NULL OR T6.ISSECONDARY = 0)
LEFT OUTER JOIN
VDPSX.VTLISTINGIDENT T7
ON T7.INSTRUMENTID = T3.INSTRUMENTID AND T7.LISTINGNO = T3.
LISTINGNO AND T7.SCHEMESYMBOL = 'BBI' AND (T7.ISSECONDARY
IS NULL OR T7.ISSECONDARY = 0)
WHERE T1.ROWSTATUS = 1 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VLIID005_V02
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F326930" ;
--
CREATE VIEW VDPSX.XPS_VLIID005_V02 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.CURRENCY,
T3.CSLISTINGCODETYPE, T3.TRADINGPLACE,
T3.TRADINGSTATUSTYPE, T3.LISTINGSTATUSTYPE,
T4.ISSTEERINGFLAG4 CS_HAUPTBOEPLATZ,
T5.IDSYMBOL IDSYMBOL_BCA, T7.IDSYMBOL IDSYMBOL_BCN,
T6.IDSYMBOL IDSYMBOL_TICKER, T6.ISSECONDARY,
T6.SCHEMESYMBOL SCHEMESYMBOL_LIST
FROM VDPSX.VTINSTRIDENT T1
INNER JOIN
VDPSX.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPSX.VTLISTING T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPSX.CTLISTING T4
ON T4.INSTRUMENTID = T3.INSTRUMENTID AND T4.LISTINGNO = T3.
LISTINGNO
INNER JOIN
VDPSX.VTINSTIIDENT T5
ON T5.INSTITUTIONID = T3.TRADINGPLACE AND T5.SCHEMESYMBOL
= 'BCA' AND T5.ROWSTATUS = 1
LEFT OUTER JOIN
VDPSX.VTINSTIIDENT T7
ON T7.INSTITUTIONID = T3.TRADINGPLACE AND T7.SCHEMESYMBOL
= 'BCN' AND T7.ROWSTATUS = 1
LEFT OUTER JOIN
VDPSX.VTLISTINGIDENT T6
ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
LISTINGNO
WHERE T1.ROWSTATUS = 1 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VNTP001
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","S100447" ;
--
CREATE VIEW VDPSX.XPS_VNTP001 AS SELECT CAST(FS.SYMBOLCH AS CHAR( 9))
VALOR, CAST(';' AS CHAR( 1)) DL01 , CAST(FS.SYMBOLISIN AS CHAR( 12)) ISI
N, CAST(';' AS CHAR( 1)) DL02, CAST(CASE WHEN Z.MAINLANGUAGETYPE = 1 T
HEN Z.NAME_G WHEN Z.MAINLANGUAGETYPE = 2 THEN Z.NAME_F WHEN Z.MAINLANG
UAGETYPE = 3 THEN Z.NAME_I WHEN Z.MAINLANGUAGETYPE = 4 THEN Z.NAME_E W
HEN Z.MAINLANGUAGETYPE = 5 THEN Z.NAME_N WHEN Z.MAINLANGUAGETYPE = 9999
THEN NULL ELSE NULL END AS CHAR( 254)) ISSUER_NAME, CAST(';' AS CHAR(
1)) DL03, CAST(CASE WHEN A.MAINLANGUAGETYPE = 1 THEN FD.PREPARTICLE_G
WHEN A.MAINLANGUAGETYPE = 2 THEN FD.PREPARTICLE_F WHEN A.MAINLANGUAGETY
PE = 3 THEN FD.PREPARTICLE_I WHEN A.MAINLANGUAGETYPE = 4 THEN FD.PREPAR
TICLE_E WHEN A.MAINLANGUAGETYPE = 5 THEN FD.PREPARTICLE_N WHEN A.MAINL
ANGUAGETYPE = 9999 THEN NULL ELSE NULL END AS CHAR( 254)) INSTR_PREPART
, CAST(';' AS CHAR( 1)) DL04, CAST(CASE WHEN A.MAINLANGUAGETYPE = 1 THE
N FD.POSTPARTICLE_G WHEN A.MAINLANGUAGETYPE = 2 THEN FD.POSTPARTICLE_F
WHEN A.MAINLANGUAGETYPE = 3 THEN FD.POSTPARTICLE_I WHEN A.MAINLANGUAGE
TYPE = 4 THEN FD.POSTPARTICLE_E WHEN A.MAINLANGUAGETYPE = 5 THEN FD.POS
TPARTICLE_N WHEN A.MAINLANGUAGETYPE = 9999 THEN NULL ELSE NULL END AS C
HAR( 254)) INSTR_POSTPART, CAST(';' AS CHAR( 1)) DL05, CAST(A.MAINLANGU
AGETYPE AS CHAR( 4)) MAINLANGUAGETYPE, CAST(';' AS CHAR( 1)) DL06, CAST
(FD. CSSTATUSTYPE AS CHAR( 4)) CSSTATUSTYPE, CAST(';' AS CHAR( 1)) DL07,
CAST(FD.STATUSTYPE AS CHAR( 4)) TKSTATUSTYPE, CAST(';' AS CHAR( 1)) D
L08, CAST(CASE WHEN FD.ISINTERNAL = 1 THEN FD.ISINTERNAL ELSE 0 END AS
CHAR( 1)) CSGIV , CAST(';' AS CHAR( 1)) DL09, FS.CATEGORYCSGMS CSGMS, CA
ST(';' AS CHAR ( 1)) DL10, CAST(FD.CSFUNDTYPE AS CHAR( 4)) CSFUNDTYPE, C
AST(';' AS CHAR( 1)) DL11, CAST(FD.CREDITWORTHINESSTP AS CHAR( 4)) BONI
TAETSCODE, CAST(';' AS CHAR( 1)) DL12, CAST('1' AS CHAR( 1)) MANDATOR,
CAST(';' AS CHAR( 1)) DL13, CAST(CASE WHEN H.NAME_E IS NOT NULL THEN H
.NAME_E WHEN H.NAME_G IS NOT NULL THEN H.NAME_G WHEN H.NAME_F IS NOT N
ULL THEN H.NAME_F WHEN H.NAME_I IS NOT NULL THEN H.NAME_I WHEN H.NAME_
N IS NOT NULL THEN H.NAME_N ELSE NULL END AS CHAR( 254)) MAINDEPOS_NAME
, CAST(';' AS CHAR( 1)) DL14, CAST(Z.YEARENDDATE AS CHAR ( 30)) YEARENDD
ATE, CAST(';' AS CHAR( 1)) DL15, CAST(L. INVENTORYFREQUENCY AS CHAR( 10)
) INVENTORYFREQUENCY, CAST(';' AS CHAR( 1)) DL16, CAST(L.INVENTORYFRUNI
TTP AS CHAR( 4)) INVENTORYFRUNITTP, CAST (';' AS CHAR( 1)) DL17, CAST(L.
NAVPUBLICATDESCR AS CHAR( 254)) NAVPUBLICATDESCR, CAST(';' AS CHAR( 1))
DL18, M.TRADINGPLACE_BCN BCN, CAST(';' AS CHAR( 1)) DL19, M.CURRENCY_I
2 IDSYMBOL_I2, CAST(';' AS CHAR ( 1)) DL20, CAST(CASE WHEN P.ISSTEERING
FLAG4 = 1 THEN '1' WHEN P.ISSTEERINGFLAG4 = 0 THEN '0' WHEN P.ISSTEERI
NGFLAG4 IS NULL THEN ' ' ELSE ' ' END AS CHAR( 1)) ISSTEERINGFLAG4, CAS
T(';' AS CHAR( 1)) DL21, FD.INSTRUMENTID, CAST(';' AS CHAR( 1)) DL22 FR
OM VDPSX.VTINSTRFLATDATA FD INNER JOIN VDPSX. VTINSTRUMENT A ON FD.INSTR
UMENTID = A.INSTRUMENTID AND FD.CSFUNDTYPE IN (2, 3, 6, 10, 11, 12, 14,
18, 23, 27, 28, 29, 30, 31, 32, 33, 34) AND FD.CSSTATUSTYPE IN(4, 6, 7)
INNER JOIN VDPSX.VTINSTITUTION Z ON FD. ISSUER = Z.INSTITUTIONID INNER
JOIN VDPSX.VTINSTITUTION H ON FD. MAINDEPOSITARY = H.INSTITUTIONID INNER
JOIN VDPSX.VTINSTRFLATSYMBOLS FS ON FD.INSTRUMENTID = FS.INSTRUMENTID
AND FS.ROWSTATUS = 1 INNER JOIN VDPSX.CTINSTRB42STOCK I ON I.INSTRUMENT
ID = FD.INSTRUMENTID AND I. HOLDINGSTOTAL = 999999 AND I.MANDATOR = 1 IN
NER JOIN VDPSX.VTLISTING M ON M.INSTRUMENTID = FD.INSTRUMENTID AND M.LI
STINGSTATUSTYPE <> 9 AND M. LISTINGSTATUSTYPE <> 18 LEFT OUTER JOIN VDPS
X.CTLISTING P ON P. INSTRUMENTID = M.INSTRUMENTID AND M.LISTINGNO = P.LI
STINGNO AND P. MANDATOR = 1 LEFT OUTER JOIN VDPSX.VTTRUSTDETAIL L ON L.I
NSTRUMENTID = FD.INSTRUMENTID ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VRISI000
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F281992" ;
--
CREATE VIEW VDPSX.XPS_VRISI000 AS
SELECT T1.INSTITUTIONID, T1.FOTYPE, T1.ISGLOBALREGACC,
T1.KANTONSCODETYPE, T1.MAINLANGUAGETYPE, T1.STATUSTYPE,
T1.DELETIONDATE, T1.DELETEREASONTYPE, T1.CREATETIMESTAMP,
T1.UPDATETIMESTAMP, T2.SCHEMESYMBOL SCHEMESYMBOL_BCN,
T2.IDSYMBOL IDSYMBOL_BCN,
T2.VALIDFROMDATE VALIDFROMDATE_BCN,
T2.VALIDUNTILDATE VALIDUNTILDATE_BCN,
T2.CREATETIMESTAMP CREATETIMESTAMP_BCN,
T2.UPDATETIMESTAMP UPDATETIMESTAMP_BCN,
T3.SCHEMESYMBOL SCHEMESYMBOL_BCA, T3.IDSYMBOL IDSYMBOL_BCA,
T3.VALIDFROMDATE VALIDFROMDATE_BCA,
T3.VALIDUNTILDATE VALIDUNTILDATE_BCA,
T3.CREATETIMESTAMP CREATETIMESTAMP_BCA,
T3.UPDATETIMESTAMP UPDATETIMESTAMP_BCA,
T4.SCHEMESYMBOL SCHEMESYMBOL_CS, T4.IDSYMBOL IDSYMBOL_CS,
T4.VALIDFROMDATE VALIDFROMDATE_CS,
T4.VALIDUNTILDATE VALIDUNTILDATE_CS,
T4.CREATETIMESTAMP CREATETIMESTAMP_CS,
T4.UPDATETIMESTAMP UPDATETIMESTAMP_CS,
T5.SCHEMESYMBOL SCHEMESYMBOL_MIC, T5.IDSYMBOL IDSYMBOL_MIC,
T5.VALIDFROMDATE VALIDFROMDATE_MIC,
T5.VALIDUNTILDATE VALIDUNTILDATE_MIC,
T5.CREATETIMESTAMP CREATETIMESTAMP_MIC,
T5.UPDATETIMESTAMP UPDATETIMESTAMP_MIC, T1.SHORTNAME_G,
T1.SHORTNAME_E, T1.SHORTNAME_F, T1.SHORTNAME_I,
T1.SHORTNAME_N, T1.NAME_G, T1.NAME_E, T1.NAME_F, T1.NAME_I,
T1.NAME_N
FROM VDPSX.VTINSTITUTION T1
LEFT OUTER JOIN
VDPSX.VTINSTIIDENT T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND T2.SCHEMESYMBOL
= 'BCN' AND T2.ROWSTATUS = 1
LEFT OUTER JOIN
VDPSX.VTINSTIIDENT T3
ON T3.INSTITUTIONID = T1.INSTITUTIONID AND T3.SCHEMESYMBOL
= 'BCA' AND T3.ROWSTATUS = 1
LEFT OUTER JOIN
VDPSX.VTINSTIIDENT T4
ON T4.INSTITUTIONID = T1.INSTITUTIONID AND T4.SCHEMESYMBOL
= 'CS-WS80-BPL' AND T4.ROWSTATUS = 1
LEFT OUTER JOIN
VDPSX.VTINSTIIDENT T5
ON T5.INSTITUTIONID = T1.INSTITUTIONID AND T5.SCHEMESYMBOL
= 'MIC' AND T5.ROWSTATUS = 1
WHERE T1.FOTYPE = 104
AND (T1.ROWSTATUS IS NULL
OR T1.ROWSTATUS <> 2) ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VROPP000
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.XPS_VROPP000 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.ROLETYPE,
T4.SCHEMESYMBOL ROLEOBJECTINSTI_SC,
T4.IDSYMBOL ROLEOBJECTINSTI_ID, T1.INSTITUTIONID,
T3.ROLEOBJECTINSTIID, T3.INSTIINSTIROLENO,
T3.CREATETIMESTAMP CREATETIMESTAMP_RP,
T3.UPDATETIMESTAMP UPDATETIMESTAMP_RP, T5.FOTYPE,
T5.DELETEREASONTYPE, T5.DELETIONDATE, T5.ISGLOBALREGACC,
T5.KANTONSCODETYPE, T5.MAINLANGUAGETYPE, T5.STATUSTYPE,
T5.CREATETIMESTAMP CREATETIMESTAMP_IN,
T5.UPDATETIMESTAMP UPDATETIMESTAMP_IN, T5.SHORTNAME_G,
T5.SHORTNAME_E, T5.SHORTNAME_F, T5.SHORTNAME_I,
T5.SHORTNAME_N, T5.NAME_G, T5.NAME_E, T5.NAME_F, T5.NAME_I,
T5.NAME_N
FROM VDPSX.VTINSTIIDENT T1
INNER JOIN
VDPSX.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND T2.ROWSTATUS IS
NULL
INNER JOIN
VDPSX.VTINSTIINSTIROLE T3
ON T3.ROLEPLAYERINSTIID = T2.INSTITUTIONID
INNER JOIN
VDPSX.VTINSTIIDENT T4
ON T4.INSTITUTIONID = T3.ROLEOBJECTINSTIID AND T4.
ROWSTATUS = 1
INNER JOIN
VDPSX.VTINSTITUTION T5
ON T5.INSTITUTIONID = T4.INSTITUTIONID AND T5.ROWSTATUS IS
NULL
WHERE T1.ROWSTATUS = 1 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VTRPL001
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F616617" ;
--
CREATE VIEW VDPSX.XPS_VTRPL001 AS
SELECT VDPSX.VTINSTRIDENT.IDSYMBOL,
VDPSX.VTINSTIIDENT.IDSYMBOL IDSYMBOL_BCN,
VDPSX.VTTRADINGPLACE.HASELTRONICMATCH
FROM VDPSX.VTINSTRUMENT,
VDPSX.VTINSTRIDENT,
VDPSX.VTINSTIIDENT,
VDPSX.VTLISTING,
VDPSX.VTTRADINGPLACE
WHERE VDPSX.VTINSTRIDENT.SCHEMESYMBOL = 'CH'
AND VDPSX.VTINSTRIDENT.ROWSTATUS = 1
AND VDPSX.VTINSTRIDENT.INSTRUMENTID = VDPSX.VTINSTRUMENT.
INSTRUMENTID
AND (VDPSX.VTINSTRUMENT.ROWSTATUS IS NULL
OR VDPSX.VTINSTRUMENT.ROWSTATUS <> 2)
AND VDPSX.VTLISTING.INSTRUMENTID = VDPSX.VTINSTRUMENT.
INSTRUMENTID
AND VDPSX.VTLISTING.TRADINGPLACE = VDPSX.VTINSTIIDENT.
INSTITUTIONID
AND VDPSX.VTTRADINGPLACE.INSTITUTIONID = VDPSX.VTINSTIIDENT.
INSTITUTIONID
AND VDPSX.VTINSTIIDENT.SCHEMESYMBOL = 'BCN'
AND VDPSX.VTLISTING.LISTINGSTATUSTYPE <> 9
AND VDPSX.VTLISTING.LISTINGSTATUSTYPE <> 18 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VTRUS000_V02
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F326930" ;
--
CREATE VIEW VDPSX.XPS_VTRUS000_V02 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T1.INSTITUTIONID,
T2.PORTFOLIONO, T2.ACCOUNTINGCURR,
T4.IDSYMBOL ACCOUNTINGCURR_I2,
T5.IDSYMBOL ACCOUNTINGCURR_CS, T2.INITIALMARGINRATE,
T2.TAXNUMBER, T2.NONTAXABLENUMBER, T2.YEARENDDATE,
T2.FOUNDATIONDATE, T2.NEXTSEMESTERREPORT,
T2.NONTAXABLEDATE, T2.LEGALFORMTYPE, T2.TRUSTLEGALGUIDETP,
T2.TRUSTSTATUSTYPE, T2.CREATETIMESTAMP, T2.UPDATETIMESTAMP,
T2.PREVIOUSYEARENDDT
FROM VDPSX.VTINSTIIDENT T1
INNER JOIN
VDPSX.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND (T2.ROWSTATUS
IS NULL OR T2.ROWSTATUS <> 2)
LEFT OUTER JOIN
VDPSX.VTINSTRIDENT T4
ON T4.INSTRUMENTID = T2.ACCOUNTINGCURR AND T4.SCHEMESYMBOL
= 'I2' AND T4.ROWSTATUS = 1
LEFT OUTER JOIN
VDPSX.VTINSTRIDENT T5
ON T5.INSTRUMENTID = T2.ACCOUNTINGCURR AND T5.SCHEMESYMBOL
= 'CS-WS80-WHRG' AND T5.ROWSTATUS = 1
WHERE T1.ROWSTATUS = 1 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL --
------------------------------------------------------------------------
--
}¢--- DSN.TX.CASE(WK920DDT) cre=2009-09-04 mod=2009-09-04-10.53.18 A540769 -----
------------------------------------------------------------------------
-- --
-- Database 2 Administration Tool (DB2 Admin) , program 5697-L90 --
-- --
-- ADB2GEN - Extract object definitions from the DB2 Catalog tables --
-- --
-- Title : TRG VDPS442C 0 --
-- --
-- Input prepared on : DBAF (915) Extract time : 2009-09-04 10:02 --
-- --
-- Catalog values overridden : none
-- --
-- Generate : SG=Y DB=Y TS=Y TB=Y VW=Y IX=Y SY=Y AL=Y LB=Y CM=Y FK=Y --
-- TG=Y UT=Y UF=Y SP=Y SQ=Y RO=Y --
-- Grants : SG=N DB=Y TS=Y TB=Y VW=Y SC=Y UT=Y UF=Y SP=Y SQ=Y --
-- --
------------------------------------------------------------------------
------------------------------------------------------------------------
-- --
-- ADB2GEN: Generate DDL for Table=VDPS2.VTLISTING
-- --
------------------------------------------------------------------------
--
------------------------------------------------------------------------
-- Table=VDPS2.VTLISTING In VV24A1A.VDPS185
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
CREATE TABLE VDPS2.VTLISTING
(INSTRUMENTID INTEGER NOT NULL,
LISTINGNO INTEGER NOT NULL,
PROVIDER1ID CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
PROVIDER2ID CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
PROVIDER3ID CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
CREATETIMESTAMP VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
UPDATETIMESTAMP VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
ISMAINTRADINGPLACE SMALLINT WITH DEFAULT NULL,
ISHOMETRADINGPLACE SMALLINT WITH DEFAULT NULL,
ISONLIMITEDHALT SMALLINT WITH DEFAULT NULL,
HASNOMCURRSETTLE SMALLINT WITH DEFAULT NULL,
TRADINGPLACE INTEGER WITH DEFAULT NULL,
CURRENCY INTEGER WITH DEFAULT NULL,
MARKTPRACTIDSYMBOL CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
FIRSTTRADINGDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
LASTTRADINGDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
HALTFROMDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
HALTUNTILDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
FIRSTTRDDTAFHALT VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
TRADINGSTATUSTYPE SMALLINT WITH DEFAULT NULL,
LISTINGSTATUSTYPE SMALLINT WITH DEFAULT NULL,
EXCHANGERATETYPE SMALLINT WITH DEFAULT NULL,
LISTPURPOSETYPE SMALLINT WITH DEFAULT NULL,
TRADINGSTATUSTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
LISTINGSTATUSTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
EXCHANGERATETYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
LISTPURPOSETYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_G VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_E VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_F VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_I VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_N VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_G VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_E VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_F VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_I VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_N VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
CSLISTINGCODETYPE SMALLINT WITH DEFAULT NULL,
CSLISTINGCODETYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
HASINDMARPRACTICE SMALLINT WITH DEFAULT NULL,
PRICINGUNITNO FLOAT WITH DEFAULT NULL,
PRICINGCORRFACTOR FLOAT WITH DEFAULT NULL,
NONVERSEAMOUNT FLOAT WITH DEFAULT NULL,
VOLUMEAMOUNT FLOAT WITH DEFAULT NULL,
TRADINGUNITNO FLOAT WITH DEFAULT NULL,
PRICINGUNITTYPE SMALLINT WITH DEFAULT NULL,
QUOTATIONTYPE SMALLINT WITH DEFAULT NULL,
VOLUMEUNITTYPE SMALLINT WITH DEFAULT NULL,
ACCRUEDINTCALCTP SMALLINT WITH DEFAULT NULL,
FLATREASONTYPE SMALLINT WITH DEFAULT NULL,
TRADINGUNITTYPE SMALLINT WITH DEFAULT NULL,
TRADINGRULETYPE SMALLINT WITH DEFAULT NULL,
PRICINGUNITTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
QUOTATIONTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
VOLUMEUNITTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
ACCRUEDINTCALCTPV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
FLATREASONTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
TRADINGUNITTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
TRADINGRULETYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
VALUEPRICETYPE SMALLINT WITH DEFAULT NULL,
VALUEPRICETYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
HASLISTINGDETAIL SMALLINT WITH DEFAULT NULL,
EXCHANGETYPE SMALLINT WITH DEFAULT NULL,
EXCHANGETYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
LISTINGCLASSTYPE SMALLINT WITH DEFAULT NULL,
HASREDUNDANTINFO SMALLINT WITH DEFAULT NULL,
HASBESTTRADINGVENUE SMALLINT WITH DEFAULT NULL,
ISBESTVOLUMEBESTSPREAD SMALLINT WITH DEFAULT NULL,
ISBESTVOLUME SMALLINT WITH DEFAULT NULL,
ISBESTSPREAD SMALLINT WITH DEFAULT NULL,
ISHIGHESTTICKS SMALLINT WITH DEFAULT NULL,
ISBESTVOLUMEPERCURR SMALLINT WITH DEFAULT NULL,
ISBESTSPREADPERCURR SMALLINT WITH DEFAULT NULL,
ISPRIMARYMARKETUSA SMALLINT WITH DEFAULT NULL,
ISSINGLETRADINGPLACE SMALLINT WITH DEFAULT NULL,
ISISSUERPRICEPROVIDER SMALLINT WITH DEFAULT NULL,
ISNAVINDEPENDENTSOURCE SMALLINT WITH DEFAULT NULL,
ISFUNDASSESSMENTSOURCE SMALLINT WITH DEFAULT NULL,
ISCSBESTVENUEOVERALL SMALLINT WITH DEFAULT NULL,
ISCSBESTVENUEPERCURR SMALLINT WITH DEFAULT NULL,
CSBVOVERALLUPDATEUSER CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
CSBVPERCURRUPDATEUSER CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
CSBVOVERALLUPDATETS VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
CSBVPERCURRUPDATETS VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
ISPLACEOFQUOTE SMALLINT WITH DEFAULT NULL,
ISPLACEOFLISTING SMALLINT WITH DEFAULT NULL,
ISPLACEOFTRADING SMALLINT WITH DEFAULT NULL,
TRADINGGROUPSYMBOL1 CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
TRADINGGROUPSYMBOL2 CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
TRADINGGROUPSYMBOL3 CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
TRADINGGROUPSYMBOL4 CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
TRADINGGROUPSYMBOL5 CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
LISTINGSYMBOLTK CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
LISTINGSYMBOLRT CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
LISTINGSYMBOLBB CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TRADINGPLACE_BCN CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TRADINGPLACE_RTX CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TRADINGPLACE_MIC CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TRADINGPLACE_BBX CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
CURRENCY_I1 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
CURRENCY_I2 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
CURRENCY_WS80 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TRADINGPLACE_WS80 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
PARENTTRADINGPLACE INTEGER WITH DEFAULT NULL,
PARENTTRADINGPLACE_BCN CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
PARENTTRADINGPLACE_RTX CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
PARENTTRADINGPLACE_MIC CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
PARENTTRADINGPLACE_BBX CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
PARENTTRADINGPLACE_WS80 CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
TRADINGPLACESYMBOLRIC CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
TRADINGPLACESYMBOLBBI CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
MINTRADINGUNITNO FLOAT WITH DEFAULT NULL,
REGULARTRADINGUNITNO FLOAT WITH DEFAULT NULL,
NOMINALTRADINGUNITNO FLOAT WITH DEFAULT NULL,
NMSTRADINGUNITNO FLOAT WITH DEFAULT NULL,
EMSTRADINGUNITNO FLOAT WITH DEFAULT NULL,
SMSTRADINGUNITNO FLOAT WITH DEFAULT NULL,
PTSTRADINGUNITNO FLOAT WITH DEFAULT NULL,
CONSTRAINT INSTRUMENTID
PRIMARY KEY (INSTRUMENTID,
LISTINGNO))
IN VV24A1A.VDPS185
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
--
COMMIT;
--
--
------------------------------------------------------------------------
-- Stogroup=GSMS
------------------------------------------------------------------------
--
SET CURRENT SQLID='A547484';
--
CREATE STOGROUP GSMS
VOLUMES("*")
VCAT DBAF ;
--
COMMIT;
--
------------------------------------------------------------------------
-- Database=VV24A1A
-- Index=VDPS2.VTXLISTING1 On VDPS2.VTLISTING
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
CREATE UNIQUE INDEX VDPS2.VTXLISTING1
ON VDPS2.VTLISTING
(INSTRUMENTID ASC,
LISTINGNO ASC)
USING STOGROUP GSMS
PRIQTY 720 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
--
COMMIT;
--
------------------------------------------------------------------------
-- Database=VV24A1A
-- Index=VDPS2.VTXLISTING5 On VDPS2.VTLISTING
------------------------------------------------------------------------
--
CREATE INDEX VDPS2.VTXLISTING5
ON VDPS2.VTLISTING
(EXCHANGETYPE ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
--
COMMIT;
------------------------------------------------------------------------
-- --
-- ADB2GEN: Generate DDL for Table=VDPS2.VTINSTITUTION
-- --
------------------------------------------------------------------------
--
------------------------------------------------------------------------
-- Table=VDPS2.VTINSTITUTION In VV23A1A.VDPS121
------------------------------------------------------------------------
--
CREATE TABLE VDPS2.VTINSTITUTION
(INSTITUTIONID INTEGER NOT NULL,
HISTORYID INTEGER WITH DEFAULT NULL,
INSTITUTIONTYPE SMALLINT WITH DEFAULT NULL,
ROWSTATUS SMALLINT WITH DEFAULT NULL,
VSTQUALITY SMALLINT WITH DEFAULT NULL,
REVISIONNO SMALLINT WITH DEFAULT NULL,
VSTREQUIREDQUALITY SMALLINT WITH DEFAULT NULL,
VSTMAXIMUMQUALITY SMALLINT WITH DEFAULT NULL,
ISGLOBALREGACC SMALLINT WITH DEFAULT NULL,
HASPENDINGACTVTY SMALLINT WITH DEFAULT NULL,
ISRELEVANT SMALLINT WITH DEFAULT NULL,
HASFUTUREMESSAGES SMALLINT WITH DEFAULT NULL,
FOTWIZISDISABLED SMALLINT WITH DEFAULT NULL,
ISONDB SMALLINT WITH DEFAULT NULL,
LOCATION INTEGER WITH DEFAULT NULL,
VSTNAME CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
VSTVERSION CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
CREATEUSERID CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
UPDATEUSERID CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
PROVIDER1SYMBOL CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
PROVIDER2SYMBOL CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
PROVIDER3SYMBOL CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
DELETIONDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
CREATETIMESTAMP VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
UPDATETIMESTAMP VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
STATUSTYPE SMALLINT WITH DEFAULT NULL,
DELETEREASONTYPE SMALLINT WITH DEFAULT NULL,
MAINLANGUAGETYPE SMALLINT WITH DEFAULT NULL,
FOTYPE SMALLINT WITH DEFAULT NULL,
DATASTATUSTYPE SMALLINT WITH DEFAULT NULL,
BLOCKINGCODETYPE SMALLINT WITH DEFAULT NULL,
LOGICDELETIONTYPE SMALLINT WITH DEFAULT NULL,
STATUSTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
DELETEREASONTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
MAINLANGUAGETYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
FOTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
DATASTATUSTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
BLOCKINGCODETYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
LOGICDELETIONTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_G VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_E VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_F VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_I VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
SHORTNAME_N VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
NAME_G VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
NAME_E VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
NAME_F VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
NAME_I VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
NAME_N VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
MODIFICATIONREASON VARCHAR(2000) FOR SBCS DATA
WITH DEFAULT NULL,
REMARKS VARCHAR(2000) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_G VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_E VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_F VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_I VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
DESCRIPTION_N VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
KANTONSCODETYPE SMALLINT WITH DEFAULT NULL,
KANTONSCODETYPEV VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
PORTFOLIONO INTEGER WITH DEFAULT NULL,
HASADDRESS SMALLINT WITH DEFAULT NULL,
DOMICILE INTEGER WITH DEFAULT NULL,
TAXDOMICILE INTEGER WITH DEFAULT NULL,
ADDRESSLOCATION INTEGER WITH DEFAULT NULL,
ACCOUNTINGCURR INTEGER WITH DEFAULT NULL,
INITIALMARGINRATE FLOAT WITH DEFAULT NULL,
DOMICILE_A2 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
DOMICILE_WS80 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TAXDOMICILE_A2 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TAXDOMICILE_WS80 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
INDUSTRYCS CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
INDUSTRYTKBN CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
INDUSTRYMSCI CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
INDUSTRYDJ CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
INDUSTRYFTSE CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
INDUSTRYMFIB CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
INDUSTRYMFIS CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
INDUSTRYICB CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
INDUSTRYBDF CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TAXNUMBER CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
NONTAXABLENUMBER CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
HOUSENUMBER CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
ZIP CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TELEFAXNUMBER CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
BANKACCOUNTNUMBER CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
NATIONALBANKCODE CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
FOUNDATIONDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
PREVFINYEARENDDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
ACTFINYEARENDDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
REGISTERENTRYDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
REGENTRYDELETIONDT VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
YEARENDDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
NEXTSEMESTERREPORT VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
NONTAXABLEDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
PREVIOUSYEARENDDT VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
LEGALFORMTYPE SMALLINT WITH DEFAULT NULL,
TRUSTLEGALGUIDETP SMALLINT WITH DEFAULT NULL,
TRUSTSTATUSTYPE SMALLINT WITH DEFAULT NULL,
LEGALFORMTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
TRUSTLEGALGUIDETPV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
TRUSTSTATUSTYPEV VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
CITY VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
INTERNETDOMAIN VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
STREET VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
EMAILNAME VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
PHONENUMBER VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
IBAN VARCHAR(254) FOR SBCS DATA
WITH DEFAULT NULL,
ADDRESS VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
ADDRESSDESCR VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
HEADOFFICEDESCR VARCHAR(1000) FOR SBCS DATA
WITH DEFAULT NULL,
ADDRESSLOCATION_A2 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
ADDRESSLOCATION_WS80 CHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
HASREDUNDANTINFO SMALLINT WITH DEFAULT NULL,
MDYISSUERRATING CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
MDYISSUERRATINGDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
MDYISSUERWATCHLISTSTATUSTYPE SMALLINT WITH DEFAULT NULL,
SPISSUERRATING CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
SPISSUERRATINGDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
SPISSUERWATCHLISTSTATUSTYPE SMALLINT WITH DEFAULT NULL,
FITCHISSUERRATING CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
FITCHISSUERRATINGDATE VARCHAR(30) FOR SBCS DATA
WITH DEFAULT NULL,
FITCHISSUERWATCHLISTSTATUSTYPE SMALLINT WITH DEFAULT NULL,
DOMICILE_A3 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
TAXDOMICILE_A3 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
ADDRESSLOCATION_A3 CHAR(30) FOR SBCS DATA WITH DEFAULT NULL,
DOWRITETOSHADOWTABLES SMALLINT WITH DEFAULT NULL,
CSASSEMBLYNOTIFICATIONTYPE SMALLINT WITH DEFAULT NULL,
CONSTRAINT INSTITUTIONID
PRIMARY KEY (INSTITUTIONID))
IN VV23A1A.VDPS121
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
--
COMMIT;
--
------------------------------------------------------------------------
-- Database=VV23A1A
-- Index=VDPS2.VTXINSTITUTION1 On VDPS2.VTINSTITUTION
------------------------------------------------------------------------
--
CREATE UNIQUE INDEX VDPS2.VTXINSTITUTION1
ON VDPS2.VTINSTITUTION
(INSTITUTIONID ASC)
USING STOGROUP GSMS
PRIQTY 720 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
--
COMMIT;
--
------------------------------------------------------------------------
-- Database=VV23A1A
-- Index=VDPS2.VTXINSTITUTION20 On VDPS2.VTINSTITUTION
------------------------------------------------------------------------
--
CREATE INDEX VDPS2.VTXINSTITUTION20
ON VDPS2.VTINSTITUTION
(INSTITUTIONTYPE ASC)
USING STOGROUP GSMS
PRIQTY 720 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
--
COMMIT;
--
------------------------------------------------------------------------
-- Database=VV23A1A
-- Index=VDPS2.VTXINSTITUTION5 On VDPS2.VTINSTITUTION
------------------------------------------------------------------------
--
CREATE INDEX VDPS2.VTXINSTITUTION5
ON VDPS2.VTINSTITUTION
(CREATETIMESTAMP ASC)
PADDED
USING STOGROUP GSMS
PRIQTY 720 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
--
COMMIT;
--
------------------------------------------------------------------------
-- Database=VV23A1A
-- Index=VDPS2.VTXINSTITUTION50 On VDPS2.VTINSTITUTION
------------------------------------------------------------------------
--
CREATE INDEX VDPS2.VTXINSTITUTION50
ON VDPS2.VTINSTITUTION
(STATUSTYPE ASC)
USING STOGROUP GSMS
PRIQTY 720 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
--
COMMIT;
--
------------------------------------------------------------------------
-- Database=VV23A1A
-- Index=VDPS2.VTXINSTITUTION6 On VDPS2.VTINSTITUTION
------------------------------------------------------------------------
--
CREATE INDEX VDPS2.VTXINSTITUTION6
ON VDPS2.VTINSTITUTION
(UPDATETIMESTAMP ASC)
PADDED
USING STOGROUP GSMS
PRIQTY 720 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
--
COMMIT;
--
------------------------------------------------------------------------
-- Database=VV23A1A
-- Index=VDPS2.VTXINSTITUTION7 On VDPS2.VTINSTITUTION
------------------------------------------------------------------------
--
CREATE INDEX VDPS2.VTXINSTITUTION7
ON VDPS2.VTINSTITUTION
(FOTYPE ASC)
USING STOGROUP GSMS
PRIQTY 720 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
--
COMMIT;
--
SET CURRENT SQLID='S107189';
--
CREATE ALIAS S107189.VTINSTITUTION FOR VDPS2.VTINSTITUTION ;
--
COMMIT;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.VTINSTITUTION FOR VDPS2.VTINSTITUTION ;
--
COMMIT;
--
SET CURRENT SQLID='S107189';
--
CREATE ALIAS S107189.VTLISTING FOR VDPS2.VTLISTING ;
--
COMMIT;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.VTLISTING FOR VDPS2.VTLISTING ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_SMDSTEST
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPSX';
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F578271" ;
--
CREATE VIEW VDPSX.IDS_SMDSTEST AS
SELECT T1.INSTRUMENTID, T2.CATEGORYVDPS, T2.STATUSTYPE,
T2.ROWSTATUS, T2.UPDATETIMESTAMP, T2.SYMBOLCH,
T2.SYMBOLCSFI, T2.SYMBOLISIN, T2.INSTRUMENTUPDATETIMESTAMP,
T2.INSTRUMENTCREATETIMESTAMP, T1.LISTINGSYMBOLTK,
T1.CURRENCY_WS80, T1.CURRENCY_I2, T1.CURRENCY_I1,
T1.MARKTPRACTIDSYMBOL, T1.FIRSTTRADINGDATE,
T1.LASTTRADINGDATE, T1.ISMAINTRADINGPLACE,
T1.ISHOMETRADINGPLACE, T1.ISBESTSPREAD,
T1.ISBESTSPREADPERCURR, T1.ISBESTVOLUME,
T1.ISBESTVOLUMEBESTSPREAD, T1.ISBESTVOLUMEPERCURR,
T1.ISCSBESTVENUEOVERALL, T1.ISCSBESTVENUEPERCURR,
T1.ISFUNDASSESSMENTSOURCE, T1.ISHIGHESTTICKS,
T1.ISNAVINDEPENDENTSOURCE, T1.ISPLACEOFQUOTE,
T1.ISPLACEOFLISTING, T1.ISPLACEOFTRADING,
T1.ISPRIMARYMARKETUSA, T1.ISSINGLETRADINGPLACE,
T1.LISTINGCLASSTYPE, T1.LISTINGSTATUSTYPE,
T1.PRICINGUNITNO, T1.PRICINGUNITTYPE, T1.TRADINGPLACE_BBX,
T1.TRADINGPLACE_BCN, T1.TRADINGPLACE_WS80,
T1.TRADINGPLACE_MIC, T1.TRADINGPLACE_RTX,
T1.PARENTTRADINGPLACE_BBX, T1.PARENTTRADINGPLACE_BCN,
T1.PARENTTRADINGPLACE_WS80, T1.PARENTTRADINGPLACE_MIC,
T1.PARENTTRADINGPLACE_RTX, T1.TRADINGRULETYPE,
T1.TRADINGSTATUSTYPE, T1.TRADINGUNITNO, T1.TRADINGUNITTYPE,
T1.LISTINGSYMBOLRT, T1.LISTINGSYMBOLBB,
T3.CSLISTINGCODETYPE, T3.CSMAINTRADPLACE_BBX,
T3.CSMAINTRADPLACE_BCN, T3.CSMAINTRADPLACE_WS80,
T3.CSMAINTRADPLACE_MIC, T3.CSMAINTRADPLACE_RTX,
T4.IDSYMBOL IDSYMBOL_TKM, T4.SCHEMESYMBOL SCHEMESYMBOL_TKM,
T5.IDSYMBOL IDSYMBOL_TKL, T5.SCHEMESYMBOL SCHEMESYMBOL_TKL
FROM VDPS2.VTLISTING T1
INNER JOIN
VDPS2.VTINSTRFLATSYMBOLS T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTRFLATDATA T3
ON T3.INSTRUMENTID = T2.INSTRUMENTID
LEFT OUTER JOIN
VDPS2.VTLISTINGIDENT T4
ON T4.INSTRUMENTID = T1.INSTRUMENTID AND T4.LISTINGNO = T1.
LISTINGNO AND T4.SCHEMESYMBOL = 'TKM'
LEFT OUTER JOIN
VDPS2.VTLISTINGIDENT T5
ON T5.INSTRUMENTID = T1.INSTRUMENTID AND T5.LISTINGNO = T1.
LISTINGNO AND T5.SCHEMESYMBOL = 'TKL' ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.SMDS_RA15_V01
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F273764" ;
--
CREATE VIEW VDPSX.SMDS_RA15_V01 AS
SELECT '15' RECORD_TYPE, T1.SYMBOLCH TKKEY, T1.SYMBOLISIN ISIN,
T6.CURRENCY_I2 CURRENCY_CS,
T6.TRADINGPLACE_BCN EXCHANGE_CODE,
T6.LISTINGSYMBOLTK TICKER,
SUBSTR(T5.SHORTNAME_G, 1, 20) SHORTNAME_G,
SUBSTR(T5.SHORTNAME_E, 1, 20) SHORTNAME_E,
SUBSTR(T5.SHORTNAME_I, 1, 20) SHORTNAME_I,
SUBSTR(T5.SHORTNAME_F, 1, 20) SHORTNAME_F,
SUBSTR(T5.SHORTNAME_N, 1, 20) SHORTNAME_N,
T6.CURRENCY LISTING_CURRENCY,
SUBSTR(T6.SHORTNAME_G, 1, 20) LISTINGNAME_G,
SUBSTR(T6.SHORTNAME_E, 1, 20) LISTINGNAME_E,
SUBSTR(T6.SHORTNAME_I, 1, 20) LISTINGNAME_I,
SUBSTR(T6.SHORTNAME_F, 1, 20) LISTINGNAME_F,
SUBSTR(T6.SHORTNAME_N, 1, 20) LISTINGNAME_N,
T6.MARKTPRACTIDSYMBOL, T6.FIRSTTRADINGDATE,
T6.LASTTRADINGDATE, T6.ISMAINTRADINGPLACE,
T6.ISHOMETRADINGPLACE, T6.CREATETIMESTAMP,
T6.UPDATETIMESTAMP, T6.LISTINGSTATUSTYPE,
T8.INSTITUTIONID INSTRSERVICEID, T8.HASPHYSICALTRADING,
T8.HASELTRONICTRADING, T8.HASELTRONICMATCH
FROM VDPS2.VTLISTING T6
INNER JOIN
VDPS2.VTINSTRFLATSYMBOLS T1
ON T1.INSTRUMENTID = T6.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND T2.ROWSTATUS IS
NULL AND T2.ISRELEVANT = 1
INNER JOIN
VDPS2.VTINSTITUTION T5
ON T5.INSTITUTIONID = T6.TRADINGPLACE AND T5.ROWSTATUS IS
NULL
INNER JOIN
VDPS2.VTTRADINGPLACE T8
ON T8.INSTITUTIONID = T6.TRADINGPLACE
WHERE T1.ROWSTATUS = 1
AND T6.LISTINGSTATUSTYPE <> 9
AND T6.LISTINGSTATUSTYPE <> 18 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.SMDS_RA15_V02
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.SMDS_RA15_V02 AS
SELECT DISTINCT '15' RECORD_TYPE, T1.SYMBOLCH TKKEY,
T1.SYMBOLISIN ISIN, T6.CURRENCY_I2 CURRENCY_CS,
T6.TRADINGPLACE_BCN EXCHANGE_CODE,
T6.LISTINGSYMBOLTK TICKER, T5.SHORTNAME_G SHORTNAME_G,
T5.SHORTNAME_E SHORTNAME_E, T5.SHORTNAME_I SHORTNAME_I,
T5.SHORTNAME_F SHORTNAME_F, T5.SHORTNAME_N SHORTNAME_N,
T6.CURRENCY LISTING_CURRENCY, T6.SHORTNAME_G LISTINGNAME_G,
T6.SHORTNAME_E LISTINGNAME_E, T6.SHORTNAME_I LISTINGNAME_I,
T6.SHORTNAME_F LISTINGNAME_F, T6.SHORTNAME_N LISTINGNAME_N,
T6.MARKTPRACTIDSYMBOL, T6.FIRSTTRADINGDATE,
T6.LASTTRADINGDATE, T6.ISMAINTRADINGPLACE,
T6.ISHOMETRADINGPLACE, T6.CREATETIMESTAMP,
T6.UPDATETIMESTAMP, T6.LISTINGSTATUSTYPE,
T8.INSTITUTIONID INSTRSERVICEID, T8.HASPHYSICALTRADING,
T8.HASELTRONICTRADING, T8.HASELTRONICMATCH
FROM VDPS2.VTLISTING T6
INNER JOIN
VDPS2.VTINSTRFLATSYMBOLS T1
ON T1.INSTRUMENTID = T6.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND T2.ROWSTATUS IS
NULL AND T2.ISRELEVANT = 1
INNER JOIN
VDPS2.VTINSTITUTION T5
ON T5.INSTITUTIONID = T6.TRADINGPLACE AND T5.ROWSTATUS IS
NULL
INNER JOIN
VDPS2.VTTRADINGPLACE T8
ON T8.INSTITUTIONID = T6.TRADINGPLACE
WHERE T1.ROWSTATUS = 1
AND T6.LISTINGSTATUSTYPE NOT IN(9, 18) ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VLIID002_V05
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.XPS_VLIID002_V05 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T1.INSTRUMENTID,
T3.CREATETIMESTAMP, T3.UPDATETIMESTAMP, T3.LISTINGNO,
T6.LISTINGIDENTNO, T3.LISTINGSTATUSTYPE,
T3.TRADINGSTATUSTYPE, T3.FIRSTTRADINGDATE,
T3.LASTTRADINGDATE, T3.ISHOMETRADINGPLACE,
T3.ISMAINTRADINGPLACE TK_HAUPTBOEPLATZ,
T7.ISSTEERINGFLAG4 CS_HAUPTBOEPLATZ,
T3.ISCSBESTVENUEOVERALL, T3.ISCSBESTVENUEPERCURR,
T3.TRADINGPLACE, T3.CURRENCY, T8.IDSYMBOL CURRENCY_CS,
T4.IDSYMBOL IDSYMBOL_BCN, T5.DOMICILE,
T5.DOMICILE_WS80 DOMICILE_CS,
T6.SCHEMESYMBOL SCHEME_TICKER, T6.IDSYMBOL IDSYMBOL_TICKER,
T6.VALIDFROMDATE, T6.VALIDUNTILDATE,
T3.DESCRIPTION_E EXTERNTRADINGCURR
FROM VDPS.VTINSTRIDENT T1
INNER JOIN
VDPS.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPS.VTLISTING T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS.VTINSTIIDENT T4
ON T4.INSTITUTIONID = T3.TRADINGPLACE AND T4.SCHEMESYMBOL
= 'BCN' AND T4.ROWSTATUS = 1
INNER JOIN
VDPS.VTINSTITUTION T5
ON T5.INSTITUTIONID = T3.TRADINGPLACE AND (T5.ROWSTATUS IS
NULL OR T5.ROWSTATUS <> 2)
LEFT OUTER JOIN
VDPS.VTLISTINGIDENT T6
ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
LISTINGNO AND T6.SCHEMESYMBOL IN('TKH', 'RIC', 'BBI')
LEFT OUTER JOIN
VDPS.CTLISTING T7
ON T7.INSTRUMENTID = T3.INSTRUMENTID AND T7.LISTINGNO = T3.
LISTINGNO AND T7.MANDATOR = 1
LEFT OUTER JOIN
VDPS.VTINSTRIDENT T8
ON T8.INSTRUMENTID = T3.CURRENCY AND T8.SCHEMESYMBOL =
'CS-WS80-WHRG' AND T8.ROWSTATUS = 1
WHERE T1.ROWSTATUS = 1
AND T3.LISTINGSTATUSTYPE <> 9
AND T3.LISTINGSTATUSTYPE <> 18 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VNTP002
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F589435" ;
--
CREATE VIEW VDPSX.XPS_VNTP002 AS SELECT CAST(FS.SYMBOLCH AS CHAR( 9))
VALOR, CAST(';' AS CHAR( 1)) DL01 , CAST(CASE WHEN FS.SYMBOLISIN IS NOT
NULL THEN FS.SYMBOLISIN ELSE '?' END AS CHAR ( 12)) ISIN, CAST(';' AS C
HAR( 1)) DL02, CAST(CASE WHEN Z.MAINLANGUAGETYPE = 1 THEN Z.NAME_G WHE
N Z.MAINLANGUAGETYPE = 2 THEN Z.NAME_F WHEN Z.MAINLANGUAGETYPE = 3 THEN
Z.NAME_I WHEN Z.MAINLANGUAGETYPE = 4 THEN Z.NAME_E WHEN Z.MAINLANGUAG
ETYPE = 5 THEN Z.NAME_N WHEN Z.MAINLANGUAGETYPE = 9999 THEN '?' ELSE '?
' END AS CHAR( 254)) ISSUER_NAME, CAST(';' AS CHAR( 1)) DL03, CAST(CASE
WHEN A.MAINLANGUAGETYPE = 1 THEN FD.PREPARTICLE_G WHEN A.MAINLANGUAGE
TYPE = 2 THEN FD.PREPARTICLE_F WHEN A.MAINLANGUAGETYPE = 3 THEN FD.PREP
ARTICLE_I WHEN A.MAINLANGUAGETYPE = 4 THEN FD.PREPARTICLE_E WHEN A.MAI
NLANGUAGETYPE = 5 THEN FD.PREPARTICLE_N WHEN A.MAINLANGUAGETYPE = 9999
THEN '?' ELSE '?' END AS CHAR( 254)) INSTR_PREPART, CAST(';' AS CHAR( 1
)) DL04, CAST(CASE WHEN A.MAINLANGUAGETYPE = 1 THEN FD.POSTPARTICLE_G
WHEN FD.POSTPARTICLE_G IS NULL THEN '?' WHEN A.MAINLANGUAGETYPE = 2 THE
N FD.POSTPARTICLE_F WHEN FD.POSTPARTICLE_F IS NULL THEN '?' WHEN A.MAI
NLANGUAGETYPE = 3 THEN FD.POSTPARTICLE_I WHEN FD.POSTPARTICLE_I IS NULL
THEN '?' WHEN A.MAINLANGUAGETYPE = 4 THEN FD.POSTPARTICLE_E WHEN FD.P
OSTPARTICLE_E IS NULL THEN '?' WHEN A.MAINLANGUAGETYPE = 5 THEN FD.POST
PARTICLE_N WHEN FD.POSTPARTICLE_N IS NULL THEN '?' WHEN A.MAINLANGUAGE
TYPE = 9999 THEN '?' ELSE '?' END AS CHAR( 254)) INSTR_POSTPART, CAST('
;' AS CHAR( 1)) DL05, CAST(CASE WHEN A.MAINLANGUAGETYPE IS NOT NULL THE
N CAST(A.MAINLANGUAGETYPE AS CHAR( 04)) ELSE '?' END AS CHAR( 4)) MAINL
ANGUAGETYPE, CAST(';' AS CHAR ( 1)) DL06, CAST(CASE WHEN FD.CSSTATUSTYP
E IS NOT NULL THEN CAST(FD.CSSTATUSTYPE AS CHAR( 04) ) ELSE '?' END AS C
HAR( 4)) CSSTATUSTYPE, CAST(';' AS CHAR( 1)) DL07, CAST(CASE WHEN FD.S
TATUSTYPE IS NOT NULL THEN CAST(FD.STATUSTYPE AS CHAR( 04)) ELSE '?' EN
D AS CHAR( 4)) TKSTATUSTYPE, CAST(';' AS CHAR( 1)) DL08, CAST(CASE WHE
N FD.ISINTERNAL = 1 THEN FD.ISINTERNAL ELSE 0 END AS CHAR( 1)) CSGIV , C
AST(';' AS CHAR( 1)) DL09, CAST(CASE WHEN FS.CATEGORYCSGMS IS NOT NULL
THEN CAST(FS.CATEGORYCSGMS AS CHAR( 30)) ELSE '?' END AS CHAR( 30)) CSG
MS, CAST(';' AS CHAR( 1)) DL10, CAST (CASE WHEN FD.CSFUNDTYPE IS NOT NU
LL THEN CAST(FD.CSFUNDTYPE AS CHAR( 4)) ELSE '?' END AS CHAR( 4)) CSFUN
DTYPE, CAST(';' AS CHAR( 1)) DL11, CAST( CASE WHEN FD.CREDITWORTHINESST
P IS NOT NULL THEN CAST(FD.CREDITWORTHINESSTP AS CHAR( 4)) ELSE '?' END
AS CHAR( 4)) BONITAETSCODE, CAST(';' AS CHAR ( 1)) DL12, CAST('1' AS CH
AR( 1)) MANDATOR, CAST(';' AS CHAR( 1)) DL13 , CAST(CASE WHEN H.NAME_E
IS NOT NULL THEN H.NAME_E WHEN H.NAME_G IS NOT NULL THEN H.NAME_G WHEN
H.NAME_F IS NOT NULL THEN H.NAME_F WHEN H.NAME_I IS NOT NULL THEN H.NA
ME_I WHEN H.NAME_N IS NOT NULL THEN H.NAME_N ELSE '?' END AS CHAR( 254)
) MAINDEPOS_NAME, CAST(';' AS CHAR( 1)) DL14, CAST(CASE WHEN Z.YEAREND
DATE IS NOT NULL THEN CAST(Z.YEARENDDATE AS CHAR( 30)) ELSE '?' END AS
CHAR( 30)) YEARENDDATE, CAST(';' AS CHAR( 1)) DL15, CAST(CASE WHEN L.I
NVENTORYFREQUENCY IS NOT NULL THEN CAST(L.INVENTORYFREQUENCY AS CHAR( 1
0)) ELSE '?' END AS CHAR( 10)) INVENTORYFREQUENCY, CAST(';' AS CHAR( 1)
) DL16, CAST(CASE WHEN L.INVENTORYFRUNITTP IS NOT NULL THEN CAST(L.INVE
NTORYFRUNITTP AS CHAR( 4)) ELSE '?' END AS CHAR( 4)) INVENTORYFRUNITTP,
CAST(';' AS CHAR ( 1)) DL17, CAST(CASE WHEN L.NAVPUBLICATDESCR IS NOT
NULL THEN CAST(L.NAVPUBLICATDESCR AS CHAR( 254)) ELSE '?' END AS CHAR(
254)) NAVPUBLICATDESCR, CAST(';' AS CHAR( 1)) DL18, CAST(CASE WHEN M.T
RADINGPLACE_BCN IS NOT NULL THEN CAST(M.TRADINGPLACE_BCN AS CHAR( 30))
ELSE '?' END AS CHAR( 30)) BCN, CAST(';' AS CHAR( 1)) DL19, CAST(CASE
WHEN M.CURRENCY_I2 IS NOT NULL THEN CAST(M.CURRENCY_I2 AS CHAR( 30)) EL
SE '?' END AS CHAR( 30)) IDSYMBOL_I2, CAST(';' AS CHAR( 1)) DL20, CAST(
CASE WHEN P.ISSTEERINGFLAG4 = 1 THEN '1' WHEN P.ISSTEERINGFLAG4 = 0 TH
EN '0' WHEN P.ISSTEERINGFLAG4 IS NULL THEN '?' ELSE '?' END AS CHAR( 1)
) ISSTEERINGFLAG4, CAST(';' AS CHAR( 1)) DL21, FD.INSTRUMENTID, CAST(';
' AS CHAR( 1)) DL22 FROM VDPS2.VTINSTRFLATDATA FD INNER JOIN VDPS2. VTI
NSTRUMENT A ON FD.INSTRUMENTID = A.INSTRUMENTID AND FD.CSFUNDTYPE IN (2,
3, 6, 10, 11, 12, 14, 18, 23, 27, 28, 29, 30, 31, 32, 33, 34) AND FD.C
SSTATUSTYPE IN(4, 6, 7) INNER JOIN VDPS2.VTINSTITUTION Z ON FD. ISSUER =
Z.INSTITUTIONID INNER JOIN VDPS2.VTINSTITUTION H ON FD. MAINDEPOSITARY
= H.INSTITUTIONID INNER JOIN VDPS2.VTINSTRFLATSYMBOLS FS ON FD.INSTRUME
NTID = FS.INSTRUMENTID AND FS.ROWSTATUS = 1 INNER JOIN VDPS2.CTINSTRB42
STOCK I ON I.INSTRUMENTID = FD.INSTRUMENTID AND I. HOLDINGSTOTAL = 99999
9 AND I.MANDATOR = 1 INNER JOIN VDPS2.VTLISTING M ON M.INSTRUMENTID = F
D.INSTRUMENTID AND M.LISTINGSTATUSTYPE <> 9 AND M. LISTINGSTATUSTYPE <>
18 LEFT OUTER JOIN VDPS2.CTLISTING P ON P. INSTRUMENTID = M.INSTRUMENTID
AND M.LISTINGNO = P.LISTINGNO AND P. MANDATOR = 1 LEFT OUTER JOIN VDPS2
.VTTRUSTDETAIL L ON L.INSTRUMENTID = FD.INSTRUMENTID ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.IDS_SMDSA101
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
--
CREATE VIEW VDPS2.IDS_SMDSA101 AS
SELECT T1.INSTRUMENTID, T1.SYMBOLCH, T1.SYMBOLCSFI, T1.SYMBOLISIN,
T1.CSSTATUSTYPE, T1.CATEGORYVDPS, T1.CATEGORYCSGTA,
T1.CATEGORYEUZS, T2.STATUSTYPE, T2.NAME45_G, T2.NAME45_E,
T2.NAME45_F, T2.NAME45_I, T2.NAME45_N, T2.SHORTNAME_G,
T2.SHORTNAME_E, T2.SHORTNAME_F, T2.SHORTNAME_I,
T2.SHORTNAME_N, T2.ISSUER_GK, T2.EFFINTERESTRATE,
T2.BORROWERCATTYPE, T2.CSMAINTRADPLACE_WS80,
T2.CSMAINTRADPLACE_BCN, T2.CSMAINTRADPLACE_RTX,
T2.CSMAINTRADPLACE_BBX, T2.MATURITYDATE, T2.NOMINALAMOUNT,
T2.NOMINALCURR_WS80, T2.NOMINALCURR_I1, T2.NOMINALCURR_I2,
T2.BORROWINGLIMITTYPE, T2.CSFUNDTYPE, T2.CSLISTINGCODETYPE,
T2.ISCSMIFIDCOMPLEX, T2.EXPIRATIONDATE,
T2.HASMULTIUNDERLYERS, T2.HASWITHHOLDINGTAX,
T2.INTERESTTYPE, T2.ISREDEEMABLE, T2.LIQUIDATIONRIGHTTYPE,
T2.REGISTRATIONTYPE, T2.CSUNITTYPE,
T2.MOSTLIQUIDMARKETLOCATION_WS80,
T2.MOSTLIQUIDMARKETLOCATION_A3,
T2.MOSTLIQUIDMARKETLOCATION_A2, T2.EXPIRATIONTYPE,
T3.TRADINGPLACE, T4.ISSET02, T5.IDSYMBOL SYMBOLCSGIV,
T1.INSTRUMENTCREATETIMESTAMP, T1.INSTRUMENTUPDATETIMESTAMP
FROM VDPS2.VTINSTRFLATSYMBOLS T1
INNER JOIN
VDPS2.VTINSTRFLATDATA T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPS2.VTLISTING T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID AND T3.
ISMAINTRADINGPLACE = 1
LEFT OUTER JOIN
VDPS2.CTCODESET T4
ON T4.INSTRUMENTID = T1.INSTRUMENTID AND T4.CODETYPE = 7
LEFT OUTER JOIN
VDPS2.VTINSTRINGROUP T5
ON T5.INSTRUMENTID = T1.INSTRUMENTID AND T5.SCHEMESYMBOL =
'CSGIV' ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDSA101 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDSA101 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDSA101 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDSA101 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDSA101 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.IDS_SMDSA101 FOR VDPS2.IDS_SMDSA101 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.IDS_SMDSA104
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.IDS_SMDSA104 AS
SELECT T1.INSTITUTIONID, T2.IDSYMBOL SYMBOLGK, T1.INDUSTRYCS,
T1.INDUSTRYTKBN, T1.INDUSTRYMSCI, T1.INDUSTRYBDF,
T1.INDUSTRYICB, T1.INDUSTRYMFIB, T1.INDUSTRYMFIS,
T3.IDSYMBOL SYMBOLUIC, T4.IDSYMBOL SYMBOLUKCN,
T5.IDSYMBOL SYMBOLOENB, T6.IDSYMBOL SYMBOLCVR,
T7.IDSYMBOL SYMBOLTVABE, T8.IDSYMBOL SYMBOLRCS,
T9.IDSYMBOL SYMBOLDUNS, T1.DOMICILE_A2, T1.DOMICILE_WS80,
T1.DOMICILE_A3, T10.IDSYMBOL DOMICILE_ISON,
T11.IDSYMBOL DOMICILE_TKN, T12.IDSYMBOL DOMICILE_TKR,
T1.CREATETIMESTAMP, T1.UPDATETIMESTAMP
FROM VDPS2.VTINSTITUTION T1
INNER JOIN
VDPS2.VTINSTIIDENT T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND T2.SCHEMESYMBOL
= 'GK'
LEFT OUTER JOIN
VDPS2.VTINSTIIDENT T3
ON T3.INSTITUTIONID = T1.INSTITUTIONID AND T3.SCHEMESYMBOL
= 'UIC'
LEFT OUTER JOIN
VDPS2.VTINSTIIDENT T4
ON T4.INSTITUTIONID = T1.INSTITUTIONID AND T4.SCHEMESYMBOL
= 'UKCN'
LEFT OUTER JOIN
VDPS2.VTINSTIIDENT T5
ON T5.INSTITUTIONID = T1.INSTITUTIONID AND T5.SCHEMESYMBOL
= 'OENB'
LEFT OUTER JOIN
VDPS2.VTINSTIIDENT T6
ON T6.INSTITUTIONID = T1.INSTITUTIONID AND T6.SCHEMESYMBOL
= 'CVR'
LEFT OUTER JOIN
VDPS2.VTINSTIIDENT T7
ON T7.INSTITUTIONID = T1.INSTITUTIONID AND T7.SCHEMESYMBOL
= 'TVABE'
LEFT OUTER JOIN
VDPS2.VTINSTIIDENT T8
ON T8.INSTITUTIONID = T1.INSTITUTIONID AND T8.SCHEMESYMBOL
= 'RCS'
LEFT OUTER JOIN
VDPS2.VTINSTIIDENT T9
ON T9.INSTITUTIONID = T1.INSTITUTIONID AND T9.SCHEMESYMBOL
= 'DUNS'
LEFT OUTER JOIN
VDPS2.VTGEOUNITIDENT T10
ON T10.GEOUNITID = T1.DOMICILE AND T10.SCHEMESYMBOL =
'ISON'
LEFT OUTER JOIN
VDPS2.VTGEOUNITIDENT T11
ON T11.GEOUNITID = T1.DOMICILE AND T11.SCHEMESYMBOL = 'TKN'
LEFT OUTER JOIN
VDPS2.VTGEOUNITIDENT T12
ON T12.GEOUNITID = T1.DOMICILE AND T12.SCHEMESYMBOL = 'TKR' ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDSA104 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDSA104 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDSA104 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.IDS_SMDSA104 FOR VDPS2.IDS_SMDSA104 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.IDS_SMDSA106
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.IDS_SMDSA106 AS
SELECT T1.INSTITUTIONID, T1.SYMBOLGK, T1.SYMBOLSP, T1.SYMBOLMDY,
T1.SYMBOLIBEI, T1.CATEGORYVDPS, T1.STATUSTYPE,
T1.ROWSTATUS, T2.NAME_G, T2.NAME_E, T2.NAME_F, T2.NAME_I,
T2.NAME_N, T2.SHORTNAME_G, T2.SHORTNAME_E, T2.SHORTNAME_F,
T2.SHORTNAME_I, T2.SHORTNAME_N, T2.INDUSTRYCS,
T2.DOMICILE_A3 DOMICILE_A3, T2.DOMICILE_WS80 DOMICILE_CS,
T2.DOMICILE_A2 DOMICILE_ISO, T2.LEGALFORMTYPE,
T2.PREVFINYEARENDDATE, T2.REGISTERENTRYDATE,
T2.REGENTRYDELETIONDT, T2.MAINLANGUAGETYPE,
T2.INTERNETDOMAIN, T2.CREATETIMESTAMP, T2.UPDATETIMESTAMP
FROM VDPS2.VTINSTIFLATSYMBOLS T1
INNER JOIN
VDPS2.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDSA106 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDSA106 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.IDS_SMDSA106 FOR VDPS2.IDS_SMDSA106 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.IDS_SMDSA107
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.IDS_SMDSA107 AS
SELECT T1.INSTITUTIONID, T1.SYMBOLGK, T2.NAME_G, T2.NAME_E,
T2.NAME_F, T2.NAME_I, T2.NAME_N, T2.CREATETIMESTAMP,
T2.UPDATETIMESTAMP
FROM VDPS2.VTINSTIFLATSYMBOLS T1
INNER JOIN
VDPS2.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDSA107 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDSA107 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.IDS_SMDSA107 FOR VDPS2.IDS_SMDSA107 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.IDS_SMDSA112
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.IDS_SMDSA112 AS
SELECT T1.INSTITUTIONID, T1.SYMBOLGK, T2.IDSYMBOL IDSYMBOL_RATING,
T2.SCHEMESYMBOL SCHEME_RATING, T2.RATINGDATE,
T2.WATCHLISTSTATTYPE, T2.RATINGSTATUSTYPE, T2.REVIEWDATE,
T2.SOURCETYPE, T2.UNIQUENUMBER, T3.CREATETIMESTAMP,
T3.UPDATETIMESTAMP
FROM VDPS2.VTINSTIFLATSYMBOLS T1
INNER JOIN
(SELECT TA.INSTITUTIONID, TA.IDSYMBOL, TA.SCHEMESYMBOL,
TA.RATINGDATE, TA.WATCHLISTSTATTYPE,
TA.RATINGSTATUSTYPE, TA.REVIEWDATE, TA.SOURCETYPE,
TA.UNIQUENUMBER
FROM VDPS2.VTINSTIRATING TA
WHERE TA.SCHEMESYMBOL = 'CSIB'
AND TA.RATINGDATE = (
SELECT MAX(TC.RATINGDATE)
FROM VDPS2.VTINSTIRATING TC
WHERE TC.INSTITUTIONID = TA.INSTITUTIONID
AND TC.SCHEMESYMBOL = 'CSIB')) T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID
INNER JOIN
VDPS2.VTINSTITUTION T3
ON T3.INSTITUTIONID = T1.INSTITUTIONID ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDSA112 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDSA112 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDSA112 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.IDS_SMDSA112 FOR VDPS2.IDS_SMDSA112 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.IDS_SMDSA114
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.IDS_SMDSA114 AS
SELECT T1.INSTITUTIONID, T1.SYMBOLGK, T2.IDSYMBOL IDSYMBOL_RATING,
T2.SCHEMESYMBOL SCHEME_RATING, T2.RATINGDATE,
T2.WATCHLISTSTATTYPE, T2.RATINGSTATUSTYPE, T2.REVIEWDATE,
T2.SOURCETYPE, T2.UNIQUENUMBER, T4.CREATETIMESTAMP,
T4.UPDATETIMESTAMP
FROM VDPS2.VTINSTIFLATSYMBOLS T1
INNER JOIN
(SELECT TA.INSTITUTIONID, TA.IDSYMBOL, TA.SCHEMESYMBOL,
TA.RATINGDATE, TA.WATCHLISTSTATTYPE,
TA.RATINGSTATUSTYPE, TA.REVIEWDATE, TA.SOURCETYPE,
TA.UNIQUENUMBER
FROM VDPS2.VTINSTIRATING TA
WHERE TA.SCHEMESYMBOL IN(
SELECT DISTINCT TB.SCHEMESYMBOL
FROM VDPS2.VTINSTIRATING TB
WHERE TA.INSTITUTIONID = TB.INSTITUTIONID)
AND TA.RATINGDATE = (
SELECT MAX(TC.RATINGDATE)
FROM VDPS2.VTINSTIRATING TC
WHERE TC.INSTITUTIONID = TA.INSTITUTIONID
AND TC.SCHEMESYMBOL = TA.SCHEMESYMBOL
GROUP BY TC.SCHEMESYMBOL)) T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID
INNER JOIN
VDPS2.VTRATINGSCHEME T3
ON T3.SCHEMESYMBOL = T2.SCHEMESYMBOL AND T3.INSTITUTIONID
= 10052339
INNER JOIN
VDPS2.VTINSTITUTION T4
ON T4.INSTITUTIONID = T1.INSTITUTIONID ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDSA114 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDSA114 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDSA114 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDSA114 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.IDS_SMDSA114 FOR VDPS2.IDS_SMDSA114 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.IDS_SMDSA116
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.IDS_SMDSA116 AS
SELECT T1.INSTITUTIONID, T1.SYMBOLGK, T2.IDSYMBOL IDSYMBOL_RATING,
T2.SCHEMESYMBOL SCHEME_RATING, T2.RATINGDATE,
T2.WATCHLISTSTATTYPE, T2.RATINGSTATUSTYPE, T2.REVIEWDATE,
T2.SOURCETYPE, T2.UNIQUENUMBER, T4.CREATETIMESTAMP,
T4.UPDATETIMESTAMP
FROM VDPS2.VTINSTIFLATSYMBOLS T1
INNER JOIN
(SELECT TA.INSTITUTIONID, TA.IDSYMBOL, TA.SCHEMESYMBOL,
TA.RATINGDATE, TA.WATCHLISTSTATTYPE,
TA.RATINGSTATUSTYPE, TA.REVIEWDATE, TA.SOURCETYPE,
TA.UNIQUENUMBER
FROM VDPS2.VTINSTIRATING TA
WHERE TA.SCHEMESYMBOL IN(
SELECT DISTINCT TB.SCHEMESYMBOL
FROM VDPS2.VTINSTIRATING TB
WHERE TA.INSTITUTIONID = TB.INSTITUTIONID)
AND TA.RATINGDATE = (
SELECT MAX(TC.RATINGDATE)
FROM VDPS2.VTINSTIRATING TC
WHERE TC.INSTITUTIONID = TA.INSTITUTIONID
AND TC.SCHEMESYMBOL = TA.SCHEMESYMBOL
GROUP BY TC.SCHEMESYMBOL)) T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID
INNER JOIN
VDPS2.VTRATINGSCHEME T3
ON T3.SCHEMESYMBOL = T2.SCHEMESYMBOL AND T3.INSTITUTIONID
= 10052338
INNER JOIN
VDPS2.VTINSTITUTION T4
ON T4.INSTITUTIONID = T1.INSTITUTIONID ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDSA116 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDSA116 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDSA116 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDSA116 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.IDS_SMDSA116 FOR VDPS2.IDS_SMDSA116 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.IDS_SMDS1501
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.IDS_SMDS1501 AS
SELECT T1.INSTRUMENTID, T2.SYMBOLCH, T2.SYMBOLCSFI, T2.SYMBOLISIN,
T2.CATEGORYVDPS, T2.STATUSTYPE, T2.ROWSTATUS,
T2.UPDATETIMESTAMP, T2.CREATETIMESTAMP,
T2.INSTRUMENTUPDATETIMESTAMP, T2.INSTRUMENTCREATETIMESTAMP,
T1.LISTINGSYMBOLTK, T1.CURRENCY_WS80, T1.CURRENCY_I2,
T1.CURRENCY_I1, T1.MARKTPRACTIDSYMBOL, T1.FIRSTTRADINGDATE,
T1.LASTTRADINGDATE, T1.ISMAINTRADINGPLACE,
T1.ISHOMETRADINGPLACE, T1.ISBESTSPREAD,
T1.ISBESTSPREADPERCURR, T1.ISBESTVOLUME,
T1.ISBESTVOLUMEBESTSPREAD, T1.ISBESTVOLUMEPERCURR,
T1.ISCSBESTVENUEOVERALL, T1.ISCSBESTVENUEPERCURR,
T1.ISFUNDASSESSMENTSOURCE, T1.ISHIGHESTTICKS,
T1.ISNAVINDEPENDENTSOURCE, T1.ISPLACEOFQUOTE,
T1.ISPLACEOFLISTING, T1.ISPLACEOFTRADING,
T1.ISPRIMARYMARKETUSA, T1.ISSINGLETRADINGPLACE,
T1.LISTINGCLASSTYPE, T1.LISTINGSTATUSTYPE,
T1.PRICINGUNITNO, T1.PRICINGUNITTYPE, T1.TRADINGPLACE_BBX,
T1.TRADINGPLACE_BCN, T1.TRADINGPLACE_WS80,
T1.TRADINGPLACE_MIC, T1.TRADINGPLACE_RTX,
T1.PARENTTRADINGPLACE_BBX, T1.PARENTTRADINGPLACE_BCN,
T1.PARENTTRADINGPLACE_WS80, T1.PARENTTRADINGPLACE_MIC,
T1.PARENTTRADINGPLACE_RTX, T1.TRADINGSTATUSTYPE,
T1.TRADINGUNITTYPE, T1.LISTINGSYMBOLRT, T1.LISTINGSYMBOLBB,
T1.MINTRADINGUNITNO, T1.REGULARTRADINGUNITNO,
T1.NOMINALTRADINGUNITNO, T1.NMSTRADINGUNITNO,
T1.EMSTRADINGUNITNO, T1.SMSTRADINGUNITNO,
T1.PTSTRADINGUNITNO, T1.LISTINGNO, T3.CSLISTINGCODETYPE,
T3.CSMAINTRADPLACE_BBX, T3.CSMAINTRADPLACE_BCN,
T3.CSMAINTRADPLACE_WS80, T3.CSMAINTRADPLACE_MIC,
T3.CSMAINTRADPLACE_RTX, T4.IDSYMBOL IDSYMBOL_TKM,
T4.SCHEMESYMBOL SCHEMESYMBOL_TKM, T5.IDSYMBOL IDSYMBOL_TKL,
T5.SCHEMESYMBOL SCHEMESYMBOL_TKL, T6.IDSYMBOL IDSYMBOL_TKE,
T6.SCHEMESYMBOL SCHEMESYMBOL_TKE
FROM VDPS2.VTLISTING T1
INNER JOIN
VDPS2.VTINSTRFLATSYMBOLS T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTRFLATDATA T3
ON T3.INSTRUMENTID = T2.INSTRUMENTID
LEFT OUTER JOIN
VDPS2.VTLISTINGIDENT T4
ON T4.INSTRUMENTID = T1.INSTRUMENTID AND T4.LISTINGNO = T1.
LISTINGNO AND T4.SCHEMESYMBOL = 'TKM'
LEFT OUTER JOIN
VDPS2.VTLISTINGIDENT T5
ON T5.INSTRUMENTID = T1.INSTRUMENTID AND T5.LISTINGNO = T1.
LISTINGNO AND T5.SCHEMESYMBOL = 'TKL'
LEFT OUTER JOIN
VDPS2.VTLISTINGIDENT T6
ON T6.INSTRUMENTID = T1.INSTRUMENTID AND T6.LISTINGNO = T1.
LISTINGNO AND T6.SCHEMESYMBOL = 'TKE' ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDS1501 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDS1501 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDS1501 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDS1501 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.IDS_SMDS1501 FOR VDPS2.IDS_SMDS1501 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.IDS_VCLDP148_V02
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.IDS_VCLDP148_V02 AS
SELECT A.INSTRUMENTID, B.INSTITUTIONID_GK, C.CLEARINGSYSTEMTYPE,
C.DELIVERYMODETYPE, D.SHORTNAME_G, D.SHORTNAME_E,
D.SHORTNAME_F, D.SHORTNAME_I, D.SHORTNAME_N
FROM VDPS2.VTINSTRFLATSYMBOLS A
INNER JOIN
VDPS2.VTINSTIROLE B
ON B.INSTRUMENTID = A.INSTRUMENTID AND B.ROLETYPE = 6
INNER JOIN
VDPS2.VTCLEARINGCUSTODY C
ON C.INSTRUMENTID = B.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTITUTION D
ON D.INSTITUTIONID = B.INSTITUTIONID ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.IDS_VCLDP148_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VCLDP148_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VCLDP148_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VCLDP148_V02 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.IDS_VCLDP148_V02 FOR VDPS2.IDS_VCLDP148_V02 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.IDS_VGNTY113
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.IDS_VGNTY113 AS
SELECT A.INSTRUMENTID, A.SYMBOLCH,
B.PROVIDER1ID AS PROVIDER1ID_INSTIROLE,
B.PROVIDER2ID AS PROVIDER2ID_INSTIROLE,
B.PROVIDER3ID AS PROVIDER3ID_INSTIROLE, B.INSTITUTIONID,
B.DESCRIPTION_G, B.DESCRIPTION_E, B.DESCRIPTION_F,
B.DESCRIPTION_I, B.DESCRIPTION_N, B.ROLETYPE,
B.GUARANTORROLETYPE, B.INSTITUTIONID_GK, C.GUARANTYNO,
C.PROVIDER1ID AS PROVIDER1ID_GNTY,
C.PROVIDER2ID AS PROVIDER2ID_GNTY,
C.PROVIDER3ID AS PROVIDER3ID_GNTY, C.GUARANTYVALUE,
C.GUARANTYCLAUSETYPE, D.SHORTNAME_G, D.SHORTNAME_E,
D.SHORTNAME_F, D.SHORTNAME_I, D.SHORTNAME_N, D.NAME_G,
D.NAME_E, D.NAME_F, D.NAME_I, D.NAME_N,
D.DESCRIPTION_G DESCRIPTION_G_INSTI,
D.DESCRIPTION_E DESCRIPTION_E_INSTI,
D.DESCRIPTION_F DESCRIPTION_F_INSTI,
D.DESCRIPTION_I DESCRIPTION_I_INSTI,
D.DESCRIPTION_N DESCRIPTION_N_INSTI, D.PORTFOLIONO,
D.DOMICILE, D.TAXDOMICILE, D.ADDRESSLOCATION,
D.ACCOUNTINGCURR, D.INITIALMARGINRATE, D.DOMICILE_A2,
D.DOMICILE_WS80, D.TAXDOMICILE_A2, D.TAXDOMICILE_WS80,
D.INDUSTRYCS, D.INDUSTRYTKBN, D.INDUSTRYMSCI, D.INDUSTRYDJ,
D.INDUSTRYFTSE, D.INDUSTRYMFIB, D.INDUSTRYMFIS,
D.INDUSTRYICB, D.INDUSTRYBDF, D.TAXNUMBER,
D.BANKACCOUNTNUMBER, D.NATIONALBANKCODE, D.DOMICILE_A3,
D.TAXDOMICILE_A3
FROM VDPS2.VTINSTRFLATSYMBOLS A
INNER JOIN
VDPS2.VTINSTIROLE B
ON B.INSTRUMENTID = A.INSTRUMENTID AND B.ROLETYPE = 2
INNER JOIN
VDPS2.VTGUARANTY C
ON C.INSTRUMENTID = B.INSTRUMENTID AND C.INSTIROLENO = B.
INSTIROLENO
INNER JOIN
VDPS2.VTINSTITUTION D
ON D.INSTITUTIONID = B.INSTITUTIONID ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.IDS_VGNTY113 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VGNTY113 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VGNTY113 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VGNTY113 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.IDS_VGNTY113 FOR VDPS2.IDS_VGNTY113 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.IDS_VINIR133_V02
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.IDS_VINIR133_V02 AS
SELECT T1.INSTRUMENTID, T1.INSTITUTIONID, T1.ROLETYPE,
T1.GUARANTORROLETYPE, T2.ROWSTATUS, T2.SYMBOLGK,
T2.SYMBOLCSINSTIID, T2.SYMBOLFITCH, T2.SYMBOLSP,
T2.SYMBOLMDY, T2.SYMBOLIBEI, T2.SYMBOLBCN, T2.SYMBOLBCA,
T2.SYMBOLRTX, T2.SYMBOLBBX, T2.SYMBOLBBCX, T2.SYMBOLMIC,
T2.SYMBOLCSGHDST, T2.SYMBOLCSAREG, T2.SYMBOLCSWS80BPL,
T2.SYMBOLCSID01, T2.SYMBOLCSID03, T2.SYMBOLCSID05,
T2.SYMBOLCSID06, T2.CATEGORYVDPS, T2.CATEGORYCSGDIV,
T2.CATEGORYCSGME, T2.CATEGORYCSDG,
T2.CATEGORYTKINSTITUTION, T2.STATUSTYPE, T3.ISGLOBALREGACC,
T3.HASFUTUREMESSAGES, T3.MAINLANGUAGETYPE, T3.FOTYPE,
T3.SHORTNAME_G, T3.SHORTNAME_E, T3.SHORTNAME_F,
T3.SHORTNAME_I, T3.SHORTNAME_N, T3.NAME_G, T3.NAME_E,
T3.NAME_F, T3.NAME_I, T3.NAME_N, T3.KANTONSCODETYPE,
T3.DOMICILE, T3.TAXDOMICILE, T3.ACCOUNTINGCURR,
T3.INITIALMARGINRATE, T3.DOMICILE_A2, T3.DOMICILE_WS80,
T3.TAXDOMICILE_A2, T3.TAXDOMICILE_WS80, T3.INDUSTRYCS,
T3.INDUSTRYTKBN, T3.INDUSTRYMSCI, T3.INDUSTRYDJ,
T3.INDUSTRYFTSE, T3.INDUSTRYMFIB, T3.INDUSTRYMFIS,
T3.INDUSTRYICB, T3.INDUSTRYBDF, T3.TAXNUMBER,
T3.NONTAXABLENUMBER, T3.HOUSENUMBER, T3.ZIP,
T3.TELEFAXNUMBER, T3.BANKACCOUNTNUMBER,
T3.NATIONALBANKCODE, T3.FOUNDATIONDATE,
T3.PREVFINYEARENDDATE, T3.ACTFINYEARENDDATE,
T3.REGISTERENTRYDATE, T3.REGENTRYDELETIONDT,
T3.YEARENDDATE, T3.NEXTSEMESTERREPORT, T3.NONTAXABLEDATE,
T3.PREVIOUSYEARENDDT, T3.LEGALFORMTYPE,
T3.TRUSTLEGALGUIDETP, T3.TRUSTSTATUSTYPE, T3.CITY,
T3.INTERNETDOMAIN, T3.STREET, T3.EMAILNAME, T3.PHONENUMBER,
T3.IBAN, T3.ADDRESS, T3.ADDRESSDESCR, T3.HEADOFFICEDESCR,
T3.ADDRESSLOCATION_A2, T3.ADDRESSLOCATION_WS80,
T3.HASREDUNDANTINFO, T3.MDYISSUERRATING,
T3.MDYISSUERRATINGDATE, T3.MDYISSUERWATCHLISTSTATUSTYPE,
T3.SPISSUERRATING, T3.SPISSUERRATINGDATE,
T3.SPISSUERWATCHLISTSTATUSTYPE, T3.FITCHISSUERRATING,
T3.FITCHISSUERRATINGDATE,
T3.FITCHISSUERWATCHLISTSTATUSTYPE, T3.DOMICILE_A3,
T3.TAXDOMICILE_A3, T3.ADDRESSLOCATION_A3
FROM VDPS2.VTINSTIROLE T1
INNER JOIN
VDPS2.VTINSTIFLATSYMBOLS T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID
INNER JOIN
VDPS2.VTINSTITUTION T3
ON T3.INSTITUTIONID = T2.INSTITUTIONID ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.IDS_VINIR133_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VINIR133_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VINIR133_V02 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.IDS_VINIR133_V02 FOR VDPS2.IDS_VINIR133_V02 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.IDS_VINOP131
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.IDS_VINOP131 AS
SELECT T1.INSTRUMENTID, T1.ROWSTATUS, T1.SYMBOLCSFI, T1.SYMBOLCH,
T1.SYMBOLISIN, T1.SYMBOLUS, T1.SYMBOLXS, T1.SYMBOLGB,
T1.SYMBOLLU, T1.SYMBOLDE, T1.SYMBOLAT, T1.SYMBOLFR,
T1.SYMBOLBE, T1.SYMBOLIT, T1.SYMBOLNL, T1.SYMBOLJP,
T1.SYMBOLJ2, T1.SYMBOLDK, T1.SYMBOLSE, T1.SYMBOLI2,
T1.SYMBOLI1, T1.SYMBOLT1, T1.SYMBOLT2, T1.SYMBOLCSCURR,
T2.INCOMEMODETYPE, T2.MATURITYDATE, T2.EFFINTERESTRATE,
T2.FIRSTPAYDATE, T2.FIRSTPYDATEPERYEAR,
T2.ISCALLFORTXREONLY, T2.ISREDEEMABLE, T2.ISRETRACTABLE,
T2.ISCONVERTBYHOLDER, T2.ISCONVERTBYISSUER,
T2.INTRSTDVDENFRDATE, T2.INTERESTTYPE, T2.INTERESTCALCTYPE,
T2.PAYFREQUENCY, T2.PYFREQUNITTYPE, T2.REPAYPRICEAMOUNT,
T2.REPAYPRICERATE, T2.REPAYPRICECURR, T2.REPAYPRICECURR_I2,
T2.REPAYPRICECURR_I1, T2.REPAYPRICECURR_WS80,
T2.POOLFACTOR, T2.VOTINGRIGHTNO, T2.HASVOTINGRIGHTNO,
T2.HASREDMPINVARCURR, T2.HASWITHHOLDINGTAX,
T2.HASFEDERALSTAMPDUTY, T2.OUTSTANDINGCAPITAL,
T2.ISSUEDCAPITAL, T2.ISCSMIFIDCOMPLEX,
T2.MOSTLIQUIDMARKETLOCATION,
T2.MOSTLIQUIDMARKETLOCATION_A2,
T2.MOSTLIQUIDMARKETLOCATION_A3,
T2.MOSTLIQUIDMARKETLOCATION_WS80, T2.OUTSTANDCAPITALNO,
T2.ISSUEDCAPITALNO, T2.ISSUEAMOUNT, T2.ISSUEPRICE,
T2.ISSUEPRICECURR, T2.ISSUEPRICECURR_I2,
T2.ISSUEPRICECURR_I1, T2.ISSUEPRICECURR_WS80,
T2.SUBSCRBEGINDATE, T2.SUBSCRPLNDENDDATE,
T2.SUBSCRMETHODTYPE, T2.PAYMENTDATE, T2.PLACEMENTTYPE,
T2.ORIGINALISSUER, T2.ORIGINALISSUER_GK, T2.ISSUER,
T2.ISSUER_GK, T2.NAME35_G, T2.NAME35_E, T2.NAME35_F,
T2.NAME35_I, T2.NAME35_N, T2.NAME45_G, T2.NAME45_E,
T2.NAME45_F, T2.NAME45_I, T2.NAME45_N,
T2.SHORTNAME_G SHORTNAME_G_FLTDATA,
T2.SHORTNAME_E SHORTNAME_E_FLTDATA,
T2.SHORTNAME_F SHORTNAME_F_FLTDATA,
T2.SHORTNAME_I SHORTNAME_I_FLTDATA,
T2.SHORTNAME_N SHORTNAME_N_FLTDATA,
T3.SHORTNAME_G SHORTNAME_G_ORG_ISSUER,
T3.SHORTNAME_E SHORTNAME_E_ORG_ISSUER,
T3.SHORTNAME_F SHORTNAME_F_ORG_ISSUER,
T3.SHORTNAME_I SHORTNAME_I_ORG_ISSUER,
T3.SHORTNAME_N SHORTNAME_N_ORG_ISSUER,
T3.DOMICILE DOMICILE_ORG_ISSUER,
T3.DOMICILE_A2 DOMICILE_A2_ORG_ISSUER,
T3.DOMICILE_A3 DOMICILE_A3_ORG_ISSUER,
T3.DOMICILE_WS80 DOMICILE_WS80_ORG_ISSUER,
T3.NAME_G NAME_G_ORG_ISSUER, T3.NAME_E NAME_E_ORG_ISSUER,
T3.NAME_F NAME_F_ORG_ISSUER, T3.NAME_I NAME_I_ORG_ISSUER,
T3.NAME_N NAME_N_ORG_ISSUER,
T3.INDUSTRYCS INDUSTRYCS_ORG_ISSUER,
T3.INDUSTRYTKBN INDUSTRYTKBN_ORG_ISSUER,
T3.INDUSTRYMSCI INDUSTRYMSCI_ORG_ISSUER,
T4.SHORTNAME_G SHORTNAME_G_ISSUER,
T4.SHORTNAME_E SHORTNAME_E_ISSUER,
T4.SHORTNAME_F SHORTNAME_F_ISSUER,
T4.SHORTNAME_I SHORTNAME_I_ISSUER,
T4.SHORTNAME_N SHORTNAME_N_ISSUER,
T4.DOMICILE DOMICILE_ISSUER,
T4.DOMICILE_A2 DOMICILE_A2_ISSUER,
T4.DOMICILE_A3 DOMICILE_A3_ISSUER,
T4.DOMICILE_WS80 DOMICILE_WS80_ISSUER,
T4.NAME_G NAME_G_ISSUER, T4.NAME_E NAME_E_ISSUER,
T4.NAME_F NAME_F_ISSUER, T4.NAME_I NAME_I_ISSUER,
T4.NAME_N NAME_N_ISSUER, T4.INDUSTRYCS INDUSTRYCS_ISSUER,
T4.INDUSTRYTKBN INDUSTRYTKBN_ISSUER,
T4.INDUSTRYMSCI INDUSTRYMSCI_ISSUER, T2.NOMINALCURR_I1,
T2.NOMINALCURR_I2, T2.NOMINALCURR_WS80
FROM VDPS2.VTINSTRFLATSYMBOLS T1
INNER JOIN
VDPS2.VTINSTRFLATDATA T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTITUTION T3
ON T3.INSTITUTIONID = T2.ORIGINALISSUER
INNER JOIN
VDPS2.VTINSTITUTION T4
ON T4.INSTITUTIONID = T2.ISSUER ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.IDS_VINOP131 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VINOP131 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VINOP131 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.IDS_VINOP131 FOR VDPS2.IDS_VINOP131 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.IDS_VINOP140
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.IDS_VINOP140 AS
SELECT T1.INSTRUMENTID, T1.ROWSTATUS ROWSTATUS_FLTSYMB,
T1.SYMBOLCSFI, T1.SYMBOLCH, T1.SYMBOLISIN, T1.SYMBOLUS,
T1.SYMBOLXS, T1.SYMBOLGB, T1.SYMBOLLU, T1.SYMBOLDE,
T1.SYMBOLAT, T1.SYMBOLFR, T1.SYMBOLBE, T1.SYMBOLIT,
T1.SYMBOLNL, T1.SYMBOLJP, T1.SYMBOLJ2, T1.SYMBOLDK,
T1.SYMBOLSE, T1.SYMBOLI2, T1.SYMBOLI1, T1.SYMBOLT1,
T1.SYMBOLT2, T1.SYMBOLCSCURR, T1.CATEGORYVDPS,
T1.CATEGORYTKT, T1.CATEGORYTKSK, T1.CATEGORYTKZUS,
T1.CATEGORYTKPRK, T1.CATEGORYTKTZ, T1.CATEGORYMAZU,
T1.CATEGORYECBTR, T1.CATEGORYCFI, T1.CATEGORYEUZS,
T1.CATEGORYCSGTA, T1.CATEGORYCSGMS, T1.CATEGUSTAXREPORT,
T1.CATEGUSIRSADDITION,
T1.CSSTATUSTYPE CSSTATUSTYPE_FLTSYMB,
T1.STATUSTYPE STATUSTYPE_FLTSYMB, T2.PAYFREQUENCY,
T2.ISCALLFORTXREONLY, T2.ISREDEEMABLE, T2.ISRETRACTABLE,
T2.ISCONVERTBYHOLDER, T2.ISCONVERTBYISSUER,
T2.HASVOTINGRIGHTNO, T2.HASREDMPINVARCURR,
T2.HASMULTIUNDERLYERS, T2.MAINDEPOSITARY, T2.NOMINALAMOUNT,
T2.MINDENOMINATION, T2.EFFINTERESTRATE,
T2.REPAYPRICEAMOUNT, T2.REPAYPRICERATE, T2.POOLFACTOR,
T2.VOTINGRIGHTNO, T2.OUTSTANDINGCAPITAL, T2.ISSUEDCAPITAL,
T2.OUTSTANDCAPITALNO, T2.ISSUEDCAPITALNO, T2.ISSUEAMOUNT,
T2.ISSUEPRICE, T2.EXERCISEAMOUNT, T2.MINEXERCISEAMOUNT,
T2.HELDAMOUNT, T2.PAYAMOUNT, T2.INCOMETAXRATE,
T2.PREMIUMRATE, T2.PARTICIPATIONRATE, T2.REBATE,
T2.CSRATING, T2.CSRISKINDIDSYMBOL, T2.CSRISKINDSCHEMESYM,
T2.CSRISKINSTGRPIDSYM, T2.CSRISKINSGRPSCHSYM, T2.MDYRATING,
T2.SPRATING, T2.FITCHRATING, T2.LISTINGSYMBOLTKH,
T2.LISTINGSYMBOLRIC, T2.LISTINGSYMBOLBBI,
T2.NOMINALCURR_I1, T2.NOMINALCURR_I2, T2.NOMINALCURR_WS80,
T2.CSRISKCURRENCY_I1, T2.CSRISKCURRENCY_I2,
T2.CSRISKCURRENCY_WS80, T2.CSRISINSTRUMENT_CH,
T2.CSRISINSTRUMENT_ISIN, T2.CSRISINSTRUMENT_CSFI,
T2.CSRISKCOUNTRY_A2, T2.CSRISKCOUNTRY_WS80,
T2.REPAYPRICECURR_I1, T2.REPAYPRICECURR_I2,
T2.REPAYPRICECURR_WS80, T2.ISSUEPRICECURR_I1,
T2.ISSUEPRICECURR_I2, T2.ISSUEPRICECURR_WS80,
T2.EXERCISECURR_I1, T2.EXERCISECURR_I2,
T2.EXERCISECURR_WS80, T2.CSMAINTRADPLACE_BCN,
T2.CSMAINTRADPLACE_WS80, T2.CSMAINTRADPLACE_RTX,
T2.CSMAINTRADPLACE_BBX, T2.UNDERINSTRUMENT_CH,
T2.UNDERINSTRUMENT, T2.UNDERINSTRUMENT_ISIN,
T2.UNDERINSTRUMENT_CSFI, T2.ORIGINALISSUER_GK,
T2.ISSUER_GK, T2.MAINDEPOSITARY_GK, T2.EXPIRATIONDATE,
T2.MATURITYDATE, T2.FIRSTPAYDATE, T2.FIRSTPYDATEPERYEAR,
T2.INTRSTDVDENFRDATE, T2.CSRATINGDATE, T2.MDYRATINGDATE,
T2.SPRATINGDATE, T2.FITCHRATINGDATE, T2.SUBSCRBEGINDATE,
T2.PAYMENTDATE, T2.EXERCISEBEGINDATE, T2.SUBSCRPLNDENDDATE,
T2.EXERCISEENDDATE, T2.BVGTYPE, T2.CREDITWORTHINESSTP,
T2.COMMISSIONCODETYPE, T2.UNITTYPE, T2.CSUNITTYPE,
T2.EXPIRATIONTYPE, T2.STATUSTYPE STATUSTYPE_FLTDATA,
T2.REGISTRATIONTYPE, T2.BORROWERCATTYPE,
T2.CSLISTINGCODETYPE, T2.CSSTATUSTYPE CSSTATUSTYPE_FLTDATA,
T2.STATUSDETAILTYPE, T2.INCOMEMODETYPE,
T2.INTERESTCALCTYPE, T2.INTERESTTYPE, T2.PYFREQUNITTYPE,
T2.SUBSCRMETHODTYPE, T2.PLACEMENTTYPE, T2.PAYDIRECTIONTYPE,
T2.OPTIONTYPE, T2.SETTLESTYLETYPE, T2.CSFUNDTYPE,
T2.TRADINGSTATUSTYPE, T2.LISTINGSTATUSTYPE,
T2.EXERCISEPLACE, T2.NAME35_G, T2.NAME35_E, T2.NAME35_F,
T2.NAME35_I, T2.NAME35_N, T2.NAME45_G, T2.NAME45_E,
T2.NAME45_F, T2.NAME45_I, T2.NAME45_N, T2.SHORTNAME_G,
T2.SHORTNAME_E, T2.SHORTNAME_F, T2.SHORTNAME_I,
T2.SHORTNAME_N, T2.ISINTERNAL, T2.ISOTC,
T2.HASWITHHOLDINGTAX, T2.HASFEDERALSTAMPDUTY,
T2.ISCSMIFIDCOMPLEX, T2.MOSTLIQUIDMARKETLOCATION_A2,
T2.MOSTLIQUIDMARKETLOCATION_A3,
T2.MOSTLIQUIDMARKETLOCATION_WS80,
T2.MDYWATCHLISTSTATUSTYPE, T2.SPWATCHLISTSTATUSTYPE,
T2.FITCHWATCHLISTSTATUSTYPE, T2.OPTIONSTYLETYPE,
T2.CSMAINTRADINGCURR_I1, T2.CSMAINTRADINGCURR_I2,
T2.CSMAINTRADINGCURR_WS80, T2.CSRISKCOUNTRY_A3,
T2.LIQUIDATIONRIGHTTYPE, T2.CSMAINPARENTTRADINGPLACE_BCN,
T2.CSMAINPARENTTRADINGPLACE_RTX,
T2.CSMAINPARENTTRADINGPLACE_MIC,
T2.CSMAINPARENTTRADINGPLACE_BBX,
T2.CSMAINPARENTTRADINGPLACE_WS80, T2.PREPARTICLE_G,
T2.PREPARTICLE_E, T2.PREPARTICLE_F, T2.PREPARTICLE_I,
T2.PREPARTICLE_N, T2.POSTPARTICLE_G, T2.POSTPARTICLE_E,
T2.POSTPARTICLE_F, T2.POSTPARTICLE_I, T2.POSTPARTICLE_N,
T3.INSTITUTIONID INSTITUTIONID_ORG_ISSUER,
T3.ROWSTATUS ROWSTATUS_ORG_ISSUER,
T3.SYMBOLGK SYMBOLGK_ORG_ISSUER,
T3.SYMBOLCSINSTIID SYMBOLCSINSTIID_ORG_ISSUER,
T3.SYMBOLFITCH SYMBOLFITCH_ORG_ISSUER,
T3.SYMBOLSP SYMBOLSP_ORG_ISSUER,
T3.SYMBOLMDY SYMBOLMDY_ORG_ISSUER,
T3.SYMBOLCSGHDST SYMBOLCSGHDST_ORG_ISSUER,
T3.SYMBOLCSAREG SYMBOLCSAREG_ORG_ISSUER,
T3.SYMBOLIBEI SYMBOLIBEI_ORG_ISSUER,
T3.SYMBOLBCN SYMBOLBCN_ORG_ISSUER,
T3.SYMBOLBCA SYMBOLBCA_ORG_ISSUER,
T3.SYMBOLRTX SYMBOLRTX_ORG_ISSUER,
T3.SYMBOLBBX SYMBOLBBX_ORG_ISSUER,
T3.SYMBOLBBCX SYMBOLBBCX_ORG_ISSUER,
T3.SYMBOLMIC SYMBOLMIC_ORG_ISSUER,
T3.SYMBOLCSWS80BPL SYMBOLCSWS80BPL_ORG_ISSUER,
T3.SYMBOLCSID01 SYMBOLCSID01_ORG_ISSUER,
T3.SYMBOLCSID03 SYMBOLCSID03_ORG_ISSUER,
T3.SYMBOLCSID05 SYMBOLCSID05_ORG_ISSUER,
T3.SYMBOLCSID06 SYMBOLCSID06_ORG_ISSUER,
T3.CATEGORYVDPS CATEGORYVDPS_ORG_ISSUER,
T3.CATEGORYCSGDIV CATEGORYCSGDIV_ORG_ISSUER,
T3.CATEGORYCSGME CATEGORYCSGME_ORG_ISSUER,
T3.CATEGORYCSDG CATEGORYCSDG_ORG_ISSUER,
T3.CATEGORYTKINSTITUTION CATEGORYTKINSTI_ORG_ISSUER,
T3.STATUSTYPE STATUSTYPE_ORG_ISSUER,
T4.INSTITUTIONTYPE INSTITUTIONTYPE_ORG_ISSUER,
T4.ISGLOBALREGACC ISGLOBALREGACC_ORG_ISSUER,
T4.HASPENDINGACTVTY HASPENDINGACTVTY_ORG_ISSUER,
T4.ISRELEVANT ISRELEVANTV_ORG_ISSUER,
T4.ISONDB ISONDB_ORG_ISSUER,
T4.ACCOUNTINGCURR ACCOUNTINGCURR_ORG_ISSUER,
T4.INITIALMARGINRATE INITIALMARGINRATE_ORG_ISSUER,
T4.DOMICILE_A2 DOMICILE_A2_ORG_ISSUER,
T4.DOMICILE_WS80 DOMICILE_WS80_ORG_ISSUER,
T4.TAXDOMICILE_A2 TAXDOMICILE_A2_ORG_ISSUER,
T4.TAXDOMICILE_WS80 TAXDOMICILE_WS80_ORG_ISSUER,
T4.INDUSTRYCS INDUSTRYCS_ORG_ISSUER,
T4.INDUSTRYTKBN INDUSTRYTKBN_ORG_ISSUER,
T4.INDUSTRYMSCI INDUSTRYMSCI_ORG_ISSUER,
T4.INDUSTRYDJ INDUSTRYDJ_ORG_ISSUER,
T4.INDUSTRYFTSE INDUSTRYFTSE_ORG_ISSUER,
T4.INDUSTRYMFIB INDUSTRYMFIB_ORG_ISSUER,
T4.INDUSTRYMFIS INDUSTRYMFIS_ORG_ISSUER,
T4.INDUSTRYICB INDUSTRYICB_ORG_ISSUER,
T4.INDUSTRYBDF INDUSTRYBDF_ORG_ISSUER,
T4.TAXNUMBER TAXNUMBER_ORG_ISSUER,
T4.NONTAXABLENUMBER NONTAXABLENUMBER_ORG_ISSUER,
T4.HOUSENUMBER HOUSENUMBER_ORG_ISSUER,
T4.ZIP ZIP_ORG_ISSUER,
T4.TELEFAXNUMBER TELEFAXNUMBER_ORG_ISSUER,
T4.NATIONALBANKCODE NATIONALBANKCODE_ORG_ISSUER,
T4.BANKACCOUNTNUMBER BANKACCOUNTNUMBER_ORG_ISSUER,
T4.FOUNDATIONDATE FOUNDATIONDATE_ORG_ISSUER,
T4.PREVFINYEARENDDATE PREVFINYEARENDDATE_ORG_ISSUER,
T4.ACTFINYEARENDDATE ACTFINYEARENDDATE_ORG_ISSUER,
T4.REGISTERENTRYDATE REGISTERENTRYDATE_ORG_ISSUER,
T4.REGENTRYDELETIONDT REGENTRYDELETIONDT_ORG_ISSUER,
T4.YEARENDDATE YEARENDDATE_ORG_ISSUER,
T4.NEXTSEMESTERREPORT NEXTSEMESTERREPORT_ORG_ISSUER,
T4.NONTAXABLEDATE NONTAXABLEDATE_ORG_ISSUER,
T4.PREVIOUSYEARENDDT PREVIOUSYEARENDDT_ORG_ISSUER,
T4.CREATETIMESTAMP CREATETIMESTAMP_ORG_ISSUER,
T4.UPDATETIMESTAMP UPDATETIMESTAMP_ORG_ISSUER,
T4.MAINLANGUAGETYPE MAINLANGUAGETYPE_ORG_ISSUER,
T4.KANTONSCODETYPE KANTONSCODETYPE_ORG_ISSUER,
T4.LEGALFORMTYPE LEGALFORMTYPE_ORG_ISSUER,
T4.TRUSTLEGALGUIDETP TRUSTLEGALGUIDETP_ORG_ISSUER,
T4.TRUSTSTATUSTYPE TRUSTSTATUSTYPE_ORG_ISSUER,
T4.FOTYPE FOTYPE_ORG_ISSUER,
T4.DATASTATUSTYPE DATASTATUSTYPE_ORG_ISSUER,
T4.BLOCKINGCODETYPE BLOCKINGCODETYPE_ORG_ISSUER,
T4.CITY CITY_ORG_ISSUER,
T4.INTERNETDOMAIN INTERNETDOMAIN_ORG_ISSUER,
T4.STREET STREET_ORG_ISSUER,
T4.EMAILNAME EMAILNAME_ORG_ISSUER,
T4.PHONENUMBER PHONENUMBER_ORG_ISSUER,
T4.IBAN IBAN_ORG_ISSUER,
T4.SHORTNAME_G SHORTNAME_G_ORG_ISSUER,
T4.SHORTNAME_E SHORTNAME_E_ORG_ISSUER,
T4.SHORTNAME_F SHORTNAME_F_ORG_ISSUER,
T4.SHORTNAME_I SHORTNAME_I_ORG_ISSUER,
T4.SHORTNAME_N SHORTNAME_N_ORG_ISSUER,
T4.NAME_G NAME_G_ORG_ISSUER, T4.NAME_E NAME_E_ORG_ISSUER,
T4.NAME_F NAME_F_ORG_ISSUER, T4.NAME_I NAME_I_ORG_ISSUER,
T4.NAME_N NAME_N_ORG_ISSUER,
T4.HASADDRESS HASADDRESS_ORG_ISSUER,
T4.ADDRESS ADDRESS_ORG_ISSUER,
T4.ADDRESSDESCR ADDRESSDESCR_ORG_ISSUER,
T4.HEADOFFICEDESCR HEADOFFICEDESCR_ORG_ISSUER,
T4.MDYISSUERRATING MDYISSUERRATING_ORG_ISSUER,
T4.MDYISSUERRATINGDATE MDYISSUERRATINGDT_ORG_ISSUER,
T4.MDYISSUERWATCHLISTSTATUSTYPE
MDYWLISTSTATUSTYPE_ORG_ISSUER,
T4.SPISSUERRATING SPISSUERRATING_ORG_ISSUER,
T4.SPISSUERRATINGDATE SPISSUERRATINGDATE_ORG_ISSUER,
T4.SPISSUERWATCHLISTSTATUSTYPE SPLISTSTATUSTYPE_ORG_ISSUER,
T4.FITCHISSUERRATING FITCHISSUERRT_ORG_ISSUER,
T4.FITCHISSUERRATINGDATE FITCHISSUERRTDT_ORG_ISSUER,
T4.FITCHISSUERWATCHLISTSTATUSTYPE FITCHWATCHSTTP_ORG_ISSUER,
T4.DOMICILE_A3 DOMICILE_A3_ORG_ISSUER,
T4.TAXDOMICILE_A3 TAXDOMICILE_A3_ORG_ISSUER,
T4.ADDRESSLOCATION_A2 ADDRESS_A2_ORG_ISSUER,
T4.ADDRESSLOCATION_A3 ADDRESS_A3_ORG_ISSUER,
T4.ADDRESSLOCATION_WS80 ADDRESS_WS80_ORG_ISSUER,
T5.INSTITUTIONID INSTITUTIONID_ISSUER,
T5.ROWSTATUS ROWSTATUS_ISSUER, T5.SYMBOLGK SYMBOLGK_ISSUER,
T5.SYMBOLCSINSTIID SYMBOLCSINSTIID_ISSUER,
T5.SYMBOLFITCH SYMBOLFITCH_ISSUER,
T5.SYMBOLSP SYMBOLSP_ISSUER, T5.SYMBOLMDY SYMBOLMDY_ISSUER,
T5.SYMBOLCSGHDST SYMBOLCSGHDST_ISSUER,
T5.SYMBOLCSAREG SYMBOLCSAREG_ISSUER,
T5.SYMBOLIBEI SYMBOLIBEI_ISSUER,
T5.SYMBOLBCN SYMBOLBCN_ISSUER,
T5.SYMBOLBCA SYMBOLBCA_ISSUER,
T5.SYMBOLRTX SYMBOLRTX_ISSUER,
T5.SYMBOLBBX SYMBOLBBX_ISSUER,
T5.SYMBOLBBCX SYMBOLBBCX_ISSUER,
T5.SYMBOLMIC SYMBOLMIC_ISSUER,
T5.SYMBOLCSWS80BPL SYMBOLCSWS80BPL_ISSUER,
T5.SYMBOLCSID01 SYMBOLCSID01_ISSUER,
T5.SYMBOLCSID03 SYMBOLCSID03_ISSUER,
T5.SYMBOLCSID05 SYMBOLCSID05_ISSUER,
T5.SYMBOLCSID06 SYMBOLCSID06_ISSUER,
T5.CATEGORYVDPS CATEGORYVDPS_ISSUER,
T5.CATEGORYCSGDIV CATEGORYCSGDIV_ISSUER,
T5.CATEGORYCSGME CATEGORYCSGME_ISSUER,
T5.CATEGORYCSDG CATEGORYCSDG_ISSUER,
T5.CATEGORYTKINSTITUTION CATEGORYTKINSTITUTION_ISSUER,
T5.STATUSTYPE STATUSTYPE_ISSUER,
T6.INSTITUTIONTYPE INSTITUTIONTYPE_ISSUER,
T6.ISGLOBALREGACC ISGLOBALREGACC_ISSUER,
T6.HASPENDINGACTVTY HASPENDINGACTVTY_ISSUER,
T6.ISRELEVANT ISRELEVANTV_ISSUER, T6.ISONDB ISONDB_ISSUER,
T6.INITIALMARGINRATE INITIALMARGINRATE_ISSUER,
T6.DOMICILE_A2 DOMICILE_A2_ISSUER,
T6.DOMICILE_WS80 DOMICILE_WS80_ISSUER,
T6.TAXDOMICILE_A2 TAXDOMICILE_A2_ISSUER,
T6.TAXDOMICILE_WS80 TAXDOMICILE_WS80_ISSUER,
T6.INDUSTRYCS INDUSTRYCS_ISSUER,
T6.INDUSTRYTKBN INDUSTRYTKBN_ISSUER,
T6.INDUSTRYMSCI INDUSTRYMSCI_ISSUER,
T6.INDUSTRYDJ INDUSTRYDJ_ISSUER,
T6.INDUSTRYFTSE INDUSTRYFTSE_ISSUER,
T6.INDUSTRYMFIB INDUSTRYMFIB_ISSUER,
T6.INDUSTRYMFIS INDUSTRYMFIS_ISSUER,
T6.INDUSTRYICB INDUSTRYICB_ISSUER,
T6.INDUSTRYBDF INDUSTRYBDF_ISSUER,
T6.TAXNUMBER TAXNUMBER_ISSUER,
T6.NONTAXABLENUMBER NONTAXABLENUMBER_ISSUER,
T6.HOUSENUMBER HOUSENUMBER_ISSUER, T6.ZIP ZIP_ISSUER,
T6.TELEFAXNUMBER TELEFAXNUMBER_ISSUER,
T6.NATIONALBANKCODE NATIONALBANKCODE_ISSUER,
T6.BANKACCOUNTNUMBER BANKACCOUNTNUMBER_ISSUER,
T6.FOUNDATIONDATE FOUNDATIONDATE_ISSUER,
T6.PREVFINYEARENDDATE PREVFINYEARENDDATE_ISSUER,
T6.ACTFINYEARENDDATE ACTFINYEARENDDATE_ISSUER,
T6.REGISTERENTRYDATE REGISTERENTRYDATE_ISSUER,
T6.REGENTRYDELETIONDT REGENTRYDELETIONDT_ISSUER,
T6.YEARENDDATE YEARENDDATE_ISSUER,
T6.NEXTSEMESTERREPORT NEXTSEMESTERREPORT_ISSUER,
T6.NONTAXABLEDATE NONTAXABLEDATE_ISSUER,
T6.PREVIOUSYEARENDDT PREVIOUSYEARENDDT_ISSUER,
T6.CREATETIMESTAMP CREATETIMESTAMP_ISSUER,
T6.UPDATETIMESTAMP UPDATETIMESTAMP_ISSUER,
T6.MAINLANGUAGETYPE MAINLANGUAGETYPE_ISSUER,
T6.KANTONSCODETYPE KANTONSCODETYPE_ISSUER,
T6.LEGALFORMTYPE LEGALFORMTYPE_ISSUER,
T6.TRUSTLEGALGUIDETP TRUSTLEGALGUIDETP_ISSUER,
T6.TRUSTSTATUSTYPE TRUSTSTATUSTYPE_ISSUER,
T6.FOTYPE FOTYPE_ISSUER,
T6.DATASTATUSTYPE DATASTATUSTYPE_ISSUER,
T6.BLOCKINGCODETYPE BLOCKINGCODETYPE_ISSUER,
T6.CITY CITY_ISSUER,
T6.INTERNETDOMAIN INTERNETDOMAIN_ISSUER,
T6.STREET STREET_ISSUER, T6.EMAILNAME EMAILNAME_ISSUER,
T6.PHONENUMBER PHONENUMBER_ISSUER, T6.IBAN IBAN_ISSUER,
T6.SHORTNAME_G SHORTNAME_G_ISSUER,
T6.SHORTNAME_E SHORTNAME_E_ISSUER,
T6.SHORTNAME_F SHORTNAME_F_ISSUER,
T6.SHORTNAME_I SHORTNAME_I_ISSUER,
T6.SHORTNAME_N SHORTNAME_N_ISSUER, T6.NAME_G NAME_G_ISSUER,
T6.NAME_E NAME_E_ISSUER, T6.NAME_F NAME_F_ISSUER,
T6.NAME_I NAME_I_ISSUER, T6.NAME_N NAME_N_ISSUER,
T6.HASADDRESS HASADDRESS_ISSUER, T6.ADDRESS ADDRESS_ISSUER,
T6.ADDRESSDESCR ADDRESSDESCR_ISSUER,
T6.HEADOFFICEDESCR HEADOFFICEDESCR_ISSUER,
T6.MODIFICATIONREASON MODIFICATIONREASON_ISSUER,
T6.MDYISSUERRATING MDYISSUERRATING_ISSUER,
T6.MDYISSUERRATINGDATE MDYISSUERRATINGDATE_ISSUER,
T6.MDYISSUERWATCHLISTSTATUSTYPE
MDYWATCHLISTSTATUSTYPE_ISSUER,
T6.SPISSUERRATING SPISSUERRATING_ISSUER,
T6.SPISSUERRATINGDATE SPISSUERRATINGDATE_ISSUER,
T6.SPISSUERWATCHLISTSTATUSTYPE SPWATCHLISTSTATUSTYPE_ISSUER,
T6.FITCHISSUERRATING FITCHISSUERRATING_ISSUER,
T6.FITCHISSUERRATINGDATE FITCHISSUERRATINGDATE_ISSUER,
T6.FITCHISSUERWATCHLISTSTATUSTYPE FITCHWATCHLISTSTTP_ISSUER,
T6.DOMICILE_A3 DOMICILE_A3_ISSUER,
T6.TAXDOMICILE_A3 TAXDOMICILE_A3_ISSUER,
T6.ADDRESSLOCATION_A2 ADDRESSLOCATION_A2_ISSUER,
T6.ADDRESSLOCATION_A3 ADDRESSLOCATION_A3_ISSUER,
T6.ADDRESSLOCATION_WS80 ADDRESSLOCATION_WS80_ISSUER,
T7.BESTVENUEUPDATETS, T7.EUROCLEARDEPO, T7.FISNPOOLNUMBER,
T7.FISNPROGRAM, T7.FISNTRANCHE, T7.FISNTRUST,
T7.FISNUNDERLYING, T7.HYBRIDACRONYMTYPE, T7.IDFORMATTYPE,
T7.ISAUTOMATEDDISTRIB, T7.ISBLUECHIP, T7.NTIPTYPE,
T7.OTEXMARKETMAKER, T7.OTEXORDERDESK, T7.OTEXRISKDOMICILE,
T7.BRANDNAME, T7.PRODUCTNAME, T7.CSPRODUCTCATEGORY,
T7.ISMANAGEDBYCS, T7.CSBTVRELEVANCETYPE,
T8.DEFREPAYMENTPERIOD, T8.POSITIONLIMIT,
T8.MARGININPERCENT, T8.MARGININITIALAMOUN,
T8.MARGINSPREADAMOUNT, T8.TICKAMOUNT, T8.TICKSIZE,
T8.CONTRACTSIZE, T8.CONTSIZEUNDERLYING, T8.BONDFLOOR,
T8.DISCOUNT, T8.GUARANTEREPAYPRICE, T8.RESERVENUMBER1,
T8.RESERVENUMBER2, T8.RESERVENUMBER3, T8.RESERVENUMBER4,
T8.RESERVENUMBER5, T8.RESERVENUMBER6, T8.MANDATOR,
T8.RESERVETEXT1, T8.RESERVETEXT2, T8.RESERVETEXT3,
T8.CSBOARDLOT, T8.CSINCOMETAXTYPE, T8.POSITIONCURRTYPE,
T8.KANTONSCODETYPE, T8.CSEVENTDTCODETYPE,
T8.CSFUNDTYPE CSFUNDTYPE_SP42, T8.CSRELEVANCEDATE,
T8.HASQUOTESBLOCK, T8.HASFUNDSUNBUNDLING,
T8.FUNDDEPOSITARY, T8.FUNDCATEGORY,
T9.CREATETIMESTAMP CREATETIMESTAMP_INSTR,
T9.UPDATETIMESTAMP UPDATETIMESTAMP_INSTR, T1.SYMBOLSPIRIT
FROM VDPS2.VTINSTRFLATSYMBOLS T1
INNER JOIN
VDPS2.VTINSTRFLATDATA T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTIFLATSYMBOLS T3
ON T3.INSTITUTIONID = T2.ORIGINALISSUER
INNER JOIN
VDPS2.VTINSTITUTION T4
ON T4.INSTITUTIONID = T2.ORIGINALISSUER
INNER JOIN
VDPS2.VTINSTRUMENT T9
ON T9.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTIFLATSYMBOLS T5
ON T5.INSTITUTIONID = T2.ISSUER
INNER JOIN
VDPS2.VTINSTITUTION T6
ON T6.INSTITUTIONID = T2.ISSUER
LEFT OUTER JOIN
VDPS2.CTINSTRDETAILS T7
ON T7.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPS2.CTINSTRSP42DETAILS T8
ON T8.INSTRUMENTID = T1.INSTRUMENTID ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.IDS_VINOP140 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VINOP140 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VINOP140 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VINOP140 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VINOP140 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VINOP140 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VINOP140 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.IDS_VINOP140 FOR VDPS2.IDS_VINOP140 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.IDS_VINOP140_V02
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.IDS_VINOP140_V02 AS
SELECT T1.INSTRUMENTID, T1.ROWSTATUS ROWSTATUS_FLTSYMB,
T1.SYMBOLCSFI, T1.SYMBOLCH, T1.SYMBOLISIN, T1.SYMBOLUS,
T1.SYMBOLXS, T1.SYMBOLGB, T1.SYMBOLLU, T1.SYMBOLDE,
T1.SYMBOLAT, T1.SYMBOLFR, T1.SYMBOLBE, T1.SYMBOLIT,
T1.SYMBOLNL, T1.SYMBOLJP, T1.SYMBOLJ2, T1.SYMBOLDK,
T1.SYMBOLSE, T1.SYMBOLI2, T1.SYMBOLI1, T1.SYMBOLT1,
T1.SYMBOLT2, T1.SYMBOLCSCURR, T1.CATEGORYVDPS,
T1.CATEGORYTKT, T1.CATEGORYTKSK, T1.CATEGORYTKZUS,
T1.CATEGORYTKPRK, T1.CATEGORYTKTZ, T1.CATEGORYMAZU,
T1.CATEGORYECBTR, T1.CATEGORYCFI, T1.CATEGORYEUZS,
T1.CATEGORYCSGTA, T1.CATEGORYCSGMS, T1.CATEGUSTAXREPORT,
T1.CATEGUSIRSADDITION,
T1.CSSTATUSTYPE CSSTATUSTYPE_FLTSYMB,
T1.STATUSTYPE STATUSTYPE_FLTSYMB, T2.PAYFREQUENCY,
T2.ISCALLFORTXREONLY, T2.ISREDEEMABLE, T2.ISRETRACTABLE,
T2.ISCONVERTBYHOLDER, T2.ISCONVERTBYISSUER,
T2.HASVOTINGRIGHTNO, T2.HASREDMPINVARCURR,
T2.HASMULTIUNDERLYERS, T2.MAINDEPOSITARY, T2.NOMINALAMOUNT,
T2.MINDENOMINATION, T2.EFFINTERESTRATE,
T2.REPAYPRICEAMOUNT, T2.REPAYPRICERATE, T2.POOLFACTOR,
T2.VOTINGRIGHTNO, T2.OUTSTANDINGCAPITAL, T2.ISSUEDCAPITAL,
T2.OUTSTANDCAPITALNO, T2.ISSUEDCAPITALNO, T2.ISSUEAMOUNT,
T2.ISSUEPRICE, T2.EXERCISEAMOUNT, T2.MINEXERCISEAMOUNT,
T2.HELDAMOUNT, T2.PAYAMOUNT, T2.INCOMETAXRATE,
T2.PREMIUMRATE, T2.PARTICIPATIONRATE, T2.REBATE,
T2.CSRATING, T2.CSRISKINDIDSYMBOL, T2.CSRISKINDSCHEMESYM,
T2.CSRISKINSTGRPIDSYM, T2.CSRISKINSGRPSCHSYM, T2.MDYRATING,
T2.SPRATING, T2.FITCHRATING, T2.LISTINGSYMBOLTKH,
T2.LISTINGSYMBOLRIC, T2.LISTINGSYMBOLBBI,
T2.NOMINALCURR_I1, T2.NOMINALCURR_I2, T2.NOMINALCURR_WS80,
T2.CSRISKCURRENCY_I1, T2.CSRISKCURRENCY_I2,
T2.CSRISKCURRENCY_WS80, T2.CSRISINSTRUMENT_CH,
T2.CSRISINSTRUMENT_ISIN, T2.CSRISINSTRUMENT_CSFI,
T2.CSRISKCOUNTRY_A2, T2.CSRISKCOUNTRY_WS80,
T2.REPAYPRICECURR_I1, T2.REPAYPRICECURR_I2,
T2.REPAYPRICECURR_WS80, T2.ISSUEPRICECURR_I1,
T2.ISSUEPRICECURR_I2, T2.ISSUEPRICECURR_WS80,
T2.EXERCISECURR_I1, T2.EXERCISECURR_I2,
T2.EXERCISECURR_WS80, T2.CSMAINTRADPLACE_BCN,
T2.CSMAINTRADPLACE_WS80, T2.CSMAINTRADPLACE_RTX,
T2.CSMAINTRADPLACE_BBX, T2.UNDERINSTRUMENT_CH,
T2.UNDERINSTRUMENT_ISIN, T2.UNDERINSTRUMENT_CSFI,
T2.ORIGINALISSUER_GK, T2.ISSUER_GK, T2.MAINDEPOSITARY_GK,
T2.EXPIRATIONDATE, T2.MATURITYDATE, T2.FIRSTPAYDATE,
T2.FIRSTPYDATEPERYEAR, T2.INTRSTDVDENFRDATE,
T2.CSRATINGDATE, T2.MDYRATINGDATE, T2.SPRATINGDATE,
T2.FITCHRATINGDATE, T2.SUBSCRBEGINDATE, T2.PAYMENTDATE,
T2.EXERCISEBEGINDATE, T2.SUBSCRPLNDENDDATE,
T2.EXERCISEENDDATE, T2.BVGTYPE, T2.CREDITWORTHINESSTP,
T2.COMMISSIONCODETYPE, T2.UNITTYPE, T2.CSUNITTYPE,
T2.EXPIRATIONTYPE, T2.STATUSTYPE STATUSTYPE_FLTDATA,
T2.REGISTRATIONTYPE, T2.BORROWERCATTYPE,
T2.CSLISTINGCODETYPE, T2.CSSTATUSTYPE CSSTATUSTYPE_FLTDATA,
T2.STATUSDETAILTYPE, T2.INCOMEMODETYPE,
T2.INTERESTCALCTYPE, T2.INTERESTTYPE, T2.PYFREQUNITTYPE,
T2.SUBSCRMETHODTYPE, T2.PLACEMENTTYPE, T2.PAYDIRECTIONTYPE,
T2.OPTIONTYPE, T2.SETTLESTYLETYPE, T2.CSFUNDTYPE,
T2.TRADINGSTATUSTYPE, T2.LISTINGSTATUSTYPE,
T2.EXERCISEPLACE, T2.NAME35_G, T2.NAME35_E, T2.NAME35_F,
T2.NAME35_I, T2.NAME35_N, T2.NAME45_G, T2.NAME45_E,
T2.NAME45_F, T2.NAME45_I, T2.NAME45_N, T2.SHORTNAME_G,
T2.SHORTNAME_E, T2.SHORTNAME_F, T2.SHORTNAME_I,
T2.SHORTNAME_N, T2.ISINTERNAL, T2.ISOTC,
T2.HASWITHHOLDINGTAX, T2.HASFEDERALSTAMPDUTY,
T2.ISCSMIFIDCOMPLEX, T2.MOSTLIQUIDMARKETLOCATION_A2,
T2.MOSTLIQUIDMARKETLOCATION_A3,
T2.MOSTLIQUIDMARKETLOCATION_WS80,
T2.MDYWATCHLISTSTATUSTYPE, T2.SPWATCHLISTSTATUSTYPE,
T2.FITCHWATCHLISTSTATUSTYPE, T2.OPTIONSTYLETYPE,
T2.CSMAINTRADINGCURR_I1, T2.CSMAINTRADINGCURR_I2,
T2.CSMAINTRADINGCURR_WS80, T2.CSRISKCOUNTRY_A3,
T2.LIQUIDATIONRIGHTTYPE, T2.CSMAINPARENTTRADINGPLACE_BCN,
T2.CSMAINPARENTTRADINGPLACE_RTX,
T2.CSMAINPARENTTRADINGPLACE_MIC,
T2.CSMAINPARENTTRADINGPLACE_BBX,
T2.CSMAINPARENTTRADINGPLACE_WS80,
T3.INSTITUTIONID INSTITUTIONID_ORG_ISSUER,
T3.ROWSTATUS ROWSTATUS_ORG_ISSUER,
T3.SYMBOLGK SYMBOLGK_ORG_ISSUER,
T3.SYMBOLCSINSTIID SYMBOLCSINSTIID_ORG_ISSUER,
T3.SYMBOLFITCH SYMBOLFITCH_ORG_ISSUER,
T3.SYMBOLSP SYMBOLSP_ORG_ISSUER,
T3.SYMBOLMDY SYMBOLMDY_ORG_ISSUER,
T3.SYMBOLCSGHDST SYMBOLCSGHDST_ORG_ISSUER,
T3.SYMBOLCSAREG SYMBOLCSAREG_ORG_ISSUER,
T3.SYMBOLIBEI SYMBOLIBEI_ORG_ISSUER,
T3.SYMBOLBCN SYMBOLBCN_ORG_ISSUER,
T3.SYMBOLBCA SYMBOLBCA_ORG_ISSUER,
T3.SYMBOLRTX SYMBOLRTX_ORG_ISSUER,
T3.SYMBOLBBX SYMBOLBBX_ORG_ISSUER,
T3.SYMBOLBBCX SYMBOLBBCX_ORG_ISSUER,
T3.SYMBOLMIC SYMBOLMIC_ORG_ISSUER,
T3.SYMBOLCSWS80BPL SYMBOLCSWS80BPL_ORG_ISSUER,
T3.SYMBOLCSID01 SYMBOLCSID01_ORG_ISSUER,
T3.SYMBOLCSID03 SYMBOLCSID03_ORG_ISSUER,
T3.SYMBOLCSID05 SYMBOLCSID05_ORG_ISSUER,
T3.SYMBOLCSID06 SYMBOLCSID06_ORG_ISSUER,
T3.CATEGORYVDPS CATEGORYVDPS_ORG_ISSUER,
T3.CATEGORYCSGDIV CATEGORYCSGDIV_ORG_ISSUER,
T3.CATEGORYCSGME CATEGORYCSGME_ORG_ISSUER,
T3.CATEGORYCSDG CATEGORYCSDG_ORG_ISSUER,
T3.CATEGORYTKINSTITUTION CATEGORYTKINSTI_ORG_ISSUER,
T3.STATUSTYPE STATUSTYPE_ORG_ISSUER,
T4.INSTITUTIONTYPE INSTITUTIONTYPE_ORG_ISSUER,
T4.ISGLOBALREGACC ISGLOBALREGACC_ORG_ISSUER,
T4.HASPENDINGACTVTY HASPENDINGACTVTY_ORG_ISSUER,
T4.ISRELEVANT ISRELEVANTV_ORG_ISSUER,
T4.ISONDB ISONDB_ORG_ISSUER,
T4.ACCOUNTINGCURR ACCOUNTINGCURR_ORG_ISSUER,
T4.INITIALMARGINRATE INITIALMARGINRATE_ORG_ISSUER,
T4.DOMICILE_A2 DOMICILE_A2_ORG_ISSUER,
T4.DOMICILE_WS80 DOMICILE_WS80_ORG_ISSUER,
T4.TAXDOMICILE_A2 TAXDOMICILE_A2_ORG_ISSUER,
T4.TAXDOMICILE_WS80 TAXDOMICILE_WS80_ORG_ISSUER,
T4.INDUSTRYCS INDUSTRYCS_ORG_ISSUER,
T4.INDUSTRYTKBN INDUSTRYTKBN_ORG_ISSUER,
T4.INDUSTRYMSCI INDUSTRYMSCI_ORG_ISSUER,
T4.INDUSTRYDJ INDUSTRYDJ_ORG_ISSUER,
T4.INDUSTRYFTSE INDUSTRYFTSE_ORG_ISSUER,
T4.INDUSTRYMFIB INDUSTRYMFIB_ORG_ISSUER,
T4.INDUSTRYMFIS INDUSTRYMFIS_ORG_ISSUER,
T4.INDUSTRYICB INDUSTRYICB_ORG_ISSUER,
T4.INDUSTRYBDF INDUSTRYBDF_ORG_ISSUER,
T4.TAXNUMBER TAXNUMBER_ORG_ISSUER,
T4.NONTAXABLENUMBER NONTAXABLENUMBER_ORG_ISSUER,
T4.HOUSENUMBER HOUSENUMBER_ORG_ISSUER,
T4.ZIP ZIP_ORG_ISSUER,
T4.TELEFAXNUMBER TELEFAXNUMBER_ORG_ISSUER,
T4.NATIONALBANKCODE NATIONALBANKCODE_ORG_ISSUER,
T4.BANKACCOUNTNUMBER BANKACCOUNTNUMBER_ORG_ISSUER,
T4.FOUNDATIONDATE FOUNDATIONDATE_ORG_ISSUER,
T4.PREVFINYEARENDDATE PREVFINYEARENDDATE_ORG_ISSUER,
T4.ACTFINYEARENDDATE ACTFINYEARENDDATE_ORG_ISSUER,
T4.REGISTERENTRYDATE REGISTERENTRYDATE_ORG_ISSUER,
T4.REGENTRYDELETIONDT REGENTRYDELETIONDT_ORG_ISSUER,
T4.YEARENDDATE YEARENDDATE_ORG_ISSUER,
T4.NEXTSEMESTERREPORT NEXTSEMESTERREPORT_ORG_ISSUER,
T4.NONTAXABLEDATE NONTAXABLEDATE_ORG_ISSUER,
T4.PREVIOUSYEARENDDT PREVIOUSYEARENDDT_ORG_ISSUER,
T4.CREATETIMESTAMP CREATETIMESTAMP_ORG_ISSUER,
T4.UPDATETIMESTAMP UPDATETIMESTAMP_ORG_ISSUER,
T4.MAINLANGUAGETYPE MAINLANGUAGETYPE_ORG_ISSUER,
T4.KANTONSCODETYPE KANTONSCODETYPE_ORG_ISSUER,
T4.LEGALFORMTYPE LEGALFORMTYPE_ORG_ISSUER,
T4.TRUSTLEGALGUIDETP TRUSTLEGALGUIDETP_ORG_ISSUER,
T4.TRUSTSTATUSTYPE TRUSTSTATUSTYPE_ORG_ISSUER,
T4.FOTYPE FOTYPE_ORG_ISSUER,
T4.DATASTATUSTYPE DATASTATUSTYPE_ORG_ISSUER,
T4.BLOCKINGCODETYPE BLOCKINGCODETYPE_ORG_ISSUER,
T4.CITY CITY_ORG_ISSUER,
T4.INTERNETDOMAIN INTERNETDOMAIN_ORG_ISSUER,
T4.STREET STREET_ORG_ISSUER,
T4.EMAILNAME EMAILNAME_ORG_ISSUER,
T4.PHONENUMBER PHONENUMBER_ORG_ISSUER,
T4.IBAN IBAN_ORG_ISSUER,
T4.SHORTNAME_G SHORTNAME_G_ORG_ISSUER,
T4.SHORTNAME_E SHORTNAME_E_ORG_ISSUER,
T4.SHORTNAME_F SHORTNAME_F_ORG_ISSUER,
T4.SHORTNAME_I SHORTNAME_I_ORG_ISSUER,
T4.SHORTNAME_N SHORTNAME_N_ORG_ISSUER,
T4.NAME_G NAME_G_ORG_ISSUER, T4.NAME_E NAME_E_ORG_ISSUER,
T4.NAME_F NAME_F_ORG_ISSUER, T4.NAME_I NAME_I_ORG_ISSUER,
T4.NAME_N NAME_N_ORG_ISSUER,
T4.HASADDRESS HASADDRESS_ORG_ISSUER,
T4.ADDRESS ADDRESS_ORG_ISSUER,
T4.ADDRESSDESCR ADDRESSDESCR_ORG_ISSUER,
T4.HEADOFFICEDESCR HEADOFFICEDESCR_ORG_ISSUER,
T4.MDYISSUERRATING MDYISSUERRATING_ORG_ISSUER,
T4.MDYISSUERRATINGDATE MDYISSUERRATINGDT_ORG_ISSUER,
T4.MDYISSUERWATCHLISTSTATUSTYPE
MDYWLISTSTATUSTYPE_ORG_ISSUER,
T4.SPISSUERRATING SPISSUERRATING_ORG_ISSUER,
T4.SPISSUERRATINGDATE SPISSUERRATINGDATE_ORG_ISSUER,
T4.SPISSUERWATCHLISTSTATUSTYPE SPLISTSTATUSTYPE_ORG_ISSUER,
T4.FITCHISSUERRATING FITCHISSUERRT_ORG_ISSUER,
T4.FITCHISSUERRATINGDATE FITCHISSUERRTDT_ORG_ISSUER,
T4.FITCHISSUERWATCHLISTSTATUSTYPE FITCHWATCHSTTP_ORG_ISSUER,
T4.DOMICILE_A3 DOMICILE_A3_ORG_ISSUER,
T4.TAXDOMICILE_A3 TAXDOMICILE_A3_ORG_ISSUER,
T4.ADDRESSLOCATION_A2 ADDRESS_A2_ORG_ISSUER,
T4.ADDRESSLOCATION_A3 ADDRESS_A3_ORG_ISSUER,
T4.ADDRESSLOCATION_WS80 ADDRESS_WS80_ORG_ISSUER,
T5.INSTITUTIONID INSTITUTIONID_ISSUER,
T5.ROWSTATUS ROWSTATUS_ISSUER, T5.SYMBOLGK SYMBOLGK_ISSUER,
T5.SYMBOLCSINSTIID SYMBOLCSINSTIID_ISSUER,
T5.SYMBOLFITCH SYMBOLFITCH_ISSUER,
T5.SYMBOLSP SYMBOLSP_ISSUER, T5.SYMBOLMDY SYMBOLMDY_ISSUER,
T5.SYMBOLCSGHDST SYMBOLCSGHDST_ISSUER,
T5.SYMBOLCSAREG SYMBOLCSAREG_ISSUER,
T5.SYMBOLIBEI SYMBOLIBEI_ISSUER,
T5.SYMBOLBCN SYMBOLBCN_ISSUER,
T5.SYMBOLBCA SYMBOLBCA_ISSUER,
T5.SYMBOLRTX SYMBOLRTX_ISSUER,
T5.SYMBOLBBX SYMBOLBBX_ISSUER,
T5.SYMBOLBBCX SYMBOLBBCX_ISSUER,
T5.SYMBOLMIC SYMBOLMIC_ISSUER,
T5.SYMBOLCSWS80BPL SYMBOLCSWS80BPL_ISSUER,
T5.SYMBOLCSID01 SYMBOLCSID01_ISSUER,
T5.SYMBOLCSID03 SYMBOLCSID03_ISSUER,
T5.SYMBOLCSID05 SYMBOLCSID05_ISSUER,
T5.SYMBOLCSID06 SYMBOLCSID06_ISSUER,
T5.CATEGORYVDPS CATEGORYVDPS_ISSUER,
T5.CATEGORYCSGDIV CATEGORYCSGDIV_ISSUER,
T5.CATEGORYCSGME CATEGORYCSGME_ISSUER,
T5.CATEGORYCSDG CATEGORYCSDG_ISSUER,
T5.CATEGORYTKINSTITUTION CATEGORYTKINSTITUTION_ISSUER,
T5.STATUSTYPE STATUSTYPE_ISSUER,
T6.INSTITUTIONTYPE INSTITUTIONTYPE_ISSUER,
T6.ISGLOBALREGACC ISGLOBALREGACC_ISSUER,
T6.HASPENDINGACTVTY HASPENDINGACTVTY_ISSUER,
T6.ISRELEVANT ISRELEVANTV_ISSUER, T6.ISONDB ISONDB_ISSUER,
T6.INITIALMARGINRATE INITIALMARGINRATE_ISSUER,
T6.DOMICILE_A2 DOMICILE_A2_ISSUER,
T6.DOMICILE_WS80 DOMICILE_WS80_ISSUER,
T6.TAXDOMICILE_A2 TAXDOMICILE_A2_ISSUER,
T6.TAXDOMICILE_WS80 TAXDOMICILE_WS80_ISSUER,
T6.INDUSTRYCS INDUSTRYCS_ISSUER,
T6.INDUSTRYTKBN INDUSTRYTKBN_ISSUER,
T6.INDUSTRYMSCI INDUSTRYMSCI_ISSUER,
T6.INDUSTRYDJ INDUSTRYDJ_ISSUER,
T6.INDUSTRYFTSE INDUSTRYFTSE_ISSUER,
T6.INDUSTRYMFIB INDUSTRYMFIB_ISSUER,
T6.INDUSTRYMFIS INDUSTRYMFIS_ISSUER,
T6.INDUSTRYICB INDUSTRYICB_ISSUER,
T6.INDUSTRYBDF INDUSTRYBDF_ISSUER,
T6.TAXNUMBER TAXNUMBER_ISSUER,
T6.NONTAXABLENUMBER NONTAXABLENUMBER_ISSUER,
T6.HOUSENUMBER HOUSENUMBER_ISSUER, T6.ZIP ZIP_ISSUER,
T6.TELEFAXNUMBER TELEFAXNUMBER_ISSUER,
T6.NATIONALBANKCODE NATIONALBANKCODE_ISSUER,
T6.BANKACCOUNTNUMBER BANKACCOUNTNUMBER_ISSUER,
T6.FOUNDATIONDATE FOUNDATIONDATE_ISSUER,
T6.PREVFINYEARENDDATE PREVFINYEARENDDATE_ISSUER,
T6.ACTFINYEARENDDATE ACTFINYEARENDDATE_ISSUER,
T6.REGISTERENTRYDATE REGISTERENTRYDATE_ISSUER,
T6.REGENTRYDELETIONDT REGENTRYDELETIONDT_ISSUER,
T6.YEARENDDATE YEARENDDATE_ISSUER,
T6.NEXTSEMESTERREPORT NEXTSEMESTERREPORT_ISSUER,
T6.NONTAXABLEDATE NONTAXABLEDATE_ISSUER,
T6.PREVIOUSYEARENDDT PREVIOUSYEARENDDT_ISSUER,
T6.CREATETIMESTAMP CREATETIMESTAMP_ISSUER,
T6.UPDATETIMESTAMP UPDATETIMESTAMP_ISSUER,
T6.MAINLANGUAGETYPE MAINLANGUAGETYPE_ISSUER,
T6.KANTONSCODETYPE KANTONSCODETYPE_ISSUER,
T6.LEGALFORMTYPE LEGALFORMTYPE_ISSUER,
T6.TRUSTLEGALGUIDETP TRUSTLEGALGUIDETP_ISSUER,
T6.TRUSTSTATUSTYPE TRUSTSTATUSTYPE_ISSUER,
T6.FOTYPE FOTYPE_ISSUER,
T6.DATASTATUSTYPE DATASTATUSTYPE_ISSUER,
T6.BLOCKINGCODETYPE BLOCKINGCODETYPE_ISSUER,
T6.CITY CITY_ISSUER,
T6.INTERNETDOMAIN INTERNETDOMAIN_ISSUER,
T6.STREET STREET_ISSUER, T6.EMAILNAME EMAILNAME_ISSUER,
T6.PHONENUMBER PHONENUMBER_ISSUER, T6.IBAN IBAN_ISSUER,
T6.SHORTNAME_G SHORTNAME_G_ISSUER,
T6.SHORTNAME_E SHORTNAME_E_ISSUER,
T6.SHORTNAME_F SHORTNAME_F_ISSUER,
T6.SHORTNAME_I SHORTNAME_I_ISSUER,
T6.SHORTNAME_N SHORTNAME_N_ISSUER, T6.NAME_G NAME_G_ISSUER,
T6.NAME_E NAME_E_ISSUER, T6.NAME_F NAME_F_ISSUER,
T6.NAME_I NAME_I_ISSUER, T6.NAME_N NAME_N_ISSUER,
T6.HASADDRESS HASADDRESS_ISSUER, T6.ADDRESS ADDRESS_ISSUER,
T6.ADDRESSDESCR ADDRESSDESCR_ISSUER,
T6.HEADOFFICEDESCR HEADOFFICEDESCR_ISSUER,
T6.MODIFICATIONREASON MODIFICATIONREASON_ISSUER,
T6.MDYISSUERRATING MDYISSUERRATING_ISSUER,
T6.MDYISSUERRATINGDATE MDYISSUERRATINGDATE_ISSUER,
T6.MDYISSUERWATCHLISTSTATUSTYPE
MDYWATCHLISTSTATUSTYPE_ISSUER,
T6.SPISSUERRATING SPISSUERRATING_ISSUER,
T6.SPISSUERRATINGDATE SPISSUERRATINGDATE_ISSUER,
T6.SPISSUERWATCHLISTSTATUSTYPE SPWATCHLISTSTATUSTYPE_ISSUER,
T6.FITCHISSUERRATING FITCHISSUERRATING_ISSUER,
T6.FITCHISSUERRATINGDATE FITCHISSUERRATINGDATE_ISSUER,
T6.FITCHISSUERWATCHLISTSTATUSTYPE FITCHWATCHLISTSTTP_ISSUER,
T6.DOMICILE_A3 DOMICILE_A3_ISSUER,
T6.TAXDOMICILE_A3 TAXDOMICILE_A3_ISSUER,
T6.ADDRESSLOCATION_A2 ADDRESSLOCATION_A2_ISSUER,
T6.ADDRESSLOCATION_A3 ADDRESSLOCATION_A3_ISSUER,
T6.ADDRESSLOCATION_WS80 ADDRESSLOCATION_WS80_ISSUER,
T7.BESTVENUEUPDATETS, T7.EUROCLEARDEPO, T7.FISNPOOLNUMBER,
T7.FISNPROGRAM, T7.FISNTRANCHE, T7.FISNTRUST,
T7.FISNUNDERLYING, T7.HYBRIDACRONYMTYPE, T7.IDFORMATTYPE,
T7.ISAUTOMATEDDISTRIB, T7.ISBLUECHIP, T7.NTIPTYPE,
T7.OTEXMARKETMAKER, T7.OTEXORDERDESK, T7.OTEXRISKDOMICILE,
T7.BRANDNAME, T7.PRODUCTNAME, T7.CSPRODUCTCATEGORY,
T7.ISMANAGEDBYCS, T7.CSBTVRELEVANCETYPE,
T8.DEFREPAYMENTPERIOD, T8.POSITIONLIMIT,
T8.MARGININPERCENT, T8.MARGININITIALAMOUN,
T8.MARGINSPREADAMOUNT, T8.TICKAMOUNT, T8.TICKSIZE,
T8.CONTRACTSIZE, T8.CONTSIZEUNDERLYING, T8.BONDFLOOR,
T8.DISCOUNT, T8.GUARANTEREPAYPRICE, T8.RESERVENUMBER1,
T8.RESERVENUMBER2, T8.RESERVENUMBER3, T8.RESERVENUMBER4,
T8.RESERVENUMBER5, T8.RESERVENUMBER6, T8.MANDATOR,
T8.RESERVETEXT1, T8.RESERVETEXT2, T8.RESERVETEXT3,
T8.CSBOARDLOT, T8.CSINCOMETAXTYPE, T8.POSITIONCURRTYPE,
T8.KANTONSCODETYPE, T8.CSEVENTDTCODETYPE,
T8.CSFUNDTYPE CSFUNDTYPE_SP42, T8.CSRELEVANCEDATE,
T8.HASQUOTESBLOCK, T8.HASFUNDSUNBUNDLING,
T8.FUNDDEPOSITARY, T8.FUNDCATEGORY,
T9.CREATETIMESTAMP CREATETIMESTAMP_INSTR,
T9.UPDATETIMESTAMP UPDATETIMESTAMP_INSTR, T1.SYMBOLSPIRIT,
T2.UNDERINSTRUMENT, T2.PREPARTICLE_G, T2.PREPARTICLE_E,
T2.PREPARTICLE_F, T2.PREPARTICLE_I, T2.PREPARTICLE_N,
T2.POSTPARTICLE_G, T2.POSTPARTICLE_E, T2.POSTPARTICLE_F,
T2.POSTPARTICLE_I, T2.POSTPARTICLE_N, T9.NAME_G, T9.NAME_E,
T9.NAME_F, T9.NAME_I, T9.NAME_N,
T9.ISRELEVANT ISRELEVANT_INSTR, T2.MAINLANGUAGETYPE,
T2.ISSUEPRICERATE, T2.TITELARTZUSATZTEXT,
T2.BORROWINGLIMITTYPE, T2.ISVSTQUALITYCHECKED
FROM VDPS2.VTINSTRFLATSYMBOLS T1
INNER JOIN
VDPS2.VTINSTRFLATDATA T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTIFLATSYMBOLS T3
ON T3.INSTITUTIONID = T2.ORIGINALISSUER
INNER JOIN
VDPS2.VTINSTITUTION T4
ON T4.INSTITUTIONID = T2.ORIGINALISSUER
INNER JOIN
VDPS2.VTINSTRUMENT T9
ON T9.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTIFLATSYMBOLS T5
ON T5.INSTITUTIONID = T2.ISSUER
INNER JOIN
VDPS2.VTINSTITUTION T6
ON T6.INSTITUTIONID = T2.ISSUER
LEFT OUTER JOIN
VDPS2.CTINSTRDETAILS T7
ON T7.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPS2.CTINSTRSP42DETAILS T8
ON T8.INSTRUMENTID = T1.INSTRUMENTID ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.IDS_VINOP140_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VINOP140_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VINOP140_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VINOP140_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VINOP140_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VINOP140_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VINOP140_V02 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.IDS_VINOP140_V02 FOR VDPS2.IDS_VINOP140_V02 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.IDS_VINOP140_V03
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.IDS_VINOP140_V03 AS
SELECT T1.INSTRUMENTID, T1.ROWSTATUS ROWSTATUS_FLTSYMB,
T1.SYMBOLCSFI, T1.SYMBOLCH, T1.SYMBOLISIN, T1.SYMBOLUS,
T1.SYMBOLXS, T1.SYMBOLGB, T1.SYMBOLLU, T1.SYMBOLDE,
T1.SYMBOLAT, T1.SYMBOLFR, T1.SYMBOLBE, T1.SYMBOLIT,
T1.SYMBOLNL, T1.SYMBOLJP, T1.SYMBOLJ2, T1.SYMBOLDK,
T1.SYMBOLSE, T1.SYMBOLI2, T1.SYMBOLI1, T1.SYMBOLT1,
T1.SYMBOLT2, T1.SYMBOLCSCURR, T1.CATEGORYVDPS,
T1.CATEGORYTKT, T1.CATEGORYTKSK, T1.CATEGORYTKZUS,
T1.CATEGORYTKPRK, T1.CATEGORYTKTZ, T1.CATEGORYMAZU,
T1.CATEGORYECBTR, T1.CATEGORYCFI, T1.CATEGORYEUZS,
T1.CATEGORYCSGTA, T1.CATEGORYCSGMS, T1.CATEGUSTAXREPORT,
T1.CATEGUSIRSADDITION,
T1.CSSTATUSTYPE CSSTATUSTYPE_FLTSYMB,
T1.STATUSTYPE STATUSTYPE_FLTSYMB, T2.PAYFREQUENCY,
T2.ISCALLFORTXREONLY, T2.ISREDEEMABLE, T2.ISRETRACTABLE,
T2.ISCONVERTBYHOLDER, T2.ISCONVERTBYISSUER,
T2.HASVOTINGRIGHTNO, T2.HASREDMPINVARCURR,
T2.HASMULTIUNDERLYERS, T2.MAINDEPOSITARY, T2.NOMINALAMOUNT,
T2.MINDENOMINATION, T2.EFFINTERESTRATE,
T2.REPAYPRICEAMOUNT, T2.REPAYPRICERATE, T2.POOLFACTOR,
T2.VOTINGRIGHTNO, T2.OUTSTANDINGCAPITAL, T2.ISSUEDCAPITAL,
T2.OUTSTANDCAPITALNO, T2.ISSUEDCAPITALNO, T2.ISSUEAMOUNT,
T2.ISSUEPRICE, T2.EXERCISEAMOUNT, T2.MINEXERCISEAMOUNT,
T2.HELDAMOUNT, T2.PAYAMOUNT, T2.INCOMETAXRATE,
T2.PREMIUMRATE, T2.PARTICIPATIONRATE, T2.REBATE,
T2.CSRATING, T2.CSRISKINDIDSYMBOL, T2.CSRISKINDSCHEMESYM,
T2.CSRISKINSTGRPIDSYM, T2.CSRISKINSGRPSCHSYM, T2.MDYRATING,
T2.SPRATING, T2.FITCHRATING, T2.LISTINGSYMBOLTKH,
T2.LISTINGSYMBOLRIC, T2.LISTINGSYMBOLBBI,
T2.NOMINALCURR_I1, T2.NOMINALCURR_I2, T2.NOMINALCURR_WS80,
T2.CSRISKCURRENCY_I1, T2.CSRISKCURRENCY_I2,
T2.CSRISKCURRENCY_WS80, T2.CSRISINSTRUMENT_CH,
T2.CSRISINSTRUMENT_ISIN, T2.CSRISINSTRUMENT_CSFI,
T2.CSRISKCOUNTRY_A2, T2.CSRISKCOUNTRY_WS80,
T2.REPAYPRICECURR_I1, T2.REPAYPRICECURR_I2,
T2.REPAYPRICECURR_WS80, T2.ISSUEPRICECURR_I1,
T2.ISSUEPRICECURR_I2, T2.ISSUEPRICECURR_WS80,
T2.EXERCISECURR_I1, T2.EXERCISECURR_I2,
T2.EXERCISECURR_WS80, T2.CSMAINTRADPLACE_BCN,
T2.CSMAINTRADPLACE_WS80, T2.CSMAINTRADPLACE_RTX,
T2.CSMAINTRADPLACE_BBX, T2.UNDERINSTRUMENT_CH,
T2.UNDERINSTRUMENT_ISIN, T2.UNDERINSTRUMENT_CSFI,
T2.ORIGINALISSUER_GK, T2.ISSUER_GK, T2.MAINDEPOSITARY_GK,
T2.EXPIRATIONDATE, T2.MATURITYDATE, T2.FIRSTPAYDATE,
T2.FIRSTPYDATEPERYEAR, T2.INTRSTDVDENFRDATE,
T2.CSRATINGDATE, T2.MDYRATINGDATE, T2.SPRATINGDATE,
T2.FITCHRATINGDATE, T2.SUBSCRBEGINDATE, T2.PAYMENTDATE,
T2.EXERCISEBEGINDATE, T2.SUBSCRPLNDENDDATE,
T2.EXERCISEENDDATE, T2.BVGTYPE, T2.CREDITWORTHINESSTP,
T2.COMMISSIONCODETYPE, T2.UNITTYPE, T2.CSUNITTYPE,
T2.EXPIRATIONTYPE, T2.STATUSTYPE STATUSTYPE_FLTDATA,
T2.REGISTRATIONTYPE, T2.BORROWERCATTYPE,
T2.CSLISTINGCODETYPE, T2.CSSTATUSTYPE CSSTATUSTYPE_FLTDATA,
T2.STATUSDETAILTYPE, T2.INCOMEMODETYPE,
T2.INTERESTCALCTYPE, T2.INTERESTTYPE, T2.PYFREQUNITTYPE,
T2.SUBSCRMETHODTYPE, T2.PLACEMENTTYPE, T2.PAYDIRECTIONTYPE,
T2.OPTIONTYPE, T2.SETTLESTYLETYPE, T2.CSFUNDTYPE,
T2.TRADINGSTATUSTYPE, T2.LISTINGSTATUSTYPE,
T2.EXERCISEPLACE, T2.NAME35_G, T2.NAME35_E, T2.NAME35_F,
T2.NAME35_I, T2.NAME35_N, T2.NAME45_G, T2.NAME45_E,
T2.NAME45_F, T2.NAME45_I, T2.NAME45_N, T2.SHORTNAME_G,
T2.SHORTNAME_E, T2.SHORTNAME_F, T2.SHORTNAME_I,
T2.SHORTNAME_N, T2.ISINTERNAL, T2.ISOTC,
T2.HASWITHHOLDINGTAX, T2.HASFEDERALSTAMPDUTY,
T2.ISCSMIFIDCOMPLEX, T2.MOSTLIQUIDMARKETLOCATION_A2,
T2.MOSTLIQUIDMARKETLOCATION_A3,
T2.MOSTLIQUIDMARKETLOCATION_WS80,
T2.MDYWATCHLISTSTATUSTYPE, T2.SPWATCHLISTSTATUSTYPE,
T2.FITCHWATCHLISTSTATUSTYPE, T2.OPTIONSTYLETYPE,
T2.CSMAINTRADINGCURR_I1, T2.CSMAINTRADINGCURR_I2,
T2.CSMAINTRADINGCURR_WS80, T2.CSRISKCOUNTRY_A3,
T2.LIQUIDATIONRIGHTTYPE, T2.CSMAINPARENTTRADINGPLACE_BCN,
T2.CSMAINPARENTTRADINGPLACE_RTX,
T2.CSMAINPARENTTRADINGPLACE_MIC,
T2.CSMAINPARENTTRADINGPLACE_BBX,
T2.CSMAINPARENTTRADINGPLACE_WS80,
T3.INSTITUTIONID INSTITUTIONID_ORG_ISSUER,
T3.ROWSTATUS ROWSTATUS_ORG_ISSUER,
T3.SYMBOLGK SYMBOLGK_ORG_ISSUER,
T3.SYMBOLCSINSTIID SYMBOLCSINSTIID_ORG_ISSUER,
T3.SYMBOLFITCH SYMBOLFITCH_ORG_ISSUER,
T3.SYMBOLSP SYMBOLSP_ORG_ISSUER,
T3.SYMBOLMDY SYMBOLMDY_ORG_ISSUER,
T3.SYMBOLCSGHDST SYMBOLCSGHDST_ORG_ISSUER,
T3.SYMBOLCSAREG SYMBOLCSAREG_ORG_ISSUER,
T3.SYMBOLIBEI SYMBOLIBEI_ORG_ISSUER,
T3.SYMBOLBCN SYMBOLBCN_ORG_ISSUER,
T3.SYMBOLBCA SYMBOLBCA_ORG_ISSUER,
T3.SYMBOLRTX SYMBOLRTX_ORG_ISSUER,
T3.SYMBOLBBX SYMBOLBBX_ORG_ISSUER,
T3.SYMBOLBBCX SYMBOLBBCX_ORG_ISSUER,
T3.SYMBOLMIC SYMBOLMIC_ORG_ISSUER,
T3.SYMBOLCSWS80BPL SYMBOLCSWS80BPL_ORG_ISSUER,
T3.SYMBOLCSID01 SYMBOLCSID01_ORG_ISSUER,
T3.SYMBOLCSID03 SYMBOLCSID03_ORG_ISSUER,
T3.SYMBOLCSID05 SYMBOLCSID05_ORG_ISSUER,
T3.SYMBOLCSID06 SYMBOLCSID06_ORG_ISSUER,
T3.CATEGORYVDPS CATEGORYVDPS_ORG_ISSUER,
T3.CATEGORYCSGDIV CATEGORYCSGDIV_ORG_ISSUER,
T3.CATEGORYCSGME CATEGORYCSGME_ORG_ISSUER,
T3.CATEGORYCSDG CATEGORYCSDG_ORG_ISSUER,
T3.CATEGORYTKINSTITUTION CATEGORYTKINSTI_ORG_ISSUER,
T3.STATUSTYPE STATUSTYPE_ORG_ISSUER,
T4.INSTITUTIONTYPE INSTITUTIONTYPE_ORG_ISSUER,
T4.ISGLOBALREGACC ISGLOBALREGACC_ORG_ISSUER,
T4.HASPENDINGACTVTY HASPENDINGACTVTY_ORG_ISSUER,
T4.ISRELEVANT ISRELEVANTV_ORG_ISSUER,
T4.ISONDB ISONDB_ORG_ISSUER,
T4.ACCOUNTINGCURR ACCOUNTINGCURR_ORG_ISSUER,
T4.INITIALMARGINRATE INITIALMARGINRATE_ORG_ISSUER,
T4.DOMICILE_A2 DOMICILE_A2_ORG_ISSUER,
T4.DOMICILE_WS80 DOMICILE_WS80_ORG_ISSUER,
T4.TAXDOMICILE_A2 TAXDOMICILE_A2_ORG_ISSUER,
T4.TAXDOMICILE_WS80 TAXDOMICILE_WS80_ORG_ISSUER,
T4.INDUSTRYCS INDUSTRYCS_ORG_ISSUER,
T4.INDUSTRYTKBN INDUSTRYTKBN_ORG_ISSUER,
T4.INDUSTRYMSCI INDUSTRYMSCI_ORG_ISSUER,
T4.INDUSTRYDJ INDUSTRYDJ_ORG_ISSUER,
T4.INDUSTRYFTSE INDUSTRYFTSE_ORG_ISSUER,
T4.INDUSTRYMFIB INDUSTRYMFIB_ORG_ISSUER,
T4.INDUSTRYMFIS INDUSTRYMFIS_ORG_ISSUER,
T4.INDUSTRYICB INDUSTRYICB_ORG_ISSUER,
T4.INDUSTRYBDF INDUSTRYBDF_ORG_ISSUER,
T4.TAXNUMBER TAXNUMBER_ORG_ISSUER,
T4.NONTAXABLENUMBER NONTAXABLENUMBER_ORG_ISSUER,
T4.HOUSENUMBER HOUSENUMBER_ORG_ISSUER,
T4.ZIP ZIP_ORG_ISSUER,
T4.TELEFAXNUMBER TELEFAXNUMBER_ORG_ISSUER,
T4.NATIONALBANKCODE NATIONALBANKCODE_ORG_ISSUER,
T4.BANKACCOUNTNUMBER BANKACCOUNTNUMBER_ORG_ISSUER,
T4.FOUNDATIONDATE FOUNDATIONDATE_ORG_ISSUER,
T4.PREVFINYEARENDDATE PREVFINYEARENDDATE_ORG_ISSUER,
T4.ACTFINYEARENDDATE ACTFINYEARENDDATE_ORG_ISSUER,
T4.REGISTERENTRYDATE REGISTERENTRYDATE_ORG_ISSUER,
T4.REGENTRYDELETIONDT REGENTRYDELETIONDT_ORG_ISSUER,
T4.YEARENDDATE YEARENDDATE_ORG_ISSUER,
T4.NEXTSEMESTERREPORT NEXTSEMESTERREPORT_ORG_ISSUER,
T4.NONTAXABLEDATE NONTAXABLEDATE_ORG_ISSUER,
T4.PREVIOUSYEARENDDT PREVIOUSYEARENDDT_ORG_ISSUER,
T4.CREATETIMESTAMP CREATETIMESTAMP_ORG_ISSUER,
T4.UPDATETIMESTAMP UPDATETIMESTAMP_ORG_ISSUER,
T4.MAINLANGUAGETYPE MAINLANGUAGETYPE_ORG_ISSUER,
T4.KANTONSCODETYPE KANTONSCODETYPE_ORG_ISSUER,
T4.LEGALFORMTYPE LEGALFORMTYPE_ORG_ISSUER,
T4.TRUSTLEGALGUIDETP TRUSTLEGALGUIDETP_ORG_ISSUER,
T4.TRUSTSTATUSTYPE TRUSTSTATUSTYPE_ORG_ISSUER,
T4.FOTYPE FOTYPE_ORG_ISSUER,
T4.DATASTATUSTYPE DATASTATUSTYPE_ORG_ISSUER,
T4.BLOCKINGCODETYPE BLOCKINGCODETYPE_ORG_ISSUER,
T4.CITY CITY_ORG_ISSUER,
T4.INTERNETDOMAIN INTERNETDOMAIN_ORG_ISSUER,
T4.STREET STREET_ORG_ISSUER,
T4.EMAILNAME EMAILNAME_ORG_ISSUER,
T4.PHONENUMBER PHONENUMBER_ORG_ISSUER,
T4.IBAN IBAN_ORG_ISSUER,
T4.SHORTNAME_G SHORTNAME_G_ORG_ISSUER,
T4.SHORTNAME_E SHORTNAME_E_ORG_ISSUER,
T4.SHORTNAME_F SHORTNAME_F_ORG_ISSUER,
T4.SHORTNAME_I SHORTNAME_I_ORG_ISSUER,
T4.SHORTNAME_N SHORTNAME_N_ORG_ISSUER,
T4.NAME_G NAME_G_ORG_ISSUER, T4.NAME_E NAME_E_ORG_ISSUER,
T4.NAME_F NAME_F_ORG_ISSUER, T4.NAME_I NAME_I_ORG_ISSUER,
T4.NAME_N NAME_N_ORG_ISSUER,
T4.HASADDRESS HASADDRESS_ORG_ISSUER,
T4.ADDRESS ADDRESS_ORG_ISSUER,
T4.ADDRESSDESCR ADDRESSDESCR_ORG_ISSUER,
T4.HEADOFFICEDESCR HEADOFFICEDESCR_ORG_ISSUER,
T4.MDYISSUERRATING MDYISSUERRATING_ORG_ISSUER,
T4.MDYISSUERRATINGDATE MDYISSUERRATINGDT_ORG_ISSUER,
T4.MDYISSUERWATCHLISTSTATUSTYPE
MDYWLISTSTATUSTYPE_ORG_ISSUER,
T4.SPISSUERRATING SPISSUERRATING_ORG_ISSUER,
T4.SPISSUERRATINGDATE SPISSUERRATINGDATE_ORG_ISSUER,
T4.SPISSUERWATCHLISTSTATUSTYPE SPLISTSTATUSTYPE_ORG_ISSUER,
T4.FITCHISSUERRATING FITCHISSUERRT_ORG_ISSUER,
T4.FITCHISSUERRATINGDATE FITCHISSUERRTDT_ORG_ISSUER,
T4.FITCHISSUERWATCHLISTSTATUSTYPE FITCHWATCHSTTP_ORG_ISSUER,
T4.DOMICILE_A3 DOMICILE_A3_ORG_ISSUER,
T4.TAXDOMICILE_A3 TAXDOMICILE_A3_ORG_ISSUER,
T4.ADDRESSLOCATION_A2 ADDRESS_A2_ORG_ISSUER,
T4.ADDRESSLOCATION_A3 ADDRESS_A3_ORG_ISSUER,
T4.ADDRESSLOCATION_WS80 ADDRESS_WS80_ORG_ISSUER,
T5.INSTITUTIONID INSTITUTIONID_ISSUER,
T5.ROWSTATUS ROWSTATUS_ISSUER, T5.SYMBOLGK SYMBOLGK_ISSUER,
T5.SYMBOLCSINSTIID SYMBOLCSINSTIID_ISSUER,
T5.SYMBOLFITCH SYMBOLFITCH_ISSUER,
T5.SYMBOLSP SYMBOLSP_ISSUER, T5.SYMBOLMDY SYMBOLMDY_ISSUER,
T5.SYMBOLCSGHDST SYMBOLCSGHDST_ISSUER,
T5.SYMBOLCSAREG SYMBOLCSAREG_ISSUER,
T5.SYMBOLIBEI SYMBOLIBEI_ISSUER,
T5.SYMBOLBCN SYMBOLBCN_ISSUER,
T5.SYMBOLBCA SYMBOLBCA_ISSUER,
T5.SYMBOLRTX SYMBOLRTX_ISSUER,
T5.SYMBOLBBX SYMBOLBBX_ISSUER,
T5.SYMBOLBBCX SYMBOLBBCX_ISSUER,
T5.SYMBOLMIC SYMBOLMIC_ISSUER,
T5.SYMBOLCSWS80BPL SYMBOLCSWS80BPL_ISSUER,
T5.SYMBOLCSID01 SYMBOLCSID01_ISSUER,
T5.SYMBOLCSID03 SYMBOLCSID03_ISSUER,
T5.SYMBOLCSID05 SYMBOLCSID05_ISSUER,
T5.SYMBOLCSID06 SYMBOLCSID06_ISSUER,
T5.CATEGORYVDPS CATEGORYVDPS_ISSUER,
T5.CATEGORYCSGDIV CATEGORYCSGDIV_ISSUER,
T5.CATEGORYCSGME CATEGORYCSGME_ISSUER,
T5.CATEGORYCSDG CATEGORYCSDG_ISSUER,
T5.CATEGORYTKINSTITUTION CATEGORYTKINSTITUTION_ISSUER,
T5.STATUSTYPE STATUSTYPE_ISSUER,
T6.INSTITUTIONTYPE INSTITUTIONTYPE_ISSUER,
T6.ISGLOBALREGACC ISGLOBALREGACC_ISSUER,
T6.HASPENDINGACTVTY HASPENDINGACTVTY_ISSUER,
T6.ISRELEVANT ISRELEVANTV_ISSUER, T6.ISONDB ISONDB_ISSUER,
T6.INITIALMARGINRATE INITIALMARGINRATE_ISSUER,
T6.DOMICILE_A2 DOMICILE_A2_ISSUER,
T6.DOMICILE_WS80 DOMICILE_WS80_ISSUER,
T6.TAXDOMICILE_A2 TAXDOMICILE_A2_ISSUER,
T6.TAXDOMICILE_WS80 TAXDOMICILE_WS80_ISSUER,
T6.INDUSTRYCS INDUSTRYCS_ISSUER,
T6.INDUSTRYTKBN INDUSTRYTKBN_ISSUER,
T6.INDUSTRYMSCI INDUSTRYMSCI_ISSUER,
T6.INDUSTRYDJ INDUSTRYDJ_ISSUER,
T6.INDUSTRYFTSE INDUSTRYFTSE_ISSUER,
T6.INDUSTRYMFIB INDUSTRYMFIB_ISSUER,
T6.INDUSTRYMFIS INDUSTRYMFIS_ISSUER,
T6.INDUSTRYICB INDUSTRYICB_ISSUER,
T6.INDUSTRYBDF INDUSTRYBDF_ISSUER,
T6.TAXNUMBER TAXNUMBER_ISSUER,
T6.NONTAXABLENUMBER NONTAXABLENUMBER_ISSUER,
T6.HOUSENUMBER HOUSENUMBER_ISSUER, T6.ZIP ZIP_ISSUER,
T6.TELEFAXNUMBER TELEFAXNUMBER_ISSUER,
T6.NATIONALBANKCODE NATIONALBANKCODE_ISSUER,
T6.BANKACCOUNTNUMBER BANKACCOUNTNUMBER_ISSUER,
T6.FOUNDATIONDATE FOUNDATIONDATE_ISSUER,
T6.PREVFINYEARENDDATE PREVFINYEARENDDATE_ISSUER,
T6.ACTFINYEARENDDATE ACTFINYEARENDDATE_ISSUER,
T6.REGISTERENTRYDATE REGISTERENTRYDATE_ISSUER,
T6.REGENTRYDELETIONDT REGENTRYDELETIONDT_ISSUER,
T6.YEARENDDATE YEARENDDATE_ISSUER,
T6.NEXTSEMESTERREPORT NEXTSEMESTERREPORT_ISSUER,
T6.NONTAXABLEDATE NONTAXABLEDATE_ISSUER,
T6.PREVIOUSYEARENDDT PREVIOUSYEARENDDT_ISSUER,
T6.CREATETIMESTAMP CREATETIMESTAMP_ISSUER,
T6.UPDATETIMESTAMP UPDATETIMESTAMP_ISSUER,
T6.MAINLANGUAGETYPE MAINLANGUAGETYPE_ISSUER,
T6.KANTONSCODETYPE KANTONSCODETYPE_ISSUER,
T6.LEGALFORMTYPE LEGALFORMTYPE_ISSUER,
T6.TRUSTLEGALGUIDETP TRUSTLEGALGUIDETP_ISSUER,
T6.TRUSTSTATUSTYPE TRUSTSTATUSTYPE_ISSUER,
T6.FOTYPE FOTYPE_ISSUER,
T6.DATASTATUSTYPE DATASTATUSTYPE_ISSUER,
T6.BLOCKINGCODETYPE BLOCKINGCODETYPE_ISSUER,
T6.CITY CITY_ISSUER,
T6.INTERNETDOMAIN INTERNETDOMAIN_ISSUER,
T6.STREET STREET_ISSUER, T6.EMAILNAME EMAILNAME_ISSUER,
T6.PHONENUMBER PHONENUMBER_ISSUER, T6.IBAN IBAN_ISSUER,
T6.SHORTNAME_G SHORTNAME_G_ISSUER,
T6.SHORTNAME_E SHORTNAME_E_ISSUER,
T6.SHORTNAME_F SHORTNAME_F_ISSUER,
T6.SHORTNAME_I SHORTNAME_I_ISSUER,
T6.SHORTNAME_N SHORTNAME_N_ISSUER, T6.NAME_G NAME_G_ISSUER,
T6.NAME_E NAME_E_ISSUER, T6.NAME_F NAME_F_ISSUER,
T6.NAME_I NAME_I_ISSUER, T6.NAME_N NAME_N_ISSUER,
T6.HASADDRESS HASADDRESS_ISSUER, T6.ADDRESS ADDRESS_ISSUER,
T6.ADDRESSDESCR ADDRESSDESCR_ISSUER,
T6.HEADOFFICEDESCR HEADOFFICEDESCR_ISSUER,
T6.MODIFICATIONREASON MODIFICATIONREASON_ISSUER,
T6.MDYISSUERRATING MDYISSUERRATING_ISSUER,
T6.MDYISSUERRATINGDATE MDYISSUERRATINGDATE_ISSUER,
T6.MDYISSUERWATCHLISTSTATUSTYPE
MDYWATCHLISTSTATUSTYPE_ISSUER,
T6.SPISSUERRATING SPISSUERRATING_ISSUER,
T6.SPISSUERRATINGDATE SPISSUERRATINGDATE_ISSUER,
T6.SPISSUERWATCHLISTSTATUSTYPE SPWATCHLISTSTATUSTYPE_ISSUER,
T6.FITCHISSUERRATING FITCHISSUERRATING_ISSUER,
T6.FITCHISSUERRATINGDATE FITCHISSUERRATINGDATE_ISSUER,
T6.FITCHISSUERWATCHLISTSTATUSTYPE FITCHWATCHLISTSTTP_ISSUER,
T6.DOMICILE_A3 DOMICILE_A3_ISSUER,
T6.TAXDOMICILE_A3 TAXDOMICILE_A3_ISSUER,
T6.ADDRESSLOCATION_A2 ADDRESSLOCATION_A2_ISSUER,
T6.ADDRESSLOCATION_A3 ADDRESSLOCATION_A3_ISSUER,
T6.ADDRESSLOCATION_WS80 ADDRESSLOCATION_WS80_ISSUER,
T7.BESTVENUEUPDATETS, T7.EUROCLEARDEPO, T7.FISNPOOLNUMBER,
T7.FISNPROGRAM, T7.FISNTRANCHE, T7.FISNTRUST,
T7.FISNUNDERLYING, T7.HYBRIDACRONYMTYPE, T7.IDFORMATTYPE,
T7.ISAUTOMATEDDISTRIB, T7.ISBLUECHIP, T7.NTIPTYPE,
T7.OTEXMARKETMAKER, T7.OTEXORDERDESK, T7.OTEXRISKDOMICILE,
T7.BRANDNAME, T7.PRODUCTNAME, T7.CSPRODUCTCATEGORY,
T7.ISMANAGEDBYCS, T7.CSBTVRELEVANCETYPE,
T7.INVESTORINFOTYPE, T7.UNDERLYINGMGMTTYPE,
T7.INITIALBONDFLOORRATE, T7.FINALBONDFLOORRATE,
T7.SWAPRATE, T7.ISUNDERLYINGLINKED, T7.RIGHTISSUETYPE,
T7.ISRIGHTISSUETRADING, T7.RIGHTISSUETRADINGFROMDATE,
T7.RIGHTISSUETRADINGUNTILDATE, T7.RIGHTISSUETRADINGAT,
T7.RIGHTISSUEFRACTIONTYPE, T7.RIGHTISSUELASTSPLITDATE,
T7.HASUNDERLYINGUSSECURITIES, T7.ISISSUERESNATIONALS,
T7.ISISSUERESNONNATIONALS, T7.SHAREREGISTRYTYPE,
T7.ACCRUEDINTERESTTYPE, T8.DEFREPAYMENTPERIOD,
T8.POSITIONLIMIT, T8.MARGININPERCENT,
T8.MARGININITIALAMOUN, T8.MARGINSPREADAMOUNT,
T8.TICKAMOUNT, T8.TICKSIZE, T8.CONTRACTSIZE,
T8.CONTSIZEUNDERLYING, T8.BONDFLOOR, T8.DISCOUNT,
T8.GUARANTEREPAYPRICE, T8.RESERVENUMBER1,
T8.RESERVENUMBER2, T8.RESERVENUMBER3, T8.RESERVENUMBER4,
T8.RESERVENUMBER5, T8.RESERVENUMBER6, T8.MANDATOR,
T8.RESERVETEXT1, T8.RESERVETEXT2, T8.RESERVETEXT3,
T8.CSBOARDLOT, T8.CSINCOMETAXTYPE, T8.POSITIONCURRTYPE,
T8.KANTONSCODETYPE, T8.CSEVENTDTCODETYPE,
T8.CSFUNDTYPE CSFUNDTYPE_SP42, T8.CSRELEVANCEDATE,
T8.HASQUOTESBLOCK, T8.HASFUNDSUNBUNDLING,
T8.FUNDDEPOSITARY, T8.FUNDCATEGORY,
T9.CREATETIMESTAMP CREATETIMESTAMP_INSTR,
T9.UPDATETIMESTAMP UPDATETIMESTAMP_INSTR, T1.SYMBOLSPIRIT,
T2.UNDERINSTRUMENT, T2.PREPARTICLE_G, T2.PREPARTICLE_E,
T2.PREPARTICLE_F, T2.PREPARTICLE_I, T2.PREPARTICLE_N,
T2.POSTPARTICLE_G, T2.POSTPARTICLE_E, T2.POSTPARTICLE_F,
T2.POSTPARTICLE_I, T2.POSTPARTICLE_N, T9.NAME_G, T9.NAME_E,
T9.NAME_F, T9.NAME_I, T9.NAME_N,
T9.ISRELEVANT ISRELEVANT_INSTR, T2.MAINLANGUAGETYPE,
T9.NOMINALCURR, T9.COMPOUNDTYPE, T9.PORTFOLIONO,
T9.ISINSTANCE, T9.CAPMARKETLOCATION, T9.STATUSDATE,
T9.DELIVERYTYPE, T9.TOFFUNDERTYPE, T9.DESCRIPTION_G,
T9.DESCRIPTION_E, T9.DESCRIPTION_F, T9.DESCRIPTION_I,
T9.DESCRIPTION_N, T2.ISSUEPRICERATE, T2.TITELARTZUSATZTEXT,
T2.BORROWINGLIMITTYPE, T2.ISVSTQUALITYCHECKED
FROM VDPS2.VTINSTRFLATSYMBOLS T1
INNER JOIN
VDPS2.VTINSTRFLATDATA T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTIFLATSYMBOLS T3
ON T3.INSTITUTIONID = T2.ORIGINALISSUER
INNER JOIN
VDPS2.VTINSTITUTION T4
ON T4.INSTITUTIONID = T2.ORIGINALISSUER
INNER JOIN
VDPS2.VTINSTRUMENT T9
ON T9.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTIFLATSYMBOLS T5
ON T5.INSTITUTIONID = T2.ISSUER
INNER JOIN
VDPS2.VTINSTITUTION T6
ON T6.INSTITUTIONID = T2.ISSUER
LEFT OUTER JOIN
VDPS2.CTINSTRDETAILS T7
ON T7.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPS2.CTINSTRSP42DETAILS T8
ON T8.INSTRUMENTID = T1.INSTRUMENTID ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.IDS_VINOP140_V03 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VINOP140_V03 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VINOP140_V03 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VINOP140_V03 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VINOP140_V03 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VINOP140_V03 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VINOP140_V03 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.IDS_VINOP140_V03 FOR VDPS2.IDS_VINOP140_V03 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.IDS_VINSS105
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.IDS_VINSS105 AS
SELECT T1.INSTRUMENTID, T1.EXERCISEAMOUNT, T1.MINEXERCISEAMOUNT,
T1.EXERCISECURR, T1.EXERCISECURR_I2, T1.EXERCISECURR_I1,
T1.EXERCISECURR_WS80, T1.UNDERINSTRUMENT,
T1.UNDERINSTRUMENT_CH, T1.UNDERINSTRUMENT_ISIN,
T1.UNDERINSTRUMENT_CSFI, T1.HASMULTIUNDERLYERS,
T2.NOMINALCURR, T2.NOMINALCURR_I2, T2.NOMINALCURR_I1,
T2.NOMINALCURR_WS80, T3.DOMICILE, T3.DOMICILE_A2,
T3.DOMICILE_A3, T3.DOMICILE_WS80, T1.HELDAMOUNT,
T1.PAYAMOUNT, T1.PAYDIRECTIONTYPE, T1.OPTIONTYPE,
T1.SETTLESTYLETYPE, T1.OPTIONSTYLETYPE,
T1.EXERCISEBEGINDATE, T1.EXERCISEENDDATE, T1.EXERCISEPLACE,
T1.INCOMETAXRATE, T1.PREMIUMRATE, T1.PARTICIPATIONRATE,
T1.REBATE
FROM VDPS2.VTINSTRFLATDATA T1
LEFT OUTER JOIN
VDPS2.VTINSTRFLATDATA T2
ON T2.INSTRUMENTID = T1.UNDERINSTRUMENT
INNER JOIN
VDPS2.VTINSTITUTION T3
ON T3.INSTITUTIONID = T2.ISSUER ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.IDS_VINSS105 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VINSS105 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.IDS_VINSS105 FOR VDPS2.IDS_VINSS105 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.IDS_VISCD103
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","S100447" ;
--
CREATE VIEW VDPS2.IDS_VISCD103 AS
SELECT T1.INSTRUMENTID, T1.ISSUEAMOUNT, T1.ISSUEPRICE,
T1.ISSUEPRICECURR, T1.ISSUEPRICECURR_I2,
T1.ISSUEPRICECURR_I1, T1.ISSUEPRICECURR_WS80,
T1.SUBSCRBEGINDATE, T1.SUBSCRPLNDENDDATE,
T1.SUBSCRMETHODTYPE, T1.PAYMENTDATE, T1.PLACEMENTTYPE,
T1.ORIGINALISSUER, T1.ORIGINALISSUER_GK, T1.ISSUER,
T1.ISSUER_GK, T2.SHORTNAME_G SHORTNAME_G_ORG_ISSUER,
T2.SHORTNAME_E SHORTNAME_E_ORG_ISSUER,
T2.SHORTNAME_F SHORTNAME_F_ORG_ISSUER,
T2.SHORTNAME_I SHORTNAME_I_ORG_ISSUER,
T2.SHORTNAME_N SHORTNAME_N_ORG_ISSUER,
T2.DOMICILE DOMICILE_ORG_ISSUER,
T2.DOMICILE_A2 DOMICILE_A2_ORG_ISSUER,
T2.DOMICILE_A3 DOMICILE_A3_ORG_ISSUER,
T2.DOMICILE_WS80 DOMICILE_WS80_ORG_ISSUER, T2.NAME_G,
T2.NAME_E, T2.NAME_F, T2.NAME_I, T2.NAME_N,
T2.STATUSTYPE STATUSTYPE_ORG_ISSUER, T2.INDUSTRYCS,
T2.INDUSTRYTKBN, T2.INDUSTRYMSCI,
T3.SHORTNAME_G SHORTNAME_G_ISSUER,
T3.SHORTNAME_E SHORTNAME_E_ISSUER,
T3.SHORTNAME_F SHORTNAME_F_ISSUER,
T3.SHORTNAME_I SHORTNAME_I_ISSUER,
T3.SHORTNAME_N SHORTNAME_N_ISSUER,
T3.DOMICILE DOMICILE_ISSUER,
T3.DOMICILE_A2 DOMICILE_A2_ISSUER,
T3.DOMICILE_A3 DOMICILE_A3_ISSUER,
T3.DOMICILE_WS80 DOMICILE_WS80_ISSUER,
T3.STATUSTYPE STATUSTYPE_ISSUER,
T1.CREATETIMESTAMP CREATETIMESTAMP_FLTDATA,
T1.UPDATETIMESTAMP UPDATETIMESTAMP_FLTDATA,
T2.CREATETIMESTAMP CREATETIMESTAMP_INSTI,
T2.UPDATETIMESTAMP UPDATETIMESTAMP_INSTI
FROM VDPS2.VTINSTRFLATDATA T1
INNER JOIN
VDPS2.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.ORIGINALISSUER
INNER JOIN
VDPS2.VTINSTITUTION T3
ON T3.INSTITUTIONID = T1.ISSUER ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.IDS_VISCD103 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VISCD103 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.IDS_VISCD103 FOR VDPS2.IDS_VISCD103 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.IDS_VITBD112
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.IDS_VITBD112 AS
SELECT T1.INSTITUTIONID, T2.SYMBOLGK, T1.SHORTNAME_G,
T1.SHORTNAME_E, T1.SHORTNAME_F, T1.SHORTNAME_I,
T1.SHORTNAME_N, T1.NAME_G, T1.NAME_E, T1.NAME_F, T1.NAME_I,
T1.NAME_N, T1.FOTYPE, T1.STATUSTYPE, T1.MAINLANGUAGETYPE,
T1.DOMICILE, T1.DOMICILE_A2, T1.DOMICILE_A3,
T1.DOMICILE_WS80, T1.INTERNETDOMAIN, T1.INDUSTRYCS,
T1.INDUSTRYTKBN, T1.INDUSTRYMSCI, T1.INDUSTRYMFIB,
T1.INDUSTRYMFIS, T1.INDUSTRYICB, T1.INDUSTRYBDF,
T1.LEGALFORMTYPE, T1.PREVFINYEARENDDATE,
T1.REGISTERENTRYDATE, T1.REGENTRYDELETIONDT,
T1.MDYISSUERRATING, T1.MDYISSUERRATINGDATE,
T1.MDYISSUERWATCHLISTSTATUSTYPE, T1.SPISSUERRATING,
T1.SPISSUERRATINGDATE, T1.SPISSUERWATCHLISTSTATUSTYPE,
T1.FITCHISSUERRATING, T1.FITCHISSUERRATINGDATE,
T1.FITCHISSUERWATCHLISTSTATUSTYPE,
T1.CREATETIMESTAMP CREATETIMESTAMP_INSTI,
T1.UPDATETIMESTAMP UPDATETIMESTAMP_INSTI,
T2.CREATETIMESTAMP CREATETIMESTAMP_FLTSYMB,
T2.UPDATETIMESTAMP UPDATETIMESTAMP_FLTSYMB
FROM VDPS2.VTINSTITUTION T1
INNER JOIN
VDPS2.VTINSTIFLATSYMBOLS T2
ON T1.INSTITUTIONID = T2.INSTITUTIONID ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.IDS_VITBD112 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VITBD112 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.IDS_VITBD112 FOR VDPS2.IDS_VITBD112 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.IDS_VITCR118_V02
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
--
CREATE VIEW VDPS2.IDS_VITCR118_V02 AS
SELECT T1.SYMBOLCH, T1.INSTRUMENTID, T2.ROLETYPE,
T3.IDSYMBOL IDSYMBOL_RATING, T3.SCHEMESYMBOL SCHEME_RATING,
T3.RATINGDATE, T3.WATCHLISTSTATTYPE, T3.RATINGSTATUSTYPE,
T4.RATINGSCALEVALUE, T6.IDSYMBOL IDSYMBOL_INSTI_RATING,
T6.SCHEMESYMBOL SCHEME_INSTI_RATING,
T7.IDSYMBOL IDSYMBOL_INSTI, T7.SCHEMESYMBOL SCHEME_INSTI,
T8.STATUSTYPE
FROM VDPS2.VTINSTRFLATSYMBOLS T1
INNER JOIN
VDPS2.VTINSTIROLE T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTIRATING T3
ON T3.INSTITUTIONID = T2.INSTITUTIONID
INNER JOIN
VDPS2.VTRATINGSYMBOL T4
ON T4.RATINGSYMBOLID = T3.INSTIRATINGNO
INNER JOIN
VDPS2.VTRATINGSCHEME T5
ON T5.SCHEMESYMBOL = T3.SCHEMESYMBOL
INNER JOIN
VDPS2.VTINSTIIDENT T6
ON T6.INSTITUTIONID = T5.INSTITUTIONID
INNER JOIN
VDPS2.VTINSTIIDENT T7
ON T7.INSTITUTIONID = T2.INSTITUTIONID
INNER JOIN
VDPS2.VTINSTITUTION T8
ON T8.INSTITUTIONID = T2.INSTITUTIONID ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.IDS_VITCR118_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VITCR118_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VITCR118_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VITCR118_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VITCR118_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VITCR118_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VITCR118_V02 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.IDS_VITCR118_V02 FOR VDPS2.IDS_VITCR118_V02 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.IDS_VLSTG111
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.IDS_VLSTG111 AS
SELECT T1.INSTRUMENTID, T1.LISTINGNO, T2.SYMBOLCH, T2.SYMBOLISIN,
T2.SYMBOLCSFI, T1.CURRENCY, T1.CURRENCY_I2, T1.CURRENCY_I1,
T1.CURRENCY_WS80, T1.TRADINGPLACE, T1.TRADINGPLACE_BCN,
T1.TRADINGPLACE_MIC, T1.TRADINGPLACE_RTX,
T1.TRADINGPLACE_BBX, T1.TRADINGPLACE_WS80,
T3.SHORTNAME_G SHORTNAME_G_INSTI,
T3.SHORTNAME_E SHORTNAME_E_INSTI,
T3.SHORTNAME_F SHORTNAME_F_INSTI,
T3.SHORTNAME_I SHORTNAME_I_INSTI,
T3.SHORTNAME_N SHORTNAME_N_INSTI, T1.LISTINGSYMBOLTK,
T1.LISTINGSYMBOLRT, T1.LISTINGSYMBOLBB,
T1.SHORTNAME_G SHORTNAME_G_LISG,
T1.SHORTNAME_E SHORTNAME_E_LISG,
T1.SHORTNAME_F SHORTNAME_F_LISG,
T1.SHORTNAME_I SHORTNAME_I_LISG,
T1.SHORTNAME_N SHORTNAME_N_LISG, T1.LISTINGSTATUSTYPE,
T1.TRADINGSTATUSTYPE, T1.FIRSTTRADINGDATE,
T1.LASTTRADINGDATE, T1.ISMAINTRADINGPLACE,
T1.ISHOMETRADINGPLACE, T1.LISTINGCLASSTYPE,
T1.PRICINGUNITNO, T1.PRICINGUNITTYPE, T1.TRADINGUNITNO,
T1.TRADINGUNITTYPE, T1.TRADINGRULETYPE,
T1.ISCSBESTVENUEOVERALL, T1.ISCSBESTVENUEPERCURR,
T1.ISBESTVOLUMEBESTSPREAD, T1.ISBESTVOLUME,
T1.ISBESTSPREAD, T1.ISHIGHESTTICKS, T1.ISBESTVOLUMEPERCURR,
T1.ISBESTSPREADPERCURR, T1.ISPRIMARYMARKETUSA,
T1.ISSINGLETRADINGPLACE, T1.ISISSUERPRICEPROVIDER,
T1.ISNAVINDEPENDENTSOURCE, T1.ISFUNDASSESSMENTSOURCE,
T1.ISPLACEOFLISTING, T1.ISPLACEOFTRADING, T1.ISPLACEOFQUOTE
FROM VDPS2.VTLISTING T1
INNER JOIN
VDPS2.VTINSTRFLATSYMBOLS T2
ON T1.INSTRUMENTID = T2.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTITUTION T3
ON T3.INSTITUTIONID = T1.TRADINGPLACE ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.IDS_VLSTG111 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VLSTG111 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VLSTG111 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.IDS_VLSTG111 FOR VDPS2.IDS_VLSTG111 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.IDS_VLSTG111_V02
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1P" ;
--
CREATE VIEW VDPS2.IDS_VLSTG111_V02 AS
SELECT T1.INSTRUMENTID, T1.LISTINGNO, T3.SYMBOLCH, T3.SYMBOLISIN,
T3.SYMBOLCSFI, T1.CURRENCY, T1.CURRENCY_I2, T1.CURRENCY_I1,
T1.CURRENCY_WS80, T1.TRADINGPLACE, T1.TRADINGPLACE_BCN,
T1.TRADINGPLACE_MIC, T1.TRADINGPLACE_RTX,
T1.TRADINGPLACE_BBX, T1.TRADINGPLACE_WS80,
T4.SHORTNAME_G SHORTNAME_G_INSTI,
T4.SHORTNAME_E SHORTNAME_E_INSTI,
T4.SHORTNAME_F SHORTNAME_F_INSTI,
T4.SHORTNAME_I SHORTNAME_I_INSTI,
T4.SHORTNAME_N SHORTNAME_N_INSTI, T1.LISTINGSYMBOLTK,
T1.LISTINGSYMBOLRT, T1.LISTINGSYMBOLBB,
T1.SHORTNAME_G SHORTNAME_G_LISG,
T1.SHORTNAME_E SHORTNAME_E_LISG,
T1.SHORTNAME_F SHORTNAME_F_LISG,
T1.SHORTNAME_I SHORTNAME_I_LISG,
T1.SHORTNAME_N SHORTNAME_N_LISG, T1.LISTINGSTATUSTYPE,
T1.TRADINGSTATUSTYPE, T1.FIRSTTRADINGDATE,
T1.LASTTRADINGDATE, T1.ISMAINTRADINGPLACE,
T1.ISHOMETRADINGPLACE, T1.LISTINGCLASSTYPE,
T1.PRICINGUNITNO, T1.PRICINGUNITTYPE, T1.TRADINGUNITNO,
T1.TRADINGUNITTYPE TRADINGUNITTYPE_LISTING,
T1.TRADINGRULETYPE, T1.ISCSBESTVENUEOVERALL,
T1.ISCSBESTVENUEPERCURR, T1.ISBESTVOLUMEBESTSPREAD,
T1.ISBESTVOLUME, T1.ISBESTSPREAD, T1.ISHIGHESTTICKS,
T1.ISBESTVOLUMEPERCURR, T1.ISBESTSPREADPERCURR,
T1.ISPRIMARYMARKETUSA, T1.ISSINGLETRADINGPLACE,
T1.ISISSUERPRICEPROVIDER, T1.ISNAVINDEPENDENTSOURCE,
T1.ISFUNDASSESSMENTSOURCE, T1.ISPLACEOFLISTING,
T1.ISPLACEOFTRADING, T1.ISPLACEOFQUOTE,
T1.PARENTTRADINGPLACE, T1.PARENTTRADINGPLACE_BCN,
T1.PARENTTRADINGPLACE_RTX, T1.PARENTTRADINGPLACE_MIC,
T1.PARENTTRADINGPLACE_BBX, T1.PARENTTRADINGPLACE_WS80,
T2.CONVERSIONFACTOR, T2.ISSTEERINGFLAG1,
T2.ISSTEERINGFLAG2, T2.ISSTEERINGFLAG3, T2.ISSTEERINGFLAG4,
T2.ISSTEERINGFLAG5, T2.ISSTEERINGFLAG6, T2.ISSTEERINGFLAG7,
T2.ISSTEERINGFLAG8, T2.PRIORITYCODE, T2.RESERVESYMBOL,
T2.TRADINGUNITTYPE TRADINGUNITTYPE_CSLISTING, T2.MANDATOR
FROM VDPS2.VTLISTING T1
INNER JOIN
VDPS2.CTLISTING T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND T2.LISTINGNO = T1.
LISTINGNO
INNER JOIN
VDPS2.VTINSTRFLATSYMBOLS T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTITUTION T4
ON T4.INSTITUTIONID = T1.TRADINGPLACE ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.IDS_VLSTG111_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VLSTG111_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VLSTG111_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VLSTG111_V02 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.IDS_VLSTG111_V02 FOR VDPS2.IDS_VLSTG111_V02 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.IDS_VTOFF110
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
--
CREATE VIEW VDPS2.IDS_VTOFF110 AS
SELECT T1.INSTRUMENTID, T1.TOFFCHIDSYMBOL, T1.TOFFISINIDSYMBOL,
T1.TOFFCSFIIDSYMBOL, T1.FOTYPE, T1.CONTRACTSIZE,
T1.CONTRACTUNITTYPE, T1.EXERCISECURR, T1.EXERCISECURR_I2,
T1.EXERCISECURR_I1, T1.EXERCISECURR_WS80,
T1.EXERCISEAMOUNT, T1.EXPIRATIONMONTH,
T1.FINALSETTLEMENTTP, T1.FINALUNDERINSTR,
T1.FINALUNDERINSTR_CH, T1.FINALUNDERINSTR_ISIN,
T1.FINALUNDERINSTR_CSFI, T1.MULTIPLIER, T1.OPTIONP42TYPE,
T1.OPTIONSTYLETYPE, T1.OPTIONTYPE, T1.UNDERAMOUNT,
T1.UNDERINSTRUMENT, T1.UNDERINSTRUMENT_CH,
T1.UNDERINSTRUMENT_ISIN, T1.UNDERINSTRUMENT_CSFI,
T1.UNDERUNITTYPE, T1.VERSIONSYMBOL, T1.UNDERLYINGNAME_G,
T1.UNDERLYINGNAME_E, T1.UNDERLYINGNAME_F,
T1.UNDERLYINGNAME_I, T1.UNDERLYINGNAME_N,
T1.UNDERFIXINIDSYMBOL, T1.CSSTATUSTYPE, T1.EXPIRATIONDATE,
T1.NAME_G, T1.NAME_E, T1.NAME_F, T1.NAME_I, T1.NAME_N,
T1.TOFFUNDERTYPE, T1.CSEXPIRATIONDATE, T1.TICK,
T1.TICKSIZE, T2.NOMINALCURR, T2.NOMINALCURR_I2,
T2.NOMINALCURR_I1, T2.NOMINALCURR_WS80, T3.DOMICILE,
T3.DOMICILE_A2, T3.DOMICILE_A3, T3.DOMICILE_WS80,
T3.SHORTNAME_G SHORTNAME_G_ISSUER,
T3.SHORTNAME_E SHORTNAME_E_ISSUER,
T3.SHORTNAME_F SHORTNAME_F_ISSUER,
T3.SHORTNAME_I SHORTNAME_I_ISSUER,
T3.SHORTNAME_N SHORTNAME_N_ISSUER, T3.NAME_G NAME_G_ISSUER,
T3.NAME_E NAME_E_ISSUER, T3.NAME_F NAME_F_ISSUER,
T3.NAME_I NAME_I_ISSUER, T3.NAME_N NAME_N_ISSUER,
T3.INDUSTRYTKBN INDUSTRYTKBN_ISSUER,
T3.INDUSTRYMSCI INDUSTRYMSCI_ISSUER, T4.ISOTC,
T4.SHORTNAME_G, T4.SHORTNAME_E, T4.SHORTNAME_F,
T4.SHORTNAME_I, T4.SHORTNAME_N, T4.NAME45_G, T4.NAME45_E,
T4.NAME45_F, T4.NAME45_I, T4.NAME45_N, T4.NAME35_G,
T4.NAME35_E, T4.NAME35_F, T4.NAME35_I, T4.NAME35_N,
T4.PREPARTICLE_G, T4.PREPARTICLE_E, T4.PREPARTICLE_F,
T4.PREPARTICLE_I, T4.PREPARTICLE_N, T4.POSTPARTICLE_G,
T4.POSTPARTICLE_E, T4.POSTPARTICLE_F, T4.POSTPARTICLE_I,
T4.POSTPARTICLE_N, T4.STATUSTYPE, T5.CATEGORYTKT,
T5.CATEGORYCSGTA, T6.NOMINALCURR_I2 NOMINALCURR_I2_UI,
T6.NOMINALCURR_I1 NOMINALCURR_I1_UI,
T6.NOMINALCURR_WS80 NOMINALCURR_WS80_UI,
T7.DOMICILE_A2 DOMICILE_A2_UI,
T7.DOMICILE_A3 DOMICILE_A3_UI,
T7.DOMICILE_WS80 DOMICILE_WS80_UI,
T7.SHORTNAME_G SHORTNAME_G_ISSUER_UI,
T7.SHORTNAME_E SHORTNAME_E_ISSUER_UI,
T7.SHORTNAME_F SHORTNAME_F_ISSUER_UI,
T7.SHORTNAME_I SHORTNAME_I_ISSUER_UI,
T7.SHORTNAME_N SHORTNAME_N_ISSUER_UI,
T7.NAME_G NAME_G_ISSUER_UI, T7.NAME_E NAME_E_ISSUER_UI,
T7.NAME_F NAME_F_ISSUER_UI, T7.NAME_I NAME_I_ISSUER_UI,
T7.NAME_N NAME_N_ISSUER_UI,
T7.INDUSTRYTKBN INDUSTRYTKBN_ISSUER_UI,
T7.INDUSTRYMSCI INDUSTRYMSCI_ISSUER_UI,
T1.UNDERINSTRUMENT_CUSIP, T1.FINALUNDERINSTR_CUSIP
FROM VDPS2.VTTOFF T1
INNER JOIN
VDPS2.VTINSTRFLATDATA T2
ON T2.INSTRUMENTID = T1.FINALUNDERINSTR
INNER JOIN
VDPS2.VTINSTITUTION T3
ON T3.INSTITUTIONID = T2.ISSUER
INNER JOIN
VDPS2.VTINSTRFLATDATA T4
ON T4.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTRFLATSYMBOLS T5
ON T5.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTRFLATDATA T6
ON T6.INSTRUMENTID = T1.UNDERINSTRUMENT
INNER JOIN
VDPS2.VTINSTITUTION T7
ON T7.INSTITUTIONID = T6.ISSUER ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.IDS_VTOFF110 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VTOFF110 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VTOFF110 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VTOFF110 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.IDS_VTOFF110 FOR VDPS2.IDS_VTOFF110 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.SMDS_RA08_V03
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.SMDS_RA08_V03 AS
SELECT DISTINCT '08' RECORD_TYPE,
SUBSTR(T1.IDSYMBOL, 1, 6) IDSYMBOL_GK,
SUBSTR(T3.SHORTNAME_E, 1, 20) SHORT_E,
SUBSTR(T3.SHORTNAME_G, 1, 20) SHORT_G,
SUBSTR(T3.SHORTNAME_I, 1, 20) SHORT_I,
SUBSTR(T3.SHORTNAME_F, 1, 20) SHORT_F,
SUBSTR(T3.SHORTNAME_N, 1, 20) SHORT_N,
SUBSTR(T3.NAME_E, 1, 80) LONG_E,
SUBSTR(T3.NAME_G, 1, 80) LONG_G,
SUBSTR(T3.NAME_I, 1, 80) LONG_I,
SUBSTR(T3.NAME_F, 1, 80) LONG_F,
SUBSTR(T3.NAME_N, 1, 80) LONG_N, T3.MAINLANGUAGETYPE,
T3.CREATETIMESTAMP, T3.UPDATETIMESTAMP, T3.STATUSTYPE,
T3.DOMICILE_A2 DOMICILE_A2,
T3.TAXDOMICILE_A2 TAXDOMICILE_A2, T3.INDUSTRYTKBN TKBN
FROM VDPS2.VTINSTIIDENT T1
INNER JOIN
VDPS2.VTINSTIROLE T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND T2.ROLETYPE IN(1
, 25)
INNER JOIN
VDPS2.VTINSTITUTION T3
ON T3.INSTITUTIONID = T1.INSTITUTIONID AND (T3.ROWSTATUS
IS NULL OR T3.ROWSTATUS <> 2)
WHERE T1.SCHEMESYMBOL = 'GK'
AND T1.ROWSTATUS = 1 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.SMDS_RA08_V03 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.SMDS_RA08_V03 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.SMDS_RA08_V03 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.SMDS_RA08_V03 FOR VDPS2.SMDS_RA08_V03 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.SMDS_RA15
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.SMDS_RA15 AS
SELECT DISTINCT '15' RECORD_TYPE, T1.IDSYMBOL TKKEY,
T9.IDSYMBOL ISIN, T3.IDSYMBOL CURRENCY_CS,
T6.TRADINGPLACE_BCN EXCHANGE_CODE, T7.IDSYMBOL TICKER,
SUBSTR(T5.SHORTNAME_G, 1, 20) SHORTNAME_G,
SUBSTR(T5.SHORTNAME_E, 1, 20) SHORTNAME_E,
SUBSTR(T5.SHORTNAME_I, 1, 20) SHORTNAME_I,
SUBSTR(T5.SHORTNAME_F, 1, 20) SHORTNAME_F,
SUBSTR(T5.SHORTNAME_N, 1, 20) SHORTNAME_N,
T6.CURRENCY LISTING_CURRENCY,
SUBSTR(T6.SHORTNAME_G, 1, 20) LISTINGNAME_G,
SUBSTR(T6.SHORTNAME_E, 1, 20) LISTINGNAME_E,
SUBSTR(T6.SHORTNAME_I, 1, 20) LISTINGNAME_I,
SUBSTR(T6.SHORTNAME_F, 1, 20) LISTINGNAME_F,
SUBSTR(T6.SHORTNAME_N, 1, 20) LISTINGNAME_N,
T6.MARKTPRACTIDSYMBOL, T6.FIRSTTRADINGDATE,
T6.LASTTRADINGDATE, T6.ISMAINTRADINGPLACE,
T6.ISHOMETRADINGPLACE, T6.CREATETIMESTAMP,
T6.UPDATETIMESTAMP, T6.LISTINGSTATUSTYPE,
T8.INSTITUTIONID INSTRSERVICEID, T8.HASPHYSICALTRADING,
T8.HASELTRONICTRADING, T8.HASELTRONICMATCH
FROM VDPS2.VTLISTING T6
INNER JOIN
VDPS2.VTINSTRIDENT T1
ON T1.INSTRUMENTID = T6.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND T2.ROWSTATUS IS
NULL AND T2.ISRELEVANT = 1
INNER JOIN
VDPS2.VTINSTITUTION T5
ON T5.INSTITUTIONID = T6.TRADINGPLACE AND T5.ROWSTATUS IS
NULL
INNER JOIN
VDPS2.VTTRADINGPLACE T8
ON T8.INSTITUTIONID = T6.TRADINGPLACE
LEFT OUTER JOIN
VDPS2.VTINSTRIDENT T9
ON T9.INSTRUMENTID = T1.INSTRUMENTID AND T9.SCHEMESYMBOL =
'I-' AND T9.ROWSTATUS = 1
LEFT OUTER JOIN
VDPS2.VTINSTRIDENT T3
ON T3.INSTRUMENTID = T6.CURRENCY AND T3.SCHEMESYMBOL =
'I2' AND T3.ROWSTATUS = 1
LEFT OUTER JOIN
VDPS2.VTLISTINGIDENT T7
ON T7.INSTRUMENTID = T6.INSTRUMENTID AND T7.LISTINGNO = T6.
LISTINGNO AND T7.SCHEMESYMBOL = 'TKH'
WHERE T1.SCHEMESYMBOL = 'CH'
AND T1.ROWSTATUS = 1
AND T7.IDSYMBOL IS NOT NULL
AND T6.LISTINGSTATUSTYPE <> 9
AND T6.LISTINGSTATUSTYPE <> 18 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.SMDS_RA15 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.SMDS_RA15 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.SMDS_RA15 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.SMDS_RA15 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.SMDS_RA15 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.SMDS_RA15 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.SMDS_RA15 FOR VDPS2.SMDS_RA15 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.VVV_XPS_IL#VLIID_V01
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.VVV_XPS_IL#VLIID_V01 AS
SELECT CHAR(T1.IDSYMBOL, 9) AS VALORNR,
CHAR(T8.IDSYMBOL, 4) AS CURRENCY_CS, T3.LISTINGSTATUSTYPE,
T3.TRADINGSTATUSTYPE, T3.ISHOMETRADINGPLACE,
CHAR(T4.IDSYMBOL, 4) AS IDSYMBOL_BCN,
CHAR(T5.DOMICILE_WS80, 3) AS DOMICILE_CS,
T7.ISSTEERINGFLAG4 AS CS_HAUPTBOEPLATZ,
T3.ISMAINTRADINGPLACE AS TK_HAUPTBOEPLATZ,
T3.ISCSBESTVENUEOVERALL, T3.ISCSBESTVENUEPERCURR,
CHAR(T6.SCHEMESYMBOL, 3) AS SCHEME_TICKER,
SUBSTR(T6.IDSYMBOL, 1, 30) AS IDSYMBOL_TICKER,
T3.DESCRIPTION_E AS EXTERNTRADINGCURR
FROM VDPS2.VTINSTRIDENT T1
INNER JOIN
VDPS2.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2) AND T2.CSSTATUSTYPE BETWEEN 4
AND 9
INNER JOIN
VDPS2.VTLISTING T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPS2.VTINSTIIDENT T4
ON T4.INSTITUTIONID = T3.TRADINGPLACE AND T4.SCHEMESYMBOL
= 'BCN' AND T4.ROWSTATUS = 1
INNER JOIN
VDPS2.VTINSTITUTION T5
ON T5.INSTITUTIONID = T3.TRADINGPLACE AND (T5.ROWSTATUS IS
NULL OR T5.ROWSTATUS <> 2)
LEFT OUTER JOIN
VDPS2.VTLISTINGIDENT T6
ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
LISTINGNO AND T6.SCHEMESYMBOL IN('TKH', 'RIC', 'BBI', 'TKE')
LEFT OUTER JOIN
VDPS2.CTLISTING T7
ON T7.INSTRUMENTID = T3.INSTRUMENTID AND T7.LISTINGNO = T3.
LISTINGNO AND T7.MANDATOR = 1
LEFT OUTER JOIN
VDPS2.VTINSTRIDENT T8
ON T8.INSTRUMENTID = T3.CURRENCY AND T8.SCHEMESYMBOL =
'CS-WS80-WHRG' AND T8.ROWSTATUS = 1
WHERE T1.SCHEMESYMBOL = 'CH'
AND T1.ROWSTATUS = 1
AND (T3.LISTINGSTATUSTYPE IN(1, 4, 13, 17, 21)
OR T7.ISSTEERINGFLAG4 = 1) ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_IL#VLIID_V01 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_IL#VLIID_V01 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_IL#VLIID_V01 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_IL#VLIID_V01 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_IL#VLIID_V01 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_IL#VLIID_V01 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_IL#VLIID_V01 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.VVV_XPS_IL#VLIID_V01 FOR VDPS2.VVV_XPS_IL#VLIID_V01
;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.VVV_XPS_VLIID002_V07
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.VVV_XPS_VLIID002_V07 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T1.INSTRUMENTID,
T3.CREATETIMESTAMP, T3.UPDATETIMESTAMP, T3.LISTINGNO,
T6.LISTINGIDENTNO, T3.LISTINGSTATUSTYPE,
T3.TRADINGSTATUSTYPE, T3.FIRSTTRADINGDATE,
T3.LASTTRADINGDATE, T3.ISHOMETRADINGPLACE,
T3.ISMAINTRADINGPLACE TK_HAUPTBOEPLATZ,
T7.ISSTEERINGFLAG4 CS_HAUPTBOEPLATZ,
T3.ISCSBESTVENUEOVERALL, T3.ISCSBESTVENUEPERCURR,
T3.TRADINGPLACE, T3.CURRENCY, T8.IDSYMBOL CURRENCY_CS,
T4.IDSYMBOL IDSYMBOL_BCN, T5.DOMICILE,
T5.DOMICILE_WS80 DOMICILE_CS,
T6.SCHEMESYMBOL SCHEME_TICKER, T6.IDSYMBOL IDSYMBOL_TICKER,
T6.VALIDFROMDATE, T6.VALIDUNTILDATE,
T3.DESCRIPTION_E EXTERNTRADINGCURR
FROM VDPS2.VTINSTRIDENT T1
INNER JOIN
VDPS2.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPS2.VTLISTING T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPS2.VTINSTIIDENT T4
ON T4.INSTITUTIONID = T3.TRADINGPLACE AND T4.SCHEMESYMBOL
= 'BCN' AND T4.ROWSTATUS = 1
INNER JOIN
VDPS2.VTINSTITUTION T5
ON T5.INSTITUTIONID = T3.TRADINGPLACE AND (T5.ROWSTATUS IS
NULL OR T5.ROWSTATUS <> 2)
LEFT OUTER JOIN
VDPS2.VTLISTINGIDENT T6
ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
LISTINGNO AND T6.SCHEMESYMBOL IN('TKH', 'RIC', 'BBI', 'TKE')
LEFT OUTER JOIN
VDPS2.CTLISTING T7
ON T7.INSTRUMENTID = T3.INSTRUMENTID AND T7.LISTINGNO = T3.
LISTINGNO AND T7.MANDATOR = 1
LEFT OUTER JOIN
VDPS2.VTINSTRIDENT T8
ON T8.INSTRUMENTID = T3.CURRENCY AND T8.SCHEMESYMBOL =
'CS-WS80-WHRG' AND T8.ROWSTATUS = 1
WHERE T1.ROWSTATUS = 1
AND T3.LISTINGSTATUSTYPE <> 9
AND T3.LISTINGSTATUSTYPE <> 18 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_VLIID002_V07 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_VLIID002_V07 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_VLIID002_V07 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_VLIID002_V07 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_VLIID002_V07 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_VLIID002_V07 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_VLIID002_V07 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.VVV_XPS_VLIID002_V07 FOR VDPS2.VVV_XPS_VLIID002_V07
;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_IL#VINLI
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.XPS_IL#VINLI AS
SELECT CHAR(T1.IDSYMBOL, 9) AS VALORNR,
T5.IDSYMBOL AS IDSYMBOL_GK,
CHAR(T4.DOMICILE_WS80, 3) AS DOMICILE_CS, T4.SHORTNAME_G,
T4.SHORTNAME_E, T4.SHORTNAME_F, T4.SHORTNAME_I,
T4.SHORTNAME_N, T4.NAME_G, T4.NAME_E, T4.NAME_F, T4.NAME_I,
T4.NAME_N, DEC(T6.RESERVENUMBER6, 15, 6) AS RESNR6,
CHAR(T4.INDUSTRYCS, 3) AS CS_BRAN,
CHAR(T4.INDUSTRYTKBN, 2) AS TKBN
FROM VDPS2.VTINSTRIDENT T1
INNER JOIN
VDPS2.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPS2.VTINSTIROLE T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID AND T3.ROLETYPE IN(1,
25)
INNER JOIN
VDPS2.VTINSTITUTION T4
ON T4.INSTITUTIONID = T3.INSTITUTIONID AND (T4.ROWSTATUS
IS NULL OR T4.ROWSTATUS <> 2)
INNER JOIN
VDPS2.VTINSTIIDENT T5
ON T5.INSTITUTIONID = T4.INSTITUTIONID AND T5.SCHEMESYMBOL
= 'GK' AND T5.ROWSTATUS = 1
LEFT OUTER JOIN
VDPS2.CTINSTRSP42DETAILS T6
ON T6.INSTRUMENTID = T2.INSTRUMENTID AND T6.MANDATOR = 1
WHERE T1.SCHEMESYMBOL = 'CH'
AND T1.ROWSTATUS = 1 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_IL#VINLI TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_IL#VINLI TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_IL#VINLI TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_IL#VINLI TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_IL#VINLI TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_IL#VINLI TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_IL#VINLI FOR VDPS2.XPS_IL#VINLI ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_IL#VLIID
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.XPS_IL#VLIID AS
SELECT CHAR(T1.IDSYMBOL, 9) AS VALORNR,
CHAR(T8.IDSYMBOL, 4) AS CURRENCY_CS, T3.LISTINGSTATUSTYPE,
T3.TRADINGSTATUSTYPE, T3.ISHOMETRADINGPLACE,
CHAR(T4.IDSYMBOL, 4) AS IDSYMBOL_BCN,
CHAR(T5.DOMICILE_WS80, 3) AS DOMICILE_CS,
T7.ISSTEERINGFLAG4 AS CS_HAUPTBOEPLATZ,
T3.ISMAINTRADINGPLACE AS TK_HAUPTBOEPLATZ,
T3.ISCSBESTVENUEOVERALL, T3.ISCSBESTVENUEPERCURR,
CHAR(T6.SCHEMESYMBOL, 3) AS SCHEME_TICKER,
SUBSTR(T6.IDSYMBOL, 1, 30) AS IDSYMBOL_TICKER,
T3.DESCRIPTION_E AS EXTERNTRADINGCURR
FROM VDPS2.VTINSTRIDENT T1
INNER JOIN
VDPS2.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2) AND T2.CSSTATUSTYPE BETWEEN 4
AND 9
INNER JOIN
VDPS2.VTLISTING T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPS2.VTINSTIIDENT T4
ON T4.INSTITUTIONID = T3.TRADINGPLACE AND T4.SCHEMESYMBOL
= 'BCN' AND T4.ROWSTATUS = 1
INNER JOIN
VDPS2.VTINSTITUTION T5
ON T5.INSTITUTIONID = T3.TRADINGPLACE AND (T5.ROWSTATUS IS
NULL OR T5.ROWSTATUS <> 2)
LEFT OUTER JOIN
VDPS2.VTLISTINGIDENT T6
ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
LISTINGNO AND T6.SCHEMESYMBOL IN('TKH', 'RIC', 'BBI')
LEFT OUTER JOIN
VDPS2.CTLISTING T7
ON T7.INSTRUMENTID = T3.INSTRUMENTID AND T7.LISTINGNO = T3.
LISTINGNO AND T7.MANDATOR = 1
LEFT OUTER JOIN
VDPS2.VTINSTRIDENT T8
ON T8.INSTRUMENTID = T3.CURRENCY AND T8.SCHEMESYMBOL =
'CS-WS80-WHRG' AND T8.ROWSTATUS = 1
WHERE T1.SCHEMESYMBOL = 'CH'
AND T1.ROWSTATUS = 1
AND (T3.LISTINGSTATUSTYPE IN(1, 4, 13, 17, 21)
OR T7.ISSTEERINGFLAG4 = 1) ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_IL#VLIID TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_IL#VLIID TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_IL#VLIID TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_IL#VLIID TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_IL#VLIID TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_IL#VLIID TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_IL#VLIID TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_IL#VLIID FOR VDPS2.XPS_IL#VLIID ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VCOMP000
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F326930" ;
--
CREATE VIEW VDPS2.XPS_VCOMP000 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T1.INSTITUTIONID,
T2.PORTFOLIONO, T2.ACCOUNTINGCURR,
T4.IDSYMBOL ACCOUNTINGCURR_I2,
T5.IDSYMBOL ACCOUNTINGCURR_CS, T2.FOUNDATIONDATE,
T2.PREVFINYEARENDDATE, T2.ACTFINYEARENDDATE,
T2.REGISTERENTRYDATE, T2.REGENTRYDELETIONDT,
T2.LEGALFORMTYPE, T2.CREATETIMESTAMP, T2.UPDATETIMESTAMP
FROM VDPS2.VTINSTIIDENT T1
INNER JOIN
VDPS2.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND (T2.ROWSTATUS
IS NULL OR T2.ROWSTATUS <> 2)
LEFT OUTER JOIN
VDPS2.VTINSTRIDENT T4
ON T4.INSTRUMENTID = T2.ACCOUNTINGCURR AND T4.SCHEMESYMBOL
= 'I2' AND T4.ROWSTATUS = 1
LEFT OUTER JOIN
VDPS2.VTINSTRIDENT T5
ON T5.INSTRUMENTID = T2.ACCOUNTINGCURR AND T5.SCHEMESYMBOL
= 'CS-WS80-WHRG' AND T5.ROWSTATUS = 1
WHERE T1.ROWSTATUS = 1 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VCOMP000 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VCOMP000 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VCOMP000 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VCOMP000 FOR VDPS2.XPS_VCOMP000 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VCOPR002_V02
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
--
CREATE VIEW VDPS2.XPS_VCOPR002_V02 AS
SELECT T1.SYMBOLCH, T1.SYMBOLISIN IDSYMBOL_ISIN,
T1.CATEGORYCSGTA IDSYMBOL_CSGTA, T2.STATUSTYPE, T2.NAME_G,
T2.NAME_E, T2.NAME_F, T2.NAME_I, T2.NAME_N,
T4.IDSYMBOL NOMINALCURR_I2, T7.MATURITYDATE,
A1.SYMBOLCH IDSYMBOL_SNB,
CAST(A2.SHORTNAME_E AS CHAR( 30)) SHORTNAME_E_SNB,
T8.ROLETYPE, T8.INSTITUTIONID, T9.IDSYMBOL IDSYMBOL_GK,
T10.SHORTNAME_G, T10.SHORTNAME_E, T10.SHORTNAME_F,
T10.SHORTNAME_I, T10.SHORTNAME_N, T2.CREATETIMESTAMP,
T2.UPDATETIMESTAMP, T10.CREATETIMESTAMP CREATETIMESTAMP_IS,
T10.UPDATETIMESTAMP UPDATETIMESTAMP_IS
FROM VDPS2.VTINSTRFLATSYMBOLS A1
INNER JOIN
VDPS2.VTINSTRUMENT A2
ON A2.INSTRUMENTID = A1.INSTRUMENTID AND (A2.ROWSTATUS IS
NULL OR A2.ROWSTATUS <> 2)
INNER JOIN
VDPS2.VTINSTRSTRUCT A3
ON A3.INSTRUMENTID = A1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTRFLATSYMBOLS T1
ON T1.INSTRUMENTID = A3.CHILDINSTRID AND T1.ROWSTATUS = 1
INNER JOIN
VDPS2.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND T1.ROWSTATUS = 1
AND (T2.ROWSTATUS IS NULL OR T2.ROWSTATUS <> 2)
LEFT OUTER JOIN
VDPS2.VTINSTRIDENT T4
ON T4.INSTRUMENTID = T2.NOMINALCURR AND T4.SCHEMESYMBOL =
'I2' AND T4.ROWSTATUS = 1
LEFT OUTER JOIN
VDPS2.VTINSTRWITHCF T7
ON T7.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPS2.VTINSTIROLE T8
ON T8.INSTRUMENTID = T1.INSTRUMENTID AND T8.ROLETYPE = 2
LEFT OUTER JOIN
VDPS2.VTINSTIIDENT T9
ON T9.INSTITUTIONID = T8.INSTITUTIONID AND T9.SCHEMESYMBOL
= 'GK' AND T9.ROWSTATUS = 1
LEFT OUTER JOIN
VDPS2.VTINSTITUTION T10
ON T10.INSTITUTIONID = T9.INSTITUTIONID AND (T10.ROWSTATUS
IS NULL OR T10.ROWSTATUS <> 2)
WHERE A1.ROWSTATUS = 1
AND A1.SYMBOLCH IN('2584417', '2584418', '1609728') ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VCOPR002_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VCOPR002_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VCOPR002_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VCOPR002_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VCOPR002_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VCOPR002_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VCOPR002_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VCOPR002_V02 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VCOPR002_V02 FOR VDPS2.XPS_VCOPR002_V02 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VDISP000
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F281992" ;
--
CREATE VIEW VDPS2.XPS_VDISP000 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL,
T5.SCHEMESYMBOL PARENT_SCHEME, T5.IDSYMBOL PARENT_IDSYMBOL,
T3.BEGINDATE, T3.ENDDATE, T3.TYPEX, T3.MGMTCONTRACTTYPE,
T3.CHILDINSTIID, T3.PARENTINSTIID, T3.INSTISTRUCTNO,
T3.CREATETIMESTAMP, T3.UPDATETIMESTAMP,
T2.CREATETIMESTAMP CREATETIMESTAMP_IC,
T2.UPDATETIMESTAMP UPDATETIMESTAMP_IC,
T4.CREATETIMESTAMP CREATETIMESTAMP_IP,
T4.UPDATETIMESTAMP UPDATETIMESTAMP_IP
FROM VDPS2.VTINSTIIDENT T1
INNER JOIN
VDPS2.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND (T2.ROWSTATUS
IS NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPS2.VTINSTISTRUCT T3
ON T3.CHILDINSTIID = T2.INSTITUTIONID
INNER JOIN
VDPS2.VTINSTITUTION T4
ON T4.INSTITUTIONID = T3.PARENTINSTIID AND (T4.ROWSTATUS
IS NULL OR T4.ROWSTATUS <> 2)
INNER JOIN
VDPS2.VTINSTIIDENT T5
ON T5.INSTITUTIONID = T4.INSTITUTIONID AND T5.ROWSTATUS = 1
WHERE T1.ROWSTATUS = 1 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VDISP000 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VDISP000 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VDISP000 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VDISP000 FOR VDPS2.XPS_VDISP000 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VDOMI000_V02
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
--
CREATE VIEW VDPS2.XPS_VDOMI000_V02 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T1.INSTITUTIONID,
T2.DOMICILE, T2.DOMICILE_WS80, T2.DOMICILE_A2,
T2.DOMICILE_A3, T2.CREATETIMESTAMP CREATETIMESTAMP_DO,
T2.UPDATETIMESTAMP UPDATETIMESTAMP_DO, T5.FOTYPE,
T5.LOCATIONTYPE, T5.REGIONTYPE, T5.VALIDFROMDATE,
T5.VALIDUNTILDATE, T5.CREATETIMESTAMP CREATETIMESTAMP_GU,
T5.UPDATETIMESTAMP UPDATETIMESTAMP_GU, T5.SHORTNAME_G,
T5.SHORTNAME_E, T5.SHORTNAME_F, T5.SHORTNAME_I,
T5.SHORTNAME_N, T5.NAME_G, T5.NAME_E, T5.NAME_F, T5.NAME_I,
T5.NAME_N
FROM VDPS2.VTINSTIIDENT T1
INNER JOIN
VDPS2.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND (T2.ROWSTATUS
IS NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPS2.VTGEOUNIT T5
ON T5.GEOUNITID = T2.DOMICILE AND (T5.ROWSTATUS IS NULL
OR T5.ROWSTATUS <> 2)
WHERE T1.ROWSTATUS = 1 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VDOMI000_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VDOMI000_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VDOMI000_V02 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VDOMI000_V02 FOR VDPS2.XPS_VDOMI000_V02 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VGEUC000_V02
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.XPS_VGEUC000_V02 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL,
T6.SCHEMESYMBOL CURRENCY_SCHEME,
T6.IDSYMBOL CURRENCY_IDSYMBOL, T5.FUNCTIONTYPE,
T5.ISLEGALTENDER, T5.VALIDFROMDATE, T5.VALIDUNTILDATE,
T1.INSTITUTIONID, T2.DOMICILE, T5.GEOUNITCURRNO,
T5.CURRENCY, T2.CREATETIMESTAMP CREATETIMESTAMP_DO,
T2.UPDATETIMESTAMP UPDATETIMESTAMP_DO,
T4.CREATETIMESTAMP CREATETIMESTAMP_GU,
T4.UPDATETIMESTAMP UPDATETIMESTAMP_GU,
T5.CREATETIMESTAMP CREATETIMESTAMP_GC,
T5.UPDATETIMESTAMP UPDATETIMESTAMP_GC
FROM VDPS2.VTINSTIIDENT T1
INNER JOIN
VDPS2.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND (T2.ROWSTATUS
IS NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPS2.VTGEOUNIT T4
ON T4.GEOUNITID = T2.DOMICILE AND (T4.ROWSTATUS IS NULL
OR T4.ROWSTATUS <> 2)
INNER JOIN
VDPS2.VTGEOUNITCURR T5
ON T5.GEOUNITID = T4.GEOUNITID
LEFT OUTER JOIN
VDPS2.VTINSTRIDENT T6
ON T6.INSTRUMENTID = T5.CURRENCY AND T6.ROWSTATUS = 1
WHERE T1.ROWSTATUS = 1 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VGEUC000_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VGEUC000_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VGEUC000_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VGEUC000_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VGEUC000_V02 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VGEUC000_V02 FOR VDPS2.XPS_VGEUC000_V02 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VINAC002_V02
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.XPS_VINAC002_V02 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T2.CREATETIMESTAMP,
T2.UPDATETIMESTAMP, T2.INDUSTRYCS, T2.INDUSTRYTKBN,
T2.INDUSTRYMSCI, T2.INDUSTRYDJ, T2.INDUSTRYFTSE,
T2.INDUSTRYMFIB, T2.INDUSTRYMFIS, T2.INDUSTRYICB,
T2.INDUSTRYBDF
FROM VDPS2.VTINSTIIDENT T1
INNER JOIN
VDPS2.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND (T2.ROWSTATUS
IS NULL OR T2.ROWSTATUS <> 2)
WHERE T1.ROWSTATUS = 1 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VINAC002_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINAC002_V02 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VINAC002_V02 FOR VDPS2.XPS_VINAC002_V02 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VINAC003_V02
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.XPS_VINAC003_V02 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL,
T1.ROWSTATUS ROWSTATUS_INSTIIDENT,
T2.ROWSTATUS ROWSTATUS_INSTITUTION,
T2.CREATETIMESTAMP CREATETIMESTAMP_INDUSTRYACT,
T2.UPDATETIMESTAMP UPDATETIMESTAMP_INDUSTRYACT,
T2.INDUSTRYCS, T2.INDUSTRYTKBN, T2.INDUSTRYMSCI,
T2.INDUSTRYDJ, T2.INDUSTRYFTSE, T2.INDUSTRYMFIB,
T2.INDUSTRYMFIS, T2.INDUSTRYICB, T2.INDUSTRYBDF
FROM VDPS2.VTINSTIIDENT T1
INNER JOIN
VDPS2.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VINAC003_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINAC003_V02 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VINAC003_V02 FOR VDPS2.XPS_VINAC003_V02 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VINFD003
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.XPS_VINFD003 AS
SELECT T1.INSTRUMENTID,
T1.CREATETIMESTAMP CREATETIMESTAMP_FLATSYMB,
T1.UPDATETIMESTAMP UPDATETIMESTAMP_FLATSYMB, T1.SYMBOLCH,
T1.SYMBOLCSFI, T1.SYMBOLISIN, T1.SYMBOLGB, T1.SYMBOLUS,
T1.SYMBOLDE, T1.SYMBOLXS, T1.ROWSTATUS, T2.CSSTATUSTYPE,
T2.ISSUEAMOUNT, T2.ISSUEPRICE, T2.ISSUEPRICECURR,
T2.ISSUEPRICECURR_I1, T2.ISSUEPRICECURR_I2,
T2.ISSUEPRICECURR_WS80, T2.SUBSCRBEGINDATE,
T2.SUBSCRPLNDENDDATE, T2.SUBSCRMETHODTYPE, T2.PAYMENTDATE,
T2.PLACEMENTTYPE, T2.ORIGINALISSUER, T2.ORIGINALISSUER_GK,
T2.ISSUER, T2.ISSUER_GK, T3.SHORTNAME_G ISSUER_SHORTNAME_G,
T3.SHORTNAME_E ISSUER_SHORTNAME_E,
T3.SHORTNAME_F ISSUER_SHORTNAME_F,
T3.SHORTNAME_I ISSUER_SHORTNAME_I,
T3.SHORTNAME_N ISSUER_SHORTNAME_N, T3.NAME_G ISSUER_NAME_G,
T3.NAME_E ISSUER_NAME_E, T3.NAME_F ISSUER_NAME_F,
T3.NAME_I ISSUER_NAME_I, T3.NAME_N ISSUER_NAME_N,
T3.DOMICILE ISSUER_DOMICILE,
T3.DOMICILE_A2 ISSUER_DOMICILE_A2,
T3.DOMICILE_A3 ISSUER_DOMICILE_A3,
T3.DOMICILE_WS80 ISSUER_DOMICILE_WS80,
T3.INDUSTRYCS ISSUER_INDUSTRYCS,
T3.INDUSTRYMSCI ISSUER_INDUSTRYMSCI,
T3.INDUSTRYTKBN ISSUER_INDUSTRYTKBN,
T4.SHORTNAME_G ORIG_ISSUER_SHORTNAME_G,
T4.SHORTNAME_E ORIG_ISSUER_SHORTNAME_E,
T4.SHORTNAME_F ORIG_ISSUER_SHORTNAME_F,
T4.SHORTNAME_I ORIG_ISSUER_SHORTNAME_I,
T4.SHORTNAME_N ORIG_ISSUER_SHORTNAME_N,
T4.NAME_G ORIG_ISSUER_NAME_G, T4.NAME_E ORIG_ISSUER_NAME_E,
T4.NAME_F ORIG_ISSUER_NAME_F, T4.NAME_I ORIG_ISSUER_NAME_I,
T4.NAME_N ORIG_ISSUER_NAME_N,
T4.DOMICILE ORIG_ISSUER_DOMICILE,
T4.DOMICILE_A2 ORIG_ISSUER_DOMICILE_A2,
T4.DOMICILE_A3 ORIG_ISSUER_DOMICILE_A3,
T4.DOMICILE_WS80 ORIG_ISSUER_DOMICILE_WS80,
T4.INDUSTRYCS ORIG_ISSUER_INDUSTRYCS,
T4.INDUSTRYMSCI ORIG_ISSUER_INDUSTRYMSCI,
T4.INDUSTRYTKBN ORIG_ISSUER_INDUSTRYTKBN
FROM VDPS2.VTINSTRFLATSYMBOLS T1
INNER JOIN
VDPS2.VTINSTRFLATDATA T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTITUTION T3
ON T3.INSTITUTIONID = T2.ISSUER
LEFT OUTER JOIN
VDPS2.VTINSTITUTION T4
ON T4.INSTITUTIONID = T2.ORIGINALISSUER ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VINFD003 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINFD003 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINFD003 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VINFD003 FOR VDPS2.XPS_VINFD003 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VINFD008_V02
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.XPS_VINFD008_V02 AS
SELECT T1.INSTRUMENTID, T2.LISTINGNO, T2.CURRENCY, T2.CURRENCY_I1,
T2.CURRENCY_I2, T2.CURRENCY_WS80, T2.TRADINGPLACE,
T2.TRADINGPLACE_BCN, T2.TRADINGPLACE_MIC,
T2.TRADINGPLACE_RTX, T2.TRADINGPLACE_BBX,
T2.SHORTNAME_G LIST_SHORTNAME_G,
T2.SHORTNAME_E LIST_SHORTNAME_E,
T2.SHORTNAME_F LIST_SHORTNAME_F,
T2.SHORTNAME_I LIST_SHORTNAME_I,
T2.SHORTNAME_N LIST_SHORTNAME_N, T2.ISMAINTRADINGPLACE,
T2.LISTINGSYMBOLTK, T2.LISTINGSYMBOLRT, T2.LISTINGSYMBOLBB,
T2.LISTINGSTATUSTYPE, T2.TRADINGSTATUSTYPE,
T2.FIRSTTRADINGDATE, T2.LASTTRADINGDATE,
T2.ISHOMETRADINGPLACE, T2.LISTINGCLASSTYPE,
T2.PRICINGUNITNO, T2.PRICINGUNITTYPE, T2.TRADINGUNITTYPE,
T2.ISCSBESTVENUEOVERALL, T2.ISCSBESTVENUEPERCURR,
T2.ISBESTVOLUMEBESTSPREAD, T2.ISBESTVOLUME,
T2.ISBESTSPREAD, T2.ISHIGHESTTICKS, T2.ISBESTVOLUMEPERCURR,
T2.ISBESTSPREADPERCURR, T2.ISPRIMARYMARKETUSA,
T2.ISSINGLETRADINGPLACE, T2.ISISSUERPRICEPROVIDER,
T2.ISNAVINDEPENDENTSOURCE, T2.ISFUNDASSESSMENTSOURCE,
T2.ISPLACEOFLISTING, T2.ISPLACEOFTRADING,
T2.ISPLACEOFQUOTE, T3.SHORTNAME_G TRAD_SHORTNAME_G,
T3.SHORTNAME_E TRAD_SHORTNAME_E,
T3.SHORTNAME_F TRAD_SHORTNAME_F,
T3.SHORTNAME_I TRAD_SHORTNAME_I,
T3.SHORTNAME_N TRAD_SHORTNAME_N
FROM VDPS2.VTINSTRFLATDATA T1
INNER JOIN
VDPS2.VTLISTING T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPS2.VTINSTITUTION T3
ON T3.INSTITUTIONID = T1.ISSUER ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VINFD008_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINFD008_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINFD008_V02 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VINFD008_V02 FOR VDPS2.XPS_VINFD008_V02 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VINGR009_V02
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.XPS_VINGR009_V02 AS
SELECT T1.SYMBOLCH, T1.SYMBOLISIN IDSYMBOL_ISIN,
T1.CATEGORYCSGTA IDSYMBOL_CSGTA, T2.STATUSTYPE, T2.NAME_G,
T2.NAME_E, T2.NAME_F, T2.NAME_I, T2.NAME_N,
T4.IDSYMBOL NOMINALCURR_I2, T7.MATURITYDATE,
T3.SCHEMESYMBOL SCHEME_ECBTR, T3.IDSYMBOL IDSYMBOL_ECBTR,
T8.ROLETYPE, T8.INSTITUTIONID, T9.IDSYMBOL IDSYMBOL_GK,
T10.SHORTNAME_G, T10.SHORTNAME_E, T10.SHORTNAME_F,
T10.SHORTNAME_I, T10.SHORTNAME_N, T2.CREATETIMESTAMP,
T2.UPDATETIMESTAMP, T10.CREATETIMESTAMP CREATETIMESTAMP_IS,
T10.UPDATETIMESTAMP UPDATETIMESTAMP_IS
FROM VDPS2.VTINSTRFLATSYMBOLS T1
INNER JOIN
VDPS2.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPS2.VTINSTRINGROUP T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID AND T3.SCHEMESYMBOL =
'ECBTR'
LEFT OUTER JOIN
VDPS2.VTINSTRIDENT T4
ON T4.INSTRUMENTID = T2.NOMINALCURR AND T4.SCHEMESYMBOL =
'I2' AND T4.ROWSTATUS = 1
LEFT OUTER JOIN
VDPS2.VTINSTRWITHCF T7
ON T7.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPS2.VTINSTIROLE T8
ON T8.INSTRUMENTID = T1.INSTRUMENTID AND T8.ROLETYPE = 2
LEFT OUTER JOIN
VDPS2.VTINSTIIDENT T9
ON T9.INSTITUTIONID = T8.INSTITUTIONID AND T9.SCHEMESYMBOL
= 'GK' AND T9.ROWSTATUS = 1
LEFT OUTER JOIN
VDPS2.VTINSTITUTION T10
ON T10.INSTITUTIONID = T9.INSTITUTIONID AND (T10.ROWSTATUS
IS NULL OR T10.ROWSTATUS <> 2)
WHERE T1.ROWSTATUS = 1 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VINGR009_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINGR009_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINGR009_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINGR009_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINGR009_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINGR009_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINGR009_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINGR009_V02 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VINGR009_V02 FOR VDPS2.XPS_VINGR009_V02 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VINLI000_V05
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.XPS_VINLI000_V05 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.ROLETYPE,
T4.DOMICILE_WS80 DOMICILE_CS,
T4.DOMICILE_A2 DOMICILE_ISOA2,
T4.DOMICILE_A3 DOMICILE_ISOA3,
T4.TAXDOMICILE_WS80 TAXDOMICILE_CS,
T4.TAXDOMICILE_A2 TAXDOMICILE_ISOA2,
T4.TAXDOMICILE_A3 TAXDOMICILE_ISOA3,
T5.IDSYMBOL IDSYMBOL_INSTI, T5.SCHEMESYMBOL SCHEME_INSTI,
T5.VALIDFROMDATE VALIDFROMDATE_INSTI,
T5.VALIDUNTILDATE VALIDUNTILDATE_INSTI,
T3.GUARANTORROLETYPE, T4.ISGLOBALREGACC, T4.DELETIONDATE,
T4.STATUSTYPE, T4.DELETEREASONTYPE, T4.MAINLANGUAGETYPE,
T4.FOTYPE, T4.KANTONSCODETYPE, T4.INDUSTRYCS BRANCH_CS,
T4.INDUSTRYTKBN BRANCH_TKBN, T4.SHORTNAME_G,
T4.SHORTNAME_E, T4.SHORTNAME_F, T4.SHORTNAME_I,
T4.SHORTNAME_N, T4.NAME_G, T4.NAME_E, T4.NAME_F, T4.NAME_I,
T4.NAME_N, T4.CREATETIMESTAMP CREATETIMESTAMP_INSTI,
T4.UPDATETIMESTAMP UPDATETIMESTAMP_INSTI,
T6.CREDITWORTHINESSTP, T4.CSASSEMBLYNOTIFICATIONTYPE,
T1.ROWSTATUS ROWSTATUS_INSTRIDENT,
T2.ROWSTATUS ROWSTATUS_INSTRUMENT,
T4.ROWSTATUS ROWSTATUS_INSTITUTION,
T5.ROWSTATUS ROWSTATUS_INSTIIDENT,
T2.UPDATETIMESTAMP UPDATETIMESTAMP_INSTRUMENT,
T3.CREATETIMESTAMP CREATETIMESTAMP_RT,
T3.UPDATETIMESTAMP UPDATETIMESTAMP_RT
FROM VDPS2.VTINSTRIDENT T1
INNER JOIN
VDPS2.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTIROLE T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTITUTION T4
ON T4.INSTITUTIONID = T3.INSTITUTIONID
INNER JOIN
VDPS2.VTINSTIIDENT T5
ON T5.INSTITUTIONID = T4.INSTITUTIONID
INNER JOIN
VDPS2.VTINSTRFLATDATA T6
ON T6.INSTRUMENTID = T1.INSTRUMENTID ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VINLI000_V05 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINLI000_V05 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINLI000_V05 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINLI000_V05 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINLI000_V05 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINLI000_V05 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VINLI000_V05 FOR VDPS2.XPS_VINLI000_V05 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VINLI007_V02
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.XPS_VINLI007_V02 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.ROLETYPE,
T3.GUARANTORROLETYPE,
T3.CREATETIMESTAMP CREATETIMESTAMP_RT,
T3.UPDATETIMESTAMP UPDATETIMESTAMP_RT,
T5.IDSYMBOL IDSYMBOL_INSTI, T5.SCHEMESYMBOL SCHEME_INSTI,
T5.VALIDFROMDATE VALIDFROMDATE_GK,
T5.VALIDUNTILDATE VALIDUNTILDATE_GK,
T4.CREATETIMESTAMP CREATETIMESTAMP_GK,
T4.UPDATETIMESTAMP UPDATETIMESTAMP_GK, T4.ISGLOBALREGACC,
T4.DELETIONDATE, T4.STATUSTYPE, T4.DELETEREASONTYPE,
T4.FOTYPE, T4.KANTONSCODETYPE, T4.MAINLANGUAGETYPE,
T4.SHORTNAME_G, T4.SHORTNAME_E, T4.SHORTNAME_F,
T4.SHORTNAME_I, T4.SHORTNAME_N, T4.NAME_G, T4.NAME_E,
T4.NAME_F, T4.NAME_I, T4.NAME_N,
T1.ROWSTATUS ROWSTATUS_INSTRIDENT,
T2.ROWSTATUS ROWSTATUS_INSTRUMENT,
T5.ROWSTATUS ROWSTATUS_INSTIIDENT,
T4.ROWSTATUS ROWSTATUS_INSTITUTION
FROM VDPS2.VTINSTRIDENT T1
INNER JOIN
VDPS2.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTIROLE T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTITUTION T4
ON T4.INSTITUTIONID = T3.INSTITUTIONID
INNER JOIN
VDPS2.VTINSTIIDENT T5
ON T5.INSTITUTIONID = T4.INSTITUTIONID ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VINLI007_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINLI007_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINLI007_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINLI007_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINLI007_V02 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VINLI007_V02 FOR VDPS2.XPS_VINLI007_V02 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VINLI008_V03
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.XPS_VINLI008_V03 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.ROLETYPE,
T0.SCHEMESYMBOL SCHEMESYMB_CSGME, T4.DOMICILE,
T4.TAXDOMICILE, T4.DOMICILE_WS80 DOMICILE_CS,
T4.TAXDOMICILE_WS80 TAXDOMICILE_CS,
T5.IDSYMBOL IDSYMBOL_INSTI, T5.SCHEMESYMBOL SCHEME_INSTI,
T4.ISGLOBALREGACC, T4.DELETIONDATE, T4.STATUSTYPE,
T4.DELETEREASONTYPE, T4.MAINLANGUAGETYPE, T4.FOTYPE,
T4.KANTONSCODETYPE, T4.SHORTNAME_G, T4.SHORTNAME_E,
T4.SHORTNAME_F, T4.SHORTNAME_I, T4.SHORTNAME_N, T4.NAME_G,
T4.NAME_E, T4.NAME_F, T4.NAME_I, T4.NAME_N,
T4.CREATETIMESTAMP, T4.UPDATETIMESTAMP,
T1.ROWSTATUS ROWSTATUS_INSTRIDENT,
T2.ROWSTATUS ROWSTATUS_INSTRUMENT,
T4.ROWSTATUS ROWSTATUS_INSTITUTION,
T5.ROWSTATUS ROWSTATUS_INSTIIDENT
FROM VDPS2.VTINSTRIDENT T1
INNER JOIN
VDPS2.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTIROLE T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTITUTION T4
ON T4.INSTITUTIONID = T3.INSTITUTIONID
LEFT OUTER JOIN
VDPS2.VTINSTIGROUPKEY T0
ON T0.INSTITUTIONID = T3.INSTITUTIONID
INNER JOIN
VDPS2.VTINSTIIDENT T5
ON T5.INSTITUTIONID = T4.INSTITUTIONID ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VINLI008_V03 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINLI008_V03 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINLI008_V03 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINLI008_V03 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINLI008_V03 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINLI008_V03 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VINLI008_V03 FOR VDPS2.XPS_VINLI008_V03 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VINLI010_V01
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.XPS_VINLI010_V01 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T1.ROWSTATUS,
T1.INSTRUMENTID, T2.ROLETYPE, T2.GUARANTORROLETYPE,
T2.CREATETIMESTAMP CREATETIMESTAMP_RT,
T2.UPDATETIMESTAMP UPDATETIMESTAMP_RT, T2.INSTITUTIONID,
T4.ROWSTATUS ROWSTATUS_GK, T4.IDSYMBOL IDSYMBOL_GK,
T4.VALIDFROMDATE VALIDFROMDATE_GK,
T4.VALIDUNTILDATE VALIDUNTILDATE_GK,
T3.CREATETIMESTAMP CREATETIMESTAMP_GK,
T3.UPDATETIMESTAMP UPDATETIMESTAMP_GK, T3.ISGLOBALREGACC,
T3.DELETIONDATE, T3.STATUSTYPE, T3.DELETEREASONTYPE,
T3.FOTYPE, T3.KANTONSCODETYPE, T3.MAINLANGUAGETYPE,
T3.SHORTNAME_G, T3.SHORTNAME_E, T3.SHORTNAME_F,
T3.SHORTNAME_I, T3.SHORTNAME_N, T3.NAME_G, T3.NAME_E,
T3.NAME_F, T3.NAME_I, T3.NAME_N, T3.DOMICILE_A3,
T3.DOMICILE_A2, T3.DOMICILE_WS80, T3.INDUSTRYTKBN,
T3.INDUSTRYCS, T3.INDUSTRYMSCI, T5.SYMBOLCSID01,
T5.SYMBOLCSID03, T5.SYMBOLCSID05, T5.SYMBOLCSID06,
T6.NAME_G NAME_INDUSTRY_TKBN_G,
T6.NAME_E NAME_INDUSTRY_TKBN_E,
T6.NAME_F NAME_INDUSTRY_TKBN_F,
T6.NAME_I NAME_INDUSTRY_TKBN_I,
T6.NAME_N NAME_INDUSTRY_TKBN_N,
T7.NAME_G NAME_INDUSTRY_CS_G, T7.NAME_E NAME_INDUSTRY_CS_E,
T7.NAME_F NAME_INDUSTRY_CS_F, T7.NAME_I NAME_INDUSTRY_CS_I,
T7.NAME_N NAME_INDUSTRY_CS_N,
T8.NAME_G NAME_INDUSTRY_MSCI_G,
T8.NAME_E NAME_INDUSTRY_MSCI_E,
T8.NAME_F NAME_INDUSTRY_MSCI_F,
T8.NAME_I NAME_INDUSTRY_MSCI_I,
T8.NAME_N NAME_INDUSTRY_MSCI_N
FROM VDPS2.VTINSTRIDENT T1
INNER JOIN
VDPS2.VTINSTIROLE T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTITUTION T3
ON T3.INSTITUTIONID = T2.INSTITUTIONID
INNER JOIN
VDPS2.VTINSTIIDENT T4
ON T4.INSTITUTIONID = T3.INSTITUTIONID AND T4.SCHEMESYMBOL
= 'GK' AND T4.ROWSTATUS IN(1, 2)
INNER JOIN
VDPS2.VTINSTIFLATSYMBOLS T5
ON T5.INSTITUTIONID = T2.INSTITUTIONID AND T5.ROWSTATUS = 1
LEFT OUTER JOIN
VDPS2.VTINDUSTRY T6
ON T6.IDSYMBOL = T3.INDUSTRYTKBN AND T6.SCHEMESYMBOL =
'TKBN'
LEFT OUTER JOIN
VDPS2.VTINDUSTRY T7
ON T7.IDSYMBOL = T3.INDUSTRYCS AND T7.SCHEMESYMBOL =
'CS-WS80-BRAN'
LEFT OUTER JOIN
VDPS2.VTINDUSTRY T8
ON T8.IDSYMBOL = T3.INDUSTRYMSCI AND T8.SCHEMESYMBOL =
'MSCI'
WHERE T1.ROWSTATUS IN(1, 2) ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VINLI010_V01 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINLI010_V01 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINLI010_V01 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINLI010_V01 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINLI010_V01 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINLI010_V01 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VINLI010_V01 FOR VDPS2.XPS_VINLI010_V01 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VINSH000
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F616617" ;
--
CREATE VIEW VDPS2.XPS_VINSH000 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T5.CREATETIMESTAMP,
T5.UPDATETIMESTAMP, T4.IDSYMBOL IDSYMBOL_BCN, T5.MANDATOR,
T5.CONVERSIONFACTOR, T5.ISSTEERINGFLAG1,
T5.ISSTEERINGFLAG2, T5.ISSTEERINGFLAG3, T5.ISSTEERINGFLAG4,
T5.ISSTEERINGFLAG5, T5.ISSTEERINGFLAG6, T5.ISSTEERINGFLAG7,
T5.ISSTEERINGFLAG8, T5.PRIORITYCODE, T5.RESERVESYMBOL,
T5.TRADINGUNITTYPE
FROM VDPS2.VTINSTRIDENT T1
INNER JOIN
VDPS2.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTLISTING T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.CTLISTING T5
ON T5.INSTRUMENTID = T3.INSTRUMENTID AND T5.LISTINGNO = T3.
LISTINGNO AND T5.ISSTEERINGFLAG4 = 1
INNER JOIN
VDPS2.VTINSTIIDENT T4
ON T4.INSTITUTIONID = T3.TRADINGPLACE AND T4.SCHEMESYMBOL
= 'BCN' AND T4.ROWSTATUS = 1
WHERE T1.ROWSTATUS = 1
AND (T2.ROWSTATUS IS NULL
OR T2.ROWSTATUS <> 2)
AND T3.LISTINGSTATUSTYPE <> 9
AND T3.LISTINGSTATUSTYPE <> 18 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VINSH000 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINSH000 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINSH000 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINSH000 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINSH000 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VINSH000 FOR VDPS2.XPS_VINSH000 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VINSH001
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
--
CREATE VIEW VDPS2.XPS_VINSH001 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T5.IDSYMBOL IDSYMBOL_BCN,
T9.IDSYMBOL CURRENCY_I2, T3.CURRENCY, T3.TRADINGSTATUSTYPE,
T3.LISTINGSTATUSTYPE, T4.ISSTEERINGFLAG4, T4.MANDATOR,
T6.IDSYMBOL IDSYMBOL_RIC, T7.IDSYMBOL IDSYMBOL_BBI,
T8.IDSYMBOL IDSYMBOL_TK_79,
T3.CREATETIMESTAMP CREATETIMESTAMP_VL,
T3.UPDATETIMESTAMP UPDATETIMESTAMP_VL,
T4.CREATETIMESTAMP CREATETIMESTAMP_CL,
T4.UPDATETIMESTAMP UPDATETIMESTAMP_CL
FROM VDPS2.VTINSTRIDENT T1
INNER JOIN
VDPS2.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPS2.VTLISTING T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.CTLISTING T4
ON T4.INSTRUMENTID = T3.INSTRUMENTID AND T4.LISTINGNO = T3.
LISTINGNO AND T4.ISSTEERINGFLAG4 = 1
INNER JOIN
VDPS2.VTINSTIIDENT T5
ON T5.INSTITUTIONID = T3.TRADINGPLACE AND T5.SCHEMESYMBOL
= 'BCN' AND T5.ROWSTATUS = 1
LEFT OUTER JOIN
VDPS2.VTLISTINGIDENT T6
ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
LISTINGNO AND T6.SCHEMESYMBOL = 'RIC' AND (T6.ISSECONDARY
IS NULL OR T6.ISSECONDARY = 0)
LEFT OUTER JOIN
VDPS2.VTLISTINGIDENT T7
ON T7.INSTRUMENTID = T3.INSTRUMENTID AND T7.LISTINGNO = T3.
LISTINGNO AND T7.SCHEMESYMBOL = 'BBI' AND (T7.ISSECONDARY
IS NULL OR T7.ISSECONDARY = 0)
LEFT OUTER JOIN
VDPS2.VTLISTINGGRPKEY T8
ON T8.INSTRUMENTID = T3.INSTRUMENTID AND T8.LISTINGNO = T3.
LISTINGNO AND T8.INSTRGRSCHMSYMBOL = 'TK' AND T8.IDSYMBOL
= '79'
LEFT OUTER JOIN
VDPS2.VTINSTRIDENT T9
ON T9.INSTRUMENTID = T3.CURRENCY AND T9.SCHEMESYMBOL =
'I2' AND T9.ROWSTATUS = 1
WHERE T1.ROWSTATUS = 1 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VINSH001 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINSH001 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINSH001 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINSH001 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINSH001 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINSH001 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINSH001 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VINSH001 FOR VDPS2.XPS_VINSH001 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VINSH002
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.XPS_VINSH002 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T5.IDSYMBOL IDSYMBOL_BCN,
T9.IDSYMBOL CURRENCY_I2, T3.CURRENCY, T3.TRADINGSTATUSTYPE,
T3.LISTINGSTATUSTYPE, T4.ISSTEERINGFLAG4, T4.MANDATOR,
T6.IDSYMBOL IDSYMBOL_RIC, T7.IDSYMBOL IDSYMBOL_BBI,
T8.IDSYMBOL IDSYMBOL_TK_79,
T3.CREATETIMESTAMP CREATETIMESTAMP_VL,
T3.UPDATETIMESTAMP UPDATETIMESTAMP_VL,
T4.CREATETIMESTAMP CREATETIMESTAMP_CL,
T4.UPDATETIMESTAMP UPDATETIMESTAMP_CL
FROM VDPS2.VTINSTRIDENT T1
INNER JOIN
VDPS2.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPS2.VTLISTING T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.CTLISTING T4
ON T4.INSTRUMENTID = T3.INSTRUMENTID AND T4.LISTINGNO = T3.
LISTINGNO AND T4.ISSTEERINGFLAG4 = 1
INNER JOIN
VDPS2.VTINSTIIDENT T5
ON T5.INSTITUTIONID = T3.TRADINGPLACE AND T5.SCHEMESYMBOL
= 'BCN' AND T5.ROWSTATUS = 1
LEFT OUTER JOIN
VDPS2.VTLISTINGIDENT T6
ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
LISTINGNO AND T6.SCHEMESYMBOL = 'RIC' AND (T6.ISSECONDARY
IS NULL OR T6.ISSECONDARY = 0)
LEFT OUTER JOIN
VDPS2.VTLISTINGIDENT T7
ON T7.INSTRUMENTID = T3.INSTRUMENTID AND T7.LISTINGNO = T3.
LISTINGNO AND T7.SCHEMESYMBOL = 'BBI' AND (T7.ISSECONDARY
IS NULL OR T7.ISSECONDARY = 0)
LEFT OUTER JOIN
VDPS2.VTLISTINGGRPKEY T8
ON T8.INSTRUMENTID = T3.INSTRUMENTID AND T8.LISTINGNO = T3.
LISTINGNO AND T8.INSTRGRSCHMSYMBOL = 'TK' AND T8.IDSYMBOL
= '79'
LEFT OUTER JOIN
VDPS2.VTINSTRIDENT T9
ON T9.INSTRUMENTID = T3.CURRENCY AND T9.SCHEMESYMBOL =
'I2' AND T9.ROWSTATUS = 1
WHERE T1.ROWSTATUS = 1 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VINSH002 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINSH002 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINSH002 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINSH002 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINSH002 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINSH002 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VINSH002 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VINSH002 FOR VDPS2.XPS_VINSH002 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VISID001
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F281992" ;
--
CREATE VIEW VDPS2.XPS_VISID001 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.IDSYMBOL IDSYMBOL_ID,
T3.SCHEMESYMBOL SCHEMESYMBOL_ID, T1.INSTITUTIONID,
T1.CREATETIMESTAMP, T1.UPDATETIMESTAMP, T1.VALIDFROMDATE,
T1.VALIDUNTILDATE, T3.CREATETIMESTAMP CREATETIMESTAMP_ID,
T3.UPDATETIMESTAMP UPDATETIMESTAMP_ID,
T3.VALIDFROMDATE VALIDFROMDATE_ID,
T3.VALIDUNTILDATE VALIDUNTILDATE_ID
FROM VDPS2.VTINSTIIDENT T1
INNER JOIN
VDPS2.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND (T2.ROWSTATUS
IS NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPS2.VTINSTIIDENT T3
ON T3.INSTITUTIONID = T1.INSTITUTIONID AND T3.ROWSTATUS = 1
WHERE T1.ROWSTATUS = 1 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VISID001 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VISID001 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VISID001 FOR VDPS2.XPS_VISID001 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VISID002
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.XPS_VISID002 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.IDSYMBOL IDSYMBOL_ID,
T3.SCHEMESYMBOL SCHEMESYMBOL_ID, T1.INSTITUTIONID,
T1.VALIDFROMDATE, T1.VALIDUNTILDATE, T1.CREATETIMESTAMP,
T1.UPDATETIMESTAMP, T3.VALIDFROMDATE VALIDFROMDATE_ID,
T3.VALIDUNTILDATE VALIDUNTILDATE_ID,
T3.CREATETIMESTAMP CREATETIMESTAMP_ID,
T3.UPDATETIMESTAMP UPDATETIMESTAMP_ID,
T4.VALIDFROMDATE VALIDFROMDATE_IS,
T4.VALIDUNTILDATE VALIDUNTILDATE_IS,
T4.CREATETIMESTAMP CREATETIMESTAMP_IS,
T4.UPDATETIMESTAMP UPDATETIMESTAMP_IS, T4.NAME_G,
T4.NAME_E, T4.NAME_F, T4.NAME_I, T4.NAME_N
FROM VDPS2.VTINSTIIDENT T1
INNER JOIN
VDPS2.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND (T2.ROWSTATUS
IS NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPS2.VTINSTIIDENT T3
ON T3.INSTITUTIONID = T1.INSTITUTIONID AND T3.ROWSTATUS = 1
INNER JOIN
VDPS2.VTINSTIIDSCHEME T4
ON T4.SCHEMESYMBOL = T3.SCHEMESYMBOL AND (T4.ROWSTATUS IS
NULL OR T4.ROWSTATUS <> 2)
WHERE T1.ROWSTATUS = 1 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VISID002 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VISID002 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VISID002 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VISID002 FOR VDPS2.XPS_VISID002 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VISRG000_V02
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
--
CREATE VIEW VDPS2.XPS_VISRG000_V02 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.ROLETYPE,
T5.IDSYMBOL IDSYMBOL_INSTI, T5.SCHEMESYMBOL SCHEME_INSTI,
T6.IDSYMBOL IDSYMBOL_RATING, T6.SCHEMESYMBOL SCHEME_RATING,
T6.RATINGDATE, T6.RATINGSTATUSTYPE, T6.REVIEWDATE,
T6.WATCHLISTSTATTYPE, T6.SOURCETYPE, T6.UNIQUENUMBER,
T6.CREATETIMESTAMP, T6.UPDATETIMESTAMP,
T1.ROWSTATUS ROWSTATUS_INSTRIDENT,
T2.ROWSTATUS ROWSTATUS_INSTRUMENT,
T5.ROWSTATUS ROWSTATUS_INSTIIDENT,
T4.ROWSTATUS ROWSTATUS_INSTITUTION
FROM VDPS2.VTINSTRIDENT T1
INNER JOIN
VDPS2.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTIROLE T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTITUTION T4
ON T4.INSTITUTIONID = T3.INSTITUTIONID
INNER JOIN
VDPS2.VTINSTIIDENT T5
ON T5.INSTITUTIONID = T4.INSTITUTIONID
INNER JOIN
VDPS2.VTINSTIRATING T6
ON T6.INSTITUTIONID = T3.INSTITUTIONID ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VISRG000_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VISRG000_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VISRG000_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VISRG000_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VISRG000_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VISRG000_V02 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VISRG000_V02 FOR VDPS2.XPS_VISRG000_V02 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VISRG002
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F281992" ;
--
CREATE VIEW VDPS2.XPS_VISRG002 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL,
T3.SCHEMESYMBOL SCHEME_RATING, T3.IDSYMBOL IDSYMBOL_RATING,
T1.INSTITUTIONID, T3.INSTIRATINGNO, T3.RATINGDATE,
T3.RATINGSTATUSTYPE, T3.REVIEWDATE, T3.WATCHLISTSTATTYPE,
T3.SOURCETYPE, T3.UNIQUENUMBER, T3.CREATETIMESTAMP,
T3.UPDATETIMESTAMP
FROM VDPS2.VTINSTIIDENT T1
INNER JOIN
VDPS2.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND T2.ROWSTATUS IS
NULL
INNER JOIN
VDPS2.VTINSTIRATING T3
ON T3.INSTITUTIONID = T2.INSTITUTIONID
WHERE T1.ROWSTATUS = 1 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VISRG002 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VISRG002 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VISRG002 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VISRG002 FOR VDPS2.XPS_VISRG002 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VISTI000
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F273764" ;
--
CREATE VIEW VDPS2.XPS_VISTI000 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T1.INSTITUTIONID,
T2.PORTFOLIONO, T2.FOTYPE, T2.STATUSTYPE,
T2.ISGLOBALREGACC, T2.DELETIONDATE, T2.DELETEREASONTYPE,
T2.KANTONSCODETYPE, T2.MAINLANGUAGETYPE, T2.DOMICILE,
T2.DOMICILE_A2, T2.DOMICILE_WS80, T2.TAXDOMICILE,
T2.TAXDOMICILE_A2, T2.TAXDOMICILE_WS80, T2.INDUSTRYCS,
T2.INDUSTRYTKBN, T2.INDUSTRYMSCI, T2.INDUSTRYDJ,
T2.INDUSTRYFTSE, T2.INDUSTRYMFIB, T2.INDUSTRYMFIS,
T2.INDUSTRYICB, T2.INDUSTRYBDF, T2.CREATETIMESTAMP,
T2.UPDATETIMESTAMP, T2.ACCOUNTINGCURR,
T2.ACTFINYEARENDDATE, T2.FOUNDATIONDATE, T2.LEGALFORMTYPE,
T2.PREVFINYEARENDDATE, T2.REGISTERENTRYDATE,
T2.REGENTRYDELETIONDT, T2.LOCATION, T2.INITIALMARGINRATE,
T2.NEXTSEMESTERREPORT, T2.NONTAXABLEDATE,
T2.NONTAXABLENUMBER, T2.PREVIOUSYEARENDDT, T2.TAXNUMBER,
T2.TRUSTLEGALGUIDETP, T2.TRUSTSTATUSTYPE, T2.YEARENDDATE,
T2.ADDRESS, T2.ADDRESSDESCR, T2.ADDRESSLOCATION,
T2.BANKACCOUNTNUMBER, T2.CITY, T2.EMAILNAME,
T2.HEADOFFICEDESCR, T2.HOUSENUMBER, T2.IBAN,
T2.INTERNETDOMAIN, T2.NATIONALBANKCODE, T2.PHONENUMBER,
T2.STREET, T2.TELEFAXNUMBER, T2.ZIP, T2.SHORTNAME_G,
T2.SHORTNAME_E, T2.SHORTNAME_F, T2.SHORTNAME_I,
T2.SHORTNAME_N, T2.NAME_G, T2.NAME_E, T2.NAME_F, T2.NAME_I,
T2.NAME_N
FROM VDPS2.VTINSTIIDENT T1
INNER JOIN
VDPS2.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND (T2.ROWSTATUS
IS NULL OR T2.ROWSTATUS <> 2)
WHERE T1.ROWSTATUS = 1 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VISTI000 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VISTI000 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VISTI000 FOR VDPS2.XPS_VISTI000 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VITGK002
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.XPS_VITGK002 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T1.INSTITUTIONID, T2.FOTYPE,
T2.CREATETIMESTAMP CREATETIMESTAMP_IST,
T2.UPDATETIMESTAMP UPDATETIMESTAMP_IST,
T3.IDSYMBOL IDSYMBOL_GROUP,
T3.SCHEMESYMBOL SCHEMESYMBOL_GROUP,
T3.CREATETIMESTAMP CREATETIMESTAMP_IGK,
T3.UPDATETIMESTAMP UPDATETIMESTAMP_IGK, T4.NAME_G,
T4.NAME_E, T4.NAME_F, T4.NAME_I, T4.NAME_N
FROM VDPS2.VTINSTIIDENT T1
INNER JOIN
VDPS2.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND (T2.ROWSTATUS
IS NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPS2.VTINSTIGROUPKEY T3
ON T3.INSTITUTIONID = T1.INSTITUTIONID
INNER JOIN
VDPS2.VTINSTITUTIONGROUP T4
ON T4.IDSYMBOL = T3.IDSYMBOL AND T4.SCHEMESYMBOL = T3.
SCHEMESYMBOL AND (T4.ROWSTATUS IS NULL OR T4.ROWSTATUS <>
2)
WHERE T1.ROWSTATUS = 1 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VITGK002 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VITGK002 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VITGK002 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VITGK002 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VITGK002 FOR VDPS2.XPS_VITGK002 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VLIID000_V02
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
--
CREATE VIEW VDPS2.XPS_VLIID000_V02 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL,
LID.SCHEMESYMBOL SCHEME_TICKER,
LI1.CREATETIMESTAMP VTLISTCREATETIME,
LI1.UPDATETIMESTAMP VTLISTUPDATETIME,
LI2.CREATETIMESTAMP CTLISTCREATETIME,
LI2.UPDATETIMESTAMP CTLISTUPDATETIME,
LID.CREATETIMESTAMP LISTIDCREATETIME,
LID.UPDATETIMESTAMP LISTIDUPDATETIME,
LI1.ISMAINTRADINGPLACE TK_HAUPTBOEPLATZ,
LI1.ISHOMETRADINGPLACE, LI1.ISONLIMITEDHALT,
LI1.HASNOMCURRSETTLE, LI1.CURRENCY, LI1.MARKTPRACTIDSYMBOL,
LI1.FIRSTTRADINGDATE, LI1.LASTTRADINGDATE,
LI1.HALTFROMDATE, LI1.HALTUNTILDATE, LI1.FIRSTTRDDTAFHALT,
LI1.TRADINGSTATUSTYPE, LI1.LISTINGSTATUSTYPE,
LI1.EXCHANGERATETYPE, LI1.LISTPURPOSETYPE, LI1.SHORTNAME_G,
LI1.SHORTNAME_E, LI1.SHORTNAME_F, LI1.SHORTNAME_I,
LI1.SHORTNAME_N, LI1.DESCRIPTION_G, LI1.DESCRIPTION_E,
LI1.DESCRIPTION_F, LI1.DESCRIPTION_I, LI1.DESCRIPTION_N,
LI1.CSLISTINGCODETYPE, LI2.PRIORITYCODE,
LI2.ISSTEERINGFLAG1, LI2.ISSTEERINGFLAG2,
LI2.ISSTEERINGFLAG3, LI2.ISSTEERINGFLAG4 CS_HAUPTBOEPLATZ,
LI2.ISSTEERINGFLAG5, LI2.ISSTEERINGFLAG6,
LI2.ISSTEERINGFLAG7, LI2.ISSTEERINGFLAG8,
LI2.CONVERSIONFACTOR, LI2.RESERVESYMBOL,
LI2.TRADINGUNITTYPE, LID.IDSYMBOL IDSYMBOL_TICKER,
LID.VALIDFROMDATE, LID.VALIDUNTILDATE,
BCN.IDSYMBOL IDSYMBOL_BCN, BCNCS.IDSYMBOL IDSYMBOL_BCNCS,
BCA.IDSYMBOL IDSYMBOL_BCA, LI2.MANDATOR
FROM VDPS2.VTINSTRIDENT T1
INNER JOIN
VDPS2.VTINSTRUMENT
ON T1.INSTRUMENTID = VDPS2.VTINSTRUMENT.INSTRUMENTID AND (
VDPS2.VTINSTRUMENT.ROWSTATUS IS NULL OR VDPS2.
VTINSTRUMENT.ROWSTATUS <> 2) AND T1.ROWSTATUS = 1
INNER JOIN
VDPS2.VTLISTING LI1
ON T1.INSTRUMENTID = LI1.INSTRUMENTID AND LI1.
LISTINGSTATUSTYPE <> 9 AND LI1.LISTINGSTATUSTYPE <> 18
LEFT OUTER JOIN
VDPS2.CTLISTING LI2
ON LI1.INSTRUMENTID = LI2.INSTRUMENTID AND LI1.LISTINGNO =
LI2.LISTINGNO
LEFT OUTER JOIN
VDPS2.VTLISTINGIDENT LID
ON LI1.INSTRUMENTID = LID.INSTRUMENTID AND LI1.LISTINGNO =
LID.LISTINGNO
INNER JOIN
VDPS2.VTINSTIIDENT BCN
ON LI1.TRADINGPLACE = BCN.INSTITUTIONID AND BCN.
SCHEMESYMBOL = 'BCN' AND BCN.ROWSTATUS = 1
LEFT OUTER JOIN
VDPS2.VTINSTIIDENT BCNCS
ON LI1.TRADINGPLACE = BCNCS.INSTITUTIONID AND BCNCS.
SCHEMESYMBOL = 'CS-WS80-BPL' AND BCNCS.ROWSTATUS = 1
LEFT OUTER JOIN
VDPS2.VTINSTIIDENT BCA
ON LI1.TRADINGPLACE = BCA.INSTITUTIONID AND BCA.
SCHEMESYMBOL = 'BCA' AND BCA.ROWSTATUS = 1 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID000_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID000_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID000_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID000_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID000_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID000_V02 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VLIID000_V02 FOR VDPS2.XPS_VLIID000_V02 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VLIID001_V04
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.XPS_VLIID001_V04 AS
SELECT T1.IDSYMBOL, T7.IDSYMBOL IDSYMBOL_BCN,
T6.ISSTEERINGFLAG1 BPL_ST, T6.ISSTEERINGFLAG2,
T6.ISSTEERINGFLAG3 BPL_KS, T6.ISSTEERINGFLAG4,
T6.ISSTEERINGFLAG5 BPL_HA, T6.ISSTEERINGFLAG6 AIS_SP,
T6.ISSTEERINGFLAG7 BPL_IN, T6.ISSTEERINGFLAG8 BPL_SP,
T6.CONVERSIONFACTOR SIZE_UAMT, T6.PRIORITYCODE AIS_PRIO,
T6.TRADINGUNITTYPE HANDLHEIT, T3.TRADINGSTATUSTYPE,
T3.LISTINGSTATUSTYPE, T4.IDSYMBOL CURRENCY_CS,
T5.SCHEMESYMBOL, T5.IDSYMBOL IDSYMBOL_TICKER,
T3.LASTTRADINGDATE GUELTIG_VON, T3.NONVERSEAMOUNT,
T6.PRICECALCTYPE
FROM VDPS2.VTINSTRIDENT T1
INNER JOIN
VDPS2.VTINSTRUMENT T2
ON T1.INSTRUMENTID = T2.INSTRUMENTID
INNER JOIN
VDPS2.VTLISTING T3
ON T1.INSTRUMENTID = T3.INSTRUMENTID
LEFT OUTER JOIN
VDPS2.VTINSTRIDENT T4
ON T3.CURRENCY = T4.INSTRUMENTID AND T4.SCHEMESYMBOL =
'CS-WS80-WHRG'
LEFT OUTER JOIN
VDPS2.VTLISTINGIDENT T5
ON T3.INSTRUMENTID = T5.INSTRUMENTID AND T5.SCHEMESYMBOL IN
('TKH', 'TKE', 'TKL', 'TKM', 'TKT', 'TKS', 'RIC') AND T5.
LISTINGNO = T3.LISTINGNO
LEFT OUTER JOIN
VDPS2.CTLISTING T6
ON T3.INSTRUMENTID = T6.INSTRUMENTID AND T6.LISTINGNO = T3.
LISTINGNO AND T6.MANDATOR = 1
INNER JOIN
VDPS2.VTINSTIIDENT T7
ON T7.INSTITUTIONID = T3.TRADINGPLACE AND T7.SCHEMESYMBOL
= 'CS-WS80-BPL' AND T7.ROWSTATUS = 1
WHERE T1.SCHEMESYMBOL = 'CH'
AND T1.ROWSTATUS = 1
AND (T2.ROWSTATUS IS NULL
OR T2.ROWSTATUS <> 2) ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID001_V04 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID001_V04 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID001_V04 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID001_V04 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID001_V04 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID001_V04 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VLIID001_V04 FOR VDPS2.XPS_VLIID001_V04 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VLIID002_V06
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.XPS_VLIID002_V06 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T1.INSTRUMENTID,
T3.CREATETIMESTAMP, T3.UPDATETIMESTAMP, T3.LISTINGNO,
T6.LISTINGIDENTNO, T3.LISTINGSTATUSTYPE,
T3.TRADINGSTATUSTYPE, T3.FIRSTTRADINGDATE,
T3.LASTTRADINGDATE, T3.ISHOMETRADINGPLACE,
T3.ISMAINTRADINGPLACE TK_HAUPTBOEPLATZ,
T7.ISSTEERINGFLAG4 CS_HAUPTBOEPLATZ,
T3.ISCSBESTVENUEOVERALL, T3.ISCSBESTVENUEPERCURR,
T3.TRADINGPLACE, T3.CURRENCY, T8.IDSYMBOL CURRENCY_CS,
T4.IDSYMBOL IDSYMBOL_BCN, T5.DOMICILE,
T5.DOMICILE_WS80 DOMICILE_CS,
T6.SCHEMESYMBOL SCHEME_TICKER, T6.IDSYMBOL IDSYMBOL_TICKER,
T6.VALIDFROMDATE, T6.VALIDUNTILDATE,
T3.DESCRIPTION_E EXTERNTRADINGCURR
FROM VDPS2.VTINSTRIDENT T1
INNER JOIN
VDPS2.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPS2.VTLISTING T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPS2.VTINSTIIDENT T4
ON T4.INSTITUTIONID = T3.TRADINGPLACE AND T4.SCHEMESYMBOL
= 'BCN' AND T4.ROWSTATUS = 1
INNER JOIN
VDPS2.VTINSTITUTION T5
ON T5.INSTITUTIONID = T3.TRADINGPLACE AND (T5.ROWSTATUS IS
NULL OR T5.ROWSTATUS <> 2)
LEFT OUTER JOIN
VDPS2.VTLISTINGIDENT T6
ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
LISTINGNO AND T6.SCHEMESYMBOL IN('TKH', 'RIC', 'BBI')
LEFT OUTER JOIN
VDPS2.CTLISTING T7
ON T7.INSTRUMENTID = T3.INSTRUMENTID AND T7.LISTINGNO = T3.
LISTINGNO AND T7.MANDATOR = 1
LEFT OUTER JOIN
VDPS2.VTINSTRIDENT T8
ON T8.INSTRUMENTID = T3.CURRENCY AND T8.SCHEMESYMBOL =
'CS-WS80-WHRG' AND T8.ROWSTATUS = 1
WHERE T1.ROWSTATUS = 1
AND T3.LISTINGSTATUSTYPE <> 9
AND T3.LISTINGSTATUSTYPE <> 18 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID002_V06 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID002_V06 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID002_V06 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID002_V06 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID002_V06 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID002_V06 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID002_V06 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VLIID002_V06 FOR VDPS2.XPS_VLIID002_V06 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VLIID003
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.XPS_VLIID003 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.LISTINGNO,
T4.IDSYMBOL IDSYMBOL_BCN, T5.IDSYMBOL CURRENCY_I2,
T3.TRADINGPLACE, T3.CURRENCY, T3.TRADINGSTATUSTYPE,
T3.LISTINGSTATUSTYPE, T3.EXCHANGETYPE, T3.CREATETIMESTAMP,
T3.UPDATETIMESTAMP, T6.IDSYMBOL IDSYMBOL_RIC,
T7.IDSYMBOL IDSYMBOL_BBI
FROM VDPS2.VTINSTRIDENT T1
INNER JOIN
VDPS2.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPS2.VTLISTING T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTIIDENT T4
ON T4.INSTITUTIONID = T3.TRADINGPLACE AND T4.SCHEMESYMBOL
= 'BCN' AND T4.ROWSTATUS = 1
LEFT OUTER JOIN
VDPS2.VTINSTRIDENT T5
ON T5.INSTRUMENTID = T3.CURRENCY AND T5.SCHEMESYMBOL =
'I2' AND T5.ROWSTATUS = 1
LEFT OUTER JOIN
VDPS2.VTLISTINGIDENT T6
ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
LISTINGNO AND T6.SCHEMESYMBOL = 'RIC' AND (T6.ISSECONDARY
IS NULL OR T6.ISSECONDARY = 0)
LEFT OUTER JOIN
VDPS2.VTLISTINGIDENT T7
ON T7.INSTRUMENTID = T3.INSTRUMENTID AND T7.LISTINGNO = T3.
LISTINGNO AND T7.SCHEMESYMBOL = 'BBI' AND (T7.ISSECONDARY
IS NULL OR T7.ISSECONDARY = 0)
WHERE T1.ROWSTATUS = 1 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID003 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID003 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID003 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID003 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID003 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VLIID003 FOR VDPS2.XPS_VLIID003 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VLIID004
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.XPS_VLIID004 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.LISTINGNO,
T4.IDSYMBOL IDSYMBOL_BCN, T5.IDSYMBOL CURRENCY_I2,
T3.TRADINGPLACE, T3.CURRENCY, T3.TRADINGSTATUSTYPE,
T3.LISTINGSTATUSTYPE, T3.EXCHANGETYPE, T3.CREATETIMESTAMP,
T3.UPDATETIMESTAMP, T6.IDSYMBOL IDSYMBOL_RIC,
T7.IDSYMBOL IDSYMBOL_BBI
FROM VDPS2.VTINSTRIDENT T1
INNER JOIN
VDPS2.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPS2.VTLISTING T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTIIDENT T4
ON T4.INSTITUTIONID = T3.TRADINGPLACE AND T4.SCHEMESYMBOL
= 'BCN' AND T4.ROWSTATUS = 1
LEFT OUTER JOIN
VDPS2.VTINSTRIDENT T5
ON T5.INSTRUMENTID = T3.CURRENCY AND T5.SCHEMESYMBOL =
'I2' AND T5.ROWSTATUS = 1
LEFT OUTER JOIN
VDPS2.VTLISTINGIDENT T6
ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
LISTINGNO AND T6.SCHEMESYMBOL = 'RIC' AND (T6.ISSECONDARY
IS NULL OR T6.ISSECONDARY = 0)
LEFT OUTER JOIN
VDPS2.VTLISTINGIDENT T7
ON T7.INSTRUMENTID = T3.INSTRUMENTID AND T7.LISTINGNO = T3.
LISTINGNO AND T7.SCHEMESYMBOL = 'BBI' AND (T7.ISSECONDARY
IS NULL OR T7.ISSECONDARY = 0)
WHERE T1.ROWSTATUS = 1 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID004 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID004 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID004 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID004 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID004 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VLIID004 FOR VDPS2.XPS_VLIID004 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VLIID005_V02
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.XPS_VLIID005_V02 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.CURRENCY,
T3.CSLISTINGCODETYPE, T3.TRADINGPLACE,
T3.TRADINGSTATUSTYPE, T3.LISTINGSTATUSTYPE,
T4.ISSTEERINGFLAG4 CS_HAUPTBOEPLATZ,
T5.IDSYMBOL IDSYMBOL_BCA, T7.IDSYMBOL IDSYMBOL_BCN,
T6.IDSYMBOL IDSYMBOL_TICKER, T6.ISSECONDARY,
T6.SCHEMESYMBOL SCHEMESYMBOL_LIST
FROM VDPS2.VTINSTRIDENT T1
INNER JOIN
VDPS2.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPS2.VTLISTING T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPS2.CTLISTING T4
ON T4.INSTRUMENTID = T3.INSTRUMENTID AND T4.LISTINGNO = T3.
LISTINGNO
INNER JOIN
VDPS2.VTINSTIIDENT T5
ON T5.INSTITUTIONID = T3.TRADINGPLACE AND T5.SCHEMESYMBOL
= 'BCA' AND T5.ROWSTATUS = 1
LEFT OUTER JOIN
VDPS2.VTINSTIIDENT T7
ON T7.INSTITUTIONID = T3.TRADINGPLACE AND T7.SCHEMESYMBOL
= 'BCN' AND T7.ROWSTATUS = 1
LEFT OUTER JOIN
VDPS2.VTLISTINGIDENT T6
ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
LISTINGNO
WHERE T1.ROWSTATUS = 1 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID005_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID005_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID005_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID005_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID005_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VLIID005_V02 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VLIID005_V02 FOR VDPS2.XPS_VLIID005_V02 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VNTP001
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","S100447" ;
--
CREATE VIEW VDPS2.XPS_VNTP001 AS SELECT CAST(FS.SYMBOLCH AS CHAR( 9))
VALOR, CAST(';' AS CHAR( 1)) DL01 , CAST(FS.SYMBOLISIN AS CHAR( 12)) ISI
N, CAST(';' AS CHAR( 1)) DL02, CAST(CASE WHEN Z.MAINLANGUAGETYPE = 1 T
HEN Z.NAME_G WHEN Z.MAINLANGUAGETYPE = 2 THEN Z.NAME_F WHEN Z.MAINLANG
UAGETYPE = 3 THEN Z.NAME_I WHEN Z.MAINLANGUAGETYPE = 4 THEN Z.NAME_E W
HEN Z.MAINLANGUAGETYPE = 5 THEN Z.NAME_N WHEN Z.MAINLANGUAGETYPE = 9999
THEN NULL ELSE NULL END AS CHAR( 254)) ISSUER_NAME, CAST(';' AS CHAR(
1)) DL03, CAST(CASE WHEN A.MAINLANGUAGETYPE = 1 THEN FD.PREPARTICLE_G
WHEN A.MAINLANGUAGETYPE = 2 THEN FD.PREPARTICLE_F WHEN A.MAINLANGUAGETY
PE = 3 THEN FD.PREPARTICLE_I WHEN A.MAINLANGUAGETYPE = 4 THEN FD.PREPAR
TICLE_E WHEN A.MAINLANGUAGETYPE = 5 THEN FD.PREPARTICLE_N WHEN A.MAINL
ANGUAGETYPE = 9999 THEN NULL ELSE NULL END AS CHAR( 254)) INSTR_PREPART
, CAST(';' AS CHAR( 1)) DL04, CAST(CASE WHEN A.MAINLANGUAGETYPE = 1 THE
N FD.POSTPARTICLE_G WHEN A.MAINLANGUAGETYPE = 2 THEN FD.POSTPARTICLE_F
WHEN A.MAINLANGUAGETYPE = 3 THEN FD.POSTPARTICLE_I WHEN A.MAINLANGUAGE
TYPE = 4 THEN FD.POSTPARTICLE_E WHEN A.MAINLANGUAGETYPE = 5 THEN FD.POS
TPARTICLE_N WHEN A.MAINLANGUAGETYPE = 9999 THEN NULL ELSE NULL END AS C
HAR( 254)) INSTR_POSTPART, CAST(';' AS CHAR( 1)) DL05, CAST(A.MAINLANGU
AGETYPE AS CHAR( 4)) MAINLANGUAGETYPE, CAST(';' AS CHAR( 1)) DL06, CAST
(FD. CSSTATUSTYPE AS CHAR( 4)) CSSTATUSTYPE, CAST(';' AS CHAR( 1)) DL07,
CAST(FD.STATUSTYPE AS CHAR( 4)) TKSTATUSTYPE, CAST(';' AS CHAR( 1)) D
L08, CAST(CASE WHEN FD.ISINTERNAL = 1 THEN FD.ISINTERNAL ELSE 0 END AS
CHAR( 1)) CSGIV , CAST(';' AS CHAR( 1)) DL09, FS.CATEGORYCSGMS CSGMS, CA
ST(';' AS CHAR ( 1)) DL10, CAST(FD.CSFUNDTYPE AS CHAR( 4)) CSFUNDTYPE, C
AST(';' AS CHAR( 1)) DL11, CAST(FD.CREDITWORTHINESSTP AS CHAR( 4)) BONI
TAETSCODE, CAST(';' AS CHAR( 1)) DL12, CAST('1' AS CHAR( 1)) MANDATOR,
CAST(';' AS CHAR( 1)) DL13, CAST(CASE WHEN H.NAME_E IS NOT NULL THEN H
.NAME_E WHEN H.NAME_G IS NOT NULL THEN H.NAME_G WHEN H.NAME_F IS NOT N
ULL THEN H.NAME_F WHEN H.NAME_I IS NOT NULL THEN H.NAME_I WHEN H.NAME_
N IS NOT NULL THEN H.NAME_N ELSE NULL END AS CHAR( 254)) MAINDEPOS_NAME
, CAST(';' AS CHAR( 1)) DL14, CAST(Z.YEARENDDATE AS CHAR ( 30)) YEARENDD
ATE, CAST(';' AS CHAR( 1)) DL15, CAST(L. INVENTORYFREQUENCY AS CHAR( 10)
) INVENTORYFREQUENCY, CAST(';' AS CHAR( 1)) DL16, CAST(L.INVENTORYFRUNI
TTP AS CHAR( 4)) INVENTORYFRUNITTP, CAST (';' AS CHAR( 1)) DL17, CAST(L.
NAVPUBLICATDESCR AS CHAR( 254)) NAVPUBLICATDESCR, CAST(';' AS CHAR( 1))
DL18, M.TRADINGPLACE_BCN BCN, CAST(';' AS CHAR( 1)) DL19, M.CURRENCY_I
2 IDSYMBOL_I2, CAST(';' AS CHAR ( 1)) DL20, CAST(CASE WHEN P.ISSTEERING
FLAG4 = 1 THEN '1' WHEN P.ISSTEERINGFLAG4 = 0 THEN '0' WHEN P.ISSTEERI
NGFLAG4 IS NULL THEN ' ' ELSE ' ' END AS CHAR( 1)) ISSTEERINGFLAG4, CAS
T(';' AS CHAR( 1)) DL21, FD.INSTRUMENTID, CAST(';' AS CHAR( 1)) DL22 FR
OM VDPS2.VTINSTRFLATDATA FD INNER JOIN VDPS2. VTINSTRUMENT A ON FD.INSTR
UMENTID = A.INSTRUMENTID AND FD.CSFUNDTYPE IN (2, 3, 6, 10, 11, 12, 14,
18, 23, 27, 28, 29, 30, 31, 32, 33, 34) AND FD.CSSTATUSTYPE IN(4, 6, 7)
INNER JOIN VDPS2.VTINSTITUTION Z ON FD. ISSUER = Z.INSTITUTIONID INNER
JOIN VDPS2.VTINSTITUTION H ON FD. MAINDEPOSITARY = H.INSTITUTIONID INNER
JOIN VDPS2.VTINSTRFLATSYMBOLS FS ON FD.INSTRUMENTID = FS.INSTRUMENTID
AND FS.ROWSTATUS = 1 INNER JOIN VDPS2.CTINSTRB42STOCK I ON I.INSTRUMENT
ID = FD.INSTRUMENTID AND I. HOLDINGSTOTAL = 999999 AND I.MANDATOR = 1 IN
NER JOIN VDPS2.VTLISTING M ON M.INSTRUMENTID = FD.INSTRUMENTID AND M.LI
STINGSTATUSTYPE <> 9 AND M. LISTINGSTATUSTYPE <> 18 LEFT OUTER JOIN VDPS
2.CTLISTING P ON P. INSTRUMENTID = M.INSTRUMENTID AND M.LISTINGNO = P.LI
STINGNO AND P. MANDATOR = 1 LEFT OUTER JOIN VDPS2.VTTRUSTDETAIL L ON L.I
NSTRUMENTID = FD.INSTRUMENTID ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VNTP001 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VNTP001 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VNTP001 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VNTP001 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VNTP001 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VNTP001 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VNTP001 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VNTP001 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VNTP001 FOR VDPS2.XPS_VNTP001 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VRISI000
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F281992" ;
--
CREATE VIEW VDPS2.XPS_VRISI000 AS
SELECT T1.INSTITUTIONID, T1.FOTYPE, T1.ISGLOBALREGACC,
T1.KANTONSCODETYPE, T1.MAINLANGUAGETYPE, T1.STATUSTYPE,
T1.DELETIONDATE, T1.DELETEREASONTYPE, T1.CREATETIMESTAMP,
T1.UPDATETIMESTAMP, T2.SCHEMESYMBOL SCHEMESYMBOL_BCN,
T2.IDSYMBOL IDSYMBOL_BCN,
T2.VALIDFROMDATE VALIDFROMDATE_BCN,
T2.VALIDUNTILDATE VALIDUNTILDATE_BCN,
T2.CREATETIMESTAMP CREATETIMESTAMP_BCN,
T2.UPDATETIMESTAMP UPDATETIMESTAMP_BCN,
T3.SCHEMESYMBOL SCHEMESYMBOL_BCA, T3.IDSYMBOL IDSYMBOL_BCA,
T3.VALIDFROMDATE VALIDFROMDATE_BCA,
T3.VALIDUNTILDATE VALIDUNTILDATE_BCA,
T3.CREATETIMESTAMP CREATETIMESTAMP_BCA,
T3.UPDATETIMESTAMP UPDATETIMESTAMP_BCA,
T4.SCHEMESYMBOL SCHEMESYMBOL_CS, T4.IDSYMBOL IDSYMBOL_CS,
T4.VALIDFROMDATE VALIDFROMDATE_CS,
T4.VALIDUNTILDATE VALIDUNTILDATE_CS,
T4.CREATETIMESTAMP CREATETIMESTAMP_CS,
T4.UPDATETIMESTAMP UPDATETIMESTAMP_CS,
T5.SCHEMESYMBOL SCHEMESYMBOL_MIC, T5.IDSYMBOL IDSYMBOL_MIC,
T5.VALIDFROMDATE VALIDFROMDATE_MIC,
T5.VALIDUNTILDATE VALIDUNTILDATE_MIC,
T5.CREATETIMESTAMP CREATETIMESTAMP_MIC,
T5.UPDATETIMESTAMP UPDATETIMESTAMP_MIC, T1.SHORTNAME_G,
T1.SHORTNAME_E, T1.SHORTNAME_F, T1.SHORTNAME_I,
T1.SHORTNAME_N, T1.NAME_G, T1.NAME_E, T1.NAME_F, T1.NAME_I,
T1.NAME_N
FROM VDPS2.VTINSTITUTION T1
LEFT OUTER JOIN
VDPS2.VTINSTIIDENT T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND T2.SCHEMESYMBOL
= 'BCN' AND T2.ROWSTATUS = 1
LEFT OUTER JOIN
VDPS2.VTINSTIIDENT T3
ON T3.INSTITUTIONID = T1.INSTITUTIONID AND T3.SCHEMESYMBOL
= 'BCA' AND T3.ROWSTATUS = 1
LEFT OUTER JOIN
VDPS2.VTINSTIIDENT T4
ON T4.INSTITUTIONID = T1.INSTITUTIONID AND T4.SCHEMESYMBOL
= 'CS-WS80-BPL' AND T4.ROWSTATUS = 1
LEFT OUTER JOIN
VDPS2.VTINSTIIDENT T5
ON T5.INSTITUTIONID = T1.INSTITUTIONID AND T5.SCHEMESYMBOL
= 'MIC' AND T5.ROWSTATUS = 1
WHERE T1.FOTYPE = 104
AND (T1.ROWSTATUS IS NULL
OR T1.ROWSTATUS <> 2) ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VRISI000 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VRISI000 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VRISI000 FOR VDPS2.XPS_VRISI000 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VROPP000
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.XPS_VROPP000 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T3.ROLETYPE,
T4.SCHEMESYMBOL ROLEOBJECTINSTI_SC,
T4.IDSYMBOL ROLEOBJECTINSTI_ID, T1.INSTITUTIONID,
T3.ROLEOBJECTINSTIID, T3.INSTIINSTIROLENO,
T3.CREATETIMESTAMP CREATETIMESTAMP_RP,
T3.UPDATETIMESTAMP UPDATETIMESTAMP_RP, T5.FOTYPE,
T5.DELETEREASONTYPE, T5.DELETIONDATE, T5.ISGLOBALREGACC,
T5.KANTONSCODETYPE, T5.MAINLANGUAGETYPE, T5.STATUSTYPE,
T5.CREATETIMESTAMP CREATETIMESTAMP_IN,
T5.UPDATETIMESTAMP UPDATETIMESTAMP_IN, T5.SHORTNAME_G,
T5.SHORTNAME_E, T5.SHORTNAME_F, T5.SHORTNAME_I,
T5.SHORTNAME_N, T5.NAME_G, T5.NAME_E, T5.NAME_F, T5.NAME_I,
T5.NAME_N
FROM VDPS2.VTINSTIIDENT T1
INNER JOIN
VDPS2.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND T2.ROWSTATUS IS
NULL
INNER JOIN
VDPS2.VTINSTIINSTIROLE T3
ON T3.ROLEPLAYERINSTIID = T2.INSTITUTIONID
INNER JOIN
VDPS2.VTINSTIIDENT T4
ON T4.INSTITUTIONID = T3.ROLEOBJECTINSTIID AND T4.
ROWSTATUS = 1
INNER JOIN
VDPS2.VTINSTITUTION T5
ON T5.INSTITUTIONID = T4.INSTITUTIONID AND T5.ROWSTATUS IS
NULL
WHERE T1.ROWSTATUS = 1 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VROPP000 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VROPP000 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VROPP000 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VROPP000 FOR VDPS2.XPS_VROPP000 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VTRPL001
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F616617" ;
--
CREATE VIEW VDPS2.XPS_VTRPL001 AS
SELECT VDPS2.VTINSTRIDENT.IDSYMBOL,
VDPS2.VTINSTIIDENT.IDSYMBOL IDSYMBOL_BCN,
VDPS2.VTTRADINGPLACE.HASELTRONICMATCH
FROM VDPS2.VTINSTRUMENT,
VDPS2.VTINSTRIDENT,
VDPS2.VTINSTIIDENT,
VDPS2.VTLISTING,
VDPS2.VTTRADINGPLACE
WHERE VDPS2.VTINSTRIDENT.SCHEMESYMBOL = 'CH'
AND VDPS2.VTINSTRIDENT.ROWSTATUS = 1
AND VDPS2.VTINSTRIDENT.INSTRUMENTID = VDPS2.VTINSTRUMENT.
INSTRUMENTID
AND (VDPS2.VTINSTRUMENT.ROWSTATUS IS NULL
OR VDPS2.VTINSTRUMENT.ROWSTATUS <> 2)
AND VDPS2.VTLISTING.INSTRUMENTID = VDPS2.VTINSTRUMENT.
INSTRUMENTID
AND VDPS2.VTLISTING.TRADINGPLACE = VDPS2.VTINSTIIDENT.
INSTITUTIONID
AND VDPS2.VTTRADINGPLACE.INSTITUTIONID = VDPS2.VTINSTIIDENT.
INSTITUTIONID
AND VDPS2.VTINSTIIDENT.SCHEMESYMBOL = 'BCN'
AND VDPS2.VTLISTING.LISTINGSTATUSTYPE <> 9
AND VDPS2.VTLISTING.LISTINGSTATUSTYPE <> 18 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VTRPL001 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VTRPL001 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VTRPL001 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VTRPL001 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VTRPL001 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VTRPL001 FOR VDPS2.XPS_VTRPL001 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.XPS_VTRUS000_V02
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F326930" ;
--
CREATE VIEW VDPS2.XPS_VTRUS000_V02 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T1.INSTITUTIONID,
T2.PORTFOLIONO, T2.ACCOUNTINGCURR,
T4.IDSYMBOL ACCOUNTINGCURR_I2,
T5.IDSYMBOL ACCOUNTINGCURR_CS, T2.INITIALMARGINRATE,
T2.TAXNUMBER, T2.NONTAXABLENUMBER, T2.YEARENDDATE,
T2.FOUNDATIONDATE, T2.NEXTSEMESTERREPORT,
T2.NONTAXABLEDATE, T2.LEGALFORMTYPE, T2.TRUSTLEGALGUIDETP,
T2.TRUSTSTATUSTYPE, T2.CREATETIMESTAMP, T2.UPDATETIMESTAMP,
T2.PREVIOUSYEARENDDT
FROM VDPS2.VTINSTIIDENT T1
INNER JOIN
VDPS2.VTINSTITUTION T2
ON T2.INSTITUTIONID = T1.INSTITUTIONID AND (T2.ROWSTATUS
IS NULL OR T2.ROWSTATUS <> 2)
LEFT OUTER JOIN
VDPS2.VTINSTRIDENT T4
ON T4.INSTRUMENTID = T2.ACCOUNTINGCURR AND T4.SCHEMESYMBOL
= 'I2' AND T4.ROWSTATUS = 1
LEFT OUTER JOIN
VDPS2.VTINSTRIDENT T5
ON T5.INSTRUMENTID = T2.ACCOUNTINGCURR AND T5.SCHEMESYMBOL
= 'CS-WS80-WHRG' AND T5.ROWSTATUS = 1
WHERE T1.ROWSTATUS = 1 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.XPS_VTRUS000_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VTRUS000_V02 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.XPS_VTRUS000_V02 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.XPS_VTRUS000_V02 FOR VDPS2.XPS_VTRUS000_V02 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL --
------------------------------------------------------------------------
--
}¢--- DSN.TX.CASE(WK920IGN) cre=2009-09-07 mod=2009-09-07-16.18.05 A540769 -----
SPACE
STORAGE
SYSDATABASE:CREATOR
SYSDATATYPES:OWNER,OWNERTYPE
SYSINDEXES:PIECESIZE,OWNER,OWNERTYPE
SYSINDEXPART:PQTY,SQTY
SYSPACKAGE:OWNER,OWNERTYPE
SYSPARMS:OWNER,OWNERTYPE
SYSROUTINES:OWNER,OWNERTYPE
SYSSEQUENCES:OWNER,OWNERTYPE
SYSTABLEPART:PQTY,SQTY,COMPRESS
SYSTABLES:CLUSTERTYPE,OWNER,OWNERTYPE
SYSTABLESPACE:CREATOR,LOCKRULE,LOCKMAX,TYPE,DSSIZE
SYSTRIGGERS:OWNER,OWNERTYPE,OWNER,OWNERTYPE
SYSVIEWS:OWNER,OWNERTYPE
}¢--- DSN.TX.CASE(WK920MAS) cre=2009-09-07 mod=2009-09-07-16.25.14 A540769 -----
DBNAME:DGDB9998,VV24A1A 00010001
AUTHID:GDB9998*,VDPS2* 00020001
TSNAME:A920A,VDPS185 00030001
TSNAME:A920B,VDPS121 00040001
}¢--- DSN.TX.CASE(WK921) cre=2009-09-07 mod=2011-12-12-09.13.52 A540769 --------
=DQ0G=0
=j72=1
* diese View ist so kompliziert, dass wir sie auf die
* entwickler objekte definieren| ==> VAV111J1
creDb src 1
* dbx c
manual check: cdl Create view .VWK921B (with dot, no creator|)
}¢--- DSN.TX.CASE(WK921DDL) cre=2009-09-07 mod=2009-09-07-13.23.34 A540769 -----
SET CURRENT SQLID='S100447';
SET CURRENT SCHEMA='$creator';
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","$creator" ;
drop VIEW $creator.VWK9210;
drop VIEW $creator.VWK921A;
drop VIEW $creator.VWK921B;
CREATE VIEW $creator.VWK9210 (ABC) as
select * from sysibm.sysdummy1;
CREATE VIEW $creator.VWK921A (ABC) as
select * from $creator.VWK9210
union all select * from $creator.VWK9210;
CREATE VIEW $creator.VWK921B
(PARTITIONID, OBJUUID, MKTVALINREPRTCCY, MKTVALINCOMPCCY,
MKTVALINPOSCCY, ACCRINTINREPRTCCY, ACCRINTINCOMPCCY, NBR, V
ALTYPECD, SECPRICETYPECD, SECPRICE, SECPRICEDT, SECPOSCCYCD, AVGPURCHPR
ICECCYCD, AVGPURCHPRICE, AVGPURCHEXCHGRATE, AVGPURCHPRICETYPECD, STOCKX
CHGCD, DURATION, NEXTINTRSTDT, NONREALPLPERCFX, NONREALPLPERCPRICE, NON
REALPLVALFXINVALCCY, NONREALPLVALPRICE, NONREALPLPERCTOT, NONREALPLVALT
OT, CONTRSIZE, CONTREXPIRYDT, CONTRSTRIKEPRICE, CNVRSNPERIODFROM, CNVRS
NPERIODTO, CNVRSNPREMIUM, EXCHGRATEREPRTCCY, EXCHGRATECOMPCCY, EXCHGRAT
EDT, YIELDPERCPRICE, YIELDPERCAVGPURCHPRICE, PRICEYRHIGH, PRICEYRHIGHDT
, PRICEYRLOW, PRICEYRLOWDT, EXPEARNINREPRTCCY, COLLATRATIOEFF, COLLATV
ALEFFINREPRTCCY, COLLATVALEFFINCOMPCCY, COLLATRATIOTYPECD, COLLATRATIOS
TNDRD, ISINDIVIDCOLLATRATIO, COLLATVALSTNDRDINREPRTCCY, COLLATVALSTNDRD
INCOMPCCY, MTYDT, ANALYSISCCYCD, ANALYSISCNTRYCD, PREMATUREREDEMPTDT, A
GIOREDEMPT, INTRSTRATE, CIFNO, LASTMOVEMENTDT, EXPGROSSREVENUE, GROSSRE
VENUE, WHTAXVAL, PRICEEARNINGRATIO, OBJECTTYPECD, REPRTUUID, SAFEKACCNO
, POLICENO, CIFNOCUSTOMERPILLAR, ASSETMAINCLASS, ASSETSUBCLASS, SECNO,
SECPOSSEQNO, NBROFPENDINGORDERS, NBROFBLOCKEDPOSITIONS, NBROFINDIVIDUAL
TEXT, SECTYPECD, SECCCYCD, ISINNO , ANALYSISSECTCD, ANALYSISDEBTORCD, BV
GCATCD, RATINGAGENCYCD, RATINGCD , FUNDTYPECD, FUNDBREAKDOWNFLAG, TICKER
CD, MINFRAGMENTATION, EUTAXCD, USTAXCD, INTRSTFREQUENCYCD, BETAFACTOR,
MSCISECTCD, MSCIGROUPCD, MSCIINDSTRYCD, MSCISUBINDSTRYCD, NOMVALUE, RED
EMPTCCYCD, REDEMPTVALINREDEMPTCCY, REDEMPTVALINREPRTCCY, REDEMPTVALINCO
MPCCY, ACCCCYCD, LASTINTRSTDT, ACCDESCR, ACCNO, CLSTRID, ACCTYPECD, IS
CREDITUSEACC, IBANNO, DEALDT, TRDCCYCD, TRDPRINCIPALVAL, COUNTERCCYCD ,
PRINCIPALAMOUNTINCOUNTERCCY, STRIKEPRICE, ISPARTIALTRX, PRICE, TREASURY
TYPECD, TRDEUID, INPUTDT, REVLTNDT, TRXTYPECD, EXPIRYDT, OPICSDEALNO, P
REMIUMCCYCD, PREMIUMVALINPREMIUMCCY, PREMIUMVALINCOMPCCY , MKTPREMIUMBAS
E, STRATEGY, EXOTIC, PREMIUMVALINTRDCCY, PREMIUMVALINCOUNTERCCY, PREMIU
MVALINREPRTCCY, PREMIUMVALINVALCCY, SECNOWITHINFUND, SECPOSSEQNOFUND, I
SINCLFUNDUNBUNDLING, POSITIONTYPECD , SORTCRITERIA0, SORTCRITERIA1, SORT
CRITERIA2, SORTCRITERIA3, SORTCRITERIA4, SORTCRITERIA5, YIELDPERCPRICE2
, YIELDPERCAVGPURCHPRICE2 , YIELDPERCPRICE3, YIELDPERCAVGPURCHPRICE3, YI
ELDPERCPRICE4, YIELDPERCAVGPURCHPRICE4, YIELDPERCPRICE5, YIELDPERCAVGPU
RCHPRICE5, BALANCEOFTRDPARTINTRDCCY, BALANCEOFTRDPARTINREPRTCCY, BALAN
CEOFTRDPARTINCOMPCCY, BALANCEOFCTRPARTINCTRCCY, BALANCEOFCTRPARTINREPRT
CCY, BALANCEOFCTRPARTINCOMPCCY, SECDESCR, RELUUID, MKTVALINACCCCY, VALC
CYCD, MKTVALINVALCCY, FOREIGNPOLICYNO, DEPOSITRUBRICCD, DEPOSITEFFCD, D
EPOSITAWDCD, PREMATUREREDEMPTDTCREDIT, CNTRYCD, BASECCYCD, PILLARTYPECD
, AVGPURCHEXCHGRATECTRCCYCD, ISMANDATECUSTOMER, MANDATEDESCR, COLLATVAL
EFFINACCCCY, SECPRICETIMESTMP , SECPRICEACTTYPECD, CSFIID, NBROFCONTRACT
S, VALIDTODT) AS SELECT PARTITIONID, OBJUUID, MKTVALINREPRTCCY, MKTVAL
INCOMPCCY, MKTVALINPOSCCY, ACCRINTINREPRTCCY, ACCRINTINCOMPCCY, 0, VALT
YPECD, SECPRICETYPECD, SECPRICE, SECPRICEDT, SECPOSCCYCD, AVGPURCHPRICE
CCYCD, AVGPURCHPRICE, AVGPURCHEXCHGRATE, AVGPURCHPRICETYPECD, STOCKXCHG
CD, DURATION, NEXTINTRSTDT, NONREALPLPERCFX, NONREALPLPERCPRICE, NONRE
ALPLVALFXINVALCCY, NONREALPLVALPRICE, NONREALPLPERCTOT, NONREALPLVALTOT
, 0, '01.01.0001', 0, CNVRSNPERIODFROM, CNVRSNPERIODTO, CNVRSNPREMIUM,
EXCHGRATEREPRTCCY, EXCHGRATECOMPCCY, EXCHGRATEDT, YIELDPERCPRICE, YIELD
PERCAVGPURCHPRICE, PRICEYRHIGH, PRICEYRHIGHDT, PRICEYRLOW, PRICEYRLOWDT
, EXPEARNINREPRTCCY, COLLATRATIOEFF, COLLATVALEFFINREPRTCCY, COLLATVALE
FFINCOMPCCY, COLLATRATIOTYPECD, COLLATRATIOSTNDRD, ISINDIVIDCOLLATRATIO
, COLLATVALSTNDRDINREPRTCCY, COLLATVALSTNDRDINCOMPCCY, MTYDT, ANALYSISC
CYCD, ANALYSISCNTRYCD, PREMATUREREDEMPTDT, AGIOREDEMPT, INTRSTRATE, CIF
NO, LASTMOVEMENTDT, EXPGROSSREVENUE, GROSSREVENUE, WHTAXVAL, 0, OBJECTT
YPECD, REPRTUUID, SAFEKACCNO, POLICENO, CIFNOCUSTOMERPILLAR, ASSETMAINC
LASS, ASSETSUBCLASS, SECNO, SECPOSSEQNO, NBROFPENDINGORDERS, NBROFBLOC
KEDPOSITIONS, NBROFINDIVIDUALTEXT, SECTYPECD, SECCCYCD, ISINNO , ANALYSI
SSECTCD, ANALYSISDEBTORCD, BVGCATCD, RATINGAGENCYCD, RATINGCD , FUNDTYPE
CD, FUNDBREAKDOWNFLAG, TICKERCD, MINFRAGMENTATION, EUTAXCD, USTAXCD, IN
TRSTFREQUENCYCD, 0, MSCISECTCD, MSCIGROUPCD, MSCIINDSTRYCD, MSCISUBINDS
TRYCD, NOMVALUE, REDEMPTCCYCD, REDEMPTVALINREDEMPTCCY, REDEMPTVALINREPR
TCCY, REDEMPTVALINCOMPCCY, '', LASTINTRSTDT, '', '', '' , '', '', '', '0
1.01.0001', '', 0, '', 0, 0, '', 0, 0, '', '01.01.0001' , '01.01.0001',
'', '01.01.0001', '', '', 0, 0, 0, '', '', 0, 0, 0, 0, SECNO, SECPOSSEQ
NO, ISINCLFUNDUNBUNDLING, POSITIONTYPECD, CASE WHEN(NOMVALUE < 0) THEN
'L ' ELSE 'A ' END, ASSETMAINCLASS, CASE WHEN(ASSETMAINCLASS = '05' AND
ANALYSISCCYCD = '0010') THEN '0' || ANALYSISCCYCD WHEN(ASSETMAINCLASS
= '05' AND ANALYSISCCYCD <> '0010') THEN '1' || ANALYSISCCYCD WHEN(AS
SETMAINCLASS = '10' AND ANALYSISCCYCD = '0010') THEN '0' || ANALYSISCCY
CD WHEN(ASSETMAINCLASS = '10' AND ANALYSISCCYCD <> '0010') THEN '1' ||
ANALYSISCCYCD WHEN(ASSETMAINCLASS = '15' AND ANALYSISCCYCD = '0010') T
HEN '0' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '15' AND ANALYSISCCYCD
<> '0010') THEN '1' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '17') THEN
ASSETSUBCLASS WHEN(ASSETMAINCLASS = '20' AND ANALYSISCCYCD = '0010') TH
EN '0' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '20' AND ANALYSISCCYCD <
> '0010') THEN '1' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '21') THEN A
NALYSISCCYCD WHEN(ASSETMAINCLASS = '23') THEN ASSETSUBCLASS WHEN(ASSET
MAINCLASS = '24' AND MTYDT IS NOT NULL) THEN SUBSTR(CHAR( MTYDT), 7, 4)
|| SUBSTR(CHAR(MTYDT), 4, 2) || SUBSTR(CHAR(MTYDT), 1, 2) WHEN(ASSETMAIN
CLASS = '24' AND MTYDT IS NULL) THEN '99991231' WHEN(ASSETMAINCLASS = '
25' AND ANALYSISCNTRYCD = '210') THEN '0' || ANALYSISCNTRYCD WHEN(ASSE
TMAINCLASS = '25' AND ANALYSISCNTRYCD <> '210') THEN '1' || ANALYSISCNT
RYCD WHEN(ASSETMAINCLASS = '26') THEN ASSETSUBCLASS WHEN(ASSETMAINCLAS
S = '30') THEN ASSETSUBCLASS WHEN(ASSETMAINCLASS = '32' AND ANALYSISCNT
RYCD = '210') THEN '0' || ANALYSISCNTRYCD WHEN(ASSETMAINCLASS = '32' A
ND ANALYSISCNTRYCD <> '210') THEN '1' || ANALYSISCNTRYCD WHEN(ASSETMAI
NCLASS = '35') THEN '1' WHEN(ASSETMAINCLASS = '37') THEN ASSETSUBCLASS
WHEN(ASSETMAINCLASS = '40' AND ANALYSISCCYCD = '0010') THEN '0' || ANA
LYSISCCYCD WHEN(ASSETMAINCLASS = '40' AND ANALYSISCCYCD <> '0010') THEN
'1' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '45') THEN ASSETSUBCLASS E
LSE '' END, CASE WHEN(ASSETMAINCLASS = '05') THEN '1' WHEN(ASSETMAINCL
ASS = '10' AND MTYDT IS NOT NULL) THEN SUBSTR(CHAR( MTYDT), 7, 4) || SUB
STR(CHAR(MTYDT), 4, 2) || SUBSTR(CHAR(MTYDT), 1, 2) WHEN(ASSETMAINCLASS
= '10' AND MTYDT IS NULL) THEN '99991231' WHEN(ASSETMAINCLASS = '15' AN
D MTYDT IS NOT NULL) THEN SUBSTR(CHAR( MTYDT), 7, 4) || SUBSTR(CHAR(MTYD
T), 4, 2) || SUBSTR(CHAR(MTYDT), 1, 2) WHEN(ASSETMAINCLASS = '15' AND MT
YDT IS NULL) THEN '99991231' WHEN(ASSETMAINCLASS = '17' AND ANALYSISCCY
CD = '0010') THEN '0' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '17' AND
ANALYSISCCYCD <> '0010') THEN '1' || ANALYSISCCYCD WHEN(ASSETMAINCLASS
= '20') THEN ASSETSUBCLASS WHEN(ASSETMAINCLASS = '21' AND MTYDT IS NOT
NULL) THEN SUBSTR(CHAR( MTYDT), 7, 4) || SUBSTR(CHAR(MTYDT), 4, 2) || S
UBSTR(CHAR(MTYDT), 1, 2) WHEN(ASSETMAINCLASS = '21' AND MTYDT IS NULL) T
HEN '99991231' WHEN(ASSETMAINCLASS = '23' AND MTYDT IS NOT NULL) THEN S
UBSTR(CHAR( MTYDT), 7, 4) || SUBSTR(CHAR(MTYDT), 4, 2) || SUBSTR(CHAR(MT
YDT), 1, 2) WHEN(ASSETMAINCLASS = '23' AND MTYDT IS NULL) THEN '99991231
' WHEN(ASSETMAINCLASS = '24' AND ANALYSISCNTRYCD = '210') THEN '0' ||
ANALYSISCNTRYCD WHEN(ASSETMAINCLASS = '24' AND ANALYSISCNTRYCD <> '210'
) THEN '1' || ANALYSISCNTRYCD WHEN(ASSETMAINCLASS = '25') THEN SECNO
WHEN(ASSETMAINCLASS = '26' AND ANALYSISCNTRYCD = '210') THEN '0' || ANA
LYSISCNTRYCD WHEN(ASSETMAINCLASS = '26' AND ANALYSISCNTRYCD <> '210') T
HEN '1' || ANALYSISCNTRYCD WHEN(ASSETMAINCLASS = '30' AND ANALYSISCNTR
YCD = '210') THEN '0' || ANALYSISCNTRYCD WHEN(ASSETMAINCLASS = '30' AN
D ANALYSISCNTRYCD <> '210') THEN '1' || ANALYSISCNTRYCD WHEN(ASSETMAIN
CLASS = '37' AND POLICENO IS NOT NULL) THEN POLICENO || '1' WHEN(ASSET
MAINCLASS = '37' AND POLICENO IS NULL) THEN ' ' || '1' WHEN(ASSET
MAINCLASS = '40') THEN ASSETSUBCLASS WHEN(ASSETMAINCLASS = '45') THEN '
1' ELSE '' END, CASE WHEN(ASSETMAINCLASS = '05') THEN ASSETSUBCLASS WH
EN(ASSETMAINCLASS = '10') THEN '1' WHEN(ASSETMAINCLASS = '15') THEN '1'
WHEN(ASSETMAINCLASS = '20' AND MTYDT IS NOT NULL) THEN SUBSTR(CHAR( MT
YDT), 7, 4) || SUBSTR(CHAR(MTYDT), 4, 2) || SUBSTR(CHAR(MTYDT), 1, 2) WH
EN(ASSETMAINCLASS = '20' AND MTYDT IS NULL) THEN '99991231' WHEN(ASSETM
AINCLASS = '21') THEN SECNO WHEN(ASSETMAINCLASS = '23' AND ANALYSISCNTR
YCD = '210') THEN '0' WHEN(ASSETMAINCLASS = '23' AND ANALYSISCNTRYCD <>
'210') THEN '1' WHEN(ASSETMAINCLASS = '24') THEN SECNO WHEN(ASSETMAIN
CLASS = '26') THEN SECNO WHEN(ASSETMAINCLASS = '30') THEN SECNO WHEN(A
SSETMAINCLASS = '37') THEN SECNO WHEN(ASSETMAINCLASS = '45') THEN SECNO
ELSE '' END, CASE WHEN(ASSETMAINCLASS = '10') THEN SECNO WHEN(ASSETMA
INCLASS = '15') THEN SECNO WHEN(ASSETMAINCLASS = '20') THEN SECNO WHEN
(ASSETMAINCLASS = '23') THEN SECNO ELSE '' END, YIELDPERCPRICE2, YIELDP
ERCAVGPURCHPRICE2, YIELDPERCPRICE3, YIELDPERCAVGPURCHPRICE3, YIELDPERCP
RICE4, YIELDPERCAVGPURCHPRICE4, YIELDPERCPRICE5, YIELDPERCAVGPURCHPRICE
5, 0, 0, 0, 0, 0, 0, SECDESCR, RELUUID, 0, VALCCYCD, 0, FOREIGNPOLICYNO
, DEPOSITRUBRICCD, DEPOSITEFFCD, DEPOSITAWDCD, PREMATUREREDEMPTDTCREDIT
, CNTRYCD, '', PILLARTYPECD, '', ISMANDATECUSTOMER, MANDATEDESCR, 0, SE
CPRICETIMESTMP, SECPRICEACTTYPECD , CSFIID, 0, VALIDTODT FROM OA1X.VAV11
1J4 UNION ALL SELECT PARTITIONID, OBJUUID, MKTVALINREPRTCCY, MKTVALIN
COMPCCY, MKTVALINPOSCCY, ACCRINTINREPRTCCY, ACCRINTINCOMPCCY, NBR, VALT
YPECD, SECPRICETYPECD, SECPRICE, SECPRICEDT, SECPOSCCYCD, AVGPURCHPRICE
CCYCD, AVGPURCHPRICE, AVGPURCHEXCHGRATE, AVGPURCHPRICETYPECD, STOCKXCHG
CD, DURATION, NEXTINTRSTDT, NONREALPLPERCFX, NONREALPLPERCPRICE, NONRE
ALPLVALFXINVALCCY, NONREALPLVALPRICE, NONREALPLPERCTOT, NONREALPLVALTOT
, CONTRSIZE, CONTREXPIRYDT, CONTRSTRIKEPRICE, CNVRSNPERIODFROM, CNVRSNP
ERIODTO, CNVRSNPREMIUM, EXCHGRATEREPRTCCY, EXCHGRATECOMPCCY, EXCHGRATED
T, YIELDPERCPRICE, YIELDPERCAVGPURCHPRICE, PRICEYRHIGH, PRICEYRHIGHDT,
PRICEYRLOW, PRICEYRLOWDT, EXPEARNINREPRTCCY , COLLATRATIOEFF, COLLATVALE
FFINREPRTCCY, COLLATVALEFFINCOMPCCY, COLLATRATIOTYPECD, COLLATRATIOSTND
RD, ISINDIVIDCOLLATRATIO, COLLATVALSTNDRDINREPRTCCY, COLLATVALSTNDRDINC
OMPCCY, MTYDT, ANALYSISCCYCD, ANALYSISCNTRYCD, PREMATUREREDEMPTDT, AGIO
REDEMPT, INTRSTRATE, CIFNO, LASTMOVEMENTDT, EXPGROSSREVENUE, GROSSREVEN
UE, WHTAXVAL, PRICEEARNINGRATIO, OBJECTTYPECD, REPRTUUID, SAFEKACCNO,
POLICENO, CIFNOCUSTOMERPILLAR, ASSETMAINCLASS, ASSETSUBCLASS, SECNO, SE
CPOSSEQNO, NBROFPENDINGORDERS, NBROFBLOCKEDPOSITIONS, NBROFINDIVIDUALTE
XT, SECTYPECD, SECCCYCD, ISINNO, ANALYSISSECTCD, ANALYSISDEBTORCD, BVGC
ATCD, RATINGAGENCYCD, RATINGCD, FUNDTYPECD, FUNDBREAKDOWNFLAG, TICKERCD
, MINFRAGMENTATION, EUTAXCD, USTAXCD, INTRSTFREQUENCYCD, BETAFACTOR, MS
CISECTCD, MSCIGROUPCD, MSCIINDSTRYCD, MSCISUBINDSTRYCD, 0, '', 0, 0, 0,
'', LASTINTRSTDT, '', '', '', '', '' , '', '01.01.0001', '', 0, '', 0,
0, '', 0, 0, '', '01.01.0001', '01.01.0001', '', '01.01.0001', '', '',
0, 0, 0, '', '', 0, 0, 0, 0, SECNO, SECPOSSEQNO, ISINCLFUNDUNBUNDLING,
POSITIONTYPECD, CASE WHEN(NBR < 0) THEN 'L ' ELSE 'A ' END, ASSETMAINCL
ASS, CASE WHEN(ASSETMAINCLASS = '05' AND ANALYSISCCYCD = '0010') THEN '
0' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '05' AND ANALYSISCCYCD <> '0
010') THEN '1' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '10' AND ANALYSI
SCCYCD = '0010') THEN '0' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '10'
AND ANALYSISCCYCD <> '0010') THEN '1' || ANALYSISCCYCD WHEN(ASSETMAINC
LASS = '15' AND ANALYSISCCYCD = '0010') THEN '0' || ANALYSISCCYCD WHEN
(ASSETMAINCLASS = '15' AND ANALYSISCCYCD <> '0010') THEN '1' || ANALYSI
SCCYCD WHEN(ASSETMAINCLASS = '17') THEN ASSETSUBCLASS WHEN(ASSETMAINCL
ASS = '20' AND ANALYSISCCYCD = '0010') THEN '0' || ANALYSISCCYCD WHEN(
ASSETMAINCLASS = '20' AND ANALYSISCCYCD <> '0010') THEN '1' || ANALYSIS
CCYCD WHEN(ASSETMAINCLASS = '21') THEN ANALYSISCCYCD WHEN(ASSETMAINCLA
SS = '23') THEN ASSETSUBCLASS WHEN(ASSETMAINCLASS = '24' AND MTYDT IS N
OT NULL) THEN SUBSTR(CHAR( MTYDT), 7, 4) || SUBSTR(CHAR(MTYDT), 4, 2) ||
SUBSTR(CHAR(MTYDT), 1, 2) WHEN(ASSETMAINCLASS = '24' AND MTYDT IS NULL)
THEN '99991231' WHEN(ASSETMAINCLASS = '25' AND ANALYSISCNTRYCD = '210'
) THEN '0' || ANALYSISCNTRYCD WHEN(ASSETMAINCLASS = '25' AND ANALYSISC
NTRYCD <> '210') THEN '1' || ANALYSISCNTRYCD WHEN(ASSETMAINCLASS = '26
') THEN ASSETSUBCLASS WHEN(ASSETMAINCLASS = '30') THEN ASSETSUBCLASS W
HEN(ASSETMAINCLASS = '32' AND ANALYSISCNTRYCD = '210') THEN '0' || ANAL
YSISCNTRYCD WHEN(ASSETMAINCLASS = '32' AND ANALYSISCNTRYCD <> '210') TH
EN '1' || ANALYSISCNTRYCD WHEN(ASSETMAINCLASS = '35') THEN '1' WHEN(A
SSETMAINCLASS = '37') THEN ASSETSUBCLASS WHEN(ASSETMAINCLASS = '40' AND
ANALYSISCCYCD = '0010') THEN '0' || ANALYSISCCYCD WHEN(ASSETMAINCLASS
= '40' AND ANALYSISCCYCD <> '0010') THEN '1' || ANALYSISCCYCD WHEN(AS
SETMAINCLASS = '45') THEN ASSETSUBCLASS ELSE '' END, CASE WHEN(ASSETMAI
NCLASS = '05') THEN '1' WHEN(ASSETMAINCLASS = '10' AND MTYDT IS NOT NUL
L) THEN SUBSTR(CHAR( MTYDT), 7, 4) || SUBSTR(CHAR(MTYDT), 4, 2) || SUBST
R(CHAR(MTYDT), 1, 2) WHEN(ASSETMAINCLASS = '10' AND MTYDT IS NULL) THEN
'99991231' WHEN(ASSETMAINCLASS = '15' AND MTYDT IS NOT NULL) THEN SUBST
R(CHAR( MTYDT), 7, 4) || SUBSTR(CHAR(MTYDT), 4, 2) || SUBSTR(CHAR(MTYDT)
, 1, 2) WHEN(ASSETMAINCLASS = '15' AND MTYDT IS NULL) THEN '99991231' W
HEN(ASSETMAINCLASS = '17' AND ANALYSISCCYCD = '0010') THEN '0' || ANALY
SISCCYCD WHEN(ASSETMAINCLASS = '17' AND ANALYSISCCYCD <> '0010') THEN '
1' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '20') THEN ASSETSUBCLASS WH
EN(ASSETMAINCLASS = '21' AND MTYDT IS NOT NULL) THEN SUBSTR(CHAR( MTYDT)
, 7, 4) || SUBSTR(CHAR(MTYDT), 4, 2) || SUBSTR(CHAR(MTYDT), 1, 2) WHEN(A
SSETMAINCLASS = '21' AND MTYDT IS NULL) THEN '99991231' WHEN(ASSETMAINC
LASS = '23' AND MTYDT IS NOT NULL) THEN SUBSTR(CHAR( MTYDT), 7, 4) || SU
BSTR(CHAR(MTYDT), 4, 2) || SUBSTR(CHAR(MTYDT), 1, 2) WHEN(ASSETMAINCLASS
= '23' AND MTYDT IS NULL) THEN '99991231' WHEN(ASSETMAINCLASS = '24' A
ND ANALYSISCNTRYCD = '210') THEN '0' || ANALYSISCNTRYCD WHEN(ASSETMAIN
CLASS = '24' AND ANALYSISCNTRYCD <> '210') THEN '1' || ANALYSISCNTRYCD
WHEN(ASSETMAINCLASS = '25') THEN SECNO WHEN(ASSETMAINCLASS = '26' AND
ANALYSISCNTRYCD = '210') THEN '0' || ANALYSISCNTRYCD WHEN(ASSETMAINCLA
SS = '26' AND ANALYSISCNTRYCD <> '210') THEN '1' || ANALYSISCNTRYCD WH
EN(ASSETMAINCLASS = '30' AND ANALYSISCNTRYCD = '210') THEN '0' || ANALY
SISCNTRYCD WHEN(ASSETMAINCLASS = '30' AND ANALYSISCNTRYCD <> '210') THE
N '1' || ANALYSISCNTRYCD WHEN(ASSETMAINCLASS = '37' AND POLICENO IS NO
T NULL) THEN POLICENO || '1' WHEN(ASSETMAINCLASS = '37' AND POLICENO I
S NULL) THEN ' ' || '1' WHEN(ASSETMAINCLASS = '40') THEN ASSETSUB
CLASS WHEN(ASSETMAINCLASS = '45') THEN '1' ELSE '' END, CASE WHEN(ASSE
TMAINCLASS = '05') THEN ASSETSUBCLASS WHEN(ASSETMAINCLASS = '10') THEN
'1' WHEN(ASSETMAINCLASS = '15') THEN '1' WHEN(ASSETMAINCLASS = '20' AN
D MTYDT IS NOT NULL) THEN SUBSTR(CHAR( MTYDT), 7, 4) || SUBSTR(CHAR(MTYD
T), 4, 2) || SUBSTR(CHAR(MTYDT), 1, 2) WHEN(ASSETMAINCLASS = '20' AND MT
YDT IS NULL) THEN '99991231' WHEN(ASSETMAINCLASS = '21') THEN SECNO WH
EN(ASSETMAINCLASS = '23' AND ANALYSISCNTRYCD = '210') THEN '0' WHEN(ASS
ETMAINCLASS = '23' AND ANALYSISCNTRYCD <> '210') THEN '1' WHEN(ASSETMAI
NCLASS = '24') THEN SECNO WHEN(ASSETMAINCLASS = '26') THEN SECNO WHEN(
ASSETMAINCLASS = '30') THEN SECNO WHEN(ASSETMAINCLASS = '37') THEN SECN
O WHEN(ASSETMAINCLASS = '45') THEN SECNO ELSE '' END, CASE WHEN(ASSETM
AINCLASS = '10') THEN SECNO WHEN(ASSETMAINCLASS = '15') THEN SECNO WHE
N(ASSETMAINCLASS = '20') THEN SECNO WHEN(ASSETMAINCLASS = '23') THEN SE
CNO ELSE '' END, YIELDPERCPRICE2, YIELDPERCAVGPURCHPRICE2, YIELDPERCPRI
CE3, YIELDPERCAVGPURCHPRICE3, YIELDPERCPRICE4, YIELDPERCAVGPURCHPRICE4,
YIELDPERCPRICE5, YIELDPERCAVGPURCHPRICE5, 0, 0, 0, 0, 0, 0, SECDESCR,
RELUUID, 0, VALCCYCD, 0, FOREIGNPOLICYNO, DEPOSITRUBRICCD, DEPOSITEFFCD
, DEPOSITAWDCD, PREMATUREREDEMPTDTCREDIT, CNTRYCD, '', PILLARTYPECD, ''
, ISMANDATECUSTOMER, MANDATEDESCR, 0, SECPRICETIMESTMP, SECPRICEACTTYPE
CD , CSFIID, 0, VALIDTODT FROM OA1X.VAV112J4 UNION ALL SELECT PARTITI
ONID, OBJUUID, 0, 0, 0, 0, 0, NBR, '', '', 0, '01.01.0001', '', '', 0,
0, '', '', 0, '01.01.0001', 0, 0, 0, 0, 0, 0, 0, '01.01.0001', 0, '01.0
1.0001', '01.01.0001', 0, 0, 0, '01.01.0001', 0, 0, 0, '01.01.0001', 0,
'01.01.0001', 0, 0, 0, 0, '', 0, '', 0, 0, MTYDT, '', '', '01.01.0001'
, 0, 0, '', '01.01.0001', 0, 0, 0, 0, OBJECTTYPECD, REPRTUUID, SAFEKACC
NO, POLICENO, '', ASSETMAINCLASS, ASSETSUBCLASS, SECNO, SECPOSSEQNO, 0,
0, 0, '', SECCCYCD, '', '', '', '', 0, '', '', '', '', 0, '', '', '',
0, '', '', '', '', NOMVALUE, '', 0, 0, 0, '', '01.01.0001', '', '', '',
'', '', '', '01.01.0001', '', 0 , '', 0, 0, '', 0, 0, '', '01.01.0001',
'01.01.0001', '', '01.01.0001' , '', '', 0, 0, 0, '', '', 0, 0, 0, 0, '
', '', '', 0, CASE WHEN(NBR > 0) THEN 'A ' WHEN(NOMVALUE > 0) THEN 'A
' ELSE 'L ' END, ASSETMAINCLASS, ASSETSUBCLASS, POLICENO || '0', SECNO,
'', 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , 0, 0, 0, 0, SECDESCR, '', 0, VALCCYC
D, 0, '', '', '', '', '01.01.0001', '', '', 0, '', '', '', 0, '', 0, ''
, 0, '01.01.0001' FROM OA1X.VAV141A1 UNION ALL SELECT PARTITIONID, O
BJUUID, MKTVALINREPRTCCY, MKTVALINCOMPCCY, 0, ACCRINTINREPRTCCY, ACCRIN
TINCOMPCCY, 0, VALTYPECD, '', 0, '01.01.0001' , '', '', 0, 0, '', '', 0,
NEXTINTRSTDT, NONREALPLPERCFX, NONREALPLPERCPRICE, NONREALPLVALFXINVAL
CCY, NONREALPLVALPRICE, NONREALPLPERCTOT, NONREALPLVALTOT, 0, '01.01.00
01', 0, '01.01.0001', '01.01.0001', 0, EXCHGRATEREPRTCCY, EXCHGRATECOMP
CCY, EXCHGRATEDT, 0, 0 , 0, '01.01.0001', 0, '01.01.0001', 0, COLLATRATI
OEFF, COLLATVALEFFINREPRTCCY, COLLATVALEFFINCOMPCCY, '', 0, '', 0, 0,
'01.01.0001', ANALYSISCCYCD, ANALYSISCNTRYCD, '01.01.0001', 0, 0, CIFNO
, LASTMOVEMENTDT, EXPGROSSREVENUE, GROSSREVENUE, WHTAXVAL, 0, OBJECTTYP
ECD, REPRTUUID, '', '', CIFNOCUSTOMERPILLAR, ASSETMAINCLASS, ASSETSUBCL
ASS, '', '', 0, 0, 0, '', '', '', ANALYSISSECTCD, ANALYSISDEBTORCD, BVG
CATCD, 0, '', '', '', '', 0, '', '', '', 0, '', '' , '', '', 0, '', 0, 0
, 0, ACCCCYCD, LASTINTRSTDT, ACCDESCR, ACCNO, CLSTRID, ACCTYPECD, ISCRE
DITUSEACC, IBANNO, '01.01.0001', '', 0, '', 0 , 0, '', 0, 0, '', '01.01.
0001', '01.01.0001', '', '01.01.0001', '', '' , 0, 0, 0, '', '', 0, 0, 0
, 0, '', '', '', POSITIONTYPECD, CASE WHEN(MKTVALINREPRTCCY < 0) THEN '
L ' ELSE 'A ' END, ASSETMAINCLASS, CASE WHEN(ASSETMAINCLASS = '05' AND
ANALYSISCCYCD = '0010') THEN '0' || ANALYSISCCYCD WHEN(ASSETMAINCLASS
= '05' AND ANALYSISCCYCD <> '0010') THEN '1' || ANALYSISCCYCD WHEN(AS
SETMAINCLASS = '10' AND ANALYSISCCYCD = '0010') THEN '0' || ANALYSISCCY
CD WHEN(ASSETMAINCLASS = '10' AND ANALYSISCCYCD <> '0010') THEN '1' ||
ANALYSISCCYCD WHEN(ASSETMAINCLASS = '15' AND ANALYSISCCYCD = '0010') T
HEN '0' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '15' AND ANALYSISCCYCD
<> '0010') THEN '1' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '17') THEN
ASSETSUBCLASS WHEN(ASSETMAINCLASS = '20' AND ANALYSISCCYCD = '0010') TH
EN '0' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '20' AND ANALYSISCCYCD <
> '0010') THEN '1' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '21') THEN A
NALYSISCCYCD WHEN(ASSETMAINCLASS = '23') THEN ASSETSUBCLASS WHEN(ASSET
MAINCLASS = '24') THEN '99991231' WHEN(ASSETMAINCLASS = '25' AND ANALYS
ISCNTRYCD = '210') THEN '0' || ANALYSISCNTRYCD WHEN(ASSETMAINCLASS = '
25' AND ANALYSISCNTRYCD <> '210') THEN '1' || ANALYSISCNTRYCD WHEN(ASS
ETMAINCLASS = '26') THEN ASSETSUBCLASS WHEN(ASSETMAINCLASS = '30') THEN
ASSETSUBCLASS WHEN(ASSETMAINCLASS = '32' AND ANALYSISCNTRYCD = '210')
THEN '0' || ANALYSISCNTRYCD WHEN(ASSETMAINCLASS = '32' AND ANALYSISCNT
RYCD <> '210') THEN '1' || ANALYSISCNTRYCD WHEN(ASSETMAINCLASS = '35')
THEN '2' WHEN(ASSETMAINCLASS = '37') THEN ASSETSUBCLASS WHEN(ASSETMAI
NCLASS = '40' AND ANALYSISCCYCD = '0010') THEN '0' || ANALYSISCCYCD WH
EN(ASSETMAINCLASS = '40' AND ANALYSISCCYCD <> '0010') THEN '1' || ANALY
SISCCYCD WHEN(ASSETMAINCLASS = '45') THEN ASSETSUBCLASS ELSE '' END, CA
SE WHEN(ASSETMAINCLASS = '05') THEN '2' WHEN(ASSETMAINCLASS = '10') TH
EN '99991231' WHEN(ASSETMAINCLASS = '15') THEN '99991231' WHEN(ASSETMA
INCLASS = '17' AND ANALYSISCCYCD = '0010') THEN '0' || ANALYSISCCYCD W
HEN(ASSETMAINCLASS = '17' AND ANALYSISCCYCD <> '0010') THEN '1' || ANAL
YSISCCYCD WHEN(ASSETMAINCLASS = '20') THEN ASSETSUBCLASS WHEN(ASSETMAI
NCLASS = '21') THEN '99991231' WHEN(ASSETMAINCLASS = '23') THEN '999912
31' WHEN(ASSETMAINCLASS = '24' AND ANALYSISCNTRYCD = '210') THEN '0' ||
ANALYSISCNTRYCD WHEN(ASSETMAINCLASS = '24' AND ANALYSISCNTRYCD <> '21
0') THEN '1' || ANALYSISCNTRYCD WHEN(ASSETMAINCLASS = '26' AND ANALYSI
SCNTRYCD = '210') THEN '0' || ANALYSISCNTRYCD WHEN(ASSETMAINCLASS = '2
6' AND ANALYSISCNTRYCD <> '210') THEN '1' || ANALYSISCNTRYCD WHEN(ASSE
TMAINCLASS = '30' AND ANALYSISCNTRYCD = '210') THEN '0' || ANALYSISCNTR
YCD WHEN(ASSETMAINCLASS = '30' AND ANALYSISCNTRYCD <> '210') THEN '1' |
| ANALYSISCNTRYCD WHEN(ASSETMAINCLASS = '40') THEN ASSETSUBCLASS WHEN
(ASSETMAINCLASS = '45') THEN '2' ELSE '' END, CASE WHEN(ASSETMAINCLASS
= '05') THEN ASSETSUBCLASS WHEN(ASSETMAINCLASS = '10') THEN '2' WHEN(A
SSETMAINCLASS = '15') THEN '2' WHEN(ASSETMAINCLASS = '20') THEN '999912
31' WHEN(ASSETMAINCLASS = '23' AND ANALYSISCNTRYCD = '210') THEN '0' W
HEN(ASSETMAINCLASS = '23' AND ANALYSISCNTRYCD <> '210') THEN '1' WHEN(A
SSETMAINCLASS = '45') THEN ACCNO ELSE '' END, CASE WHEN(ASSETMAINCLASS
= '10') THEN ACCNO WHEN(ASSETMAINCLASS = '15') THEN SUBSTR(ACCDESCR, 1,
20) ELSE '' END, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, '', RELUUID
, MKTVALINACCCCY, VALCCYCD, 0, '', '', '', '', '01.01.0001', '', '', PI
LLARTYPECD, '', '' , '', 0, '', 0, '', 0, VALIDTODT FROM OA1X.VAV121J3
UNION ALL SELECT PARTITIONID, OBJUUID, MKTVALINREPRTCCY, MKTVALINCOMPC
CY, 0, ACCRINTINREPRTCCY, ACCRINTINCOMPCCY, 0, VALTYPECD, '', 0, '01.01
.0001' , '', AVGPURCHPRICECCYCD, AVGPURCHPRICE, AVGPURCHEXCHGRATE, AVGP
URCHPRICETYPECD, '', 0, NEXTINTRSTDT, NONREALPLPERCFX, NONREALPLPERCPRI
CE, NONREALPLVALFXINVALCCY, NONREALPLVALPRICE, NONREALPLPERCTOT, NONREA
LPLVALTOT, 0, '01.01.0001', 0, '01.01.0001', '01.01.0001', 0, EXCHGRATE
REPRTCCY, EXCHGRATECOMPCCY, EXCHGRATEDT, 0, 0 , 0, '01.01.0001', 0, '01.
01.0001', 0, COLLATRATIOEFF, COLLATVALEFFINREPRTCCY, COLLATVALEFFINCOMP
CCY, '', 0, '', 0, 0, '01.01.0001', ANALYSISCCYCD, ANALYSISCNTRYCD, '01
.01.0001', 0, 0, CIFNO , LASTMOVEMENTDT, EXPGROSSREVENUE, GROSSREVENUE,
WHTAXVAL, 0, OBJECTTYPECD, REPRTUUID, '', '', CIFNOCUSTOMERPILLAR, ASSE
TMAINCLASS, ASSETSUBCLASS, '', '', 0, 0, 0, '', '', '', ANALYSISSECTCD,
ANALYSISDEBTORCD, BVGCATCD, 0, '', '', '', '', 0, '', '', '', 0, '', '
' , '', '', 0, '', 0, 0, 0, ACCCCYCD, LASTINTRSTDT, ACCDESCR, ACCNO, CL
STRID, ACCTYPECD, ISCREDITUSEACC, IBANNO, '01.01.0001', '', 0, '', 0 , 0
, '', 0, 0, '', '01.01.0001', '01.01.0001', '', '01.01.0001', '', '' , 0
, 0, 0, '', '', 0, 0, 0, 0, '', '', '', POSITIONTYPECD, CASE WHEN(MKTVA
LINREPRTCCY < 0) THEN 'L ' ELSE 'A ' END, ASSETMAINCLASS, CASE WHEN(AS
SETMAINCLASS = '05' AND ANALYSISCCYCD = '0010') THEN '0' || ANALYSISCCY
CD WHEN(ASSETMAINCLASS = '05' AND ANALYSISCCYCD <> '0010') THEN '1' ||
ANALYSISCCYCD WHEN(ASSETMAINCLASS = '10' AND ANALYSISCCYCD = '0010') T
HEN '0' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '10' AND ANALYSISCCYCD
<> '0010') THEN '1' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '15' AND AN
ALYSISCCYCD = '0010') THEN '0' || ANALYSISCCYCD WHEN(ASSETMAINCLASS =
'15' AND ANALYSISCCYCD <> '0010') THEN '1' || ANALYSISCCYCD WHEN(ASSET
MAINCLASS = '17') THEN ASSETSUBCLASS WHEN(ASSETMAINCLASS = '20' AND ANA
LYSISCCYCD = '0010') THEN '0' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '
20' AND ANALYSISCCYCD <> '0010') THEN '1' || ANALYSISCCYCD WHEN(ASSETM
AINCLASS = '21') THEN ANALYSISCCYCD WHEN(ASSETMAINCLASS = '23') THEN AS
SETSUBCLASS WHEN(ASSETMAINCLASS = '24') THEN '99991231' WHEN(ASSETMAIN
CLASS = '25' AND ANALYSISCNTRYCD = '210') THEN '0' || ANALYSISCNTRYCD
WHEN(ASSETMAINCLASS = '25' AND ANALYSISCNTRYCD <> '210') THEN '1' || AN
ALYSISCNTRYCD WHEN(ASSETMAINCLASS = '26') THEN ASSETSUBCLASS WHEN(ASSE
TMAINCLASS = '30') THEN ASSETSUBCLASS WHEN(ASSETMAINCLASS = '32' AND AN
ALYSISCNTRYCD = '210') THEN '0' || ANALYSISCNTRYCD WHEN(ASSETMAINCLASS
= '32' AND ANALYSISCNTRYCD <> '210') THEN '1' || ANALYSISCNTRYCD WHEN
(ASSETMAINCLASS = '35') THEN '2' WHEN(ASSETMAINCLASS = '37') THEN ASSET
SUBCLASS WHEN(ASSETMAINCLASS = '40' AND ANALYSISCCYCD = '0010') THEN '0
' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '40' AND ANALYSISCCYCD <> '00
10') THEN '1' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '45') THEN ASSETS
UBCLASS ELSE '' END, CASE WHEN(ASSETMAINCLASS = '05') THEN '2' WHEN(AS
SETMAINCLASS = '10') THEN '99991231' WHEN(ASSETMAINCLASS = '15') THEN '
99991231' WHEN(ASSETMAINCLASS = '17' AND ANALYSISCCYCD = '0010') THEN '
0' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '17' AND ANALYSISCCYCD <> '0
010') THEN '1' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '20') THEN ASSET
SUBCLASS WHEN(ASSETMAINCLASS = '21') THEN '99991231' WHEN(ASSETMAINCLA
SS = '23') THEN '99991231' WHEN(ASSETMAINCLASS = '24' AND ANALYSISCNTRY
CD = '210') THEN '0' || ANALYSISCNTRYCD WHEN(ASSETMAINCLASS = '24' AND
ANALYSISCNTRYCD <> '210') THEN '1' || ANALYSISCNTRYCD WHEN(ASSETMAINC
LASS = '26' AND ANALYSISCNTRYCD = '210') THEN '0' || ANALYSISCNTRYCD W
HEN(ASSETMAINCLASS = '26' AND ANALYSISCNTRYCD <> '210') THEN '1' || ANA
LYSISCNTRYCD WHEN(ASSETMAINCLASS = '30' AND ANALYSISCNTRYCD = '210') TH
EN '0' || ANALYSISCNTRYCD WHEN(ASSETMAINCLASS = '30' AND ANALYSISCNTRY
CD <> '210') THEN '1' || ANALYSISCNTRYCD WHEN(ASSETMAINCLASS = '40') T
HEN ASSETSUBCLASS WHEN(ASSETMAINCLASS = '45') THEN '2' ELSE '' END, CAS
E WHEN(ASSETMAINCLASS = '05') THEN ASSETSUBCLASS WHEN(ASSETMAINCLASS =
'10') THEN '2' WHEN(ASSETMAINCLASS = '15') THEN '2' WHEN(ASSETMAINCLA
SS = '20') THEN '99991231' WHEN(ASSETMAINCLASS = '23' AND ANALYSISCNTRY
CD = '210') THEN '0' WHEN(ASSETMAINCLASS = '23' AND ANALYSISCNTRYCD <>
'210') THEN '1' WHEN(ASSETMAINCLASS = '45') THEN ACCNO ELSE '' END, CAS
E WHEN(ASSETMAINCLASS = '10') THEN ACCNO WHEN(ASSETMAINCLASS = '15') T
HEN SUBSTR(ACCDESCR, 1, 20) ELSE '' END, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, '', RELUUID, MKTVALINACCCCY, VALCCYCD, 0, '', '', '', '', '
01.01.0001', '', '', 0, AVGPURCHEXCHGRATECTRCCYCD, '', '', 0, '', 0, ''
, 0, VALIDTODT FROM OA1X.VAV122J3 UNION ALL SELECT PARTITIONID, OBJU
UID, MKTVALINREPRTCCY, MKTVALINCOMPCCY, 0, ACCRINTINREPRTCCY, ACCRINTIN
COMPCCY, 0, VALTYPECD, '', 0, '01.01.0001' , '', '', 0, 0, '', '', 0, NE
XTINTRSTDT, NONREALPLPERCFX, NONREALPLPERCPRICE, NONREALPLVALFXINVALCCY
, NONREALPLVALPRICE, NONREALPLPERCTOT, NONREALPLVALTOT, 0, '01.01.0001'
, 0, '01.01.0001', '01.01.0001', 0, EXCHGRATEREPRTCCY, EXCHGRATECOMPCCY
, EXCHGRATEDT, 0, 0 , 0, '01.01.0001', 0, '01.01.0001', EXPEARNINREPRTCC
Y, 0, 0, 0, '', 0, '', 0, 0, MTYDT, ANALYSISCCYCD, ANALYSISCNTRYCD, '01
.01.0001', 0, 0, CIFNO, LASTMOVEMENTDT, EXPGROSSREVENUE, GROSSREVENUE,
WHTAXVAL, 0, OBJECTTYPECD, REPRTUUID, '', '', CIFNOCUSTOMERPILLAR, ASSE
TMAINCLASS, ASSETSUBCLASS, '', '', 0, 0, 0, '', '', '', ANALYSISSECTCD,
ANALYSISDEBTORCD, BVGCATCD, 0, '', '', '', '', 0, '', '', '', 0, '', '
' , '', '', 0, '', 0, 0, 0, ACCCCYCD, LASTINTRSTDT, ACCDESCR, ACCNO, CL
STRID, ACCTYPECD, '', '', '01.01.0001', '', 0, '', 0, 0, '', 0, 0, '' ,
'01.01.0001', '01.01.0001', '', '01.01.0001', '', '', 0, 0, 0, '', '' ,
0, 0, 0, 0, '', '', '', POSITIONTYPECD, CASE WHEN(MKTVALINREPRTCCY < 0)
THEN 'L ' ELSE 'A ' END, ASSETMAINCLASS, CASE WHEN(ASSETMAINCLASS = '
05' AND ANALYSISCCYCD = '0010') THEN '0' || ANALYSISCCYCD WHEN(ASSETMA
INCLASS = '05' AND ANALYSISCCYCD <> '0010') THEN '1' || ANALYSISCCYCD
WHEN(ASSETMAINCLASS = '10' AND ANALYSISCCYCD = '0010') THEN '0' || ANAL
YSISCCYCD WHEN(ASSETMAINCLASS = '10' AND ANALYSISCCYCD <> '0010') THEN
'1' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '15' AND ANALYSISCCYCD = '0
010') THEN '0' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '15' AND ANALYSI
SCCYCD <> '0010') THEN '1' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '17'
) THEN ASSETSUBCLASS WHEN(ASSETMAINCLASS = '20' AND ANALYSISCCYCD = '00
10') THEN '0' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '20' AND ANALYSIS
CCYCD <> '0010') THEN '1' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '21')
THEN ANALYSISCCYCD WHEN(ASSETMAINCLASS = '23') THEN ASSETSUBCLASS WHE
N(ASSETMAINCLASS = '24' AND MTYDT IS NOT NULL) THEN SUBSTR(CHAR( MTYDT),
7, 4) || SUBSTR(CHAR(MTYDT), 4, 2) || SUBSTR(CHAR(MTYDT), 1, 2) WHEN(AS
SETMAINCLASS = '24' AND MTYDT IS NULL) THEN '99991231' WHEN(ASSETMAINCL
ASS = '25' AND ANALYSISCNTRYCD = '210') THEN '0' || ANALYSISCNTRYCD WH
EN(ASSETMAINCLASS = '25' AND ANALYSISCNTRYCD <> '210') THEN '1' || ANAL
YSISCNTRYCD WHEN(ASSETMAINCLASS = '26') THEN ASSETSUBCLASS WHEN(ASSETM
AINCLASS = '30') THEN ASSETSUBCLASS WHEN(ASSETMAINCLASS = '32' AND ANAL
YSISCNTRYCD = '210') THEN '0' || ANALYSISCNTRYCD WHEN(ASSETMAINCLASS =
'32' AND ANALYSISCNTRYCD <> '210') THEN '1' || ANALYSISCNTRYCD WHEN(A
SSETMAINCLASS = '35') THEN '2' WHEN(ASSETMAINCLASS = '37') THEN ASSETSU
BCLASS WHEN(ASSETMAINCLASS = '40' AND ANALYSISCCYCD = '0010') THEN '0'
|| ANALYSISCCYCD WHEN(ASSETMAINCLASS = '40' AND ANALYSISCCYCD <> '0010
') THEN '1' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '45') THEN ASSETSUB
CLASS ELSE '' END, CASE WHEN(ASSETMAINCLASS = '05') THEN '2' WHEN(ASSE
TMAINCLASS = '10' AND MTYDT IS NOT NULL) THEN SUBSTR(CHAR( MTYDT), 7, 4)
|| SUBSTR(CHAR(MTYDT), 4, 2) || SUBSTR(CHAR(MTYDT), 1, 2) WHEN(ASSETMAI
NCLASS = '10' AND MTYDT IS NULL) THEN '99991231' WHEN(ASSETMAINCLASS =
'15' AND MTYDT IS NOT NULL) THEN SUBSTR(CHAR( MTYDT), 7, 4) || SUBSTR(CH
AR(MTYDT), 4, 2) || SUBSTR(CHAR(MTYDT), 1, 2) WHEN(ASSETMAINCLASS = '15'
AND MTYDT IS NULL) THEN '99991231' WHEN(ASSETMAINCLASS = '17' AND ANAL
YSISCCYCD = '0010') THEN '0' || ANALYSISCCYCD WHEN(ASSETMAINCLASS = '1
7' AND ANALYSISCCYCD <> '0010') THEN '1' || ANALYSISCCYCD WHEN(ASSETMA
INCLASS = '20') THEN ASSETSUBCLASS WHEN(ASSETMAINCLASS = '21' AND MTYDT
IS NOT NULL) THEN SUBSTR(CHAR( MTYDT), 7, 4) || SUBSTR(CHAR(MTYDT), 4,
2) || SUBSTR(CHAR(MTYDT), 1, 2) WHEN(ASSETMAINCLASS = '21' AND MTYDT IS
NULL) THEN '99991231' WHEN(ASSETMAINCLASS = '23' AND MTYDT IS NOT NULL)
THEN SUBSTR(CHAR( MTYDT), 7, 4) || SUBSTR(CHAR(MTYDT), 4, 2) || SUBSTR(
CHAR(MTYDT), 1, 2) WHEN(ASSETMAINCLASS = '23' AND MTYDT IS NULL) THEN '9
9991231' WHEN(ASSETMAINCLASS = '24' AND ANALYSISCNTRYCD = '210') THEN '
0' || ANALYSISCNTRYCD WHEN(ASSETMAINCLASS = '24' AND ANALYSISCNTRYCD <
> '210') THEN '1' || ANALYSISCNTRYCD WHEN(ASSETMAINCLASS = '26' AND AN
ALYSISCNTRYCD = '210') THEN '0' || ANALYSISCNTRYCD WHEN(ASSETMAINCLASS
= '26' AND ANALYSISCNTRYCD <> '210') THEN '1' || ANALYSISCNTRYCD WHEN
(ASSETMAINCLASS = '30' AND ANALYSISCNTRYCD = '210') THEN '0' || ANALYSI
SCNTRYCD WHEN(ASSETMAINCLASS = '30' AND ANALYSISCNTRYCD <> '210') THEN
'1' || ANALYSISCNTRYCD WHEN(ASSETMAINCLASS = '40') THEN ASSETSUBCLASS
WHEN(ASSETMAINCLASS = '45') THEN '2' ELSE '' END, CASE WHEN(ASSETMAINC
LASS = '05') THEN ASSETSUBCLASS WHEN(ASSETMAINCLASS = '10') THEN '2' W
HEN(ASSETMAINCLASS = '15') THEN '2' WHEN(ASSETMAINCLASS = '20' AND MTYD
T IS NOT NULL) THEN SUBSTR(CHAR( MTYDT), 7, 4) || SUBSTR(CHAR(MTYDT), 4,
2) || SUBSTR(CHAR(MTYDT), 1, 2) WHEN(ASSETMAINCLASS = '20' AND MTYDT IS
NULL) THEN '99991231' WHEN(ASSETMAINCLASS = '23' AND ANALYSISCNTRYCD =
'210') THEN '0' WHEN(ASSETMAINCLASS = '23' AND ANALYSISCNTRYCD <> '210
') THEN '1' WHEN(ASSETMAINCLASS = '45') THEN ACCNO ELSE '' END, CASE W
HEN(ASSETMAINCLASS = '10') THEN ACCNO WHEN(ASSETMAINCLASS = '15') THEN
SUBSTR(ACCDESCR, 1, 20) ELSE '' END, 0 , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
, 0, 0, '', RELUUID, MKTVALINACCCCY, VALCCYCD, 0, '', '', '', '', '01.0
1.0001', '', '', 0, '', '', '', COLLATVALEFFINACCCCY, '', 0, '', 0, VAL
IDTODT FROM OA1X.VAV123J3 UNION ALL SELECT PARTITIONID, OBJUUID, MKTV
ALINREPRTCCY, MKTVALINCOMPCCY, 0, 0, 0, 0, '', '', 0, '01.01.0001', '',
'', 0, 0, '', '', 0, '01.01.0001', NONREALPLPERCFX, 0, 0, 0, 0, 0, 0,
'01.01.0001', 0, '01.01.0001', '01.01.0001', 0, 0, 0, '01.01.0001', 0,
0, 0, '01.01.0001', 0, '01.01.0001', 0, 0, 0, 0, '', 0, '', 0, 0, MTYDT
, COUNTERCCYCD, '210', '01.01.0001', 0, 0, CIFNO, '01.01.0001', 0, 0, 0
, 0, OBJECTTYPECD, REPRTUUID, '', '', '', ASSETMAINCLASS, ASSETSUBCLASS
, '', '', 0, 0, 0, '', '', '', '000', '05', BVGCATCD, 0, '', '', '', ''
, 0, '', '', '', 0 , '', '', '', '', 0, '', 0, 0, 0, '', '01.01.0001', '
', '', CLSTRID, '' , '', '', DEALDT, TRDCCYCD, TRDPRINCIPALVAL, COUNTERC
CYCD, PRINCIPALAMOUNTINCOUNTERCCY, STRIKEPRICE, ISPARTIALTRX, PRICE, T
REASURYTYPECD, TRDEUID, INPUTDT, REVLTNDT, TRXTYPECD, EXPIRYDT, OPICSDE
ALNO, PREMIUMCCYCD, PREMIUMVALINPREMIUMCCY, PREMIUMVALINCOMPCCY , MKTPRE
MIUMBASE, STRATEGY, EXOTIC, PREMIUMVALINTRDCCY, PREMIUMVALINCOUNTERCCY,
PREMIUMVALINREPRTCCY, PREMIUMVALINVALCCY, '', '', '', POSITIONTYPECD,
CASE WHEN(MKTVALINREPRTCCY < 0) THEN 'L ' ELSE 'A ' END, ASSETMAINCLASS
, CASE WHEN(ASSETMAINCLASS = '17') THEN ASSETSUBCLASS WHEN(ASSETMAINC
LASS = '23') THEN ASSETSUBCLASS WHEN(ASSETMAINCLASS = '24' AND MTYDT IS
NOT NULL) THEN SUBSTR(CHAR( MTYDT), 7, 4) || SUBSTR(CHAR(MTYDT), 4, 2)
|| SUBSTR(CHAR(MTYDT), 1, 2) WHEN(ASSETMAINCLASS = '24' AND MTYDT IS NUL
L) THEN '99991231' WHEN(ASSETMAINCLASS = '26') THEN ASSETSUBCLASS WHEN
(ASSETMAINCLASS = '30') THEN ASSETSUBCLASS WHEN(ASSETMAINCLASS = '35')
THEN '3' WHEN(ASSETMAINCLASS = '37') THEN ASSETSUBCLASS WHEN(ASSETMAIN
CLASS = '45') THEN ASSETSUBCLASS ELSE '' END, CASE WHEN(ASSETMAINCLASS
= '05') THEN '3' WHEN(ASSETMAINCLASS = '10' AND MTYDT IS NOT NULL) THEN
SUBSTR(CHAR( MTYDT), 7, 4) || SUBSTR(CHAR(MTYDT), 4, 2) || SUBSTR(CHAR(
MTYDT), 1, 2) WHEN(ASSETMAINCLASS = '10' AND MTYDT IS NULL) THEN '999912
31' WHEN(ASSETMAINCLASS = '15' AND MTYDT IS NOT NULL) THEN SUBSTR(CHAR(
MTYDT), 7, 4) || SUBSTR(CHAR(MTYDT), 4, 2) || SUBSTR(CHAR(MTYDT), 1, 2)
WHEN(ASSETMAINCLASS = '15' AND MTYDT IS NULL) THEN '99991231' WHEN(ASS
ETMAINCLASS = '17' AND COUNTERCCYCD = '0010') THEN '0' || COUNTERCCYCD
WHEN(ASSETMAINCLASS = '17' AND COUNTERCCYCD <> '0010') THEN '1' || COU
NTERCCYCD WHEN(ASSETMAINCLASS = '20') THEN ASSETSUBCLASS WHEN(ASSETMAI
NCLASS = '21' AND MTYDT IS NOT NULL) THEN SUBSTR(CHAR( MTYDT), 7, 4) ||
SUBSTR(CHAR(MTYDT), 4, 2) || SUBSTR(CHAR(MTYDT), 1, 2) WHEN(ASSETMAINCLA
SS = '21' AND MTYDT IS NULL) THEN '99991231' WHEN(ASSETMAINCLASS = '23'
AND MTYDT IS NOT NULL) THEN SUBSTR(CHAR( MTYDT), 7, 4) || SUBSTR(CHAR(M
TYDT), 4, 2) || SUBSTR(CHAR(MTYDT), 1, 2) WHEN(ASSETMAINCLASS = '23' AND
MTYDT IS NULL) THEN '99991231' WHEN(ASSETMAINCLASS = '40') THEN ASSETS
UBCLASS WHEN(ASSETMAINCLASS = '45') THEN '3' ELSE '' END, CASE WHEN(AS
SETMAINCLASS = '05') THEN ASSETSUBCLASS WHEN(ASSETMAINCLASS = '10') THE
N '3' WHEN(ASSETMAINCLASS = '15') THEN '3' WHEN(ASSETMAINCLASS = '20'
AND MTYDT IS NOT NULL) THEN SUBSTR(CHAR( MTYDT), 7, 4) || SUBSTR(CHAR(MT
YDT), 4, 2) || SUBSTR(CHAR(MTYDT), 1, 2) WHEN(ASSETMAINCLASS = '20' AND
MTYDT IS NULL) THEN '99991231' WHEN(ASSETMAINCLASS = '23') THEN '0' ELS
E '' END, '', 0, 0, 0, 0, 0, 0 , 0, 0, BALANCEOFTRDPARTINTRDCCY, BALANCE
OFTRDPARTINREPRTCCY, BALANCEOFTRDPARTINCOMPCCY, BALANCEOFCTRPARTINCTRCC
Y, BALANCEOFCTRPARTINREPRTCCY, BALANCEOFCTRPARTINCOMPCCY, '', RELUUID,
0, VALCCYCD, MKTVALINVALCCY, '', '', '', '', '01.01.0001', '', BASECCYC
D, 0, '', '', '', 0, '', 0, '', 0, VALIDTODT FROM OA1X.VAV132A3 UNION
ALL SELECT PARTITIONID, OBJUUID, MKTVALINREPRTCCY, MKTVALINCOMPCCY, 0,
0, 0, 0, '', '', 0, '01.01.0001', '', '', AVGPURCHPRICE, 0, '', '', 0,
'01.01.0001', NONREALPLPERCFX, 0, 0, 0, 0, 0, 0, '01.01.0001', 0, '01
.01.0001', '01.01.0001', 0, 0, 0, '01.01.0001', 0, 0, 0, '01.01.0001',
0, '01.01.0001', 0, 0, 0, 0, '', 0, '', 0, 0, MTYDT, COUNTERCCYCD, '210
', '01.01.0001', 0, 0, CIFNO, '01.01.0001', 0, 0, 0, 0, OBJECTTYPECD, R
EPRTUUID, '', '', '', ASSETMAINCLASS, ASSETSUBCLASS, '', '', 0, 0, 0, '
', '', '', '000', '05', BVGCATCD, 0, '', '', '', '', 0, '', '', '', 0,
'', '', '', '', 0, '', 0, 0, 0, '', '01.01.0001', '' , '', CLSTRID, '',
'', '', '01.01.0001', TRDCCYCD, TRDPRINCIPALVAL, COUNTERCCYCD, PRINCIPA
LAMOUNTINCOUNTERCCY, STRIKEPRICE, ISPARTIALTRX, PRICE, TREASURYTYPECD,
'', '01.01.0001', '01.01.0001', TRXTYPECD, '01.01.0001', '', '', 0, 0,
0, '', '', 0, 0, 0, 0, '', '', '', POSITIONTYPECD, CASE WHEN(MKTVALINR
EPRTCCY < 0) THEN 'L ' ELSE 'A ' END, ASSETMAINCLASS, CASE WHEN(ASSETM
AINCLASS = '17') THEN ASSETSUBCLASS WHEN(ASSETMAINCLASS = '23') THEN AS
SETSUBCLASS WHEN(ASSETMAINCLASS = '24' AND MTYDT IS NOT NULL) THEN SUBS
TR(CHAR( MTYDT), 7, 4) || SUBSTR(CHAR(MTYDT), 4, 2) || SUBSTR(CHAR(MTYDT
), 1, 2) WHEN(ASSETMAINCLASS = '24' AND MTYDT IS NULL) THEN '99991231'
WHEN(ASSETMAINCLASS = '26') THEN ASSETSUBCLASS WHEN(ASSETMAINCLASS = '3
0') THEN ASSETSUBCLASS WHEN(ASSETMAINCLASS = '35') THEN '3' WHEN(ASSET
MAINCLASS = '37') THEN ASSETSUBCLASS WHEN(ASSETMAINCLASS = '45') THEN A
SSETSUBCLASS ELSE '' END, CASE WHEN(ASSETMAINCLASS = '05') THEN '3' WH
EN(ASSETMAINCLASS = '10' AND MTYDT IS NOT NULL) THEN SUBSTR(CHAR( MTYDT)
, 7, 4) || SUBSTR(CHAR(MTYDT), 4, 2) || SUBSTR(CHAR(MTYDT), 1, 2) WHEN(A
SSETMAINCLASS = '10' AND MTYDT IS NULL) THEN '99991231' WHEN(ASSETMAINC
LASS = '15' AND MTYDT IS NOT NULL) THEN SUBSTR(CHAR( MTYDT), 7, 4) || SU
BSTR(CHAR(MTYDT), 4, 2) || SUBSTR(CHAR(MTYDT), 1, 2) WHEN(ASSETMAINCLASS
= '15' AND MTYDT IS NULL) THEN '99991231' WHEN(ASSETMAINCLASS = '17' A
ND COUNTERCCYCD = '0010') THEN '0' || COUNTERCCYCD WHEN(ASSETMAINCLASS
= '17' AND COUNTERCCYCD <> '0010') THEN '1' || COUNTERCCYCD WHEN(ASSE
TMAINCLASS = '20') THEN ASSETSUBCLASS WHEN(ASSETMAINCLASS = '21' AND MT
YDT IS NOT NULL) THEN SUBSTR(CHAR( MTYDT), 7, 4) || SUBSTR(CHAR(MTYDT),
4, 2) || SUBSTR(CHAR(MTYDT), 1, 2) WHEN(ASSETMAINCLASS = '21' AND MTYDT
IS NULL) THEN '99991231' WHEN(ASSETMAINCLASS = '23' AND MTYDT IS NOT NU
LL) THEN SUBSTR(CHAR( MTYDT), 7, 4) || SUBSTR(CHAR(MTYDT), 4, 2) || SUBS
TR(CHAR(MTYDT), 1, 2) WHEN(ASSETMAINCLASS = '23' AND MTYDT IS NULL) THEN
'99991231' WHEN(ASSETMAINCLASS = '40') THEN ASSETSUBCLASS WHEN(ASSETM
AINCLASS = '45') THEN '3' ELSE '' END, CASE WHEN(ASSETMAINCLASS = '05')
THEN ASSETSUBCLASS WHEN(ASSETMAINCLASS = '10') THEN '3' WHEN(ASSETMAI
NCLASS = '15') THEN '3' WHEN(ASSETMAINCLASS = '20' AND MTYDT IS NOT NUL
L) THEN SUBSTR(CHAR( MTYDT), 7, 4) || SUBSTR(CHAR(MTYDT), 4, 2) || SUBST
R(CHAR(MTYDT), 1, 2) WHEN(ASSETMAINCLASS = '20' AND MTYDT IS NULL) THEN
'99991231' WHEN(ASSETMAINCLASS = '23') THEN '0' ELSE '' END, '', 0, 0,
0, 0, 0, 0 , 0, 0, BALANCEOFTRDPARTINTRDCCY, BALANCEOFTRDPARTINREPRTCCY,
BALANCEOFTRDPARTINCOMPCCY, BALANCEOFCTRPARTINCTRCCY, BALANCEOFCTRPART
INREPRTCCY, BALANCEOFCTRPARTINCOMPCCY, '', RELUUID, 0, VALCCYCD, MKTVAL
INVALCCY, '', '', '', '', '01.01.0001', '', '', 0, '', '', '', 0, '', 0
, '', NBROFCONTRACTS, VALIDTODT FROM OA1X.VAV135A3 ;
COMMIT;
}¢--- DSN.TX.CASE(WK922) cre=2009-09-07 mod=2010-08-06-13.11.37 A540769 --------
=DQ0G=1
* fehler 184: oa1a creator statt vdps2 creator für vdps441
* does not happen with wk922ddl, nor with wk992dds and wk992ddt |||
* with objectCompare compare version files wk922cas and wk992cat
* with mask wk922mas, and ignore wk922ign
manual check views are create with schema and/or creator vdps2
+ wait check views are create with schema and/or creator vdps2
creDb trg 1
creDb src 2
}¢--- DSN.TX.CASE(WK922CAS) cre=2009-09-07 mod=2009-09-07-16.16.23 A540769 -----
=> TX.DBACAT(WK922CAS)
}¢--- DSN.TX.CASE(WK922CAT) cre=2009-09-07 mod=2009-09-07-16.16.43 A540769 -----
=> TX.DBACAT(WK922CAT)
}¢--- DSN.TX.CASE(WK922DDL) cre=2009-09-07 mod=2009-09-07-14.41.04 A540769 -----
SET CURRENT SQLID='S100447';
SET CURRENT SCHEMA='$creator';
$@{
if $env = 'src' then $@¢
SET CURRENT PATH = "SYSIBM","SYSFUN",SYSPROC,"S100447";
$! else $@¢
SET CURRENT PATH = "SYSIBM","SYSFUN",SYSPROC,"CREATBY";
$!
$}
drop VIEW $creator.VWK922A;
CREATE VIEW $creator.VWK922A (F$env$phase) as
select * from sysibm.sysdummy1;
}¢--- DSN.TX.CASE(WK922DDS) cre=2009-09-07 mod=2009-09-07-14.47.39 A540769 -----
------------------------------------------------------------------------
-- --
-- Database 2 Administration Tool (DB2 Admin) , program 5697-L90 --
-- --
-- ADB2GEN - Extract object definitions from the DB2 Catalog tables --
-- --
-- Title : SRC VDPS441C 3 --
-- --
-- Input prepared on : DBAF (915) Extract time : 2009-09-07 14:01 --
-- --
-- Catalog values overridden : none
-- --
-- Generate : SG=N DB=Y TS=Y TB=Y VW=Y IX=Y SY=Y AL=Y LB=Y CM=Y FK=Y --
-- TG=Y UT=N UF=N SP=N SQ=N RO=N --
-- Grants : SG=N DB=N TS=N TB=N VW=N SC=N UT=N UF=N SP=N SQ=N --
-- --
------------------------------------------------------------------------
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_SMDS1501
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPSX';
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F578271" ;
--
CREATE VIEW VDPSX.IDS_SMDS1501 AS
SELECT T1.INSTRUMENTID, T2.SYMBOLCH, T2.SYMBOLCSFI, T2.SYMBOLISIN,
T2.CATEGORYVDPS, T2.STATUSTYPE, T2.ROWSTATUS,
T2.UPDATETIMESTAMP, T2.CREATETIMESTAMP,
T2.INSTRUMENTUPDATETIMESTAMP, T2.INSTRUMENTCREATETIMESTAMP,
T1.LISTINGSYMBOLTK, T1.CURRENCY_WS80, T1.CURRENCY_I2,
T1.CURRENCY_I1, T1.MARKTPRACTIDSYMBOL, T1.FIRSTTRADINGDATE,
T1.LASTTRADINGDATE, T1.ISMAINTRADINGPLACE,
T1.ISHOMETRADINGPLACE, T1.ISBESTSPREAD,
T1.ISBESTSPREADPERCURR, T1.ISBESTVOLUME,
T1.ISBESTVOLUMEBESTSPREAD, T1.ISBESTVOLUMEPERCURR,
T1.ISCSBESTVENUEOVERALL, T1.ISCSBESTVENUEPERCURR,
T1.ISFUNDASSESSMENTSOURCE, T1.ISHIGHESTTICKS,
T1.ISNAVINDEPENDENTSOURCE, T1.ISPLACEOFQUOTE,
T1.ISPLACEOFLISTING, T1.ISPLACEOFTRADING,
T1.ISPRIMARYMARKETUSA, T1.ISSINGLETRADINGPLACE,
T1.LISTINGCLASSTYPE, T1.LISTINGSTATUSTYPE,
T1.PRICINGUNITNO, T1.PRICINGUNITTYPE, T1.TRADINGPLACE_BBX,
T1.TRADINGPLACE_BCN, T1.TRADINGPLACE_WS80,
T1.TRADINGPLACE_MIC, T1.TRADINGPLACE_RTX,
T1.PARENTTRADINGPLACE_BBX, T1.PARENTTRADINGPLACE_BCN,
T1.PARENTTRADINGPLACE_WS80, T1.PARENTTRADINGPLACE_MIC,
T1.PARENTTRADINGPLACE_RTX, T1.TRADINGSTATUSTYPE,
T1.TRADINGUNITTYPE, T1.LISTINGSYMBOLRT, T1.LISTINGSYMBOLBB,
T1.MINTRADINGUNITNO, T1.REGULARTRADINGUNITNO,
T1.NOMINALTRADINGUNITNO, T1.NMSTRADINGUNITNO,
T1.EMSTRADINGUNITNO, T1.SMSTRADINGUNITNO,
T1.PTSTRADINGUNITNO, T1.LISTINGNO, T3.CSLISTINGCODETYPE,
T3.CSMAINTRADPLACE_BBX, T3.CSMAINTRADPLACE_BCN,
T3.CSMAINTRADPLACE_WS80, T3.CSMAINTRADPLACE_MIC,
T3.CSMAINTRADPLACE_RTX, T4.IDSYMBOL IDSYMBOL_TKM,
T4.SCHEMESYMBOL SCHEMESYMBOL_TKM, T5.IDSYMBOL IDSYMBOL_TKL,
T5.SCHEMESYMBOL SCHEMESYMBOL_TKL, T6.IDSYMBOL IDSYMBOL_TKE,
T6.SCHEMESYMBOL SCHEMESYMBOL_TKE
FROM VDPSX.VTLISTING T1
INNER JOIN
VDPSX.VTINSTRFLATSYMBOLS T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTRFLATDATA T3
ON T3.INSTRUMENTID = T2.INSTRUMENTID
LEFT OUTER JOIN
VDPSX.VTLISTINGIDENT T4
ON T4.INSTRUMENTID = T1.INSTRUMENTID AND T4.LISTINGNO = T1.
LISTINGNO AND T4.SCHEMESYMBOL = 'TKM'
LEFT OUTER JOIN
VDPSX.VTLISTINGIDENT T5
ON T5.INSTRUMENTID = T1.INSTRUMENTID AND T5.LISTINGNO = T1.
LISTINGNO AND T5.SCHEMESYMBOL = 'TKL'
LEFT OUTER JOIN
VDPSX.VTLISTINGIDENT T6
ON T6.INSTRUMENTID = T1.INSTRUMENTID AND T6.LISTINGNO = T1.
LISTINGNO AND T6.SCHEMESYMBOL = 'TKE' ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_VINBS138_V03
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F578255" ;
--
CREATE VIEW VDPSX.IDS_VINBS138_V03 AS
SELECT A.INSTRUMENTID, A.BOOKDATE, A.HOLDINGSINHOUSE,
A.HOLDINGSMINUS, A.HOLDINGSMINUSINHO, A.HOLDINGSRESERVE1,
A.HOLDINGSRESERVE2, A.HOLDINGSRESERVE3, A.HOLDINGSRESERVE4,
A.HOLDINGSRESERVE5, A.HOLDINGSRESERVE6, A.HOLDINGSTOTAL,
A.NOOFACCOUNTS, A.RESERVENUMBER2, A.RESERVENUMBER3,
A.UPDATETIMESTAMP, A.CREATETIMESTAMP, A.MANDATOR
FROM VDPSX.CTINSTRB42STOCK A ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_VINOP140_V04
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.IDS_VINOP140_V04 AS
SELECT T1.INSTRUMENTID, T1.ROWSTATUS ROWSTATUS_FLTSYMB,
T1.SYMBOLCSFI, T1.SYMBOLCH, T1.SYMBOLISIN, T1.SYMBOLUS,
T1.SYMBOLXS, T1.SYMBOLGB, T1.SYMBOLLU, T1.SYMBOLDE,
T1.SYMBOLAT, T1.SYMBOLFR, T1.SYMBOLBE, T1.SYMBOLIT,
T1.SYMBOLNL, T1.SYMBOLJP, T1.SYMBOLJ2, T1.SYMBOLDK,
T1.SYMBOLSE, T1.SYMBOLI2, T1.SYMBOLI1, T1.SYMBOLT1,
T1.SYMBOLT2, T1.SYMBOLCSCURR, T1.CATEGORYVDPS,
T1.CATEGORYTKT, T1.CATEGORYTKSK, T1.CATEGORYTKZUS,
T1.CATEGORYTKPRK, T1.CATEGORYTKTZ, T1.CATEGORYMAZU,
T1.CATEGORYECBTR, T1.CATEGORYCFI, T1.CATEGORYEUZS,
T1.CATEGORYCSGTA, T1.CATEGORYCSGMS, T1.CATEGUSTAXREPORT,
T1.CATEGUSIRSADDITION,
T1.CSSTATUSTYPE CSSTATUSTYPE_FLTSYMB,
T1.STATUSTYPE STATUSTYPE_FLTSYMB, T2.PAYFREQUENCY,
T2.ISCALLFORTXREONLY, T2.ISREDEEMABLE, T2.ISRETRACTABLE,
T2.ISCONVERTBYHOLDER, T2.ISCONVERTBYISSUER,
T2.HASVOTINGRIGHTNO, T2.HASREDMPINVARCURR,
T2.HASMULTIUNDERLYERS, T2.MAINDEPOSITARY, T2.NOMINALAMOUNT,
T2.MINDENOMINATION, T2.EFFINTERESTRATE,
T2.REPAYPRICEAMOUNT, T2.REPAYPRICERATE, T2.POOLFACTOR,
T2.VOTINGRIGHTNO, T2.OUTSTANDINGCAPITAL, T2.ISSUEDCAPITAL,
T2.OUTSTANDCAPITALNO, T2.ISSUEDCAPITALNO, T2.ISSUEAMOUNT,
T2.ISSUEPRICE, T2.EXERCISEAMOUNT, T2.MINEXERCISEAMOUNT,
T2.HELDAMOUNT, T2.PAYAMOUNT, T2.INCOMETAXRATE,
T2.PREMIUMRATE, T2.PARTICIPATIONRATE, T2.REBATE,
T2.CSRATING, T2.CSRISKINDIDSYMBOL, T2.CSRISKINDSCHEMESYM,
T2.CSRISKINSTGRPIDSYM, T2.CSRISKINSGRPSCHSYM, T2.MDYRATING,
T2.SPRATING, T2.FITCHRATING, T2.LISTINGSYMBOLTKH,
T2.LISTINGSYMBOLRIC, T2.LISTINGSYMBOLBBI,
T2.NOMINALCURR_I1, T2.NOMINALCURR_I2, T2.NOMINALCURR_WS80,
T2.CSRISKCURRENCY_I1, T2.CSRISKCURRENCY_I2,
T2.CSRISKCURRENCY_WS80, T2.CSRISINSTRUMENT_CH,
T2.CSRISINSTRUMENT_ISIN, T2.CSRISINSTRUMENT_CSFI,
T2.CSRISKCOUNTRY_A2, T2.CSRISKCOUNTRY_WS80,
T2.REPAYPRICECURR_I1, T2.REPAYPRICECURR_I2,
T2.REPAYPRICECURR_WS80, T2.ISSUEPRICECURR_I1,
T2.ISSUEPRICECURR_I2, T2.ISSUEPRICECURR_WS80,
T2.EXERCISECURR_I1, T2.EXERCISECURR_I2,
T2.EXERCISECURR_WS80, T2.CSMAINTRADPLACE_BCN,
T2.CSMAINTRADPLACE_WS80, T2.CSMAINTRADPLACE_RTX,
T2.CSMAINTRADPLACE_BBX, T2.UNDERINSTRUMENT_CH,
T2.UNDERINSTRUMENT_ISIN, T2.UNDERINSTRUMENT_CSFI,
T2.ORIGINALISSUER_GK, T2.ISSUER_GK, T2.MAINDEPOSITARY_GK,
T2.EXPIRATIONDATE, T2.MATURITYDATE, T2.FIRSTPAYDATE,
T2.FIRSTPYDATEPERYEAR, T2.INTRSTDVDENFRDATE,
T2.CSRATINGDATE, T2.MDYRATINGDATE, T2.SPRATINGDATE,
T2.FITCHRATINGDATE, T2.SUBSCRBEGINDATE, T2.PAYMENTDATE,
T2.EXERCISEBEGINDATE, T2.SUBSCRPLNDENDDATE,
T2.EXERCISEENDDATE, T2.BVGTYPE, T2.CREDITWORTHINESSTP,
T2.COMMISSIONCODETYPE, T2.UNITTYPE, T2.CSUNITTYPE,
T2.EXPIRATIONTYPE, T2.STATUSTYPE STATUSTYPE_FLTDATA,
T2.REGISTRATIONTYPE, T2.BORROWERCATTYPE,
T2.CSLISTINGCODETYPE, T2.CSSTATUSTYPE CSSTATUSTYPE_FLTDATA,
T2.STATUSDETAILTYPE, T2.INCOMEMODETYPE,
T2.INTERESTCALCTYPE, T2.INTERESTTYPE, T2.PYFREQUNITTYPE,
T2.SUBSCRMETHODTYPE, T2.PLACEMENTTYPE, T2.PAYDIRECTIONTYPE,
T2.OPTIONTYPE, T2.SETTLESTYLETYPE, T2.CSFUNDTYPE,
T2.TRADINGSTATUSTYPE, T2.LISTINGSTATUSTYPE,
T2.EXERCISEPLACE, T2.NAME35_G, T2.NAME35_E, T2.NAME35_F,
T2.NAME35_I, T2.NAME35_N, T2.NAME45_G, T2.NAME45_E,
T2.NAME45_F, T2.NAME45_I, T2.NAME45_N, T2.SHORTNAME_G,
T2.SHORTNAME_E, T2.SHORTNAME_F, T2.SHORTNAME_I,
T2.SHORTNAME_N, T2.ISINTERNAL, T2.ISOTC,
T2.HASWITHHOLDINGTAX, T2.HASFEDERALSTAMPDUTY,
T2.ISCSMIFIDCOMPLEX, T2.MOSTLIQUIDMARKETLOCATION_A2,
T2.MOSTLIQUIDMARKETLOCATION_A3,
T2.MOSTLIQUIDMARKETLOCATION_WS80,
T2.MDYWATCHLISTSTATUSTYPE, T2.SPWATCHLISTSTATUSTYPE,
T2.FITCHWATCHLISTSTATUSTYPE, T2.OPTIONSTYLETYPE,
T2.CSMAINTRADINGCURR_I1, T2.CSMAINTRADINGCURR_I2,
T2.CSMAINTRADINGCURR_WS80, T2.CSRISKCOUNTRY_A3,
T2.LIQUIDATIONRIGHTTYPE, T2.CSMAINPARENTTRADINGPLACE_BCN,
T2.CSMAINPARENTTRADINGPLACE_RTX,
T2.CSMAINPARENTTRADINGPLACE_MIC,
T2.CSMAINPARENTTRADINGPLACE_BBX,
T2.CSMAINPARENTTRADINGPLACE_WS80,
T3.INSTITUTIONID INSTITUTIONID_ORG_ISSUER,
T3.ROWSTATUS ROWSTATUS_ORG_ISSUER,
T3.SYMBOLGK SYMBOLGK_ORG_ISSUER,
T3.SYMBOLCSINSTIID SYMBOLCSINSTIID_ORG_ISSUER,
T3.SYMBOLFITCH SYMBOLFITCH_ORG_ISSUER,
T3.SYMBOLSP SYMBOLSP_ORG_ISSUER,
T3.SYMBOLMDY SYMBOLMDY_ORG_ISSUER,
T3.SYMBOLCSGHDST SYMBOLCSGHDST_ORG_ISSUER,
T3.SYMBOLCSAREG SYMBOLCSAREG_ORG_ISSUER,
T3.SYMBOLIBEI SYMBOLIBEI_ORG_ISSUER,
T3.SYMBOLBCN SYMBOLBCN_ORG_ISSUER,
T3.SYMBOLBCA SYMBOLBCA_ORG_ISSUER,
T3.SYMBOLRTX SYMBOLRTX_ORG_ISSUER,
T3.SYMBOLBBX SYMBOLBBX_ORG_ISSUER,
T3.SYMBOLBBCX SYMBOLBBCX_ORG_ISSUER,
T3.SYMBOLMIC SYMBOLMIC_ORG_ISSUER,
T3.SYMBOLCSWS80BPL SYMBOLCSWS80BPL_ORG_ISSUER,
T3.SYMBOLCSID01 SYMBOLCSID01_ORG_ISSUER,
T3.SYMBOLCSID03 SYMBOLCSID03_ORG_ISSUER,
T3.SYMBOLCSID05 SYMBOLCSID05_ORG_ISSUER,
T3.SYMBOLCSID06 SYMBOLCSID06_ORG_ISSUER,
T3.CATEGORYVDPS CATEGORYVDPS_ORG_ISSUER,
T3.CATEGORYCSGDIV CATEGORYCSGDIV_ORG_ISSUER,
T3.CATEGORYCSGME CATEGORYCSGME_ORG_ISSUER,
T3.CATEGORYCSDG CATEGORYCSDG_ORG_ISSUER,
T3.CATEGORYTKINSTITUTION CATEGORYTKINSTI_ORG_ISSUER,
T3.STATUSTYPE STATUSTYPE_ORG_ISSUER,
T4.INSTITUTIONTYPE INSTITUTIONTYPE_ORG_ISSUER,
T4.ISGLOBALREGACC ISGLOBALREGACC_ORG_ISSUER,
T4.HASPENDINGACTVTY HASPENDINGACTVTY_ORG_ISSUER,
T4.ISRELEVANT ISRELEVANTV_ORG_ISSUER,
T4.ISONDB ISONDB_ORG_ISSUER,
T4.ACCOUNTINGCURR ACCOUNTINGCURR_ORG_ISSUER,
T4.INITIALMARGINRATE INITIALMARGINRATE_ORG_ISSUER,
T4.DOMICILE_A2 DOMICILE_A2_ORG_ISSUER,
T4.DOMICILE_WS80 DOMICILE_WS80_ORG_ISSUER,
T4.TAXDOMICILE_A2 TAXDOMICILE_A2_ORG_ISSUER,
T4.TAXDOMICILE_WS80 TAXDOMICILE_WS80_ORG_ISSUER,
T4.INDUSTRYCS INDUSTRYCS_ORG_ISSUER,
T4.INDUSTRYTKBN INDUSTRYTKBN_ORG_ISSUER,
T4.INDUSTRYMSCI INDUSTRYMSCI_ORG_ISSUER,
T4.INDUSTRYDJ INDUSTRYDJ_ORG_ISSUER,
T4.INDUSTRYFTSE INDUSTRYFTSE_ORG_ISSUER,
T4.INDUSTRYMFIB INDUSTRYMFIB_ORG_ISSUER,
T4.INDUSTRYMFIS INDUSTRYMFIS_ORG_ISSUER,
T4.INDUSTRYICB INDUSTRYICB_ORG_ISSUER,
T4.INDUSTRYBDF INDUSTRYBDF_ORG_ISSUER,
T4.TAXNUMBER TAXNUMBER_ORG_ISSUER,
T4.NONTAXABLENUMBER NONTAXABLENUMBER_ORG_ISSUER,
T4.HOUSENUMBER HOUSENUMBER_ORG_ISSUER,
T4.ZIP ZIP_ORG_ISSUER,
T4.TELEFAXNUMBER TELEFAXNUMBER_ORG_ISSUER,
T4.NATIONALBANKCODE NATIONALBANKCODE_ORG_ISSUER,
T4.BANKACCOUNTNUMBER BANKACCOUNTNUMBER_ORG_ISSUER,
T4.FOUNDATIONDATE FOUNDATIONDATE_ORG_ISSUER,
T4.PREVFINYEARENDDATE PREVFINYEARENDDATE_ORG_ISSUER,
T4.ACTFINYEARENDDATE ACTFINYEARENDDATE_ORG_ISSUER,
T4.REGISTERENTRYDATE REGISTERENTRYDATE_ORG_ISSUER,
T4.REGENTRYDELETIONDT REGENTRYDELETIONDT_ORG_ISSUER,
T4.YEARENDDATE YEARENDDATE_ORG_ISSUER,
T4.NEXTSEMESTERREPORT NEXTSEMESTERREPORT_ORG_ISSUER,
T4.NONTAXABLEDATE NONTAXABLEDATE_ORG_ISSUER,
T4.PREVIOUSYEARENDDT PREVIOUSYEARENDDT_ORG_ISSUER,
T4.CREATETIMESTAMP CREATETIMESTAMP_ORG_ISSUER,
T4.UPDATETIMESTAMP UPDATETIMESTAMP_ORG_ISSUER,
T4.MAINLANGUAGETYPE MAINLANGUAGETYPE_ORG_ISSUER,
T4.KANTONSCODETYPE KANTONSCODETYPE_ORG_ISSUER,
T4.LEGALFORMTYPE LEGALFORMTYPE_ORG_ISSUER,
T4.TRUSTLEGALGUIDETP TRUSTLEGALGUIDETP_ORG_ISSUER,
T4.TRUSTSTATUSTYPE TRUSTSTATUSTYPE_ORG_ISSUER,
T4.FOTYPE FOTYPE_ORG_ISSUER,
T4.DATASTATUSTYPE DATASTATUSTYPE_ORG_ISSUER,
T4.BLOCKINGCODETYPE BLOCKINGCODETYPE_ORG_ISSUER,
T4.CITY CITY_ORG_ISSUER,
T4.INTERNETDOMAIN INTERNETDOMAIN_ORG_ISSUER,
T4.STREET STREET_ORG_ISSUER,
T4.EMAILNAME EMAILNAME_ORG_ISSUER,
T4.PHONENUMBER PHONENUMBER_ORG_ISSUER,
T4.IBAN IBAN_ORG_ISSUER,
T4.SHORTNAME_G SHORTNAME_G_ORG_ISSUER,
T4.SHORTNAME_E SHORTNAME_E_ORG_ISSUER,
T4.SHORTNAME_F SHORTNAME_F_ORG_ISSUER,
T4.SHORTNAME_I SHORTNAME_I_ORG_ISSUER,
T4.SHORTNAME_N SHORTNAME_N_ORG_ISSUER,
T4.NAME_G NAME_G_ORG_ISSUER, T4.NAME_E NAME_E_ORG_ISSUER,
T4.NAME_F NAME_F_ORG_ISSUER, T4.NAME_I NAME_I_ORG_ISSUER,
T4.NAME_N NAME_N_ORG_ISSUER,
T4.HASADDRESS HASADDRESS_ORG_ISSUER,
T4.ADDRESS ADDRESS_ORG_ISSUER,
T4.ADDRESSDESCR ADDRESSDESCR_ORG_ISSUER,
T4.HEADOFFICEDESCR HEADOFFICEDESCR_ORG_ISSUER,
T4.MDYISSUERRATING MDYISSUERRATING_ORG_ISSUER,
T4.MDYISSUERRATINGDATE MDYISSUERRATINGDT_ORG_ISSUER,
T4.MDYISSUERWATCHLISTSTATUSTYPE
MDYWLISTSTATUSTYPE_ORG_ISSUER,
T4.SPISSUERRATING SPISSUERRATING_ORG_ISSUER,
T4.SPISSUERRATINGDATE SPISSUERRATINGDATE_ORG_ISSUER,
T4.SPISSUERWATCHLISTSTATUSTYPE SPLISTSTATUSTYPE_ORG_ISSUER,
T4.FITCHISSUERRATING FITCHISSUERRT_ORG_ISSUER,
T4.FITCHISSUERRATINGDATE FITCHISSUERRTDT_ORG_ISSUER,
T4.FITCHISSUERWATCHLISTSTATUSTYPE FITCHWATCHSTTP_ORG_ISSUER,
T4.DOMICILE_A3 DOMICILE_A3_ORG_ISSUER,
T4.TAXDOMICILE_A3 TAXDOMICILE_A3_ORG_ISSUER,
T4.ADDRESSLOCATION_A2 ADDRESS_A2_ORG_ISSUER,
T4.ADDRESSLOCATION_A3 ADDRESS_A3_ORG_ISSUER,
T4.ADDRESSLOCATION_WS80 ADDRESS_WS80_ORG_ISSUER,
T5.INSTITUTIONID INSTITUTIONID_ISSUER,
T5.ROWSTATUS ROWSTATUS_ISSUER, T5.SYMBOLGK SYMBOLGK_ISSUER,
T5.SYMBOLCSINSTIID SYMBOLCSINSTIID_ISSUER,
T5.SYMBOLFITCH SYMBOLFITCH_ISSUER,
T5.SYMBOLSP SYMBOLSP_ISSUER, T5.SYMBOLMDY SYMBOLMDY_ISSUER,
T5.SYMBOLCSGHDST SYMBOLCSGHDST_ISSUER,
T5.SYMBOLCSAREG SYMBOLCSAREG_ISSUER,
T5.SYMBOLIBEI SYMBOLIBEI_ISSUER,
T5.SYMBOLBCN SYMBOLBCN_ISSUER,
T5.SYMBOLBCA SYMBOLBCA_ISSUER,
T5.SYMBOLRTX SYMBOLRTX_ISSUER,
T5.SYMBOLBBX SYMBOLBBX_ISSUER,
T5.SYMBOLBBCX SYMBOLBBCX_ISSUER,
T5.SYMBOLMIC SYMBOLMIC_ISSUER,
T5.SYMBOLCSWS80BPL SYMBOLCSWS80BPL_ISSUER,
T5.SYMBOLCSID01 SYMBOLCSID01_ISSUER,
T5.SYMBOLCSID03 SYMBOLCSID03_ISSUER,
T5.SYMBOLCSID05 SYMBOLCSID05_ISSUER,
T5.SYMBOLCSID06 SYMBOLCSID06_ISSUER,
T5.CATEGORYVDPS CATEGORYVDPS_ISSUER,
T5.CATEGORYCSGDIV CATEGORYCSGDIV_ISSUER,
T5.CATEGORYCSGME CATEGORYCSGME_ISSUER,
T5.CATEGORYCSDG CATEGORYCSDG_ISSUER,
T5.CATEGORYTKINSTITUTION CATEGORYTKINSTITUTION_ISSUER,
T5.STATUSTYPE STATUSTYPE_ISSUER,
T6.INSTITUTIONTYPE INSTITUTIONTYPE_ISSUER,
T6.ISGLOBALREGACC ISGLOBALREGACC_ISSUER,
T6.HASPENDINGACTVTY HASPENDINGACTVTY_ISSUER,
T6.ISRELEVANT ISRELEVANTV_ISSUER, T6.ISONDB ISONDB_ISSUER,
T6.INITIALMARGINRATE INITIALMARGINRATE_ISSUER,
T6.DOMICILE_A2 DOMICILE_A2_ISSUER,
T6.DOMICILE_WS80 DOMICILE_WS80_ISSUER,
T6.TAXDOMICILE_A2 TAXDOMICILE_A2_ISSUER,
T6.TAXDOMICILE_WS80 TAXDOMICILE_WS80_ISSUER,
T6.INDUSTRYCS INDUSTRYCS_ISSUER,
T6.INDUSTRYTKBN INDUSTRYTKBN_ISSUER,
T6.INDUSTRYMSCI INDUSTRYMSCI_ISSUER,
T6.INDUSTRYDJ INDUSTRYDJ_ISSUER,
T6.INDUSTRYFTSE INDUSTRYFTSE_ISSUER,
T6.INDUSTRYMFIB INDUSTRYMFIB_ISSUER,
T6.INDUSTRYMFIS INDUSTRYMFIS_ISSUER,
T6.INDUSTRYICB INDUSTRYICB_ISSUER,
T6.INDUSTRYBDF INDUSTRYBDF_ISSUER,
T6.TAXNUMBER TAXNUMBER_ISSUER,
T6.NONTAXABLENUMBER NONTAXABLENUMBER_ISSUER,
T6.HOUSENUMBER HOUSENUMBER_ISSUER, T6.ZIP ZIP_ISSUER,
T6.TELEFAXNUMBER TELEFAXNUMBER_ISSUER,
T6.NATIONALBANKCODE NATIONALBANKCODE_ISSUER,
T6.BANKACCOUNTNUMBER BANKACCOUNTNUMBER_ISSUER,
T6.FOUNDATIONDATE FOUNDATIONDATE_ISSUER,
T6.PREVFINYEARENDDATE PREVFINYEARENDDATE_ISSUER,
T6.ACTFINYEARENDDATE ACTFINYEARENDDATE_ISSUER,
T6.REGISTERENTRYDATE REGISTERENTRYDATE_ISSUER,
T6.REGENTRYDELETIONDT REGENTRYDELETIONDT_ISSUER,
T6.YEARENDDATE YEARENDDATE_ISSUER,
T6.NEXTSEMESTERREPORT NEXTSEMESTERREPORT_ISSUER,
T6.NONTAXABLEDATE NONTAXABLEDATE_ISSUER,
T6.PREVIOUSYEARENDDT PREVIOUSYEARENDDT_ISSUER,
T6.CREATETIMESTAMP CREATETIMESTAMP_ISSUER,
T6.UPDATETIMESTAMP UPDATETIMESTAMP_ISSUER,
T6.MAINLANGUAGETYPE MAINLANGUAGETYPE_ISSUER,
T6.KANTONSCODETYPE KANTONSCODETYPE_ISSUER,
T6.LEGALFORMTYPE LEGALFORMTYPE_ISSUER,
T6.TRUSTLEGALGUIDETP TRUSTLEGALGUIDETP_ISSUER,
T6.TRUSTSTATUSTYPE TRUSTSTATUSTYPE_ISSUER,
T6.FOTYPE FOTYPE_ISSUER,
T6.DATASTATUSTYPE DATASTATUSTYPE_ISSUER,
T6.BLOCKINGCODETYPE BLOCKINGCODETYPE_ISSUER,
T6.CITY CITY_ISSUER,
T6.INTERNETDOMAIN INTERNETDOMAIN_ISSUER,
T6.STREET STREET_ISSUER, T6.EMAILNAME EMAILNAME_ISSUER,
T6.PHONENUMBER PHONENUMBER_ISSUER, T6.IBAN IBAN_ISSUER,
T6.SHORTNAME_G SHORTNAME_G_ISSUER,
T6.SHORTNAME_E SHORTNAME_E_ISSUER,
T6.SHORTNAME_F SHORTNAME_F_ISSUER,
T6.SHORTNAME_I SHORTNAME_I_ISSUER,
T6.SHORTNAME_N SHORTNAME_N_ISSUER, T6.NAME_G NAME_G_ISSUER,
T6.NAME_E NAME_E_ISSUER, T6.NAME_F NAME_F_ISSUER,
T6.NAME_I NAME_I_ISSUER, T6.NAME_N NAME_N_ISSUER,
T6.HASADDRESS HASADDRESS_ISSUER, T6.ADDRESS ADDRESS_ISSUER,
T6.ADDRESSDESCR ADDRESSDESCR_ISSUER,
T6.HEADOFFICEDESCR HEADOFFICEDESCR_ISSUER,
T6.MODIFICATIONREASON MODIFICATIONREASON_ISSUER,
T6.MDYISSUERRATING MDYISSUERRATING_ISSUER,
T6.MDYISSUERRATINGDATE MDYISSUERRATINGDATE_ISSUER,
T6.MDYISSUERWATCHLISTSTATUSTYPE
MDYWATCHLISTSTATUSTYPE_ISSUER,
T6.SPISSUERRATING SPISSUERRATING_ISSUER,
T6.SPISSUERRATINGDATE SPISSUERRATINGDATE_ISSUER,
T6.SPISSUERWATCHLISTSTATUSTYPE SPWATCHLISTSTATUSTYPE_ISSUER,
T6.FITCHISSUERRATING FITCHISSUERRATING_ISSUER,
T6.FITCHISSUERRATINGDATE FITCHISSUERRATINGDATE_ISSUER,
T6.FITCHISSUERWATCHLISTSTATUSTYPE FITCHWATCHLISTSTTP_ISSUER,
T6.DOMICILE_A3 DOMICILE_A3_ISSUER,
T6.TAXDOMICILE_A3 TAXDOMICILE_A3_ISSUER,
T6.ADDRESSLOCATION_A2 ADDRESSLOCATION_A2_ISSUER,
T6.ADDRESSLOCATION_A3 ADDRESSLOCATION_A3_ISSUER,
T6.ADDRESSLOCATION_WS80 ADDRESSLOCATION_WS80_ISSUER,
T7.BESTVENUEUPDATETS, T7.EUROCLEARDEPO, T7.FISNPOOLNUMBER,
T7.FISNPROGRAM, T7.FISNTRANCHE, T7.FISNTRUST,
T7.FISNUNDERLYING, T7.HYBRIDACRONYMTYPE, T7.IDFORMATTYPE,
T7.ISAUTOMATEDDISTRIB, T7.ISBLUECHIP, T7.NTIPTYPE,
T7.OTEXMARKETMAKER, T7.OTEXORDERDESK, T7.OTEXRISKDOMICILE,
T7.BRANDNAME, T7.PRODUCTNAME, T7.CSPRODUCTCATEGORY,
T7.ISMANAGEDBYCS, T7.CSBTVRELEVANCETYPE,
T7.INVESTORINFOTYPE, T7.UNDERLYINGMGMTTYPE,
T7.INITIALBONDFLOORRATE, T7.FINALBONDFLOORRATE,
T7.SWAPRATE, T7.ISUNDERLYINGLINKED, T7.RIGHTISSUETYPE,
T7.ISRIGHTISSUETRADING, T7.RIGHTISSUETRADINGFROMDATE,
T7.RIGHTISSUETRADINGUNTILDATE, T7.RIGHTISSUETRADINGAT,
T7.RIGHTISSUEFRACTIONTYPE, T7.RIGHTISSUELASTSPLITDATE,
T7.HASUNDERLYINGUSSECURITIES, T7.ISISSUERESNATIONALS,
T7.ISISSUERESNONNATIONALS, T7.SHAREREGISTRYTYPE,
T7.ACCRUEDINTERESTTYPE, T8.DEFREPAYMENTPERIOD,
T8.POSITIONLIMIT, T8.BONDFLOOR, T8.DISCOUNT,
T8.GUARANTEREPAYPRICE, T8.RESERVENUMBER2,
T8.RESERVENUMBER3, T8.RESERVENUMBER4, T8.RESERVENUMBER5,
T8.MANDATOR, T8.RESERVETEXT1, T8.RESERVETEXT3,
T8.CSBOARDLOT, T8.CSINCOMETAXTYPE, T8.POSITIONCURRTYPE,
T8.KANTONSCODETYPE, T8.CSEVENTDTCODETYPE,
T8.CSFUNDTYPE CSFUNDTYPE_SP42, T8.CSRELEVANCEDATE,
T8.HASQUOTESBLOCK, T8.HASFUNDSUNBUNDLING,
T8.FUNDDEPOSITARY, T8.FUNDCATEGORY,
T9.CREATETIMESTAMP CREATETIMESTAMP_INSTR,
T9.UPDATETIMESTAMP UPDATETIMESTAMP_INSTR, T1.SYMBOLSPIRIT,
T2.UNDERINSTRUMENT, T2.PREPARTICLE_G, T2.PREPARTICLE_E,
T2.PREPARTICLE_F, T2.PREPARTICLE_I, T2.PREPARTICLE_N,
T2.POSTPARTICLE_G, T2.POSTPARTICLE_E, T2.POSTPARTICLE_F,
T2.POSTPARTICLE_I, T2.POSTPARTICLE_N, T9.NAME_G, T9.NAME_E,
T9.NAME_F, T9.NAME_I, T9.NAME_N,
T9.ISRELEVANT ISRELEVANT_INSTR, T2.MAINLANGUAGETYPE,
T9.NOMINALCURR, T9.COMPOUNDTYPE, T9.PORTFOLIONO,
T9.ISINSTANCE, T9.CAPMARKETLOCATION, T9.STATUSDATE,
T9.TOFFUNDERTYPE, T9.DESCRIPTION_G, T9.DESCRIPTION_E,
T9.DESCRIPTION_F, T9.DESCRIPTION_I, T9.DESCRIPTION_N,
T2.ISSUEPRICERATE, T2.TITELARTZUSATZTEXT,
T2.BORROWINGLIMITTYPE, T2.ISVSTQUALITYCHECKED
FROM VDPSX.VTINSTRFLATSYMBOLS T1
INNER JOIN
VDPSX.VTINSTRFLATDATA T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTIFLATSYMBOLS T3
ON T3.INSTITUTIONID = T2.ORIGINALISSUER
INNER JOIN
VDPSX.VTINSTITUTION T4
ON T4.INSTITUTIONID = T2.ORIGINALISSUER
INNER JOIN
VDPSX.VTINSTRUMENT T9
ON T9.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTIFLATSYMBOLS T5
ON T5.INSTITUTIONID = T2.ISSUER
INNER JOIN
VDPSX.VTINSTITUTION T6
ON T6.INSTITUTIONID = T2.ISSUER
LEFT OUTER JOIN
VDPSX.CTINSTRDETAILS T7
ON T7.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPSX.CTINSTRSP42DETAILS T8
ON T8.INSTRUMENTID = T1.INSTRUMENTID ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_VINOP141_V03
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.IDS_VINOP141_V03 AS
SELECT T1.INSTRUMENTID, T1.ROWSTATUS, T1.SYMBOLCSFI, T1.SYMBOLCH,
T1.SYMBOLISIN, T1.SYMBOLUS, T1.SYMBOLXS, T1.SYMBOLGB,
T1.SYMBOLLU, T1.SYMBOLDE, T1.SYMBOLAT, T1.SYMBOLFR,
T1.SYMBOLBE, T1.SYMBOLIT, T1.SYMBOLNL, T1.SYMBOLJP,
T1.SYMBOLJ2, T1.SYMBOLDK, T1.SYMBOLSE, T1.SYMBOLI2,
T1.SYMBOLI1, T1.SYMBOLT1, T1.SYMBOLT2, T1.SYMBOLCSCURR,
T1.CATEGORYVDPS, T1.CATEGORYTKT, T1.CATEGORYTKSK,
T1.CATEGORYTKZUS, T1.CATEGORYTKPRK, T1.CATEGORYTKTZ,
T1.CATEGORYMAZU, T1.CATEGORYECBTR, T1.CATEGORYCFI,
T1.CATEGORYEUZS, T1.CATEGORYCSGTA, T1.CATEGORYCSGMS,
T1.CATEGUSTAXREPORT, T1.CATEGUSIRSADDITION,
T1.CSSTATUSTYPE CSSTATUSTYPE_FLTSYMB,
T1.STATUSTYPE STATUSTYPE_FLTSYMB, T2.PAYFREQUENCY,
T2.ISCALLFORTXREONLY, T2.ISREDEEMABLE, T2.ISRETRACTABLE,
T2.ISCONVERTBYHOLDER, T2.ISCONVERTBYISSUER,
T2.HASVOTINGRIGHTNO, T2.HASREDMPINVARCURR,
T2.HASMULTIUNDERLYERS, T2.CSMAINTRADPLACE,
T2.ORIGINALISSUER, T2.ISSUER, T2.UNDERINSTRUMENT,
T2.NOMINALCURR, T2.CSRISKCURRENCY, T2.CSRISKCOUNTRY,
T2.CSRISINSTRUMENT, T2.REPAYPRICECURR, T2.ISSUEPRICECURR,
T2.EXERCISECURR, T2.MAINDEPOSITARY, T2.NOMINALAMOUNT,
T2.MINDENOMINATION, T2.EFFINTERESTRATE,
T2.REPAYPRICEAMOUNT, T2.REPAYPRICERATE, T2.POOLFACTOR,
T2.VOTINGRIGHTNO, T2.OUTSTANDINGCAPITAL, T2.ISSUEDCAPITAL,
T2.OUTSTANDCAPITALNO, T2.ISSUEDCAPITALNO, T2.ISSUEAMOUNT,
T2.ISSUEPRICE, T2.EXERCISEAMOUNT, T2.MINEXERCISEAMOUNT,
T2.HELDAMOUNT, T2.PAYAMOUNT, T2.INCOMETAXRATE,
T2.PREMIUMRATE, T2.PARTICIPATIONRATE, T2.REBATE,
T2.CSRATING, T2.CSRISKINDIDSYMBOL, T2.CSRISKINDSCHEMESYM,
T2.CSRISKINSTGRPIDSYM, T2.CSRISKINSGRPSCHSYM, T2.MDYRATING,
T2.SPRATING, T2.FITCHRATING, T2.LISTINGSYMBOLTKH,
T2.LISTINGSYMBOLRIC, T2.LISTINGSYMBOLBBI,
T2.NOMINALCURR_I1, T2.NOMINALCURR_I2, T2.NOMINALCURR_WS80,
T2.CSRISKCURRENCY_I1, T2.CSRISKCURRENCY_I2,
T2.CSRISKCURRENCY_WS80, T2.CSRISINSTRUMENT_CH,
T2.CSRISINSTRUMENT_ISIN, T2.CSRISINSTRUMENT_CSFI,
T2.CSRISKCOUNTRY_A2, T2.CSRISKCOUNTRY_WS80,
T2.REPAYPRICECURR_I1, T2.REPAYPRICECURR_I2,
T2.REPAYPRICECURR_WS80, T2.ISSUEPRICECURR_I1,
T2.ISSUEPRICECURR_I2, T2.ISSUEPRICECURR_WS80,
T2.EXERCISECURR_I1, T2.EXERCISECURR_I2,
T2.EXERCISECURR_WS80, T2.CSMAINTRADPLACE_BCN,
T2.CSMAINTRADPLACE_WS80, T2.CSMAINTRADPLACE_RTX,
T2.CSMAINTRADPLACE_BBX, T2.UNDERINSTRUMENT_CH,
T2.UNDERINSTRUMENT_ISIN, T2.UNDERINSTRUMENT_CSFI,
T2.ORIGINALISSUER_GK, T2.ISSUER_GK, T2.MAINDEPOSITARY_GK,
T2.EXPIRATIONDATE, T2.MATURITYDATE, T2.FIRSTPAYDATE,
T2.FIRSTPYDATEPERYEAR, T2.INTRSTDVDENFRDATE,
T2.CSRATINGDATE, T2.MDYRATINGDATE, T2.SPRATINGDATE,
T2.FITCHRATINGDATE, T2.SUBSCRBEGINDATE, T2.PAYMENTDATE,
T2.EXERCISEBEGINDATE, T2.SUBSCRPLNDENDDATE,
T2.EXERCISEENDDATE, T2.BVGTYPE, T2.CREDITWORTHINESSTP,
T2.COMMISSIONCODETYPE, T2.UNITTYPE, T2.CSUNITTYPE,
T2.EXPIRATIONTYPE, T2.STATUSTYPE, T2.REGISTRATIONTYPE,
T2.BORROWERCATTYPE, T2.CSLISTINGCODETYPE, T2.CSSTATUSTYPE,
T2.STATUSDETAILTYPE, T2.INCOMEMODETYPE,
T2.INTERESTCALCTYPE, T2.INTERESTTYPE, T2.PYFREQUNITTYPE,
T2.SUBSCRMETHODTYPE, T2.PLACEMENTTYPE, T2.PAYDIRECTIONTYPE,
T2.OPTIONTYPE, T2.SETTLESTYLETYPE, T2.CSFUNDTYPE,
T2.TRADINGSTATUSTYPE, T2.LISTINGSTATUSTYPE,
T2.EXERCISEPLACE, T2.NAME35_G, T2.NAME35_E, T2.NAME35_F,
T2.NAME35_I, T2.NAME35_N, T2.NAME45_G, T2.NAME45_E,
T2.NAME45_F, T2.NAME45_I, T2.NAME45_N, T2.SHORTNAME_G,
T2.SHORTNAME_E, T2.SHORTNAME_F, T2.SHORTNAME_I,
T2.SHORTNAME_N, T2.PREPARTICLE_G, T2.PREPARTICLE_E,
T2.PREPARTICLE_F, T2.PREPARTICLE_I, T2.PREPARTICLE_N,
T2.POSTPARTICLE_G, T2.POSTPARTICLE_E, T2.POSTPARTICLE_F,
T2.POSTPARTICLE_I, T2.POSTPARTICLE_N, T2.ISINTERNAL,
T2.ISOTC, T2.HASWITHHOLDINGTAX, T2.HASFEDERALSTAMPDUTY,
T2.ISCSMIFIDCOMPLEX, T2.MOSTLIQUIDMARKETLOCATION,
T2.MOSTLIQUIDMARKETLOCATION_A2,
T2.MOSTLIQUIDMARKETLOCATION_A3,
T2.MOSTLIQUIDMARKETLOCATION_WS80,
T2.MDYWATCHLISTSTATUSTYPE, T2.SPWATCHLISTSTATUSTYPE,
T2.FITCHWATCHLISTSTATUSTYPE, T2.OPTIONSTYLETYPE,
T2.CSMAINTRADINGCURR, T2.CSMAINTRADINGCURR_I1,
T2.CSMAINTRADINGCURR_I2, T2.CSMAINTRADINGCURR_WS80,
T2.CSRISKCOUNTRY_A3, T2.LIQUIDATIONRIGHTTYPE,
T2.CSMAINPARENTTRADINGPLACE,
T2.CSMAINPARENTTRADINGPLACE_BCN,
T2.CSMAINPARENTTRADINGPLACE_RTX,
T2.CSMAINPARENTTRADINGPLACE_MIC,
T2.CSMAINPARENTTRADINGPLACE_BBX,
T2.CSMAINPARENTTRADINGPLACE_WS80,
T3.PAYFREQUENCY UND_PAYFREQUENCY,
T3.ISCALLFORTXREONLY UND_ISCALLFORTXREONLY,
T3.ISREDEEMABLE UND_ISREDEEMABLE,
T3.ISRETRACTABLE UND_ISRETRACTABLE,
T3.ISCONVERTBYHOLDER UND_ISCONVERTBYHOLDER,
T3.ISCONVERTBYISSUER UND_ISCONVERTBYISSUER,
T3.HASVOTINGRIGHTNO UND_HASVOTINGRIGHTNO,
T3.HASREDMPINVARCURR UND_HASREDMPINVARCURR,
T3.HASMULTIUNDERLYERS UND_HASMULTIUNDERLYERS,
T3.CSMAINTRADPLACE UND_CSMAINTRADPLACE,
T3.ORIGINALISSUER UND_ORIGINALISSUER, T3.ISSUER UND_ISSUER,
T3.UNDERINSTRUMENT UND_UNDERINSTRUMENT,
T3.NOMINALCURR UND_NOMINALCURR,
T3.CSRISKCURRENCY UND_CSRISKCURRENCY,
T3.CSRISKCOUNTRY UND_CSRISKCOUNTRY,
T3.CSRISINSTRUMENT UND_CSRISINSTRUMENT,
T3.REPAYPRICECURR UND_REPAYPRICECURR,
T3.ISSUEPRICECURR UND_ISSUEPRICECURR,
T3.EXERCISECURR UND_EXERCISECURR,
T3.MAINDEPOSITARY UND_MAINDEPOSITARY,
T3.NOMINALAMOUNT UND_NOMINALAMOUNT,
T3.MINDENOMINATION UND_MINDENOMINATION,
T3.EFFINTERESTRATE UND_EFFINTERESTRATE,
T3.REPAYPRICEAMOUNT UND_REPAYPRICEAMOUNT,
T3.REPAYPRICERATE UND_REPAYPRICERATE,
T3.POOLFACTOR UND_POOLFACTOR,
T3.VOTINGRIGHTNO UND_VOTINGRIGHTNO,
T3.OUTSTANDINGCAPITAL UND_OUTSTANDINGCAPITAL,
T3.ISSUEDCAPITAL UND_ISSUEDCAPITAL,
T3.OUTSTANDCAPITALNO UND_OUTSTANDCAPITALNO,
T3.ISSUEDCAPITALNO UND_ISSUEDCAPITALNO,
T3.ISSUEAMOUNT UND_ISSUEAMOUNT,
T3.ISSUEPRICE UND_ISSUEPRICE,
T3.EXERCISEAMOUNT UND_EXERCISEAMOUNT,
T3.MINEXERCISEAMOUNT UND_MINEXERCISEAMOUNT,
T3.HELDAMOUNT UND_HELDAMOUNT, T3.PAYAMOUNT UND_PAYAMOUNT,
T3.INCOMETAXRATE UND_INCOMETAXRATE,
T3.PREMIUMRATE UND_PREMIUMRATE,
T3.PARTICIPATIONRATE UND_PARTICIPATIONRATE,
T3.REBATE UND_REBATE, T3.CSRATING UND_CSRATING,
T3.CSRISKINDIDSYMBOL UND_CSRISKINDIDSYMBOL,
T3.CSRISKINDSCHEMESYM UND_CSRISKINDSCHEMESYM,
T3.CSRISKINSTGRPIDSYM UND_CSRISKINSTGRPIDSYM,
T3.CSRISKINSGRPSCHSYM UND_CSRISKINSGRPSCHSYM,
T3.MDYRATING UND_MDYRATING, T3.SPRATING UND_SPRATING,
T3.FITCHRATING UND_FITCHRATING,
T3.LISTINGSYMBOLTKH UND_LISTINGSYMBOLTKH,
T3.LISTINGSYMBOLRIC UND_LISTINGSYMBOLRIC,
T3.LISTINGSYMBOLBBI UND_LISTINGSYMBOLBBI,
T3.NOMINALCURR_I1 UND_NOMINALCURR_I1,
T3.NOMINALCURR_I2 UND_NOMINALCURR_I2,
T3.NOMINALCURR_WS80 UND_NOMINALCURR_WS80,
T3.CSRISKCURRENCY_I1 UND_CSRISKCURRENCY_I1,
T3.CSRISKCURRENCY_I2 UND_CSRISKCURRENCY_I2,
T3.CSRISKCURRENCY_WS80 UND_CSRISKCURRENCY_WS80,
T3.CSRISINSTRUMENT_CH UND_CSRISINSTRUMENT_CH,
T3.CSRISINSTRUMENT_ISIN UND_CSRISINSTRUMENT_ISIN,
T3.CSRISINSTRUMENT_CSFI UND_CSRISINSTRUMENT_CSFI,
T3.CSRISKCOUNTRY_A2 UND_CSRISKCOUNTRY_A2,
T3.CSRISKCOUNTRY_WS80 UND_CSRISKCOUNTRY_WS80,
T3.REPAYPRICECURR_I1 UND_REPAYPRICECURR_I1,
T3.REPAYPRICECURR_I2 UND_REPAYPRICECURR_I2,
T3.REPAYPRICECURR_WS80 UND_REPAYPRICECURR_WS80,
T3.ISSUEPRICECURR_I1 UND_ISSUEPRICECURR_I1,
T3.ISSUEPRICECURR_I2 UND_ISSUEPRICECURR_I2,
T3.ISSUEPRICECURR_WS80 UND_ISSUEPRICECURR_WS80,
T3.EXERCISECURR_I1 UND_EXERCISECURR_I1,
T3.EXERCISECURR_I2 UND_EXERCISECURR_I2,
T3.EXERCISECURR_WS80 UND_EXERCISECURR_WS80,
T3.CSMAINTRADPLACE_BCN UND_CSMAINTRADPLACE_BCN,
T3.CSMAINTRADPLACE_WS80 UND_CSMAINTRADPLACE_WS80,
T3.CSMAINTRADPLACE_RTX UND_CSMAINTRADPLACE_RTX,
T3.CSMAINTRADPLACE_BBX UND_CSMAINTRADPLACE_BBX,
T3.UNDERINSTRUMENT_CH UND_UNDERINSTRUMENT_CH,
T3.UNDERINSTRUMENT_ISIN UND_UNDERINSTRUMENT_ISIN,
T3.UNDERINSTRUMENT_CSFI UND_UNDERINSTRUMENT_CSFI,
T3.ORIGINALISSUER_GK UND_ORIGINALISSUER_GK,
T3.ISSUER_GK UND_ISSUER_GK,
T3.MAINDEPOSITARY_GK UND_MAINDEPOSITARY_GK,
T3.EXPIRATIONDATE UND_EXPIRATIONDATE,
T3.MATURITYDATE UND_MATURITYDATE,
T3.FIRSTPAYDATE UND_FIRSTPAYDATE,
T3.FIRSTPYDATEPERYEAR UND_FIRSTPYDATEPERYEAR,
T3.INTRSTDVDENFRDATE UND_INTRSTDVDENFRDATE,
T3.CSRATINGDATE UND_CSRATINGDATE,
T3.MDYRATINGDATE UND_MDYRATINGDATE,
T3.SPRATINGDATE UND_SPRATINGDATE,
T3.FITCHRATINGDATE UND_FITCHRATINGDATE,
T3.SUBSCRBEGINDATE UND_SUBSCRBEGINDATE,
T3.PAYMENTDATE UND_PAYMENTDATE,
T3.EXERCISEBEGINDATE UND_EXERCISEBEGINDATE,
T3.SUBSCRPLNDENDDATE UND_SUBSCRPLNDENDDATE,
T3.EXERCISEENDDATE UND_EXERCISEENDDATE,
T3.BVGTYPE UND_BVGTYPE,
T3.CREDITWORTHINESSTP UND_CREDITWORTHINESSTP,
T3.COMMISSIONCODETYPE UND_COMMISSIONCODETYPE,
T3.UNITTYPE UND_UNITTYPE, T3.CSUNITTYPE UND_CSUNITTYPE,
T3.EXPIRATIONTYPE UND_EXPIRATIONTYPE,
T3.STATUSTYPE UND_STATUSTYPE,
T3.REGISTRATIONTYPE UND_REGISTRATIONTYPE,
T3.BORROWERCATTYPE UND_BORROWERCATTYPE,
T3.CSLISTINGCODETYPE UND_CSLISTINGCODETYPE,
T3.CSSTATUSTYPE UND_CSSTATUSTYPE,
T3.STATUSDETAILTYPE UND_STATUSDETAILTYPE,
T3.INCOMEMODETYPE UND_INCOMEMODETYPE,
T3.INTERESTCALCTYPE UND_INTERESTCALCTYPE,
T3.INTERESTTYPE UND_INTERESTTYPE,
T3.PYFREQUNITTYPE UND_PYFREQUNITTYPE,
T3.SUBSCRMETHODTYPE UND_SUBSCRMETHODTYPE,
T3.PLACEMENTTYPE UND_PLACEMENTTYPE,
T3.PAYDIRECTIONTYPE UND_PAYDIRECTIONTYPE,
T3.OPTIONTYPE UND_OPTIONTYPE,
T3.SETTLESTYLETYPE UND_SETTLESTYLETYPE,
T3.CSFUNDTYPE UND_CSFUNDTYPE,
T3.TRADINGSTATUSTYPE UND_TRADINGSTATUSTYPE,
T3.LISTINGSTATUSTYPE UND_LISTINGSTATUSTYPE,
T3.EXERCISEPLACE UND_EXERCISEPLACE,
T3.NAME35_G UND_NAME35_G, T3.NAME35_E UND_NAME35_E,
T3.NAME35_F UND_NAME35_F, T3.NAME35_I UND_NAME35_I,
T3.NAME35_N UND_NAME35_N, T3.NAME45_G UND_NAME45_G,
T3.NAME45_E UND_NAME45_E, T3.NAME45_F UND_NAME45_F,
T3.NAME45_I UND_NAME45_I, T3.NAME45_N UND_NAME45_N,
T3.SHORTNAME_G UND_SHORTNAME_G,
T3.SHORTNAME_E UND_SHORTNAME_E,
T3.SHORTNAME_F UND_SHORTNAME_F,
T3.SHORTNAME_I UND_SHORTNAME_I,
T3.SHORTNAME_N UND_SHORTNAME_N,
T3.PREPARTICLE_G UND_PREPARTICLE_G,
T3.PREPARTICLE_E UND_PREPARTICLE_E,
T3.PREPARTICLE_F UND_PREPARTICLE_F,
T3.PREPARTICLE_I UND_PREPARTICLE_I,
T3.PREPARTICLE_N UND_PREPARTICLE_N,
T3.POSTPARTICLE_G UND_POSTPARTICLE_G,
T3.POSTPARTICLE_E UND_POSTPARTICLE_E,
T3.POSTPARTICLE_F UND_POSTPARTICLE_F,
T3.POSTPARTICLE_I UND_POSTPARTICLE_I,
T3.POSTPARTICLE_N UND_POSTPARTICLE_N,
T3.ISINTERNAL UND_ISINTERNAL, T3.ISOTC UND_ISOTC,
T3.HASWITHHOLDINGTAX UND_UND_HASWITHHOLDINGTAX,
T3.HASFEDERALSTAMPDUTY UND_HASFEDERALSTAMPDUTY,
T3.ISCSMIFIDCOMPLEX UND_ISCSMIFIDCOMPLEX,
T3.MOSTLIQUIDMARKETLOCATION UND_MOSTLQDMARKETLOCATION,
T3.MOSTLIQUIDMARKETLOCATION_A2 UND_MOSTLQDMARKETLOCATION_A2,
T3.MOSTLIQUIDMARKETLOCATION_A3 UND_MOSTLQDMARKETLOCATION_A3,
T3.MOSTLIQUIDMARKETLOCATION_WS80
UND_MOSTLQDMARKETLOCATION_WS80,
T3.MDYWATCHLISTSTATUSTYPE UND_MDYWATCHLISTSTATUSTYPE,
T3.SPWATCHLISTSTATUSTYPE UND_SPWATCHLISTSTATUSTYPE,
T3.FITCHWATCHLISTSTATUSTYPE UND_FITCHWATCHLISTSTATUSTYPE,
T3.OPTIONSTYLETYPE UND_OPTIONSTYLETYPE,
T3.CSMAINTRADINGCURR UND_CSMAINTRADINGCURR,
T3.CSMAINTRADINGCURR_I1 UND_CSMAINTRADINGCURR_I1,
T3.CSMAINTRADINGCURR_I2 UND_CSMAINTRADINGCURR_I2,
T3.CSMAINTRADINGCURR_WS80 UND_CSMAINTRADINGCURR_WS80,
T3.CSRISKCOUNTRY_A3 UND_CSRISKCOUNTRY_A3,
T3.LIQUIDATIONRIGHTTYPE UND_LIQUIDATIONRIGHTTYPE,
T3.CSMAINPARENTTRADINGPLACE UND_CSMAINPTRADINGPLACE,
T3.CSMAINPARENTTRADINGPLACE_BCN UND_CSMAINPTRADINGPLACE_BCN,
T3.CSMAINPARENTTRADINGPLACE_RTX UND_CSMAINPTRADINGPLACE_RTX,
T3.CSMAINPARENTTRADINGPLACE_MIC UND_CSMAINPTRADINGPLACE_MIC,
T3.CSMAINPARENTTRADINGPLACE_BBX UND_CSMAINPTRADINGPLACE_BBX,
T3.CSMAINPARENTTRADINGPLACE_WS80
UND_CSMAINPTRADINGPLACE_WS80, T4.DEFREPAYMENTPERIOD,
T4.POSITIONLIMIT, T4.MARGININPERCENT,
T4.MARGININITIALAMOUN, T4.MARGINSPREADAMOUNT,
T4.TICKAMOUNT, T4.TICKSIZE, T4.CONTRACTSIZE,
T4.CONTSIZEUNDERLYING, T4.BONDFLOOR, T4.DISCOUNT,
T4.GUARANTEREPAYPRICE, T4.RESERVENUMBER2,
T4.RESERVENUMBER3, T4.RESERVENUMBER4, T4.RESERVENUMBER5,
T4.MANDATOR, T4.RESERVETEXT1, T4.RESERVETEXT3,
T4.CSBOARDLOT, T4.CSINCOMETAXTYPE, T4.POSITIONCURRTYPE,
T4.KANTONSCODETYPE, T4.CSEVENTDTCODETYPE,
T4.CSFUNDTYPE CSFUNDTYPE_SP42, T4.CSRELEVANCEDATE,
T4.HASQUOTESBLOCK, T4.HASFUNDSUNBUNDLING,
T4.FUNDDEPOSITARY, T4.FUNDCATEGORY
FROM VDPSX.VTINSTRFLATSYMBOLS T1
INNER JOIN
VDPSX.VTINSTRFLATDATA T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPSX.VTINSTRFLATDATA T3
ON T3.INSTRUMENTID = T2.UNDERINSTRUMENT
LEFT OUTER JOIN
VDPSX.CTINSTRSP42DETAILS T4
ON T4.INSTRUMENTID = T1.INSTRUMENTID ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_VINSP135_V02
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.IDS_VINSP135_V02 AS
SELECT T1.INSTRUMENTID, T2.DEFREPAYMENTPERIOD, T2.POSITIONLIMIT,
T2.BONDFLOOR, T2.DISCOUNT, T2.GUARANTEREPAYPRICE,
T2.RESERVENUMBER2, T2.RESERVENUMBER3, T2.RESERVENUMBER4,
T2.RESERVENUMBER5, T2.MANDATOR, T2.RESERVETEXT1,
T2.RESERVETEXT3, T2.CSBOARDLOT, T2.CSINCOMETAXTYPE,
T2.POSITIONCURRTYPE, T2.KANTONSCODETYPE,
T2.CSEVENTDTCODETYPE, T2.CSFUNDTYPE, T2.CSRELEVANCEDATE,
T2.HASQUOTESBLOCK, T2.HASFUNDSUNBUNDLING,
T2.FUNDDEPOSITARY, T2.FUNDCATEGORY
FROM VDPSX.VTINSTRFLATSYMBOLS T1
INNER JOIN
VDPSX.CTINSTRSP42DETAILS T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_VLSTG111_V03
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.IDS_VLSTG111_V03 AS
SELECT T1.INSTRUMENTID, T1.LISTINGNO, T3.SYMBOLCH, T3.SYMBOLISIN,
T3.SYMBOLCSFI, T1.CURRENCY, T1.CURRENCY_I2, T1.CURRENCY_I1,
T1.CURRENCY_WS80, T1.TRADINGPLACE, T1.TRADINGPLACE_BCN,
T1.TRADINGPLACE_MIC, T1.TRADINGPLACE_RTX,
T1.TRADINGPLACE_BBX, T1.TRADINGPLACE_WS80,
T4.SHORTNAME_G SHORTNAME_G_INSTI,
T4.SHORTNAME_E SHORTNAME_E_INSTI,
T4.SHORTNAME_F SHORTNAME_F_INSTI,
T4.SHORTNAME_I SHORTNAME_I_INSTI,
T4.SHORTNAME_N SHORTNAME_N_INSTI, T1.LISTINGSYMBOLTK,
T1.LISTINGSYMBOLRT, T1.LISTINGSYMBOLBB,
T1.SHORTNAME_G SHORTNAME_G_LISG,
T1.SHORTNAME_E SHORTNAME_E_LISG,
T1.SHORTNAME_F SHORTNAME_F_LISG,
T1.SHORTNAME_I SHORTNAME_I_LISG,
T1.SHORTNAME_N SHORTNAME_N_LISG, T1.LISTINGSTATUSTYPE,
T1.TRADINGSTATUSTYPE, T1.FIRSTTRADINGDATE,
T1.LASTTRADINGDATE, T1.ISMAINTRADINGPLACE,
T1.ISHOMETRADINGPLACE, T1.LISTINGCLASSTYPE,
T1.PRICINGUNITNO, T1.PRICINGUNITTYPE,
T1.TRADINGUNITTYPE TRADINGUNITTYPE_LISTING,
T1.ISCSBESTVENUEOVERALL, T1.ISCSBESTVENUEPERCURR,
T1.ISBESTVOLUMEBESTSPREAD, T1.ISBESTVOLUME,
T1.ISBESTSPREAD, T1.ISHIGHESTTICKS, T1.ISBESTVOLUMEPERCURR,
T1.ISBESTSPREADPERCURR, T1.ISPRIMARYMARKETUSA,
T1.ISSINGLETRADINGPLACE, T1.ISISSUERPRICEPROVIDER,
T1.ISNAVINDEPENDENTSOURCE, T1.ISFUNDASSESSMENTSOURCE,
T1.ISPLACEOFLISTING, T1.ISPLACEOFTRADING,
T1.ISPLACEOFQUOTE, T1.PARENTTRADINGPLACE,
T1.PARENTTRADINGPLACE_BCN, T1.PARENTTRADINGPLACE_RTX,
T1.PARENTTRADINGPLACE_MIC, T1.PARENTTRADINGPLACE_BBX,
T1.PARENTTRADINGPLACE_WS80, T2.CONVERSIONFACTOR,
T2.ISSTEERINGFLAG1, T2.ISSTEERINGFLAG2, T2.ISSTEERINGFLAG3,
T2.ISSTEERINGFLAG4, T2.ISSTEERINGFLAG5, T2.ISSTEERINGFLAG6,
T2.ISSTEERINGFLAG7, T2.ISSTEERINGFLAG8, T2.PRIORITYCODE,
T2.RESERVESYMBOL,
T2.TRADINGUNITTYPE TRADINGUNITTYPE_CSLISTING, T2.MANDATOR
FROM VDPSX.VTLISTING T1
INNER JOIN
VDPSX.CTLISTING T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND T2.LISTINGNO = T1.
LISTINGNO
INNER JOIN
VDPSX.VTINSTRFLATSYMBOLS T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTITUTION T4
ON T4.INSTITUTIONID = T1.TRADINGPLACE ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.IDS_VRSTR114
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F473828" ;
--
CREATE VIEW VDPSX.IDS_VRSTR114 AS
SELECT T1.INSTRUMENTID, T1.SYMBOLCH, T1.SYMBOLISIN, T1.SYMBOLUS,
T1.SYMBOLXS, T1.SYMBOLGB, T1.SYMBOLLU, T1.SYMBOLDE,
T1.SYMBOLI2, T1.SYMBOLI1, T1.SYMBOLT1, T1.SYMBOLT2,
T1.SYMBOLCSFI, T1.SYMBOLCSCURR, T1.CATEGORYVDPS,
T1.CATEGORYTKT, T1.CATEGORYEUZS,
T1.INSTRUMENTUPDATETIMESTAMP, T1.INSTRUMENTCREATETIMESTAMP,
T3.INSTRRESTRICTIONNO, T3.RESTRICTIONPERIOD,
T3.PROVIDER1ID, T3.PROVIDER2ID, T3.PROVIDER3ID,
T3.ISRESIDENTLOCATION, T3.ISCITIZENLOCATION,
T3.ISRESTRICTCOUNTRY, T3.ISINSTIRESTRICTION,
T3.ISRESTRICTBYISSUER, T3.RESTRICTLOCATION,
T3.PERIODBEGINDATE, T3.PERIODENDDATE, T3.RESTRMARKETTYPE,
T3.RESTRICTIONTYPE, T3.INSTIRESTRICTTYPE,
T3.RESTRICTPERIUNTP, T3.DESCRIPTION_G, T3.DESCRIPTION_E,
T3.DESCRIPTION_F, T3.DESCRIPTION_I, T3.DESCRIPTION_N,
T3.ISOVERRIDEALLOWED, T3.P42RESTRICTIONTYPE,
T3.REGISTRATIONLIMIT, T3.CREATETIMESTAMP,
T3.UPDATETIMESTAMP, T4.RESTRSUSPENSIONNO,
T4.INSTRRESTRICTIONNO RESTRICTIONNO_SUSP,
T4.PROVIDER1ID PROVIDER1ID_SUSP,
T4.PROVIDER2ID PROVIDER2ID_SUSP,
T4.PROVIDER3ID PROVIDER3ID_SUSP, T4.LOCATION,
T4.PERIODBEGINDATE PERIODBEGINDATE_SUSP,
T4.PERIODENDDATE PERIODENDDATE_SUSP, T4.RESTRICTSUSPENTP,
T4.DESCRIPTION_G DESCRIPTION_G_SUSP,
T4.DESCRIPTION_E DESCRIPTION_E_SUSP,
T4.DESCRIPTION_F DESCRIPTION_F_SUSP,
T4.DESCRIPTION_I DESCRIPTION_I_SUSP,
T4.DESCRIPTION_N DESCRIPTION_N_SUSP, T4.LOCATION_A2,
T4.LOCATION_A3, T4.LOCATION_WS80,
T5.IDSYMBOL RESTRICTLOCATIONISOA2,
T5.VALIDFROMDATE VALIDFROMDATE_ISOA2,
T5.VALIDUNTILDATE VALIDUNTILDATE_ISOA2,
T6.IDSYMBOL RESTRICTLOCATIONISOA3,
T6.VALIDFROMDATE VALIDFROMDATE_ISOA3,
T6.VALIDUNTILDATE VALIDUNTILDATE_ISOA3,
T7.IDSYMBOL RESTRICTLOCATIONISON,
T7.VALIDFROMDATE VALIDFROMDATE_ISON,
T7.VALIDUNTILDATE VALIDUNTILDATE_ISON,
T8.IDSYMBOL RESTRICTLOCATIONTKN,
T8.VALIDFROMDATE VALIDFROMDATE_TKN,
T8.VALIDUNTILDATE VALIDUNTILDATE_TKN,
T9.IDSYMBOL RESTRICTLOCATIONCS,
T9.VALIDFROMDATE VALIDFROMDATE_CS,
T9.VALIDUNTILDATE VALIDUNTILDATE_CS
FROM VDPSX.VTINSTRFLATSYMBOLS T1
INNER JOIN
VDPSX.VTINSTRFLATDATA T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTRRESTRICTION T3
ON T3.INSTRUMENTID = T2.INSTRUMENTID
LEFT OUTER JOIN
VDPSX.VTRESTRICTIONSUSP T4
ON T4.INSTRUMENTID = T3.INSTRUMENTID AND T4.
INSTRRESTRICTIONNO = T3.INSTRRESTRICTIONNO
LEFT OUTER JOIN
VDPSX.VTGEOUNITIDENT T5
ON T5.GEOUNITID = T3.RESTRICTLOCATION AND T5.SCHEMESYMBOL
= 'ISOA2' AND T5.ROWSTATUS = 1
LEFT OUTER JOIN
VDPSX.VTGEOUNITIDENT T6
ON T6.GEOUNITID = T3.RESTRICTLOCATION AND T6.SCHEMESYMBOL
= 'ISOA3' AND T6.ROWSTATUS = 1
LEFT OUTER JOIN
VDPSX.VTGEOUNITIDENT T7
ON T7.GEOUNITID = T3.RESTRICTLOCATION AND T7.SCHEMESYMBOL
= 'ISON' AND T7.ROWSTATUS = 1
LEFT OUTER JOIN
VDPSX.VTGEOUNITIDENT T8
ON T8.GEOUNITID = T3.RESTRICTLOCATION AND T8.SCHEMESYMBOL
= 'TKN' AND T8.ROWSTATUS = 1
LEFT OUTER JOIN
VDPSX.VTGEOUNITIDENT T9
ON T9.GEOUNITID = T3.RESTRICTLOCATION AND T9.SCHEMESYMBOL
= 'CS-WS80-DOM' AND T9.ROWSTATUS = 1 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.VVV_IDS_VCFTU106
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.VVV_IDS_VCFTU106 AS
SELECT T1.INSTRUMENTID, T1.SYMBOLCH, T1.SYMBOLISIN, T1.SYMBOLUS,
T1.SYMBOLXS, T1.SYMBOLGB, T1.SYMBOLLU, T1.SYMBOLDE,
T1.SYMBOLI2, T1.SYMBOLI1, T1.SYMBOLT1, T1.SYMBOLT2,
T1.SYMBOLCSFI, T1.SYMBOLCSCURR, T1.CATEGORYVDPS,
T1.CATEGORYTKT, T1.CATEGORYEUZS,
T1.INSTRUMENTUPDATETIMESTAMP, T1.INSTRUMENTCREATETIMESTAMP,
T2.INSTRUMENTEVENTNO, T3.EXDATE, T4.CFAMOUNTTYPE,
T4.PAYAMOUNT, T5.RELEVANTDATE, T6.SYMBOLI2 PAYINSTRUMENT
FROM VDPSX.VTINSTRFLATSYMBOLS T1
INNER JOIN
VDPSX.VTINSTRUMENTEVENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND T2.PROVIDERTYPE =
2
INNER JOIN
VDPSX.VTINSTREVENTEXDATE T3
ON T2.INSTRUMENTID = T3.INSTRUMENTID AND T2.
INSTRUMENTEVENTNO = T3.INSTRUMENTEVENTNO
INNER JOIN
VDPSX.VTCASHFLOWAMOUNT T4
ON T4.INSTRUMENTID = T3.INSTRUMENTID AND T4.
INSTRUMENTEVENTNO = T3.INSTRUMENTEVENTNO AND T4.
CFAMOUNTTYPE IN(10064, 10072)
INNER JOIN
VDPSX.VTCASHFLOWTAXAMT T5
ON T2.INSTRUMENTID = T5.INSTRUMENTID AND T2.
INSTRUMENTEVENTNO = T5.INSTRUMENTEVENTNO AND T5.
RELEVANTDATE >= '20090101'
LEFT OUTER JOIN
VDPSX.VTINSTRFLATSYMBOLS T6
ON T6.INSTRUMENTID = T4.PAYINSTRUMENT
WHERE T2.INSTRUMENTEVENTNO IN(SELECT T7.INSTRUMENTEVENTNO
FROM VDPSX.VTCASHFLOWTAXAMT T7
WHERE
T7.RELEVANTDATE >= '20090101'
AND T7.INSTRUMENTID = T2.
INSTRUMENTID) ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.VVV_IDS_VINGP108
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.VVV_IDS_VINGP108 AS
SELECT T1.INSTRUMENTID, T1.ROWSTATUS ROWSTATUS_FLTSYMB,
T1.CSSTATUSTYPE, T1.STATUSTYPE, T1.SYMBOLCH, T1.SYMBOLISIN,
T1.SYMBOLUS, T1.SYMBOLXS, T1.SYMBOLGB, T1.SYMBOLLU,
T1.SYMBOLDE, T1.SYMBOLI2, T1.SYMBOLI1, T1.SYMBOLT1,
T1.SYMBOLT2, T1.SYMBOLCSFI, T1.SYMBOLCSCURR,
T1.CATEGORYVDPS, T1.CATEGORYTKT, T1.CATEGORYEUZS,
T1.INSTRUMENTUPDATETIMESTAMP, T1.INSTRUMENTCREATETIMESTAMP,
T2.PAYFREQUENCY, T2.EXERCISEAMOUNT, T2.PAYAMOUNT,
T2.ISCONVERTBYISSUER, T2.HASVOTINGRIGHTNO,
T2.HASMULTIUNDERLYERS, T2.CSMAINTRADPLACE,
T2.ORIGINALISSUER, T2.ISSUER, T2.UNDERINSTRUMENT,
T2.NOMINALCURR, T2.NOMINALCURR_I1, T2.NOMINALCURR_I2,
T2.NOMINALCURR_WS80, T2.CSRISKCURRENCY, T2.EXERCISECURR,
T2.POOLFACTOR, T2.VOTINGRIGHTNO, T2.OUTSTANDINGCAPITAL,
T2.CSRISKINDIDSYMBOL, T2.CSRISKINDSCHEMESYM, T2.MDYRATING,
T2.SPRATING, T2.PAYMENTDATE, T2.UNITTYPE, T2.CSUNITTYPE,
T2.CSFUNDTYPE, T2.HASWITHHOLDINGTAX, T2.OPTIONSTYLETYPE,
T2.NAME35_G, T2.NAME45_G, T2.SHORTNAME_G, T2.PREPARTICLE_G,
T2.POSTPARTICLE_G, T2.EFFECTIVEDATE, T2.BORROWINGLIMITTYPE,
T3.INSTRINGROUPNO, T3.IDSYMBOL IDSYMBOL_IGK,
T3.SCHEMESYMBOL SCHEMESYMBOL_IGK, T3.QUALITYTYPE,
T3.PROVIDER1ID, T3.PROVIDER2ID, T3.PROVIDER3ID,
T4.INSTRGROUPID, T4.HISTORYID, T4.INSTRGROUPTYPE,
T4.ROWSTATUS, T4.VSTQUALITY, T4.REVISIONNO,
T4.VSTREQUIREDQUALITY, T4.VSTMAXIMUMQUALITY,
T4.HASPENDINGACTVTY, T4.ISRELEVANT, T4.HASFUTUREMESSAGES,
T4.FOTWIZISDISABLED, T4.ISONDB, T4.IDSYMBOL IDSYMBOL_IG,
T4.SCHEMESYMBOL SCHEMESYMBOL_IG, T4.NAME_G, T4.NAME_E,
T4.NAME_F, T4.NAME_I, T4.NAME_N, T4.VSTNAME, T4.VSTVERSION,
T4.CREATEUSERID, T4.UPDATEUSERID, T4.PROVIDER1SYMBOL,
T4.PROVIDER2SYMBOL, T4.PROVIDER3SYMBOL, T4.VALIDUNTILDATE,
T4.VALIDFROMDATE, T4.FOTYPE FOTYPE_IG, T4.DATASTATUSTYPE,
T4.BLOCKINGCODETYPE, T4.LOGICDELETIONTYPE,
T4.MODIFICATIONREASON, T4.REMARKS, T4.DESCRIPTION_G,
T4.DESCRIPTION_E, T4.DESCRIPTION_F, T4.DESCRIPTION_I,
T4.DESCRIPTION_N, T4.DOWRITETOSHADOWTABLES
FROM VDPSX.VTINSTRFLATSYMBOLS T1
INNER JOIN
VDPSX.VTINSTRFLATDATA T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTRINGROUP T3
ON T3.INSTRUMENTID = T2.INSTRUMENTID
INNER JOIN
VDPSX.VTINSTRGROUP T4
ON T4.IDSYMBOL = T3.IDSYMBOL AND T4.SCHEMESYMBOL = T3.
SCHEMESYMBOL ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.VVV_XPS_IL#VLIID_V01
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F273764" ;
--
CREATE VIEW VDPSX.VVV_XPS_IL#VLIID_V01 AS
SELECT CHAR(T1.IDSYMBOL, 9) AS VALORNR,
CHAR(T8.IDSYMBOL, 4) AS CURRENCY_CS, T3.LISTINGSTATUSTYPE,
T3.TRADINGSTATUSTYPE, T3.ISHOMETRADINGPLACE,
CHAR(T4.IDSYMBOL, 4) AS IDSYMBOL_BCN,
CHAR(T5.DOMICILE_WS80, 3) AS DOMICILE_CS,
T7.ISSTEERINGFLAG4 AS CS_HAUPTBOEPLATZ,
T3.ISMAINTRADINGPLACE AS TK_HAUPTBOEPLATZ,
T3.ISCSBESTVENUEOVERALL, T3.ISCSBESTVENUEPERCURR,
CHAR(T6.SCHEMESYMBOL, 3) AS SCHEME_TICKER,
SUBSTR(T6.IDSYMBOL, 1, 30) AS IDSYMBOL_TICKER,
T3.DESCRIPTION_E AS EXTERNTRADINGCURR
FROM VDPSX.VTINSTRIDENT T1
INNER JOIN
VDPSX.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2) AND T2.CSSTATUSTYPE BETWEEN 4
AND 9
INNER JOIN
VDPSX.VTLISTING T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPSX.VTINSTIIDENT T4
ON T4.INSTITUTIONID = T3.TRADINGPLACE AND T4.SCHEMESYMBOL
= 'BCN' AND T4.ROWSTATUS = 1
INNER JOIN
VDPSX.VTINSTITUTION T5
ON T5.INSTITUTIONID = T3.TRADINGPLACE AND (T5.ROWSTATUS IS
NULL OR T5.ROWSTATUS <> 2)
LEFT OUTER JOIN
VDPSX.VTLISTINGIDENT T6
ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
LISTINGNO AND T6.SCHEMESYMBOL IN('TKH', 'RIC', 'BBI', 'TKE')
LEFT OUTER JOIN
VDPSX.CTLISTING T7
ON T7.INSTRUMENTID = T3.INSTRUMENTID AND T7.LISTINGNO = T3.
LISTINGNO AND T7.MANDATOR = 1
LEFT OUTER JOIN
VDPSX.VTINSTRIDENT T8
ON T8.INSTRUMENTID = T3.CURRENCY AND T8.SCHEMESYMBOL =
'CS-WS80-WHRG' AND T8.ROWSTATUS = 1
WHERE T1.SCHEMESYMBOL = 'CH'
AND T1.ROWSTATUS = 1
AND (T3.LISTINGSTATUSTYPE IN(1, 4, 13, 17, 21)
OR T7.ISSTEERINGFLAG4 = 1) ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.VVV_XPS_VINDE007_V01
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.VVV_XPS_VINDE007_V01 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T1.INSTRUMENTID,
T3.CREATETIMESTAMP, T3.UPDATETIMESTAMP,
T3.ISCSMIFIDCOMPLEX, T3.CSPRODUCTCATEGORY
FROM VDPSX.VTINSTRIDENT T1
INNER JOIN
VDPSX.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPSX.CTINSTRDETAILS T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
WHERE T1.ROWSTATUS = 1 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.VVV_XPS_VLIID002_V07
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.VVV_XPS_VLIID002_V07 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T1.INSTRUMENTID,
T3.CREATETIMESTAMP, T3.UPDATETIMESTAMP, T3.LISTINGNO,
T6.LISTINGIDENTNO, T3.LISTINGSTATUSTYPE,
T3.TRADINGSTATUSTYPE, T3.FIRSTTRADINGDATE,
T3.LASTTRADINGDATE, T3.ISHOMETRADINGPLACE,
T3.ISMAINTRADINGPLACE TK_HAUPTBOEPLATZ,
T7.ISSTEERINGFLAG4 CS_HAUPTBOEPLATZ,
T3.ISCSBESTVENUEOVERALL, T3.ISCSBESTVENUEPERCURR,
T3.TRADINGPLACE, T3.CURRENCY, T8.IDSYMBOL CURRENCY_CS,
T4.IDSYMBOL IDSYMBOL_BCN, T5.DOMICILE,
T5.DOMICILE_WS80 DOMICILE_CS,
T6.SCHEMESYMBOL SCHEME_TICKER, T6.IDSYMBOL IDSYMBOL_TICKER,
T6.VALIDFROMDATE, T6.VALIDUNTILDATE,
T3.DESCRIPTION_E EXTERNTRADINGCURR
FROM VDPSX.VTINSTRIDENT T1
INNER JOIN
VDPSX.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPSX.VTLISTING T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPSX.VTINSTIIDENT T4
ON T4.INSTITUTIONID = T3.TRADINGPLACE AND T4.SCHEMESYMBOL
= 'BCN' AND T4.ROWSTATUS = 1
INNER JOIN
VDPSX.VTINSTITUTION T5
ON T5.INSTITUTIONID = T3.TRADINGPLACE AND (T5.ROWSTATUS IS
NULL OR T5.ROWSTATUS <> 2)
LEFT OUTER JOIN
VDPSX.VTLISTINGIDENT T6
ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
LISTINGNO AND T6.SCHEMESYMBOL IN('TKH', 'RIC', 'BBI', 'TKE')
LEFT OUTER JOIN
VDPSX.CTLISTING T7
ON T7.INSTRUMENTID = T3.INSTRUMENTID AND T7.LISTINGNO = T3.
LISTINGNO AND T7.MANDATOR = 1
LEFT OUTER JOIN
VDPSX.VTINSTRIDENT T8
ON T8.INSTRUMENTID = T3.CURRENCY AND T8.SCHEMESYMBOL =
'CS-WS80-WHRG' AND T8.ROWSTATUS = 1
WHERE T1.ROWSTATUS = 1
AND T3.LISTINGSTATUSTYPE <> 9
AND T3.LISTINGSTATUSTYPE <> 18 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VINCF502_V02
------------------------------------------------------------------------
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","F578255" ;
--
CREATE VIEW VDPSX.XPS_VINCF502_V02 AS
SELECT VDPSX.VTINSTRWITHCF.INSTRUMENTID,
VDPSX.VTINSTRWITHCF.PAYFREQUENCY,
VDPSX.VTINSTRWITHCF.ISAMORTIZABLE,
VDPSX.VTINSTRWITHCF.ISCONVERTBYHOLDER,
VDPSX.VTINSTRWITHCF.ISCONVERTBYISSUER,
VDPSX.VTINSTRWITHCF.ISEXTENDBYHOLDER,
VDPSX.VTINSTRWITHCF.ISEXTENDBYISSUER,
VDPSX.VTINSTRWITHCF.HASKNOWNCFONLY,
VDPSX.VTINSTRWITHCF.ISREDEEMABLE,
VDPSX.VTINSTRWITHCF.HASREOPENINGCLAUSE,
VDPSX.VTINSTRWITHCF.ISRETRACTABLE,
VDPSX.VTINSTRWITHCF.ISPARTLYPAID,
VDPSX.VTINSTRWITHCF.HASDISTRINVARCURR,
VDPSX.VTINSTRWITHCF.HASSTRUCTCASHFLOWS,
VDPSX.VTINSTRWITHCF.ISCOVEREDWARRANT,
VDPSX.VTINSTRWITHCF.HASREDMPINVARCURR,
VDPSX.VTINSTRWITHCF.HASVOTINGRIGHT,
VDPSX.VTINSTRWITHCF.HASISMAREGULATION,
VDPSX.VTINSTRWITHCF.REPAYPRICECURR,
VDPSX.VTINSTRWITHCF.EFFINTERESTRATE,
VDPSX.VTINSTRWITHCF.REPAYPRICE,
VDPSX.VTINSTRWITHCF.REPAYPRICEUNITNO,
VDPSX.VTINSTRWITHCF.NONVERSEAMOUNT,
VDPSX.VTINSTRWITHCF.POOLFACTOR,
VDPSX.VTINSTRWITHCF.PARTNOTPAID,
VDPSX.VTINSTRWITHCF.FIRSTPAYDATE,
VDPSX.VTINSTRWITHCF.MATURITYDATE,
VDPSX.VTINSTRWITHCF.POOLFACTORVLDFRDT,
VDPSX.VTINSTRWITHCF.INTRSTDVDENFRDATE,
VDPSX.VTINSTRWITHCF.CONVEXERFROMDATE,
VDPSX.VTINSTRWITHCF.CONVEXERUNTILDATE,
VDPSX.VTINSTRWITHCF.LASTSPLITDATE,
VDPSX.VTINSTRWITHCF.INTERESTCALCTYPE,
VDPSX.VTINSTRWITHCF.INTERESTTYPE,
VDPSX.VTINSTRWITHCF.LQDATIONRIGHTTYPE,
VDPSX.VTINSTRWITHCF.OPTIONSTYLETYPE,
VDPSX.VTINSTRWITHCF.PYFREQUNITTYPE,
VDPSX.VTINSTRWITHCF.REPAYPRICEQTETYPE,
VDPSX.VTINSTRWITHCF.REPAYPRICEUNTTYPE,
VDPSX.VTINSTRWITHCF.TRANSFERTYPE,
VDPSX.VTINSTRWITHCF.CERTIFICATETYPE,
VDPSX.VTINSTRWITHCF.INTRSTVALIDTYPE,
VDPSX.VTINSTRWITHCF.INCOMEMODETYPE,
VDPSX.VTINSTRWITHCF.INTRSTPYMTHDTYPE,
VDPSX.VTINSTRWITHCF.OPTIONTYPE,
VDPSX.VTINSTRWITHCF.INTERESTCALCTYPEV,
VDPSX.VTINSTRWITHCF.INTERESTTYPEV,
VDPSX.VTINSTRWITHCF.LQDATIONRIGHTTYPEV,
VDPSX.VTINSTRWITHCF.OPTIONSTYLETYPEV,
VDPSX.VTINSTRWITHCF.PYFREQUNITTYPEV,
VDPSX.VTINSTRWITHCF.REPAYPRICEQTETYPEV,
VDPSX.VTINSTRWITHCF.REPAYPRICEUNTTYPEV,
VDPSX.VTINSTRWITHCF.TRANSFERTYPEV,
VDPSX.VTINSTRWITHCF.CERTIFICATETYPEV,
VDPSX.VTINSTRWITHCF.INTRSTVALIDTYPEV,
VDPSX.VTINSTRWITHCF.INCOMEMODETYPEV,
VDPSX.VTINSTRWITHCF.INTRSTPYMTHDTYPEV,
VDPSX.VTINSTRWITHCF.OPTIONTYPEV,
VDPSX.VTINSTRWITHCF.CERTDESCR_G,
VDPSX.VTINSTRWITHCF.CERTDESCR_E,
VDPSX.VTINSTRWITHCF.CERTDESCR_F,
VDPSX.VTINSTRWITHCF.CERTDESCR_I,
VDPSX.VTINSTRWITHCF.CERTDESCR_N,
VDPSX.VTINSTRWITHCF.FIRSTPYDATEPERYEAR,
VDPSX.VTINSTRWITHCF.ISCALLFORTXREONLY,
VDPSX.VTINSTRWITHCF.IRREGLARLACOUPTP,
VDPSX.VTINSTRWITHCF.IUPVALUETYPE,
VDPSX.VTINSTRWITHCF.IRREGLARLACOUPTPV,
VDPSX.VTINSTRWITHCF.IUPVALUETYPEV,
VDPSX.VTINSTRWITHCF.BUSINESSDAYCONVTP,
VDPSX.VTINSTRWITHCF.BUSINESSDAYCONVTPV,
VDPSX.VTINSTRWITHCF.INTERESTPERIADJTP,
VDPSX.VTINSTRWITHCF.INTERESTPERIADJTPV,
VDPSX.VTINSTRWITHCF.HASHALBEINVERFHREN,
VDPSX.VTINSTRWITHCF.CLASSSYMBOL,
VDPSX.VTINSTRWITHCF.SERIES,
VDPSX.VTINSTRWITHCF.HASDIVIDREINVPLAN,
VDPSX.VTINSTRWITHCF.HALBEINKUENFTEVALIDFROM
FROM VDPSX.VTINSTRWITHCF ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPSX.XPS_VINTX505_V02
------------------------------------------------------------------------
--
--
CREATE VIEW VDPSX.XPS_VINTX505_V02 AS
SELECT T1.INSTRUMENTID, T1.TAXRATEKEYNO, T1.PROVIDER1ID,
T1.PROVIDER2ID, T1.PROVIDER3ID, T1.TAXRATEIDSYMBOL,
T1.TXRTKEYCATIDSYMBOL, T1.BEGINDATE, T1.ENDDATE,
T1.CONCERNTYPE, T1.CONCERNTYPEV, T1.FUNDNAVCALCFREQ,
T1.REOPTRANCHINSTR, T1.ISGROSSUP, T1.HASACCRUEDINTEREST,
T1.ISREOPTRANCHINSTR, T1.ISGOVERNISSUEDDEBT,
T1.HASFUNDINTERESTDET, T1.HASEUTAXDIRECTIVE, T1.REOPENDATE,
T1.PROSPECTDATE, T1.FUNDPUBLICDATE, T1.FUNDASSETCALCDATE,
T1.FUNDASSETFROMDATE, T1.FUNDASSETUNTILDATE,
T1.FUNDPROSPECTFROMDT, T1.FUNDDECLSTATTYPE,
T1.GRANDFATHEREDTYPE, T1.FUNDNAVCALCFQUNTP,
T1.INOUTSCOPETYPE, T1.TAXFUNCTIONTYPE,
T1.FUNDDECLSTATTYPEV, T1.GRANDFATHEREDTYPEV,
T1.FUNDNAVCALCFQUNTPV, T1.INOUTSCOPETYPEV,
T1.TAXFUNCTIONTYPEV, T1.EUTAXDESCRIPTION_G,
T1.EUTAXDESCRIPTION_E, T1.EUTAXDESCRIPTION_F,
T1.EUTAXDESCRIPTION_I, T1.EUTAXDESCRIPTION_N,
T1.INSTRGRPSCHSYMBOL, T1.INSTRGROUPIDSYMBOL,
T1.VALIDFROMDATE, T1.DISCOUNTTYPE, T1.DISCOUNTTYPEV,
T1.FUNDPROSPECTUNTIDT, T1.PROVIDERTYPE PROVIDERTYPE_TXRATE,
T2.TAXAMTTYPE,
T2.ISFRGNTXRTFRUSRES ISFRGNTXRTFRUSRES_TXAMT,
T2.ISTAXSTANDARD, T2.TAXLOCATION, T2.REFUNDLOCATION,
T2.CURRENCY CURRENCY_TXAMT, T2.TAXAMOUNT, T2.TAXRATE,
T2.TAXTYPEIDSYMBOL TAXTYPEIDSYMBOL_TXAMT,
T2.REFUNDRATEIDSYMBOL, T2.BASERATEIDSYMBOL,
T2.ACCRUALINCOMEDATE, T2.EXDATE, T2.EXRIGHTDATE,
T2.RECORDDATE, T2.TAXBEGINDATE, T2.TAXENTITLEBEGINDT,
T2.TAXENTITLEENDDATE, T2.TAXISSUEDATE, T2.RELEVANTDATE,
T2.TAXFINALDATE,
T2.INCMTXDOMICILETP INCMTXDOMICILETP_TXAMT,
T2.TAXAMOUNTTYPE, T2.TAXCATEGORYTYPE TAXCATEGORYTYPE_TXAMT,
T2.TAXYIELDTYPE TAXYIELDTYPE_TXAMT, T2.AMOUNTTYPE,
T2.INCMTXDOMICILETPV INCMTXDOMICILETPV_TXAMT,
T2.TAXAMOUNTTYPEV,
T2.TAXCATEGORYTYPEV TAXCATEGORYTYPEV_TXAMT,
T2.TAXYIELDTYPEV TAXYIELDTYPEV_TXAMT, T2.AMOUNTTYPEV,
T2.DESCRIPTION_G DESCRIPTION_G_TXAMT,
T2.DESCRIPTION_E DESCRIPTION_E_TXAMT,
T2.DESCRIPTION_F DESCRIPTION_F_TXAMT,
T2.DESCRIPTION_I DESCRIPTION_I_TXAMT,
T2.DESCRIPTION_N DESCRIPTION_N_TXAMT,
T2.PROVIDERTYPE PROVIDERTYPE_TXAMT, T2.PAYDIRECTIONTYPE,
T2.TAXREGULATIONTYPE, T2.TAXREGULATIONTYPEV,
T2.CREATETIMESTAMP CREATETIMESTAMP_TXRTKEY,
T2.UPDATETIMESTAMP UPDATETIMESTAMP_TXRTKEY,
T2.CREATETIMESTAMP CREATETIMESTAMP_TXRTTXAMT,
T2.UPDATETIMESTAMP UPDATETIMESTAMP_TXRTTXAMT
FROM VDPSX.VTTAXRATEKEY T1
INNER JOIN
VDPSX.VTTAXRATETAXAMOUNT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND T2.TAXRATEKEYNO =
T1.TAXRATEKEYNO ;
--
COMMIT;
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL --
------------------------------------------------------------------------
--
}¢--- DSN.TX.CASE(WK922DDT) cre=2009-09-07 mod=2009-09-07-14.48.14 A540769 -----
------------------------------------------------------------------------
-- --
-- Database 2 Administration Tool (DB2 Admin) , program 5697-L90 --
-- --
-- ADB2GEN - Extract object definitions from the DB2 Catalog tables --
-- --
-- Title : TRG VDPS441C 3 --
-- --
-- Input prepared on : DBAF (915) Extract time : 2009-09-07 14:01 --
-- --
-- Catalog values overridden : none
-- --
-- Generate : SG=Y DB=Y TS=Y TB=Y VW=Y IX=Y SY=Y AL=Y LB=Y CM=Y FK=Y --
-- TG=Y UT=Y UF=Y SP=Y SQ=Y RO=Y --
-- Grants : SG=N DB=Y TS=Y TB=Y VW=Y SC=Y UT=Y UF=Y SP=Y SQ=Y --
-- --
------------------------------------------------------------------------
--
------------------------------------------------------------------------
-- View=VDPS2.IDS_SMDS1501
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
--
CREATE VIEW VDPS2.IDS_SMDS1501 AS
SELECT T1.INSTRUMENTID, T2.SYMBOLCH, T2.SYMBOLCSFI, T2.SYMBOLISIN,
T2.CATEGORYVDPS, T2.STATUSTYPE, T2.ROWSTATUS,
T2.UPDATETIMESTAMP, T2.CREATETIMESTAMP,
T2.INSTRUMENTUPDATETIMESTAMP, T2.INSTRUMENTCREATETIMESTAMP,
T1.LISTINGSYMBOLTK, T1.CURRENCY_WS80, T1.CURRENCY_I2,
T1.CURRENCY_I1, T1.MARKTPRACTIDSYMBOL, T1.FIRSTTRADINGDATE,
T1.LASTTRADINGDATE, T1.ISMAINTRADINGPLACE,
T1.ISHOMETRADINGPLACE, T1.ISBESTSPREAD,
T1.ISBESTSPREADPERCURR, T1.ISBESTVOLUME,
T1.ISBESTVOLUMEBESTSPREAD, T1.ISBESTVOLUMEPERCURR,
T1.ISCSBESTVENUEOVERALL, T1.ISCSBESTVENUEPERCURR,
T1.ISFUNDASSESSMENTSOURCE, T1.ISHIGHESTTICKS,
T1.ISNAVINDEPENDENTSOURCE, T1.ISPLACEOFQUOTE,
T1.ISPLACEOFLISTING, T1.ISPLACEOFTRADING,
T1.ISPRIMARYMARKETUSA, T1.ISSINGLETRADINGPLACE,
T1.LISTINGCLASSTYPE, T1.LISTINGSTATUSTYPE,
T1.PRICINGUNITNO, T1.PRICINGUNITTYPE, T1.TRADINGPLACE_BBX,
T1.TRADINGPLACE_BCN, T1.TRADINGPLACE_WS80,
T1.TRADINGPLACE_MIC, T1.TRADINGPLACE_RTX,
T1.PARENTTRADINGPLACE_BBX, T1.PARENTTRADINGPLACE_BCN,
T1.PARENTTRADINGPLACE_WS80, T1.PARENTTRADINGPLACE_MIC,
T1.PARENTTRADINGPLACE_RTX, T1.TRADINGSTATUSTYPE,
T1.TRADINGUNITTYPE, T1.LISTINGSYMBOLRT, T1.LISTINGSYMBOLBB,
T1.MINTRADINGUNITNO, T1.REGULARTRADINGUNITNO,
T1.NOMINALTRADINGUNITNO, T1.NMSTRADINGUNITNO,
T1.EMSTRADINGUNITNO, T1.SMSTRADINGUNITNO,
T1.PTSTRADINGUNITNO, T1.LISTINGNO, T3.CSLISTINGCODETYPE,
T3.CSMAINTRADPLACE_BBX, T3.CSMAINTRADPLACE_BCN,
T3.CSMAINTRADPLACE_WS80, T3.CSMAINTRADPLACE_MIC,
T3.CSMAINTRADPLACE_RTX, T4.IDSYMBOL IDSYMBOL_TKM,
T4.SCHEMESYMBOL SCHEMESYMBOL_TKM, T5.IDSYMBOL IDSYMBOL_TKL,
T5.SCHEMESYMBOL SCHEMESYMBOL_TKL, T6.IDSYMBOL IDSYMBOL_TKE,
T6.SCHEMESYMBOL SCHEMESYMBOL_TKE
FROM VDPS2.VTLISTING T1
INNER JOIN
VDPS2.VTINSTRFLATSYMBOLS T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTRFLATDATA T3
ON T3.INSTRUMENTID = T2.INSTRUMENTID
LEFT OUTER JOIN
VDPS2.VTLISTINGIDENT T4
ON T4.INSTRUMENTID = T1.INSTRUMENTID AND T4.LISTINGNO = T1.
LISTINGNO AND T4.SCHEMESYMBOL = 'TKM'
LEFT OUTER JOIN
VDPS2.VTLISTINGIDENT T5
ON T5.INSTRUMENTID = T1.INSTRUMENTID AND T5.LISTINGNO = T1.
LISTINGNO AND T5.SCHEMESYMBOL = 'TKL'
LEFT OUTER JOIN
VDPS2.VTLISTINGIDENT T6
ON T6.INSTRUMENTID = T1.INSTRUMENTID AND T6.LISTINGNO = T1.
LISTINGNO AND T6.SCHEMESYMBOL = 'TKE' ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDS1501 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDS1501 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDS1501 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_SMDS1501 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.IDS_SMDS1501 FOR VDPS2.IDS_SMDS1501 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.IDS_VRSTR114
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.IDS_VRSTR114 AS
SELECT T1.INSTRUMENTID, T1.SYMBOLCH, T1.SYMBOLISIN, T1.SYMBOLUS,
T1.SYMBOLXS, T1.SYMBOLGB, T1.SYMBOLLU, T1.SYMBOLDE,
T1.SYMBOLI2, T1.SYMBOLI1, T1.SYMBOLT1, T1.SYMBOLT2,
T1.SYMBOLCSFI, T1.SYMBOLCSCURR, T1.CATEGORYVDPS,
T1.CATEGORYTKT, T1.CATEGORYEUZS,
T1.INSTRUMENTUPDATETIMESTAMP, T1.INSTRUMENTCREATETIMESTAMP,
T3.INSTRRESTRICTIONNO, T3.RESTRICTIONPERIOD,
T3.PROVIDER1ID, T3.PROVIDER2ID, T3.PROVIDER3ID,
T3.ISRESIDENTLOCATION, T3.ISCITIZENLOCATION,
T3.ISRESTRICTCOUNTRY, T3.ISINSTIRESTRICTION,
T3.ISRESTRICTBYISSUER, T3.RESTRICTLOCATION,
T3.PERIODBEGINDATE, T3.PERIODENDDATE, T3.RESTRMARKETTYPE,
T3.RESTRICTIONTYPE, T3.INSTIRESTRICTTYPE,
T3.RESTRICTPERIUNTP, T3.DESCRIPTION_G, T3.DESCRIPTION_E,
T3.DESCRIPTION_F, T3.DESCRIPTION_I, T3.DESCRIPTION_N,
T3.ISOVERRIDEALLOWED, T3.P42RESTRICTIONTYPE,
T3.REGISTRATIONLIMIT, T3.CREATETIMESTAMP,
T3.UPDATETIMESTAMP, T4.RESTRSUSPENSIONNO,
T4.INSTRRESTRICTIONNO RESTRICTIONNO_SUSP,
T4.PROVIDER1ID PROVIDER1ID_SUSP,
T4.PROVIDER2ID PROVIDER2ID_SUSP,
T4.PROVIDER3ID PROVIDER3ID_SUSP, T4.LOCATION,
T4.PERIODBEGINDATE PERIODBEGINDATE_SUSP,
T4.PERIODENDDATE PERIODENDDATE_SUSP, T4.RESTRICTSUSPENTP,
T4.DESCRIPTION_G DESCRIPTION_G_SUSP,
T4.DESCRIPTION_E DESCRIPTION_E_SUSP,
T4.DESCRIPTION_F DESCRIPTION_F_SUSP,
T4.DESCRIPTION_I DESCRIPTION_I_SUSP,
T4.DESCRIPTION_N DESCRIPTION_N_SUSP, T4.LOCATION_A2,
T4.LOCATION_A3, T4.LOCATION_WS80,
T5.IDSYMBOL RESTRICTLOCATIONISOA2,
T5.VALIDFROMDATE VALIDFROMDATE_ISOA2,
T5.VALIDUNTILDATE VALIDUNTILDATE_ISOA2,
T6.IDSYMBOL RESTRICTLOCATIONISOA3,
T6.VALIDFROMDATE VALIDFROMDATE_ISOA3,
T6.VALIDUNTILDATE VALIDUNTILDATE_ISOA3,
T7.IDSYMBOL RESTRICTLOCATIONISON,
T7.VALIDFROMDATE VALIDFROMDATE_ISON,
T7.VALIDUNTILDATE VALIDUNTILDATE_ISON,
T8.IDSYMBOL RESTRICTLOCATIONTKN,
T8.VALIDFROMDATE VALIDFROMDATE_TKN,
T8.VALIDUNTILDATE VALIDUNTILDATE_TKN,
T9.IDSYMBOL RESTRICTLOCATIONCS,
T9.VALIDFROMDATE VALIDFROMDATE_CS,
T9.VALIDUNTILDATE VALIDUNTILDATE_CS
FROM VDPS2.VTINSTRFLATSYMBOLS T1
INNER JOIN
VDPS2.VTINSTRFLATDATA T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTRRESTRICTION T3
ON T3.INSTRUMENTID = T2.INSTRUMENTID
LEFT OUTER JOIN
VDPS2.VTRESTRICTIONSUSP T4
ON T4.INSTRUMENTID = T3.INSTRUMENTID AND T4.
INSTRRESTRICTIONNO = T3.INSTRRESTRICTIONNO
LEFT OUTER JOIN
VDPS2.VTGEOUNITIDENT T5
ON T5.GEOUNITID = T3.RESTRICTLOCATION AND T5.SCHEMESYMBOL
= 'ISOA2' AND T5.ROWSTATUS = 1
LEFT OUTER JOIN
VDPS2.VTGEOUNITIDENT T6
ON T6.GEOUNITID = T3.RESTRICTLOCATION AND T6.SCHEMESYMBOL
= 'ISOA3' AND T6.ROWSTATUS = 1
LEFT OUTER JOIN
VDPS2.VTGEOUNITIDENT T7
ON T7.GEOUNITID = T3.RESTRICTLOCATION AND T7.SCHEMESYMBOL
= 'ISON' AND T7.ROWSTATUS = 1
LEFT OUTER JOIN
VDPS2.VTGEOUNITIDENT T8
ON T8.GEOUNITID = T3.RESTRICTLOCATION AND T8.SCHEMESYMBOL
= 'TKN' AND T8.ROWSTATUS = 1
LEFT OUTER JOIN
VDPS2.VTGEOUNITIDENT T9
ON T9.GEOUNITID = T3.RESTRICTLOCATION AND T9.SCHEMESYMBOL
= 'CS-WS80-DOM' AND T9.ROWSTATUS = 1 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.IDS_VRSTR114 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VRSTR114 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VRSTR114 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VRSTR114 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.IDS_VRSTR114 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.IDS_VRSTR114 FOR VDPS2.IDS_VRSTR114 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.VVV_IDS_VCFTU106
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.VVV_IDS_VCFTU106 AS
SELECT T1.INSTRUMENTID, T1.SYMBOLCH, T1.SYMBOLISIN, T1.SYMBOLUS,
T1.SYMBOLXS, T1.SYMBOLGB, T1.SYMBOLLU, T1.SYMBOLDE,
T1.SYMBOLI2, T1.SYMBOLI1, T1.SYMBOLT1, T1.SYMBOLT2,
T1.SYMBOLCSFI, T1.SYMBOLCSCURR, T1.CATEGORYVDPS,
T1.CATEGORYTKT, T1.CATEGORYEUZS,
T1.INSTRUMENTUPDATETIMESTAMP, T1.INSTRUMENTCREATETIMESTAMP,
T2.INSTRUMENTEVENTNO, T3.EXDATE, T4.CFAMOUNTTYPE,
T4.PAYAMOUNT, T5.RELEVANTDATE, T6.SYMBOLI2 PAYINSTRUMENT
FROM VDPS2.VTINSTRFLATSYMBOLS T1
INNER JOIN
VDPS2.VTINSTRUMENTEVENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND T2.PROVIDERTYPE =
2
INNER JOIN
VDPS2.VTINSTREVENTEXDATE T3
ON T2.INSTRUMENTID = T3.INSTRUMENTID AND T2.
INSTRUMENTEVENTNO = T3.INSTRUMENTEVENTNO
INNER JOIN
VDPS2.VTCASHFLOWAMOUNT T4
ON T4.INSTRUMENTID = T3.INSTRUMENTID AND T4.
INSTRUMENTEVENTNO = T3.INSTRUMENTEVENTNO AND T4.
CFAMOUNTTYPE IN(10064, 10072)
INNER JOIN
VDPS2.VTCASHFLOWTAXAMT T5
ON T2.INSTRUMENTID = T5.INSTRUMENTID AND T2.
INSTRUMENTEVENTNO = T5.INSTRUMENTEVENTNO AND T5.
RELEVANTDATE >= '20090101'
LEFT OUTER JOIN
VDPS2.VTINSTRFLATSYMBOLS T6
ON T6.INSTRUMENTID = T4.PAYINSTRUMENT
WHERE T2.INSTRUMENTEVENTNO IN(SELECT T7.INSTRUMENTEVENTNO
FROM VDPS2.VTCASHFLOWTAXAMT T7
WHERE
T7.RELEVANTDATE >= '20090101'
AND T7.INSTRUMENTID = T2.
INSTRUMENTID) ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.VVV_IDS_VCFTU106 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_IDS_VCFTU106 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_IDS_VCFTU106 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_IDS_VCFTU106 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_IDS_VCFTU106 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.VVV_IDS_VCFTU106 FOR VDPS2.VVV_IDS_VCFTU106 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.VVV_IDS_VINGP108
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.VVV_IDS_VINGP108 AS
SELECT T1.INSTRUMENTID, T1.ROWSTATUS ROWSTATUS_FLTSYMB,
T1.CSSTATUSTYPE, T1.STATUSTYPE, T1.SYMBOLCH, T1.SYMBOLISIN,
T1.SYMBOLUS, T1.SYMBOLXS, T1.SYMBOLGB, T1.SYMBOLLU,
T1.SYMBOLDE, T1.SYMBOLI2, T1.SYMBOLI1, T1.SYMBOLT1,
T1.SYMBOLT2, T1.SYMBOLCSFI, T1.SYMBOLCSCURR,
T1.CATEGORYVDPS, T1.CATEGORYTKT, T1.CATEGORYEUZS,
T1.INSTRUMENTUPDATETIMESTAMP, T1.INSTRUMENTCREATETIMESTAMP,
T2.PAYFREQUENCY, T2.EXERCISEAMOUNT, T2.PAYAMOUNT,
T2.ISCONVERTBYISSUER, T2.HASVOTINGRIGHTNO,
T2.HASMULTIUNDERLYERS, T2.CSMAINTRADPLACE,
T2.ORIGINALISSUER, T2.ISSUER, T2.UNDERINSTRUMENT,
T2.NOMINALCURR, T2.NOMINALCURR_I1, T2.NOMINALCURR_I2,
T2.NOMINALCURR_WS80, T2.CSRISKCURRENCY, T2.EXERCISECURR,
T2.POOLFACTOR, T2.VOTINGRIGHTNO, T2.OUTSTANDINGCAPITAL,
T2.CSRISKINDIDSYMBOL, T2.CSRISKINDSCHEMESYM, T2.MDYRATING,
T2.SPRATING, T2.PAYMENTDATE, T2.UNITTYPE, T2.CSUNITTYPE,
T2.CSFUNDTYPE, T2.HASWITHHOLDINGTAX, T2.OPTIONSTYLETYPE,
T2.NAME35_G, T2.NAME45_G, T2.SHORTNAME_G, T2.PREPARTICLE_G,
T2.POSTPARTICLE_G, T2.EFFECTIVEDATE, T2.BORROWINGLIMITTYPE,
T3.INSTRINGROUPNO, T3.IDSYMBOL IDSYMBOL_IGK,
T3.SCHEMESYMBOL SCHEMESYMBOL_IGK, T3.QUALITYTYPE,
T3.PROVIDER1ID, T3.PROVIDER2ID, T3.PROVIDER3ID,
T4.INSTRGROUPID, T4.HISTORYID, T4.INSTRGROUPTYPE,
T4.ROWSTATUS, T4.VSTQUALITY, T4.REVISIONNO,
T4.VSTREQUIREDQUALITY, T4.VSTMAXIMUMQUALITY,
T4.HASPENDINGACTVTY, T4.ISRELEVANT, T4.HASFUTUREMESSAGES,
T4.FOTWIZISDISABLED, T4.ISONDB, T4.IDSYMBOL IDSYMBOL_IG,
T4.SCHEMESYMBOL SCHEMESYMBOL_IG, T4.NAME_G, T4.NAME_E,
T4.NAME_F, T4.NAME_I, T4.NAME_N, T4.VSTNAME, T4.VSTVERSION,
T4.CREATEUSERID, T4.UPDATEUSERID, T4.PROVIDER1SYMBOL,
T4.PROVIDER2SYMBOL, T4.PROVIDER3SYMBOL, T4.VALIDUNTILDATE,
T4.VALIDFROMDATE, T4.FOTYPE FOTYPE_IG, T4.DATASTATUSTYPE,
T4.BLOCKINGCODETYPE, T4.LOGICDELETIONTYPE,
T4.MODIFICATIONREASON, T4.REMARKS, T4.DESCRIPTION_G,
T4.DESCRIPTION_E, T4.DESCRIPTION_F, T4.DESCRIPTION_I,
T4.DESCRIPTION_N, T4.DOWRITETOSHADOWTABLES
FROM VDPS2.VTINSTRFLATSYMBOLS T1
INNER JOIN
VDPS2.VTINSTRFLATDATA T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTRINGROUP T3
ON T3.INSTRUMENTID = T2.INSTRUMENTID
INNER JOIN
VDPS2.VTINSTRGROUP T4
ON T4.IDSYMBOL = T3.IDSYMBOL AND T4.SCHEMESYMBOL = T3.
SCHEMESYMBOL ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.VVV_IDS_VINGP108 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_IDS_VINGP108 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_IDS_VINGP108 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_IDS_VINGP108 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.VVV_IDS_VINGP108 FOR VDPS2.VVV_IDS_VINGP108 ;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.VVV_XPS_IL#VLIID_V01
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.VVV_XPS_IL#VLIID_V01 AS
SELECT CHAR(T1.IDSYMBOL, 9) AS VALORNR,
CHAR(T8.IDSYMBOL, 4) AS CURRENCY_CS, T3.LISTINGSTATUSTYPE,
T3.TRADINGSTATUSTYPE, T3.ISHOMETRADINGPLACE,
CHAR(T4.IDSYMBOL, 4) AS IDSYMBOL_BCN,
CHAR(T5.DOMICILE_WS80, 3) AS DOMICILE_CS,
T7.ISSTEERINGFLAG4 AS CS_HAUPTBOEPLATZ,
T3.ISMAINTRADINGPLACE AS TK_HAUPTBOEPLATZ,
T3.ISCSBESTVENUEOVERALL, T3.ISCSBESTVENUEPERCURR,
CHAR(T6.SCHEMESYMBOL, 3) AS SCHEME_TICKER,
SUBSTR(T6.IDSYMBOL, 1, 30) AS IDSYMBOL_TICKER,
T3.DESCRIPTION_E AS EXTERNTRADINGCURR
FROM VDPS2.VTINSTRIDENT T1
INNER JOIN
VDPS2.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2) AND T2.CSSTATUSTYPE BETWEEN 4
AND 9
INNER JOIN
VDPS2.VTLISTING T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPS2.VTINSTIIDENT T4
ON T4.INSTITUTIONID = T3.TRADINGPLACE AND T4.SCHEMESYMBOL
= 'BCN' AND T4.ROWSTATUS = 1
INNER JOIN
VDPS2.VTINSTITUTION T5
ON T5.INSTITUTIONID = T3.TRADINGPLACE AND (T5.ROWSTATUS IS
NULL OR T5.ROWSTATUS <> 2)
LEFT OUTER JOIN
VDPS2.VTLISTINGIDENT T6
ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
LISTINGNO AND T6.SCHEMESYMBOL IN('TKH', 'RIC', 'BBI', 'TKE')
LEFT OUTER JOIN
VDPS2.CTLISTING T7
ON T7.INSTRUMENTID = T3.INSTRUMENTID AND T7.LISTINGNO = T3.
LISTINGNO AND T7.MANDATOR = 1
LEFT OUTER JOIN
VDPS2.VTINSTRIDENT T8
ON T8.INSTRUMENTID = T3.CURRENCY AND T8.SCHEMESYMBOL =
'CS-WS80-WHRG' AND T8.ROWSTATUS = 1
WHERE T1.SCHEMESYMBOL = 'CH'
AND T1.ROWSTATUS = 1
AND (T3.LISTINGSTATUSTYPE IN(1, 4, 13, 17, 21)
OR T7.ISSTEERINGFLAG4 = 1) ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_IL#VLIID_V01 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_IL#VLIID_V01 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_IL#VLIID_V01 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_IL#VLIID_V01 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_IL#VLIID_V01 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_IL#VLIID_V01 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_IL#VLIID_V01 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.VVV_XPS_IL#VLIID_V01 FOR VDPS2.VVV_XPS_IL#VLIID_V01
;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.VVV_XPS_VINDE007_V01
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.VVV_XPS_VINDE007_V01 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T1.INSTRUMENTID,
T3.CREATETIMESTAMP, T3.UPDATETIMESTAMP,
T3.ISCSMIFIDCOMPLEX, T3.CSPRODUCTCATEGORY
FROM VDPS2.VTINSTRIDENT T1
INNER JOIN
VDPS2.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPS2.CTINSTRDETAILS T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
WHERE T1.ROWSTATUS = 1 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_VINDE007_V01 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_VINDE007_V01 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_VINDE007_V01 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.VVV_XPS_VINDE007_V01 FOR VDPS2.VVV_XPS_VINDE007_V01
;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=VDPS2.VVV_XPS_VLIID002_V07
------------------------------------------------------------------------
--
SET CURRENT SQLID='VDPS2';
--
--
CREATE VIEW VDPS2.VVV_XPS_VLIID002_V07 AS
SELECT T1.IDSYMBOL, T1.SCHEMESYMBOL, T1.INSTRUMENTID,
T3.CREATETIMESTAMP, T3.UPDATETIMESTAMP, T3.LISTINGNO,
T6.LISTINGIDENTNO, T3.LISTINGSTATUSTYPE,
T3.TRADINGSTATUSTYPE, T3.FIRSTTRADINGDATE,
T3.LASTTRADINGDATE, T3.ISHOMETRADINGPLACE,
T3.ISMAINTRADINGPLACE TK_HAUPTBOEPLATZ,
T7.ISSTEERINGFLAG4 CS_HAUPTBOEPLATZ,
T3.ISCSBESTVENUEOVERALL, T3.ISCSBESTVENUEPERCURR,
T3.TRADINGPLACE, T3.CURRENCY, T8.IDSYMBOL CURRENCY_CS,
T4.IDSYMBOL IDSYMBOL_BCN, T5.DOMICILE,
T5.DOMICILE_WS80 DOMICILE_CS,
T6.SCHEMESYMBOL SCHEME_TICKER, T6.IDSYMBOL IDSYMBOL_TICKER,
T6.VALIDFROMDATE, T6.VALIDUNTILDATE,
T3.DESCRIPTION_E EXTERNTRADINGCURR
FROM VDPS2.VTINSTRIDENT T1
INNER JOIN
VDPS2.VTINSTRUMENT T2
ON T2.INSTRUMENTID = T1.INSTRUMENTID AND (T2.ROWSTATUS IS
NULL OR T2.ROWSTATUS <> 2)
INNER JOIN
VDPS2.VTLISTING T3
ON T3.INSTRUMENTID = T1.INSTRUMENTID
LEFT OUTER JOIN
VDPS2.VTINSTIIDENT T4
ON T4.INSTITUTIONID = T3.TRADINGPLACE AND T4.SCHEMESYMBOL
= 'BCN' AND T4.ROWSTATUS = 1
INNER JOIN
VDPS2.VTINSTITUTION T5
ON T5.INSTITUTIONID = T3.TRADINGPLACE AND (T5.ROWSTATUS IS
NULL OR T5.ROWSTATUS <> 2)
LEFT OUTER JOIN
VDPS2.VTLISTINGIDENT T6
ON T6.INSTRUMENTID = T3.INSTRUMENTID AND T6.LISTINGNO = T3.
LISTINGNO AND T6.SCHEMESYMBOL IN('TKH', 'RIC', 'BBI', 'TKE')
LEFT OUTER JOIN
VDPS2.CTLISTING T7
ON T7.INSTRUMENTID = T3.INSTRUMENTID AND T7.LISTINGNO = T3.
LISTINGNO AND T7.MANDATOR = 1
LEFT OUTER JOIN
VDPS2.VTINSTRIDENT T8
ON T8.INSTRUMENTID = T3.CURRENCY AND T8.SCHEMESYMBOL =
'CS-WS80-WHRG' AND T8.ROWSTATUS = 1
WHERE T1.ROWSTATUS = 1
AND T3.LISTINGSTATUSTYPE <> 9
AND T3.LISTINGSTATUSTYPE <> 18 ;
--
SET CURRENT SQLID='S100447';
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_VLIID002_V07 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_VLIID002_V07 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_VLIID002_V07 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_VLIID002_V07 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_VLIID002_V07 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_VLIID002_V07 TO VDPS2;
--
GRANT SELECT ON TABLE VDPS2.VVV_XPS_VLIID002_V07 TO VDPS2;
--
SET CURRENT SQLID='VDPS';
--
CREATE ALIAS VDPS.VVV_XPS_VLIID002_V07 FOR VDPS2.VVV_XPS_VLIID002_V07
;
--
COMMIT;
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL --
------------------------------------------------------------------------
--
}¢--- DSN.TX.CASE(WK922IGN) cre=2009-09-07 mod=2009-09-07-15.48.09 A540769 -----
SPACE
STORAGE
SYSDATABASE:CREATOR
SYSDATATYPES:OWNER,OWNERTYPE
SYSINDEXES:PIECESIZE,OWNER,OWNERTYPE
SYSINDEXPART:PQTY,SQTY
SYSPACKAGE:OWNER,OWNERTYPE
SYSPARMS:OWNER,OWNERTYPE
SYSROUTINES:OWNER,OWNERTYPE
SYSSEQUENCES:OWNER,OWNERTYPE
SYSTABLEPART:PQTY,SQTY,COMPRESS
SYSTABLES:CLUSTERTYPE,OWNER,OWNERTYPE
SYSTABLESPACE:CREATOR,LOCKRULE,LOCKMAX,TYPE,DSSIZE
SYSTRIGGERS:OWNER,OWNERTYPE,OWNER,OWNERTYPE
SYSVIEWS:OWNER,OWNERTYPE
}¢--- DSN.TX.CASE(WK922MAS) cre=2009-09-07 mod=2009-09-07-15.36.44 A540769 -----
COMPRESS:*.*,YES 00010000
SEGSIZE:*.*,64 00020000
DEFER:*,YES 00030000
AUTHID:VDPSX,VDPS2 00040000
OWNER:VDPSY,VDPS 00050000
OWNER:VDPSZ,S107189 00060000
OWNER:GDB0367,NM01A 00070000
OWNER:BUAX,BUA 00080000
OWNER:GDB0449,OA1P 00090000
OWNER:GDBX*,OA1A24 00100000
OWNER:GDBW*,OA1A23 00110000
OWNER:GDBV*,OA1A22 00120000
OWNER:GDBU*,OA1A21 00130000
OWNER:GDBT*,OA1A20 00140000
OWNER:GDBS*,OA1A19 00150000
OWNER:GDBR*,OA1A18 00160000
OWNER:GDBQ*,OA1A17 00170000
OWNER:GDBP*,OA1A16 00180000
OWNER:GDBO*,OA1A15 00190000
OWNER:GDBN*,OA1A14 00200000
OWNER:GDBM*,OA1A13 00210000
OWNER:GDBL*,OA1A12 00220000
OWNER:GDBK*,OA1A11 00230000
OWNER:GDBJ*,OA1A10 00240000
OWNER:GDBI*,OA1A09 00250000
OWNER:GDBH*,OA1A08 00260000
OWNER:GDBG*,OA1A07 00270000
OWNER:GDBF*,OA1A06 00280000
OWNER:GDBE*,OA1A05 00290000
OWNER:GDBD*,OA1A04 00300000
OWNER:GDBC*,OA1A03 00310000
OWNER:GDBB*,OA1A02 00320000
OWNER:GDBA*,OA1A01 00330000
OWNER:OA1X24,OA1A24 00340000
OWNER:OA1X23,OA1A23 00350000
OWNER:OA1X22,OA1A22 00360000
OWNER:OA1X21,OA1A21 00370000
OWNER:OA1X20,OA1A20 00380000
OWNER:OA1X19,OA1A19 00390000
OWNER:OA1X18,OA1A18 00400000
OWNER:OA1X17,OA1A17 00410000
OWNER:OA1X16,OA1A16 00420000
OWNER:OA1X15,OA1A15 00430000
OWNER:OA1X14,OA1A14 00440000
OWNER:OA1X13,OA1A13 00450000
OWNER:OA1X12,OA1A12 00460000
OWNER:OA1X11,OA1A11 00470000
OWNER:OA1X10,OA1A10 00480000
OWNER:OA1X09,OA1A09 00490000
OWNER:OA1X08,OA1A08 00500000
OWNER:OA1X07,OA1A07 00510000
OWNER:OA1X06,OA1A06 00520000
OWNER:OA1X05,OA1A05 00530000
OWNER:OA1X04,OA1A04 00540000
OWNER:OA1X03,OA1A03 00550000
OWNER:OA1X02,OA1A02 00560000
OWNER:OA1X01,OA1A01 00570000
AUTHID:VDPS*,VDPS* 00580000
AUTHID:SYS*,SYS* 00590000
AUTHID:A*,OA1A 00600000
AUTHID:F*,OA1A 00610000
AUTHID:G*,OA1A 00620000
OWNER:OA1X,OA1A 00630000
SGNAME:*,GSMS 00640000
SCHEMA:GDB*,OA1A 00650000
TSNAME:TSWI*,A*A 00660000
TSNAME:TGR*A2,A*A 00670000
TSNAME:SWB*,A*A 00680000
TSNAME:SSA*,A*A 00690000
TSNAME:SRT*,A*A 00700000
TSNAME:SH*A,A*H 00710000
TSNAME:SCD*,A*A 00720000
TSNAME:SBP*,A*A 00730000
TSNAME:SAT*,A*A 00740000
TSNAME:S*K,A*K 00750000
TSNAME:S*H,A*H 00760000
TSNAME:S*H,K*H 00770000
TSNAME:S*A1,A*A 00780000
TSNAME:S*A,A*A 00790000
TSNAME:SX*,SX* 00800000
TSNAME:S*,A* 00810000
TSNAME:P*A,A*P 00820000
TSNAME:K*A,A*K 00830000
TSNAME:H*A,A*H 00840000
TSNAME:AGR*A2,A*A 00850000
IXBPNAME:*,BP1 00860000
BPNAME:BP32*,BP32K 00870000
BPNAME:BP16K*,BP16K1 00880000
BPNAME:BP8K*,BP8K1 00890000
TSBPNAME:*,BP2 00900000
DBNAME:DA267167,DB2ADMIN 00910000
DBNAME:DF411012,DB2ADMIN 00920000
DBNAME:DGDB0008,NG01A1A 00930000
DBNAME:DGDB0015,DG01A1A 00940000
DBNAME:DGDB0132,ZV02A1A 00950000
DBNAME:DGDB0031,NG02A1A 00960000
DBNAME:DGDB0035,NG06A1A 00970000
DBNAME:DGDB0039,CE01A1A 00980000
DBNAME:DGDB0052,SM01A1A 00990000
DBNAME:DGDB0057,RP01A1A 01000000
DBNAME:DGDB0058,RP02A1A 01010000
DBNAME:DGDB0059,RP03A1A 01020000
DBNAME:DGDB0060,EX01A1A 01030000
DBNAME:DGDB0062,RP04A1A 01040000
DBNAME:DGDB0065,BP01A1A 01050000
DBNAME:DGDB0067,RM01A1A 01060000
DBNAME:DGDB0072,CE02A1A 01070000
DBNAME:DGDB0078,LW01A1A 01080000
DBNAME:DGDB0080,SF01A1A 01090000
DBNAME:DGDB0082,OE02A1A 01100000
DBNAME:DGDB0084,CZ01A1A 01110000
DBNAME:DGDB0086,KS08A1A 01120000
DBNAME:DGDB0088,DI01A1A 01130000
DBNAME:DGDB0089,DI02A1A 01140000
DBNAME:DGDB0090,DI03A1A 01150000
DBNAME:DGDB0091,DI04A1A 01160000
DBNAME:DGDB0094,FF01A1A 01170000
DBNAME:DGDB0103,PR01A1A 01180000
DBNAME:DGDB0104,BG01A1A 01190000
DBNAME:DGDB0106,CD02A1A 01200000
DBNAME:DGDB0110,SV05A1A 01210000
DBNAME:DGDB0112,WI02A1A 01220000
DBNAME:DGDB0113,NZ01A1A 01230000
DBNAME:DGDB0120,WB12A1A 01240000
DBNAME:DGDB0121,PB01A1A 01250000
DBNAME:DGDB0122,DP01A1A 01260000
DBNAME:DGDB0123,RR01A1A 01270000
DBNAME:DGDB0125,TP01A1A 01280000
DBNAME:DGDB0130,NO01A1A 01290000
DBNAME:DGDB0133,CZ03A1A 01300000
DBNAME:DGDB0134,DA234579 01310000
DBNAME:DGDB0135,WB01A1A 01320000
DBNAME:DGDB0136,CD01A1A 01330000
DBNAME:DGDB0137,CD03A1A 01340000
DBNAME:DGDB0139,JM01A1A 01350000
DBNAME:DGDB0140,LC02A1A 01360000
DBNAME:DGDB0141,PV01A1A 01370000
DBNAME:DGDB0142,VD01A1A 01380000
DBNAME:DGDB0143,VP02A1A 01390000
DBNAME:DGDB0150,WF01A1A 01400000
DBNAME:DGDB0151,WN01A1A 01410000
DBNAME:DGDB0153,WM01A1A 01420000
DBNAME:DGDB0154,EF01A1A 01430000
DBNAME:DGDB0155,VK02A1A 01440000
DBNAME:DGDB0156,CZ04A1A 01450000
DBNAME:DGDB0162,LG01A1A 01460000
DBNAME:DGDB0166,SX01A1A 01470000
DBNAME:DGDB0167,EQ01A1A 01480000
DBNAME:DGDB0168,WN02A1A 01490000
DBNAME:DGDB0169,ED02A1A 01500000
DBNAME:DGDB0171,NJ01A1A 01510000
DBNAME:DGDB0173,PW01A1A 01520000
DBNAME:DGDB0174,LW02A1A 01530000
DBNAME:DGDB0175,CZ05A1A 01540000
DBNAME:DGDB0177,SW01A1A 01550000
DBNAME:DGDB0178,NF01A1A 01560000
DBNAME:DGDB0179,WP02A1A 01570000
DBNAME:DGDB0180,VP01A1A 01580000
DBNAME:DGDB0181,SV06A1A 01590000
DBNAME:DGDB0182,CZ06A1A 01600000
DBNAME:DGDB0183,WA01A1A 01610000
DBNAME:DGDB0185,PQ01A1A 01620000
DBNAME:DGDB0186,NZ05A1A 01630000
DBNAME:DGDB0187,OO01A1A 01640000
DBNAME:DGDB0189,WF01A1A 01650000
DBNAME:DGDB0192,DG02A1A 01660000
DBNAME:DGDB0193,EK01A1A 01670000
DBNAME:DGDB0194,CZ07A1A 01680000
DBNAME:DGDB0195,WV01A1A 01690000
DBNAME:DGDB0196,CZ08A1A 01700000
DBNAME:DGDB0200,CZ11G1A 01710000
DBNAME:DGDB0201,CZ01G1A 01720000
DBNAME:DGDB0202,CZ03G1A 01730000
DBNAME:DGDB0203,CZ08G1A 01740000
DBNAME:DGDB0204,RT03A1A 01750000
DBNAME:DGDB0205,CZ07G1A 01760000
DBNAME:DGDB0206,KS04A1A 01770000
DBNAME:DGDB0207,NL01A1A 01780000
DBNAME:DGDB0209,WV10A1A 01790000
DBNAME:DGDB0211,ID01A1A 01800000
DBNAME:DGDB0212,SV09A1A 01810000
DBNAME:DGDB0213,KS09A1A 01820000
DBNAME:DGDB0215,PI01A1A 01830000
DBNAME:DGDB0216,AX01A1A 01840000
DBNAME:DGDB0217,UU02A1A 01850000
DBNAME:DGDB0218,TR01A1A 01860000
DBNAME:DGDB0220,CM01A1A 01870000
DBNAME:DGDB0222,CM02A1A 01880000
DBNAME:DGDB0223,WP08A1A 01890000
DBNAME:DGDB0224,SV07A1A 01900000
DBNAME:DGDB0226,CZ20A1A 01910000
DBNAME:DGDB0228,CZ10A1A 01920000
DBNAME:DGDB0230,CZ21A1A 01930000
DBNAME:DGDB0231,GA01A1A 01940000
DBNAME:DGDB0232,QM01A1A 01950000
DBNAME:DGDB0234,PT02A1A 01960000
DBNAME:DGDB0235,HY01A1A 01970000
DBNAME:DGDB0236,MC01A1A 01980000
DBNAME:DGDB0237,NI02A1A 01990000
DBNAME:DGDB0238,PV02A1A 02000000
DBNAME:DGDB0239,WL09A1A 02010000
DBNAME:DGDB0241,KC01A1A 02020000
DBNAME:DGDB0242,MB01A1A 02030000
DBNAME:DGDB0243,ST01A1A 02040000
DBNAME:DGDB0244,EK03A1A 02050000
DBNAME:DGDB0246,EV01A1A 02060000
DBNAME:DGDB0247,WU10A1A 02070000
DBNAME:DGDB0248,WU90A1A 02080000
DBNAME:DGDB0255,WU20A1A 02090000
DBNAME:DGDB0256,DE01A1A 02100000
DBNAME:DGDB0257,DE02A1A 02110000
DBNAME:DGDB0258,DE03A1A 02120000
DBNAME:DGDB0259,DE04A1A 02130000
DBNAME:DGDB0260,DE05A1A 02140000
DBNAME:DGDB0261,DE06A1A 02150000
DBNAME:DGDB0262,DE07A1A 02160000
DBNAME:DGDB0263,VP03A1A 02170000
DBNAME:DGDB0264,SA01A1A 02180000
DBNAME:DGDB0265,SA02A1A 02190000
DBNAME:DGDB0266,SA03A1A 02200000
DBNAME:DGDB0268,SA05A1A 02210000
DBNAME:DGDB0269,SA06A1A 02220000
DBNAME:DGDB0270,GR05A1A 02230000
DBNAME:DGDB0272,VP02H1A 02240000
DBNAME:DGDB0273,WU30A1A 02250000
DBNAME:DGDB0274,KX01A1A 02260000
DBNAME:DGDB0275,CK01A1A 02270000
DBNAME:DGDB0276,BP02A1A 02280000
DBNAME:DGDB0277,AM01A1A 02290000
DBNAME:DGDB0281,NB01A1A 02300000
DBNAME:DGDB0282,RI01A1A 02310000
DBNAME:DGDB0283,NZ06A1A 02320000
DBNAME:DGDB0284,TR02A1A 02330000
DBNAME:DGDB0285,TR03A1A 02340000
DBNAME:DGDB0286,DM40A1A 02350000
DBNAME:DGDB0287,CY02A1A 02360000
DBNAME:DGDB0288,CW01A1A 02370000
DBNAME:DGDB0289,EF02A1A 02380000
DBNAME:DGDB0290,BE01A1A 02390000
DBNAME:DGDB0291,SA07A1A 02400000
DBNAME:DGDB0292,WU40A1A 02410000
DBNAME:DGDB0293,RT41A1A 02420000
DBNAME:DGDB0295,IT01A1A 02430000
DBNAME:DGDB0296,SV40A1A 02440000
DBNAME:DGDB0297,WV80A1A 02450000
DBNAME:DGDB0300,RF01A1A 02460000
DBNAME:DGDB0308,UU03A1A 02470000
DBNAME:DGDB0309,KS02A1A 02480000
DBNAME:DGDB0310,KS05A1A 02490000
DBNAME:DGDB0311,KS06A1A 02500000
DBNAME:DGDB0312,KS07A1A 02510000
DBNAME:DGDB0313,KS11A1A 02520000
DBNAME:DGDB0315,BE03A1A 02530000
DBNAME:DGDB0316,EF03A1A 02540000
DBNAME:DGDB0317,DP02A1A 02550000
DBNAME:DGDB0319,BJ02A1A 02560000
DBNAME:DGDB0320,BJA10004 02570000
DBNAME:DGDB0321,KS01A1A 02580000
DBNAME:DGDB0322,NF02A1A 02590000
DBNAME:DGDB0323,NF03A1A 02600000
DBNAME:DGDB0324,NF08A1A 02610000
DBNAME:DGDB0325,EF04A1A 02620000
DBNAME:DGDB0326,IT02A1A 02630000
DBNAME:DGDB0327,DP03A1A 02640000
DBNAME:DGDB0328,DP04A1A 02650000
DBNAME:DGDB0329,NT21A1A 02660000
DBNAME:DGDB0330,WP04A1A 02670000
DBNAME:DGDB0331,UU04A1A 02680000
DBNAME:DGDB0332,EQ02A1A 02690000
DBNAME:DGDB0334,SE02A1A 02700000
DBNAME:DGDB0336,DP05A1A 02710000
DBNAME:DGDB0337,DP06A1A 02720000
DBNAME:DGDB0338,CW10A1A 02730000
DBNAME:DGDB0339,WP01A1A 02740000
DBNAME:DGDB0340,WP03A1A 02750000
DBNAME:DGDB0341,WP09A1A 02760000
DBNAME:DGDB0342,CZ02A1A 02770000
DBNAME:DGDB0343,CZ09A1A 02780000
DBNAME:DGDB0344,CZ11G1A 02790000
DBNAME:DGDB0346,AN01A1A 02800000
DBNAME:DGDB0348,EQ03A1A 02810000
DBNAME:DGDB0349,NZ07A1A 02820000
DBNAME:DGDB0350,AV03A1A 02830000
DBNAME:DGDB0351,FI04A1A 02840000
DBNAME:DGDB0352,PR02A1A 02850000
DBNAME:DGDB0354,WQ01A1A 02860000
DBNAME:DGDB0358,SV10A1A 02870000
DBNAME:DGDB0359,PC01A1A 02880000
DBNAME:DGDB0360,PC02A1A 02890000
DBNAME:DGDB0361,DP07A1A 02900000
DBNAME:DGDB0362,SU01A1P 02910000
DBNAME:DGDB0363,VV01A1A 02920000
DBNAME:DGDB0365,BX01A1A 02930000
DBNAME:DGDB0366,HY01G1A 02940000
DBNAME:DGDB0367,NM01A1A 02950000
DBNAME:DGDB0368,CE03A1A 02960000
DBNAME:DGDB0369,IT03A1A 02970000
DBNAME:DGDB0370,SA08A1A 02980000
DBNAME:DGDB0371,DB01A1A 02990000
DBNAME:DGDB0373,WU50A1A 03000000
DBNAME:DGDB0374,TN01A1A 03010000
DBNAME:DGDB0375,BF03A1A 03020000
DBNAME:DGDB0376,VV20A1A 03030000
DBNAME:DGDB0378,IT04A1A 03040000
DBNAME:DGDB0379,KK01A1A 03050000
DBNAME:DGDB0380,SB01A1A 03060000
DBNAME:DGDB0381,SV02B1A 03070000
DBNAME:DGDB0383,SV40B1A 03080000
DBNAME:DGDB0384,WY10A1A 03090000
DBNAME:DGDB0385,WY20A1A 03100000
DBNAME:DGDB0386,WY30A1A 03110000
DBNAME:DGDB0387,WY40A1A 03120000
DBNAME:DGDB0388,WB**A1A 03130000
DBNAME:DGDB0389,MF01A1A 03140000
DBNAME:DGDB0390,CZ13A1A 03150000
DBNAME:DGDB0391,CZ13G1A 03160000
DBNAME:DGDB0392,CW30A1A 03170000
DBNAME:DGDB0394,EG01A1A 03180000
DBNAME:DGDB0395,SN01A1A 03190000
DBNAME:DGDB0396,DI05A1A 03200000
DBNAME:DGDB0399,NZ08A1A 03210000
DBNAME:DGDB0400,AU02A1A 03220000
DBNAME:DGDB0401,MF02A1A 03230000
DBNAME:DGDB0402,XC01A1A 03240000
DBNAME:DGDB0403,SV50A1A 03250000
DBNAME:DGDB0404,NZ03A1A 03260000
DBNAME:DGDB0405,NZ02A1A 03270000
DBNAME:DGDB0406,NZ04A1A 03280000
DBNAME:DGDB0407,PL01A1A 03290000
DBNAME:DGDB0416,CZ14A1A 03300000
DBNAME:DGDB0417,CZ14G1A 03310000
DBNAME:DGDB0418,FZ01A1A 03320000
DBNAME:DGDB0419,XC02A1A 03330000
DBNAME:DGDB0420,KB01A1A 03340000
DBNAME:DGDB0421,MF03A1A 03350000
DBNAME:DGDB0422,AV05A1A 03360000
DBNAME:DGDB0423,FZ02A1A 03370000
DBNAME:DGDB0424,HB01A1A 03380000
DBNAME:DGDB0426,TO01A1A 03390000
DBNAME:DGDB0427,AV06A1A 03400000
DBNAME:DGDB0428,AV07A1A 03410000
DBNAME:DGDB0429,AV08A1A 03420000
DBNAME:DGDB0430,AV09A1A 03430000
DBNAME:DGDB0431,PC11A1A 03440000
DBNAME:DGDB0432,PC12A1A 03450000
DBNAME:DGDB0433,PC13A1A 03460000
DBNAME:DGDB0434,PC14A1A 03470000
DBNAME:DGDB0435,PC15A1A 03480000
DBNAME:DGDB0436,PC16A1A 03490000
DBNAME:DGDB0439,ER01A1A 03500000
DBNAME:DGDB0441,MC02A1A 03510000
DBNAME:DGDB0442,MC03A1A 03520000
DBNAME:DGDB0443,WU60A1A 03530000
DBNAME:DGDB0444,PO01A1A 03540000
DBNAME:DGDB0445,AV04A1A 03550000
DBNAME:DGDB0446,RB01A1A 03560000
DBNAME:DGDB0448,ZV01A1A 03570000
DBNAME:DGDB0449,PP01A1P 03580000
DBNAME:DGDB0450,CW70A1A 03590000
DBNAME:DGDB0451,CZ03M1A 03600000
DBNAME:DGDB0452,EG02A1A 03610000
DBNAME:DGDB0453,RC99A1A 03620000
DBNAME:DGDB0454,DT01A1A 03630000
DBNAME:DGDB0455,DT02A1A 03640000
DBNAME:DGDB0456,DT03A1A 03650000
DBNAME:DGDB0457,DT04A1A 03660000
DBNAME:DGDB0459,MT01A1A 03670000
DBNAME:DGDB0460,PC17A1A 03680000
DBNAME:DGDB0461,AV10A1A 03690000
DBNAME:DGDB0462,AV11A1A 03700000
DBNAME:DGDB0463,MF04A1A 03710000
DBNAME:DGDB0464,VV29A1A 03720000
DBNAME:DGDB0465,AV02A1A 03730000
DBNAME:DGDB0466,NG03A1A 03740000
DBNAME:DGDB0467,MI01A1A 03750000
DBNAME:DGDB0468,UI01A1A 03760000
DBNAME:DGDB0470,BQ01A1A 03770000
DBNAME:DGDB0471,ED05A1A 03780000
DBNAME:DGDB0472,XR01A1A 03790000
DBNAME:DGDB0473,DW10A1A 03800000
DBNAME:DGDB0474,CZ18A1A 03810000
DBNAME:DGDB0475,MF05A1A 03820000
DBNAME:DGDB0476,DC01A1A 03830000
DBNAME:DGDB0477,VV51A1A 03840000
DBNAME:DGDB0478,CT01G1A 03850000
DBNAME:DGDB0479,CT02A1A 03860000
DBNAME:DGDB0480,WI03A1A 03870000
DBNAME:DGDB0481,CE04A1A 03880000
DBNAME:DGDB0482,PV03A1A 03890000
DBNAME:DGDB0483,OV01A1A 03900000
DBNAME:DGDB0484,KD01A1A 03910000
DBNAME:DGDB0485,WI01A1A 03920000
DBNAME:DGDB0486,NI10A1A 03930000
DBNAME:DGDB0487,AV12A1A 03940000
DBNAME:DGDB0488,AV13A1A 03950000
DBNAME:DGDB0489,AV14A1A 03960000
DBNAME:DGDB0490,AV15A1A 03970000
DBNAME:DGDB0491,MA01A1A 03980000
DBNAME:DGDB0492,MA02A1A 03990000
DBNAME:DGDB0493,MA03A1A 04000000
DBNAME:DGDB0494,EF05A1A 04010000
DBNAME:DGDB0495,PC18A1A 04020000
DBNAME:DGDB0496,PC19A1A 04030000
DBNAME:DGDB0497,PC20A1A 04040000
DBNAME:DGDB0498,PC21A1A 04050000
DBNAME:DGDB0499,SV70A1A 04060000
DBNAME:DGDB0500,RV01A1A 04070000
DBNAME:DGDB0501,AU04A1A 04080000
DBNAME:DGDB0502,SA09A1A 04090000
DBNAME:DGDB0503,FI99A1A 04100000
DBNAME:DGDB0505,RC02A1A 04110000
DBNAME:DGDB0506,XXXXXXX 04120000
DBNAME:DGDB0507,CT01G1Z 04130000
DBNAME:DGDB0508,CT02A1Z 04140000
DBNAME:DGDB0509,DI06A1A 04150000
DBNAME:DGDB0511,EU01A1A 04160000
DBNAME:DGDB0512,RV02A1A 04170000
DBNAME:DGDB0514,DP08A1A 04180000
DBNAME:DGDB0515,RS01A1A 04190000
DBNAME:DGDB0516,SV90A1A 04200000
DBNAME:DGDB0518,BU01A1A 04210000
DBNAME:DGDB0637,JR01A1A 04220000
DBNAME:DGDB0672,AV16A1A 04230000
DBNAME:DGDB0995,XY05A1A 04240000
DBNAME:DGDB0996,XY04A1A 04250000
DBNAME:DGDB0997,XY03A1A 04260000
DBNAME:DGDB0998,XY02A1A 04270000
DBNAME:DGDB0999,XY01A1A 04280000
DBNAME:DGDB9998,DF540769 04290000
DBNAME:DGOCB130,RE01A1A 04300000
DBNAME:DGOCF101,NF01A1A 04310000
DBNAME:DGOCF102,BJ01A1A 04320000
DBNAME:DGOCK310,VT01A1A 04330000
DBNAME:DGODT530,OD01A1A 04340000
DBNAME:DGOKB701,CT01A1A 04350000
DBNAME:DGOKC330,RR02A1A 04360000
DBNAME:DGOWA200,WB11A1A 04370000
DBNAME:DGOWA542,AV01A1A 04380000
DBNAME:DGOWA600,WB03A1A 04390000
DBNAME:DGOWB420,GM01A1A 04400000
DBNAME:DGOWD501,SV01A1A 04410000
DBNAME:DGOWD502,SV02A1A 04420000
DBNAME:DGOWD503,SV03A1A 04430000
DBNAME:DGOWD600,FI02A1A 04440000
DBNAME:DGOWD700,VV02A1A 04450000
DBNAME:DGOWM200,WD01A1A 04460000
DBNAME:DGOWM301,WL07A1A 04470000
DBNAME:VV21A1X,VV21A1A 04480000
DBNAME:VV22A1X,VV22A1A 04490000
DBNAME:VV23A1X,VV23A1A 04500000
DBNAME:VV24A1X,VV24A1A 04510000
DBNAME:VV25A1X,VV25A1A 04520000
DBNAME:VV26A1X,VV26A1A 04530000
DBNAME:VV27A1X,VV27A1A 04540000
DBNAME:VV28A1X,VV28A1A 04550000
DBNAME:VV29A1X,VV29A1A 04560000
DBNAME:DXB03A1X,DXB03 04570000
DBNAME:DXB04A1X,DXB04 04580000
DBNAME:DXB05A1X,DXB05 04590000
DBNAME:DXB07A1X,DXB07 04600000
DBNAME:AV01A1X,AV01A1A 04610000
DBNAME:AV02A1X,AV02A1A 04620000
DBNAME:AV03A1X,AV03A1A 04630000
DBNAME:AV04A1X,AV04A1A 04640000
DBNAME:AV05A1X,AV05A1A 04650000
DBNAME:AV06A1X,AV06A1A 04660000
DBNAME:AV07A1X,AV07A1A 04670000
DBNAME:AV08A1X,AV08A1A 04680000
DBNAME:AV09A1X,AV09A1A 04690000
DBNAME:AV10A1X,AV10A1A 04700000
DBNAME:AV11A1X,AV11A1A 04710000
DBNAME:AV12A1X,AV12A1A 04720000
DBNAME:AV13A1X,AV13A1A 04730000
DBNAME:AV14A1X,AV14A1A 04740000
DBNAME:AV15A1X,AV15A1A 04750000
DBNAME:AV16A1X,AV16A1A 04760000
DBNAME:RG01A1X,RG01A1A 04770000
DBNAME:SV30A1X,SV30A1A 04780000
DBNAME:SV31A1X,SV31A1A 04790000
DBNAME:WG01A1X,WG01A1A 04800000
DBNAME:ED06A1X,ED06A1A 04810000
}¢--- DSN.TX.CASE(WK923) cre=2009-09-07 mod=2010-02-17-07.42.30 A540769 --------
=DQ0G=1
creDb src 1
+ ok creDb A540769.TX.GENF(WK923s1) ::f
}¢--- DSN.TX.CASE(WK923A) cre=2009-09-07 mod=2010-11-19-18.04.52 A540769 -------
=DQ0G=1
creDb src 2
+ ok creDb A540769.TX.GENF(WK923s2) ::f
creDb trg 1
+ ok creDb A540769.TX.GENF(WK923t1) ::f
* dbx c dgdb9998.A923A, mask=wk923Mas, ign=wk923ign
manual check create view mit create oder ohne Punkt
+ wait check create view mit create oder ohne Punkt
}¢--- DSN.TX.CASE(WK923B) cre=2009-09-08 mod=2010-08-06-12.48.28 A540769 -------
=DQ0G=1
creDb trg 1
+ ok creDb A540769.TX.GENF(WK923t1) ::f
creDb src 2
+ ok creDb A540769.TX.GENF(WK923s2) ::f
* dbx c dgdb9998.A923A, mask=WK923Mas, ign=dbaEmpty
* objectCompare der VersionFiles --> Wsl
* clone Wsl
manual check: keine abend im sysout, kein rc=0, WSL created
+ wait check: keine abend im sysout, kein rc=0, WSL created
}¢--- DSN.TX.CASE(WK923CDL) cre=2009-09-07 mod=2009-09-07-15.18.16 A540769 -----
SQLID SET CURRENT SQLID = 'S100447' ;
DROP ALTER TABLE OA1P.TDG127A1
DROP ADD
DROP DG127180 CHAR(4) FOR SBCS DATA NOT NULL
DROP WITH DEFAULT ;
DROP ALTER TABLE OA1P.TDG127A1
DROP ADD
DROP DG127181 CHAR(4) FOR SBCS DATA NOT NULL
DROP WITH DEFAULT ;
CREATE LABEL ON OA1P.TDG127A1
CREATE (DG127181 IS 'LOCAL BU CURRENCY',
CREATE DG127180 IS 'FUNCTIONAL CURRENCY');
DROP ALTER TABLE OA1P.TDG128A1
DROP ADD
DROP DG128090 CHAR(4) FOR SBCS DATA NOT NULL
DROP WITH DEFAULT ;
DROP ALTER TABLE OA1P.TDG128A1
DROP ADD
DROP DG128091 CHAR(4) FOR SBCS DATA NOT NULL
DROP WITH DEFAULT ;
CREATE LABEL ON OA1P.TDG128A1
CREATE (DG128091 IS 'LOCAL BU CURRENCY',
CREATE DG128090 IS 'FUNCTIONAL CURRENCY');
DROP ALTER TABLE OA1P.TDG129A1
DROP ADD
DROP DG129067 CHAR(4) FOR SBCS DATA NOT NULL
DROP WITH DEFAULT ;
DROP ALTER TABLE OA1P.TDG129A1
DROP ADD
DROP DG129068 CHAR(4) FOR SBCS DATA NOT NULL
DROP WITH DEFAULT ;
CREATE LABEL ON OA1P.TDG129A1
CREATE (DG129068 IS 'LOCAL BU CURRENCY',
CREATE DG129067 IS 'FUNCTIONAL CURRENCY');
DROP ALTER TABLE OA1P.TDG129K1
DROP ADD
DROP DG129K067 CHAR(4) FOR SBCS DATA NOT NULL
DROP WITH DEFAULT ;
DROP ALTER TABLE OA1P.TDG129K1
DROP ADD
DROP DG129K068 CHAR(4) FOR SBCS DATA NOT NULL
DROP WITH DEFAULT ;
CREATE LABEL ON OA1P.TDG129K1
CREATE (DG129K068 IS 'LOCAL BU CURRENCY',
CREATE DG129K067 IS 'FUNCTIONAL CURRENCY');
DROP ALTER TABLE OA1P.TDG130A1
DROP ADD
DROP DG130071 CHAR(4) FOR SBCS DATA NOT NULL
DROP WITH DEFAULT ;
CREATE LABEL ON COLUMN OA1P.TDG130A1.DG130071 IS 'LOCAL BU CURRENCY';
DROP ALTER TABLE OA1P.TDG130K1
DROP ADD
DROP DG130K071 CHAR(4) FOR SBCS DATA NOT NULL
DROP WITH DEFAULT ;
CREATE LABEL ON COLUMN OA1P.TDG130K1.DG130K071 IS 'LOCAL BU CURRENCY';
CREATE ALTER INDEX OA1P.IDG127A3
CREATE CLOSE YES ;
CREATE ALTER INDEX OA1P.IDG128A4
CREATE CLOSE YES ;
CREATE SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
DROP ADMIN DROP VIEW OA1P.VDG127A1A ;
CREATE CREATE VIEW OA1P.VDG127A1A(DG127001, DG127002, DG127003, DG127004,
CREATE DG127005, DG127006, DG127007, DG127008, DG127009, DG127010,
CREATE DG127011, DG127012, DG127013, DG127014, DG127015, DG127016,
CREATE DG127017, DG127018, DG127019, DG127020, DG127021, DG127022,
CREATE DG127023, DG127024, DG127025, DG127026, DG127027, DG127028,
CREATE DG127029, DG127030, DG127031, DG127032, DG127033, DG127034,
CREATE DG127035, DG127036, DG127037, DG127038, DG127039, DG127040,
CREATE DG127041, DG127042, DG127043, DG127044, DG127045, DG127046,
CREATE DG127047, DG127048, DG127049, DG127050, DG127051, DG127052,
CREATE DG127053, DG127054, DG127055, DG127056, DG127057, DG127058,
CREATE DG127059, DG127060, DG127061, DG127062, DG127063, DG127064,
CREATE DG127065, DG127066, DG127067, DG127068, DG127069, DG127070,
CREATE DG127071, DG127072, DG127073, DG127074, DG127075, DG127076,
CREATE DG127077, DG127078, DG127079, DG127080, DG127081, DG127082,
CREATE DG127083, DG127084, DG127085, DG127086, DG127087, DG127088,
CREATE DG127089, DG127090, DG127091, DG127092, DG127093, DG127094,
CREATE DG127095, DG127096, DG127097, DG127098, DG127099, DG127100,
CREATE DG127101, DG127102, DG127103, DG127104, DG127105, DG127106,
CREATE DG127107, DG127108, DG127109, DG127110, DG127111, DG127112,
CREATE DG127113, DG127114, DG127115, DG127116, DG127117, DG127118,
CREATE DG127119, DG127120, DG127121, DG127122, DG127123, DG127124,
CREATE DG127125, DG127126, DG127127, DG127128, DG127129, DG127130,
CREATE DG127131, DG127132, DG127133, DG127134, DG127135, DG127136,
CREATE DG127137, DG127138, DG127139, DG127140, DG127141, DG127142,
CREATE DG127143, DG127144, DG127145, DG127146, DG127147, DG127148,
CREATE DG127149, DG127150, DG127151, DG127152, DG127153, DG127154,
CREATE DG127155, DG127156, DG127157, DG127158, DG127159, DG127160,
CREATE DG127161, DG127162, DG127163, DG127164, DG127165, DG127166,
CREATE DG127167, DG127168, DG127169, DG127170, DG127171, DG127172,
CREATE DG127173, DG127174, DG127175, DG127176, DG127177, DG127178,
CREATE DG127179, DG127180, DG127181) AS
CREATE SELECT DG127001, DG127002, DG127003, DG127004, DG127005, DG127006,
CREATE DG127007, DG127008, DG127009, DG127010, DG127011, DG127012,
CREATE DG127013, DG127014, DG127015, DG127016, DG127017, DG127018,
CREATE DG127019, DG127020, DG127021, DG127022, DG127023, DG127024,
CREATE DG127025, DG127026, DG127027, DG127028, DG127029, DG127030,
CREATE DG127031, DG127032, DG127033, DG127034, DG127035, DG127036,
CREATE DG127037, DG127038, DG127039, DG127040, DG127041, DG127042,
CREATE DG127043, DG127044, DG127045, DG127046, DG127047, DG127048,
CREATE DG127049, DG127050, DG127051, DG127052, DG127053, DG127054,
CREATE DG127055, DG127056, DG127057, DG127058, DG127059, DG127060,
CREATE DG127061, DG127062, DG127063, DG127064, DG127065, DG127066,
CREATE DG127067, DG127068, DG127069, DG127070, DG127071, DG127072,
CREATE DG127073, DG127074, DG127075, DG127076, DG127077, DG127078,
CREATE DG127079, DG127080, DG127081, DG127082, DG127083, DG127084,
CREATE DG127085, DG127086, DG127087, DG127088, DG127089, DG127090,
CREATE DG127091, DG127092, DG127093, DG127094, DG127095, DG127096,
CREATE DG127097, DG127098, DG127099, DG127100, DG127101, DG127102,
CREATE DG127103, DG127104, DG127105, DG127106, DG127107, DG127108,
CREATE DG127109, DG127110, DG127111, DG127112, DG127113, DG127114,
CREATE DG127115, DG127116, DG127117, DG127118, DG127119, DG127120,
CREATE DG127121, DG127122, DG127123, DG127124, DG127125, DG127126,
CREATE DG127127, DG127128, DG127129, DG127130, DG127131, DG127132,
CREATE DG127133, DG127134, DG127135, DG127136, DG127137, DG127138,
CREATE DG127139, DG127140, DG127141, DG127142, DG127143, DG127144,
CREATE DG127145, DG127146, DG127147, DG127148, DG127149, DG127150,
CREATE DG127151, DG127152, DG127153, DG127154, DG127155, DG127156,
CREATE DG127157, DG127158, DG127159, DG127160, DG127161, DG127162,
CREATE DG127163, DG127164, DG127165, DG127166, DG127167, DG127168,
CREATE DG127169, DG127170, DG127171, DG127172, DG127173, DG127174,
CREATE DG127175, DG127176, DG127177, DG127178, DG127179, DG127180,
CREATE DG127181
CREATE FROM OA1P.TDG127A1 ;
CREATE LABEL ON OA1P.VDG127A1A
CREATE (DG127181 IS 'LOCAL BU CURRENCY',
CREATE DG127180 IS 'FUNCTIONAL CURRENCY',
CREATE DG127179 IS 'REBAT 80 - DG0336',
CREATE DG127178 IS 'REBAT 70 - DG0335',
CREATE DG127177 IS 'REBAT 60 - DG0334',
CREATE DG127176 IS 'REBAT 50 - DG0333',
CREATE DG127175 IS 'REBAT 40 - DG0332',
CREATE DG127174 IS 'REBAT 30 - DG0331',
CREATE DG127173 IS 'REBAT 20 - DG0330',
CREATE DG127172 IS 'RESERVE',
CREATE DG127171 IS 'RESERVE',
CREATE DG127170 IS 'RESERVE',
CREATE DG127169 IS 'RESERVE',
CREATE DG127168 IS 'RESERVE',
CREATE DG127167 IS 'VIEW FOR DG0349',
CREATE DG127166 IS 'VIEW FOR DG0325A',
CREATE DG127165 IS 'VIEW FOR DG0324A',
CREATE DG127164 IS 'RESERVE',
CREATE DG127163 IS 'RESERVE',
CREATE DG127162 IS 'RESERVE',
CREATE DG127161 IS 'RESERVE',
CREATE DG127160 IS 'VIEW FOR DG0353',
CREATE DG127159 IS 'RESERVE',
CREATE DG127158 IS 'RESERVE',
CREATE DG127157 IS 'RESERVE',
CREATE DG127156 IS 'RESERVE',
CREATE DG127155 IS 'RESERVE',
CREATE DG127154 IS 'RESERVE',
CREATE DG127153 IS 'RESERVE',
CREATE DG127152 IS 'RESERVE',
CREATE DG127151 IS 'DG0343 - I S F K A C N',
CREATE DG127150 IS 'DG0338 - DST RUBRIC',
CREATE DG127149 IS 'RESERVE',
CREATE DG127148 IS 'RESERVE',
CREATE DG127147 IS 'RESERVE',
CREATE DG127146 IS 'VIEW FOR DG0311',
CREATE DG127145 IS 'VIEW FOR DG0310',
CREATE DG127144 IS 'AVG OF EXCLUDING',
CREATE DG127143 IS 'TARIFF FOR CATEGROIES',
CREATE DG127142 IS 'CATEGORIE AMOUNT',
CREATE DG127141 IS 'CALCULATED FEES CATEGORY',
CREATE DG127140 IS 'ACCNT BAL EXCL FRM AUM',
CREATE DG127139 IS 'KEY CLOSURE RUNNING NO',
CREATE DG127138 IS 'IDENTIFY GC OR ADM',
CREATE DG127137 IS 'DATE OF STOCKS PER GC',
CREATE DG127136 IS 'ACCOUNT TYPE (SHORT TXT)',
CREATE DG127135 IS 'MUTATION DATE (DG31023A)',
CREATE DG127134 IS 'CALCULATION STATUS',
CREATE DG127133 IS 'HOFMANN BANK AUM2',
CREATE DG127132 IS 'HOFMANN BANK AUM1',
CREATE DG127131 IS 'AIS-ANLAGEWERT',
CREATE DG127130 IS 'CLEANED DEPOSIT VALUE',
CREATE DG127129 IS 'DG DEPOSIT VALUE',
CREATE DG127128 IS 'INFORMATION TXT-LINE2',
CREATE DG127127 IS 'INFORMATION TXT-LINE1',
CREATE DG127126 IS 'TIMESTAMP (DEBIT)',
CREATE DG127125 IS 'TIMESTAMP (REBATT)',
CREATE DG127124 IS 'TIMESTAMP (SURCHARGE)',
CREATE DG127123 IS 'TIMESTAMP (CANCEL)',
CREATE DG127122 IS 'TIMESTAMP (INSERT)',
CREATE DG127121 IS 'PID NO. (DEBIT)',
CREATE DG127120 IS 'PID NO. (REBATT)',
CREATE DG127119 IS 'PID NO. (SURCHARGE)',
CREATE DG127118 IS 'PID NO. (CANCEL)',
CREATE DG127117 IS 'PID NO. (INSERT)',
CREATE DG127116 IS 'EAM MODEL',
CREATE DG127115 IS 'DGCODE (MIH/K/V,MAX,PAU)',
CREATE DG127114 IS 'CONTRIBUTOR DOMICILE',
CREATE DG127113 IS 'CUSTOMER TYPE',
CREATE DG127112 IS 'CUSTOMER SEGMENT',
CREATE DG127111 IS 'DAS',
CREATE DG127110 IS 'DG CODE 16',
CREATE DG127109 IS 'DEBITING FREQ OF GC',
CREATE DG127108 IS 'CALCULATION FREQ OF GC',
CREATE DG127107 IS 'CURRENCY TEXT FLAT RATE',
CREATE DG127106 IS 'CURRENCY CODE FLAT RATE',
CREATE DG127105 IS 'ALLIN CUST(DS4030(6))',
CREATE DG127104 IS 'DEBIT PERIOD UP TO',
CREATE DG127103 IS 'DEBIT PERIOD FROM',
CREATE DG127102 IS 'CLOSURE/TRANFER CODE',
CREATE DG127101 IS 'CANCELLATION CODE',
CREATE DG127100 IS 'VALUE DATE YYYY-MM-DD',
CREATE DG127099 IS 'CALCULATION STATUS',
CREATE DG127098 IS 'ORDER NO. OF DEBIT',
CREATE DG127097 IS 'DEPOT OFFICE RUBRIC MIN',
CREATE DG127096 IS 'PF FEES IND PRICE',
CREATE DG127095 IS 'PF FEES EAM',
CREATE DG127094 IS 'PF FEES VWG',
CREATE DG127093 IS 'PF FEES DEFAULT',
CREATE DG127092 IS 'PF FEES IND PRICE-FLAT',
CREATE DG127091 IS 'PF FEES EAM',
CREATE DG127090 IS 'PF FEES VWG',
CREATE DG127089 IS 'PF FEES DEFAULT',
CREATE DG127088 IS 'PF FEES IND PRICE-MIN',
CREATE DG127087 IS 'PF FEES EAM',
CREATE DG127086 IS 'PF FEES VWG',
CREATE DG127085 IS 'PF FEES DEFAULT',
CREATE DG127084 IS 'PF FEES IND PRICE-SPL',
CREATE DG127083 IS 'PF FEES EAM',
CREATE DG127082 IS 'PF FEES VWG',
CREATE DG127081 IS 'PF FEES DEFAULT',
CREATE DG127080 IS 'VHG FEES IND PRICE',
CREATE DG127079 IS 'VHG FEES EAM',
CREATE DG127078 IS 'VHG FEES VWG',
CREATE DG127077 IS 'VHG FEES DEFAULT',
CREATE DG127076 IS 'ADG FEES IND PRICE',
CREATE DG127075 IS 'ADG FEES EAM',
CREATE DG127074 IS 'ADG FEES VWG',
CREATE DG127073 IS 'ADG FEES DEFAULT',
CREATE DG127072 IS 'EDG FEES IND PRICE',
CREATE DG127071 IS 'EDG FEES EAM',
CREATE DG127070 IS 'EDG FEES VWG',
CREATE DG127069 IS 'EDG FEES DEFAULT',
CREATE DG127068 IS 'TECH DISCOUNT IND PRICE',
CREATE DG127067 IS 'TECH DISCOUNT EAM',
CREATE DG127066 IS 'TECH DISCOUNT VWG',
CREATE DG127065 IS 'TECH DISCOUNT DEFAULT',
CREATE DG127064 IS 'TECH SURCHARGE IND PRICE',
CREATE DG127063 IS 'TECH SURCHARGE EAM',
CREATE DG127062 IS 'TECH SURCHARGE VWG',
CREATE DG127061 IS 'TECH SURCHARGE DEFAULT',
CREATE DG127060 IS 'DISCOUNT %AGE IND PRICE',
CREATE DG127059 IS 'DISCOUNT %AGE EAM',
CREATE DG127058 IS 'DISCOUNT %AGE VWG',
CREATE DG127057 IS 'DISCOUNT %AGE DEFAULT',
CREATE DG127056 IS 'VHG DISCOUNT IND PRICE',
CREATE DG127055 IS 'VHG DISCOUNT EAM',
CREATE DG127054 IS 'VHG DISCOUNT MANDATE',
CREATE DG127053 IS 'VHG DISCOUNT DEFAULT',
CREATE DG127052 IS 'ADG DISCOUNT IND PRICE',
CREATE DG127051 IS 'ADG DISCOUNT EAM',
CREATE DG127050 IS 'ADG DISCOUNT MANDATE',
CREATE DG127049 IS 'ADG DISCOUNT DEFAULT',
CREATE DG127048 IS 'EDG DISCOUNT IND PRICE',
CREATE DG127047 IS 'EDG DISCOUNT EAM',
CREATE DG127046 IS 'EDG DISCOUNT MANDATE',
CREATE DG127045 IS 'EDG DISCOUNT DEFAULT',
CREATE DG127044 IS 'VHG SURCHARGE IND PRICE',
CREATE DG127043 IS 'VHG SURCHARGE EAM',
CREATE DG127042 IS 'VHG SURCHARGE MANDATE',
CREATE DG127041 IS 'VHG SURCHARGE DEFAULT',
CREATE DG127040 IS 'ADG SURCHARGE IND PRICE',
CREATE DG127039 IS 'ADG SURCHARGE EAM',
CREATE DG127038 IS 'ADG SURCHARGE MANDATE',
CREATE DG127037 IS 'ADG SURCHARGE DEFAULT',
CREATE DG127036 IS 'EDG SURCHARGE IND PRICE',
CREATE DG127035 IS 'EDG SURCHARGE EAM',
CREATE DG127034 IS 'EDG SURCHARGE MANDATE',
CREATE DG127033 IS 'EDG SURCHARGE DEFAULT',
CREATE DG127032 IS 'ACCRUED INTEREST',
CREATE DG127031 IS 'ORIGINAL AUM',
CREATE DG127030 IS 'CALCULATION BASE VHG',
CREATE DG127029 IS 'CALCULATION BASE ADG',
CREATE DG127028 IS 'CALCULATION BASE EDG',
CREATE DG127027 IS 'TOTAL FLAT RATE',
CREATE DG127026 IS 'VHTARIFF VWG IND PRICE',
CREATE DG127025 IS 'VHTARIFF EAM',
CREATE DG127024 IS 'VHTARIFF VWG STD PRICE',
CREATE DG127023 IS 'VHTARIFF DEFAULT',
CREATE DG127022 IS 'ADG TARIFF IND PRICE',
CREATE DG127021 IS 'ADG TARIFF EAM',
CREATE DG127020 IS 'ADG TARIFF VWG',
CREATE DG127019 IS 'ADG TARIFF DEFAULT',
CREATE DG127018 IS 'EDG TARIFF IND PRICE',
CREATE DG127017 IS 'EDG TARIFF EAM',
CREATE DG127016 IS 'EDG TARIFF VWG',
CREATE DG127015 IS 'EDG TARIFF DEFAULT',
CREATE DG127014 IS 'CASH ACCOUNT CURRENCY',
CREATE DG127013 IS 'CASH ACCOUNT TYPE',
CREATE DG127012 IS 'CASH ACCOUNT NBR',
CREATE DG127011 IS 'CIF-NUMBER',
CREATE DG127010 IS 'CUSTOMER OFFICE',
CREATE DG127009 IS 'YDGMOD MODEL',
CREATE DG127008 IS 'BUID',
CREATE DG127007 IS 'TECH MUTATION DATE',
CREATE DG127006 IS 'KEY CLOSURE RUNNING NBR',
CREATE DG127005 IS 'KEY DUE DATE',
CREATE DG127004 IS 'KEY POSITION AS DATE',
CREATE DG127003 IS 'KEY SAFEKEEPING A/C NBR',
CREATE DG127002 IS 'KEY CALCULATION YEAR',
CREATE DG127001 IS 'KEY LAST DIGIT OF YEAR');
CREATE GRANT SELECT ON TABLE OA1P.VDG127A1A TO OA1P;
CREATE SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
DROP ADMIN DROP VIEW OA1P.VDG128A1A ;
CREATE CREATE VIEW OA1P.VDG128A1A(DG128001, DG128002, DG128003, DG128004,
CREATE DG128005, DG128006, DG128007, DG128008, DG128009, DG128010,
CREATE DG128011, DG128012, DG128013, DG128014, DG128015, DG128016,
CREATE DG128017, DG128018, DG128019, DG128020, DG128021, DG128022,
CREATE DG128023, DG128024, DG128025, DG128026, DG128027, DG128028,
CREATE DG128029, DG128030, DG128031, DG128032, DG128033, DG128034,
CREATE DG128035, DG128036, DG128037, DG128038, DG128039, DG128040,
CREATE DG128041, DG128042, DG128043, DG128044, DG128045, DG128046,
CREATE DG128047, DG128048, DG128049, DG128050, DG128051, DG128052,
CREATE DG128053, DG128054, DG128055, DG128056, DG128057, DG128058,
CREATE DG128059, DG128060, DG128061, DG128062, DG128063, DG128064,
CREATE DG128065, DG128066, DG128067, DG128068, DG128069, DG128070,
CREATE DG128071, DG128072, DG128073, DG128074, DG128075, DG128076,
CREATE DG128077, DG128078, DG128079, DG128080, DG128081, DG128082,
CREATE DG128083, DG128084, DG128085, DG128086, DG128087, DG128088,
CREATE DG128089, DG128090, DG128091) AS
CREATE SELECT DG128001, DG128002, DG128003, DG128004, DG128005, DG128006,
CREATE DG128007, DG128008, DG128009, DG128010, DG128011, DG128012,
CREATE DG128013, DG128014, DG128015, DG128016, DG128017, DG128018,
CREATE DG128019, DG128020, DG128021, DG128022, DG128023, DG128024,
CREATE DG128025, DG128026, DG128027, DG128028, DG128029, DG128030,
CREATE DG128031, DG128032, DG128033, DG128034, DG128035, DG128036,
CREATE DG128037, DG128038, DG128039, DG128040, DG128041, DG128042,
CREATE DG128043, DG128044, DG128045, DG128046, DG128047, DG128048,
CREATE DG128049, DG128050, DG128051, DG128052, DG128053, DG128054,
CREATE DG128055, DG128056, DG128057, DG128058, DG128059, DG128060,
CREATE DG128061, DG128062, DG128063, DG128064, DG128065, DG128066,
CREATE DG128067, DG128068, DG128069, DG128070, DG128071, DG128072,
CREATE DG128073, DG128074, DG128075, DG128076, DG128077, DG128078,
CREATE DG128079, DG128080, DG128081, DG128082, DG128083, DG128084,
CREATE DG128085, DG128086, DG128087, DG128088, DG128089, DG128090,
CREATE DG128091
CREATE FROM OA1P.TDG128A1 ;
CREATE LABEL ON TABLE OA1P.VDG128A1A IS 'DG-MANDATE TABLE' ;
CREATE LABEL ON OA1P.VDG128A1A
CREATE (DG128091 IS 'LOCAL BU CURRENCY',
CREATE DG128090 IS 'FUNCTIONAL CURRENCY',
CREATE DG128089 IS 'RESERVE',
CREATE DG128088 IS 'RESERVE',
CREATE DG128087 IS 'RESERVE',
CREATE DG128086 IS 'RESERVE',
CREATE DG128085 IS 'SFA VALUE',
CREATE DG128084 IS 'ASSET UNDER MANAGEMENT',
CREATE DG128083 IS 'RESERVE',
CREATE DG128082 IS 'RESERVE',
CREATE DG128081 IS 'RESERVE',
CREATE DG128080 IS 'RESERVE',
CREATE DG128079 IS 'RESERVE',
CREATE DG128078 IS 'RESERVE',
CREATE DG128077 IS 'RESERVE',
CREATE DG128076 IS 'RESERVE',
CREATE DG128075 IS 'RESERVE',
CREATE DG128074 IS 'RESERVE',
CREATE DG128073 IS 'RESERVE',
CREATE DG128072 IS 'RESERVE',
CREATE DG128071 IS 'RESERVE',
CREATE DG128070 IS 'RESERVE',
CREATE DG128069 IS 'RES VIEW FOR DG21036',
CREATE DG128068 IS 'RES VIEW FOR DG21050',
CREATE DG128067 IS 'RES VIEW FOR DG21049',
CREATE DG128066 IS 'RES VIEW FOR DG21034',
CREATE DG128065 IS 'RES VIEW FOR DG21033',
CREATE DG128064 IS 'RES VIEW FOR DG21032',
CREATE DG128063 IS 'RES VIEW FOR DG21022',
CREATE DG128062 IS 'RES VIEW FOR DG21021',
CREATE DG128061 IS 'RES VIEW FOR DG21015',
CREATE DG128060 IS 'VWG TARIFF 0/00 NETTO',
CREATE DG128059 IS 'VWG TARIFF 0/00 BRUTTO',
CREATE DG128058 IS 'INFORMATION TXT (LNIE2)',
CREATE DG128057 IS 'INFORMATION TXT (LINE1)',
CREATE DG128056 IS 'CALCULATION STATUS',
CREATE DG128055 IS 'RUNNING NO',
CREATE DG128054 IS 'TIMESTAMP DEBIT',
CREATE DG128053 IS 'TIMESTAMP DISCOUNT',
CREATE DG128052 IS 'TIMESTAMP SURCHARGE',
CREATE DG128051 IS 'TIMESTAMP CANCEL',
CREATE DG128050 IS 'TIMESTAMP INSERT',
CREATE DG128049 IS 'PID DEBIT',
CREATE DG128048 IS 'PID DISCOUNT',
CREATE DG128047 IS 'PID SURCHARGE',
CREATE DG128046 IS 'PID CACNEL',
CREATE DG128045 IS 'PID INSERT',
CREATE DG128044 IS 'VWG CODE 17',
CREATE DG128043 IS 'INVESTMENT PROFIE',
CREATE DG128042 IS 'DAS',
CREATE DG128041 IS 'CUSTOMER SEGMENT',
CREATE DG128040 IS 'CUSTOMER DOMICILE',
CREATE DG128039 IS 'CUSTOMER TYPE',
CREATE DG128038 IS 'CONTRACT TYPE',
CREATE DG128037 IS 'ALLIN CUST(DS4030(6))',
CREATE DG128036 IS 'VWG CODE (MIN/FLAT)',
CREATE DG128035 IS 'CLOSURE REASON',
CREATE DG128034 IS 'CANCELLATION CODE',
CREATE DG128033 IS 'VALUE DATE VWG',
CREATE DG128032 IS 'CALCULATION STATUS',
CREATE DG128031 IS 'ORDER NO. OF DEBIT',
CREATE DG128030 IS 'DEBIT PERIOD TO',
CREATE DG128029 IS 'DEBIT PERIOD FROM',
CREATE DG128028 IS 'VWG FEES - IND PRICE',
CREATE DG128027 IS 'VWG FEES - STD PRICE',
CREATE DG128026 IS 'FLAT RATE CURRENCY',
CREATE DG128025 IS 'FLAT RATE',
CREATE DG128024 IS 'TECHNICAL DISCOUNT',
CREATE DG128023 IS 'DISCOUNT AMOUNT IND PRICE',
CREATE DG128022 IS 'DISCOUNT AMOUNT STANDARD',
CREATE DG128021 IS 'DISCOUNT % IND PRICE',
CREATE DG128020 IS 'DISCOUNT % STANDARD',
CREATE DG128019 IS 'TECHNICAL SURCHARGE',
CREATE DG128018 IS 'SURCHARGE IND PRICE',
CREATE DG128017 IS 'SURCHARGE STANDARD',
CREATE DG128016 IS 'VWG TARIFF % IND PRICE',
CREATE DG128015 IS 'VWG TARIFF % STANDARD',
CREATE DG128014 IS 'ACCRUED INTEREST',
CREATE DG128013 IS 'AMOUNT FOR CALCULATION',
CREATE DG128012 IS 'CASH ACCOUNT CURRENCY',
CREATE DG128011 IS 'CASH ACCOUNT TYPE',
CREATE DG128010 IS 'CASH ACCOUNT NBR',
CREATE DG128009 IS 'BUID',
CREATE DG128008 IS 'TECHN. MUTATION DATE',
CREATE DG128007 IS 'VWG SEARCH KEY',
CREATE DG128006 IS 'KEY RUNNING NO',
CREATE DG128005 IS 'KEY DUE DATE',
CREATE DG128004 IS 'KEY POSITION AS DATE',
CREATE DG128003 IS 'KEY SFA NUMBER',
CREATE DG128002 IS 'KEY CALCULATION YEAR',
CREATE DG128001 IS 'KEY LAST DIGIT OF YEAR');
CREATE GRANT SELECT ON TABLE OA1P.VDG128A1A TO OA1P;
CREATE SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
DROP ADMIN DROP VIEW OA1P.VDG129A1A ;
CREATE CREATE VIEW OA1P.VDG129A1A(DG129001, DG129002, DG129003, DG129004,
CREATE DG129005, DG129006, DG129007, DG129008, DG129009, DG129010,
CREATE DG129011, DG129012, DG129013, DG129014, DG129015, DG129016,
CREATE DG129017, DG129018, DG129019, DG129020, DG129021, DG129022,
CREATE DG129023, DG129024, DG129025, DG129026, DG129027, DG129028,
CREATE DG129029, DG129030, DG129031, DG129032, DG129033, DG129034,
CREATE DG129035, DG129036, DG129037, DG129038, DG129039, DG129040,
CREATE DG129041, DG129042, DG129043, DG129044, DG129045, DG129046,
CREATE DG129047, DG129048, DG129049, DG129050, DG129051, DG129052,
CREATE DG129053, DG129054, DG129055, DG129056, DG129057, DG129058,
CREATE DG129059, DG129060, DG129061, DG129062, DG129063, DG129064,
CREATE DG129065, DG129066, DG129067, DG129068) AS
CREATE SELECT DG129001, DG129002, DG129003, DG129004, DG129005, DG129006,
CREATE DG129007, DG129008, DG129009, DG129010, DG129011, DG129012,
CREATE DG129013, DG129014, DG129015, DG129016, DG129017, DG129018,
CREATE DG129019, DG129020, DG129021, DG129022, DG129023, DG129024,
CREATE DG129025, DG129026, DG129027, DG129028, DG129029, DG129030,
CREATE DG129031, DG129032, DG129033, DG129034, DG129035, DG129036,
CREATE DG129037, DG129038, DG129039, DG129040, DG129041, DG129042,
CREATE DG129043, DG129044, DG129045, DG129046, DG129047, DG129048,
CREATE DG129049, DG129050, DG129051, DG129052, DG129053, DG129054,
CREATE DG129055, DG129056, DG129057, DG129058, DG129059, DG129060,
CREATE DG129061, DG129062, DG129063, DG129064, DG129065, DG129066,
CREATE DG129067, DG129068
CREATE FROM OA1P.TDG129A1 ;
CREATE LABEL ON OA1P.VDG129A1A
CREATE (DG129068 IS 'LOCAL BU CURRENCY',
CREATE DG129067 IS 'FUNCTIONAL CURRENCY',
CREATE DG129066 IS 'RESERVE',
CREATE DG129065 IS 'RESERVE',
CREATE DG129064 IS 'RESERVE',
CREATE DG129063 IS 'RESERVE',
CREATE DG129062 IS 'RESERVE',
CREATE DG129061 IS 'RESERVE',
CREATE DG129060 IS 'RESERVE',
CREATE DG129059 IS 'RESERVE',
CREATE DG129058 IS 'RESERVE',
CREATE DG129057 IS 'MODEL',
CREATE DG129056 IS 'RESERVE',
CREATE DG129055 IS 'RESERVE',
CREATE DG129054 IS 'RESERVE',
CREATE DG129053 IS 'RESERVE',
CREATE DG129052 IS 'RESERVE',
CREATE DG129051 IS 'TS - RECALCULATED',
CREATE DG129050 IS 'TS - DEBIT',
CREATE DG129049 IS 'TS - SURCHRGE',
CREATE DG129048 IS 'TS - DISCOUNT',
CREATE DG129047 IS 'TS - CANCEL',
CREATE DG129046 IS 'TS - INSERT',
CREATE DG129045 IS 'PID - RECALCULATED',
CREATE DG129044 IS 'PID - DEBIT',
CREATE DG129043 IS 'PID - SURCHRGE',
CREATE DG129042 IS 'PID - DISCOUNT',
CREATE DG129041 IS 'PID - CANCEL',
CREATE DG129040 IS 'PID - INSERT',
CREATE DG129039 IS 'DEBIT INTERNAL TEXT',
CREATE DG129038 IS 'DEBIT INTERNAL TEXT',
CREATE DG129037 IS 'DEBIT FREQUENCY',
CREATE DG129036 IS 'CALCULATION FREQUENCY',
CREATE DG129035 IS 'DEBIT PERIOD TO',
CREATE DG129034 IS 'DEBIT PERIOD FROM',
CREATE DG129033 IS 'DEBIT DATE',
CREATE DG129032 IS 'CALCULATION PERIOD TO',
CREATE DG129031 IS 'CALCULATION PERIOD FROM',
CREATE DG129030 IS 'CALCULATION DATE',
CREATE DG129029 IS 'CLOSURE TRANSFER CODE',
CREATE DG129028 IS 'CANCELLATION CODE',
CREATE DG129027 IS 'VALUE DATE',
CREATE DG129026 IS 'NAC CODE 1 (Y/N)',
CREATE DG129025 IS 'CALCULATION STATUS',
CREATE DG129024 IS 'ORDER NUMBER',
CREATE DG129023 IS 'NAC - NETTO',
CREATE DG129022 IS 'NAC - BRUTTO',
CREATE DG129021 IS 'TECHNICAL DISCOUNT',
CREATE DG129020 IS 'TECHNICAL SURCHARGE',
CREATE DG129019 IS 'ADHOC DISCOUNT',
CREATE DG129018 IS 'ADHOC SURCHARGE',
CREATE DG129017 IS 'SC DISCOUNT AMOUNT',
CREATE DG129016 IS 'SC DISCOUNT %',
CREATE DG129015 IS 'NAC FLAT AMOUNT',
CREATE DG129014 IS 'NAC DEFAULT AMOUNT',
CREATE DG129013 IS 'ACCOUNT CURRENCY',
CREATE DG129012 IS 'ACCOUNT TYPE',
CREATE DG129011 IS 'ACCOUNT NUMBER',
CREATE DG129010 IS 'DOMICILE',
CREATE DG129009 IS 'CUSTOMER TYPE',
CREATE DG129008 IS 'BUID',
CREATE DG129007 IS 'TECH MUTATION DATE',
CREATE DG129006 IS 'KEY RUNNING NUMBER',
CREATE DG129005 IS 'KEY DUE DATE',
CREATE DG129004 IS 'KEY POSITION AS DATE',
CREATE DG129003 IS 'KEY CIF NUMBER',
CREATE DG129002 IS 'KEY CALCULATION YEAR',
CREATE DG129001 IS 'KEY PARTITION');
CREATE GRANT SELECT ON TABLE OA1P.VDG129A1A TO OA1P;
CREATE SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
DROP ADMIN DROP VIEW OA1P.VDG129K1A ;
CREATE CREATE VIEW OA1P.VDG129K1A(DG129K001, DG129K002, DG129K003,
CREATE DG129K004, DG129K005, DG129K006, DG129K007, DG129K008,
CREATE DG129K009, DG129K010, DG129K011, DG129K012, DG129K013,
CREATE DG129K014, DG129K015, DG129K016, DG129K017, DG129K018,
CREATE DG129K019, DG129K020, DG129K021, DG129K022, DG129K023,
CREATE DG129K024, DG129K025, DG129K026, DG129K027, DG129K028,
CREATE DG129K029, DG129K030, DG129K031, DG129K032, DG129K033,
CREATE DG129K034, DG129K035, DG129K036, DG129K037, DG129K038,
CREATE DG129K039, DG129K040, DG129K041, DG129K042, DG129K043,
CREATE DG129K044, DG129K045, DG129K046, DG129K047, DG129K048,
CREATE DG129K049, DG129K050, DG129K051, DG129K052, DG129K053,
CREATE DG129K054, DG129K055, DG129K056, DG129K057, DG129K058,
CREATE DG129K059, DG129K060, DG129K061, DG129K062, DG129K063,
CREATE DG129K064, DG129K065, DG129K066, DG129K067, DG129K068) AS
CREATE SELECT DG129K001, DG129K002, DG129K003, DG129K004, DG129K005,
CREATE DG129K006, DG129K007, DG129K008, DG129K009, DG129K010,
CREATE DG129K011, DG129K012, DG129K013, DG129K014, DG129K015,
CREATE DG129K016, DG129K017, DG129K018, DG129K019, DG129K020,
CREATE DG129K021, DG129K022, DG129K023, DG129K024, DG129K025,
CREATE DG129K026, DG129K027, DG129K028, DG129K029, DG129K030,
CREATE DG129K031, DG129K032, DG129K033, DG129K034, DG129K035,
CREATE DG129K036, DG129K037, DG129K038, DG129K039, DG129K040,
CREATE DG129K041, DG129K042, DG129K043, DG129K044, DG129K045,
CREATE DG129K046, DG129K047, DG129K048, DG129K049, DG129K050,
CREATE DG129K051, DG129K052, DG129K053, DG129K054, DG129K055,
CREATE DG129K056, DG129K057, DG129K058, DG129K059, DG129K060,
CREATE DG129K061, DG129K062, DG129K063, DG129K064, DG129K065,
CREATE DG129K066, DG129K067, DG129K068
CREATE FROM OA1P.TDG129K1 ;
CREATE LABEL ON OA1P.VDG129K1A
CREATE (DG129K068 IS 'LOCAL BU CURRENCY',
CREATE DG129K067 IS 'FUNCTIONAL CURRENCY',
CREATE DG129K066 IS 'RESERVE',
CREATE DG129K065 IS 'RESERVE',
CREATE DG129K064 IS 'RESERVE',
CREATE DG129K063 IS 'RESERVE',
CREATE DG129K062 IS 'RESERVE',
CREATE DG129K061 IS 'RESERVE',
CREATE DG129K060 IS 'RESERVE',
CREATE DG129K059 IS 'RESERVE',
CREATE DG129K058 IS 'RESERVE',
CREATE DG129K057 IS 'RESERVE',
CREATE DG129K056 IS 'RESERVE',
CREATE DG129K055 IS 'RESERVE',
CREATE DG129K054 IS 'RESERVE',
CREATE DG129K053 IS 'RESERVE',
CREATE DG129K052 IS 'RESERVE',
CREATE DG129K051 IS 'TS - RECALCULATED',
CREATE DG129K050 IS 'TS - DEBIT',
CREATE DG129K049 IS 'TS - SURCHRGE',
CREATE DG129K048 IS 'TS - DISCOUNT',
CREATE DG129K047 IS 'TS - CANCEL',
CREATE DG129K046 IS 'TS - INSERT',
CREATE DG129K045 IS 'PID - RECALCULATED',
CREATE DG129K044 IS 'PID - DEBIT',
CREATE DG129K043 IS 'PID - SURCHRGE',
CREATE DG129K042 IS 'PID - DISCOUNT',
CREATE DG129K041 IS 'PID - CANCEL',
CREATE DG129K040 IS 'PID - INSERT',
CREATE DG129K039 IS 'DEBIT INTERNAL TEXT',
CREATE DG129K038 IS 'DEBIT INTERNAL TEXT',
CREATE DG129K037 IS 'DEBIT FREQUENCY',
CREATE DG129K036 IS 'CALCULATION FREQUENCY',
CREATE DG129K035 IS 'DEBIT PERIOD TO',
CREATE DG129K034 IS 'DEBIT PERIOD FROM',
CREATE DG129K033 IS 'DEBIT DATE',
CREATE DG129K032 IS 'CALCULATION PERIOD TO',
CREATE DG129K031 IS 'CALCULATION PERIOD FROM',
CREATE DG129K030 IS 'CALCULATION DATE',
CREATE DG129K029 IS 'CLOSURE TRANSFER CODE',
CREATE DG129K028 IS 'CANCELLATION CODE',
CREATE DG129K027 IS 'VALUE DATE',
CREATE DG129K026 IS 'RECALCULATED',
CREATE DG129K025 IS 'CALCULATION STATUS',
CREATE DG129K024 IS 'ORDER NUMBER',
CREATE DG129K023 IS 'NAC - NETTO',
CREATE DG129K022 IS 'NAC - BRUTTO',
CREATE DG129K021 IS 'TECHNICAL DISCOUNT',
CREATE DG129K020 IS 'TECHNICAL SURCHARGE',
CREATE DG129K019 IS 'ADHOC DISCOUNT',
CREATE DG129K018 IS 'ADHOC SURCHARGE',
CREATE DG129K017 IS 'SC DISCOUNT AMOUNT',
CREATE DG129K016 IS 'SC DISCOUNT %',
CREATE DG129K015 IS 'NAC FLAT AMOUNT',
CREATE DG129K014 IS 'NAC DEFAULT AMOUNT',
CREATE DG129K013 IS 'ACCOUNT CURRENCY',
CREATE DG129K012 IS 'ACCOUNT TYPE',
CREATE DG129K011 IS 'ACCOUNT NUMBER',
CREATE DG129K010 IS 'DOMICILE',
CREATE DG129K009 IS 'CUSTOMER TYPE',
CREATE DG129K008 IS 'BUID',
CREATE DG129K007 IS 'TECH MUTATION DATE',
CREATE DG129K006 IS 'KEY RUNNING NUMBER',
CREATE DG129K005 IS 'KEY DUE DATE',
CREATE DG129K004 IS 'KEY POSITION AS DATE',
CREATE DG129K003 IS 'KEY CIF NUMBER',
CREATE DG129K002 IS 'KEY CALCULATION YEAR',
CREATE DG129K001 IS 'KEY PARTITION');
CREATE GRANT SELECT ON TABLE OA1P.VDG129K1A TO OA1P;
CREATE SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
DROP ADMIN DROP VIEW OA1P.VDG130A1A ;
CREATE CREATE VIEW OA1P.VDG130A1A(DG130001, DG130002, DG130003, DG130004,
CREATE DG130005, DG130006, DG130007, DG130008, DG130009, DG130010,
CREATE DG130011, DG130012, DG130013, DG130014, DG130015, DG130016,
CREATE DG130017, DG130018, DG130019, DG130020, DG130021, DG130022,
CREATE DG130023, DG130024, DG130025, DG130026, DG130027, DG130028,
CREATE DG130029, DG130030, DG130031, DG130032, DG130033, DG130034,
CREATE DG130035, DG130036, DG130037, DG130038, DG130039, DG130040,
CREATE DG130041, DG130042, DG130043, DG130044, DG130045, DG130046,
CREATE DG130047, DG130048, DG130049, DG130050, DG130051, DG130052,
CREATE DG130053, DG130054, DG130055, DG130056, DG130057, DG130058,
CREATE DG130059, DG130060, DG130061, DG130062, DG130063, DG130064,
CREATE DG130065, DG130066, DG130067, DG130068, DG130069, DG130070,
CREATE DG130071) AS
CREATE SELECT DG130001, DG130002, DG130003, DG130004, DG130005, DG130006,
CREATE DG130007, DG130008, DG130009, DG130010, DG130011, DG130012,
CREATE DG130013, DG130014, DG130015, DG130016, DG130017, DG130018,
CREATE DG130019, DG130020, DG130021, DG130022, DG130023, DG130024,
CREATE DG130025, DG130026, DG130027, DG130028, DG130029, DG130030,
CREATE DG130031, DG130032, DG130033, DG130034, DG130035, DG130036,
CREATE DG130037, DG130038, DG130039, DG130040, DG130041, DG130042,
CREATE DG130043, DG130044, DG130045, DG130046, DG130047, DG130048,
CREATE DG130049, DG130050, DG130051, DG130052, DG130053, DG130054,
CREATE DG130055, DG130056, DG130057, DG130058, DG130059, DG130060,
CREATE DG130061, DG130062, DG130063, DG130064, DG130065, DG130066,
CREATE DG130067, DG130068, DG130069, DG130070, DG130071
CREATE FROM OA1P.TDG130A1 ;
CREATE LABEL ON TABLE OA1P.VDG130A1A IS 'RET FEE TABLE' ;
CREATE LABEL ON OA1P.VDG130A1A
CREATE (DG130071 IS 'LOCAL BU CURRENCY',
CREATE DG130070 IS 'RESERVE',
CREATE DG130069 IS 'RESERVE',
CREATE DG130068 IS 'RESERVE',
CREATE DG130067 IS 'RESERVE',
CREATE DG130066 IS 'RESERVE',
CREATE DG130065 IS 'RESERVE',
CREATE DG130064 IS 'RESERVE',
CREATE DG130063 IS 'RESERVE',
CREATE DG130062 IS 'RESERVE',
CREATE DG130061 IS 'RESERVE',
CREATE DG130060 IS 'RESERVE',
CREATE DG130059 IS 'RESERVE',
CREATE DG130058 IS 'RESERVE',
CREATE DG130057 IS 'RESERVE',
CREATE DG130056 IS 'RESERVE',
CREATE DG130055 IS 'RESERVE',
CREATE DG130054 IS 'RESERVE',
CREATE DG130053 IS 'TS - RECALCULATED',
CREATE DG130052 IS 'TS - DEBIT',
CREATE DG130051 IS 'TS - SURCHRGE',
CREATE DG130050 IS 'TS - DISCOUNT',
CREATE DG130049 IS 'TS - CANCEL',
CREATE DG130048 IS 'TS - INSERT',
CREATE DG130047 IS 'PID - RECALCULATED',
CREATE DG130046 IS 'PID - DEBIT',
CREATE DG130045 IS 'PID - SURCHRGE',
CREATE DG130044 IS 'PID - DISCOUNT',
CREATE DG130043 IS 'PID - CANCEL',
CREATE DG130042 IS 'PID - INSERT',
CREATE DG130041 IS 'DEBIT INTERNAL TEXT',
CREATE DG130040 IS 'DEBIT INTERNAL TEXT',
CREATE DG130039 IS 'DEBIT FREQUENCY',
CREATE DG130038 IS 'CALCULATION FREQUENCY',
CREATE DG130037 IS 'DEBIT DATE',
CREATE DG130036 IS 'CALCULATION PERIOD TO',
CREATE DG130035 IS 'CALCULATION PERIOD FROM',
CREATE DG130034 IS 'CALCULATION DATE',
CREATE DG130033 IS 'CLOSURE TRANSFER CODE',
CREATE DG130032 IS 'CANCELLATION CODE',
CREATE DG130031 IS 'VALUE DATE',
CREATE DG130030 IS 'NAC CODE 1 (Y/N)',
CREATE DG130029 IS 'CALCULATION STATUS',
CREATE DG130028 IS 'ORDER NUMBER',
CREATE DG130027 IS 'NAC - NETTO',
CREATE DG130026 IS 'NAC - BRUTTO',
CREATE DG130025 IS 'TECHNICAL DISCOUNT',
CREATE DG130024 IS 'TECHNICAL SURCHARGE',
CREATE DG130023 IS 'ADHOC DISCOUNT',
CREATE DG130022 IS 'ADHOC SURCHARGE',
CREATE DG130021 IS 'SC DISCOUNT AMOUNT',
CREATE DG130020 IS 'SC DISCOUNT %',
CREATE DG130019 IS 'RET FLAT AMOUNT CURRENCY',
CREATE DG130018 IS 'RET FLAT AMOUNT',
CREATE DG130017 IS 'RET DEF AMOUNT CURRENCY',
CREATE DG130016 IS 'RET DEFAULT AMOUNT',
CREATE DG130015 IS 'ACCOUNT CURRENCY',
CREATE DG130014 IS 'ACCOUNT TYPE',
CREATE DG130013 IS 'ACCOUNT NUMBER',
CREATE DG130012 IS 'DOMICILE',
CREATE DG130011 IS 'CUSTOMER TYPE',
CREATE DG130010 IS 'RET ROUTING CODE',
CREATE DG130009 IS 'MODEL',
CREATE DG130008 IS 'BUID',
CREATE DG130007 IS 'TECH MUTATION DATE',
CREATE DG130006 IS 'KEY RUNNING NUMBER',
CREATE DG130005 IS 'KEY DUE DATE',
CREATE DG130004 IS 'KEY POSITION AS DATE',
CREATE DG130003 IS 'KEY CIF NUMBER',
CREATE DG130002 IS 'KEY CALCULATION YEAR',
CREATE DG130001 IS 'KEY PARTITION');
CREATE GRANT SELECT ON TABLE OA1P.VDG130A1A TO OA1P;
CREATE SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
DROP ADMIN DROP VIEW OA1P.VDG130K1A ;
CREATE CREATE VIEW OA1P.VDG130K1A(DG130K001, DG130K002, DG130K003,
CREATE DG130K004, DG130K005, DG130K006, DG130K007, DG130K008,
CREATE DG130K009, DG130K010, DG130K011, DG130K012, DG130K013,
CREATE DG130K014, DG130K015, DG130K016, DG130K017, DG130K018,
CREATE DG130K019, DG130K020, DG130K021, DG130K022, DG130K023,
CREATE DG130K024, DG130K025, DG130K026, DG130K027, DG130K028,
CREATE DG130K029, DG130K030, DG130K031, DG130K032, DG130K033,
CREATE DG130K034, DG130K035, DG130K036, DG130K037, DG130K038,
CREATE DG130K039, DG130K040, DG130K041, DG130K042, DG130K043,
CREATE DG130K044, DG130K045, DG130K046, DG130K047, DG130K048,
CREATE DG130K049, DG130K050, DG130K051, DG130K052, DG130K053,
CREATE DG130K054, DG130K055, DG130K056, DG130K057, DG130K058,
CREATE DG130K059, DG130K060, DG130K061, DG130K062, DG130K063,
CREATE DG130K064, DG130K065, DG130K066, DG130K067, DG130K068,
CREATE DG130K069, DG130K070, DG130K071) AS
CREATE SELECT DG130K001, DG130K002, DG130K003, DG130K004, DG130K005,
CREATE DG130K006, DG130K007, DG130K008, DG130K009, DG130K010,
CREATE DG130K011, DG130K012, DG130K013, DG130K014, DG130K015,
CREATE DG130K016, DG130K017, DG130K018, DG130K019, DG130K020,
CREATE DG130K021, DG130K022, DG130K023, DG130K024, DG130K025,
CREATE DG130K026, DG130K027, DG130K028, DG130K029, DG130K030,
CREATE DG130K031, DG130K032, DG130K033, DG130K034, DG130K035,
CREATE DG130K036, DG130K037, DG130K038, DG130K039, DG130K040,
CREATE DG130K041, DG130K042, DG130K043, DG130K044, DG130K045,
CREATE DG130K046, DG130K047, DG130K048, DG130K049, DG130K050,
CREATE DG130K051, DG130K052, DG130K053, DG130K054, DG130K055,
CREATE DG130K056, DG130K057, DG130K058, DG130K059, DG130K060,
CREATE DG130K061, DG130K062, DG130K063, DG130K064, DG130K065,
CREATE DG130K066, DG130K067, DG130K068, DG130K069, DG130K070,
CREATE DG130K071
CREATE FROM OA1P.TDG130K1 ;
CREATE LABEL ON TABLE OA1P.VDG130K1A IS 'RET FEE SHDW TABLE' ;
CREATE LABEL ON OA1P.VDG130K1A
CREATE (DG130K071 IS 'LOCAL BU CURRENCY',
CREATE DG130K070 IS 'RESERVE',
CREATE DG130K069 IS 'RESERVE',
CREATE DG130K068 IS 'RESERVE',
CREATE DG130K067 IS 'RESERVE',
CREATE DG130K066 IS 'RESERVE',
CREATE DG130K065 IS 'RESERVE',
CREATE DG130K064 IS 'RESERVE',
CREATE DG130K063 IS 'RESERVE',
CREATE DG130K062 IS 'RESERVE',
CREATE DG130K061 IS 'RESERVE',
CREATE DG130K060 IS 'RESERVE',
CREATE DG130K059 IS 'RESERVE',
CREATE DG130K058 IS 'RESERVE',
CREATE DG130K057 IS 'RESERVE',
CREATE DG130K056 IS 'RESERVE',
CREATE DG130K055 IS 'RESERVE',
CREATE DG130K054 IS 'RESERVE',
CREATE DG130K053 IS 'TS - RECALCULATED',
CREATE DG130K052 IS 'TS - DEBIT',
CREATE DG130K051 IS 'TS - SURCHRGE',
CREATE DG130K050 IS 'TS - DISCOUNT',
CREATE DG130K049 IS 'TS - CANCEL',
CREATE DG130K048 IS 'TS - INSERT',
CREATE DG130K047 IS 'PID - RECALCULATED',
CREATE DG130K046 IS 'PID - DEBIT',
CREATE DG130K045 IS 'PID - SURCHRGE',
CREATE DG130K044 IS 'PID - DISCOUNT',
CREATE DG130K043 IS 'PID - CANCEL',
CREATE DG130K042 IS 'PID - INSERT',
CREATE DG130K041 IS 'DEBIT INTERNAL TEXT',
CREATE DG130K040 IS 'DEBIT INTERNAL TEXT',
CREATE DG130K039 IS 'DEBIT FREQUENCY',
CREATE DG130K038 IS 'CALCULATION FREQUENCY',
CREATE DG130K037 IS 'DEBIT DATE',
CREATE DG130K036 IS 'CALCULATION PERIOD TO',
CREATE DG130K035 IS 'CALCULATION PERIOD FROM',
CREATE DG130K034 IS 'CALCULATION DATE',
CREATE DG130K033 IS 'CLOSURE TRANSFER CODE',
CREATE DG130K032 IS 'CANCELLATION CODE',
CREATE DG130K031 IS 'VALUE DATE',
CREATE DG130K030 IS 'NAC CODE 1 (Y/N)',
CREATE DG130K029 IS 'CALCULATION STATUS',
CREATE DG130K028 IS 'ORDER NUMBER',
CREATE DG130K027 IS 'NAC - NETTO',
CREATE DG130K026 IS 'NAC - BRUTTO',
CREATE DG130K025 IS 'TECHNICAL DISCOUNT',
CREATE DG130K024 IS 'TECHNICAL SURCHARGE',
CREATE DG130K023 IS 'ADHOC DISCOUNT',
CREATE DG130K022 IS 'ADHOC SURCHARGE',
CREATE DG130K021 IS 'SC DISCOUNT AMOUNT',
CREATE DG130K020 IS 'SC DISCOUNT %',
CREATE DG130K019 IS 'RET FLAT AMOUNT CURRENCY',
CREATE DG130K018 IS 'RET FLAT AMOUNT',
CREATE DG130K017 IS 'RET DEF AMOUNT CURRENCY',
CREATE DG130K016 IS 'RET DEFAULT AMOUNT',
CREATE DG130K015 IS 'ACCOUNT CURRENCY',
CREATE DG130K014 IS 'ACCOUNT TYPE',
CREATE DG130K013 IS 'ACCOUNT NUMBER',
CREATE DG130K012 IS 'DOMICILE',
CREATE DG130K011 IS 'CUSTOMER TYPE',
CREATE DG130K010 IS 'RET ROUTING CODE',
CREATE DG130K009 IS 'MODEL',
CREATE DG130K008 IS 'BUID',
CREATE DG130K007 IS 'TECH MUTATION DATE',
CREATE DG130K006 IS 'KEY RUNNING NUMBER',
CREATE DG130K005 IS 'KEY DUE DATE',
CREATE DG130K004 IS 'KEY POSITION AS DATE',
CREATE DG130K003 IS 'KEY CIF NUMBER',
CREATE DG130K002 IS 'KEY CALCULATION YEAR',
CREATE DG130K001 IS 'KEY PARTITION');
CREATE GRANT SELECT ON TABLE OA1P.VDG130K1A TO OA1P;
CREATE SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
DROP ADMIN DROP VIEW OA1P.VDG215A0A ;
CREATE CREATE VIEW OA1P.VDG215A0A(DG0201, DG0201Y, DG0201J, DG0201I,
CREATE DG0201B, DG0201S, DG0201P, DG0201G, DG0201L, DG0202, DG0203,
CREATE DG0204, DG0205, DG0206, DG0207, DG0208, DG0209, DG0210, DG0211,
CREATE DG0212, DG0213, DG0214, DG0215, DG0216, DG0217, DG0218, DG0219,
CREATE DG0220, DG0221, DG02221, DG02222, DG0223, DG0224, DG0225,
CREATE DG0226N, DG0226C, DG0226X, DG0226W, DG0227V, DG0227B, DG0228,
CREATE DG0229, DG0230, DG0231, DG0232, DG0233, DG0234, DG0235, DG0236,
CREATE DG0237, DG0238, DG0239, DG0240, DG0241, DG0242, DG0243, DG0244,
CREATE DG0245, DG0246, DG0247, DG0248, DG0249, DG0250, DG0251, DG0252)
CREATE AS
CREATE SELECT OA1P.TDG128A1.DG128001, SMALLINT(OA1P.TDG128A1.DG128002),
CREATE OA1P.TDG128A1.DG128002,
CREATE SUBSTR(OA1P.TDG128A1.DG128003, 1, 1),
CREATE SUBSTR(OA1P.TDG128A1.DG128003, 2, 3),
CREATE SUBSTR(OA1P.TDG128A1.DG128003, 5, 7),
CREATE SUBSTR(OA1P.TDG128A1.DG128003, 12, 1),
CREATE SUBSTR(OA1P.TDG128A1.DG128003, 13, 1),
CREATE SUBSTR(OA1P.TDG128A1.DG128003, 14, 3),
CREATE SUBSTR(OA1P.TDG128A1.DG128005, 2, 2),
CREATE OA1P.TDG128A1.DG128055,
CREATE SUBSTR(CHAR(OA1P.TDG128A1.DG128008), 1, 4) || SUBSTR(CHAR(
CREATE OA1P.TDG128A1.DG128008), 6, 2) || SUBSTR(CHAR(OA1P.
CREATE TDG128A1.DG128008), 9, 2),
CREATE SUBSTR(CHAR(OA1P.TDG128A1.DG128004), 7, 4) || SUBSTR(CHAR(
CREATE OA1P.TDG128A1.DG128004), 4, 2) || SUBSTR(CHAR(OA1P.
CREATE TDG128A1.DG128004), 1, 2),
CREATE DECIMAL(OA1P.TDG128A1.DG128013, 15, 0),
CREATE DECIMAL(OA1P.TDG128A1.DG128028, 15, 3),
CREATE SUBSTR(OA1P.TDG128A1.DG128007, 3, 4),
CREATE OA1P.TDG128A1.DG128083,
CREATE CASE(OA1P.TDG128A1.DG128033) WHEN '01.01.0001' THEN
CREATE '00000000' ELSE SUBSTR(CHAR(OA1P.TDG128A1.DG128033), 7, 4)
CREATE || SUBSTR(CHAR(OA1P.TDG128A1.DG128033), 4, 2) || SUBSTR(
CREATE CHAR(OA1P.TDG128A1.DG128033), 1, 2) END,
CREATE SUBSTR(OA1P.TDG128A1.DG128049, 1, 7),
CREATE SUBSTR(CHAR(OA1P.TDG128A1.DG128054), 1, 4) || SUBSTR(CHAR(
CREATE OA1P.TDG128A1.DG128054), 6, 2) || SUBSTR(CHAR(OA1P.
CREATE TDG128A1.DG128054), 9, 2), OA1P.TDG128A1.DG128031,
CREATE DECIMAL(OA1P.TDG128A1.DG128059, 5, 3),
CREATE DECIMAL(OA1P.TDG128A1.DG128061, 15, 0),
CREATE OA1P.TDG128A1.DG128035,
CREATE SUBSTR(OA1P.TDG128A1.DG128045, 1, 7),
CREATE SUBSTR(CHAR(OA1P.TDG128A1.DG128050), 1, 4) || SUBSTR(CHAR(
CREATE OA1P.TDG128A1.DG128050), 6, 2) || SUBSTR(CHAR(OA1P.
CREATE TDG128A1.DG128050), 9, 2),
CREATE DECIMAL(OA1P.TDG128A1.DG128018, 15, 3),
CREATE SUBSTR(OA1P.TDG128A1.DG128047, 1, 7),
CREATE SUBSTR(CHAR(OA1P.TDG128A1.DG128052), 1, 4) || SUBSTR(CHAR(
CREATE OA1P.TDG128A1.DG128052), 6, 2) || SUBSTR(CHAR(OA1P.
CREATE TDG128A1.DG128052), 9, 2),
CREATE DECIMAL(OA1P.TDG128A1.DG128062, 15, 0),
CREATE DECIMAL(OA1P.TDG128A1.DG128063, 15, 0),
CREATE OA1P.TDG128A1.DG128026,
CREATE DECIMAL(OA1P.TDG128A1.DG128021, 15, 3),
CREATE DECIMAL(OA1P.TDG128A1.DG128023, 15, 3),
CREATE SUBSTR(OA1P.TDG128A1.DG128010, 1, 16),
CREATE OA1P.TDG128A1.DG128036, OA1P.TDG128A1.DG128011,
CREATE OA1P.TDG128A1.DG128012,
CREATE SUBSTR(CHAR(OA1P.TDG128A1.DG128029), 7, 4) || SUBSTR(CHAR(
CREATE OA1P.TDG128A1.DG128029), 4, 2) || SUBSTR(CHAR(OA1P.
CREATE TDG128A1.DG128029), 1, 2),
CREATE SUBSTR(CHAR(OA1P.TDG128A1.DG128030), 7, 4) || SUBSTR(CHAR(
CREATE OA1P.TDG128A1.DG128030), 4, 2) || SUBSTR(CHAR(OA1P.
CREATE TDG128A1.DG128030), 1, 2), OA1P.TDG128A1.DG128009,
CREATE OA1P.TDG128A1.DG128034, OA1P.TDG128A1.DG128036,
CREATE DECIMAL(OA1P.TDG128A1.DG128019, 15, 3),
CREATE DECIMAL(OA1P.TDG128A1.DG128064, 15, 3),
CREATE DECIMAL(OA1P.TDG128A1.DG128065, 15, 3),
CREATE DECIMAL(OA1P.TDG128A1.DG128066, 15, 3),
CREATE OA1P.TDG128A1.DG128044 ¨¨ ' ', OA1P.TDG128A1.DG128069,
CREATE OA1P.TDG128A1.DG128073, OA1P.TDG128A1.DG128043 ¨¨ ' ',
CREATE OA1P.TDG128A1.DG128037, OA1P.TDG128A1.DG128038 ¨¨ ' ',
CREATE OA1P.TDG128A1.DG128007,
CREATE DECIMAL(OA1P.TDG128A1.DG128016, 15, 7),
CREATE OA1P.TDG128A1.DG128039, OA1P.TDG128A1.DG128040,
CREATE OA1P.TDG128A1.DG128041, OA1P.TDG128A1.DG128042,
CREATE OA1P.TDG128A1.DG128043, OA1P.TDG128A1.DG128044,
CREATE OA1P.TDG128A1.DG128067, OA1P.TDG128A1.DG128068,
CREATE OA1P.TDG128A1.DG128057, OA1P.TDG128A1.DG128058
CREATE FROM OA1P.TDG128A1 ;
CREATE GRANT SELECT ON TABLE OA1P.VDG215A0A TO OA1P;
CREATE SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
DROP ADMIN DROP VIEW OA1P.VDG314A0A ;
CREATE CREATE VIEW OA1P.VDG314A0A(DG0301, DG0301Y, DG0301J, DG0301I,
CREATE DG0301B, DG0301S, DG0301P, DG0301G, DG0301L, DG0302, DG0303,
CREATE DG0304, DG0305, DG0306I, DG0306B, DG0306N, DG0306P, DG0307,
CREATE DG0308A, DG0308B, DG0308C, DG0309, DG0310, DG0311, DG0312,
CREATE DG0313, DG0314, DG0315A, DG0315B, DG0315C, DG0315D, DG0316,
CREATE DG0317, DG0318, DG0319, DG0320, DG0321, DG0322, DG0323A,
CREATE DG0323B, DG0324A, DG0324B, DG0325A, DG0325B, DG0326A, DG0326B,
CREATE DG0327, DG0328, DG0329, DG0330, DG0331, DG0332, DG0333, DG0334,
CREATE DG0335, DG0336, DG0337, DG0338, DG0339, DG0340, DG0341C,
CREATE DG0341X, DG0342, DG0343, DG0344, DG0345, DG0346, DG0347, DG0348,
CREATE DG0349, DG0350, DG0351, DG0352, DG0353, DG0354, DG0355, DG0356,
CREATE DG0357, DG0358, DG0359, DG0360, DG0361, DG0362, DG0363, DG0364,
CREATE DG0365, DG0366, DG0367, DG0368, DG0369, DG0370, DG0371, DG0372,
CREATE DG0373, DG0374, DG0375, DG0376, DG0377) AS
CREATE SELECT OA1P.TDG127A1.DG127001, SMALLINT(OA1P.TDG127A1.DG127002),
CREATE OA1P.TDG127A1.DG127002,
CREATE SUBSTR(OA1P.TDG127A1.DG127003, 1, 1),
CREATE SUBSTR(OA1P.TDG127A1.DG127003, 2, 3),
CREATE SUBSTR(OA1P.TDG127A1.DG127003, 5, 7),
CREATE SUBSTR(OA1P.TDG127A1.DG127003, 12, 1),
CREATE SUBSTR(OA1P.TDG127A1.DG127003, 13, 1),
CREATE SUBSTR(OA1P.TDG127A1.DG127003, 14, 3),
CREATE OA1P.TDG127A1.DG127139,
CREATE SUBSTR(CHAR(OA1P.TDG127A1.DG127007), 1, 4) || SUBSTR(CHAR(
CREATE OA1P.TDG127A1.DG127007), 6, 2) || SUBSTR(CHAR(OA1P.
CREATE TDG127A1.DG127007), 9, 2),
CREATE SUBSTR(CHAR(OA1P.TDG127A1.DG127004), 7, 4) || SUBSTR(CHAR(
CREATE OA1P.TDG127A1.DG127004), 4, 2) || SUBSTR(CHAR(OA1P.
CREATE TDG127A1.DG127004), 1, 2),
CREATE SUBSTR(OA1P.TDG127A1.DG127010, 1, 7),
CREATE SUBSTR(OA1P.TDG127A1.DG127011, 1, 1),
CREATE SUBSTR(OA1P.TDG127A1.DG127011, 2, 3),
CREATE SUBSTR(OA1P.TDG127A1.DG127011, 5, 7),
CREATE SUBSTR(OA1P.TDG127A1.DG127011, 12, 1),
CREATE OA1P.TDG127A1.DG127114,
CREATE DECIMAL(OA1P.TDG127A1.DG127129, 15, 0),
CREATE DECIMAL(OA1P.TDG127A1.DG127130, 15, 0),
CREATE DECIMAL(OA1P.TDG127A1.DG127131, 15, 0),
CREATE DECIMAL(OA1P.TDG127A1.DG127072, 15, 3),
CREATE DECIMAL(OA1P.TDG127A1.DG127145, 15, 3),
CREATE DECIMAL(OA1P.TDG127A1.DG127146, 15, 3),
CREATE DECIMAL(OA1P.TDG127A1.DG127036, 15, 3),
CREATE DECIMAL(OA1P.TDG127A1.DG127048, 15, 3),
CREATE DECIMAL(OA1P.TDG127A1.DG127076, 15, 3),
CREATE DECIMAL(OA1P.TDG127A1.DG127080, 15, 3),
CREATE DECIMAL(OA1P.TDG127A1.DG127056, 15, 3),
CREATE DECIMAL(OA1P.TDG127A1.DG127147, 15, 3),
CREATE DECIMAL(OA1P.TDG127A1.DG127132, 15, 3),
CREATE DECIMAL(OA1P.TDG127A1.DG127060, 15, 3),
CREATE DECIMAL(OA1P.TDG127A1.DG127133, 15, 3),
CREATE DECIMAL(OA1P.TDG127A1.DG127064, 15, 3),
CREATE DECIMAL(OA1P.TDG127A1.DG127068, 15, 3),
CREATE OA1P.TDG127A1.DG127134, OA1P.TDG127A1.DG127102,
CREATE SUBSTR(CHAR(OA1P.TDG127A1.DG127123), 7, 4) || SUBSTR(CHAR(
CREATE OA1P.TDG127A1.DG127123), 4, 2) || SUBSTR(CHAR(OA1P.
CREATE TDG127A1.DG127123), 1, 2),
CREATE SUBSTR(OA1P.TDG127A1.DG127117, 1, 7),
CREATE SUBSTR(CHAR(OA1P.TDG127A1.DG127135), 7, 4) || SUBSTR(CHAR(
CREATE OA1P.TDG127A1.DG127135), 4, 2) || SUBSTR(CHAR(OA1P.
CREATE TDG127A1.DG127135), 1, 2),
CREATE SUBSTR(OA1P.TDG127A1.DG127165, 1, 7),
CREATE SUBSTR(CHAR(OA1P.TDG127A1.DG127103), 7, 4) || SUBSTR(CHAR(
CREATE OA1P.TDG127A1.DG127103), 4, 2) || SUBSTR(CHAR(OA1P.
CREATE TDG127A1.DG127103), 1, 2),
CREATE SUBSTR(OA1P.TDG127A1.DG127166, 1, 7),
CREATE SUBSTR(CHAR(OA1P.TDG127A1.DG127104), 7, 4) || SUBSTR(CHAR(
CREATE OA1P.TDG127A1.DG127104), 4, 2) || SUBSTR(CHAR(OA1P.
CREATE TDG127A1.DG127104), 1, 2),
CREATE CHAR(OA1P.TDG127A1.DG127106 || ' '),
CREATE CHAR(OA1P.TDG127A1.DG127008 || ' '),
CREATE CASE(OA1P.TDG127A1.DG127100) WHEN '01.01.0001' THEN
CREATE '00000000' ELSE SUBSTR(CHAR(OA1P.TDG127A1.DG127100), 7, 4)
CREATE || SUBSTR(CHAR(OA1P.TDG127A1.DG127100), 4, 2) || SUBSTR(
CREATE CHAR(OA1P.TDG127A1.DG127100), 1, 2) END,
CREATE DECIMAL(OA1P.TDG127A1.DG127140, 15, 3),
CREATE OA1P.TDG127A1.DG127115,
CREATE DECIMAL(OA1P.TDG127A1.DG127173, 15, 3),
CREATE DECIMAL(OA1P.TDG127A1.DG127174, 15, 3),
CREATE DECIMAL(OA1P.TDG127A1.DG127175, 15, 3),
CREATE DECIMAL(OA1P.TDG127A1.DG127176, 15, 3),
CREATE DECIMAL(OA1P.TDG127A1.DG127177, 15, 3),
CREATE DECIMAL(OA1P.TDG127A1.DG127178, 15, 3),
CREATE DECIMAL(OA1P.TDG127A1.DG127179, 15, 3),
CREATE DECIMAL(OA1P.TDG127A1.DG127018, 5, 3),
CREATE CHAR(OA1P.TDG127A1.DG127150 || ' '),
CREATE DECIMAL(OA1P.TDG127A1.DG127097, 15, 3),
CREATE SUBSTR(OA1P.TDG127A1.DG127012, 1, 16),
CREATE OA1P.TDG127A1.DG127136, OA1P.TDG127A1.DG127013,
CREATE OA1P.TDG127A1.DG127014, OA1P.TDG127A1.DG127151,
CREATE OA1P.TDG127A1.DG127127, OA1P.TDG127A1.DG127128,
CREATE OA1P.TDG127A1.DG127098,
CREATE DECIMAL(OA1P.TDG127A1.DG127026, 5, 3),
CREATE SUBSTR(OA1P.TDG127A1.DG127009, 1, 7),
CREATE OA1P.TDG127A1.DG127167, OA1P.TDG127A1.DG127101,
CREATE CASE(OA1P.TDG127A1.DG127137) WHEN '01.01.0001' THEN ''
CREATE ELSE SUBSTR(CHAR(OA1P.TDG127A1.DG127137), 7, 4) || SUBSTR(
CREATE CHAR(OA1P.TDG127A1.DG127137), 4, 2) || SUBSTR(CHAR(OA1P.
CREATE TDG127A1.DG127137), 1, 2) END, OA1P.TDG127A1.DG127105,
CREATE SUBSTR(OA1P.TDG127A1.DG127160, 1, 5),
CREATE DECIMAL(OA1P.TDG127A1.DG127132, 15, 0),
CREATE DECIMAL(OA1P.TDG127A1.DG127133, 15, 0),
CREATE OA1P.TDG127A1.DG127106, OA1P.TDG127A1.DG127107,
CREATE OA1P.TDG127A1.DG127008,
CREATE DECIMAL(OA1P.TDG127A1.DG127018, 15, 7),
CREATE DECIMAL(OA1P.TDG127A1.DG127026, 15, 7),
CREATE DECIMAL(OA1P.TDG127A1.DG127022, 15, 7),
CREATE SUBSTR(OA1P.TDG127A1.DG127009, 1, 4),
CREATE OA1P.TDG127A1.DG127108, OA1P.TDG127A1.DG127109,
CREATE OA1P.TDG127A1.DG127110, OA1P.TDG127A1.DG127111,
CREATE OA1P.TDG127A1.DG127112, OA1P.TDG127A1.DG127113,
CREATE OA1P.TDG127A1.DG127115,
CREATE DECIMAL(OA1P.TDG127A1.DG127032, 15, 0),
CREATE DECIMAL(OA1P.TDG127A1.DG127027, 15, 3),
CREATE OA1P.TDG127A1.DG127116,
CREATE DECIMAL(OA1P.TDG127A1.DG127084, 15, 3),
CREATE DECIMAL(OA1P.TDG127A1.DG127088, 15, 3),
CREATE DECIMAL(OA1P.TDG127A1.DG127092, 15, 3),
CREATE DECIMAL(OA1P.TDG127A1.DG127096, 15, 3),
CREATE DECIMAL(OA1P.TDG127A1.DG127028, 15, 3)
CREATE FROM OA1P.TDG127A1 ;
CREATE GRANT SELECT ON TABLE OA1P.VDG314A0A TO OA1P;
}¢--- DSN.TX.CASE(WK923DDL) cre=2009-09-07 mod=2010-07-29-15.18.14 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
$=cr2=$creator
SET CURRENT SQLID='S100447';
drop tablespace $db.a923a;
commit;
$@¢
if $phase >= 1 then $@=¢
------------------------------------------------------------------------
CREATE TABLESPACE A923A
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
SEGSIZE 64
BUFFERPOOL BP32K
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255
;
commit;
CREATE TABLE $creator.TWK923
(DG127001 CHAR(1) NOT NULL,
DG127002 CHAR(4) NOT NULL,
DG127003 CHAR(20) NOT NULL,
DG127004 DATE NOT NULL WITH DEFAULT,
DG127005 CHAR(3) NOT NULL WITH DEFAULT,
DG127006 SMALLINT NOT NULL,
DG127007 TIMESTAMP NOT NULL WITH DEFAULT,
DG127008 CHAR(4) NOT NULL,
DG127009 CHAR(8) NOT NULL,
DG127010 CHAR(8) NOT NULL,
DG127011 CHAR(20) NOT NULL,
DG127012 CHAR(20) NOT NULL,
DG127013 CHAR(3) NOT NULL WITH DEFAULT,
DG127014 CHAR(4) NOT NULL,
DG127015 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127016 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127017 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127018 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127019 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127020 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127021 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127022 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127023 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127024 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127025 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127026 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127027 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127028 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127029 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127030 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127031 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127032 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127033 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127034 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127035 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127036 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127037 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127038 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127039 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127040 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127041 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127042 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127043 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127044 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127045 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127046 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127047 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127048 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127049 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127050 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127051 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127052 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127053 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127054 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127055 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127056 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127057 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127058 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127059 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127060 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127061 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127062 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127063 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127064 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127065 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127066 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127067 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127068 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127069 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127070 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127071 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127072 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127073 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127074 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127075 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127076 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127077 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127078 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127079 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127080 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127081 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127082 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127083 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127084 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127085 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127086 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127087 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127088 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127089 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127090 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127091 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127092 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127093 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127094 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127095 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127096 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127097 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127098 CHAR(18) NOT NULL WITH DEFAULT,
DG127099 SMALLINT NOT NULL,
DG127100 DATE NOT NULL WITH DEFAULT,
DG127101 CHAR(4) NOT NULL WITH DEFAULT,
DG127102 CHAR(1) NOT NULL WITH DEFAULT,
DG127103 DATE NOT NULL WITH DEFAULT,
DG127104 DATE NOT NULL WITH DEFAULT,
DG127105 CHAR(1) NOT NULL WITH DEFAULT,
DG127106 CHAR(4) NOT NULL WITH DEFAULT,
DG127107 CHAR(3) NOT NULL WITH DEFAULT,
DG127108 CHAR(2) NOT NULL WITH DEFAULT,
DG127109 CHAR(2) NOT NULL WITH DEFAULT,
DG127110 CHAR(3) NOT NULL WITH DEFAULT,
DG127111 CHAR(3) NOT NULL WITH DEFAULT,
DG127112 CHAR(3) NOT NULL WITH DEFAULT,
DG127113 CHAR(3) NOT NULL WITH DEFAULT,
DG127114 CHAR(3) NOT NULL WITH DEFAULT,
DG127115 CHAR(3) NOT NULL WITH DEFAULT,
DG127116 CHAR(8) NOT NULL WITH DEFAULT,
DG127117 CHAR(8) NOT NULL WITH DEFAULT,
DG127118 CHAR(8) NOT NULL WITH DEFAULT,
DG127119 CHAR(8) NOT NULL WITH DEFAULT,
DG127120 CHAR(8) NOT NULL WITH DEFAULT,
DG127121 CHAR(8) NOT NULL WITH DEFAULT,
DG127122 TIMESTAMP NOT NULL WITH DEFAULT,
DG127123 TIMESTAMP NOT NULL WITH DEFAULT,
DG127124 TIMESTAMP NOT NULL WITH DEFAULT,
DG127125 TIMESTAMP NOT NULL WITH DEFAULT,
DG127126 TIMESTAMP NOT NULL WITH DEFAULT,
DG127127 CHAR(30) NOT NULL WITH DEFAULT,
DG127128 CHAR(30) NOT NULL WITH DEFAULT,
DG127129 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127130 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127131 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127132 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127133 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127134 CHAR(1) NOT NULL WITH DEFAULT,
DG127135 DATE NOT NULL WITH DEFAULT,
DG127136 CHAR(3) NOT NULL WITH DEFAULT,
DG127137 DATE NOT NULL WITH DEFAULT,
DG127138 CHAR(3) NOT NULL WITH DEFAULT,
DG127139 CHAR(5) NOT NULL WITH DEFAULT,
DG127140 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127141 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127142 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127143 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127144 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127145 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127146 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127147 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127148 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127149 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127150 CHAR(1) NOT NULL WITH DEFAULT,
DG127151 CHAR(1) NOT NULL WITH DEFAULT,
DG127152 CHAR(1) NOT NULL WITH DEFAULT,
DG127153 CHAR(1) NOT NULL WITH DEFAULT,
DG127154 CHAR(1) NOT NULL WITH DEFAULT,
DG127155 CHAR(3) NOT NULL WITH DEFAULT,
DG127156 CHAR(3) NOT NULL WITH DEFAULT,
DG127157 CHAR(3) NOT NULL WITH DEFAULT,
DG127158 CHAR(3) NOT NULL WITH DEFAULT,
DG127159 CHAR(3) NOT NULL WITH DEFAULT,
DG127160 CHAR(10) NOT NULL WITH DEFAULT,
DG127161 CHAR(10) NOT NULL WITH DEFAULT,
DG127162 CHAR(10) NOT NULL WITH DEFAULT,
DG127163 CHAR(10) NOT NULL WITH DEFAULT,
DG127164 CHAR(10) NOT NULL WITH DEFAULT,
DG127165 CHAR(8) NOT NULL WITH DEFAULT,
DG127166 CHAR(8) NOT NULL WITH DEFAULT,
DG127167 CHAR(8) NOT NULL WITH DEFAULT,
DG127168 CHAR(8) NOT NULL WITH DEFAULT,
DG127169 CHAR(8) NOT NULL WITH DEFAULT,
DG127170 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127171 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127172 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127173 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127174 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127175 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127176 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127177 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127178 DECIMAL(31, 8) NOT NULL WITH DEFAULT,
DG127179 DECIMAL(31, 8) NOT NULL WITH DEFAULT
)
IN $db.A923A;
COMMIT;
$!
if $phase >= 2 then $@=¢
SET CURRENT PATH = "SYSIBM","SYSFUN", SYSPROC , $creator ;
CREATE VIEW $creator.VWK923
(DG0301, DG0301Y, DG0301J, DG0301I,
DG0301B, DG0301S, DG0301P, DG0301G, DG0301L, DG0302, DG0303,
DG0304, DG0305, DG0306I, DG0306B, DG0306N, DG0306P, DG0307,
DG0308A, DG0308B, DG0308C, DG0309, DG0310, DG0311, DG0312,
DG0313, DG0314, DG0315A, DG0315B, DG0315C, DG0315D, DG0316,
DG0317, DG0318, DG0319, DG0320, DG0321, DG0322, DG0323A,
DG0323B, DG0324A, DG0324B, DG0325A, DG0325B, DG0326A, DG0326B,
DG0327, DG0328, DG0329, DG0330, DG0331, DG0332, DG0333, DG0334,
DG0335, DG0336, DG0337, DG0338, DG0339, DG0340, DG0341C,
DG0341X, DG0342, DG0343, DG0344, DG0345, DG0346, DG0347, DG0348,
DG0349, DG0350, DG0351, DG0352, DG0353, DG0354, DG0355, DG0356,
DG0357, DG0358, DG0359, DG0360, DG0361, DG0362, DG0363, DG0364,
DG0365, DG0366, DG0367, DG0368, DG0369, DG0370, DG0371, DG0372,
DG0373, DG0374, DG0375, DG0376, DG0377) AS
SELECT $cr2.TWK923.DG127001, SMALLINT($cr2.TWK923.DG127002),
$cr2.TWK923.DG127002,
SUBSTR($cr2.TWK923.DG127003, 1, 1),
SUBSTR($cr2.TWK923.DG127003, 2, 3),
SUBSTR($cr2.TWK923.DG127003, 5, 7),
SUBSTR($cr2.TWK923.DG127003, 12, 1),
SUBSTR($cr2.TWK923.DG127003, 13, 1),
SUBSTR($cr2.TWK923.DG127003, 14, 3),
$cr2.TWK923.DG127139,
SUBSTR(CHAR($cr2.TWK923.DG127007), 1, 4) || SUBSTR(CHAR(
$cr2.TWK923.DG127007), 6, 2) || SUBSTR(CHAR($cr2.
TWK923.DG127007), 9, 2),
SUBSTR(CHAR($cr2.TWK923.DG127004), 7, 4) || SUBSTR(CHAR(
$cr2.TWK923.DG127004), 4, 2) || SUBSTR(CHAR($cr2.
TWK923.DG127004), 1, 2),
SUBSTR($cr2.TWK923.DG127010, 1, 7),
SUBSTR($cr2.TWK923.DG127011, 1, 1),
SUBSTR($cr2.TWK923.DG127011, 2, 3),
SUBSTR($cr2.TWK923.DG127011, 5, 7),
SUBSTR($cr2.TWK923.DG127011, 12, 1),
$cr2.TWK923.DG127114,
DECIMAL($cr2.TWK923.DG127129, 15, 0),
DECIMAL($cr2.TWK923.DG127130, 15, 0),
DECIMAL($cr2.TWK923.DG127131, 15, 0),
DECIMAL($cr2.TWK923.DG127072, 15, 3),
DECIMAL($cr2.TWK923.DG127145, 15, 3),
DECIMAL($cr2.TWK923.DG127146, 15, 3),
DECIMAL($cr2.TWK923.DG127036, 15, 3),
DECIMAL($cr2.TWK923.DG127048, 15, 3),
DECIMAL($cr2.TWK923.DG127076, 15, 3),
DECIMAL($cr2.TWK923.DG127080, 15, 3),
DECIMAL($cr2.TWK923.DG127056, 15, 3),
DECIMAL($cr2.TWK923.DG127147, 15, 3),
DECIMAL($cr2.TWK923.DG127132, 15, 3),
DECIMAL($cr2.TWK923.DG127060, 15, 3),
DECIMAL($cr2.TWK923.DG127133, 15, 3),
DECIMAL($cr2.TWK923.DG127064, 15, 3),
DECIMAL($cr2.TWK923.DG127068, 15, 3),
$cr2.TWK923.DG127134, $cr2.TWK923.DG127102,
SUBSTR(CHAR($cr2.TWK923.DG127123), 7, 4) || SUBSTR(CHAR(
$cr2.TWK923.DG127123), 4, 2) || SUBSTR(CHAR($cr2.
TWK923.DG127123), 1, 2),
SUBSTR($cr2.TWK923.DG127117, 1, 7),
SUBSTR(CHAR($cr2.TWK923.DG127135), 7, 4) || SUBSTR(CHAR(
$cr2.TWK923.DG127135), 4, 2) || SUBSTR(CHAR($cr2.
TWK923.DG127135), 1, 2),
SUBSTR($cr2.TWK923.DG127165, 1, 7),
SUBSTR(CHAR($cr2.TWK923.DG127103), 7, 4) || SUBSTR(CHAR(
$cr2.TWK923.DG127103), 4, 2) || SUBSTR(CHAR($cr2.
TWK923.DG127103), 1, 2),
SUBSTR($cr2.TWK923.DG127166, 1, 7),
SUBSTR(CHAR($cr2.TWK923.DG127104), 7, 4) || SUBSTR(CHAR(
$cr2.TWK923.DG127104), 4, 2) || SUBSTR(CHAR($cr2.
TWK923.DG127104), 1, 2),
CHAR($cr2.TWK923.DG127106 || ' '),
CHAR($cr2.TWK923.DG127008 || ' '),
CASE($cr2.TWK923.DG127100) WHEN '01.01.0001' THEN
'00000000' ELSE SUBSTR(CHAR($cr2.TWK923.DG127100), 7, 4)
|| SUBSTR(CHAR($cr2.TWK923.DG127100), 4, 2) || SUBSTR(
CHAR($cr2.TWK923.DG127100), 1, 2) END,
DECIMAL($cr2.TWK923.DG127140, 15, 3),
$cr2.TWK923.DG127115,
DECIMAL($cr2.TWK923.DG127173, 15, 3),
DECIMAL($cr2.TWK923.DG127174, 15, 3),
DECIMAL($cr2.TWK923.DG127175, 15, 3),
DECIMAL($cr2.TWK923.DG127176, 15, 3),
DECIMAL($cr2.TWK923.DG127177, 15, 3),
DECIMAL($cr2.TWK923.DG127178, 15, 3),
DECIMAL($cr2.TWK923.DG127179, 15, 3),
DECIMAL($cr2.TWK923.DG127018, 5, 3),
CHAR($cr2.TWK923.DG127150 || ' '),
DECIMAL($cr2.TWK923.DG127097, 15, 3),
SUBSTR($cr2.TWK923.DG127012, 1, 16),
$cr2.TWK923.DG127136, $cr2.TWK923.DG127013,
$cr2.TWK923.DG127014, $cr2.TWK923.DG127151,
$cr2.TWK923.DG127127, $cr2.TWK923.DG127128,
$cr2.TWK923.DG127098,
DECIMAL($cr2.TWK923.DG127026, 5, 3),
SUBSTR($cr2.TWK923.DG127009, 1, 7),
$cr2.TWK923.DG127167, $cr2.TWK923.DG127101,
CASE($cr2.TWK923.DG127137) WHEN '01.01.0001' THEN ''
ELSE SUBSTR(CHAR($cr2.TWK923.DG127137), 7, 4) || SUBSTR(
CHAR($cr2.TWK923.DG127137), 4, 2) || SUBSTR(CHAR($cr2.
TWK923.DG127137), 1, 2) END, $cr2.TWK923.DG127105,
SUBSTR($cr2.TWK923.DG127160, 1, 5),
DECIMAL($cr2.TWK923.DG127132, 15, 0),
DECIMAL($cr2.TWK923.DG127133, 15, 0),
$cr2.TWK923.DG127106, $cr2.TWK923.DG127107,
$cr2.TWK923.DG127008,
DECIMAL($cr2.TWK923.DG127018, 15, 7),
DECIMAL($cr2.TWK923.DG127026, 15, 7),
DECIMAL($cr2.TWK923.DG127022, 15, 7),
SUBSTR($cr2.TWK923.DG127009, 1, 4),
$cr2.TWK923.DG127108, $cr2.TWK923.DG127109,
$cr2.TWK923.DG127110, $cr2.TWK923.DG127111,
$cr2.TWK923.DG127112, $cr2.TWK923.DG127113,
$cr2.TWK923.DG127115,
DECIMAL($cr2.TWK923.DG127032, 15, 0),
DECIMAL($cr2.TWK923.DG127027, 15, 3),
$cr2.TWK923.DG127116,
DECIMAL($cr2.TWK923.DG127084, 15, 3),
DECIMAL($cr2.TWK923.DG127088, 15, 3),
DECIMAL($cr2.TWK923.DG127092, 15, 3),
DECIMAL($cr2.TWK923.DG127096, 15, 3),
DECIMAL($cr2.TWK923.DG127028, 15, 3)
FROM $cr2.TWK923 ;
commit;
$!
$!
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(WK923DDM) cre=2009-09-07 mod=2009-09-07-17.24.08 A540769 -----
SET CURRENT SQLID = 'S100447' ;
SET CURRENT PATH = "SYSIBM","SYSFUN", SYSPROC , $creator ;
DROP VIEW $creator.VWK923 ;
CREATE VIEW $creator.VWK923
(DG0301, DG0301Y, DG0301J, DG0301I,
DG0301B, DG0301S, DG0301P, DG0301G, DG0301L, DG0302, DG0303,
DG0304, DG0305, DG0306I, DG0306B, DG0306N, DG0306P, DG0307,
DG0308A, DG0308B, DG0308C, DG0309, DG0310, DG0311, DG0312,
DG0313, DG0314, DG0315A, DG0315B, DG0315C, DG0315D, DG0316,
DG0317, DG0318, DG0319, DG0320, DG0321, DG0322, DG0323A,
DG0323B, DG0324A, DG0324B, DG0325A, DG0325B, DG0326A, DG0326B,
DG0327, DG0328, DG0329, DG0330, DG0331, DG0332, DG0333, DG0334,
DG0335, DG0336, DG0337, DG0338, DG0339, DG0340, DG0341C,
DG0341X, DG0342, DG0343, DG0344, DG0345, DG0346, DG0347, DG0348,
DG0349, DG0350, DG0351, DG0352, DG0353, DG0354, DG0355, DG0356,
DG0357, DG0358, DG0359, DG0360, DG0361, DG0362, DG0363, DG0364,
DG0365, DG0366, DG0367, DG0368, DG0369, DG0370, DG0371, DG0372,
DG0373, DG0374, DG0375, DG0376, DG0377) AS
SELECT $cr2.TDG127A1.DG127001, SMALLINT($cr2.TDG127A1.DG127002),
$cr2.TDG127A1.DG127002,
SUBSTR($cr2.TDG127A1.DG127003, 1, 1),
SUBSTR($cr2.TDG127A1.DG127003, 2, 3),
SUBSTR($cr2.TDG127A1.DG127003, 5, 7),
SUBSTR($cr2.TDG127A1.DG127003, 12, 1),
SUBSTR($cr2.TDG127A1.DG127003, 13, 1),
SUBSTR($cr2.TDG127A1.DG127003, 14, 3),
$cr2.TDG127A1.DG127139,
SUBSTR(CHAR($cr2.TDG127A1.DG127007), 1, 4) || SUBSTR(CHAR(
$cr2.TDG127A1.DG127007), 6, 2) || SUBSTR(CHAR($cr2.
TDG127A1.DG127007), 9, 2),
SUBSTR(CHAR($cr2.TDG127A1.DG127004), 7, 4) || SUBSTR(CHAR(
$cr2.TDG127A1.DG127004), 4, 2) || SUBSTR(CHAR($cr2.
TDG127A1.DG127004), 1, 2),
SUBSTR($cr2.TDG127A1.DG127010, 1, 7),
SUBSTR($cr2.TDG127A1.DG127011, 1, 1),
SUBSTR($cr2.TDG127A1.DG127011, 2, 3),
SUBSTR($cr2.TDG127A1.DG127011, 5, 7),
SUBSTR($cr2.TDG127A1.DG127011, 12, 1),
$cr2.TDG127A1.DG127114,
DECIMAL($cr2.TDG127A1.DG127129, 15, 0),
DECIMAL($cr2.TDG127A1.DG127130, 15, 0),
DECIMAL($cr2.TDG127A1.DG127131, 15, 0),
DECIMAL($cr2.TDG127A1.DG127072, 15, 3),
DECIMAL($cr2.TDG127A1.DG127145, 15, 3),
DECIMAL($cr2.TDG127A1.DG127146, 15, 3),
DECIMAL($cr2.TDG127A1.DG127036, 15, 3),
DECIMAL($cr2.TDG127A1.DG127048, 15, 3),
DECIMAL($cr2.TDG127A1.DG127076, 15, 3),
DECIMAL($cr2.TDG127A1.DG127080, 15, 3),
DECIMAL($cr2.TDG127A1.DG127056, 15, 3),
DECIMAL($cr2.TDG127A1.DG127147, 15, 3),
DECIMAL($cr2.TDG127A1.DG127132, 15, 3),
DECIMAL($cr2.TDG127A1.DG127060, 15, 3),
DECIMAL($cr2.TDG127A1.DG127133, 15, 3),
DECIMAL($cr2.TDG127A1.DG127064, 15, 3),
DECIMAL($cr2.TDG127A1.DG127068, 15, 3),
$cr2.TDG127A1.DG127134, $cr2.TDG127A1.DG127102,
SUBSTR(CHAR($cr2.TDG127A1.DG127123), 7, 4) || SUBSTR(CHAR(
$cr2.TDG127A1.DG127123), 4, 2) || SUBSTR(CHAR($cr2.
TDG127A1.DG127123), 1, 2),
SUBSTR($cr2.TDG127A1.DG127117, 1, 7),
SUBSTR(CHAR($cr2.TDG127A1.DG127135), 7, 4) || SUBSTR(CHAR(
$cr2.TDG127A1.DG127135), 4, 2) || SUBSTR(CHAR($cr2.
TDG127A1.DG127135), 1, 2),
SUBSTR($cr2.TDG127A1.DG127165, 1, 7),
SUBSTR(CHAR($cr2.TDG127A1.DG127103), 7, 4) || SUBSTR(CHAR(
$cr2.TDG127A1.DG127103), 4, 2) || SUBSTR(CHAR($cr2.
TDG127A1.DG127103), 1, 2),
SUBSTR($cr2.TDG127A1.DG127166, 1, 7),
SUBSTR(CHAR($cr2.TDG127A1.DG127104), 7, 4) || SUBSTR(CHAR(
$cr2.TDG127A1.DG127104), 4, 2) || SUBSTR(CHAR($cr2.
TDG127A1.DG127104), 1, 2),
CHAR($cr2.TDG127A1.DG127106 || ' '),
CHAR($cr2.TDG127A1.DG127008 || ' '),
CASE($cr2.TDG127A1.DG127100) WHEN '01.01.0001' THEN
'00000000' ELSE SUBSTR(CHAR($cr2.TDG127A1.DG127100), 7, 4)
|| SUBSTR(CHAR($cr2.TDG127A1.DG127100), 4, 2) || SUBSTR(
CHAR($cr2.TDG127A1.DG127100), 1, 2) END,
DECIMAL($cr2.TDG127A1.DG127140, 15, 3),
$cr2.TDG127A1.DG127115,
DECIMAL($cr2.TDG127A1.DG127173, 15, 3),
DECIMAL($cr2.TDG127A1.DG127174, 15, 3),
DECIMAL($cr2.TDG127A1.DG127175, 15, 3),
DECIMAL($cr2.TDG127A1.DG127176, 15, 3),
DECIMAL($cr2.TDG127A1.DG127177, 15, 3),
DECIMAL($cr2.TDG127A1.DG127178, 15, 3),
DECIMAL($cr2.TDG127A1.DG127179, 15, 3),
DECIMAL($cr2.TDG127A1.DG127018, 5, 3),
CHAR($cr2.TDG127A1.DG127150 || ' '),
DECIMAL($cr2.TDG127A1.DG127097, 15, 3),
SUBSTR($cr2.TDG127A1.DG127012, 1, 16),
$cr2.TDG127A1.DG127136, $cr2.TDG127A1.DG127013,
$cr2.TDG127A1.DG127014, $cr2.TDG127A1.DG127151,
$cr2.TDG127A1.DG127127, $cr2.TDG127A1.DG127128,
$cr2.TDG127A1.DG127098,
DECIMAL($cr2.TDG127A1.DG127026, 5, 3),
SUBSTR($cr2.TDG127A1.DG127009, 1, 7),
$cr2.TDG127A1.DG127167, $cr2.TDG127A1.DG127101,
CASE($cr2.TDG127A1.DG127137) WHEN '01.01.0001' THEN ''
ELSE SUBSTR(CHAR($cr2.TDG127A1.DG127137), 7, 4) || SUBSTR(
CHAR($cr2.TDG127A1.DG127137), 4, 2) || SUBSTR(CHAR($cr2.
TDG127A1.DG127137), 1, 2) END, $cr2.TDG127A1.DG127105,
SUBSTR($cr2.TDG127A1.DG127160, 1, 5),
DECIMAL($cr2.TDG127A1.DG127132, 15, 0),
DECIMAL($cr2.TDG127A1.DG127133, 15, 0),
$cr2.TDG127A1.DG127106, $cr2.TDG127A1.DG127107,
$cr2.TDG127A1.DG127008,
DECIMAL($cr2.TDG127A1.DG127018, 15, 7),
DECIMAL($cr2.TDG127A1.DG127026, 15, 7),
DECIMAL($cr2.TDG127A1.DG127022, 15, 7),
SUBSTR($cr2.TDG127A1.DG127009, 1, 4),
$cr2.TDG127A1.DG127108, $cr2.TDG127A1.DG127109,
$cr2.TDG127A1.DG127110, $cr2.TDG127A1.DG127111,
$cr2.TDG127A1.DG127112, $cr2.TDG127A1.DG127113,
$cr2.TDG127A1.DG127115,
DECIMAL($cr2.TDG127A1.DG127032, 15, 0),
DECIMAL($cr2.TDG127A1.DG127027, 15, 3),
$cr2.TDG127A1.DG127116,
DECIMAL($cr2.TDG127A1.DG127084, 15, 3),
DECIMAL($cr2.TDG127A1.DG127088, 15, 3),
DECIMAL($cr2.TDG127A1.DG127092, 15, 3),
DECIMAL($cr2.TDG127A1.DG127096, 15, 3),
DECIMAL($cr2.TDG127A1.DG127028, 15, 3)
FROM $cr2.TDG127A1 ;
}¢--- DSN.TX.CASE(WK923IGN) cre= mod= ------------------------------------------
SYSVIEWS:OWNER,OWNERTYPE
}¢--- DSN.TX.CASE(WK923MAS) cre=2009-09-07 mod=2009-09-07-17.36.38 A540769 -----
DBNAME:DGDB9998,DA540769 00010000
AUTHID:GDB9998*,A540769* 00020000
}¢--- DSN.TX.CASE(WK924) cre=2009-09-10 mod=2010-08-06-13.05.15 A540769 --------
* table für update testing
creDb trg 1
+ ok creDb A540769.TX.GENF(WK924t1) ::f
* start parallel wk924u2j und wk924upj (update mit/ohne commit)
* start wk924cop to create copy, browse copy file
manual check timestamps correspond to copy timestamps
+ wait check timestamps correspond to copy timestamps
manual check rba in syscopy with wk924rba
}¢--- DSN.TX.CASE(WK924COP) cre=2009-09-10 mod=2009-09-10-16.33.15 A540769 -----
//A540769C JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG SYSTEM=S14
//*
//P02 EXEC PGM=DSNUTILB,
// PARM='DBAF,A540769C.FULCOPL'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTEMPL DD DSN=DBAF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
COPY TABLESPACE DA540769.A924A
COPYDDN(TCOPYD)
FULL YES
SHRLEVEL CHANGE
//*
}¢--- DSN.TX.CASE(WK924DDL) cre=2009-09-10 mod=2010-08-06-13.05.07 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
$=cr2=$creator
SET CURRENT SQLID='S100447';
drop tablespace $db.a924a;
drop table $creator.TWK924;
commit;
------------------------------------------------------------------------
CREATE TABLESPACE A924A
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
SEGSIZE 64
BUFFERPOOL BP32K
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
locksize row
MAXROWS 255
;
commit;
CREATE TABLE $creator.TWK924
(key int NOT NULL,
text CHAR(50) NOT NULL
) in $db.A924A;
--------------------------------------------------------------
CREATE UNIQUE INDEX $creator.IWK9240
ON $creator.TWK924
(key ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
commit;
insert into $creator.TWK924 values
(1, char(current timestamp) || ' initial eins');
insert into $creator.TWK924 values
(2, char(current timestamp) || ' initial zwei');
insert into $creator.TWK924 values
(3, char(current timestamp) || ' initial drei');
commit;
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(WK924RBA) cre=2009-09-10 mod=2009-09-10-16.47.37 A540769 -----
select timestamp, icType, hex(start_rba), hex(pit_rba)
from sysibm.sysCopy c
where dbName = 'DA540769' and tsname = 'A924A'
order by 1
;
}¢--- DSN.TX.CASE(WK924SEL) cre=2009-09-10 mod=2009-09-10-16.38.29 A540769 -----
select * from a540769.twk924
order by key
with cs
}¢--- DSN.TX.CASE(WK924UPD) cre=2009-09-10 mod=2009-09-10-15.28.18 A540769 -----
call sqlConnect 'DBAF'
$=tb = A540769.TWK924
$@do i=1 to 3000 $@¢
call sqlExec "set :txt = current timestamp"
call sqlExec "update" $tb ,
"set text = char(current timestamp) || ' update'",
"where key = 1"
call sleep 1, 0
call sqlCommit
say 'commit' i time() 'for' txt
call sleep 1, 0
$!
call sqlDisconnect
$***out 20090910 15:19:16
$***out 20090910 15:15:37
}¢--- DSN.TX.CASE(WK924UPJ) cre=2009-09-10 mod=2009-09-10-15.47.35 A540769 -----
//A540769U JOB (CP00,KE50),TIME=99 00010001
//*MAIN CLASS=CMNA
//*
//S1 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99, 00020001
// PARM='wsh s'
//SYSPROC DD DSN=A540769.WK.REXX,DISP=SHR
//ISPPLIB DD DSN=TSO.ISPF.ISPPLIB,DISP=SHR
//ISPMLIB DD DSN=TSO.ISPF.ISPMLIB,DISP=SHR
//* TSO.RZ1.P0.INST.MSGS
// DD DSN=ISP.SISPMENU,DISP=SHR
//* TSO.RZ1.P0.PROD.MSGS
//* ORG.RZ1.B0106.KPCO4.MSGS
//* TSO.RZ1.P0.USER.MSGS
//ISPSLIB DD DSN=TSO.ISPF.ISPSLIB,DISP=SHR
//ISPTLIB DD DSN=TSO.ISPF.ISPTLIB,DISP=SHR
//ISPPROF DD DISP=(,PASS),UNIT=VIO,
// SPACE=(CYL,(1,1,30)),RECFM=FB,LRECL=80
//*
//* DSORG=PO
//ISPLOG DD SYSOUT=*,RECFM=VA,LRECL=125
//ISPLIST DD SYSOUT=*,RECFM=FBA,LRECL=121
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//OUT DD SYSOUT=*
//SYSTSIN DD DUMMY
//WSH DD DISP=SHR,DSN=A540769.TX.CASE(WK924UPD)
}¢--- DSN.TX.CASE(WK924U2) cre=2009-09-10 mod=2009-09-10-16.06.16 A540769 ------
call sqlConnect 'DBAF'
$=tb = A540769.TWK924
$@do i=1 to 3000 $@¢
call sqlExec "set :txt = current timestamp"
call sqlExec "update" $tb ,
"set text = char(current timestamp) || ' updateNoCommit'",
"where key = 2"
say 'update no commit' i time() 'for' txt
call sleep 60, 0
$!
call sqlDisconnect
$***out 20090910 15:19:16
$***out 20090910 15:15:37
}¢--- DSN.TX.CASE(WK924U2J) cre=2009-09-10 mod=2009-09-10-16.03.45 A540769 -----
//A540769V JOB (CP00,KE50),TIME=99 00010001
//*MAIN CLASS=CMNA
//*
//S1 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99, 00020001
// PARM='wsh s'
//SYSPROC DD DSN=A540769.WK.REXX,DISP=SHR
//ISPPLIB DD DSN=TSO.ISPF.ISPPLIB,DISP=SHR
//ISPMLIB DD DSN=TSO.ISPF.ISPMLIB,DISP=SHR
//* TSO.RZ1.P0.INST.MSGS
// DD DSN=ISP.SISPMENU,DISP=SHR
//* TSO.RZ1.P0.PROD.MSGS
//* ORG.RZ1.B0106.KPCO4.MSGS
//* TSO.RZ1.P0.USER.MSGS
//ISPSLIB DD DSN=TSO.ISPF.ISPSLIB,DISP=SHR
//ISPTLIB DD DSN=TSO.ISPF.ISPTLIB,DISP=SHR
//ISPPROF DD DISP=(,PASS),UNIT=VIO,
// SPACE=(CYL,(1,1,30)),RECFM=FB,LRECL=80
//*
//* DSORG=PO
//ISPLOG DD SYSOUT=*,RECFM=VA,LRECL=125
//ISPLIST DD SYSOUT=*,RECFM=FBA,LRECL=121
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//OUT DD SYSOUT=*
//SYSTSIN DD DUMMY
//WSH DD DISP=SHR,DSN=A540769.TX.CASE(WK924U2)
}¢--- DSN.TX.CASE(WK925) cre=2009-09-11 mod=2009-09-11-16.20.36 A540769 --------
* test case für CMP (Contact Managem Platform) fuer Gvozdenovic Snezana
creDb trg 1
+ ok creDb A540769.TX.GENF(WK925t1)
* create unload file from table tks835a1 (copy) with wk925unl
* load data in partition 2 with wk925Loa
* create switchTable, view and switch default part = 3
creDb trg 2
+ ok creDb A540769.TX.GENF(WK925t2)
* start updater (no commits) wk925upd oder reader (wk925rea) für 30'
* die beiden sperren einander aus
* start load auf part 3 mit wk925Loa
* check, das rdr oder updater normal weiter läuft
* nochmals checkk nach Ende Load
* rdr und updater nochmals starten, gehen jetzt auf Partition 3
* und sollten vom ersten updater rdr nicht gestört werden
}¢--- DSN.TX.CASE(WK925DDL) cre=2009-09-11 mod=2009-09-11-14.05.13 A540769 -----
------------$(right(userid() sysvar(sysnode) date(s) time(), 60, '-')$)
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447 ';
--
$@{
if $phase = 1 then $@¢
fehler .... drop TABLESPACE $db.A925A;
commit;
CREATE TABLESPACE A925A
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 4 PCTFREE 50
GBPCACHE CHANGED
TRACKMOD YES
LOGGED
numParts 6
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255;
COMMIT;
------------------------------------------------------------------------
CREATE TABLE $creator.TWK925A1
(part SMALLINT NOT NULL WITH DEFAULT 2,
KS835010 CHAR(20) FOR SBCS DATA NOT NULL,
KS835020 CHAR(20) FOR SBCS DATA NOT NULL,
KS835030 CHAR(20) FOR SBCS DATA NOT NULL,
KS835040 INTEGER NOT NULL,
KS835050 CHAR(20) FOR SBCS DATA NOT NULL,
KS835060 CHAR(4) FOR SBCS DATA NOT NULL,
KS835070 CHAR(20) FOR SBCS DATA NOT NULL,
KS835080 CHAR(20) FOR SBCS DATA NOT NULL,
KS835090 CHAR(140) FOR SBCS DATA NOT NULL,
KS835100 CHAR(2) FOR SBCS DATA NOT NULL,
KS835110 DATE NOT NULL,
KS835120 DATE NOT NULL,
KS835130 DATE NOT NULL,
KS835140 DATE NOT NULL,
KS835150 TIMESTAMP NOT NULL,
KS835160 CHAR(10) FOR SBCS DATA NOT NULL,
KS835170 TIMESTAMP NOT NULL,
PRIMARY KEY (part,
KS835010,
KS835030,
KS835040,
KS835020,
KS835050,
KS835060)
)
partition by (part)
( partition 1 ending at (1)
, partition 2 ending at (2)
, partition 3 ending at (3)
, partition 4 ending at (4)
, partition 5 ending at (5)
, partition 6 ending at (6)
)
IN $db.A925A
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE
APPEND NO ;
COMMIT;
------------------------------------------------------------------------
CREATE UNIQUE INDEX $creator.IWK925A0
ON $creator.TWK925A1
(PART ASC,
KS835010 ASC,
KS835030 ASC,
KS835040 ASC,
KS835020 ASC,
KS835050 ASC,
KS835060 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 8 PCTFREE 50
GBPCACHE CHANGED
partitioned
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE NO
COPY NO
DEFER NO
DEFINE YES;
------------------------------------------------------------------------
CREATE INDEX $creator.IWK925A1
ON $creator.TWK925A1
(PART ASC,
KS835080 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 8 PCTFREE 30
GBPCACHE CHANGED
NOT CLUSTER
partitioned
COMPRESS NO
BUFFERPOOL BP1
CLOSE NO
COPY NO
DEFER NO
DEFINE YES;
CREATE INDEX $creator.IWK925A10
ON $creator.TWK925A1
(PART ASC,
KS835030 ASC,
KS835040 ASC,
KS835010 ASC,
KS835080 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
partitioned
COMPRESS NO
BUFFERPOOL BP1
CLOSE NO
COPY NO
DEFER NO
DEFINE YES
;
COMMIT;
CREATE INDEX $creator.IWK925A3
ON $creator.TWK925A1
(PART ASC,
KS835050 ASC,
KS835060 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 8 PCTFREE 40
GBPCACHE CHANGED
NOT CLUSTER
partitioned
COMPRESS NO
BUFFERPOOL BP1
CLOSE NO
COPY NO
DEFER NO
DEFINE YES;
CREATE INDEX $creator.IWK925A4
ON $creator.TWK925A1
(PART ASC,
KS835020 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 8 PCTFREE 30
GBPCACHE CHANGED
NOT CLUSTER
partitioned
COMPRESS NO
BUFFERPOOL BP1
CLOSE NO
COPY NO
DEFER NO
DEFINE YES;
CREATE INDEX $creator.IWK925A5
ON $creator.TWK925A1
(PART ASC,
KS835030 ASC,
KS835040 ASC,
KS835060 ASC,
KS835050 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 8 PCTFREE 40
GBPCACHE CHANGED
CLUSTER
partitioned
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES;
COMMIT;
CREATE INDEX $creator.IWK925A6
ON $creator.TWK925A1
(PART ASC,
KS835050 DESC,
KS835060 DESC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 8 PCTFREE 30
GBPCACHE CHANGED
partitioned
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE NO
COPY NO
DEFER NO
DEFINE YES;
COMMIT;
CREATE INDEX $creator.IWK925A7
ON $creator.TWK925A1
(PART ASC,
KS835130 DESC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 8 PCTFREE 30
GBPCACHE CHANGED
partitioned
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE NO
COPY NO
DEFER NO
DEFINE YES;
CREATE INDEX $creator.IWK925A8
ON $creator.TWK925A1
(PART ASC,
KS835010 ASC,
KS835080 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 8 PCTFREE 30
GBPCACHE CHANGED
partitioned
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE NO
COPY NO
DEFER NO
DEFINE YES;
CREATE INDEX $creator.IWK925A9TEMP
ON $creator.TWK925A1
(PART ASC,
KS835070 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 8 PCTFREE 30
GBPCACHE CHANGED
partitioned
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE NO
COPY NO
DEFER NO
DEFINE YES
;
COMMIT;
$! else if $phase = 2 then $@¢
drop TABLESPACE $db.A925B;
commit;
alter table $creator.TWK925A1 alter PART set default 3;
commit;
CREATE TABLESPACE A925B
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 4 PCTFREE 50
GBPCACHE CHANGED
TRACKMOD YES
LOGGED
segsize 64
BUFFERPOOL BP2
LOCKSIZE ROW
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255;
CREATE TABLE $creator.TWK925SWITCH
(tst timestamp not null
,part smallint
)
IN $db.A925B
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE
APPEND NO ;
COMMIT;
------------------------------------------------------------------------
CREATE UNIQUE INDEX $creator.IWK925SW0
ON $creator.TWK925Switch
(tst ASC,
part ASC
)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 8 PCTFREE 50
GBPCACHE CHANGED
NOT CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE NO
COPY NO
DEFER NO
DEFINE YES;
commit;
------------------------------------------------------------------------
insert into $creator.TWK925SWITCH values
(current timestamp - 1 month, 1) ;
insert into $creator.TWK925SWITCH values
(current timestamp - 1 hour, 2) ;
commit;
create view $creator.VWK925current (part) as
(
select part
from a540769.twk925switch
where tst = (select max(tst)
from a540769.twk925switch
where tst <= current timestamp
)
)
;
create view $creator.VWK925A1 as
(
select t.*
from $creator.TWK925A1 t, $creator.VWK925current v
where t.part = v.part
)
;
$!
$}
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(WK925DIS) cre=2009-09-11 mod=2009-09-11-15.05.02 A540769 -----
select left(ks835030, 3), count(*)
from a540769.twk925a1
where part = 2
group by left(ks835030, 3)
order by 1
with ur
}¢--- DSN.TX.CASE(WK925LOA) cre=2009-09-11 mod=2009-09-11-15.34.02 A540769 -----
//A540769L JOB (CP00,KE50), 00010001
// MSGCLASS=T,TIME=1440,LINES=(999999,WARNING),
// NOTIFY=F540769
//*MAIN CLASS=LOG
//S1 EXEC PGM=DSNUTILB,PARM='DP2G,A540769L.LOAD' 00020001
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBOF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE INP
DSN('A540769.TMPUL.KS835.UNL')
DISP(OLD,KEEP,KEEP)
LOAD DATA LOG NO
STATISTICS INDEX(ALL) REPORT NO UPDATE ALL
EBCDIC CCSID(00500,00000,00000)
SORTKEYS
SORTDEVT DISK
SORTNUM 160
SORTKEYS 107735750
WORKDDN(TSYUTD,TSOUTD)
INDDN INP
INTO TABLE A540769.TWK925A1 PART 3
RESUME NO REPLACE COPYDDN(TCOPYD)
( "KS835010"
POSITION( 00003:00022) CHAR(00020)
, "KS835020"
POSITION( 00023:00042) CHAR(00020)
, "KS835030"
POSITION( 00043:00062) CHAR(00020)
, "KS835040"
POSITION( 00063:00066) INTEGER
, "KS835050"
POSITION( 00067:00086) CHAR(00020)
, "KS835060"
POSITION( 00087:00090) CHAR(00004)
, "KS835070"
POSITION( 00091:00110) CHAR(00020)
, "KS835080"
POSITION( 00111:00130) CHAR(00020)
, "KS835090"
POSITION( 00131:00270) CHAR(00140)
, "KS835100"
POSITION( 00271:00272) CHAR(00002)
, "KS835110"
POSITION( 00273:00282) DATE EXTERNAL
, "KS835120"
POSITION( 00283:00292) DATE EXTERNAL
, "KS835130"
POSITION( 00293:00302) DATE EXTERNAL
, "KS835140"
POSITION( 00303:00312) DATE EXTERNAL
, "KS835150"
POSITION( 00313:00338) TIMESTAMP EXTERNAL
, "KS835160"
POSITION( 00339:00348) CHAR(00010)
, "KS835170"
POSITION( 00349:00374) TIMESTAMP EXTERNAL
)
}¢--- DSN.TX.CASE(WK925REA) cre=2009-09-11 mod=2009-09-11-16.13.33 A540769 -----
//A540769R JOB (CP00,KE50),TIME=99 00010001
//*MAIN CLASS=CMNA
//*
//S1 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99, 00020001
// PARM='%WSH s'
//SYSPROC DD DSN=A540769.WK.REXX,DISP=SHR
//ISPPLIB DD DSN=TSO.ISPF.ISPPLIB,DISP=SHR
//ISPMLIB DD DSN=TSO.ISPF.ISPMLIB,DISP=SHR
// DD DSN=ISP.SISPMENU,DISP=SHR
//ISPSLIB DD DSN=TSO.ISPF.ISPSLIB,DISP=SHR
//ISPTLIB DD DSN=TSO.ISPF.ISPTLIB,DISP=SHR
//ISPPROF DD DISP=(,PASS),UNIT=VIO,
// SPACE=(CYL,(1,1,30)),RECFM=FB,LRECL=80
//ISPLOG DD SYSOUT=*,RECFM=VA,LRECL=125
//ISPLIST DD SYSOUT=*,RECFM=FBA,LRECL=121
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD DUMMY
//WSH DD *
call sqlConnect dp2g
call sqlPreOpen 1, "select part, '' || KS835010,KS835020, KS835030",
'from a540769.vwk925a1' ,
"where ks835030 like '0%' and part = 3",
'with rr skip locked data'
do c=1 to 600 while sqlFetchInto(1, ':part, :ks10, :ks20, :ks30')
say time() c part ks10 ks20 ks30
call sleep 1, 0
end
call sqlClose 1
call sqlDisconnect
}¢--- DSN.TX.CASE(WK925SES) cre=2009-09-11 mod=2009-09-11-13.31.27 A540769 -----
select part , tst 00010000
from a540769.twk925switch 00011001
where tst = (select max(tst) 00020000
from a540769.twk925switch 00020100
where tst < current timestamp - 55 day 00020204
) 00020300
; 00020405
select * from a540769.vwk925current 00020506
; 00020607
select * from a540769.vwk925 00020707
fetch first 100 rows only 00020807
}¢--- DSN.TX.CASE(WK925SWI) cre=2009-09-11 mod=2009-09-11-15.43.30 A540769 -----
--insert into a540769.TWK925SWITCH values
-- (current timestamp , 3) ;
commit
;
select * from a540769.vWK925current;
select * from a540769.vWK925a1
fetch first 100 rows only
;
;
x
delete from a540769.TWK925SWITCH
where part = 1
;
}¢--- DSN.TX.CASE(WK925UNL) cre=2009-09-11 mod=2009-09-11-11.59.30 A540769 -----
//A540769V JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//***************************************************
//* UNLOAD COPY
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBOF,'A540769.UNLOAC'),
// REGION=0M
//*DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//*SYSTEMPL DD DSN=DBOF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE TSREC DSN('A540769.TMPUL.KS835.UNL')
DATACLAS (NULL30) MGMTCLAS(COM#A092)
SPACE (1000,1250) CYL
TEMPLATE TSPUN DSN('A540769.TMPUL.KS835.PUN')
DATACLAS (NULL12) MGMTCLAS(COM#A092)
SPACE (10,250) CYL
UNLOAD TABLESPACE KS09A1P.A835A
FROMCOPY DBOF.KS09A1P.A835A.P0000.CIS8RDYX
PUNCHDDN TSPUN UNLDDN TSREC
SHRLEVEL CHANGE
}¢--- DSN.TX.CASE(WK925UPD) cre=2009-09-11 mod=2009-09-11-15.36.38 A540769 -----
//A540769V JOB (CP00,KE50),TIME=99 00010001
//*MAIN CLASS=CMNA
//*
//S1 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99, 00020001
// PARM='%WSH s'
//SYSPROC DD DSN=A540769.WK.REXX,DISP=SHR
//ISPPLIB DD DSN=TSO.ISPF.ISPPLIB,DISP=SHR
//ISPMLIB DD DSN=TSO.ISPF.ISPMLIB,DISP=SHR
// DD DSN=ISP.SISPMENU,DISP=SHR
//ISPSLIB DD DSN=TSO.ISPF.ISPSLIB,DISP=SHR
//ISPTLIB DD DSN=TSO.ISPF.ISPTLIB,DISP=SHR
//ISPPROF DD DISP=(,PASS),UNIT=VIO,
// SPACE=(CYL,(1,1,30)),RECFM=FB,LRECL=80
//ISPLOG DD SYSOUT=*,RECFM=VA,LRECL=125
//ISPLIST DD SYSOUT=*,RECFM=FBA,LRECL=121
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD DUMMY
//WSH DD *
call sqlConnect dp2g
call sqlPreOpen 1, 'select part,KS835010,KS835020, KS835030',
'from a540769.vwk925a1' ,
"where ks835030 like '9%'",
'skip locked data'
do c=1 to 6000 while sqlFetchInto(1, ':part, :ks10, :ks20, :ks30')
say time() c part ks10 ks20 ks30
nv = left(ks30,10) right(c,5)
call sqlExec "update a540769.twk925a1 set KS835030=" quote(nv,"'"),
'where part =' part ,
'and KS835010 =' quote(ks10, "'") ,
'and KS835020 =' quote(ks20, "'") ,
'and KS835030 =' quote(ks30, "'")
call sleep 1, 0
end
call sqlClose 1
call sqlDisconnect
}¢--- DSN.TX.CASE(WK926) cre=2009-09-25 mod=2012-02-17-11.56.11 A540769 --------
=DQ0G=0
* analyze forgets rebuild for create index with defer yes
creDb trg 1
+ ok creDb DSN.TX.GENF(WK926t1) ::f
*creDb src 2
*dbx c,i; $db.A926A mask WK926MAS
*ana,run
*check index is NOT rebuild pending (only if table not empty|)
}¢--- DSN.TX.CASE(WK926DDL) cre=2009-09-25 mod=2012-02-17-11.55.46 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447 ';
--
drop TABLESPACE $db.A926A;
commit;
CREATE TABLESPACE A926A
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
segsize 64
MAXROWS 255;
COMMIT;
------------------------------------------------------------------------
CREATE TABLE $creator.TWK926A1
(i1 SMALLINT NOT NULL WITH DEFAULT 2,
ch1 CHAR(20) FOR SBCS DATA NOT NULL,
ch2 CHAR(22) FOR SBCS DATA NOT NULL,
ch3 CHAR(20) FOR SBCS DATA NOT NULL,
$@¢
if $phase = 1 then $@=¢
primary key(i1, ch1)
$! else $@=¢
primary key(i1, ch2)
$!
$!
)
IN $db.A926A
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE
APPEND NO ;
COMMIT;
------------------------------------------------------------------------
CREATE UNIQUE INDEX $creator.IWK926A1
ON $creator.TWK926A1
(i1 ASC,
ch$phase ASC
)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 8 PCTFREE 50
GBPCACHE CHANGED
COMPRESS NO
BUFFERPOOL BP1
CLOSE NO
COPY NO
DEFER NO
DEFINE YES;
------------------------------------------------------------------------
CREATE INDEX $creator.IWK926A2
ON $creator.TWK926A1
(i1 ASC,
ch$-{3-$phase} ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 8 PCTFREE 30
GBPCACHE CHANGED
COMPRESS NO
BUFFERPOOL BP1
CLOSE NO
COPY NO
DEFER NO
DEFINE YES;
insert into $creator.TWK926A1 values
(1, 'eins ch1', 'eins ch2', 'eins ch3');
insert into $creator.TWK926A1 values
(2, 'zwei ch1', 'zwei ch2', 'zwei ch3');
insert into $creator.TWK926A1 values
(3, 'drei ch1', 'drei ch2', 'drei ch3');
commit;
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(WK926MAS) cre=2009-09-25 mod=2009-09-25-11.13.55 A540769 -----
COMPRESS:*.*,YES 00010000
SEGSIZE:*.*,64 00020000
DEFER:*,YES 00030000
AUTHID:GDB9998,A540769 00040000
DBNAME:DGDB9998,DA540769 00050000
}¢--- DSN.TX.CASE(WK926SEL) cre=2012-02-15 mod=2012-02-15-17.46.37 A540769 -----
//A540769S JOB (CP00,KE50),'DB2 REO',
// MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG0
//*
//S1 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99,
// PARM='WSH'
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//SYSPROC DD DSN=TSO.RZ1.P0.PROD.EXEC,DISP=SHR
//OUT DD SYSOUT=*
//SYSTSIN DD DUMMY
//WSH DD *
$#@
call sqlconnect dbaf
do forever
cn = 'nono'
call sqlpreallcl 1, 'select count(*) from a540769.twk926a1',st,':cn'
say 'cnt a540769.twk926a1' cn 'at' time()
call sleep 5, 0
end
}¢--- DSN.TX.CASE(WK927) cre=2009-09-25 mod=2012-12-13-08.24.45 A540769 --------
* analyze does not create a partLevel copy **** feld verlaengern
creDb trg 1
+ ok creDb DSN.TX.GENF(WK927t1) ::f
creDb src 2
+ ok creDb DSN.TX.GENF(WK927s2) ::f
*dbx c,i; $db.A927A mask WK927MAS
*ana with UO . copy . parallel=yes
*run
manual for partlevel copy
+ wait for partlevel copy
* dito ***** feld verkuerzen
creDb src 1
creDb trg 2
}¢--- DSN.TX.CASE(WK927B) cre=2009-09-25 mod=2012-02-16-11.07.53 A540769 -------
* compare with mask segSize: *.*,64 does NOT change
* a new part TS to universal by range
* -- but for old TS see wk927C
creDb trg 0
+ ok creDb DSN.TX.GENF(WK927t0) ::f
creDb src 2
+ ok creDb DSN.TX.GENF(WK927s2) ::f
*dbx c ; $db.A927A mask DBTWAL
*check cdl: no segsize clause
}¢--- DSN.TX.CASE(WK927C) cre=2009-09-25 mod=2009-09-25-14.29.05 A540769 -------
* compare with mask segSize: *.*,64 DOES change
* an old part TS to universal by range
* -- but for new TS see wk927B
* somtimes maske segSize: *.*,64 changes part TS to universal by range
creDb trg 1
+ ok creDb A540769.TX.GENF(WK927t1)
creDb src 2
+ ok creDb A540769.TX.GENF(WK927s2)
*dbx c ; $db.A927A mask DBTWAL
*check ts change to universal by range
}¢--- DSN.TX.CASE(WK927D) cre=2009-09-25 mod=2010-07-30-13.31.40 A540769 -------
=DQ0G=1
* compare with mask segSize: *.*,64
* says to change an old part TS to universal by range
* but the generated cdl does not
* somtimes maske segSize: *.*,64 changes part TS to universal by range
creDb trg 1
+ ok creDb A540769.TX.GENF(WK927t1) ::f
creDb src 1
+ ok creDb A540769.TX.GENF(WK927s1) ::f
*dbx c ; $db.A927A mask DBTWAL and DBACHECK 0
*check ts change to universal by range in report but NOT cdl
*dbx i, ana
*check empty change
}¢--- DSN.TX.CASE(WK927DDL) cre=2009-09-25 mod=2010-07-30-13.31.33 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
drop TABLESPACE $db.A927A;
commit;
$@¢
if $phase > 0 then $@=¢
CREATE TABLESPACE A927A
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
NUMPARTS 4
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255;
COMMIT;
------------------------------------------------------------------------
CREATE TABLE $creator.TWK927A1
(part smallint NOT NULL
,ch1 CHAR(4) FOR SBCS DATA NOT NULL
,ch2 CHAR(2$phase) FOR SBCS DATA NOT NULL
)
IN $db.A927A
partition by (part)
(PART 1 VALUES(1)
,PART 2 VALUES(2)
,PART 3 VALUES(3)
,PART 4 VALUES(4)
)
CCSID EBCDIC
NOT VOLATILE;
COMMIT;
insert into $creator.TWK927A1 values
(1, 'eins', 'eins ch2');
insert into $creator.TWK927A1 values
(2, 'zwei', 'zwei ch2');
insert into $creator.TWK927A1 values
(3, 'drei', 'drei ch2');
insert into $creator.TWK927A1 values
(4, 'vier', 'vier ch2');
commit;
$!
$!
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(WK927MAS) cre=2009-09-25 mod=2009-09-25-14.10.25 A540769 -----
COMPRESS:*.*,YES 00010000
AUTHID:GDB9998,A540769 00020000
DBNAME:DGDB9998,DA540669 00030001
SEGSIZE:4,64 00040001
SEGSIZE:8,64 00050001
SEGSIZE:12,64 00060001
SEGSIZE:16,64 00070001
SEGSIZE:20,64 00080001
SEGSIZE:24,64 00090001
SEGSIZE:32,64 00100001
SEGSIZE:48,64 00110001
}¢--- DSN.TX.CASE(WK928) cre=2009-09-28 mod=2013-06-17-14.02.18 A540769 --------
=DQ0G=0
* convert float to dec(31,8) without overflow
creDb trg 1
+ ok creDb DSN.TX.GENF(WK928t1) ::f
creDb src 3
+ ok creDb DSN.TX.GENF(WK928s3) ::f
* dbx c, i
* ana, run
manual check data with wk928sel
+ wait check data with wk928sel
}¢--- DSN.TX.CASE(WK928B) cre=2009-09-28 mod=2013-01-17-09.23.11 A754048 -------
=DQ0G=0
* convert float to dec(31,8) with overflow
creDb trg 2
+ ok creDb DSN.TX.GENF(WK928t2) ::f
creDb src 3
+ ok creDb DSN.TX.GENF(WK928s3) ::f
* dbx c, i
* ana, run
manual check run abends with data conversion error (for overflow)
+ wait check run abends with data conversion error (for overflow)
manual adapt and sub wk928loa and verify that load loads ok with discard
manual check data with wk928sel
}¢--- DSN.TX.CASE(WK928DDL) cre=2009-09-28 mod=2010-02-12-09.53.36 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
drop TABLESPACE $db.A928A;
commit;
$@¢
if $phase > 0 then $@=¢
CREATE TABLESPACE A928A
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
segsize 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255;
COMMIT;
------------------------------------------------------------------------
CREATE TABLE $creator.TWK928A1
(key char(20)
$@¢
if $phase <= 2 then $@=¢
,fl1 float
$! else $@=¢
,fl1 dec(31,8)
$!
$!
)
IN $db.A928A
CCSID EBCDIC
NOT VOLATILE;
COMMIT;
insert into $creator.TWK928A1 values
('a 1', 1);
insert into $creator.TWK928A1 values
('b -22.222', -22.222);
insert into $creator.TWK928A1 values
('c +333.3e3', 333.3e3);
insert into $creator.TWK928A1 values
('d -44.44e-44', -44.44e-44);
$@¢
if $phase = 2 then $@=¢
insert into $creator.TWK928A1 values
('e 55.55e+55', 55.55e+55);
$!
$!
commit;
$!
$!
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(WK928LOA) cre=2009-09-28 mod=2009-09-28-14.54.58 A540769 -----
//A540769L JOB (CP00,KE50), 00010001
// MSGCLASS=T,TIME=1440,LINES=(999999,WARNING),
// NOTIFY=A540769
//*MAIN CLASS=LOG
//S1 EXEC PGM=DSNUTILB,PARM='DBAF,A540769L.LOAD' 00020001
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBAF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE CJSI8M8L
DSN('DSN.DBA.DBAF.C0006161.ULD.T0001')
DISP(OLD,KEEP,KEEP)
LOAD DATA INDDN CJSI8M8L LOG NO RESUME NO REPLACE
COPYDDN(TCOPYD)
EBCDIC CCSID(00500,00000,00000)
SORTKEYS
SORTDEVT DISK
SORTNUM 160
WORKDDN(TSYUTD,TSOUTD)
DISCARDDN TDISC
ERRDDN TERRD
INTO TABLE
"GDB9998".
"TWK928A1"
WHEN(00001:00002) = X'009A'
( "KEY"
POSITION( 00004:00023) CHAR(00020)
NULLIF(00003)=X'FF'
, "FL1"
POSITION( 00025:00032) FLOAT(53)
NULLIF(00024)=X'FF'
)
}¢--- DSN.TX.CASE(WK928SEL) cre=2009-09-28 mod=2009-09-28-14.30.01 A540769 -----
select * from gdb9998.twk928a1 order by 1;
select * from a540769.twk928a1 order by 1;
}¢--- DSN.TX.CASE(WK929) cre=2009-10-05 mod=2010-08-06-10.29.45 A540769 --------
=DQ0G=1
creDb trg 1
+ ok creDb A540769.TX.GENF(WK929t1) ::f
creDb src 2
+ ok creDb A540769.TX.GENF(WK929s2) ::f
}¢--- DSN.TX.CASE(WK929DDL) cre=2009-10-05 mod=2010-02-12-09.45.07 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
drop TABLESPACE $db.A929A;
commit;
$@¢
if $phase > 0 then $@=¢
CREATE TABLESPACE A929A
IN $db
USING STOGROUP GSMS
PRIQTY 128 SECQTY 7200
FREEPAGE 0 PCTFREE 0
GBPCACHE CHANGED
TRACKMOD YES
DSSIZE 1 G
$@¢
IF $phase = 1 then $@=¢
NUMPARTS 101
(PART 87 USING STOGROUP GSMS PRIQTY 36608 SECQTY 7200)
$! else $@=¢
NUMPARTS 1
$!
$!
BUFFERPOOL BP32K
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 1;
COMMIT;
CREATE TABLE $creator.twk929A1
(ENDOC CHAR(20) FOR SBCS DATA NOT NULL,
ENDOCVIEW INTEGER NOT NULL,
ENSEGMENT INTEGER NOT NULL,
ENPAGE INTEGER NOT NULL,
ENSPAGE INTEGER NOT NULL
$@¢
if $phase = 2 then $@=¢
with default -123
$!
$!
,EAPOOL VARCHAR(32000) FOR SBCS DATA NOT NULL)
IN $db.A929A
PARTITION BY (ENDOC ASC,
ENDOCVIEW ASC,
ENSEGMENT ASC,
ENPAGE ASC,
ENSPAGE ASC)
(PART 1 VALUES('DO00')
$@¢
if $phase = 1 then $@=¢
,PART 2 VALUES('DO01'),
PART 3 VALUES('DO02'),
PART 4 VALUES('DO03'),
PART 5 VALUES('DO04'),
PART 6 VALUES('DO05'),
PART 7 VALUES('DO06'),
PART 8 VALUES('DO07'),
PART 9 VALUES('DO08'),
PART 10 VALUES('DO09'),
PART 11 VALUES('DO10'),
PART 12 VALUES('DO11'),
PART 13 VALUES('DO12'),
PART 14 VALUES('DO13'),
PART 15 VALUES('DO14'),
PART 16 VALUES('DO15'),
PART 17 VALUES('DO16'),
PART 18 VALUES('DO17'),
PART 19 VALUES('DO18'),
PART 20 VALUES('DO19'),
PART 21 VALUES('DO20'),
PART 22 VALUES('DO21'),
PART 23 VALUES('DO22'),
PART 24 VALUES('DO23'),
PART 25 VALUES('DO24'),
PART 26 VALUES('DO25'),
PART 27 VALUES('DO26'),
PART 28 VALUES('DO27'),
PART 29 VALUES('DO28'),
PART 30 VALUES('DO29'),
PART 31 VALUES('DO30'),
PART 32 VALUES('DO31'),
PART 33 VALUES('DO32'),
PART 34 VALUES('DO33'),
PART 35 VALUES('DO34'),
PART 36 VALUES('DO35'),
PART 37 VALUES('DO36'),
PART 38 VALUES('DO37'),
PART 39 VALUES('DO38'),
PART 40 VALUES('DO39'),
PART 41 VALUES('DO40'),
PART 42 VALUES('DO41'),
PART 43 VALUES('DO42'),
PART 44 VALUES('DO43'),
PART 45 VALUES('DO44'),
PART 46 VALUES('DO45'),
PART 47 VALUES('DO46'),
PART 48 VALUES('DO47'),
PART 49 VALUES('DO48'),
PART 50 VALUES('DO49'),
PART 51 VALUES('DO50'),
PART 52 VALUES('DO51'),
PART 53 VALUES('DO52'),
PART 54 VALUES('DO53'),
PART 55 VALUES('DO54'),
PART 56 VALUES('DO55'),
PART 57 VALUES('DO56'),
PART 58 VALUES('DO57'),
PART 59 VALUES('DO58'),
PART 60 VALUES('DO59'),
PART 61 VALUES('DO60'),
PART 62 VALUES('DO61'),
PART 63 VALUES('DO62'),
PART 64 VALUES('DO63'),
PART 65 VALUES('DO64'),
PART 66 VALUES('DO65'),
PART 67 VALUES('DO66'),
PART 68 VALUES('DO67'),
PART 69 VALUES('DO68'),
PART 70 VALUES('DO69'),
PART 71 VALUES('DO70'),
PART 72 VALUES('DO71'),
PART 73 VALUES('DO72'),
PART 74 VALUES('DO73'),
PART 75 VALUES('DO74'),
PART 76 VALUES('DO75'),
PART 77 VALUES('DO76'),
PART 78 VALUES('DO77'),
PART 79 VALUES('DO78'),
PART 80 VALUES('DO79'),
PART 81 VALUES('DO80'),
PART 82 VALUES('DO81'),
PART 83 VALUES('DO82'),
PART 84 VALUES('DO83'),
PART 85 VALUES('DO84'),
PART 86 VALUES('DO85'),
PART 87 VALUES('DO86'),
PART 88 VALUES('DO87'),
PART 89 VALUES('DO88'),
PART 90 VALUES('DO89'),
PART 91 VALUES('DO90'),
PART 92 VALUES('DO91'),
PART 93 VALUES('DO92'),
PART 94 VALUES('DO93'),
PART 95 VALUES('DO94'),
PART 96 VALUES('DO95'),
PART 97 VALUES('DO96'),
PART 98 VALUES('DO97'),
PART 99 VALUES('DO98'),
PART 100 VALUES('DO99'),
PART 101 VALUES('D100')
$!
$!
)
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
--
COMMENT ON TABLE $creator.twk929A1
IS 'DOCUMENT REPOSITORY: DOCUMENT CONTENTS POOL 3';
COMMIT;
------------------------------------------------------------------------
CREATE INDEX $creator.IXCR3210
ON $creator.twk929A1
(ENDOC ASC,
ENDOCVIEW ASC,
ENSEGMENT ASC,
ENPAGE ASC,
ENSPAGE ASC)
PARTITIONED
USING STOGROUP GSMS
PRIQTY 48 SECQTY 7200
FREEPAGE 0 PCTFREE 0
GBPCACHE CHANGED
CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES;
COMMIT;
$!
$!
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(WK929IGN) cre=2009-10-06 mod=2009-10-06-12.14.52 A540769 -----
PARTITIONING
SPACE
STORAGE
SYSDATABASE:CREATOR
SYSDATATYPES:OWNER,OWNERTYPE
SYSINDEXES:PIECESIZE,OWNER,OWNERTYPE
SYSINDEXPART:PQTY,SQTY,PARTITION
SYSPACKAGE:OWNER,OWNERTYPE
SYSPARMS:OWNER,OWNERTYPE
SYSROUTINES:OWNER,OWNERTYPE
SYSSEQUENCES:OWNER,OWNERTYPE
SYSTABLEPART:PQTY,SQTY,COMPRESS
SYSTABLES:CLUSTERTYPE,OWNER,OWNERTYPE
SYSTABLESPACE:CREATOR,LOCKRULE,LOCKMAX,TYPE,DSSIZE, PARTITIONS, SEGSIZE
SYSTRIGGERS:OWNER,OWNERTYPE,OWNER,OWNERTYPE
SYSVIEWS:OWNER,OWNERTYPE
}¢--- DSN.TX.CASE(WK930) cre=2009-10-13 mod=2010-02-12-09.22.14 A540769 --------
=DQ0G=1
creDb trg 1
+ ok creDb A540769.TX.GENF(WK930t1) ::f
creDb src 2
+ ok creDb A540769.TX.GENF(WK930s2) ::f
* dbx c, i, ana, run
manual dbx c checkk keine Aenderungen
+ ok t dbx c checkk keine Aenderungen
creDb trg 2
+ ok creDb A540769.TX.GENF(WK930t2) ::f
creDb src 3
+ ok creDb A540769.TX.GENF(WK930s3) ::f
manual dbx c
+ ok dbx c
creDb trg 1
+ ok creDb A540769.TX.GENF(WK930t1) ::f
* dbx i 01
* ana mit validate
}¢--- DSN.TX.CASE(WK930DDL) cre=2009-10-13 mod=2010-02-12-09.11.40 A540769 -----
-----------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
drop TABLESPACE $db.A930A;
commit;
$@¢
if $phase > 0 then $@=¢
CREATE TABLESPACE A930A
IN $db
USING STOGROUP GSMS
PRIQTY 128 SECQTY 7200
FREEPAGE 0 PCTFREE 0
GBPCACHE CHANGED
TRACKMOD YES
BUFFERPOOL BP32K
SEGSIZE 64
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 1;
COMMIT;
CREATE TABLE $creator.twk930A1
(KEY CHAR(5) FOR SBCS DATA NOT NULL
$@¢
if $phase <= 1 then $@=¢
,F1 CHAR(5) FOR SBCS DATA NOT NULL
$! else $@=¢
,F1 CHAR(12) FOR SBCS DATA NOT NULL
$!
if $phase <= 2 then $@=¢
,F2 CHAR( 5 ) FOR SBCS DATA NOT NULL
$! else $@=¢
,F2 CHAR(13) FOR SBCS DATA NOT NULL
$!
$!
,F3 CHAR(5) FOR SBCS DATA NOT NULL
)
IN $db.A930A
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
CREATE TABLE $creator.twk930A2
(KEY CHAR(5) FOR SBCS DATA NOT NULL
$@¢
if $phase <= 1 then $@=¢
,F1 CHAR(5) FOR SBCS DATA NOT NULL
$! else $@=¢
,F1 CHAR(12) FOR SBCS DATA NOT NULL
$!
if $phase <= 2 then $@=¢
,F2 CHAR( 5 ) FOR SBCS DATA NOT NULL
$! else $@=¢
,F2 CHAR(13) FOR SBCS DATA NOT NULL
$!
$!
,F3 CHAR(5) FOR SBCS DATA NOT NULL
)
IN $db.A930A
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
CREATE View $creator.vWk930A1 as
select
$@¢
if $phase >= 2 then $@=¢
'23' phase,
$!
$!
key, f1, f2, f3 from $creator.tWk930a1;
CREATE View $creator.vWk930A2 as
select
$@¢
if $phase >= 3 then $@=¢
'3' phase,
$!
$!
key, f1, f2, f3 from $creator.tWk930a2;
COMMIT;
$!
$!
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(WK931) cre=2009-10-13 mod=2009-10-13-11.58.22 A540769 --------
creDb trg 1
+ ok creDb A540769.TX.GENF(WK931t1)
creDb src 2
+ ok creDb A540769.TX.GENF(WK931s2)
* dbx c, i, ana, run
manual dbx c checkk keine Aenderungen
+ ok t dbx c checkk keine Aenderungen
creDb trg 2
+ ok creDb A540769.TX.GENF(WK931t2)
creDb src 3
+ ok creDb A540769.TX.GENF(WK931s3)
manual dbx c
+ ok t dbx c
creDb trg 1
+ ok creDb A540769.TX.GENF(WK931t1)
* dbx i 01
* ana mit validate
}¢--- DSN.TX.CASE(WK931DDL) cre=2009-10-13 mod=2009-10-13-11.37.17 A540769 -----
SET CURRENT SQLID='S100447';
drop tablespace $db.A931A;
commit;
CREATE TABLESPACE A931A
IN $db
USING STOGROUP GSMS
PRIQTY 128 SECQTY 7200
FREEPAGE 0 PCTFREE 0
GBPCACHE CHANGED
TRACKMOD YES
BUFFERPOOL BP32K
SEGSIZE 64
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 1;
CREATE TABLE $creator.TWK931A1
(INSTR_KEY INTEGER NOT NULL,
TRADING_CCY_NUM_CD CHAR(4) FOR SBCS DATA NOT NULL,
VENUE_CD CHAR(3) FOR SBCS DATA NOT NULL,
INSTR_ID_VDPS CHAR(12) FOR SBCS DATA NOT NULL,
FIRST_TRADING_DATE DATE WITH DEFAULT NULL,
LAST_TRADING_DATE DATE WITH DEFAULT NULL,
$@{
if $phase = 1 then $@¢
TICKER_ID CHAR(20) FOR SBCS DATA NOT NULL,
$! else $@¢
TICKER_ID CHAR(30) FOR SBCS DATA NOT NULL,
$!
if $phase < 3 then $@¢
BLOOMBERG_ID CHAR(20) FOR SBCS DATA NOT NULL,
RIC_ID CHAR(20) FOR SBCS DATA NOT NULL,
$! else $@¢
BLOOMBERG_ID CHAR(30) FOR SBCS DATA NOT NULL,
RIC_ID CHAR(30) FOR SBCS DATA NOT NULL,
$!
$}
LISTING_STATUS_TK INTEGER NOT NULL,
CLOSING_PRICE DECIMAL(31, 8) NOT NULL,
LISTING_GEN_FLAG SMALLINT NOT NULL,
LISTING_STATUS_CS INTEGER NOT NULL,
CLOSING_PRICE_TYPE CHAR(2) FOR SBCS DATA NOT NULL,
CLOSING_PRICE_DATE DATE WITH DEFAULT NULL,
CLOSING_PRICE_CCY CHAR(4) FOR SBCS DATA NOT NULL,
CLOSING_PRICE_VEN CHAR(3) FOR SBCS DATA NOT NULL,
MOST_LIQUID_FLAG SMALLINT NOT NULL,
MAIN_TR_PLACE_CS SMALLINT NOT NULL,
HOME_TR_PLACE_VDPS SMALLINT NOT NULL,
MULTIPLE_FACTOR DECIMAL(31, 8) NOT NULL,
LISTING_OTF_FLAG SMALLINT NOT NULL,
TRAD_LISTING_OTEX CHAR(50) FOR SBCS DATA NOT NULL,
TRADE_GROUP INTEGER NOT NULL,
DELETE_FLAG CHAR(1) FOR SBCS DATA NOT NULL,
DELETE_DATE CHAR(8) FOR SBCS DATA NOT NULL,
DELETE_USER CHAR(10) FOR SBCS DATA NOT NULL,
UPD_USER CHAR(10) FOR SBCS DATA NOT NULL,
UPD_TMSTMP TIMESTAMP NOT NULL,
INS_USER CHAR(10) FOR SBCS DATA NOT NULL,
INS_TMSTMP TIMESTAMP NOT NULL,
EXT_TRADING_CCY CHAR(4) FOR SBCS DATA NOT NULL
WITH DEFAULT,
BEST_OVERALL_VENUE SMALLINT NOT NULL WITH DEFAULT,
BEST_VENUE_PER_CCY SMALLINT NOT NULL WITH DEFAULT,
VENUE_CD_INT CHAR(3) FOR SBCS DATA NOT NULL
WITH DEFAULT,
CONSTRAINT INSTR_KEY
PRIMARY KEY (INSTR_KEY,
TRADING_CCY_NUM_CD,
VENUE_CD))
IN $db.A931A
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
LABEL ON TABLE $creator.TWK931A1 IS 'Listing Tabelle';
COMMENT ON TABLE $creator.TWK931A1 IS '?';
COMMIT;
CREATE UNIQUE INDEX $creator.IWK931A0
ON $creator.TWK931A1
(INSTR_KEY ASC,
TRADING_CCY_NUM_CD ASC,
VENUE_CD ASC)
USING STOGROUP GSMS
PRIQTY 12 SECQTY 7200
ERASE NO
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
------------------------------------------------------------------------
CREATE INDEX $creator.IWK931A1
ON $creator.TWK931A1
(TICKER_ID ASC)
USING STOGROUP GSMS
PRIQTY 12 SECQTY 7200
ERASE NO
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
------------------------------------------------------------------------
CREATE INDEX $creator.IWK931A2
ON $creator.TWK931A1
(BLOOMBERG_ID ASC)
USING STOGROUP GSMS
PRIQTY 12 SECQTY 7200
ERASE NO
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
------------------------------------------------------------------------
CREATE INDEX $creator.IWK931A3
ON $creator.TWK931A1
(RIC_ID ASC)
USING STOGROUP GSMS
PRIQTY 12 SECQTY 7200
ERASE NO
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
------------------------------------------------------------------------
CREATE INDEX $creator.IWK931A4
ON $creator.TWK931A1
(INSTR_ID_VDPS ASC)
USING STOGROUP GSMS
PRIQTY 12 SECQTY 7200
ERASE NO
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
CREATE UNIQUE INDEX $creator.IWK931A5
ON $creator.TWK931A1
(INSTR_KEY ASC,
VENUE_CD ASC,
TRADING_CCY_NUM_CD ASC,
DELETE_FLAG ASC,
TICKER_ID ASC,
BLOOMBERG_ID ASC,
RIC_ID ASC,
MULTIPLE_FACTOR ASC)
USING STOGROUP GSMS
PRIQTY 12 SECQTY 7200
ERASE NO
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
------------------------------------------------------------------------
CREATE TABLE $creator.TWK931H1
(INSTR_KEY INTEGER NOT NULL,
TRADING_CCY_NUM_CD CHAR(4) FOR SBCS DATA NOT NULL,
VENUE_CD CHAR(3) FOR SBCS DATA NOT NULL,
INSTR_ID_VDPS CHAR(12) FOR SBCS DATA NOT NULL,
FIRST_TRADING_DATE DATE WITH DEFAULT NULL,
LAST_TRADING_DATE DATE WITH DEFAULT NULL,
$@{
if $phase = 1 then $@¢
TICKER_ID CHAR(20) FOR SBCS DATA NOT NULL,
$! else $@¢
TICKER_ID CHAR(30) FOR SBCS DATA NOT NULL,
$!
if $phase < 3 then $@¢
BLOOMBERG_ID CHAR(20) FOR SBCS DATA NOT NULL,
RIC_ID CHAR(20) FOR SBCS DATA NOT NULL,
$! else $@¢
BLOOMBERG_ID CHAR(30) FOR SBCS DATA NOT NULL,
RIC_ID CHAR(30) FOR SBCS DATA NOT NULL,
$!
$}
LISTING_STATUS_TK INTEGER NOT NULL,
CLOSING_PRICE DECIMAL(31, 8) NOT NULL,
LISTING_GEN_FLAG SMALLINT NOT NULL,
LISTING_STATUS_CS INTEGER NOT NULL,
CLOSING_PRICE_TYPE CHAR(2) FOR SBCS DATA NOT NULL,
CLOSING_PRICE_DATE DATE WITH DEFAULT NULL,
CLOSING_PRICE_CCY CHAR(4) FOR SBCS DATA NOT NULL,
CLOSING_PRICE_VEN CHAR(3) FOR SBCS DATA NOT NULL,
MOST_LIQUID_FLAG SMALLINT NOT NULL,
MAIN_TR_PLACE_CS SMALLINT NOT NULL,
HOME_TR_PLACE_VDPS SMALLINT NOT NULL,
MULTIPLE_FACTOR DECIMAL(31, 8) NOT NULL,
LISTING_OTF_FLAG SMALLINT NOT NULL,
TRAD_LISTING_OTEX CHAR(50) FOR SBCS DATA NOT NULL,
TRADE_GROUP INTEGER NOT NULL,
DELETE_FLAG CHAR(1) FOR SBCS DATA NOT NULL,
DELETE_DATE CHAR(8) FOR SBCS DATA NOT NULL,
DELETE_USER CHAR(10) FOR SBCS DATA NOT NULL,
UPD_USER CHAR(10) FOR SBCS DATA NOT NULL,
UPD_TMSTMP TIMESTAMP NOT NULL,
INS_USER CHAR(10) FOR SBCS DATA NOT NULL,
INS_TMSTMP TIMESTAMP NOT NULL,
EXT_TRADING_CCY CHAR(4) FOR SBCS DATA NOT NULL
WITH DEFAULT,
BEST_OVERALL_VENUE SMALLINT NOT NULL WITH DEFAULT,
BEST_VENUE_PER_CCY SMALLINT NOT NULL WITH DEFAULT,
VENUE_CD_INT CHAR(3) FOR SBCS DATA NOT NULL
WITH DEFAULT,
CONSTRAINT INSTR_KEY
PRIMARY KEY (INSTR_KEY,
TRADING_CCY_NUM_CD,
VENUE_CD))
IN $db.A931A
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
CREATE UNIQUE INDEX $creator.IWK931H0
ON $creator.TWK931H1
(INSTR_KEY ASC,
TRADING_CCY_NUM_CD ASC,
VENUE_CD ASC)
USING STOGROUP GSMS
PRIQTY 12 SECQTY 7200
ERASE NO
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
------------------------------------------------------------------------
CREATE TABLE $creator.TWK931R1
(RESTRICT_KEY INTEGER NOT NULL GENERATED BY DEFAULT
AS IDENTITY
(START WITH 1, INCREMENT BY 1, CACHE 20, NO CYCLE,
NO ORDER, MAXVALUE 250000000, MINVALUE 1),
PREDECESSORID INTEGER WITH DEFAULT NULL,
CHANNELKEY SMALLINT NOT NULL,
PRIO SMALLINT NOT NULL,
BUID CHAR(4) FOR SBCS DATA NOT NULL,
ORDER_MODE INTEGER NOT NULL WITH DEFAULT,
INSTR_TYPE_CS CHAR(3) FOR SBCS DATA NOT NULL,
PID CHAR(10) FOR SBCS DATA NOT NULL,
CIF CHAR(12) FOR SBCS DATA NOT NULL,
VENUE_CD CHAR(3) FOR SBCS DATA NOT NULL,
SHORT_ALLOWED SMALLINT NOT NULL,
LEVEL CHAR(1) FOR SBCS DATA NOT NULL,
MAX_CHF_VALUE_BUY DECIMAL(31, 8) NOT NULL,
MAX_CHF_VALUE_SELL DECIMAL(31, 8) NOT NULL,
STATE SMALLINT NOT NULL,
INS_USER CHAR(10) FOR SBCS DATA NOT NULL,
INS_TMSTMP TIMESTAMP NOT NULL WITH DEFAULT,
INS_CONFIRM_USER CHAR(10) FOR SBCS DATA NOT NULL,
INS_CONFIRM_TMSTMP TIMESTAMP WITH DEFAULT NULL,
UPD_USER CHAR(10) FOR SBCS DATA NOT NULL,
UPD_TMSTMP TIMESTAMP WITH DEFAULT NULL,
UPD_CONFIRM_USER CHAR(10) FOR SBCS DATA NOT NULL,
UPD_CONFIRM_TMSTMP TIMESTAMP WITH DEFAULT NULL,
"COMMENT" VARCHAR(200) FOR SBCS DATA NOT NULL,
$@{
if $phase > 1 then $@¢
BIC CHAR(11) FOR SBCS DATA NOT NULL
WITH DEFAULT,
$!
$}
CONSTRAINT RESTRICT_KEY
PRIMARY KEY (RESTRICT_KEY))
IN $db.A931A
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
LABEL ON TABLE $creator.TWK931R1 IS 'Auftrags - Wert';
COMMENT ON TABLE $creator.TWK931R1
$@{
if $phase = 1 then $@¢
IS 'Beinhaltet Daten zum Wert eines uftrages';
$! else $@¢
IS 'Beinhaltet Daten zum Wert eines Auftrages';
$!
$}
CREATE UNIQUE INDEX $creator.IWK931R0
ON $creator.TWK931R1
(RESTRICT_KEY ASC)
USING STOGROUP GSMS
PRIQTY 12 SECQTY 12
ERASE NO
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
CREATE INDEX $creator.IWK931R2
ON $creator.TWK931R1
(CHANNELKEY ASC,
LEVEL ASC,
STATE ASC,
PRIO ASC)
USING STOGROUP GSMS
PRIQTY 12 SECQTY 12
ERASE NO
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
--
COMMIT;
--
------------------------------------------------------------------------
-- View=$creator.VWK931A1V
------------------------------------------------------------------------
--
--
$@{
if $phase <= 2 then $@¢
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","pha12" ;
$! else $@¢
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","$creator" ;
$!
$}
CREATE VIEW $creator.VWK931A1V AS
SELECT INSTR_KEY, TRADING_CCY_NUM_CD, VENUE_CD, INSTR_ID_VDPS,
FIRST_TRADING_DATE, LAST_TRADING_DATE, TICKER_ID,
BLOOMBERG_ID, RIC_ID, LISTING_STATUS_TK, CLOSING_PRICE,
LISTING_GEN_FLAG, LISTING_STATUS_CS, CLOSING_PRICE_TYPE,
CLOSING_PRICE_DATE, CLOSING_PRICE_CCY, CLOSING_PRICE_VEN,
MOST_LIQUID_FLAG, MAIN_TR_PLACE_CS, HOME_TR_PLACE_VDPS,
MULTIPLE_FACTOR, LISTING_OTF_FLAG, TRAD_LISTING_OTEX,
TRADE_GROUP, DELETE_FLAG, DELETE_DATE, DELETE_USER,
UPD_USER, UPD_TMSTMP, INS_USER, INS_TMSTMP,
EXT_TRADING_CCY, BEST_OVERALL_VENUE, BEST_VENUE_PER_CCY,
VENUE_CD_INT
FROM $creator.TWK931A1 ;
CREATE VIEW $creator.VWK931H1V AS
SELECT INSTR_KEY, TRADING_CCY_NUM_CD, VENUE_CD, INSTR_ID_VDPS,
FIRST_TRADING_DATE, LAST_TRADING_DATE, TICKER_ID,
BLOOMBERG_ID, RIC_ID, LISTING_STATUS_TK, CLOSING_PRICE,
LISTING_GEN_FLAG, LISTING_STATUS_CS, CLOSING_PRICE_TYPE,
CLOSING_PRICE_DATE, CLOSING_PRICE_CCY, CLOSING_PRICE_VEN,
MOST_LIQUID_FLAG, MAIN_TR_PLACE_CS, HOME_TR_PLACE_VDPS,
MULTIPLE_FACTOR, LISTING_OTF_FLAG, TRAD_LISTING_OTEX,
TRADE_GROUP, DELETE_FLAG, DELETE_DATE, DELETE_USER,
UPD_USER, UPD_TMSTMP, INS_USER, INS_TMSTMP,
EXT_TRADING_CCY, BEST_OVERALL_VENUE, BEST_VENUE_PER_CCY,
VENUE_CD_INT
FROM $creator.TWK931H1 ;
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","$creator" ;
CREATE VIEW $creator.VWK931R1V AS
SELECT RESTRICT_KEY, PREDECESSORID, CHANNELKEY, PRIO, BUID,
ORDER_MODE, INSTR_TYPE_CS, PID, CIF, VENUE_CD,
SHORT_ALLOWED, LEVEL, MAX_CHF_VALUE_BUY,
MAX_CHF_VALUE_SELL, STATE, INS_USER, INS_TMSTMP,
INS_CONFIRM_USER, INS_CONFIRM_TMSTMP, UPD_USER, UPD_TMSTMP,
UPD_CONFIRM_USER, UPD_CONFIRM_TMSTMP, "COMMENT"
$@{
if $phase > 1 then $@¢
, BIC
$!
$}
FROM $creator.TWK931R1 ;
--
COMMIT;
--
ALTER TABLE $creator.TWK931R1 FOREIGN KEY CWK931RK
(PREDECESSORID)
REFERENCES $creator.TWK931R1
(RESTRICT_KEY)
ON DELETE NO ACTION ENFORCED ;
--
COMMIT;
--
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL --
------------------------------------------------------------------------
--
}¢--- DSN.TX.CASE(WK932) cre=2009-10-13 mod=2013-01-17-09.53.35 A754048 --------
=DQ0G=0
* bad recreate of synonym
creDb trg 1
+ ok creDb DSN.TX.GENF(WK932t1) ::f
creDb src 2
+ ok creDb DSN.TX.GENF(WK932s2) ::f
* dbx c gdb9998.vWK932, dbx i
* ana
* check ana fails create synonym already existing
* wsl creates it twice
}¢--- DSN.TX.CASE(WK932B) cre=2009-10-13 mod=2013-01-17-10.41.26 A754048 -------
=DQ0G=0
* analyse fails on existing synonym in analyse target
creDb trg 3
+ ok creDb DSN.TX.GENF(WK932t3) ::f
creDb src 4
+ ok creDb DSN.TX.GENF(WK932s4) ::f
manual dbx c gdb9998.vWk932, i
+ wait dbx c gdb9998.vWk932, i
creDb trg 5
+ ok creDb DSN.TX.GENF(WK932t5) ::f
* ana
* check validate fails with synonym alread exists
}¢--- DSN.TX.CASE(WK932C) cre=2009-10-13 mod=2012-03-13-15.54.51 A540769 -------
=DQ0G=0
* analyse fails with two synonyms with same name
creDb trg 5
+ ok creDb DSN.TX.GENF(WK932t5) ::f
creDb src 6
+ ok creDb DSN.TX.GENF(WK932s6) ::f
manual dbx c gdb9998.vWk932, i
+ ok t dbx c gdb9998.vWk932, i
creDb trg 5
+ ok creDb DSN.TX.GENF(WK932t5) ::f
* ana
* check validate fails with synonym alread exists
}¢--- DSN.TX.CASE(WK932DDL) cre=2009-10-13 mod=2012-03-13-15.50.50 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
set current schema = '$creator';
drop view $creator.vWk932A1 ;
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC";
CREATE View $creator.vWk932A1 as
select $phase phase from sysibm.sysDummy1;
$@¢
if $phase <= 2 then $@=¢
set current sqlid = '$creator';
create synonym swk9321A1 for $creator.vWk932A1;
$! else if $phase >= 5 then $@=¢
set current schema = '$creator';
create synonym swk9321A1 for $creator.vWk932A1;
set current schema = '${creator}B';
create synonym swk9321A1 for $creator.vWk932A1;
$!
$!
commit;
}¢--- DSN.TX.CASE(WK932MAS) cre=2009-10-13 mod=2009-10-13-12.36.12 A540769 -----
AUTHID:PHA2,PHA1
SCHEMA:A540769,A540769
SCHEMA:SYSIBM,SYSIBM
OWNER:*,FALSCH
}¢--- DSN.TX.CASE(WK933) cre=2009-10-13 mod=2011-12-19-10.11.59 A540769 --------
* if only difference of a view is owner,
* validate and run forget to drop view before reCreating it
* --> to find a view with empty owner use wk933fin
=DQ0G=0
creDb src 2
+ ok creDb DSN.TX.GENF(WK933s2) ::f
creDb trg 1
+ ok creDb DSN.TX.GENF(WK933t1) ::f
* dbx c GDB9998.VWK923
* dbx i with impMask WK933MAS
* check only diff is owner, analyze fails, create without drop in wsl
}¢--- DSN.TX.CASE(WK933DDL) cre=2009-10-13 mod=2010-02-11-18.06.42 A540769 -----
SET CURRENT SQLID='S100447';
SET CURRENT SCHEMA='$creator';
$@¢
IF $phase = 2 THEN $@=¢
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
$! ELSE $@=¢
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC", "DIFF" ;
$!
$!
drop VIEW $creator.VWK933;
$*+ RENAME OF VIEW OA1A.VMF202A0
CREATE VIEW $creator.VWK933 (KSEGM) AS
SELECT SUBSTR(OA1A.TMF202A1.SELCD, 18, 3)
FROM OA1A.TMF202A1,
OA1A.VMF202A1
WHERE OA1A.TMF202A1.BUID = '0000'
AND SUBSTR(OA1A.TMF202A1.SELCD, 1, 17) = 'TA-NTA-REL-KSEGM '
AND SUBSTR(OA1A.TMF202A1.STEUERUNG, 18, 1) = 'J'
AND OA1A.TMF202A1.GUELTIGAB <= TIMESTAMP(OA1A.VMF202A1.
TEV_DAT_ISO || '-00.00.00.000000')
AND OA1A.TMF202A1.GUELTIGBIS >= TIMESTAMP(OA1A.VMF202A1.
TEV_DAT_ISO || '-24.00.00.000000') ;
COMMIT;
}¢--- DSN.TX.CASE(WK933FIN) cre=2009-10-13 mod=2010-02-11-17.57.50 A540769 -----
select substr(t.owner, 1, 10) "owner", substr(t.creator, 1, 8) "creat",
substr(t.name, 1, 10), substr(pathschemas, 1, 30),
seqno, text
from sysibm.sysTables t, sysibm.sysViews v
where t.creator = v.creator and t.name = v.name
and t.name like 'VMF%' and t.type = 'V'
and t.creator = 'OA1A'
order by 1, 2, 3,4, 5
}¢--- DSN.TX.CASE(WK933MAS) cre=2009-10-13 mod=2009-10-13-14.41.17 A540769 -----
AUTHID:A540769,OA1A
NAME:VWK933,VMF202A0
}¢--- DSN.TX.CASE(WK934) cre=2010-02-11 mod=2010-02-11-17.50.42 A540769 --------
=DQ0G=1
creDb trg 1
+ ok creDb A540769.TX.GENF(WK934t1) ::f
creDb src 2
+ ok creDb A540769.TX.GENF(WK934s2) ::f
}¢--- DSN.TX.CASE(WK934DDL) cre=2009-10-26 mod=2009-11-02-17.33.16 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
$=tb=TWK934A1
SET CURRENT SQLID='S100447';
drop tablespace $db.a934a;
commit;
------------------------------------------------------------------------
CREATE TABLESPACE A934A
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
SEGSIZE 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255
; ---------------------------------------------------------------------
CREATE TABLE $creator.$tb
( WK934CH20 CHAR(20) FOR SBCS DATA not null with default
$@¢
if $phase = 1 then $@=¢
, WK934CHLon CHAR(30) FOR SBCS DATA not null with default
$! else if $phase = 2 then $@=¢
, WK934ChLon CHAR(20) FOR SBCS DATA not null with default
$!
$!
)
IN $db.A934A
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE ;
CREATE INDEX $creator.IWK934A1
ON $creator.$tb
(WK934CH20 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
commit;
------------------------------------------------------------------------
$@¢
if $phase < 99 then $@=¢
insert into $creator.$tb values
('erstens', 'eins');
insert into $creator.$tb values
('zweitens', 'zwei');
insert into $creator.$tb values
('drittens', 'drei');
insert into $creator.$tb values
('viertens', 'vier');
insert into $creator.$tb values
('fuenftens', 'fuenf');
update $creator.$tb
set wk934ChLon
= left(repeat(strip(wk934ChLon) || '+', 10), $phase * 10);
insert into $creator.$tb select * from $creator.$tb;
insert into $creator.$tb select * from $creator.$tb;
insert into $creator.$tb select * from $creator.$tb;
insert into $creator.$tb select * from $creator.$tb;
insert into $creator.$tb select * from $creator.$tb;
insert into $creator.$tb select * from $creator.$tb;
insert into $creator.$tb select * from $creator.$tb;
insert into $creator.$tb select * from $creator.$tb;
insert into $creator.$tb select * from $creator.$tb;
insert into $creator.$tb select * from $creator.$tb;
insert into $creator.$tb select * from $creator.$tb;
insert into $creator.$tb select * from $creator.$tb;
insert into $creator.$tb select * from $creator.$tb; commit;
insert into $creator.$tb select * from $creator.$tb;
commit;
$!
$!
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(WK934FIX) cre=2009-10-26 mod=2009-10-26-16.52.41 A540769 -----
update sysibm.systablespace
set nActive = 99999999
, spaceF = 999999999
where dbName = 'A540769' and name = 'A934A'
}¢--- DSN.TX.CASE(WK934INS) cre=2009-10-26 mod=2009-10-26-16.57.13 A540769 -----
insert into a540769.twk934a1 select * from a540769.twk934a1;
insert into a540769.twk934a1 select * from a540769.twk934a1;
insert into a540769.twk934a1 select * from a540769.twk934a1;
insert into a540769.twk934a1 select * from a540769.twk934a1;
insert into a540769.twk934a1 select * from a540769.twk934a1;
insert into a540769.twk934a1 select * from a540769.twk934a1;
}¢--- DSN.TX.CASE(WK934REO) cre=2009-10-26 mod=2009-10-26-18.05.15 A540769 -----
//A540769T JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//***************************************************
//* CREATED BY : A540769
//* TIMESTAMP : 06/20/2006.09.40.21
//* ENVIRONMENT: ISPF 5.7MVS TSO
//* RELEASE : V7.4.02 08/31/2004
//* DB2 VERSION: 810
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBAF,'A540769T.REORG'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DBAF.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
TEMPLATE REC DSN 'DSN.DBA.DBAF.C0006441.OUTPUT.DSDF1'
UNIT 3490;
REORG TABLESPACE DA540769.A934A
LOG NO
SORTDATA
COPYDDN(TCOPYD)
PUNCHDDN TPUNCH
UNLDDN REC
DISCARDDN TDISCA
SORTKEYS
SORTDEVT FALSCH
SORTNUM 2
STATISTICS
INDEX ALL
REPORT NO
UPDATE ALL
}¢--- DSN.TX.CASE(WK934SEL) cre=2009-10-26 mod=2009-10-26-17.22.52 A540769 -----
select COUNT(*) from gdb9998.twk934a1;
select * from gdb9998.twk934a1 FETCH first 10 rows only ;
select count(*) from a540769.twk934a1;
select * from a540769.twk934a1 fetch first 10 rows only;
}¢--- DSN.TX.CASE(WK935) cre=2009-11-12 mod=2009-11-12-11.41.13 A540769 --------
creDb trg 0
+ ok creDb A540769.TX.GENF(WK935t0)
creDb src 1
+ ok creDb A540769.TX.GENF(WK935s1)
}¢--- DSN.TX.CASE(WK935DDL) cre=2009-11-12 mod=2009-11-12-11.41.07 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
drop tablespace $db.a935a;
commit;
$@¢if $phase > 0 then $@=¢
CREATE TABLESPACE A935A
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 0
GBPCACHE CHANGED
TRACKMOD YES
LOGGED
SEGSIZE 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255;
COMMIT ;
SET CURRENT SCHEMA=${creator}2;
CREATE TABLE TWK935A1
(PC412001 CHAR(16) FOR SBCS DATA NOT NULL,
PC412002 CHAR(3) FOR SBCS DATA NOT NULL,
PC412003 CHAR(30) FOR SBCS DATA NOT NULL,
PC412004 CHAR(5) FOR SBCS DATA NOT NULL,
PC412005 CHAR(16) FOR SBCS DATA NOT NULL,
PC412006 CHAR(18) FOR SBCS DATA NOT NULL,
PC412007 CHAR(12) FOR SBCS DATA NOT NULL,
PC412008 CHAR(16) FOR SBCS DATA NOT NULL,
PC412009 DATE NOT NULL,
PC412010 CHAR(4) FOR SBCS DATA NOT NULL,
PC412011 DECIMAL(15, 3) NOT NULL,
PC412012 DECIMAL(15, 3) NOT NULL,
PC412013 INTEGER NOT NULL WITH DEFAULT 1,
CONSTRAINT PC412001
PRIMARY KEY (PC412001,
PC412002,
PC412003,
PC412013,
PC412004,
PC412005,
PC412006,
PC412009))
IN $db.A935A
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE
APPEND NO ;
LABEL ON TABLE ${creator}2.TWK935A1 IS 'Expected Cash Flow';
LABEL ON ${creator}2.TWK935A1
(PC412013 IS 'SECURITY IDENTIF SYSTEM',
PC412012 IS 'CASHFLOW_CHF',
PC412011 IS 'CASHFLOW',
PC412010 IS 'CASHFLOW_CUR',
PC412009 IS 'CASHFLOW_DATE',
PC412008 IS 'PROSPECTNO',
PC412007 IS 'CUSTOMERNO',
PC412006 IS 'MMACCOUNTNO',
PC412005 IS 'ACCOUNTNO',
PC412004 IS 'SECURITY_SEQ_NO',
PC412003 IS 'SECURITY_NO',
PC412002 IS 'SEQUENCENO',
PC412001 IS 'SAFEKEEPING_ACC_NO');
COMMIT ;
CREATE UNIQUE INDEX IPC412A0
ON ${creator}2.TWK935A1
(PC412001 ASC,
PC412002 ASC,
PC412003 ASC,
PC412013 ASC,
PC412004 ASC,
PC412005 ASC,
PC412006 ASC,
PC412009 ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 0
GBPCACHE CHANGED
CLUSTER
COMPRESS NO
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
COMMIT ;
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","${creator}2" ;
CREATE VIEW ${creator}2.VWK935A1A
(SAFEKEEPING_ACC_NO, SEQUENCENO, SECURITY_NO,
SEC_IDENT_SYS, SECURITY_SEQ_NO, ACCOUNTNO, MMACCOUNTNO,
CUSTOMERNO, PROSPECTNO, CASHFLOW_DATE, CASHFLOW_CUR, CASHFLOW,
CASHFLOW_CHF) AS
SELECT ALL PC412001, PC412002, PC412003, PC412013, PC412004,
PC412005, PC412006, PC412007, PC412008, PC412009, PC412010,
PC412011, PC412012
FROM ${creator}2.TWK935A1 ;
COMMIT ;
$!
$!
---||| end ddl testcase $mbr env $env phase $phase
}¢--- DSN.TX.CASE(WK935MSK) cre=2009-11-12 mod=2009-11-12-11.42.42 A540769 -----
COMPRESS:*.*,YES 00010000
SEGSIZE:*.*,64 00020000
AUTHID:GDB99982,A5407692 00030000
AUTHID:GDB9998,A540769 00040000
DBNAME:DGDB9998,DA540769 00050000
}¢--- DSN.TX.CASE(WK936) cre=2009-11-24 mod=2013-09-19-17.18.22 A540769 --------
* Umstellung von indexed based auf tableBased partitioning
* only an alter ist needed (as in ddl) no drop recreate|
=parts=5
=DQ0G=0
creDb trg 1
+ ok creDb DSN.TX.GENF(WK936t1) ::f
creDb src 2
+ ok creDb DSN.TX.GENF(WK936s2) ::f
}¢--- DSN.TX.CASE(WK936DDL) cre=2009-11-24 mod=2009-11-24-15.52.20 A540769 -----
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
drop tablespace $db.a936H;
commit;
CREATE LARGE TABLESPACE A936H
IN $db
USING STOGROUP GSMS
PRIQTY 12 SECQTY 7200
FREEPAGE 0 PCTFREE 0
GBPCACHE CHANGED
TRACKMOD YES
NUMPARTS $parts
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
LOCKPART YES
DEFINE YES
MAXROWS 255;
commit;
CREATE TABLE $creator.Twk936
(MF150001 CHAR(16) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150002 CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150003 CHAR(5) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150004 CHAR(25) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150005 CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150006 CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150007 CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150008 CHAR(3) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150009 CHAR(5) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150010 CHAR(4) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150011 CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150012 CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150013 DATE NOT NULL WITH DEFAULT,
MF150014 CHAR(4) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150015 CHAR(4) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150016 CHAR(4) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150017 CHAR(12) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150018 DECIMAL(15, 3) NOT NULL WITH DEFAULT,
MF150019 DECIMAL(15, 3) NOT NULL WITH DEFAULT,
MF150020 CHAR(8) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150021 TIMESTAMP NOT NULL WITH DEFAULT,
MF150022 CHAR(4) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150023 CHAR(12) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150024 CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150025 CHAR(3) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150026 CHAR(3) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150027 CHAR(3) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150028 CHAR(3) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150029 CHAR(3) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150030 CHAR(16) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150031 CHAR(2) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150032 CHAR(7) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150033 CHAR(7) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150034 CHAR(4) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150035 CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150036 CHAR(18) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150037 DECIMAL(15, 0) NOT NULL WITH DEFAULT,
MF150038 CHAR(16) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150039 CHAR(2) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150040 CHAR(2) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150041 CHAR(2) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150042 CHAR(4) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150043 DECIMAL(15, 3) NOT NULL WITH DEFAULT,
MF150044 CHAR(5) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150045 CHAR(4) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150046 CHAR(4) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150047 CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150051 CHAR(3) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150052 CHAR(3) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150053 DECIMAL(15, 3) NOT NULL WITH DEFAULT,
MF150054 CHAR(7) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150055 CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150056 CHAR(8) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150059 CHAR(5) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150060 TIMESTAMP NOT NULL WITH DEFAULT,
MF150062 CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150063 CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150064 DATE NOT NULL WITH DEFAULT,
MF150065 DATE NOT NULL WITH DEFAULT,
MF150066 CHAR(16) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150067 CHAR(16) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150068 CHAR(16) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150069 CHAR(4) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150070 CHAR(7) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150071 CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150072 CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150073 CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150074 CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150075 CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150076 CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150077 CHAR(6) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150078 CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150079 CHAR(1) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150080 DATE NOT NULL WITH DEFAULT,
MF150081 CHAR(5) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150082 CHAR(26) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150083 SMALLINT NOT NULL WITH DEFAULT,
MF150084 SMALLINT NOT NULL WITH DEFAULT,
MF150085 SMALLINT NOT NULL WITH DEFAULT,
MF150086 CHAR(35) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150087 CHAR(35) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150088 CHAR(35) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150089 CHAR(35) FOR SBCS DATA NOT NULL
WITH DEFAULT,
MF150090 SMALLINT NOT NULL WITH DEFAULT,
MF150091 SMALLINT NOT NULL WITH DEFAULT,
MF150092 CHAR(16) FOR SBCS DATA NOT NULL
WITH DEFAULT,
CONSTRAINT MF150001
PRIMARY KEY (MF150001))
IN $db.A936H
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
--
LABEL ON TABLE $creator.Twk936 IS 'MF-History älter als ein Jahr';
--
LABEL ON $creator.Twk936
(MF150092 IS 'RM-PID international ',
MF150091 IS 'Limiten-Hierarchie',
MF150090 IS 'Limiten-Typ',
MF150089 IS 'Ort Begünstigter',
MF150088 IS 'Name Begünstigter',
MF150087 IS 'Ort Auftraggeber',
MF150086 IS 'Name Auftraggeber',
MF150085 IS 'Life-Cycle-Status',
MF150084 IS 'Relevant-Group',
MF150083 IS 'Transaction-Typ',
MF150082 IS 'Lade-Timestamp',
MF150081 IS 'Preiskomponente',
MF150080 IS 'mutierbar bis',
MF150079 IS 'Depot_Uebertrag',
MF150078 IS 'Vorheriger GP-Typ',
MF150077 IS 'Bankenclearing-Nr',
MF150076 IS 'Kommentar_Status',
MF150075 IS 'Edit-Status Gesamt',
MF150074 IS 'EDIT-STATUS URHEBER',
MF150073 IS 'EDIT-STATUS GRUND',
MF150072 IS 'Edit-Status Gegenpartei',
MF150071 IS 'Prüfziffer Kundencif',
MF150070 IS 'Stammnummer Kundencif',
MF150069 IS 'Bankstelle Kundencif',
MF150068 IS 'int. Form OE Kundenbüro GP',
MF150067 IS 'int. Form OE Kundenbüro',
MF150066 IS 'int. Form OE-ID KV',
MF150065 IS 'Cif-Saldierungsdatum',
MF150064 IS 'Cif-Eröffnungsdatum',
MF150063 IS 'Mittelfluss-Identifikation',
MF150062 IS 'Coupon-Mantel',
MF150060 IS 'Erstellungstimestamp',
MF150059 IS 'Auftragslaufnummer',
MF150056 IS 'Endverfall Obligationen',
MF150055 IS 'Richtung des Mittelflusses',
MF150054 IS 'Leitweg',
MF150053 IS 'Volumen in Nominal/Stück',
MF150052 IS 'Bearbeitungscode',
MF150051 IS 'Domizil Gegenpartei',
MF150047 IS 'Bestandestyp',
MF150046 IS 'effektive Depotstelle',
MF150045 IS 'Depotstelle',
MF150044 IS 'Sequenz-Nummer zu Valor',
MF150043 IS 'Betrag zu Bestandeswährung',
MF150042 IS 'Bestandeswährung',
MF150041 IS 'Untergruppe Gegenpartei',
MF150040 IS 'Hauptgruppe Gegenpartei',
MF150039 IS 'Gegenpartei-Geldmarktzusatz',
MF150038 IS 'Gegenpartei-Beziehungsnummer',
MF150037 IS 'CSID Gegenpartei',
MF150036 IS 'Gegenpartei',
MF150035 IS 'Gegenpartei-Typ',
MF150034 IS 'BUID Gegenpartei',
MF150033 IS 'KundenverantwortlicheR',
MF150032 IS 'Kundenbüro Kunde',
MF150031 IS 'Kunden-Geldmarktzusatz',
MF150030 IS 'Kunden-Beziehungsnummer',
MF150029 IS 'Depotartenschlüssel',
MF150028 IS 'Kontoartenschlüssel',
MF150027 IS 'Kundendomizil',
MF150026 IS 'Kundensegment',
MF150025 IS 'Kundenart',
MF150024 IS 'PVV-Kunde',
MF150023 IS 'Cifnummer Kunde',
MF150022 IS 'BUID Kunde',
MF150021 IS 'Mutationsdatum',
MF150020 IS 'MutationsPID',
MF150019 IS 'Betrag in CHF',
MF150018 IS 'Betrag in FWhrg',
MF150017 IS 'Valor',
MF150016 IS 'Währung',
MF150015 IS 'Urheber',
MF150014 IS 'Grund',
MF150013 IS 'Buchungsdatum',
MF150012 IS 'Bewegungsverdichtung',
MF150011 IS 'Produkteklassifizierung',
MF150010 IS 'MF-Produkt',
MF150009 IS 'Bewegungsart Konto',
MF150008 IS 'Bewegungsart Depot/Edelmetall',
MF150007 IS 'zu bewerten',
MF150006 IS 'nachzuerfassen',
MF150005 IS 'Storno',
MF150004 IS 'Auftragsnummer',
MF150003 IS 'Lieferantentyp',
MF150002 IS 'RZ-Herkunft',
MF150001 IS 'ID Mittelfluss (UUID)');
commit;
------------------------------------------------------------------------
CREATE UNIQUE INDEX $creator.IWK936H0
ON $creator.Twk936
(MF150001 ASC)
USING STOGROUP GSMS
PRIQTY 48 SECQTY 7200
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
------------------------------------------------------------------------
CREATE INDEX $creator.IWK936H4
ON $creator.Twk936
(MF150066 ASC,
MF150013 DESC)
USING STOGROUP GSMS
PRIQTY 48 SECQTY 7200
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 4 G;
------------------------------------------------------------------------
CREATE INDEX $creator.IWK936H2
ON $creator.Twk936
(MF150023 ASC,
MF150013 ASC)
USING STOGROUP GSMS
PRIQTY 48 SECQTY 7200
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
------------------------------------------------------------------------
CREATE INDEX $creator.IWK936H1
ON $creator.Twk936
(MF150013 ASC,
MF150067 ASC)
USING STOGROUP GSMS
PRIQTY 48 SECQTY 7200
ERASE NO
FREEPAGE 0 PCTFREE 0
GBPCACHE CHANGED
CLUSTER
PARTITIONED
(PART 1 VALUES('31.08.1999'),
PART 2 VALUES('15.09.1999'),
PART 3 VALUES('30.09.1999'),
PART 4 VALUES('15.10.1999'),
PART 5 VALUES('31.10.1999')
$@¢
if $parts > 5 then $@=¢
, PART 6 VALUES('15.11.1999'),
PART 7 VALUES('30.11.1999'),
PART 8 VALUES('15.12.1999'),
PART 9 VALUES('31.12.1999'),
PART 10 VALUES('15.01.2000'),
PART 11 VALUES('31.01.2000'),
PART 12 VALUES('15.02.2000'),
PART 13 VALUES('29.02.2000'),
PART 14 VALUES('15.03.2000'),
PART 15 VALUES('31.03.2000'),
PART 16 VALUES('15.04.2000'),
PART 17 VALUES('30.04.2000'),
PART 18 VALUES('15.05.2000'),
PART 19 VALUES('31.05.2000'),
PART 20 VALUES('15.06.2000'),
PART 21 VALUES('30.06.2000'),
PART 22 VALUES('15.07.2000'),
PART 23 VALUES('31.07.2000'),
PART 24 VALUES('15.08.2000'),
PART 25 VALUES('31.08.2000'),
PART 26 VALUES('15.09.2000'),
PART 27 VALUES('30.09.2000'),
PART 28 VALUES('15.10.2000'),
PART 29 VALUES('31.10.2000'),
PART 30 VALUES('15.11.2000'),
PART 31 VALUES('30.11.2000'),
PART 32 VALUES('15.12.2000'),
PART 33 VALUES('31.12.2000'),
PART 34 VALUES('15.01.2001'),
PART 35 VALUES('31.01.2001'),
PART 36 VALUES('15.02.2001'),
PART 37 VALUES('28.02.2001'),
PART 38 VALUES('15.03.2001'),
PART 39 VALUES('31.03.2001'),
PART 40 VALUES('15.04.2001'),
PART 41 VALUES('30.04.2001'),
PART 42 VALUES('15.05.2001'),
PART 43 VALUES('31.05.2001'),
PART 44 VALUES('15.06.2001'),
PART 45 VALUES('30.06.2001'),
PART 46 VALUES('15.07.2001'),
PART 47 VALUES('31.07.2001'),
PART 48 VALUES('15.08.2001'),
PART 49 VALUES('31.08.2001'),
PART 50 VALUES('15.09.2001'),
PART 51 VALUES('30.09.2001'),
PART 52 VALUES('15.10.2001'),
PART 53 VALUES('31.10.2001'),
PART 54 VALUES('15.11.2001'),
PART 55 VALUES('30.11.2001'),
PART 56 VALUES('15.12.2001'),
PART 57 VALUES('31.12.2001'),
PART 58 VALUES('15.01.2002'),
PART 59 VALUES('31.01.2002'),
PART 60 VALUES('15.02.2002'),
PART 61 VALUES('28.02.2002'),
PART 62 VALUES('15.03.2002'),
PART 63 VALUES('31.03.2002'),
PART 64 VALUES('15.04.2002'),
PART 65 VALUES('30.04.2002'),
PART 66 VALUES('15.05.2002'),
PART 67 VALUES('31.05.2002'),
PART 68 VALUES('15.06.2002'),
PART 69 VALUES('30.06.2002'),
PART 70 VALUES('15.07.2002'),
PART 71 VALUES('31.07.2002'),
PART 72 VALUES('15.08.2002'),
PART 73 VALUES('31.08.2002'),
PART 74 VALUES('15.09.2002'),
PART 75 VALUES('30.09.2002'),
PART 76 VALUES('15.10.2002'),
PART 77 VALUES('31.10.2002'),
PART 78 VALUES('15.11.2002'),
PART 79 VALUES('30.11.2002'),
PART 80 VALUES('15.12.2002'),
PART 81 VALUES('31.12.2002'),
PART 82 VALUES('15.01.2003'),
PART 83 VALUES('31.01.2003'),
PART 84 VALUES('15.02.2003'),
PART 85 VALUES('28.02.2003'),
PART 86 VALUES('15.03.2003'),
PART 87 VALUES('31.03.2003'),
PART 88 VALUES('15.04.2003'),
PART 89 VALUES('30.04.2003'),
PART 90 VALUES('15.05.2003'),
PART 91 VALUES('31.05.2003'),
PART 92 VALUES('15.06.2003'),
PART 93 VALUES('30.06.2003'),
PART 94 VALUES('15.07.2003'),
PART 95 VALUES('31.07.2003'),
PART 96 VALUES('15.08.2003'),
PART 97 VALUES('31.08.2003'),
PART 98 VALUES('15.09.2003'),
PART 99 VALUES('30.09.2003'),
PART 100 VALUES('15.10.2003'),
PART 101 VALUES('31.10.2003'),
PART 102 VALUES('15.11.2003'),
PART 103 VALUES('30.11.2003'),
PART 104 VALUES('15.12.2003'),
PART 105 VALUES('31.12.2003'),
PART 106 VALUES('15.01.2004'),
PART 107 VALUES('31.01.2004'),
PART 108 VALUES('15.02.2004'),
PART 109 VALUES('29.02.2004'),
PART 110 VALUES('15.03.2004'),
PART 111 VALUES('31.03.2004'),
PART 112 VALUES('15.04.2004'),
PART 113 VALUES('30.04.2004'),
PART 114 VALUES('15.05.2004'),
PART 115 VALUES('31.05.2004'),
PART 116 VALUES('15.06.2004'),
PART 117 VALUES('30.06.2004'),
PART 118 VALUES('15.07.2004'),
PART 119 VALUES('31.07.2004'),
PART 120 VALUES('15.08.2004'),
PART 121 VALUES('31.08.2004'),
PART 122 VALUES('15.09.2004'),
PART 123 VALUES('30.09.2004'),
PART 124 VALUES('15.10.2004'),
PART 125 VALUES('31.10.2004'),
PART 126 VALUES('15.11.2004'),
PART 127 VALUES('30.11.2004'),
PART 128 VALUES('15.12.2004'),
PART 129 VALUES('31.12.2004'),
PART 130 VALUES('15.01.2005'),
PART 131 VALUES('31.01.2005'),
PART 132 VALUES('15.02.2005'),
PART 133 VALUES('28.02.2005'),
PART 134 VALUES('15.03.2005'),
PART 135 VALUES('31.03.2005'),
PART 136 VALUES('15.04.2005'),
PART 137 VALUES('30.04.2005'),
PART 138 VALUES('15.05.2005'),
PART 139 VALUES('31.05.2005'),
PART 140 VALUES('15.06.2005'),
PART 141 VALUES('30.06.2005'),
PART 142 VALUES('15.07.2005'),
PART 143 VALUES('31.07.2005'),
PART 144 VALUES('15.08.2005'),
PART 145 VALUES('31.08.2005'),
PART 146 VALUES('15.09.2005'),
PART 147 VALUES('30.09.2005'),
PART 148 VALUES('15.10.2005'),
PART 149 VALUES('31.10.2005'),
PART 150 VALUES('15.11.2005'),
PART 151 VALUES('30.11.2005'),
PART 152 VALUES('15.12.2005'),
PART 153 VALUES('31.12.2005'),
PART 154 VALUES('15.01.2006'),
PART 155 VALUES('31.01.2006'),
PART 156 VALUES('15.02.2006'),
PART 157 VALUES('28.02.2006'),
PART 158 VALUES('15.03.2006'),
PART 159 VALUES('31.03.2006'),
PART 160 VALUES('15.04.2006'),
PART 161 VALUES('30.04.2006'),
PART 162 VALUES('15.05.2006'),
PART 163 VALUES('31.05.2006'),
PART 164 VALUES('15.06.2006'),
PART 165 VALUES('30.06.2006'),
PART 166 VALUES('15.07.2006'),
PART 167 VALUES('31.07.2006'),
PART 168 VALUES('15.08.2006'),
PART 169 VALUES('31.08.2006'),
PART 170 VALUES('15.09.2006'),
PART 171 VALUES('30.09.2006'),
PART 172 VALUES('15.10.2006'),
PART 173 VALUES('31.10.2006'),
PART 174 VALUES('15.11.2006'),
PART 175 VALUES('30.11.2006'),
PART 176 VALUES('15.12.2006'),
PART 177 VALUES('31.12.2006'),
PART 178 VALUES('15.01.2007'),
PART 179 VALUES('31.01.2007'),
PART 180 VALUES('15.02.2007'),
PART 181 VALUES('28.02.2007'),
PART 182 VALUES('15.03.2007'),
PART 183 VALUES('31.03.2007'),
PART 184 VALUES('15.04.2007'),
PART 185 VALUES('30.04.2007'),
PART 186 VALUES('15.05.2007'),
PART 187 VALUES('31.05.2007'),
PART 188 VALUES('15.06.2007'),
PART 189 VALUES('30.06.2007'),
PART 190 VALUES('15.07.2007'),
PART 191 VALUES('31.07.2007'),
PART 192 VALUES('15.08.2007'),
PART 193 VALUES('31.08.2007'),
PART 194 VALUES('15.09.2007'),
PART 195 VALUES('30.09.2007'),
PART 196 VALUES('15.10.2007'),
PART 197 VALUES('31.10.2007'),
PART 198 VALUES('15.11.2007'),
PART 199 VALUES('30.11.2007'),
PART 200 VALUES('15.12.2007'),
PART 201 VALUES('31.12.2007'),
PART 202 VALUES('15.01.2008'),
PART 203 VALUES('31.01.2008'),
PART 204 VALUES('15.02.2008'),
PART 205 VALUES('29.02.2008'),
PART 206 VALUES('15.03.2008'),
PART 207 VALUES('31.03.2008'),
PART 208 VALUES('15.04.2008'),
PART 209 VALUES('30.04.2008'),
PART 210 VALUES('15.05.2008'),
PART 211 VALUES('31.05.2008'),
PART 212 VALUES('15.06.2008'),
PART 213 VALUES('30.06.2008'),
PART 214 VALUES('15.07.2008'),
PART 215 VALUES('31.07.2008'),
PART 216 VALUES('15.08.2008'),
PART 217 VALUES('31.08.2008'),
PART 218 VALUES('15.09.2008'),
PART 219 VALUES('30.09.2008'),
PART 220 VALUES('15.10.2008'),
PART 221 VALUES('31.10.2008'),
PART 222 VALUES('15.11.2008'),
PART 223 VALUES('30.11.2008'),
PART 224 VALUES('15.12.2008'),
PART 225 VALUES('31.12.2008'),
PART 226 VALUES('15.01.2009'),
PART 227 VALUES('31.01.2009'),
PART 228 VALUES('15.02.2009'),
PART 229 VALUES('28.02.2009'),
PART 230 VALUES('15.03.2009'),
PART 231 VALUES('31.03.2009'),
PART 232 VALUES('15.04.2009'),
PART 233 VALUES('30.04.2009'),
PART 234 VALUES('15.05.2009'),
PART 235 VALUES('31.05.2009'),
PART 236 VALUES('15.06.2009'),
PART 237 VALUES('30.06.2009'),
PART 238 VALUES('15.07.2009'),
PART 239 VALUES('31.07.2009'),
PART 240 VALUES('15.08.2009'),
PART 241 VALUES('31.08.2009'),
PART 242 VALUES('15.09.2009'),
PART 243 VALUES('30.09.2009'),
PART 244 VALUES('15.10.2009'),
PART 245 VALUES('31.10.2009'),
PART 246 VALUES('15.11.2009'),
PART 247 VALUES('30.11.2009'),
PART 248 VALUES('15.12.2009'),
PART 249 VALUES('31.12.2009'),
PART 250 VALUES('31.12.2099')
$!
$!
)
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES;
------------------------------------------------------------------------
CREATE INDEX $creator.IWK936H3
ON $creator.Twk936
(MF150067 ASC,
MF150013 ASC)
USING STOGROUP GSMS
PRIQTY 48 SECQTY 7200
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
PIECESIZE 2 G;
commit;
------------------------------------------------------------------------
CREATE VIEW $creator.vWk936H1V(ID_MITTELFLUSS, RZ_HERKUNFT,
LIEFERANTENTYP, AUFTRAGSNUMMER, STORNO, NACHZUERFASSEN,
ZU_BEWERTEN, BEWEGUNGSART_DEPOT, PRODUKTENR_PROK, MF_PRODUKT,
PRODUKTEKLASSE, BEWEGUNGSVERDICHT, BUCHUNGSDATUM, GRUND,
URHEBER, WAEHRUNG, VALOR, BETRAG_FWHRG, BETRAG_CHF,
MUTATIONSPID, MUTATIONSDATUM, BUID_KUNDE, CIFNUMMER_KUNDE,
PVV_KUNDE, KUNDENART, KUNDENSEGMENT, KUNDENDOMIZIL,
KONTOARTENSCHLUESS, DEPOTARTENSCHLUESS, KUNDEN_BEZIEHUNGNR,
KUNDEN_GMZUSATZ, KUNDENBUERO_KUNDE, KUNDENVERANTWORTL,
BUID_GEGENPARTEI, GEGENPARTEI_TYP, GEGENPARTEI,
CSID_GEGENPARTEI, GP_BEZIEHUNGSNR, GP_GELDMARKTZUSATZ,
HAUPTGRUPPE_GP, UNTERGRUPPE_GP, BESTANDESWAEHRUNG,
BETR_BESTANDESWHRG, VALOREN_SEQUENZNR, GFM_LAUFNUMMER,
DEPOTSTELLE, BUCHUNGSART, DOMIZIL_GP, BEARBEITUNGSCODE,
VOLUMEN_NOM_STCK, LEITWEG, ZU_ABFLUSS, POLICENNUMMER,
AUFTRAGSLAUFNUMMER, ERSTELLUNGSTIMSTMP, COUPON_MANTEL,
MITTELFLUSS_IDENTI, EROEFFNUNGSDATUM, SALDIERUNGSDATUM,
INT_OE_FORM_PID_KV, INT_OE_KUNDENBUERO, INT_OE_KBUERO_GP,
BKST_KUNDENCIF, STAMM_KUNDENCIF, PRUEF_KUNDENCIF,
EDIT_STATUS_GP, EDIT_STATUS_GRUND, EDIT_STATUS_URHEB,
EDIT_STATUS_GESAMT, EDIT_STATUS_KOMMNT, BANKENCLEARING_NR,
VORHERIGER_GP_TYP, DEPOTUEBERTRAG, MUTIERBAR_BIS,
PREISKOMPONENTE, LADE_TIMESTAMP_ID, TRANSACTION_TYP,
RELEVANT_GROUP, LIFE_CYCLE_STATUS, NAME_AUFTRAGGEBER,
ORT_AUFTRAGGEBER, NAME_BEGUENSTIGTER, ORT_BEGUENSTIGTER,
LIMITEN_TYP, LIMITEN_HIERARCHIE, RM_INTERNATIONAL) AS
SELECT ALL $creator.Twk936.MF150001, $creator.Twk936.MF150002,
$creator.Twk936.MF150003, $creator.Twk936.MF150004,
$creator.Twk936.MF150005, $creator.Twk936.MF150006,
$creator.Twk936.MF150007, $creator.Twk936.MF150008,
$creator.Twk936.MF150009, $creator.Twk936.MF150010,
$creator.Twk936.MF150011, $creator.Twk936.MF150012,
$creator.Twk936.MF150013, $creator.Twk936.MF150014,
$creator.Twk936.MF150015, $creator.Twk936.MF150016,
$creator.Twk936.MF150017, $creator.Twk936.MF150018,
$creator.Twk936.MF150019, $creator.Twk936.MF150020,
$creator.Twk936.MF150021, $creator.Twk936.MF150022,
$creator.Twk936.MF150023, $creator.Twk936.MF150024,
$creator.Twk936.MF150025, $creator.Twk936.MF150026,
$creator.Twk936.MF150027, $creator.Twk936.MF150028,
$creator.Twk936.MF150029, $creator.Twk936.MF150030,
$creator.Twk936.MF150031, $creator.Twk936.MF150032,
$creator.Twk936.MF150033, $creator.Twk936.MF150034,
$creator.Twk936.MF150035, $creator.Twk936.MF150036,
$creator.Twk936.MF150037, $creator.Twk936.MF150038,
$creator.Twk936.MF150039, $creator.Twk936.MF150040,
$creator.Twk936.MF150041, $creator.Twk936.MF150042,
$creator.Twk936.MF150043, $creator.Twk936.MF150044,
$creator.Twk936.MF150045, $creator.Twk936.MF150046,
$creator.Twk936.MF150047, $creator.Twk936.MF150051,
$creator.Twk936.MF150052, $creator.Twk936.MF150053,
$creator.Twk936.MF150054, $creator.Twk936.MF150055,
$creator.Twk936.MF150056, $creator.Twk936.MF150059,
$creator.Twk936.MF150060, $creator.Twk936.MF150062,
$creator.Twk936.MF150063, $creator.Twk936.MF150064,
$creator.Twk936.MF150065, $creator.Twk936.MF150066,
$creator.Twk936.MF150067, $creator.Twk936.MF150068,
$creator.Twk936.MF150069, $creator.Twk936.MF150070,
$creator.Twk936.MF150071, $creator.Twk936.MF150072,
$creator.Twk936.MF150073, $creator.Twk936.MF150074,
$creator.Twk936.MF150075, $creator.Twk936.MF150076,
$creator.Twk936.MF150077, $creator.Twk936.MF150078,
$creator.Twk936.MF150079, $creator.Twk936.MF150080,
$creator.Twk936.MF150081, $creator.Twk936.MF150082,
$creator.Twk936.MF150083, $creator.Twk936.MF150084,
$creator.Twk936.MF150085, $creator.Twk936.MF150086,
$creator.Twk936.MF150087, $creator.Twk936.MF150088,
$creator.Twk936.MF150089, $creator.Twk936.MF150090,
$creator.Twk936.MF150091, $creator.Twk936.MF150092
FROM $creator.Twk936 ;
--
COMMIT;
--
$@¢
if $phase >= 2 then
if $parts = 5 then $@=¢ $** alter index- to table-partitioned
ALTER TABLE $creator.TWK936
ALTER PARTITION 5 ENDING ('31.10.1999') ;
$! else $@=¢
ALTER TABLE $creator.TWK936
ALTER PARTITION 250 ENDING ('31.12.2099') ;
$!
$!
------------------------------------------------------------------------
-- ADB2GEN - End of generated DDL --
------------------------------------------------------------------------
--
---||| end ddl testcase $mbr env $env phase $phase