zOs/TX/WK402DDL

  SET CURRENT SQLID='S100447';
  SET CURRENT SCHEMA='$creator';
  drop tablespace $db.A402A;
  commit;
$@[
if $phase > 0 then $@=[
  CREATE TABLESPACE  A402A
    IN $db
    USING STOGROUP GSMS
$@[
if $env = 'src' then $@=[
    PRIQTY 48 SECQTY 100
    ERASE  NO
    SEGSIZE 8
    COMPRESS NO
    BUFFERPOOL BP0
$] else $@=[
    PRIQTY -1 SECQTY -1
    ERASE  NO
    SEGSIZE 64
    COMPRESS YES
    BUFFERPOOL BP2
$]
$]
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  CREATE TABLE $creator.Twk402A
     (
    $@[
        if $phase = 1 then $@=[
      wk402CH20            CHAR(20) FOR SBCS DATA not null with default,
        $] else if $phase = 2 then $@=[
      wk402CH20            CHAR(12) FOR SBCS DATA not null with default,
        $] else if $phase = 3 then $@=[
      wk402CH20            CHAR(22) FOR SBCS DATA not null with default,
        $]
    $]
      wk402CH5             CHAR(5) FOR SBCS DATA not null with default,
      wk402CH2             CHAR(2) FOR SBCS DATA not null with default,
      wk402TST             TIMESTAMP not null with default            )
    IN $db.A402A
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE;
--
    $@[
        if $phase > 0 then $@=[
  CREATE INDEX $creator.Iwk402A0
        $] else $@=[
  CREATE INDEX $creator.Iwk402A1
        $]
    $]
    ON $creator.Twk402A
     (wk402CH20             ASC)
    USING STOGROUP GSMS
$@[
if $env = 'src' then $@=[
    PRIQTY 12 SECQTY 12
    ERASE  NO
    BUFFERPOOL BP2
$] else $@=[
    PRIQTY -1 SECQTY -1
    ERASE  NO
    BUFFERPOOL BP1
$]
$]
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
--
$@[ if $phase >= 3 then $@=[
  CREATE INDEX $creator.Iwk402A3
    ON $creator.Twk402A
     (wk402CH5 asc, wk402tst desC)
    USING STOGROUP GSMS
$@[
if $env = 'src' then $@=[
    PRIQTY 12 SECQTY 12
    ERASE  NO
    BUFFERPOOL BP2
$] else $@=[
    PRIQTY -1 SECQTY -1
    ERASE  NO
    BUFFERPOOL BP1
$]
$]
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G;
$]
$]
    $@[
        if $phase  > 0 then $@=[
insert into $creator.Twk402A values
('erstens',  'e',  '1', current timestamp );
insert into $creator.Twk402A values
('zweitens', 'zw',  '2', current timestamp );
insert into $creator.Twk402A values
('drittens', 'dre',  '3', current timestamp );
insert into $creator.Twk402A values
('viertens', 'vier',  '4', current timestamp );
insert into $creator.Twk402A values
('fuenftens', 'fuenf', '5', current timestamp );
        $]
    $]
    $@[
        if $phase >= 2 then $@=[
  CREATE view  $creator.vwk402ATwo as
      select * from  $creator.twk402A ;
        $]
        if $phase >= 3 then $@=[
  CREATE view  $creator.vwk402AThree as
      select * from  $creator.vwk402ATwo ;
        $]
    $]
  COMMIT;
--
    $]
$]