zOs/WK/DP083DDL

//A540769E  JOB (CP00,KE50),                                            00010001
//         MSGCLASS=T,TIME=1440,
//         NOTIFY=A540769
//*MAIN CLASS=LOG0 SYSTEM=S12
//S01      EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99                       00020001
//SYSTSIN  DD *
    DSN SYSTEM(DBOF)
   RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2)
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//***PRINT DD DISP=SHR,DSN=A540769.WK.TEXW(PDBGENNJ)
//SYSUDUMP DD SYSOUT=*
//SYSTERM  DD DUMMY
//SYSIN    DD *
 set current sqlid = 'S100447';
--
  drop   TABLESPACE dp08a1p.$083$;
  commit;
  CREATE TABLESPACE $083$
    IN DP08A1P
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 5
    GBPCACHE CHANGED
    TRACKMOD YES
    LOGGED
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE NO
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
  CREATE TABLE $$DELETE.TDP083$$
       like    oa1p.TDP083A1
    IN DP08A1P.$083$
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE
    APPEND NO  ;
--
--
  CREATE INDEX $$delete.IDP083A102$
    ON $$delete.TDP083$$
     (DP083_UUID            ASC,
      DP083_SOUCHE_NO       ASC,
      DP083_POS_ADVTYP      ASC,
      DP083_POS_CS_CURR     ASC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFER NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--
--
  CREATE TABLESPACE $086$
    IN DP08A1P
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 5
    GBPCACHE CHANGED
    TRACKMOD YES
    LOGGED
    SEGSIZE 64
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE NO
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  COMMIT;
--
------------------------------------------------------------------------
--    Table=$$delete.TDP086$$ In DP08A1P.$086$
------------------------------------------------------------------------
--
  CREATE TABLE $$delete.TDP086$$
     (DP086_UUID           CHAR(20) FOR SBCS DATA NOT NULL,
      DP086_IS_CREDIT      CHAR(1) FOR SBCS DATA NOT NULL,
      DP086_TRN_VAL        DECIMAL(31, 8) NOT NULL,
      DP086_TRN_CS_CURR    CHAR(4) FOR SBCS DATA NOT NULL,
      DP086_TRN_ISO_CUR    CHAR(3) FOR SBCS DATA NOT NULL,
      DP086_SET_VAL        DECIMAL(31, 8) NOT NULL,
      DP086_SET_CS_CURR    CHAR(4) FOR SBCS DATA NOT NULL,
      DP086_SET_ISO_CUR    CHAR(3) FOR SBCS DATA NOT NULL,
      DP086_BOOK_VAL       DECIMAL(31, 8) NOT NULL,
      DP086_BOOK_CS_CURR   CHAR(4) FOR SBCS DATA NOT NULL,
      DP086_BOOK_ISO_CUR   CHAR(3) FOR SBCS DATA NOT NULL,
      DP086_DEB_VAL        DECIMAL(31, 8) NOT NULL,
      DP086_DEB_CS_CURR    CHAR(4) FOR SBCS DATA NOT NULL,
      DP086_DEB_ISO_CUR    CHAR(3) FOR SBCS DATA NOT NULL,
      DP086_CRD_VAL        DECIMAL(31, 8) NOT NULL,
      DP086_CRD_CS_CURR    CHAR(4) FOR SBCS DATA NOT NULL,
      DP086_CRD_ISO_CUR    CHAR(3) FOR SBCS DATA NOT NULL,
      DP086_UUID_CHR       CHAR(44) FOR SBCS DATA NOT NULL
        WITH DEFAULT ' ',
      DP086_SORT_CRIT      INTEGER NOT NULL WITH DEFAULT 0)
    IN DP08A1P.$086$
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE
    APPEND NO  ;
--
--
  CREATE INDEX $$delete.IDP086$$
    ON $$delete.TDP086$$
     (DP086_UUID            ASC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
    NOT CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFER NO
    DEFINE YES
    PIECESIZE 2 G;
--
  COMMIT;
--