zOs/TX/WK954DDL

--
  SET CURRENT SQLID='S100447';
--
  drop tablespace  $db.a954b;
  drop tablespace  $db.a954a;
  drop tablespace  $db.a954c;
  drop tablespace  $db.a954d;
  drop tablespace  $db.a954e;
  commit;
$*(
  CREATE TABLESPACE a954a
    IN $db
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    FREEPAGE 10 PCTFREE 12
    GBPCACHE CHANGED
    TRACKMOD YES
    DSSIZE 8 G
    NUMPARTS 4
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=$creator.TWK954A1 In $db.a954a
------------------------------------------------------------------------
--
  CREATE TABLE $creator.TWK954A1
     (FI01001A             DECIMAL(13, 0) NOT NULL,
      FI01002A             CHAR(12) FOR SBCS DATA NOT NULL,
      FI01003A             CHAR(4) FOR SBCS DATA NOT NULL,
      FI01004A             DATE NOT NULL,
      FI01005A             SMALLINT NOT NULL WITH DEFAULT 0,
      FI01006A             TIMESTAMP NOT NULL WITH DEFAULT,
      FI01007A             CHAR(5) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01008A             DECIMAL(13, 0) NOT NULL WITH DEFAULT,
      FI01009A             SMALLINT NOT NULL WITH DEFAULT,
      FI01010A             DECIMAL(13, 0) NOT NULL WITH DEFAULT,
      FI01011A             DECIMAL(31, 15) NOT NULL WITH DEFAULT,
      FI01012A             DECIMAL(31, 15) NOT NULL WITH DEFAULT,
      FI01013A             CHAR(3) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01014A             CHAR(5) FOR SBCS DATA NOT NULL
        WITH DEFAULT '00000',
      FI01015A             CHAR(5) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01016A             CHAR(5) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01017A             CHAR(5) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01018A             CHAR(30) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01019A             CHAR(3) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01020A             CHAR(30) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01021A             CHAR(4) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01022A             CHAR(30) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01023A             DECIMAL(31, 15) NOT NULL WITH DEFAULT,
      FI01024A             DECIMAL(31, 15) NOT NULL WITH DEFAULT,
      FI01025A             DECIMAL(31, 15) NOT NULL WITH DEFAULT,
      FI01026A             CHAR(3) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01027A             CHAR(3) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01028A             DECIMAL(31, 15) NOT NULL WITH DEFAULT,
      FI01029A             CHAR(3) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01030A             CHAR(4) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01031A             CHAR(3) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01032A             DECIMAL(31, 15) NOT NULL WITH DEFAULT,
      FI01033A             DECIMAL(15, 6) NOT NULL WITH DEFAULT,
      FI01034A             SMALLINT NOT NULL WITH DEFAULT,
      FI01035A             CHAR(2) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01036A             CHAR(8) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01037A             CHAR(8) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01038A             SMALLINT NOT NULL WITH DEFAULT,
      FI01039A             CHAR(1) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01040A             CHAR(1) FOR SBCS DATA NOT NULL
        WITH DEFAULT '0',
      FI01041A             CHAR(1) FOR SBCS DATA NOT NULL
        WITH DEFAULT '0',
      FI01042A             CHAR(1) FOR SBCS DATA NOT NULL
        WITH DEFAULT '0',
      FI01043A             CHAR(1) FOR SBCS DATA NOT NULL
        WITH DEFAULT '0',
      FI01044A             CHAR(1) FOR SBCS DATA NOT NULL
        WITH DEFAULT '0',
      FI01045A             CHAR(1) FOR SBCS DATA NOT NULL
        WITH DEFAULT '0',
      FI01046A             CHAR(1) FOR SBCS DATA NOT NULL
        WITH DEFAULT '0',
      FI01047A             CHAR(1) FOR SBCS DATA NOT NULL
        WITH DEFAULT '0',
      FI01048A             DATE NOT NULL WITH DEFAULT '9999-12-31',
      FI01049A             CHAR(2) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01050A             CHAR(1) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01051A             CHAR(1) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01052A             CHAR(12) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01053A             CHAR(1) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01054A             SMALLINT NOT NULL WITH DEFAULT,
      FI01055A             SMALLINT NOT NULL WITH DEFAULT,
      FI01056A             SMALLINT NOT NULL WITH DEFAULT,
      FI01057A             SMALLINT NOT NULL WITH DEFAULT,
      FI01058A             CHAR(1) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01059A             DATE NOT NULL WITH DEFAULT,
      FI01060A             CHAR(10) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01061A             CHAR(8) FOR SBCS DATA NOT NULL
        WITH DEFAULT USER ,
      FI01062A             DECIMAL(31, 15) NOT NULL WITH DEFAULT,
      FI01063A             DECIMAL(31, 15) NOT NULL WITH DEFAULT,
      FI01064A             SMALLINT NOT NULL WITH DEFAULT,
      FI01065A             CHAR(1) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01066A             VARCHAR(30) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI01067A             CHAR(4) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      CONSTRAINT FI01001A
      PRIMARY KEY (FI01001A,
                   FI01002A,
                   FI01003A,
$@[
if $phase = 1 then $@=[
                   FI01004A,
                   FI01005A,
                   FI01006A))
$] else $@=[
                   FI01004A))
$]
$]
    IN $db.a954a
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE;
--
  LABEL ON TABLE $creator.TWK954A1 IS 'LISTING-TABLE';
