zOs/TX/PER20DDL

--
  SET CURRENT SQLID='S100447';
--
drop tablespace $db.aPER20;
commit;
$@[
if $phase >= 1 then $@=[
  CREATE TABLESPACE aPer20
    IN $db
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 5
    GBPCACHE CHANGED
    TRACKMOD YES
    LOGGED
$@[
if $phase = 1 then $@=[
    SEGSIZE 64
$] else if $phase = 2 then $@=[
    NUMPARTS 32
    SEGSIZE 0
    DSSIZE 16 G --- ????????
$]
$]
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
--
  CREATE TABLE $creator.tper20
     (HB510001             CHAR(24) FOR SBCS DATA NOT NULL,
      HB510174             DATE NOT NULL,
      HB510200             DATE NOT NULL,
      HB510391             CHAR(2) FOR SBCS DATA NOT NULL,
      HB510027             DECIMAL(31, 8) WITH DEFAULT NULL,
      HB510139             CHAR(1) FOR SBCS DATA WITH DEFAULT NULL,
      HB510028             DECIMAL(31, 8) WITH DEFAULT NULL,
      HB510138             CHAR(1) FOR SBCS DATA WITH DEFAULT NULL,
      HB510039             DECIMAL(31, 8) WITH DEFAULT NULL,
      HB510040             DATE WITH DEFAULT NULL,
      HB510368             DATE WITH DEFAULT NULL,
      CONSTRAINT HB510001
      PRIMARY KEY (HB510001,
                   HB510174,
                   HB510391))
    IN $db.aPer20
$@[
if $phase = 2 then $@=[
      PARTITION BY (HB510001 ASC)
       (PARTITION 1 ENDING AT ('006008'),
        PARTITION 2 ENDING AT ('006515'),
        PARTITION 3 ENDING AT ('009408'),
        PARTITION 4 ENDING AT ('016002'),
        PARTITION 5 ENDING AT ('019301'),
        PARTITION 6 ENDING AT ('023006'),
        PARTITION 7 ENDING AT ('025106'),
        PARTITION 8 ENDING AT ('025801'),
        PARTITION 9 ENDING AT ('028806'),
        PARTITION 10 ENDING AT ('035200'),
        PARTITION 11 ENDING AT ('040501'),
        PARTITION 12 ENDING AT ('045602'),
        PARTITION 13 ENDING AT ('048604'),
        PARTITION 14 ENDING AT ('051511'),
        PARTITION 15 ENDING AT ('053108'),
        PARTITION 16 ENDING AT ('054418'),
        PARTITION 17 ENDING AT ('055409'),
        PARTITION 18 ENDING AT ('057500'),
        PARTITION 19 ENDING AT ('062501'),
        PARTITION 20 ENDING AT ('067809'),
        PARTITION 21 ENDING AT ('076507'),
        PARTITION 22 ENDING AT ('082304'),
        PARTITION 23 ENDING AT ('083503'),
        PARTITION 24 ENDING AT ('083508'),
        PARTITION 25 ENDING AT ('083514'),
        PARTITION 26 ENDING AT ('083908'),
        PARTITION 27 ENDING AT ('086211'),
        PARTITION 28 ENDING AT ('087909'),
        PARTITION 29 ENDING AT ('088211'),
        PARTITION 30 ENDING AT ('088499'),
        PARTITION 31 ENDING AT ('088609'),
        PARTITION 32 ENDING AT ('999999'))
$]
$]
    AUDIT NONE
    DATA CAPTURE NONE
    CCSID      EBCDIC
    NOT VOLATILE
    APPEND NO  ;
--
  LABEL ON TABLE $creator.tper20 IS 'SALDODATEN BX';
--
  LABEL ON $creator.tper20
   (HB510368 IS 'SALDOPERIODE',
    HB510040 IS 'BUCHUNGSDATUM',
    HB510039 IS 'UMRECHNUNGSFAKTOR',
    HB510138 IS 'VORZEICHEN FELD 28',
    HB510028 IS 'SALDO BUCHWHRG',
    HB510139 IS 'VORZEICHEN FELD 27',
    HB510027 IS 'SALDO BESTANDESWHRG',
    HB510391 IS 'SALDOART',
    HB510200 IS 'GÜLTIG BIS',
    HB510174 IS 'GÜLTIG AB',
    HB510001 IS 'BESTANDESKEY');
--
  COMMIT;
--
  CREATE UNIQUE INDEX $creator.iPer20I0
    ON $creator.tper20
     (HB510001              ASC,
      HB510174              ASC,
      HB510391              ASC)
    USING STOGROUP GSMS
    PRIQTY -1 SECQTY -1
    ERASE  NO
    FREEPAGE 0 PCTFREE 10
    GBPCACHE CHANGED
$@[
if $phase = 1 then $@=[
    PIECESIZE 2 G
$] else if $phase = 2 then $@=[
    partitioned    --????????????
$]
$]
    CLUSTER
    COMPRESS NO
    BUFFERPOOL BP1
    CLOSE YES
    COPY NO
    DEFER NO
    DEFINE YES ;
--
  COMMIT;
$]
$]