zOs/TX/WK997DDL
------------$-{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';
SET CURRENT SCHEMA = $creator;
drop tablespace $db.a997A;
commit;
$@[
if $phase >= 1 then $@=[
CREATE TABLESPACE A997A
IN $db
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
FREEPAGE 10 PCTFREE 10
-- GBPCACHE CHANGED
TRACKMOD YES
$@[
if $phase = 1 then $@=[
segsize 16
$] else if $phase > 1 then $@=[
segsize 16
-- dssize 16 g
$]
$]
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255;
CREATE TABLE $creator.Twk997A1
(Wk997Int int not null
,wk997chb char(10) NOT NULL
)
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE
in $db.A997A
;
commit;
insert into $creator.twk997a1
select row_number() over(), 'a ' || char(row_number() over())
from sysibm.sysTables
fetch first 100 rows only;
commit;
$]
$]