//A540769V JOB (CP00,KE50), 00010000
// MSGCLASS=T,TIME=1440,SCHENV=DB2, 00020000
// NOTIFY=A540769 00030000
//*MAIN CLASS=LOG 00040000
//S01 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99 00050000
//SYSTSIN DD * 00060000
DSN SYSTEM(DBOF) 00070000
RUN PROGRAM(DSNTEP2) PARMS('ALIGN(LHS)') PLAN(DSNTEP2) 00080000
//SYSTSPRT DD SYSOUT=* 00090000
//SYSPRINT DD SYSOUT=* 00100000
//SYSUDUMP DD SYSOUT=* 00110000
//SYSTERM DD DUMMY 00120000
//SYSI2 DD * 00130000
SET CURRENT SQLID = 'S100447'; 00140000
00150000
00160000
CREATE INDEX OA1P.IDG932A2 00170000
ON OA1P.TDG932A1 00180000
(DG932007 ASC 00190000
,DG932005 ASC 00200000
) 00210000
PARTITIONED 00220000
DEFINE YES 00230000
COMPRESS NO 00240000
BUFFERPOOL BP1 00250000
CLOSE YES 00260000
DEFER YES 00270000
COPY NO 00280000
USING STOGROUP GSMS 00290000
PRIQTY -1 00300000
SECQTY -1 00310000
; 00320000
COMMIT 00330000