--
  COMMENT ON TABLE $creator.TWK954A1
$@[
if $phase = 1 then $@=[
    is '"listing"-tabelle: version vom 30may2006/wah';
$] else $@=[
    IS '"LISTING"-TABELLE: VERSION VOM 30MAY2006/WAH';
$]
$]
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=$db
--    Index=$creator.IWK954A1 On $creator.TWK954A1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX $creator.IWK954A1
    ON $creator.TWK954A1
     (FI01001A              ASC,
      FI01002A              ASC,
      FI01003A              ASC,
      FI01004A              ASC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    CLUSTER
     (PART 1 VALUES(43994.),
      PART 2 VALUES(75448.),
      PART 3 VALUES(105269.),
      PART   4 VALUES(9999999999999.))
    BUFFERPOOL BP1
    CLOSE NO
    COPY NO
    DEFER NO
    DEFINE YES;
  COMMIT;
$*)
  CREATE TABLESPACE a954b
    IN $db
    USING STOGROUP GSMS
    PRIQTY 180 SECQTY 7200
    FREEPAGE 8 PCTFREE 25
    GBPCACHE CHANGED
    TRACKMOD YES
    DSSIZE 4 G
    NUMPARTS   4
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE NO
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
  COMMIT;
  CREATE TABLE $creator.TWK954B1
     (FI01101A             DECIMAL(13, 0) NOT NULL,
      FI01102A             SMALLINT NOT NULL WITH DEFAULT,
      FI01103A             DATE NOT NULL,
      FI01104A             DECIMAL(31, 15) NOT NULL WITH DEFAULT,
      FI01105A             DECIMAL(31, 15) NOT NULL WITH DEFAULT,
      FI01106A             CHAR(5) FOR SBCS DATA NOT NULL
        WITH DEFAULT '00000',
      FI01107A             TIMESTAMP NOT NULL WITH DEFAULT,
      FI01108A             DECIMAL(13, 0) NOT NULL,
      FI01109A             CHAR(20) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      CONSTRAINT FI01109A
$@[
if $phase = 1 then  $@=[
      PRIMARY KEY (FI01101A,
                   FI01102A,
                   FI01103A,
                   FI01104A,
                   FI01105A,
                   FI01106A,
                   FI01107A))
$] else $@=[
      PRIMARY KEY (FI01109A))
$]
$]
    IN $db.a954b
$@[
if $phase = 2 then  $@=[
    PARTITION BY (FI01101A ASC,
                  FI01102A ASC,
                  FI01103A DESC,
                  FI01104A ASC,
                  FI01105A ASC,
                  FI01106A ASC,
                  FI01107A DESC)
     (PART 1 VALUES(16023.),
      PART 2 VALUES(27203.),
      PART 3 VALUES(47967.),
      PART   4 VALUES(9999999999999.))
$]
$]
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE;
--
  LABEL ON TABLE $creator.TWK954B1 IS 'UMSETZUNG-VALOR';
--
  COMMENT ON TABLE $creator.TWK954B1
    IS 'Schlüssel-Tabelle "Valor": Version vom 10jan2006/wah';
--
  COMMIT;
  CREATE UNIQUE INDEX $creator.IWK954B1
    ON $creator.TWK954B1
