zOs/REXX/ELARDRDD

$#@
call sqlConnect DVBP
$;
$** $>.fEdit() $@/ddl/
  call sqlStmts , , 'sql72'  $<=/ddl/
  SET CURRENT SQLID='S100447';
$*(
  alter TABLE s100447.tElarDrop
      alter info set data type varchar(1000);
  commit;
$*)
  xrop tablespace db2admin.elarDrop;
  commit;
  CREATE TABLESPACE ElarDrop
    IN Db2Admin
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    TRACKMOD YES
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      UNICODE
    DEFINE YES
    MAXROWS 255
  ;
  CREATE TABLE s100447.tElarDrop
  (   tst        timestamp not null
  ,   db         char(8) not null
  ,   kind       char(8) not null
  ,   nm         char(20) not null with default
  ,   sta        char(2) not null with default
  ,   info       varchar(1000) not null with default
  ,   primary key (db, kind, nm, tst)
  )
  in db2admin.elarDrop
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      UNICODE
    NOT VOLATILE
  ;
  CREATE UNIQUE INDEX s100447.IElarDrop0
    ON s100447.tElarDrop
     (db                ASC,
      kind              ASC,
      nm                ASC,
      tst               ASC
     )
     include(sta)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 5
    GBPCACHE CHANGED
    CLUSTER
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G
  ;
  CREATE UNIQUE INDEX s100447.IElarDrop1
    ON s100447.tElarDrop
     (tst               desc,
      db                ASC,
      nm                ASC,
      kind              ASC
     )
     include(sta)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 5
    GBPCACHE CHANGED
    not CLUSTER
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G
  ;
  CREATE UNIQUE INDEX s100447.IElarDrop2
    ON s100447.tElarDrop
     (kind              asc,
      nm                ASC,
      db                ASC,
      tst               ASC
     )
     include(sta)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 5
    GBPCACHE CHANGED
    not CLUSTER
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFINE YES
    PIECESIZE 2 G
  ;
  commit;
$/ddl/