zOs/TX/WK600DDL
------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env $env phase $phase
-- subsys $subsys db $db creator $creator
-- tb $tb tx $ts ix $ix
-- from $tFr to $tTo
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
$**>~wk.testcase(wk600dds) $@[
-->>>>> generated by WK600DDL >>>>> changes there ||||||||||||||||||||||
SET CURRENT SQLID='S100447';
$@do tY = $tFr to $tTo $@=[
$=tX=-right($tY, 3, 0)
drop TABLESPACE $db.$ts$tX; commit;
$]
-- create $-{$tTo + 1 - $tFr} tables
$@do tY = $tFr to $tTo $@=[
$=tX =- right(tY, 3, 0)
-- table $creator.$tb$tX in $db.$ts
-- with index $creator.$ix${tX}A
CREATE TABLESPACE $ts$tX
IN $db
USING STOGROUP $sg
PRIQTY -1 SECQTY -1
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
NUMPARTS 8
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE NO
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255 DSSIZE 32 G
;
CREATE TABLE $creator.$tb$tX
(part integer,
i1 integer,
i2 integer,
v1 varchar(1000),
v2 varchar(1000),
v3 varchar(1000)
)
IN $db.$ts$tX
partition by (part)
(PART 1 VALUES(1),
PART 2 VALUES(2),
PART 3 VALUES(3),
PART 4 VALUES(4),
PART 5 VALUES(5),
PART 6 VALUES(6),
PART 7 VALUES(7),
PART 8 VALUES(8)
)
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
CREATE INDEX $creator.$ix${tX}A
ON $creator.$tb$tX
(i1 ASC, v2 asc)
USING STOGROUP $sg
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 10 PCTFREE 10
GBPCACHE CHANGED
NOT CLUSTER
BUFFERPOOL BP1
CLOSE NO
COPY NO
DEFINE YES
PIECESIZE 2 G;
COMMIT;
$]
$***out 20090504 15:30:58
$***out 20090504 12:43:18