$@[
if $phase = 1 then $@=[
     (FI01101A              ASC,
      FI01102A              ASC,
      FI01103A              DESC,
      FI01104A              ASC,
      FI01105A              ASC,
      FI01106A              ASC,
      FI01107A              DESC)
$] else $@=[
     (FI01109A              ASC)
$]
$]
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
$@[ if $phase = 1 then $@=[
    CLUSTER
     (PART 1 VALUES(16023.),
      PART 2 VALUES(27203.),
      PART 3 VALUES(47967.),
      PART   4 VALUES(9999999999999.))
$] else $@=[
    NOT CLUSTER
    PIECESIZE 4 G
$]
$]
    BUFFERPOOL BP1
    CLOSE NO
    COPY NO
    DEFER NO
    DEFINE YES;
  CREATE UNIQUE INDEX $creator.IWK954B2
    ON $creator.TWK954B1
     (FI01108A              ASC,
      FI01103A              ASC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
$@[ if $phase = 1 then $@=[
    PIECESIZE 4 G
$] else $@=[
    PIECESIZE 2 G
$]
$]
    BUFFERPOOL BP1
    CLOSE NO
    COPY NO
    DEFER NO
    DEFINE YES
    ;
  COMMIT;
  CREATE INDEX $creator.IWK954B3
    ON $creator.TWK954B1
$@[ if $phase = 1 then $@=[
     (FI01109A              ASC)
    NOT CLUSTER
$] else $@=[
     (FI01101A              ASC,
      FI01102A              ASC,
      FI01103A              ASC,
      FI01104A              ASC,
      FI01105A              ASC,
      FI01106A              ASC)
    PARTITIONED
    CLUSTER
$]
$]
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFER NO
    DEFINE YES;
--
  COMMIT;
------------------------------------------------------------------------
--                                                                    --
-- ADB2GEN: Generate DDL for Table space=a954c In Database $db        --
--                                                                    --
------------------------------------------------------------------------
--
------------------------------------------------------------------------
-- Database=$db        Stogroup=GSMS (for partition 1)
-- Table space=$db.a954c
------------------------------------------------------------------------
$*(
  CREATE TABLESPACE a954c
    IN $db
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    FREEPAGE 10 PCTFREE 5
    GBPCACHE CHANGED
    TRACKMOD YES
    DSSIZE 4 G
    NUMPARTS 2
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 100;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=$creator.TWK954c1 In $db.a954c
------------------------------------------------------------------------
--
  CREATE TABLE $creator.TWK954c1
     (FI02101A             DECIMAL(13, 0) NOT NULL,
      FI02102A             CHAR(12) FOR SBCS DATA NOT NULL,
      FI02103A             CHAR(4) FOR SBCS DATA NOT NULL,
      FI02104A             DATE NOT NULL,
      FI02105A             SMALLINT NOT NULL,
      FI02106A             DATE NOT NULL WITH DEFAULT '0001-01-01',
      FI02107A             DATE NOT NULL WITH DEFAULT '0001-01-01',
      FI02108A             DATE NOT NULL WITH DEFAULT '0001-01-01',
      FI02109A             DATE NOT NULL WITH DEFAULT '0001-01-01',
      FI02110A             DATE NOT NULL WITH DEFAULT '0001-01-01',
      FI02111A             DECIMAL(13, 0) WITH DEFAULT NULL,
      FI02112A             DECIMAL(13, 0) WITH DEFAULT NULL,
      FI02113A             DECIMAL(13, 0) WITH DEFAULT NULL,
      FI02114A             DECIMAL(13, 0) WITH DEFAULT NULL,
      FI02115A             DECIMAL(13, 0) WITH DEFAULT NULL,
      CONSTRAINT FI02101A
      PRIMARY KEY (FI02101A,
                   FI02102A,
                   FI02103A,
$@[
    if $phase = 1 then $@=[
                   FI02104A,
                   FI02105A))
$] else $@=[
                   FI02104A))
$]
$]
    IN $db.a954c
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE;
--
  LABEL ON TABLE $creator.TWK954c1 IS 'PRICELOOKUP TABLE';
