zOs/TX/WK955DDL

--
  SET CURRENT SQLID='S100447';
--
$@[ if $phase = 1 then $@=[
  drop tablespace  $db.a955a;
  commit;
  CREATE TABLESPACE a955a
    IN $db
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    FREEPAGE 10 PCTFREE 12
    GBPCACHE CHANGED
    TRACKMOD YES
    segsize 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=$creator.TWK955A1 In $db.a955a
------------------------------------------------------------------------
--
  CREATE TABLE $creator.TWK955A1
     (key1                 INT NOT NULL,
      key2                 INT NOT NULL
     )
    IN $db.a955a
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE;
--
  CREATE INDEX $creator.IWK955A1
    ON $creator.TWK955A1
     (KEY1                  ASC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE NO
    COPY NO
    DEFER NO
    DEFINE YES;
  CREATE INDEX $creator.IWK955A2
    ON $creator.TWK955A1
     (KEY2                  ASC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    FREEPAGE 10 PCTFREE 10
    GBPCACHE CHANGED
    BUFFERPOOL BP1
    CLOSE NO
    COPY NO
    DEFER NO
    DEFINE YES;
  COMMIT;
$] else if $phase = 2 then $@=[
$@do i=1 to 100 $@=[
insert into $creator.tWk955a1
with i (i, j) as
( select coalesce(max(key1), 0)+ 1, 1 from $creator.TWK955A1
  union all select i+1, j+1 from i where j < 100000
)
select i, i from i
;
commit
;
$]
$] else if $phase = 3 then $@=[
update $creator.tWk955a1
    set key1 = - key1, key2 = key2 * 1 + 0
;
commit
;
$] else if $phase = 4 then $@=[
update $creator.tWk955a1
    set key1 = - key1 + 2 * key1, key2 = - key2
;
commit
;
$]
$]