zOs/TX/WK911DDL
------------$-[right(userid() sysvar(sysnode) date(s) time(),60, '-')$]
-- testCase $dsn
-- env $env phase $phase
-- subsys $dbSys db $db creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
drop TABLESPACE $db.awk911k;
commit;
CREATE TABLESPACE awk911k
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
DSSIZE 32 G
NUMPARTS $-[min(9, $phase+3)$]
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255;
COMMIT;
------------------------------------------------------------------------
CREATE TABLE $creator.Tqz91wk911k1
(WK911K001 CHAR(3) FOR SBCS DATA NOT NULL,
WK911K002 CHAR(4) FOR SBCS DATA NOT NULL,
WK911K003 CHAR(20) FOR SBCS DATA NOT NULL,
WK911K004 DATE NOT NULL WITH DEFAULT
)
IN $db.awk911k
$@[
$=tt=900
if $phase > 2 then $@[
if \ ${?partKeys} then
$=partKeys=2
if $partKeys = 1 then $@=[
partition by (WK911K001)
$] else if $partKeys = 'wrong' then $@=[
partition by (WK911K001, WK911K003)
$] else if $partKeys = 2 then $@=[
partition by (WK911K001, WK911K002)
$]
if $phase < 7 then $@=[
(PART 1 VALUES('100')
,PART 2 VALUES('200')
,PART 3 VALUES('300')
,PART 4 VALUES('400')
,PART 5 VALUES('500')
$@[
if $phase <= 3 then $@=[
,PART 6 VALUES('900')
$] else if $phase = 4 then $@=[
,PART 6 VALUES('900')
,PART 7 VALUES('950')
$=tt=950
$] else if $phase = 5 then $@=[
,PART 6 VALUES('600')
,PART 7 VALUES('700')
,PART 8 VALUES('900')
$] else if $phase = 6 then $@=[
,PART 6 VALUES('600')
,PART 7 VALUES('970')
,PART 8 VALUES('980')
,PART 9 VALUES('990')
$=tt=990
$]
$]
$] else if $phase = 7 then $@=[
(PART 1 VALUES('200')
,PART 2 VALUES('300')
,PART 3 VALUES('400')
,PART 4 VALUES('500')
,PART 5 VALUES('600')
,PART 6 VALUES('970')
,PART 7 VALUES('980')
,PART 8 VALUES('990')
,PART 9 VALUES('999')
$=tt=999
$]
$@=[
)
$]
$] $** $phase >= 2
$]
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE;
COMMIT;
------------------------------------------------------------------------
CREATE INDEX $creator.Iqz91wk911k1
ON $creator.Tqz91wk911k1
(WK911K001 ASC
,WK911K002 ASC
-- ,WK911K003 ASC
)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
CLUSTER
PARTITIONED
$@[
if $phase <= 2 then $@=[
(PART 1 VALUES('100')
,PART 2 VALUES('200')
,PART 3 VALUES('300')
$@[
if $phase <= 1 then $@=[
,PART 4 VALUES('900')
$] else $@=[
,PART 4 VALUES('400')
,PART 5 VALUES('900')
$]
$]
)
$]
$]
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFINE YES;
COMMIT;
set current schema = $creator;
$=i=insert into Tqz91wk911k1 values
$i ('001', '001b', '001c', '01.01.1001');
$i ('102', '102b', '102c', '02.02.1102');
$i ('203', '203b', '203c', '03.03.1203');
$i ('304', '304b', '304c', '04.04.1304');
$i ('405', '405b', '405c', '05.05.1405');
$i ('506', '506b', '506c', '06.06.1506');
$i ('607', '607b', '607c', '07.07.1607');
$i ('708', '708b', '708c', '08.08.1708');
$i ('899', '899b', '899c', '09.09.1899');
$i ('$tt', '${tt}b'
, '$tt ctop', '12.12.1$tt');
commit;
------------------------------------------------------------------------
---||| end ddl testcase $mbr env $env phase $phase