--
  COMMENT ON TABLE $creator.TWK954c1 IS 'LAST 5 DELIVERY-PRICES';
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=$db
--    Index=$creator.IWK954c1 On $creator.TWK954c1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX $creator.IWK954c1
    ON $creator.TWK954c1
     (FI02101A              ASC,
      FI02102A              ASC,
      FI02103A              ASC,
      FI02104A              DESC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    CLUSTER
     (PART 1 VALUES(4999999.),
      PART 2 VALUES(9999999999999.) FREEPAGE 10 PCTFREE 5)
    BUFFERPOOL BP1
    CLOSE NO
    COPY NO
    DEFER NO
    DEFINE YES;
--
  COMMIT;
  CREATE TABLESPACE a954d
    IN $db
    USING STOGROUP GSMS
    PRIQTY 1800 SECQTY 21600
    ERASE  NO
    FREEPAGE 5 PCTFREE 12
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=$creator.TWK954d1 In $db.a954d
------------------------------------------------------------------------
--
  CREATE TABLE $creator.TWK954d1
     (FI02501A             DECIMAL(13, 0) NOT NULL,
      FI02502A             CHAR(12) FOR SBCS DATA NOT NULL,
      FI02503A             CHAR(4) FOR SBCS DATA NOT NULL,
      FI02504A             DATE NOT NULL,
      FI02505A             SMALLINT NOT NULL WITH DEFAULT 0,
      FI02506A             TIMESTAMP NOT NULL WITH DEFAULT,
      FI02507A             DATE WITH DEFAULT NULL,
      FI02508A             CHAR(2) FOR SBCS DATA WITH DEFAULT NULL,
      FI02509A             DECIMAL(31, 15) WITH DEFAULT NULL,
      FI02510A             CHAR(8) FOR SBCS DATA WITH DEFAULT NULL,
      FI02511A             DATE WITH DEFAULT NULL,
      FI02512A             CHAR(2) FOR SBCS DATA WITH DEFAULT NULL,
      FI02513A             DECIMAL(31, 15) WITH DEFAULT NULL,
      FI02514A             CHAR(8) FOR SBCS DATA WITH DEFAULT NULL,
      FI02515A             DATE WITH DEFAULT NULL,
      FI02516A             CHAR(2) FOR SBCS DATA WITH DEFAULT NULL,
      FI02517A             DECIMAL(31, 15) WITH DEFAULT NULL,
      FI02518A             CHAR(8) FOR SBCS DATA WITH DEFAULT NULL,
      FI02519A             DATE WITH DEFAULT NULL,
      FI02520A             CHAR(2) FOR SBCS DATA WITH DEFAULT NULL,
      FI02521A             DECIMAL(31, 15) WITH DEFAULT NULL,
      FI02522A             CHAR(8) FOR SBCS DATA WITH DEFAULT NULL,
      FI02523A             DATE WITH DEFAULT NULL,
      FI02524A             CHAR(2) FOR SBCS DATA WITH DEFAULT NULL,
      FI02525A             DECIMAL(31, 15) WITH DEFAULT NULL,
      FI02526A             CHAR(8) FOR SBCS DATA WITH DEFAULT NULL,
      FI02527A             DATE WITH DEFAULT NULL,
      FI02528A             CHAR(2) FOR SBCS DATA WITH DEFAULT NULL,
      FI02529A             DECIMAL(31, 15) WITH DEFAULT NULL,
      FI02530A             CHAR(8) FOR SBCS DATA WITH DEFAULT NULL,
      FI02531A             DATE WITH DEFAULT NULL,
      FI02532A             CHAR(2) FOR SBCS DATA WITH DEFAULT NULL,
      FI02533A             DECIMAL(31, 15) WITH DEFAULT NULL,
      FI02534A             CHAR(8) FOR SBCS DATA WITH DEFAULT NULL,
      FI02535A             DATE WITH DEFAULT NULL,
      FI02536A             CHAR(2) FOR SBCS DATA WITH DEFAULT NULL,
      FI02537A             DECIMAL(31, 15) WITH DEFAULT NULL,
      FI02538A             CHAR(8) FOR SBCS DATA WITH DEFAULT NULL,
      FI02539A             DATE WITH DEFAULT NULL,
      FI02540A             CHAR(2) FOR SBCS DATA WITH DEFAULT NULL,
      FI02541A             DECIMAL(31, 15) WITH DEFAULT NULL,
      FI02542A             CHAR(8) FOR SBCS DATA WITH DEFAULT NULL,
      FI02543A             DATE WITH DEFAULT NULL,
      FI02544A             CHAR(2) FOR SBCS DATA WITH DEFAULT NULL,
      FI02545A             DECIMAL(31, 15) WITH DEFAULT NULL,
      FI02546A             CHAR(8) FOR SBCS DATA WITH DEFAULT NULL,
      FI02547A             DATE WITH DEFAULT NULL,
      FI02548A             CHAR(2) FOR SBCS DATA WITH DEFAULT NULL,
      FI02549A             DECIMAL(31, 15) WITH DEFAULT NULL,
      FI02550A             CHAR(8) FOR SBCS DATA WITH DEFAULT NULL,
      FI02551A             DATE WITH DEFAULT NULL,
      FI02552A             CHAR(2) FOR SBCS DATA WITH DEFAULT NULL,
      FI02553A             DECIMAL(31, 15) WITH DEFAULT NULL,
      FI02554A             CHAR(8) FOR SBCS DATA WITH DEFAULT NULL,
      FI02555A             DATE WITH DEFAULT NULL,
      FI02556A             DECIMAL(31, 15) WITH DEFAULT NULL,
      FI02557A             SMALLINT WITH DEFAULT NULL,
      CONSTRAINT FI02501A
      PRIMARY KEY (FI02501A,
                   FI02502A,
                   FI02503A,
$@[ if $phase = 1 then $@=[
                   FI02504A,
                   FI02505A,
                   FI02506A))
$] else $@=[
                   FI02504A))
$]
$]
    IN $db.a954d
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE;
--
  LABEL ON TABLE $creator.TWK954d1 IS 'EXTREMWERTE';
--
  COMMENT ON TABLE $creator.TWK954d1
    IS 'Extremwerte pro Instrument  Version 30may2006/wah';
--
  COMMIT;
  CREATE UNIQUE INDEX $creator.IWK954d1
    ON $creator.TWK954d1
     (FI02501A              ASC,
      FI02502A              ASC,
      FI02503A              ASC,
$@[ if $phase = 1 then $@=[
      FI02504A              DESC,
      FI02505A              ASC,
      FI02506A              DESC)
$] else $@=[
      FI02504A              ASC)
$]
$]
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 5 PCTFREE 10
    GBPCACHE CHANGED
    CLUSTER
    BUFFERPOOL BP1
    CLOSE NO
    COPY NO
    DEFER NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
