zOs/TX/WK939DDL

------------$-{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.a939a;
commit;
 $@[
 if $phase >= 1 then $@=[
------------------------------------------------------------------------
CREATE TABLESPACE A939A
    IN $db
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE  $-[if($phase=1, 64, 4)$]
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255
;  ---------------------------------------------------------------------
  CREATE TABLE $creator.TWK939A1
     (WK939CH20            CHAR(20) FOR SBCS DATA not null with default
     ,WK939CH5             CHAR(4) FOR SBCS DATA not null with default
     )
    IN $db.A939A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE
;  ---------------------------------------------------------------------
  COMMIT;
 $]
 $]
---||| end   ddl testcase $mbr env $env phase $phase