zOs/TX/WK949DDL
------------$-{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';
$@do i=1 to 3 $@do t=1 to 3 $@=[
drop tablespace $db$i.a949T$t;
commit;
$@[ if $phase > 0 then $@=[
------------------------------------------------------------------------
CREATE TABLESPACE A949T$t
IN $db$i
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 10
GBPCACHE CHANGED
TRACKMOD YES
SEGSIZE 64
BUFFERPOOL BP2
LOCKSIZE ANY
LOCKMAX SYSTEM
CLOSE YES
COMPRESS YES
CCSID EBCDIC
DEFINE YES
MAXROWS 255
; ---------------------------------------------------------------------
CREATE TABLE $creator$i.TWK949A$t
(WK949CH20 CHAR(20) FOR SBCS DATA not null with default
$@[
if $phase < 2 then $@=[
,WK949CH5 CHAR(4) FOR SBCS DATA not null with default
$]
$]
)
IN $db$i.A949T$t
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE
;
commit ;
$]
$]
$]
---||| end ddl testcase $mbr env $env phase $phase