zOs/TX/PER07DDL
------------$-{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.aper07x$ix;
commit;
$]
if $phase = 1 then
$@do ix=$fx to $tx $@=[
------------------------------------------------------------------------
CREATE TABLESPACE aper07x$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.tper07x$ix
( cur timestamp not null
, ix int not null
)
IN $db.aper07x$ix
AUDIT NONE
DATA CAPTURE NONE
CCSID EBCDIC
NOT VOLATILE
;
CREATE unique INDEX $creator.Iper07x$ix
ON $creator.tper07x$ix
(ix 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.tPer07x$ix values(current timestamp, 0);
commit;
$]
$]
---||| end ddl testcase $mbr env $env phase $phase