zOs/TX/WK945DDL
SET CURRENT SQLID='S100447';
drop TABLESPACE $db.A945A;
commit; -- Kopie von twb173A1
CREATE TABLESPACE A945A
IN $db
USING STOGROUP GSMS
PRIQTY 180 SECQTY 7200
FREEPAGE 4 PCTFREE 36
SEGSIZE 64
BUFFERPOOL BP2
LOCKSIZE ROW
LOCKMAX SYSTEM
COMPRESS YES;
CREATE TABLE $creator.TWK945A1
(WK94501F DECIMAL(15, 0) NOT NULL
GENERATED BY DEFAULT
AS IDENTITY (MAXVALUE 999999999999999),
WK94502A CHAR(5) NOT NULL,
WK94503D DATE NOT NULL,
WK94504I INTEGER NOT NULL,
WK94505A CHAR(5) NOT NULL,
WK94506A CHAR(2) NOT NULL WITH DEFAULT '99',
WK94507A CHAR(1) NOT NULL WITH DEFAULT '9',
WK94508A CHAR(1) NOT NULL WITH DEFAULT '9',
WK94509A CHAR(1) NOT NULL WITH DEFAULT '9',
WK94510F DECIMAL(15, 6),
WK94511A CHAR(50) NOT NULL,
WK94512T TIMESTAMP NOT NULL WITH DEFAULT,
WK94513A CHAR(8) NOT NULL WITH DEFAULT SESSION_USER,
WK94514T TIMESTAMP,
WK94515A CHAR(8),
WK94516A VARCHAR(850) NOT NULL,
WK94517A CHAR(3) NOT NULL WITH DEFAULT,
CONSTRAINT WK94501F
PRIMARY KEY (WK94501F))
IN $db.A945A;
LABEL ON TABLE $creator.TWK945A1 IS 'EUREX Trade Confirmation';
COMMENT ON TABLE $creator.TWK945A1
IS 'Diese Tabelle ist Speicherort fuer EUREX-Trade-Confirmation (TC)
. Zusaetzlich zur Original-Message werden weitere Informationen abgelegt
, wie Key-Daten und diverse Stati';
COMMENT ON $creator.TWK945A1
(WK94516A IS 'Message',
WK94515A IS 'Last-Update durch: Programm oder User',
WK94514T IS 'Last-Update-Timestamp',
WK94513A IS 'Insert durch: Programm oder User',
WK94512T IS 'Insert-Timestamp',
WK94511A IS 'Message sendende Queue',
WK94510F IS 'Settlementkurs',
WK94509A IS 'Status NCM-Generierung',
WK94508A IS 'Status Kunden-Generierung',
WK94507A IS 'Status Konform-Generierung',
WK94506A IS 'Message Status',
WK94505A IS 'EUREX-Clearing-Member',
WK94504I IS 'Laufende Nummer innerhalb EUREX-Member-Id und Trade-Dat
e',
WK94503D IS 'Trade-Date',
WK94502A IS 'EUREX-Member-Id',
WK94501F IS 'Objekt-Id: PrimaryKey');
LABEL ON $creator.TWK945A1
(WK94516A IS 'emessage',
WK94515A IS 'eupduser',
WK94514T IS 'eupdtst',
WK94513A IS 'einsuser',
WK94512T IS 'einstst',
WK94511A IS 'emqname',
WK94510F IS 'esettle',
WK94509A IS 'encmstc',
WK94508A IS 'ekundstc',
WK94507A IS 'ekonfstc',
WK94506A IS 'emsgstc',
WK94505A IS 'eclrmbr',
WK94504I IS 'eseqno',
WK94503D IS 'etrdate',
WK94502A IS 'euxmbrid',
WK94501F IS 'eobjid#');
CREATE UNIQUE INDEX $creator.IWK945A0
ON $creator.TWK945A1
(WK94501F ASC)
USING STOGROUP GSMS
PRIQTY 180 SECQTY 7200
FREEPAGE 10 PCTFREE 10
CLUSTER
BUFFERPOOL BP1;
CREATE UNIQUE INDEX $creator.IWK945A1
ON $creator.TWK945A1
(WK94502A ASC,
WK94503D ASC,
WK94504I ASC)
USING STOGROUP GSMS
PRIQTY 180 SECQTY 7200
FREEPAGE 10 PCTFREE 10
BUFFERPOOL BP1;
CREATE INDEX $creator.IWK945A2
ON $creator.TWK945A1
(WK94517A ASC,
WK94506A ASC)
USING STOGROUP GSMS
FREEPAGE 10 PCTFREE 10
BUFFERPOOL BP1;
COMMIT;
SET CURRENT SCHEMA='S100447';
SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","$creator" ;
CREATE VIEW $creator.VWK945A1A(EOBJID#, EUXMBRID, ETRDATE, ESEQNO,
ECLRMBR, EMSGART, EMSGSTC, EKONFSTC, EKUNDSTC, ENCMSTC, ESETTLE,
EMQNAME, EINSTST, EINSVON, EUPDTST, EUPDVON, EMESSAGE) AS
SELECT WK94501F, WK94502A, WK94503D, WK94504I, WK94505A, WK94517A,
WK94506A, WK94507A, WK94508A, WK94509A, WK94510F, WK94511A,
WK94512T, WK94513A, WK94514T, WK94515A, WK94516A
FROM $creator.TWK945A1 ;
SET CURRENT SQLID='S100447';
SET CURRENT SCHEMA='$creator';
CREATE VIEW VWK945A1C(EOBJID#, EUXMBRID, ETRDATE, ESEQNO, ECLRMBR,
EMSGART, EMSGSTC, EKONFSTC, EKUNDSTC, ENCMSTC, ESETTLE, EMQNAME,
EINSTST, EINSVON, EUPDTST, EUPDVON, TRANSLENGTH, HEADERLENGTH,
DIRECTION, TRANSNO, TRANSID, USERID, REQUESTCODE, CONNECTIONID,
DBAPPLID, LOGINID, APPDESCR, REQID, RESUBMITFLAG, RESUBMITNO,
SUBSID, RESERVE, TRANSSTATUS, COMPLSEV, COMPLCD, TECHCOMPLSEV,
TECHCOMPLCD, STMSEQNO, TRNSEQNO, EXCHANGE_CODE, PRODLINE,
MEMBID_OBOMS, BOITRNTYP, TRAN_TYPE, CURRENCY_CODE,
DECIMAL_SHIFT, ISIN, CNTREXPDAT, GEN_NO, BEF_SECURITY_ID,
BEF_CLASS_CODE, BEF_CNTREXPMTHDAT, BEF_EXERCISE_PRICE,
BEF_SERIES_VERSION, BEF_CONTRACT_SIZE, AFT_SECURITY_ID,
AFT_CLASS_CODE, AFT_CNTREXPMTHDAT, AFT_CNTREXPYRDAT,
AFT_EXERCISE_PRICE, AFT_SERIES_VERSION, AFT_CONTRACT_SIZE,
CASH_VAL_DAT, SECUR_VAL_DAT, EXER_FLAG, EXER_STYLE, MGN_STYLE,
EXER_PRC_DECIMAL) AS
SELECT WK94501F, WK94502A, WK94503D, WK94504I, WK94505A, WK94517A,
WK94506A, WK94507A, WK94508A, WK94509A, WK94510F, WK94511A,
WK94512T, WK94513A, WK94514T, WK94515A,
SUBSTR(WK94516A, 001, 012), SUBSTR(WK94516A, 013, 012),
SUBSTR(WK94516A, 025, 001), SUBSTR(WK94516A, 026, 012),
SUBSTR(WK94516A, 038, 016), SUBSTR(WK94516A, 054, 011),
SUBSTR(WK94516A, 065, 002), SUBSTR(WK94516A, 067, 012),
SUBSTR(WK94516A, 079, 012), SUBSTR(WK94516A, 091, 012),
SUBSTR(WK94516A, 103, 040), SUBSTR(WK94516A, 143, 012),
SUBSTR(WK94516A, 155, 012), SUBSTR(WK94516A, 167, 012),
SUBSTR(WK94516A, 179, 012), SUBSTR(WK94516A, 191, 016),
SUBSTR(WK94516A, 207, 012), SUBSTR(WK94516A, 219, 012),
SUBSTR(WK94516A, 231, 012), SUBSTR(WK94516A, 243, 012),
SUBSTR(WK94516A, 255, 012), SUBSTR(WK94516A, 267, 009),
SUBSTR(WK94516A, 276, 009), SUBSTR(WK94516A, 285, 004),
SUBSTR(WK94516A, 289, 007), SUBSTR(WK94516A, 296, 005),
SUBSTR(WK94516A, 301, 002), SUBSTR(WK94516A, 303, 001),
SUBSTR(WK94516A, 304, 003), SUBSTR(WK94516A, 307, 001),
SUBSTR(WK94516A, 308, 012), SUBSTR(WK94516A, 320, 008),
SUBSTR(WK94516A, 328, 001), SUBSTR(WK94516A, 329, 004),
SUBSTR(WK94516A, 333, 001), SUBSTR(WK94516A, 334, 002),
SUBSTR(WK94516A, 336, 006), SUBSTR(WK94516A, 342, 001),
SUBSTR(WK94516A, 343, 013), SUBSTR(WK94516A, 356, 004),
SUBSTR(WK94516A, 360, 001), SUBSTR(WK94516A, 361, 002),
SUBSTR(WK94516A, 363, 004), SUBSTR(WK94516A, 367, 006),
SUBSTR(WK94516A, 373, 001), SUBSTR(WK94516A, 374, 013),
SUBSTR(WK94516A, 387, 008), SUBSTR(WK94516A, 395, 008),
SUBSTR(WK94516A, 403, 001), SUBSTR(WK94516A, 404, 001),
SUBSTR(WK94516A, 405, 001), SUBSTR(WK94516A, 406, 001)
FROM $creator.TWK945A1
WHERE WK94517A = 'CCM' ;
CREATE VIEW $creator.VWK945A1F(EOBJID#, EUXMBRID, ETRDATE, ESEQNO,
ECLRMBR, EMSGART, EMSGSTC, EKONFSTC, EKUNDSTC, ENCMSTC, ESETTLE,
EMQNAME, EINSTST, EINSVON, EUPDTST, EUPDVON, MSG_HEADER,
RESERVE, ERX_STATUS, TC_STREAM_SEQ, DATA_HEADER, TRAN_TYPE,
BUY_CODE, SECURITY_ID, CNTREXPMTHDAT, CNTREXPYRDAT, COMB_TYPE,
STRAT_TYP, EXG_MEMBER_ID, PART_GRP, PART_NO, TRN_ID_MO,
TRN_ID_SUF, TRN_ID_PARENT, HISTADJIND, ADJSTSCOD,
SHORT_QUANTITY, LONG_QUANTITY, MATCH_PRICE, TRANS_DATE,
TRAN_TIME, TRADTYP, ORDER_NUMBER, ORDER_TYPE, ORDER_RESTRICT,
OPEN_CODE, ORDER_QUANTITY, ORDER_DATE, CURRENCY_CODE,
DECIMAL_SHIFT, EXER_PRC_DECIMAL, DISP_DECIMAL, DATELSTUPDDAT,
ACCTTYPCOD, ACCTTYPNO, FF_TEXT1, FF_TEXT2, FF_TEXT3,
ORDR_PART_FILL, CLG_MEMBER_ID, ISIN, GUP_CTR_PTY, GUP_REF_CUST,
GUP_REF_USRNO, GUP_REF_TXT, GUP_STS, GROSS_BASIS, BASIS_SEC_ID,
DSGN_OPN_LNG, DSGN_OPN_SHT, BOND_SECURITY_ID, PREMIUM_AMOUNT,
FEE_AMOUNT, POST_LONG_BAL, POST_SHORT_BAL, CASH_VAL_DATE,
SECUR_VAL_DATE, SWAP_END_DATE, CPN_FIX_RAT, ORIGIN_EXCH_ID,
ORIGIN_TRAN_ID, ORIGIN_ORDER_NO, ORIGIN_TRANDAT, ORIGIN_TRANTIM,
ORIGIN_TRANDAT_CET, ORIGIN_TRANTIM_CET) AS
SELECT WK94501F, WK94502A, WK94503D, WK94504I, WK94505A, WK94517A,
WK94506A, WK94507A, WK94508A, WK94509A, WK94510F, WK94511A,
WK94512T, WK94513A, WK94514T, WK94515A,
SUBSTR(WK94516A, 001, 190), SUBSTR(WK94516A, 191, 016),
SUBSTR(WK94516A, 207, 060), SUBSTR(WK94516A, 267, 027),
SUBSTR(WK94516A, 294, 016), SUBSTR(WK94516A, 310, 003),
SUBSTR(WK94516A, 313, 001), SUBSTR(WK94516A, 314, 004),
SUBSTR(WK94516A, 318, 002), SUBSTR(WK94516A, 320, 004),
SUBSTR(WK94516A, 324, 003), SUBSTR(WK94516A, 327, 007),
SUBSTR(WK94516A, 334, 005), SUBSTR(WK94516A, 339, 003),
SUBSTR(WK94516A, 342, 003), SUBSTR(WK94516A, 345, 006),
SUBSTR(WK94516A, 351, 005), SUBSTR(WK94516A, 356, 005),
SUBSTR(WK94516A, 361, 001), SUBSTR(WK94516A, 362, 001),
SUBSTR(WK94516A, 363, 013), SUBSTR(WK94516A, 376, 013),
SUBSTR(WK94516A, 389, 014), SUBSTR(WK94516A, 403, 008),
SUBSTR(WK94516A, 411, 008), SUBSTR(WK94516A, 419, 001),
SUBSTR(WK94516A, 420, 009), SUBSTR(WK94516A, 429, 001),
SUBSTR(WK94516A, 430, 001), SUBSTR(WK94516A, 431, 001),
SUBSTR(WK94516A, 432, 013), SUBSTR(WK94516A, 445, 008),
SUBSTR(WK94516A, 453, 003), SUBSTR(WK94516A, 456, 001),
SUBSTR(WK94516A, 457, 001), SUBSTR(WK94516A, 458, 002),
SUBSTR(WK94516A, 460, 018), SUBSTR(WK94516A, 478, 001),
SUBSTR(WK94516A, 479, 001), SUBSTR(WK94516A, 480, 012),
SUBSTR(WK94516A, 492, 012), SUBSTR(WK94516A, 504, 012),
SUBSTR(WK94516A, 516, 001), SUBSTR(WK94516A, 517, 005),
SUBSTR(WK94516A, 522, 012), SUBSTR(WK94516A, 534, 005),
SUBSTR(WK94516A, 539, 012), SUBSTR(WK94516A, 551, 012),
SUBSTR(WK94516A, 563, 012), SUBSTR(WK94516A, 575, 001),
SUBSTR(WK94516A, 576, 006), SUBSTR(WK94516A, 582, 012),
SUBSTR(WK94516A, 594, 016), SUBSTR(WK94516A, 610, 016),
SUBSTR(WK94516A, 626, 012), SUBSTR(WK94516A, 638, 013),
SUBSTR(WK94516A, 651, 016), SUBSTR(WK94516A, 667, 013),
SUBSTR(WK94516A, 680, 013), SUBSTR(WK94516A, 693, 008),
SUBSTR(WK94516A, 701, 008), SUBSTR(WK94516A, 709, 008),
SUBSTR(WK94516A, 717, 006), SUBSTR(WK94516A, 723, 004),
SUBSTR(WK94516A, 727, 009), SUBSTR(WK94516A, 736, 012),
SUBSTR(WK94516A, 748, 008), SUBSTR(WK94516A, 756, 008),
SUBSTR(WK94516A, 764, 008), SUBSTR(WK94516A, 772, 008)
FROM $creator.TWK945A1
WHERE SUBSTR(WK94516A, 298, 01) = 'F' ;
CREATE VIEW $creator.VWK945A1O(EOBJID#, EUXMBRID, ETRDATE, ESEQNO,
ECLRMBR, EMSGART, EMSGSTC, EKONFSTC, EKUNDSTC, ENCMSTC, ESETTLE,
EMQNAME, EINSTST, EINSVON, EUPDTST, EUPDVON, MSG_HEADER,
RESERVE, ERX_STATUS, TC_STREAM_SEQ, DATA_HEADER, TRAN_TYPE,
BUY_CODE, SECURITY_ID, CLASS_CODE, CNTREXPMTHDAT, CNTREXPYRDAT,
EXERCISE_PRICE, SERIES_VERSION, COMB_TYPE, STRAT_TYP,
EXG_MEMBER_ID, PART_GRP, PART_NO, TRN_ID_MO, TRN_ID_SUF,
TRN_ID_PARENT, HISTADJIND, ADJSTSCOD, SHORT_QUANTITY,
LONG_QUANTITY, MATCH_PRICE, TRANS_DATE, TRAN_TIME, TRADTYP,
ORDER_NUMBER, ORDER_TYPE, ORDER_RESTRICT, OPEN_CODE,
ORDER_QUANTITY, ORDER_DATE, CURRENCY_CODE, DECIMAL_SHIFT,
EXER_PRC_DECIMAL, DISP_DECIMAL, DATELSTUPDDAT, ACCTTYPCOD,
ACCTTYPNO, FF_TEXT1, FF_TEXT2, FF_TEXT3, ORDR_PART_FILL,
CLG_MEMBER_ID, ISIN, GUP_CTR_PTY, GUP_REF_CUST, GUP_REF_USRNO,
GUP_REF_TXT, GUP_STS, DSGN_OPN_LNG, DSGN_OPN_SHT,
BOND_SECURITY_ID, PREMIUM_AMOUNT, FEE_AMOUNT, POST_LONG_BAL,
POST_SHORT_BAL, CASH_VAL_DATE, SECUR_VAL_DATE, ORIGIN_EXCH_ID,
ORIGIN_TRAN_ID, ORIGIN_ORDER_NO, ORIGIN_TRANDAT, ORIGIN_TRANTIM,
ORIGIN_TRANDAT_CET, ORIGIN_TRANTIM_CET) AS
SELECT WK94501F, WK94502A, WK94503D, WK94504I, WK94505A, WK94517A,
WK94506A, WK94507A, WK94508A, WK94509A, WK94510F, WK94511A,
WK94512T, WK94513A, WK94514T, WK94515A,
SUBSTR(WK94516A, 001, 190), SUBSTR(WK94516A, 191, 016),
SUBSTR(WK94516A, 207, 060), SUBSTR(WK94516A, 267, 027),
SUBSTR(WK94516A, 294, 016), SUBSTR(WK94516A, 310, 003),
SUBSTR(WK94516A, 313, 001), SUBSTR(WK94516A, 314, 004),
SUBSTR(WK94516A, 318, 001), SUBSTR(WK94516A, 319, 002),
SUBSTR(WK94516A, 321, 004), SUBSTR(WK94516A, 325, 006),
SUBSTR(WK94516A, 331, 001), SUBSTR(WK94516A, 332, 003),
SUBSTR(WK94516A, 335, 007), SUBSTR(WK94516A, 342, 005),
SUBSTR(WK94516A, 347, 003), SUBSTR(WK94516A, 350, 003),
SUBSTR(WK94516A, 353, 006), SUBSTR(WK94516A, 359, 005),
SUBSTR(WK94516A, 364, 005), SUBSTR(WK94516A, 369, 001),
SUBSTR(WK94516A, 370, 001), SUBSTR(WK94516A, 371, 013),
SUBSTR(WK94516A, 384, 013), SUBSTR(WK94516A, 397, 014),
SUBSTR(WK94516A, 411, 008), SUBSTR(WK94516A, 419, 008),
SUBSTR(WK94516A, 427, 001), SUBSTR(WK94516A, 428, 009),
SUBSTR(WK94516A, 437, 001), SUBSTR(WK94516A, 438, 001),
SUBSTR(WK94516A, 439, 001), SUBSTR(WK94516A, 440, 013),
SUBSTR(WK94516A, 453, 008), SUBSTR(WK94516A, 461, 003),
SUBSTR(WK94516A, 464, 001), SUBSTR(WK94516A, 465, 001),
SUBSTR(WK94516A, 466, 002), SUBSTR(WK94516A, 468, 018),
SUBSTR(WK94516A, 486, 001), SUBSTR(WK94516A, 387, 001),
SUBSTR(WK94516A, 488, 012), SUBSTR(WK94516A, 500, 012),
SUBSTR(WK94516A, 512, 012), SUBSTR(WK94516A, 524, 001),
SUBSTR(WK94516A, 525, 005), SUBSTR(WK94516A, 530, 012),
SUBSTR(WK94516A, 542, 005), SUBSTR(WK94516A, 547, 012),
SUBSTR(WK94516A, 559, 012), SUBSTR(WK94516A, 571, 012),
SUBSTR(WK94516A, 583, 001), SUBSTR(WK94516A, 584, 016),
SUBSTR(WK94516A, 600, 016), SUBSTR(WK94516A, 616, 012),
SUBSTR(WK94516A, 628, 013), SUBSTR(WK94516A, 641, 016),
SUBSTR(WK94516A, 657, 013), SUBSTR(WK94516A, 670, 013),
SUBSTR(WK94516A, 683, 008), SUBSTR(WK94516A, 691, 008),
SUBSTR(WK94516A, 699, 004), SUBSTR(WK94516A, 703, 009),
SUBSTR(WK94516A, 712, 012), SUBSTR(WK94516A, 724, 008),
SUBSTR(WK94516A, 732, 008), SUBSTR(WK94516A, 740, 008),
SUBSTR(WK94516A, 748, 008)
FROM $creator.TWK945A1
WHERE SUBSTR(WK94516A, 298, 01) = 'O' ;
CREATE VIEW VWK945A1P(EOBJID#, EUXMBRID, ETRDATE, ESEQNO, ECLRMBR,
EMSGART, EMSGSTC, EKONFSTC, EKUNDSTC, ENCMSTC, ESETTLE, EMQNAME,
EINSTST, EINSVON, EUPDTST, EUPDVON, TRANSLENGTH, HEADERLENGTH,
DIRECTION, TRANSNO, TRANSID, USERID, REQUESTCODE, CONNECTIONID,
DBAPPLID, LOGINID, APPDESCR, REQID, RESUBMITFLAG, RESUBMITNO,
SUBSID, RESERVE, TRANSSTATUS, COMPLSEV, COMPLCD, TECHCOMPLSEV,
TECHCOMPLCD, STMSEQNO, TRNSEQNO, EXCHANGE_CODE, PRODLINE,
MEMBID_OBOMS, BOITRNTYP, TRAN_TYPE, SECURITY_ID, ISIN,
EXER_DISP_DEC_O, EXER_DISP_DEC_N) AS
SELECT WK94501F, WK94502A, WK94503D, WK94504I, WK94505A, WK94517A,
WK94506A, WK94507A, WK94508A, WK94509A, WK94510F, WK94511A,
WK94512T, WK94513A, WK94514T, WK94515A,
SUBSTR(WK94516A, 001, 012), SUBSTR(WK94516A, 013, 012),
SUBSTR(WK94516A, 025, 001), SUBSTR(WK94516A, 026, 012),
SUBSTR(WK94516A, 038, 016), SUBSTR(WK94516A, 054, 011),
SUBSTR(WK94516A, 065, 002), SUBSTR(WK94516A, 067, 012),
SUBSTR(WK94516A, 079, 012), SUBSTR(WK94516A, 091, 012),
SUBSTR(WK94516A, 103, 040), SUBSTR(WK94516A, 143, 012),
SUBSTR(WK94516A, 155, 012), SUBSTR(WK94516A, 167, 012),
SUBSTR(WK94516A, 179, 012), SUBSTR(WK94516A, 191, 016),
SUBSTR(WK94516A, 207, 012), SUBSTR(WK94516A, 219, 012),
SUBSTR(WK94516A, 231, 012), SUBSTR(WK94516A, 243, 012),
SUBSTR(WK94516A, 255, 012), SUBSTR(WK94516A, 267, 009),
SUBSTR(WK94516A, 276, 009), SUBSTR(WK94516A, 285, 004),
SUBSTR(WK94516A, 289, 007), SUBSTR(WK94516A, 296, 005),
SUBSTR(WK94516A, 301, 002), SUBSTR(WK94516A, 303, 003),
SUBSTR(WK94516A, 306, 004), SUBSTR(WK94516A, 310, 012),
SUBSTR(WK94516A, 322, 001), SUBSTR(WK94516A, 323, 001)
FROM $creator.TWK945A1
WHERE WK94517A = 'PCM' ;
$@[
if $phase >= 2 then $@=[
CREATE VIEW VWK945A1T(EOBJID#, EUXMBRID, ETRDATE, ESEQNO, ECLRMBR,
EMSGART, EMSGSTC, EKONFSTC, EKUNDSTC, ENCMSTC, ESETTLE, EMQNAME,
EINSTST, EINSVON, EUPDTST, EUPDVON, TRANSLENGTH, HEADERLENGTH,
DIRECTION, TRANSNO, TRANSID, USERID, REQUESTCODE, CONNECTIONID,
DBAPPLID, LOGINID, APPDESCR, REQID, RESUBMITFLAG, RESUBMITNO,
SUBSID, EXCHANGE_CODE, PRODLINE, MEMBID_OBOMS, TRANSSTATUS,
COMPLSEV, COMPLCD, TECHCOMPLSEV, TECHCOMPLCD, STMSEQNO,
PRODSEQNO, CNTRSEQNO, TRAN_TYPE, BUY_CODE, SECURITY_ID,
CLASS_CODE, CNTREXPMTHDAT, CNTREXPYRDAT, EXERCISE_PRICE,
SERIES_VERSION, COMB_TYPE, EXG_MEMBER_ID, PARTICIPANT_GRP,
PARTICIPANT_NO, TRANSID_NO, TRANSID_SUFFIX, TRANSID_PARENT,
HISTADJIND, ADJSTSCOD, SHORT_QUANTITY, LONG_QUANTITY,
MATCH_PRICE, TRANS_DATE, TRAN_TIME, TRADTYP, ORDER_NUMBER,
ORDER_TYPE, ORDER_RESTRICT, OPEN_CODE, ORDER_QUANTITY,
ORDER_DATE, CURRENCY_CODE, DECIMAL_SHIFT, EXER_PRC_DECIMAL,
DISP_DECIMAL, DATELSTUPDDAT, ACCTTYPCOD, ACCTTYPNO, FF_TEXT1,
FF_TEXT2, FF_TEXT3, ORDR_PART_FILL, CLG_MEMBER_ID, ISIN,
GIVEUP_CTR_PTY, GIVEUP_REF_CUST, GIVEUP_REF_USRNO,
GIVEUP_REF_TXT, GIVEUP_STS, GROSS_BASIS, BASIS_SEC_ID,
DSGN_OPN_LNG, DSGN_OPN_SHT, BOND_SECURITY_ID, PREMIUM_AMOUNT,
FEE_AMOUNT, POST_LONG_BAL_DEL, POST_SHORT_BAL_DEL,
CASH_VAL_DATE, SECUR_VAL_DATE, STRAT_TYP, SWAP_END_DATE,
CPN_FIX_RAT, ORIGIN_EXCH_ID, ORIGIN_TRAN_ID, ORIGIN_ORDER_NO,
ORIGIN_TRANDAT, ORIGIN_TRANTIM, ORIGIN_TRANDAT_CET,
ORIGIN_TRANTIM_CET) AS
SELECT WK94501F, WK94502A, WK94503D, WK94504I, WK94505A, WK94517A,
WK94506A, WK94507A, WK94508A, WK94509A, WK94510F, WK94511A,
WK94512T, WK94513A, WK94514T, WK94515A,
SUBSTR(WK94516A, 001, 012), SUBSTR(WK94516A, 013, 012),
SUBSTR(WK94516A, 025, 001), SUBSTR(WK94516A, 026, 012),
SUBSTR(WK94516A, 038, 016), SUBSTR(WK94516A, 054, 011),
SUBSTR(WK94516A, 065, 002), SUBSTR(WK94516A, 067, 012),
SUBSTR(WK94516A, 079, 012), SUBSTR(WK94516A, 091, 012),
SUBSTR(WK94516A, 103, 040), SUBSTR(WK94516A, 143, 012),
SUBSTR(WK94516A, 155, 012), SUBSTR(WK94516A, 167, 012),
SUBSTR(WK94516A, 179, 012), SUBSTR(WK94516A, 191, 004),
SUBSTR(WK94516A, 195, 007), SUBSTR(WK94516A, 202, 005),
SUBSTR(WK94516A, 207, 012), SUBSTR(WK94516A, 219, 012),
SUBSTR(WK94516A, 231, 012), SUBSTR(WK94516A, 243, 012),
SUBSTR(WK94516A, 255, 012), SUBSTR(WK94516A, 267, 009),
SUBSTR(WK94516A, 276, 009), SUBSTR(WK94516A, 285, 009),
SUBSTR(WK94516A, 294, 003), SUBSTR(WK94516A, 297, 001),
SUBSTR(WK94516A, 298, 004), SUBSTR(WK94516A, 302, 001),
SUBSTR(WK94516A, 303, 002), SUBSTR(WK94516A, 305, 004),
SUBSTR(WK94516A, 309, 006), SUBSTR(WK94516A, 315, 001),
SUBSTR(WK94516A, 316, 003), SUBSTR(WK94516A, 319, 005),
SUBSTR(WK94516A, 324, 003), SUBSTR(WK94516A, 327, 003),
SUBSTR(WK94516A, 330, 006), SUBSTR(WK94516A, 336, 005),
SUBSTR(WK94516A, 341, 005), SUBSTR(WK94516A, 346, 001),
SUBSTR(WK94516A, 347, 001), SUBSTR(WK94516A, 348, 013),
SUBSTR(WK94516A, 361, 013), SUBSTR(WK94516A, 374, 014),
SUBSTR(WK94516A, 388, 008), SUBSTR(WK94516A, 396, 008),
SUBSTR(WK94516A, 404, 001), SUBSTR(WK94516A, 405, 009),
SUBSTR(WK94516A, 414, 001), SUBSTR(WK94516A, 415, 001),
SUBSTR(WK94516A, 416, 001), SUBSTR(WK94516A, 417, 013),
SUBSTR(WK94516A, 430, 008), SUBSTR(WK94516A, 438, 003),
SUBSTR(WK94516A, 441, 001), SUBSTR(WK94516A, 442, 001),
SUBSTR(WK94516A, 443, 002), SUBSTR(WK94516A, 445, 018),
SUBSTR(WK94516A, 463, 001), SUBSTR(WK94516A, 464, 001),
SUBSTR(WK94516A, 465, 012), SUBSTR(WK94516A, 477, 012),
SUBSTR(WK94516A, 489, 012), SUBSTR(WK94516A, 501, 001),
SUBSTR(WK94516A, 502, 005), SUBSTR(WK94516A, 507, 012),
SUBSTR(WK94516A, 519, 005), SUBSTR(WK94516A, 524, 012),
SUBSTR(WK94516A, 536, 012), SUBSTR(WK94516A, 548, 012),
SUBSTR(WK94516A, 560, 001), SUBSTR(WK94516A, 561, 006),
SUBSTR(WK94516A, 567, 012), SUBSTR(WK94516A, 579, 016),
SUBSTR(WK94516A, 595, 016), SUBSTR(WK94516A, 611, 012),
SUBSTR(WK94516A, 623, 013), SUBSTR(WK94516A, 636, 016),
SUBSTR(WK94516A, 652, 013), SUBSTR(WK94516A, 665, 013),
SUBSTR(WK94516A, 678, 008), SUBSTR(WK94516A, 686, 008),
SUBSTR(WK94516A, 694, 007), SUBSTR(WK94516A, 701, 008),
SUBSTR(WK94516A, 709, 006), SUBSTR(WK94516A, 715, 004),
SUBSTR(WK94516A, 719, 009), SUBSTR(WK94516A, 728, 012),
SUBSTR(WK94516A, 740, 008), SUBSTR(WK94516A, 748, 008),
SUBSTR(WK94516A, 756, 008), SUBSTR(WK94516A, 764, 008)
FROM $creator.TWK945A1
WHERE WK94517A IN('TCO', 'TCF') ;
$]
$]
COMMIT;