zOs/TX/WK926DDL
------------$-{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