zOs/TX/WK961DDL

------------$-{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';
drop tablespace $db.a961A;
drop tablespace $db.a961FAL;
commit;
$=ts=-if($phase>3, A961A, A961FAL)
------------------------------------------------------------------------
CREATE TABLESPACE $ts
    IN $db
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    segsize 64
    BUFFERPOOL $-[if($phase = 1, BP8K0, BP2)$]
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      unicode
    DEFINE YES
    MAXROWS 255
;  ---------------------------------------------------------------------
--- set current isolation level = 'UR';
  CREATE TABLE $creator.tWK961
     (
     d char(10) not null
$@[
if $phase = 4 then $@=[
     , constraint twk961PrimaryKey$phase primary key (d)
$]
$]
     )
    IN $db.$ts
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      unicode
    NOT VOLATILE ;
  CREATE UNIQUE INDEX $creator.IWK961A1
    ON $creator.TWK961
     (d             ASC)
      CLUSTER
      CLOSE YES
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    COPY NO
    DEFER NO
    DEFINE YES;
--
  CREATE TABLE $creator.tWK961BB
     (
     d char(10) not null
$@[
if $phase = 4 then $@=[
     , constraint twk961PrimaryKey$phase primary key (d)
$]
$]
     )
    IN $db.$ts
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      unicode
    NOT VOLATILE ;
  CREATE UNIQUE INDEX $creator.IWK961A1BB
    ON $creator.TWK961BB
     (d             ASC)
      CLUSTER
      CLOSE YES
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    COPY NO
    DEFER NO
    DEFINE YES;
--
  COMMIT;
insert into $creator.tWK961 values ('01.01.1961');
insert into $creator.tWK961 values ('29.02.1961');
insert into $creator.tWK961 values ('01.04.1961');
insert into $creator.tWK961 values ('31.12.1961');
commit;
---||| end   ddl testcase $mbr env $env phase $phase