zOs/TX/WK927DDL
------------$-{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.A927A;
commit;
$@[
if $phase > 0 then $@=[
CREATE TABLESPACE A927A
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
NUMPARTS 4
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255;
COMMIT;
------------------------------------------------------------------------
CREATE TABLE $creator.TWK927A1
(part smallint NOT NULL
,ch1 CHAR(4) FOR SBCS DATA NOT NULL
,ch2 CHAR(2$phase) FOR SBCS DATA NOT NULL
)
IN $db.A927A
partition by (part)
(PART 1 VALUES(1)
,PART 2 VALUES(2)
,PART 3 VALUES(3)
,PART 4 VALUES(4)
)
CCSID EBCDIC
NOT VOLATILE;
COMMIT;
insert into $creator.TWK927A1 values
(1, 'eins', 'eins ch2');
insert into $creator.TWK927A1 values
(2, 'zwei', 'zwei ch2');
insert into $creator.TWK927A1 values
(3, 'drei', 'drei ch2');
insert into $creator.TWK927A1 values
(4, 'vier', 'vier ch2');
commit;
$]
$]
---||| end ddl testcase $mbr env $env phase $phase