------------------------------------------------------------------------
--                                                                    --
-- ADB2GEN: Generate DDL for Table space=a954e In Database $db        --
--                                                                    --
------------------------------------------------------------------------
--
------------------------------------------------------------------------
-- Database=$db        Stogroup=GSMS
-- Table space=$db.a954e
------------------------------------------------------------------------
--
  CREATE TABLESPACE a954e
    IN $db
    USING STOGROUP GSMS
    PRIQTY 776 SECQTY 3104
    ERASE  NO
    FREEPAGE 63 PCTFREE 14
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ROW
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=$creator.TWK954e1 In $db.a954e
------------------------------------------------------------------------
--
  CREATE TABLE $creator.TWK954e1
     (FI04001A             DECIMAL(13, 0) NOT NULL,
      FI04002A             CHAR(12) FOR SBCS DATA NOT NULL,
      FI04003A             CHAR(4) FOR SBCS DATA NOT NULL,
      FI04004A             SMALLINT NOT NULL WITH DEFAULT 0,
      FI04005A             TIMESTAMP NOT NULL WITH DEFAULT,
      FI04006A             CHAR(4) FOR SBCS DATA NOT NULL
        WITH DEFAULT,
      FI04007A             DECIMAL(31, 15) NOT NULL WITH DEFAULT,
      FI04008A             CHAR(8) FOR SBCS DATA NOT NULL
        WITH DEFAULT '00000000',
      FI04009A             CHAR(1) FOR SBCS DATA NOT NULL
        WITH DEFAULT 'I',
      FI04010A             DATE NOT NULL WITH DEFAULT,
      FI04011A             CHAR(8) FOR SBCS DATA NOT NULL
        WITH DEFAULT USER ,
      FI04012A             SMALLINT NOT NULL WITH DEFAULT,
      CONSTRAINT FI04001A
      PRIMARY KEY (FI04001A,
                   FI04002A,
$@[ if $phase = 1 then $@=[
                   FI04003A,
                   FI04004A,
                   FI04005A))
$] else $@=[
                   FI04003A))
$]
$]
    IN $db.a954e
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE;
--
  LABEL ON TABLE $creator.TWK954e1 IS 'TAX-QUOTE TABLE';
--
  COMMENT ON TABLE $creator.TWK954e1
    IS '"Tax-Quote"-Tabelle: Version vom 30may2006/wah';
--
  COMMIT;
