zOs/TX/WK919DDS
------------------------------------------------------------------------
-- --
-- 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 --
------------------------------------------------------------------------
--