zOs/TX/PER02DDL

------------$-{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
$=tb=TWK934A1
SET CURRENT SQLID='S100447';
drop tablespace $db.aPer02;
commit;

------------------------------------------------------------------------
CREATE TABLESPACE aPer02
    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      unicode
    DEFINE YES
    MAXROWS 255
;  ---------------------------------------------------------------------
--- set current isolation level = 'UR';
  CREATE TABLE $creator.tper02
     ( c) as
     (select substr(strip(left(l.name, 10))
                 || strip(left(r.name, 10)), 1, 20)
          from sysibm.sysColumns l, sysibm.sysColumns r
     ) data initially deferred refresh deferred
    maintained by user enable query optimization
    IN $db.aPer02
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      unicode
    NOT VOLATILE ;
CREATE INDEX $creator.IPer02
  ON $creator.tper02
   (c             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 ;
commit;
------------------------------------------------------------------------
refresh table $creator.tper02;
commit;
---||| end   ddl testcase $mbr env $env phase $phase