--
------------------------------------------------------------------------
-- Database=$db
--    Index=$creator.IWK954e1 On $creator.TWK954e1
------------------------------------------------------------------------
--
  CREATE UNIQUE INDEX $creator.IWK954e1
    ON $creator.TWK954e1
     (FI04001A              ASC,
      FI04002A              ASC,
$@[ if $phase = 1 then $@=[
      FI04003A              ASC,
      FI04004A              ASC,
      FI04005A              DESC)
$] else $@=[
      FI04003A              ASC)
$]
$]
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 255 PCTFREE 4
    GBPCACHE CHANGED
    CLUSTER
    BUFFERPOOL BP1
    CLOSE NO
    COPY NO
    DEFER NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
  SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","$creator" ;
  CREATE VIEW $creator.VWK954A1(TKKEY, BOERSE, WHRG, VERFALL,
      GENERATION, MUT_TIMESTAMP, TIT_WHRG, UNDERLAYER, LAUFNR, FUTURE,
      BASISPREIS, KONTRAKT, KONTR_UNIT, VERSION, OPTIONSTYP, TOFFTYP,
      CALL_PUT, TICKER, TICKER_SCHEMA, RIC_TICKER, CS_TA, ISIN_NR,
      TR_PRICE_CA, TR_PRICE_CF, TR_PRICE_NP, TR_PRICE_UT, TR_PRICE_NT,
      VOLUME_AMT, VOLUME_UT, SIZE_CURR, SIZE_UNIT, SIZE_UAMT,
      NONVERSE_STK, HANDLHEIT, RECHNART, KOTIERUNG_ST, HANDEL_ST,
      MARKET_IMP, BESTAND, BPL_ST, BPL_HT, BPL_KS, ALT_KS, BPL_HA,
      AIS_SP, BPL_IN, BPL_SP, BPL_SP_DATE, AIS_PRIO, BPL_ART, BPL_TYP,
      HBOE, TK_SPERRE, VDPS_SOLL, VDPS_REL, VDPS_QUA, VALOR_SC,
      STATUS, GUELTIG_VON, QUELLE, LOG_EINTRAG, KONTRAKT_O,
      KONTRAKT_G, MUT_STAT, CS_BUART, TITEL_N) AS
    SELECT FI01001A, FI01002A, FI01003A, FI01004A, FI01005A, FI01006A,
           FI01007A, FI01008A, FI01009A, FI01010A, FI01011A, FI01012A,
           FI01013A, FI01014A, FI01015A, FI01016A, FI01017A, FI01018A,
           FI01019A, FI01020A, FI01021A, FI01022A, FI01023A, FI01024A,
           FI01025A, FI01026A, FI01027A, FI01028A, FI01029A, FI01030A,
           FI01031A, FI01032A, FI01033A, FI01034A, FI01035A, FI01036A,
           FI01037A, FI01038A, FI01039A, FI01040A, FI01041A, FI01042A,
           FI01043A, FI01044A, FI01045A, FI01046A, FI01047A, FI01048A,
           FI01049A, FI01050A, FI01051A, FI01052A, FI01053A, FI01054A,
           FI01055A, FI01056A, FI01057A, FI01058A, FI01059A, FI01060A,
           FI01061A, FI01062A, FI01063A, FI01064A, FI01065A, FI01066A
      FROM $creator.TWK954A1 ;
  COMMENT ON TABLE $creator.VWK954A1
    IS '"LISTING"-TABELLE: VERSION VOM 30MAY2006/WAH';
  SET CURRENT SQLID='$creator';
  CREATE SYNONYM TEST1 FOR $creator.VWK954A1;
  COMMIT;
  SET CURRENT SQLID='S100447';
  CREATE VIEW $creator.VWK954A2(TKKEY, BOERSE, WHRG, VERFALL,
      GENERATION, MUT_TIMESTAMP, TIT_WHRG, UNDERLAYER, LAUFNR, FUTURE,
      BASISPREIS, KONTRAKT, KONTR_UNIT, VERSION, OPTIONSTYP, TOFFTYP,
      CALL_PUT, TICKER, TICKER_SCHEMA, RIC_TICKER, CS_TA, ISIN_NR,
      TR_PRICE_CA, TR_PRICE_CF, TR_PRICE_NP, TR_PRICE_UT, TR_PRICE_NT,
      VOLUME_AMT, VOLUME_UT, SIZE_CURR, SIZE_UNIT, SIZE_UAMT,
      NONVERSE_STK, HANDLHEIT, RECHNART, KOTIERUNG_ST, HANDEL_ST,
      MARKET_IMP, BESTAND, BPL_ST, BPL_HT, BPL_KS, ALT_KS, BPL_HA,
      AIS_SP, BPL_IN, BPL_SP, BPL_SP_DATE, AIS_PRIO, BPL_ART, BPL_TYP,
      HBOE, TK_SPERRE, VDPS_SOLL, VDPS_REL, VDPS_QUA, VALOR_SC,
      STATUS, GUELTIG_VON, QUELLE, LOG_EINTRAG, KONTRAKT_O,
      KONTRAKT_G, MUT_STAT, CS_BUART, TITEL_N, DOMICILE) AS
    SELECT FI01001A, FI01002A, FI01003A, FI01004A, FI01005A, FI01006A,
           FI01007A, FI01008A, FI01009A, FI01010A, FI01011A, FI01012A,
           FI01013A, FI01014A, FI01015A, FI01016A, FI01017A, FI01018A,
           FI01019A, FI01020A, FI01021A, FI01022A, FI01023A, FI01024A,
           FI01025A, FI01026A, FI01027A, FI01028A, FI01029A, FI01030A,
           FI01031A, FI01032A, FI01033A, FI01034A, FI01035A, FI01036A,
           FI01037A, FI01038A, FI01039A, FI01040A, FI01041A, FI01042A,
           FI01043A, FI01044A, FI01045A, FI01046A, FI01047A, FI01048A,
           FI01049A, FI01050A, FI01051A, FI01052A, FI01053A, FI01054A,
           FI01055A, FI01056A, FI01057A, FI01058A, FI01059A, FI01060A,
           FI01061A, FI01062A, FI01063A, FI01064A, FI01065A, FI01066A,
           FI01067A
      FROM $creator.TWK954A1 ;
  CREATE VIEW $creator.VWK954B1(UNDERLAYER, LAUFNR, VERFALL,
      BASISPREIS, KONTRAKT, VERSION, MUT_TIMESTAMP, TKKEY) AS
    SELECT FI01101A, FI01102A, FI01103A, FI01104A, FI01105A, FI01106A,
           FI01107A, FI01108A
      FROM $creator.TWK954B1 ;
  COMMENT ON TABLE $creator.VWK954B1
    IS 'key conversion table for fasten up access to main data storage';
  CREATE VIEW $creator.VWK954B2(UNDERLAYER, LAUFNR, VERFALL,
      BASISPREIS, KONTRAKT, VERSION, MUT_TIMESTAMP, TKKEY, CSFIID) AS
    SELECT FI01101A, FI01102A, FI01103A, FI01104A, FI01105A, FI01106A,
           FI01107A, FI01108A, FI01109A
      FROM $creator.TWK954B1 ;
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=$creator.VWK954bb1
------------------------------------------------------------------------
--
--
  CREATE VIEW $creator.VWK954bb1(UNDERLAYER, LAUFNR, VERFALL,
      BASISPREIS, KONTRAKT, VERSION, MUT_TIMESTAMP, TKKEY) AS
    SELECT FI01101A, FI01102A, FI01103A, CHAR(FI01104A) as BASISPREIS,
           CHAR(FI01105A) as KONTRAKT, FI01106A, FI01107A, FI01108A
      FROM $creator.TWK954B1 ;
