zOs/JCL/GUBLERLO
//A540769L 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,'A540769L.LOAD'),
// REGION=0M
//SYSEXEC DD DISP=SHR,DSN=DSN.BMC.RZ1.P0.ADMIN.EXEC
//*DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSUT1 DD DISP=(,PASS),UNIT=SYSDA
//SORTOUT DD DISP=(,PASS),UNIT=SYSDA
//SYSTEMPL DD DSN=DBAF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE A22F6CZ6
DSN('DSN.VDPS2.DBAF.VV21A1A.VDPS042.UNLOAD')
DISP(OLD,KEEP,KEEP)
LOAD DATA INDDN A22F6CZ6 LOG NO RESUME NO REPLACE COPYDDN(TCOPYD)
STATISTICS INDEX(ALL) UPDATE(ALL)
EBCDIC CCSID(00500,00000,00000)
SORTKEYS 15824
INTO TABLE "VDPS2"."VTCFREINVESTLIST"
WHEN(00001:00002) = X'008E'
( "INSTRUMENTID"
POSITION( 00003:00006) INTEGER
, "CASHFLOWNO"
POSITION( 00007:00010) INTEGER
, "CFREINVESTLISTNO"
POSITION( 00011:00014) INTEGER
--, "HASPROVIDEDSERVICE"
-- POSITION( 00016:00019) INTEGER
-- NULLIF(00015)=X'FF'
, "PROVIDER1ID"
POSITION( 00021:00050) CHAR(00030)
NULLIF(00020)=X'FF'
, "PROVIDER2ID"
POSITION( 00052:00081) CHAR(00030)
NULLIF(00051)=X'FF'
, "PROVIDER3ID"
POSITION( 00083:00112) CHAR(00030)
NULLIF(00082)=X'FF'
, "CREATETIMESTAMP"
POSITION( 00114:00145) VARCHAR
NULLIF(00113)=X'FF'
, "UPDATETIMESTAMP"
POSITION( 00147:00178) VARCHAR
NULLIF(00146)=X'FF'
, "REINVINSTRID"
POSITION( 00180:00183) INTEGER
NULLIF(00179)=X'FF'
-- "PSINSTRSERVICEID"
-- POSITION( 00185:00188) INTEGER
-- NULLIF(00184)=X'FF'
, "TRADINGPLACE"
POSITION( 00190:00193) INTEGER
NULLIF(00189)=X'FF'
, "DISCOUNTCURRENCY"
POSITION( 00195:00198) INTEGER
NULLIF(00194)=X'FF'
, "REINVESTCURRENCY"
POSITION( 00200:00203) INTEGER
NULLIF(00199)=X'FF'
, "DISCOUNTAMOUNT"
POSITION( 00205:00212) FLOAT(53)
NULLIF(00204)=X'FF'
, "ISSUEPRICEAMOUNT"
POSITION( 00214:00221) FLOAT(53)
NULLIF(00213)=X'FF'
-- "BEGINDATE"
-- POSITION( 00223:00254) VARCHAR
-- NULLIF(00222)=X'FF'
-- "ENDDATE"
-- POSITION( 00256:00287) VARCHAR
-- NULLIF(00255)=X'FF'
, "DCNTAMTQTETYPE"
POSITION( 00289:00290) SMALLINT
NULLIF(00288)=X'FF'
, "DCNTAMTQTETYPEV"
POSITION( 00292:00547) VARCHAR
NULLIF(00291)=X'FF'
)
TEMPLATE A22F646J
DSN('DSN.VDPS2.DBAF.VV22A1A.VDPS079.UNLOAD')
DISP(OLD,KEEP,KEEP)
LOAD DATA INDDN A22F646J LOG NO RESUME NO REPLACE COPYDDN(TCOPYD)
STATISTICS INDEX(ALL) UPDATE(ALL)
EBCDIC CCSID(00500,00000,00000)
SORTKEYS 3487484
INTO TABLE "VDPS2"."VTEXDATE"
WHEN(00001:00002) = X'0081'
( "INSTRUMENTID"
POSITION( 00003:00006) INTEGER
, "CASHFLOWNO"
POSITION( 00007:00010) INTEGER
, "EXDATENO"
POSITION( 00011:00014) INTEGER
, "PROVIDER1ID"
POSITION( 00016:00045) CHAR(00030)
NULLIF(00015)=X'FF'
, "PROVIDER2ID"
POSITION( 00047:00076) CHAR(00030)
NULLIF(00046)=X'FF'
, "PROVIDER3ID"
POSITION( 00078:00107) CHAR(00030)
NULLIF(00077)=X'FF'
, "CREATETIMESTAMP"
POSITION( 00109:00140) VARCHAR
NULLIF(00108)=X'FF'
, "UPDATETIMESTAMP"
POSITION( 00142:00173) VARCHAR
NULLIF(00141)=X'FF'
-- , "HASPROVIDEDSERVICE"
-- POSITION( 00175:00176) SMALLINT
-- NULLIF(00174)=X'FF'
-- "PSINSTRSERVICEID"
-- POSITION( 00178:00181) INTEGER
-- NULLIF(00177)=X'FF'
, "TRADINGPLACE"
POSITION( 00183:00186) INTEGER
NULLIF(00182)=X'FF'
, "CURRENCY"
POSITION( 00188:00191) INTEGER
NULLIF(00187)=X'FF'
, "ADJUSTMENT"
POSITION( 00193:00200) FLOAT(53)
NULLIF(00192)=X'FF'
, "ADJUSTMENTAMOUNT"
POSITION( 00202:00209) FLOAT(53)
NULLIF(00201)=X'FF'
, "SPECIFICPAYDATE"
POSITION( 00211:00242) VARCHAR
NULLIF(00210)=X'FF'
, "EXDATE"
POSITION( 00244:00275) VARCHAR
NULLIF(00243)=X'FF'
, "SEPARATIONDATE"
POSITION( 00277:00308) VARCHAR
NULLIF(00276)=X'FF'
-- "BEGINDATE"
-- POSITION( 00310:00341) VARCHAR
-- NULLIF(00309)=X'FF'
-- "ENDDATE"
-- POSITION( 00343:00374) VARCHAR
-- NULLIF(00342)=X'FF'
, "EXDATESTATUSTYPE"
POSITION( 00376:00377) SMALLINT
NULLIF(00375)=X'FF'
, "EXDATESTATUSTYPEV"
POSITION( 00379:00634) VARCHAR
NULLIF(00378)=X'FF'
)
TEMPLATE A22F74UD
DSN('DSN.VDPS2.DBAF.VV22A1A.VDPS089.UNLOAD')
DISP(OLD,KEEP,KEEP)
LOAD DATA INDDN A22F74UD LOG NO RESUME NO REPLACE COPYDDN(TCOPYD)
STATISTICS INDEX(ALL) UPDATE(ALL)
EBCDIC CCSID(00500,00000,00000)
SORTKEYS 220002
INTO TABLE "VDPS2"."VTFUTUNDERFXSTRUCT"
WHEN(00001:00002) = X'008B'
( "INSTRUMENTID"
POSITION( 00003:00006) INTEGER
, "FUTUNDERFXSTRUCTNO"
POSITION( 00007:00010) INTEGER
, "FIXINGTIMESIZE"
POSITION( 00012:00015) INTEGER
NULLIF(00011)=X'FF'
, "PROVIDER1ID"
POSITION( 00017:00046) CHAR(00030)
NULLIF(00016)=X'FF'
, "PROVIDER2ID"
POSITION( 00048:00077) CHAR(00030)
NULLIF(00047)=X'FF'
, "PROVIDER3ID"
POSITION( 00079:00108) CHAR(00030)
NULLIF(00078)=X'FF'
, "CREATETIMESTAMP"
POSITION( 00110:00141) VARCHAR
NULLIF(00109)=X'FF'
, "UPDATETIMESTAMP"
POSITION( 00143:00174) VARCHAR
NULLIF(00142)=X'FF'
, "UNDERPOSITION"
POSITION( 00176:00177) SMALLINT
NULLIF(00175)=X'FF'
--, "HASPROVIDEDSERVICE"
-- POSITION( 00179:00180) SMALLINT
-- NULLIF(00178)=X'FF'
, "ISPATHDEPENDENT"
POSITION( 00182:00183) SMALLINT
NULLIF(00181)=X'FF'
, "ISPARTDVDENELGBLE"
POSITION( 00185:00186) SMALLINT
NULLIF(00184)=X'FF'
, "UNDERINSTRID"
POSITION( 00188:00191) INTEGER
NULLIF(00187)=X'FF'
-- "PSINSTRSERVICEID"
-- POSITION( 00193:00196) INTEGER
-- NULLIF(00192)=X'FF'
, "TRADINGPLACE"
POSITION( 00198:00201) INTEGER
NULLIF(00197)=X'FF'
, "TRADINGCURR"
POSITION( 00203:00206) INTEGER
NULLIF(00202)=X'FF'
, "UNDERAMOUNT"
POSITION( 00208:00215) FLOAT(53)
NULLIF(00207)=X'FF'
, "FIXINGBEGINDATE"
POSITION( 00217:00248) VARCHAR
NULLIF(00216)=X'FF'
, "FIXINGENDDATE"
POSITION( 00250:00281) VARCHAR
NULLIF(00249)=X'FF'
-- "BEGINDATE"
-- POSITION( 00283:00314) VARCHAR
-- NULLIF(00282)=X'FF'
-- "ENDDATE"
-- POSITION( 00316:00347) VARCHAR
-- NULLIF(00315)=X'FF'
, "UNDERDIRTYPE"
POSITION( 00349:00350) SMALLINT
NULLIF(00348)=X'FF'
, "UNDERUNITTYPE"
POSITION( 00352:00353) SMALLINT
NULLIF(00351)=X'FF'
, "FIXINGTYPE"
POSITION( 00355:00356) SMALLINT
NULLIF(00354)=X'FF'
, "FIXTIMEUNITTYPE"
POSITION( 00358:00359) SMALLINT
NULLIF(00357)=X'FF'
, "PATHFUNCTIONTYPE"
POSITION( 00361:00362) SMALLINT
NULLIF(00360)=X'FF'
, "QUOTETYPE"
POSITION( 00364:00365) SMALLINT
NULLIF(00363)=X'FF'
, "DAYTYPE"
POSITION( 00367:00368) SMALLINT
NULLIF(00366)=X'FF'
, "FIXBFORAFTERTYPE"
POSITION( 00370:00371) SMALLINT
NULLIF(00369)=X'FF'
, "UNDERDIRTYPEV"
POSITION( 00373:00628) VARCHAR
NULLIF(00372)=X'FF'
, "UNDERUNITTYPEV"
POSITION( 00630:00885) VARCHAR
NULLIF(00629)=X'FF'
, "FIXINGTYPEV"
POSITION( 00887:01142) VARCHAR
NULLIF(00886)=X'FF'
, "FIXTIMEUNITTYPEV"
POSITION( 01144:01399) VARCHAR
NULLIF(01143)=X'FF'
, "PATHFUNCTIONTYPEV"
POSITION( 01401:01656) VARCHAR
NULLIF(01400)=X'FF'
, "QUOTETYPEV"
POSITION( 01658:01913) VARCHAR
NULLIF(01657)=X'FF'
, "DAYTYPEV"
POSITION( 01915:02170) VARCHAR
NULLIF(01914)=X'FF'
, "FIXBFORAFTERTYPEV"
POSITION( 02172:02427) VARCHAR
NULLIF(02171)=X'FF'
, "FIXINGDESCR_G"
POSITION( 02429:03430) VARCHAR
NULLIF(02428)=X'FF'
, "DESCRIPTION_G"
POSITION( 03432:04433) VARCHAR
NULLIF(03431)=X'FF'
, "FIXINGDESCR_E"
POSITION( 04435:05436) VARCHAR
NULLIF(04434)=X'FF'
, "DESCRIPTION_E"
POSITION( 05438:06439) VARCHAR
NULLIF(05437)=X'FF'
, "FIXINGDESCR_F"
POSITION( 06441:07442) VARCHAR
NULLIF(06440)=X'FF'
, "DESCRIPTION_F"
POSITION( 07444:08445) VARCHAR
NULLIF(07443)=X'FF'
, "FIXINGDESCR_I"
POSITION( 08447:09448) VARCHAR
NULLIF(08446)=X'FF'
, "DESCRIPTION_I"
POSITION( 09450:10451) VARCHAR
NULLIF(09449)=X'FF'
, "FIXINGDESCR_N"
POSITION( 10453:11454) VARCHAR
NULLIF(10452)=X'FF'
, "DESCRIPTION_N"
POSITION( 11456:12457) VARCHAR
NULLIF(11455)=X'FF'
, "UNDERQUOTETYPE"
POSITION( 12459:12460) SMALLINT
NULLIF(12458)=X'FF'
, "UNDERQUOTETYPEV"
POSITION( 12462:12717) VARCHAR
NULLIF(12461)=X'FF'
)
TEMPLATE A22HGLR8
DSN('DSN.VDPS2.DBAF.VV24A1A.VDPS157.UNLOAD')
DISP(OLD,KEEP,KEEP)
LOAD DATA INDDN A22HGLR8 LOG NO RESUME NO REPLACE COPYDDN(TCOPYD)
STATISTICS INDEX(ALL) UPDATE(ALL)
EBCDIC CCSID(00500,00000,00000)
SORTKEYS 201744
INTO TABLE "VDPS2"."VTINSTRRESTRICTION_OLD"
WHEN(00001:00002) = X'006B'
( "INSTRUMENTID"
POSITION( 00003:00006) INTEGER
, "INSTRRESTRICTIONNO"
POSITION( 00007:00010) INTEGER
, "PROVIDER1ID"
POSITION( 00012:00041) CHAR(00030)
NULLIF(00011)=X'FF'
, "PROVIDER2ID"
POSITION( 00043:00072) CHAR(00030)
NULLIF(00042)=X'FF'
, "PROVIDER3ID"
POSITION( 00074:00103) CHAR(00030)
NULLIF(00073)=X'FF'
, "CREATETIMESTAMP"
POSITION( 00105:00136) VARCHAR
NULLIF(00104)=X'FF'
, "UPDATETIMESTAMP"
POSITION( 00138:00169) VARCHAR
NULLIF(00137)=X'FF'
, "MAXAMOUNT"
POSITION( 00171:00178) FLOAT(53)
NULLIF(00170)=X'FF'
, "MAXQUOTE"
POSITION( 00180:00187) FLOAT(53)
NULLIF(00179)=X'FF'
, "RESTRTYPEIDSYMBOL"
POSITION( 00189:00218) CHAR(00030)
NULLIF(00188)=X'FF'
, "PERIODBEGINDATE"
POSITION( 00220:00251) VARCHAR
NULLIF(00219)=X'FF'
, "PERIODENDDATE"
POSITION( 00253:00284) VARCHAR
NULLIF(00252)=X'FF'
, "RESTRMARKETTYPE"
POSITION( 00286:00287) SMALLINT
NULLIF(00285)=X'FF'
, "RESTRMARKETTYPEV"
POSITION( 00289:00544) VARCHAR
NULLIF(00288)=X'FF'
)
TEMPLATE A22GEKKP
DSN('DSN.VDPS2.DBAF.VV24A1A.VDPS182.UNLOAD')
DISP(OLD,KEEP,KEEP)
LOAD DATA INDDN A22GEKKP LOG NO RESUME NO REPLACE COPYDDN(TCOPYD)
STATISTICS INDEX(ALL) UPDATE(ALL)
EBCDIC CCSID(00500,00000,00000)
SORTKEYS 1154358
INTO TABLE "VDPS2"."VTLINUNDERFXSTRUCT"
WHEN(00001:00002) = X'0084'
( "INSTRUMENTID"
POSITION( 00003:00006) INTEGER
, "CASHFLOWNO"
POSITION( 00007:00010) INTEGER
, "PAYMENTNO"
POSITION( 00011:00014) INTEGER
, "LINUNDERFXSTRUCTNO"
POSITION( 00015:00018) INTEGER
, "FIXINGTIMESIZE"
POSITION( 00020:00023) INTEGER
NULLIF(00019)=X'FF'
, "PROVIDER1ID"
POSITION( 00025:00054) CHAR(00030)
NULLIF(00024)=X'FF'
, "PROVIDER2ID"
POSITION( 00056:00085) CHAR(00030)
NULLIF(00055)=X'FF'
, "PROVIDER3ID"
POSITION( 00087:00116) CHAR(00030)
NULLIF(00086)=X'FF'
, "CREATETIMESTAMP"
POSITION( 00118:00149) VARCHAR
NULLIF(00117)=X'FF'
, "UPDATETIMESTAMP"
POSITION( 00151:00182) VARCHAR
NULLIF(00150)=X'FF'
, "UNDERPOSITION"
POSITION( 00184:00185) SMALLINT
NULLIF(00183)=X'FF'
-- "HASPROVIDEDSERVICE"
-- POSITION( 00187:00188) SMALLINT
-- NULLIF(00186)=X'FF'
, "ISPATHDEPENDENT"
POSITION( 00190:00191) SMALLINT
NULLIF(00189)=X'FF'
, "ISPARTDVDENELGBLE"
POSITION( 00193:00194) SMALLINT
NULLIF(00192)=X'FF'
, "UNDERINSTRID"
POSITION( 00196:00199) INTEGER
NULLIF(00195)=X'FF'
-- "PSINSTRSERVICEID"
-- POSITION( 00201:00204) INTEGER
-- NULLIF(00200)=X'FF'
, "TRADINGPLACE"
POSITION( 00206:00209) INTEGER
NULLIF(00205)=X'FF'
, "TRADINGCURR"
POSITION( 00211:00214) INTEGER
NULLIF(00210)=X'FF'
, "UNDERAMOUNT"
POSITION( 00216:00223) FLOAT(53)
NULLIF(00215)=X'FF'
, "FIXINGBEGINDATE"
POSITION( 00225:00256) VARCHAR
NULLIF(00224)=X'FF'
, "FIXINGENDDATE"
POSITION( 00258:00289) VARCHAR
NULLIF(00257)=X'FF'
-- "BEGINDATE"
-- POSITION( 00291:00322) VARCHAR
-- NULLIF(00290)=X'FF'
-- "ENDDATE"
-- POSITION( 00324:00355) VARCHAR
-- NULLIF(00323)=X'FF'
, "UNDERDIRTYPE"
POSITION( 00357:00358) SMALLINT
NULLIF(00356)=X'FF'
, "UNDERUNITTYPE"
POSITION( 00360:00361) SMALLINT
NULLIF(00359)=X'FF'
, "FIXINGTYPE"
POSITION( 00363:00364) SMALLINT
NULLIF(00362)=X'FF'
, "FIXTIMEUNITTYPE"
POSITION( 00366:00367) SMALLINT
NULLIF(00365)=X'FF'
, "PATHFUNCTIONTYPE"
POSITION( 00369:00370) SMALLINT
NULLIF(00368)=X'FF'
, "QUOTETYPE"
POSITION( 00372:00373) SMALLINT
NULLIF(00371)=X'FF'
, "DAYTYPE"
POSITION( 00375:00376) SMALLINT
NULLIF(00374)=X'FF'
, "FIXBFORAFTERTYPE"
POSITION( 00378:00379) SMALLINT
NULLIF(00377)=X'FF'
, "UNDERDIRTYPEV"
POSITION( 00381:00636) VARCHAR
NULLIF(00380)=X'FF'
, "UNDERUNITTYPEV"
POSITION( 00638:00893) VARCHAR
NULLIF(00637)=X'FF'
, "FIXINGTYPEV"
POSITION( 00895:01150) VARCHAR
NULLIF(00894)=X'FF'
, "FIXTIMEUNITTYPEV"
POSITION( 01152:01407) VARCHAR
NULLIF(01151)=X'FF'
, "PATHFUNCTIONTYPEV"
POSITION( 01409:01664) VARCHAR
NULLIF(01408)=X'FF'
, "QUOTETYPEV"
POSITION( 01666:01921) VARCHAR
NULLIF(01665)=X'FF'
, "DAYTYPEV"
POSITION( 01923:02178) VARCHAR
NULLIF(01922)=X'FF'
, "FIXBFORAFTERTYPEV"
POSITION( 02180:02435) VARCHAR
NULLIF(02179)=X'FF'
, "FIXINGDESCR_G"
POSITION( 02437:03438) VARCHAR
NULLIF(02436)=X'FF'
, "DESCRIPTION_G"
POSITION( 03440:04441) VARCHAR
NULLIF(03439)=X'FF'
, "FIXINGDESCR_E"
POSITION( 04443:05444) VARCHAR
NULLIF(04442)=X'FF'
, "DESCRIPTION_E"
POSITION( 05446:06447) VARCHAR
NULLIF(05445)=X'FF'
, "FIXINGDESCR_F"
POSITION( 06449:07450) VARCHAR
NULLIF(06448)=X'FF'
, "DESCRIPTION_F"
POSITION( 07452:08453) VARCHAR
NULLIF(07451)=X'FF'
, "FIXINGDESCR_I"
POSITION( 08455:09456) VARCHAR
NULLIF(08454)=X'FF'
, "DESCRIPTION_I"
POSITION( 09458:10459) VARCHAR
NULLIF(09457)=X'FF'
, "FIXINGDESCR_N"
POSITION( 10461:11462) VARCHAR
NULLIF(10460)=X'FF'
, "DESCRIPTION_N"
POSITION( 11464:12465) VARCHAR
NULLIF(11463)=X'FF'
, "UNDERQUOTETYPE"
POSITION( 12467:12468) SMALLINT
NULLIF(12466)=X'FF'
, "UNDERQUOTETYPEV"
POSITION( 12470:12725) VARCHAR
NULLIF(12469)=X'FF'
)
TEMPLATE A22GEKPU
DSN('DSN.VDPS2.DBAF.VV24A1A.VDPS184.UNLOAD')
DISP(OLD,KEEP,KEEP)
LOAD DATA INDDN A22GEKPU LOG NO RESUME NO REPLACE COPYDDN(TCOPYD)
STATISTICS INDEX(ALL) UPDATE(ALL)
EBCDIC CCSID(00500,00000,00000)
SORTKEYS 5
INTO TABLE "VDPS2"."VTLISTGROUPSCHEME"
WHEN(00001:00002) = X'0086'
( "LISTINGGRPSCHEMEID"
POSITION( 00003:00006) INTEGER
, "HISTORYID"
POSITION( 00008:00011) INTEGER
NULLIF(00007)=X'FF'
, "ROWSTATUS"
POSITION( 00013:00014) SMALLINT
NULLIF(00012)=X'FF'
, "VSTQUALITY"
POSITION( 00016:00017) SMALLINT
NULLIF(00015)=X'FF'
, "REVISIONNO"
POSITION( 00019:00020) SMALLINT
NULLIF(00018)=X'FF'
, "VSTREQUIREDQUALITY"
POSITION( 00022:00023) SMALLINT
NULLIF(00021)=X'FF'
, "VSTMAXIMUMQUALITY"
POSITION( 00025:00026) SMALLINT
NULLIF(00024)=X'FF'
-- "HASPROVIDEDSERVICE"
-- POSITION( 00028:00029) SMALLINT
-- NULLIF(00027)=X'FF'
, "HASPENDINGACTVTY"
POSITION( 00031:00032) SMALLINT
NULLIF(00030)=X'FF'
, "ISRELEVANT"
POSITION( 00034:00035) SMALLINT
NULLIF(00033)=X'FF'
, "HASFUTUREMESSAGES"
POSITION( 00037:00038) SMALLINT
NULLIF(00036)=X'FF'
, "FOTWIZISDISABLED"
POSITION( 00040:00041) SMALLINT
NULLIF(00039)=X'FF'
, "ISONDB"
POSITION( 00043:00044) SMALLINT
NULLIF(00042)=X'FF'
-- "PSINSTRSERVICEID"
-- POSITION( 00046:00049) INTEGER
-- NULLIF(00045)=X'FF'
, "TRADINGPLACE"
POSITION( 00051:00054) INTEGER
NULLIF(00050)=X'FF'
, "SCHEMESYMBOL"
POSITION( 00056:00085) CHAR(00030)
NULLIF(00055)=X'FF'
, "OWNERIDSYMBOL"
POSITION( 00087:00116) CHAR(00030)
NULLIF(00086)=X'FF'
, "VSTNAME"
POSITION( 00118:00147) CHAR(00030)
NULLIF(00117)=X'FF'
, "VSTVERSION"
POSITION( 00149:00178) CHAR(00030)
NULLIF(00148)=X'FF'
, "CREATEUSERID"
POSITION( 00180:00209) CHAR(00030)
NULLIF(00179)=X'FF'
, "UPDATEUSERID"
POSITION( 00211:00240) CHAR(00030)
NULLIF(00210)=X'FF'
, "PROVIDER1SYMBOL"
POSITION( 00242:00271) CHAR(00030)
NULLIF(00241)=X'FF'
, "PROVIDER2SYMBOL"
POSITION( 00273:00302) CHAR(00030)
NULLIF(00272)=X'FF'
, "PROVIDER3SYMBOL"
POSITION( 00304:00333) CHAR(00030)
NULLIF(00303)=X'FF'
, "VALIDUNTILDATE"
POSITION( 00335:00366) VARCHAR
NULLIF(00334)=X'FF'
, "VALIDFROMDATE"
POSITION( 00368:00399) VARCHAR
NULLIF(00367)=X'FF'
-- "BEGINDATE"
-- POSITION( 00401:00432) VARCHAR
-- NULLIF(00400)=X'FF'
-- "ENDDATE"
-- POSITION( 00434:00465) VARCHAR
-- NULLIF(00433)=X'FF'
, "CREATETIMESTAMP"
POSITION( 00467:00498) VARCHAR
NULLIF(00466)=X'FF'
, "UPDATETIMESTAMP"
POSITION( 00500:00531) VARCHAR
NULLIF(00499)=X'FF'
, "USAGETYPE"
POSITION( 00533:00534) SMALLINT
NULLIF(00532)=X'FF'
, "FOTYPE"
POSITION( 00536:00537) SMALLINT
NULLIF(00535)=X'FF'
, "DATASTATUSTYPE"
POSITION( 00539:00540) SMALLINT
NULLIF(00538)=X'FF'
, "BLOCKINGCODETYPE"
POSITION( 00542:00543) SMALLINT
NULLIF(00541)=X'FF'
, "LOGICDELETIONTYPE"
POSITION( 00545:00546) SMALLINT
NULLIF(00544)=X'FF'
, "USAGETYPEV"
POSITION( 00548:00803) VARCHAR
NULLIF(00547)=X'FF'
, "FOTYPEV"
POSITION( 00805:01060) VARCHAR
NULLIF(00804)=X'FF'
, "DATASTATUSTYPEV"
POSITION( 01062:01317) VARCHAR
NULLIF(01061)=X'FF'
, "BLOCKINGCODETYPEV"
POSITION( 01319:01574) VARCHAR
NULLIF(01318)=X'FF'
, "LOGICDELETIONTYPEV"
POSITION( 01576:01831) VARCHAR
NULLIF(01575)=X'FF'
, "NAME_G"
POSITION( 01833:02088) VARCHAR
NULLIF(01832)=X'FF'
, "NAME_E"
POSITION( 02090:02345) VARCHAR
NULLIF(02089)=X'FF'
, "NAME_F"
POSITION( 02347:02602) VARCHAR
NULLIF(02346)=X'FF'
, "NAME_I"
POSITION( 02604:02859) VARCHAR
NULLIF(02603)=X'FF'
, "NAME_N"
POSITION( 02861:03116) VARCHAR
NULLIF(02860)=X'FF'
, "MODIFICATIONREASON"
POSITION( 03118:05119) VARCHAR
NULLIF(03117)=X'FF'
, "REMARKS"
POSITION( 05121:07122) VARCHAR
NULLIF(05120)=X'FF'
, "DESCRIPTION_G"
POSITION( 07124:08125) VARCHAR
NULLIF(07123)=X'FF'
, "DESCRIPTION_E"
POSITION( 08127:09128) VARCHAR
NULLIF(08126)=X'FF'
, "DESCRIPTION_F"
POSITION( 09130:10131) VARCHAR
NULLIF(09129)=X'FF'
, "DESCRIPTION_I"
POSITION( 10133:11134) VARCHAR
NULLIF(10132)=X'FF'
, "DESCRIPTION_N"
POSITION( 11136:12137) VARCHAR
NULLIF(11135)=X'FF'
)
TEMPLATE A22GEKYX
DSN('DSN.VDPS2.DBAF.VV24A1A.VDPS187.UNLOAD')
DISP(OLD,KEEP,KEEP)
LOAD DATA INDDN A22GEKYX LOG NO RESUME NO REPLACE COPYDDN(TCOPYD)
STATISTICS INDEX(ALL) UPDATE(ALL)
EBCDIC CCSID(00500,00000,00000)
SORTKEYS 1060
INTO TABLE "VDPS2"."VTLISTINGGROUP"
WHEN(00001:00002) = X'0089'
( "LISTINGGROUPID"
POSITION( 00003:00006) INTEGER
, "HISTORYID"
POSITION( 00008:00011) INTEGER
NULLIF(00007)=X'FF'
, "LISTINGGROUPTYPE"
POSITION( 00013:00014) SMALLINT
NULLIF(00012)=X'FF'
, "ROWSTATUS"
POSITION( 00016:00017) SMALLINT
NULLIF(00015)=X'FF'
, "VSTQUALITY"
POSITION( 00019:00020) SMALLINT
NULLIF(00018)=X'FF'
, "REVISIONNO"
POSITION( 00022:00023) SMALLINT
NULLIF(00021)=X'FF'
, "VSTREQUIREDQUALITY"
POSITION( 00025:00026) SMALLINT
NULLIF(00024)=X'FF'
, "VSTMAXIMUMQUALITY"
POSITION( 00028:00029) SMALLINT
NULLIF(00027)=X'FF'
, "HASFIXEDEXCHRATE"
POSITION( 00031:00032) SMALLINT
NULLIF(00030)=X'FF'
, "HASMUSTNAMEENTRY"
POSITION( 00034:00035) SMALLINT
NULLIF(00033)=X'FF'
-- "HASPROVIDEDSERVICE"
-- POSITION( 00037:00038) SMALLINT
-- NULLIF(00036)=X'FF'
, "HASPENDINGACTVTY"
POSITION( 00040:00041) SMALLINT
NULLIF(00039)=X'FF'
, "ISRELEVANT"
POSITION( 00043:00044) SMALLINT
NULLIF(00042)=X'FF'
, "HASFUTUREMESSAGES"
POSITION( 00046:00047) SMALLINT
NULLIF(00045)=X'FF'
, "FOTWIZISDISABLED"
POSITION( 00049:00050) SMALLINT
NULLIF(00048)=X'FF'
, "ISONDB"
POSITION( 00052:00053) SMALLINT
NULLIF(00051)=X'FF'
-- "PSINSTRSERVICEID"
-- POSITION( 00055:00058) INTEGER
-- NULLIF(00054)=X'FF'
, "TRADINGPLACE"
POSITION( 00060:00063) INTEGER
NULLIF(00059)=X'FF'
, "FIXEDEXCHRATECURR"
POSITION( 00065:00068) INTEGER
NULLIF(00064)=X'FF'
, "SCHEMESYMBOL"
POSITION( 00070:00099) CHAR(00030)
NULLIF(00069)=X'FF'
, "IDSYMBOL"
POSITION( 00101:00130) CHAR(00030)
NULLIF(00100)=X'FF'
, "VSTNAME"
POSITION( 00132:00161) CHAR(00030)
NULLIF(00131)=X'FF'
, "VSTVERSION"
POSITION( 00163:00192) CHAR(00030)
NULLIF(00162)=X'FF'
, "CREATEUSERID"
POSITION( 00194:00223) CHAR(00030)
NULLIF(00193)=X'FF'
, "UPDATEUSERID"
POSITION( 00225:00254) CHAR(00030)
NULLIF(00224)=X'FF'
, "PROVIDER1SYMBOL"
POSITION( 00256:00285) CHAR(00030)
NULLIF(00255)=X'FF'
, "PROVIDER2SYMBOL"
POSITION( 00287:00316) CHAR(00030)
NULLIF(00286)=X'FF'
, "PROVIDER3SYMBOL"
POSITION( 00318:00347) CHAR(00030)
NULLIF(00317)=X'FF'
, "VALIDUNTILDATE"
POSITION( 00349:00380) VARCHAR
NULLIF(00348)=X'FF'
, "VALIDFROMDATE"
POSITION( 00382:00413) VARCHAR
NULLIF(00381)=X'FF'
-- "BEGINDATE"
-- POSITION( 00415:00446) VARCHAR
-- NULLIF(00414)=X'FF'
-- "ENDDATE"
-- POSITION( 00448:00479) VARCHAR
-- NULLIF(00447)=X'FF'
, "CREATETIMESTAMP"
POSITION( 00481:00512) VARCHAR
NULLIF(00480)=X'FF'
, "UPDATETIMESTAMP"
POSITION( 00514:00545) VARCHAR
NULLIF(00513)=X'FF'
, "LEVIEDDUTYTYPE"
POSITION( 00547:00548) SMALLINT
NULLIF(00546)=X'FF'
, "FOTYPE"
POSITION( 00550:00551) SMALLINT
NULLIF(00549)=X'FF'
, "DATASTATUSTYPE"
POSITION( 00553:00554) SMALLINT
NULLIF(00552)=X'FF'
, "BLOCKINGCODETYPE"
POSITION( 00556:00557) SMALLINT
NULLIF(00555)=X'FF'
, "LOGICDELETIONTYPE"
POSITION( 00559:00560) SMALLINT
NULLIF(00558)=X'FF'
, "LEVIEDDUTYTYPEV"
POSITION( 00562:00817) VARCHAR
NULLIF(00561)=X'FF'
, "FOTYPEV"
POSITION( 00819:01074) VARCHAR
NULLIF(00818)=X'FF'
, "DATASTATUSTYPEV"
POSITION( 01076:01331) VARCHAR
NULLIF(01075)=X'FF'
, "BLOCKINGCODETYPEV"
POSITION( 01333:01588) VARCHAR
NULLIF(01332)=X'FF'
, "LOGICDELETIONTYPEV"
POSITION( 01590:01845) VARCHAR
NULLIF(01589)=X'FF'
, "NAME_G"
POSITION( 01847:02102) VARCHAR
NULLIF(01846)=X'FF'
, "NAME_E"
POSITION( 02104:02359) VARCHAR
NULLIF(02103)=X'FF'
, "NAME_F"
POSITION( 02361:02616) VARCHAR
NULLIF(02360)=X'FF'
, "NAME_I"
POSITION( 02618:02873) VARCHAR
NULLIF(02617)=X'FF'
, "NAME_N"
POSITION( 02875:03130) VARCHAR
NULLIF(02874)=X'FF'
, "MODIFICATIONREASON"
POSITION( 03132:05133) VARCHAR
NULLIF(03131)=X'FF'
, "REMARKS"
POSITION( 05135:07136) VARCHAR
NULLIF(05134)=X'FF'
, "DESCRIPTION_G"
POSITION( 07138:08139) VARCHAR
NULLIF(07137)=X'FF'
, "DESCRIPTION_E"
POSITION( 08141:09142) VARCHAR
NULLIF(08140)=X'FF'
, "DESCRIPTION_F"
POSITION( 09144:10145) VARCHAR
NULLIF(09143)=X'FF'
, "DESCRIPTION_I"
POSITION( 10147:11148) VARCHAR
NULLIF(10146)=X'FF'
, "DESCRIPTION_N"
POSITION( 11150:12151) VARCHAR
NULLIF(11149)=X'FF'
)
TEMPLATE A22HLVPB
DSN('DSN.VDPS2.DBAF.VV24A1A.VDPS190.UNLOAD')
DISP(OLD,KEEP,KEEP)
LOAD DATA INDDN A22HLVPB LOG NO RESUME NO REPLACE COPYDDN(TCOPYD)
STATISTICS INDEX(ALL) UPDATE(ALL)
EBCDIC CCSID(00500,00000,00000)
SORTKEYS 42327834
INTO TABLE "VDPS2"."VTLISTINGIDENT_OLD"
WHEN(00001:00002) = X'008C'
( "INSTRUMENTID"
POSITION( 00003:00006) INTEGER
, "LISTINGNO"
POSITION( 00007:00010) INTEGER
, "IDSYMBOL"
POSITION( 00011:00040) CHAR(00030)
, "SCHEMESYMBOL"
POSITION( 00041:00070) CHAR(00030)
, "ROWSTATUS"
POSITION( 00072:00073) SMALLINT
NULLIF(00071)=X'FF'
, "ROWSTATUSPAS"
POSITION( 00075:00076) SMALLINT
NULLIF(00074)=X'FF'
, "ROWSTATUSFUT"
POSITION( 00078:00079) SMALLINT
NULLIF(00077)=X'FF'
, "CREATETIMESTAMP"
POSITION( 00081:00112) VARCHAR
NULLIF(00080)=X'FF'
, "UPDATETIMESTAMP"
POSITION( 00114:00145) VARCHAR
NULLIF(00113)=X'FF'
, "VALIDFROMDATE"
POSITION( 00147:00178) VARCHAR
NULLIF(00146)=X'FF'
, "VALIDUNTILDATE"
POSITION( 00180:00211) VARCHAR
NULLIF(00179)=X'FF'
)
TEMPLATE A22HE41R
DSN('DSN.VDPS2.DBAF.VV25A1A.VDPS214.UNLOAD')
DISP(OLD,KEEP,KEEP)
LOAD DATA INDDN A22HE41R LOG NO RESUME NO REPLACE COPYDDN(TCOPYD)
STATISTICS INDEX(ALL) UPDATE(ALL)
EBCDIC CCSID(00500,00000,00000)
SORTKEYS 8164494
INTO TABLE "VDPS2"."VTOPTUNDERFXSTRUCT"
WHEN(00001:00002) = X'0072'
( "INSTRUMENTID"
POSITION( 00003:00006) INTEGER
, "CASHFLOWNO"
POSITION( 00007:00010) INTEGER
, "PAYMENTNO"
POSITION( 00011:00014) INTEGER
, "PAYUNDERFXSTRUCTNO"
POSITION( 00015:00018) INTEGER
, "FIXINGTIMESIZE"
POSITION( 00020:00023) INTEGER
NULLIF(00019)=X'FF'
, "PROVIDER1ID"
POSITION( 00025:00054) CHAR(00030)
NULLIF(00024)=X'FF'
, "PROVIDER2ID"
POSITION( 00056:00085) CHAR(00030)
NULLIF(00055)=X'FF'
, "PROVIDER3ID"
POSITION( 00087:00116) CHAR(00030)
NULLIF(00086)=X'FF'
, "CREATETIMESTAMP"
POSITION( 00118:00149) VARCHAR
NULLIF(00117)=X'FF'
, "UPDATETIMESTAMP"
POSITION( 00151:00182) VARCHAR
NULLIF(00150)=X'FF'
, "UNDERPOSITION"
POSITION( 00184:00185) SMALLINT
NULLIF(00183)=X'FF'
-- "HASPROVIDEDSERVICE"
-- POSITION( 00187:00188) SMALLINT
-- NULLIF(00186)=X'FF'
, "ISPATHDEPENDENT"
POSITION( 00190:00191) SMALLINT
NULLIF(00189)=X'FF'
, "ISPARTDVDENELGBLE"
POSITION( 00193:00194) SMALLINT
NULLIF(00192)=X'FF'
, "UNDERINSTRID"
POSITION( 00196:00199) INTEGER
NULLIF(00195)=X'FF'
-- "PSINSTRSERVICEID"
-- POSITION( 00201:00204) INTEGER
-- NULLIF(00200)=X'FF'
, "TRADINGPLACE"
POSITION( 00206:00209) INTEGER
NULLIF(00205)=X'FF'
, "TRADINGCURR"
POSITION( 00211:00214) INTEGER
NULLIF(00210)=X'FF'
, "UNDERAMOUNT"
POSITION( 00216:00223) FLOAT(53)
NULLIF(00215)=X'FF'
, "FIXINGBEGINDATE"
POSITION( 00225:00256) VARCHAR
NULLIF(00224)=X'FF'
, "FIXINGENDDATE"
POSITION( 00258:00289) VARCHAR
NULLIF(00257)=X'FF'
-- "BEGINDATE"
-- POSITION( 00291:00322) VARCHAR
-- NULLIF(00290)=X'FF'
-- "ENDDATE"
-- POSITION( 00324:00355) VARCHAR
-- NULLIF(00323)=X'FF'
, "UNDERDIRTYPE"
POSITION( 00357:00358) SMALLINT
NULLIF(00356)=X'FF'
, "UNDERUNITTYPE"
POSITION( 00360:00361) SMALLINT
NULLIF(00359)=X'FF'
, "FIXINGTYPE"
POSITION( 00363:00364) SMALLINT
NULLIF(00362)=X'FF'
, "FIXTIMEUNITTYPE"
POSITION( 00366:00367) SMALLINT
NULLIF(00365)=X'FF'
, "PATHFUNCTIONTYPE"
POSITION( 00369:00370) SMALLINT
NULLIF(00368)=X'FF'
, "QUOTETYPE"
POSITION( 00372:00373) SMALLINT
NULLIF(00371)=X'FF'
, "DAYTYPE"
POSITION( 00375:00376) SMALLINT
NULLIF(00374)=X'FF'
, "FIXBFORAFTERTYPE"
POSITION( 00378:00379) SMALLINT
NULLIF(00377)=X'FF'
, "UNDERDIRTYPEV"
POSITION( 00381:00636) VARCHAR
NULLIF(00380)=X'FF'
, "UNDERUNITTYPEV"
POSITION( 00638:00893) VARCHAR
NULLIF(00637)=X'FF'
, "FIXINGTYPEV"
POSITION( 00895:01150) VARCHAR
NULLIF(00894)=X'FF'
, "FIXTIMEUNITTYPEV"
POSITION( 01152:01407) VARCHAR
NULLIF(01151)=X'FF'
, "PATHFUNCTIONTYPEV"
POSITION( 01409:01664) VARCHAR
NULLIF(01408)=X'FF'
, "QUOTETYPEV"
POSITION( 01666:01921) VARCHAR
NULLIF(01665)=X'FF'
, "DAYTYPEV"
POSITION( 01923:02178) VARCHAR
NULLIF(01922)=X'FF'
, "FIXBFORAFTERTYPEV"
POSITION( 02180:02435) VARCHAR
NULLIF(02179)=X'FF'
, "FIXINGDESCR_G"
POSITION( 02437:03438) VARCHAR
NULLIF(02436)=X'FF'
, "DESCRIPTION_G"
POSITION( 03440:04441) VARCHAR
NULLIF(03439)=X'FF'
, "FIXINGDESCR_E"
POSITION( 04443:05444) VARCHAR
NULLIF(04442)=X'FF'
, "DESCRIPTION_E"
POSITION( 05446:06447) VARCHAR
NULLIF(05445)=X'FF'
, "FIXINGDESCR_F"
POSITION( 06449:07450) VARCHAR
NULLIF(06448)=X'FF'
, "DESCRIPTION_F"
POSITION( 07452:08453) VARCHAR
NULLIF(07451)=X'FF'
, "FIXINGDESCR_I"
POSITION( 08455:09456) VARCHAR
NULLIF(08454)=X'FF'
, "DESCRIPTION_I"
POSITION( 09458:10459) VARCHAR
NULLIF(09457)=X'FF'
, "FIXINGDESCR_N"
POSITION( 10461:11462) VARCHAR
NULLIF(10460)=X'FF'
, "DESCRIPTION_N"
POSITION( 11464:12465) VARCHAR
NULLIF(11463)=X'FF'
, "UNDERQUOTETYPE"
POSITION( 12467:12468) SMALLINT
NULLIF(12466)=X'FF'
, "UNDERQUOTETYPEV"
POSITION( 12470:12725) VARCHAR
NULLIF(12469)=X'FF'
)
TEMPLATE A22HFRHK
DSN('DSN.VDPS2.DBAF.VV27A1A.VDPS330.UNLOAD')
DISP(OLD,KEEP,KEEP)
LOAD DATA INDDN A22HFRHK LOG NO RESUME NO REPLACE COPYDDN(TCOPYD)
STATISTICS INDEX(ALL) UPDATE(ALL)
EBCDIC CCSID(00500,00000,00000)
SORTKEYS 380486
INTO TABLE "VDPS2"."DTUNDERFIXCOMP"
WHEN(00001:00002) = X'0082'
( "INSTRUMENTID"
POSITION( 00003:00006) INTEGER
, "CASHFLOWNO"
POSITION( 00007:00010) INTEGER
, "PAYMENTNO"
POSITION( 00011:00014) INTEGER
, "UNDERFIXCOMPNO"
POSITION( 00015:00018) INTEGER
, "FIXINGTIMESIZE"
POSITION( 00020:00023) INTEGER
NULLIF(00019)=X'FF'
, "PROVIDER1ID"
POSITION( 00025:00054) CHAR(00030)
NULLIF(00024)=X'FF'
, "PROVIDER2ID"
POSITION( 00056:00085) CHAR(00030)
NULLIF(00055)=X'FF'
, "PROVIDER3ID"
POSITION( 00087:00116) CHAR(00030)
NULLIF(00086)=X'FF'
, "CREATETIMESTAMP"
POSITION( 00118:00149) VARCHAR
NULLIF(00117)=X'FF'
, "UPDATETIMESTAMP"
POSITION( 00151:00182) VARCHAR
NULLIF(00150)=X'FF'
, "UNDERPOSITION"
POSITION( 00184:00185) SMALLINT
NULLIF(00183)=X'FF'
, "ISPATHDEPENDENT"
POSITION( 00187:00188) SMALLINT
NULLIF(00186)=X'FF'
, "ISPARTDVDENELGBLE"
POSITION( 00190:00191) SMALLINT
NULLIF(00189)=X'FF'
, "UNDERINSTRID"
POSITION( 00193:00196) INTEGER
NULLIF(00192)=X'FF'
, "TRADINGCURR"
POSITION( 00198:00201) INTEGER
NULLIF(00197)=X'FF'
, "UNDERAMOUNT"
POSITION( 00203:00210) FLOAT(53)
NULLIF(00202)=X'FF'
, "FIXINGBEGINDATE"
POSITION( 00212:00243) VARCHAR
NULLIF(00211)=X'FF'
, "FIXINGENDDATE"
POSITION( 00245:00276) VARCHAR
NULLIF(00244)=X'FF'
, "UNDERQUOTETYPE"
POSITION( 00278:00279) SMALLINT
NULLIF(00277)=X'FF'
, "UNDERDIRTYPE"
POSITION( 00281:00282) SMALLINT
NULLIF(00280)=X'FF'
, "UNDERUNITTYPE"
POSITION( 00284:00285) SMALLINT
NULLIF(00283)=X'FF'
, "FIXINGTYPE"
POSITION( 00287:00288) SMALLINT
NULLIF(00286)=X'FF'
, "FIXTIMEUNITTYPE"
POSITION( 00290:00291) SMALLINT
NULLIF(00289)=X'FF'
, "PATHFUNCTIONTYPE"
POSITION( 00293:00294) SMALLINT
NULLIF(00292)=X'FF'
, "QUOTETYPE"
POSITION( 00296:00297) SMALLINT
NULLIF(00295)=X'FF'
, "DAYTYPE"
POSITION( 00299:00300) SMALLINT
NULLIF(00298)=X'FF'
, "FIXBFORAFTERTYPE"
POSITION( 00302:00303) SMALLINT
NULLIF(00301)=X'FF'
, "UNDERQUOTETYPEV"
POSITION( 00305:00560) VARCHAR
NULLIF(00304)=X'FF'
, "UNDERDIRTYPEV"
POSITION( 00562:00817) VARCHAR
NULLIF(00561)=X'FF'
, "UNDERUNITTYPEV"
POSITION( 00819:01074) VARCHAR
NULLIF(00818)=X'FF'
, "FIXINGTYPEV"
POSITION( 01076:01331) VARCHAR
NULLIF(01075)=X'FF'
, "FIXTIMEUNITTYPEV"
POSITION( 01333:01588) VARCHAR
NULLIF(01332)=X'FF'
, "PATHFUNCTIONTYPEV"
POSITION( 01590:01845) VARCHAR
NULLIF(01589)=X'FF'
, "QUOTETYPEV"
POSITION( 01847:02102) VARCHAR
NULLIF(01846)=X'FF'
, "DAYTYPEV"
POSITION( 02104:02359) VARCHAR
NULLIF(02103)=X'FF'
, "FIXBFORAFTERTYPEV"
POSITION( 02361:02616) VARCHAR
NULLIF(02360)=X'FF'
, "FIXINGDESCR_G"
POSITION( 02618:03619) VARCHAR
NULLIF(02617)=X'FF'
, "DESCRIPTION_G"
POSITION( 03621:04622) VARCHAR
NULLIF(03620)=X'FF'
, "FIXINGDESCR_E"
POSITION( 04624:05625) VARCHAR
NULLIF(04623)=X'FF'
, "DESCRIPTION_E"
POSITION( 05627:06628) VARCHAR
NULLIF(05626)=X'FF'
, "FIXINGDESCR_F"
POSITION( 06630:07631) VARCHAR
NULLIF(06629)=X'FF'
, "DESCRIPTION_F"
POSITION( 07633:08634) VARCHAR
NULLIF(07632)=X'FF'
, "FIXINGDESCR_I"
POSITION( 08636:09637) VARCHAR
NULLIF(08635)=X'FF'
, "DESCRIPTION_I"
POSITION( 09639:10640) VARCHAR
NULLIF(09638)=X'FF'
, "FIXINGDESCR_N"
POSITION( 10642:11643) VARCHAR
NULLIF(10641)=X'FF'
, "DESCRIPTION_N"
POSITION( 11645:12646) VARCHAR
NULLIF(11644)=X'FF'
-- "HASPROVIDEDSERVICE"
-- POSITION( 12648:12651) INTEGER
-- NULLIF(12647)=X'FF'
-- "PSINSTRSERVICEID"
-- POSITION( 12653:12656) INTEGER
-- NULLIF(12652)=X'FF'
, "TRADINGPLACE"
POSITION( 12658:12661) INTEGER
NULLIF(12657)=X'FF'
-- "BEGINDATE"
-- POSITION( 12663:12694) VARCHAR
-- NULLIF(12662)=X'FF'
-- "ENDDATE"
-- POSITION( 12696:12727) VARCHAR
-- NULLIF(12695)=X'FF'
)
TEMPLATE A22HGJBL
DSN('DSN.VDPS2.DBAF.VV28A1A.VDPS364.UNLOAD')
DISP(OLD,KEEP,KEEP)
LOAD DATA INDDN A22HGJBL LOG NO RESUME NO REPLACE COPYDDN(TCOPYD)
STATISTICS INDEX(ALL) UPDATE(ALL)
EBCDIC CCSID(00500,00000,00000)
SORTKEYS 172605
INTO TABLE "VDPS2"."VTUNDERFXCOMPONENT"
WHEN(00001:00002) = X'0080'
( "INSTRUMENTID"
POSITION( 00003:00006) INTEGER
, "UNDERFIXINGNO"
POSITION( 00007:00010) INTEGER
, "UNDERFXCOMPONENTNO"
POSITION( 00011:00014) INTEGER
, "FIXINGTIMESIZE"
POSITION( 00016:00019) INTEGER
NULLIF(00015)=X'FF'
, "PROVIDER1ID"
POSITION( 00021:00050) CHAR(00030)
NULLIF(00020)=X'FF'
, "PROVIDER2ID"
POSITION( 00052:00081) CHAR(00030)
NULLIF(00051)=X'FF'
, "PROVIDER3ID"
POSITION( 00083:00112) CHAR(00030)
NULLIF(00082)=X'FF'
, "CREATETIMESTAMP"
POSITION( 00114:00145) VARCHAR
NULLIF(00113)=X'FF'
, "UPDATETIMESTAMP"
POSITION( 00147:00178) VARCHAR
NULLIF(00146)=X'FF'
, "UNDERPOSITION"
POSITION( 00180:00181) SMALLINT
NULLIF(00179)=X'FF'
, "ISPATHDEPENDENT"
POSITION( 00183:00184) SMALLINT
NULLIF(00182)=X'FF'
, "ISPARTDVDENELGBLE"
POSITION( 00186:00187) SMALLINT
NULLIF(00185)=X'FF'
-- "HASPROVIDEDSERVICE"
-- POSITION( 00189:00190) SMALLINT
-- NULLIF(00188)=X'FF'
, "UNDERINSTRID"
POSITION( 00192:00195) INTEGER
NULLIF(00191)=X'FF'
-- "PSINSTRSERVICEID"
-- POSITION( 00197:00200) INTEGER
-- NULLIF(00196)=X'FF'
, "TRADINGPLACE"
POSITION( 00202:00205) INTEGER
NULLIF(00201)=X'FF'
, "TRADINGCURR"
POSITION( 00207:00210) INTEGER
NULLIF(00206)=X'FF'
, "UNDERAMOUNT"
POSITION( 00212:00219) FLOAT(53)
NULLIF(00211)=X'FF'
, "FIXINGBEGINDATE"
POSITION( 00221:00252) VARCHAR
NULLIF(00220)=X'FF'
, "FIXINGENDDATE"
POSITION( 00254:00285) VARCHAR
NULLIF(00253)=X'FF'
-- "BEGINDATE"
-- POSITION( 00287:00318) VARCHAR
-- NULLIF(00286)=X'FF'
-- "ENDDATE"
-- POSITION( 00320:00351) VARCHAR
-- NULLIF(00319)=X'FF'
, "UNDERDIRTYPE"
POSITION( 00353:00354) SMALLINT
NULLIF(00352)=X'FF'
, "UNDERUNITTYPE"
POSITION( 00356:00357) SMALLINT
NULLIF(00355)=X'FF'
, "FIXINGTYPE"
POSITION( 00359:00360) SMALLINT
NULLIF(00358)=X'FF'
, "FIXTIMEUNITTYPE"
POSITION( 00362:00363) SMALLINT
NULLIF(00361)=X'FF'
, "PATHFUNCTIONTYPE"
POSITION( 00365:00366) SMALLINT
NULLIF(00364)=X'FF'
, "QUOTETYPE"
POSITION( 00368:00369) SMALLINT
NULLIF(00367)=X'FF'
, "DAYTYPE"
POSITION( 00371:00372) SMALLINT
NULLIF(00370)=X'FF'
, "FIXBFORAFTERTYPE"
POSITION( 00374:00375) SMALLINT
NULLIF(00373)=X'FF'
, "UNDERQUOTETYPE"
POSITION( 00377:00378) SMALLINT
NULLIF(00376)=X'FF'
, "UNDERDIRTYPEV"
POSITION( 00380:00635) VARCHAR
NULLIF(00379)=X'FF'
, "UNDERUNITTYPEV"
POSITION( 00637:00892) VARCHAR
NULLIF(00636)=X'FF'
, "FIXINGTYPEV"
POSITION( 00894:01149) VARCHAR
NULLIF(00893)=X'FF'
, "FIXTIMEUNITTYPEV"
POSITION( 01151:01406) VARCHAR
NULLIF(01150)=X'FF'
, "PATHFUNCTIONTYPEV"
POSITION( 01408:01663) VARCHAR
NULLIF(01407)=X'FF'
, "QUOTETYPEV"
POSITION( 01665:01920) VARCHAR
NULLIF(01664)=X'FF'
, "DAYTYPEV"
POSITION( 01922:02177) VARCHAR
NULLIF(01921)=X'FF'
, "FIXBFORAFTERTYPEV"
POSITION( 02179:02434) VARCHAR
NULLIF(02178)=X'FF'
, "UNDERQUOTETYPEV"
POSITION( 02436:02691) VARCHAR
NULLIF(02435)=X'FF'
, "FIXINGDESCR_G"
POSITION( 02693:03694) VARCHAR
NULLIF(02692)=X'FF'
, "DESCRIPTION_G"
POSITION( 03696:04697) VARCHAR
NULLIF(03695)=X'FF'
, "FIXINGDESCR_E"
POSITION( 04699:05700) VARCHAR
NULLIF(04698)=X'FF'
, "DESCRIPTION_E"
POSITION( 05702:06703) VARCHAR
NULLIF(05701)=X'FF'
, "FIXINGDESCR_F"
POSITION( 06705:07706) VARCHAR
NULLIF(06704)=X'FF'
, "DESCRIPTION_F"
POSITION( 07708:08709) VARCHAR
NULLIF(07707)=X'FF'
, "FIXINGDESCR_I"
POSITION( 08711:09712) VARCHAR
NULLIF(08710)=X'FF'
, "DESCRIPTION_I"
POSITION( 09714:10715) VARCHAR
NULLIF(09713)=X'FF'
, "FIXINGDESCR_N"
POSITION( 10717:11718) VARCHAR
NULLIF(10716)=X'FF'
, "DESCRIPTION_N"
POSITION( 11720:12721) VARCHAR
NULLIF(11719)=X'FF'
)