zOs/TX/VV71DDL

set current sqlid = 's100447';
drop   TABLESPACE $db.aVV71A;
commit;
CREATE TABLESPACE aVV71A
  IN $db
  USING STOGROUP GSMS
  PRIQTY -1 SECQTY -1
  FREEPAGE 5 PCTFREE 10
  GBPCACHE CHANGED
  TRACKMOD YES
  BUFFERPOOL BP2
  LOCKSIZE ANY
  LOCKMAX SYSTEM
  CLOSE YES
  COMPRESS YES
  CCSID      EBCDIC
  DEFINE YES
  MAXROWS 255 SEGSIZE 64;
CREATE TABLE $creator.TVV719Limits
   (part                 integer NOT NULL,
    VV719002von          CHAR(59) NOT NULL,
    VV719002bis          CHAR(59) NOT NULL
   )
   in $db.aVV71A
   DATA CAPTURE NONE
   CCSID      EBCDIC
   NOT VOLATILE;
   CREATE unique INDEX $creator.IVV71I1
   ON $creator.TVV719Limits
    (part                  ASC,
     VV719002von           ASC,
     VV719002bis           ASC)
   USING STOGROUP GSMS
   PRIQTY -1 SECQTY -1
   ERASE  NO
   FREEPAGE 10 PCTFREE 10
   GBPCACHE CHANGED
   NOT CLUSTER
   BUFFERPOOL BP1
   CLOSE YES
   COPY NO
   DEFINE YES
   PIECESIZE 2 G
;
$*(
insert into $creator.TVV719Limits
    select partition, '?', limitKey_internal
        from sysibm.systablepart  p
        where dbName = 'DGDB0376'
            and tsName = 'A719A'
;
update $creator.TVV719Limits u set VV719002von =
         case when u.part = 1 then repeat(x'00', 59)
              else (select VV719002bis
                       from $creator.TVV719Limits r
                       where u.part-1 = r.part )
         end
;
$*)
commit;