zOs/TX/WK937DDL

------------$-{right(userid() sysvar(sysnode) date(s) time(), 60, '-')}
-- testCase $dsn
-- env      $env      phase $phase
-- subsys   $subsys     db $db       creator $creator
------------------------------------------------------------------------
---||| begin ddl testcase $mbr env $env phase $phase
SET CURRENT SQLID='S100447';
drop tablespace $db.A937A;
commit;
$@[
if $phase > 0 then $@=[
  CREATE TABLESPACE A937A
    IN $db
    USING STOGROUP GSMS
    PRIQTY 12 SECQTY 7200
    FREEPAGE 0 PCTFREE 0
    GBPCACHE CHANGED
    TRACKMOD YES
$@[
if $phase <= 1 then $@=[
    segsize 64
$] else $@=[
    NUMPARTS $phase
$]
$]
    BUFFERPOOL BP2
    LOCKSIZE ANY
    LOCKMAX SYSTEM
    CLOSE YES
    COMPRESS YES
    CCSID      EBCDIC
    DEFINE YES
    MAXROWS 255;
CREATE TABLE $creator.twk937A1
   (part                 int NOT NULL,
    f1                   char(5) NOT NULL,
    f2                   INTEGER NOT NULL,
    f3                   INTEGER NOT NULL
   )
  IN $db.A937A
$@[
if $phase > 1 then $@=[
  PARTITION BY (part  ASC)
   (
     PART 1 VALUES(10)
  $@do px=2 to $phase $@=[
   , PART $px VALUES(${px}0)
   $]
   )
$]
$]
;
insert into $creator.twk937A1 values(-5, 'negat', -5, -5) ;
insert into $creator.twk937A1 values( 5, 'null ',  5,  5) ;
insert into $creator.twk937A1 values( 5, 'fuenf',  5,  5) ;
insert into $creator.twk937A1 values(15, 'zehn ', 15, 15) ;
insert into $creator.twk937A1 values(25, 'zwanz', 25, 25) ;
$@[
if $phase = 1 then $@=[
insert into $creator.twk937A1 values(35, 'dreis', 35, 35) ;
insert into $creator.twk937A1 values(45, 'vierz', 45, 45) ;
$]
$]
commit;
$]
$]