zOs/TX/PER06DDL
------------$-{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
$=fx=5
$=tx=6
SET CURRENT SQLID='S100447';
$@[
if $phase <= 1 then $@do ix=$fx to $tx $@=[
drop tablespace $db.aper06x$ix;
commit;
$]
if $phase = 1 then
$@do ix=$fx to $tx $@=[
------------------------------------------------------------------------
CREATE TABLESPACE aper06x$ix
IN $db
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.tper06x$ix
( cur timestamp not null
$@do tx=$fx to $tx $@=[
, tst$tx timestamp
$]
)
IN $db.aper06x$ix
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE
;
CREATE unique INDEX $creator.Iper06x$ix
ON $creator.tper06x$ix
(cur ASC)
USING STOGROUP GSMS
PRIQTY -1 SECQTY -1
ERASE NO
FREEPAGE 0 PCTFREE 5
GBPCACHE CHANGED
CLUSTER
BUFFERPOOL BP1
CLOSE YES
COPY NO
DEFER NO
DEFINE YES
;
insert into $creator.tPer06x$ix (cur) values(current timestamp);
commit;
$]
$]
---||| end ddl testcase $mbr env $env phase $phase