--
  COMMENT ON TABLE $creator.VWK954bb1
    IS 'key conversion table for fasten up access to main data storage';
--
  COMMIT;
--
------------------------------------------------------------------------
--    View=$creator.VWK954c1
------------------------------------------------------------------------
--
--
  CREATE VIEW $creator.VWK954c1(TKKEY, BOERSE, WHRG, VERFALL,
      GENERATION, KDATUM1, KDATUM2, KDATUM3, KDATUM4, KDATUM5, ROWID1,
      ROWID2, ROWID3, ROWID4, ROWID5) AS
    SELECT FI02101A, FI02102A, FI02103A, FI02104A, FI02105A, FI02106A,
           FI02107A, FI02108A, FI02109A, FI02110A, FI02111A, FI02112A,
           FI02113A, FI02114A, FI02115A
      FROM $creator.TWK954c1 ;
--
  COMMIT;
  CREATE VIEW $creator.VWK954d1(TKKEY, BOERSE, WHRG, VERFALL,
      GENERATION, MUT_TIMESTAMP, JH_KDATUM, JH_KA, JH_KURS, JH_FLAGS,
      JT_KDATUM, JT_KA, JT_KURS, JT_FLAGS, QH_KDATUM, QH_KA, QH_KURS,
      QH_FLAGS, QT_KDATUM, QT_KA, QT_KURS, QT_FLAGS, MH_KDATUM, MH_KA,
      MH_KURS, MH_FLAGS, MT_KDATUM, MT_KA, MT_KURS, MT_FLAGS,
      WH_KDATUM, WH_KA, WH_KURS, WH_FLAGS, WT_KDATUM, WT_KA, WT_KURS,
      WT_FLAGS, VH_KDATUM, VH_KA, VH_KURS, VH_FLAGS, VT_KDATUM, VT_KA,
      VT_KURS, VT_FLAGS, VJS_DATUM, VJS_KA, VJS_KURS, VJS_FLAGS,
      TE_KDATUM, TE_KA, TE_KURS, TE_FLAGS, MM_KDATUM, KUM_MKURS,
      MM_ZAEHLER) AS
    SELECT FI02501A, FI02502A, FI02503A, FI02504A, FI02505A, FI02506A,
           FI02507A, FI02508A, FI02509A, FI02510A, FI02511A, FI02512A,
           FI02513A, FI02514A, FI02515A, FI02516A, FI02517A, FI02518A,
           FI02519A, FI02520A, FI02521A, FI02522A, FI02523A, FI02524A,
           FI02525A, FI02526A, FI02527A, FI02528A, FI02529A, FI02530A,
           FI02531A, FI02532A, FI02533A, FI02534A, FI02535A, FI02536A,
           FI02537A, FI02538A, FI02539A, FI02540A, FI02541A, FI02542A,
           FI02543A, FI02544A, FI02545A, FI02546A, FI02547A, FI02548A,
           FI02549A, FI02550A, FI02551A, FI02552A, FI02553A, FI02554A,
           FI02555A, FI02556A, FI02557A
      FROM $creator.TWK954d1 ;
  COMMENT ON TABLE $creator.VWK954d1
    IS 'Extremwerte pro Instrument  Version 30may2006/wah';
  COMMENT ON $creator.VWK954d1
   (MM_ZAEHLER IS 'Zähler zur Berechnung des Monatsmittelkurses',
    KUM_MKURS IS 'kumulierter Monatskurs',
    MM_KDATUM IS 'Kursdatum des kumulierten Monatsmittelkurses',
    TE_FLAGS IS 'Steuerflags des Tagesendkurses',
    TE_KURS IS 'Tagesendkurs',
    TE_KA IS 'Kursart des Tagesendkurses',
    TE_KDATUM IS 'Kursdatum des Tagesendkurses',
    VJS_FLAGS IS 'Steuerflags des Vorjahresschlusskurses',
    VJS_KURS IS 'Vorjahresschlusskurs',
    VJS_KA IS 'Kursart des Vorjahresschlusskurses',
    VJS_DATUM IS 'Kursdatum des Vorjahresschlusskurses',
    VT_FLAGS IS 'Steuerflags des Vorjahrestiefstkurses',
    VT_KURS IS 'Vorjahrestiefstkurs',
    VT_KA IS 'Kursart des Vorjahrestiefstkurses',
    VT_KDATUM IS 'Kursdatum des Vorjahrestiefstkurses',
    VH_FLAGS IS 'Steuerflags des Vorjahreshöchstkurses',
    VH_KURS IS 'Vorjahreshöchstkurs',
    VH_KA IS 'Kursart des Vorjahreshöchstkurses',
    VH_KDATUM IS 'Kursdatum des Vorjahreshöchstkurses',
    WT_FLAGS IS 'Steuerflags des Wochentiefstkurses',
    WT_KURS IS 'Wochentiefstkurs',
    WT_KA IS 'Kursart des Wochentiefstkurses',
    WT_KDATUM IS 'Kursdatum des Wochentiefstkurses',
    WH_FLAGS IS 'Steuerflags des Wochenhöchstkurses',
    WH_KURS IS 'Wochenhöchstkurs',
    WH_KA IS 'Kursart des Wochenhöchstkurses',
    WH_KDATUM IS 'Kursdatum des Wochenhöchstkurses',
    MT_FLAGS IS 'Steuerflags des Monatstiefstkurses',
    MT_KURS IS 'Monatstiefstkurs',
    MT_KA IS 'Kursart des Monatstiefstkurses',
    MT_KDATUM IS 'Kursdatum des Monatstiefstkurses',
    MH_FLAGS IS 'Steuerflags des Monatshöchstkurses',
    MH_KURS IS 'Monatshöchstkurs',
    MH_KA IS 'Kursart des Monatshöchstkurses',
    MH_KDATUM IS 'Kursdatum des Monatshöchstkurses',
    QT_FLAGS IS 'Steuerflags des Quartaltiefstkurses',
    QT_KURS IS 'Quartaltiefstkurs',
    QT_KA IS 'Kursart des Quartaltiefstkurses',
    QT_KDATUM IS 'Kursdatum des Quartaltiefstkurses',
    QH_FLAGS IS 'Steuerflags des Quartalhöchstkurses',
    QH_KURS IS 'Quartalhöchstkurs',
    QH_KA IS 'Kursart des Quartalhöchstkurses',
    QH_KDATUM IS 'Kursdatum des Quartalhöchstkurses',
    JT_FLAGS IS 'Steuerflags des Jahrestiefstkurses',
    JT_KURS IS 'Jahrestiefstkurs',
    JT_KA IS 'Kursart des Jahrestiefstkurses',
    JT_KDATUM IS 'Kursdatum des Jahrestiefstkurses',
    JH_FLAGS IS 'Steuerflags des Jahreshöchstkurses',
    JH_KURS IS 'Jahreshöchstkurs',
    JH_KA IS 'Kursart des Jahreshöchstkurses',
    JH_KDATUM IS 'Kursdatum des Jahreshöchstkurses',
    MUT_TIMESTAMP IS 'Timestamp jeder Mutation',
    GENERATION IS 'Selektive Markierung historisierter Stammdaten (Valor
/Generation)',
    VERFALL IS 'Verfalldatum bei TOFF+ Format yyyymmdd (der Tag ist bei
