zOs/REXX/MARECDDL
-- marec copy table
SET CURRENT SQLID='S100447';
-- drop tablespace $MAREC.$MAREC;
commit;
-- CREATE DATABASE $MAREC
-- BUFFERPOOL BP2
-- INDEXBP BP1
-- CCSID EBCDIC
-- STOGROUP GSMS;
-- commit;
------------------------------------------------------------------------
CREATE TABLESPACE $COPY
IN $MAREC
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 EBCDIC
DEFINE YES
MAXROWS 255
; ---------------------------------------------------------------------
CREATE TABLE $MAREC.$COPY
( db char(8) not null
, ts char(8) not null
, pa integer not null
, tst timestamp not null
, typ char(1) not null
, dsN char(44) not null
)
in $MAREC.$COPY
;
create index $MAREC.$ICOPY on $MAREC.$COPY
(db, ts, pa, tst, typ, dsn)
;
commit
;