zOs/TX/WK930DDL

-----------$-{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.A930A;
  commit;
$@[
  if $phase > 0 then $@=[
  CREATE TABLESPACE A930A
    IN $db
    USING STOGROUP GSMS
    PRIQTY 128 SECQTY 7200
    FREEPAGE 0 PCTFREE 0
    GBPCACHE CHANGED
    TRACKMOD YES
    BUFFERPOOL BP32K
    SEGSIZE 64
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 1;
  COMMIT;
  CREATE TABLE $creator.twk930A1
     (KEY                  CHAR(5) FOR SBCS DATA NOT NULL
$@[
if $phase <= 1 then $@=[
     ,F1                   CHAR(5) FOR SBCS DATA NOT NULL
$] else $@=[
     ,F1                   CHAR(12) FOR SBCS DATA NOT NULL
$]
if $phase <= 2 then $@=[
     ,F2                   CHAR( 5 ) FOR SBCS DATA NOT NULL
$] else $@=[
     ,F2                   CHAR(13) FOR SBCS DATA NOT NULL
$]
$]
     ,F3                   CHAR(5) FOR SBCS DATA NOT NULL
     )
    IN $db.A930A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE;
  CREATE TABLE $creator.twk930A2
     (KEY                  CHAR(5) FOR SBCS DATA NOT NULL
$@[
if $phase <= 1 then $@=[
     ,F1                   CHAR(5) FOR SBCS DATA NOT NULL
$] else $@=[
     ,F1                   CHAR(12) FOR SBCS DATA NOT NULL
$]
if $phase <= 2 then $@=[
     ,F2                   CHAR( 5 ) FOR SBCS DATA NOT NULL
$] else $@=[
     ,F2                   CHAR(13) FOR SBCS DATA NOT NULL
$]
$]
     ,F3                   CHAR(5) FOR SBCS DATA NOT NULL
     )
    IN $db.A930A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE;
  CREATE View  $creator.vWk930A1 as
      select
$@[
if $phase  >= 2 then $@=[
          '23' phase,
$]
$]
          key, f1, f2, f3 from $creator.tWk930a1;
  CREATE View  $creator.vWk930A2 as
      select
$@[
if $phase >=  3 then $@=[
          '3'    phase,
$]
$]
          key, f1, f2, f3 from $creator.tWk930a2;
  COMMIT;
$]
$]
---||| end   ddl testcase $mbr env $env phase $phase