beiden Feldern immer mit Null oder Blank - KA4205 - abgefüllt)',
    WHRG IS 'Währungsschlüssel+ TK-Währung (Handelswährung) (auch im PRL
-6804 vorhaen)',
    BOERSE IS 'Gesellschaftsschlüssel+ Eindeutige Identifikation der Ins
titution innealb des vorgegebenen Schemas.',
    TKKEY IS 'Instrumenten-Symbol+ TK-Schlüssel zu dem entsprechenden Ti
tel. Bei Tofist es nicht der Key zum Basistitel. Dieser muss aus dem OFI
-Segment glsen werden.');
  COMMIT;
--
  CREATE VIEW $creator.VWK954e1(TKKEY, BOERSE, WHRG, GENERATION,
      MUT_TIMESTAMP, JAHR_PSV, KURSWERT, STEUERFLAGS, STATUS,
      GUELTIG_VON, LOG_EINTRAG, MUT_STAT) AS
    SELECT FI04001A, FI04002A, FI04003A, FI04004A, FI04005A, FI04006A,
           FI04007A, FI04008A, FI04009A, FI04010A, FI04011A, FI04012A
      FROM $creator.TWK954e1 ;
--
  COMMENT ON TABLE $creator.VWK954e1
    IS 'Entity "Tax-Quote": Version vom 30may2006/wah';
--
  COMMENT ON $creator.VWK954e1
   (MUT_STAT IS 'Handmutation durch Benutzer? 0=nein,1=ja',
    LOG_EINTRAG IS 'Logeintrag',
    GUELTIG_VON IS 'Gültig-von',
    STATUS IS 'aktiver bzw. inaktiver Eintrag (Aktiv = "A", In = "I")',
    STEUERFLAGS IS 'Konkatenat der "bit-Batterie" bestehend aus 8 Inf',
    KURSWERT IS 'Kurs-Wert',
    JAHR_PSV IS 'Steuerjahr',
    MUT_TIMESTAMP IS 'Timestamp jeder Mutation',
    GENERATION IS 'Selektive Markierung historisierter Stammdaten (Va)',
    WHRG IS 'Währungsschlüssel   ist auch im PRL-6804 vorhanden',
    BOERSE IS 'Gesellschaftsschlüssel',
    TKKEY IS 'Instrumenten-Symbol  TK-Schlüssel zu dem entsprech'
             );
  COMMIT;
$*)