Sample JCL to create DB2 table on mainframe
//CREATBL JOB (DSNTEP4),'CREATBL',REGION=0M,CLASS=2,MSGCLASS=X,
// NOTIFY=&SYSUID
//*============================================================
//STEPDEF EXEC PGM=IKJEFT01,DYNAMNBR=20
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD *
DSN SYSTEM(<DSN>)
RUN PROGRAM(DSNTEP4) PARMS('ALIGN(LHS)') -
LIB('DSN910.RUNLIB.LOAD')
//STEPLIB DD DSN=DSN910.SDSNLOAD,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
DROP TABLE TESTTAB;
CREATE TABLE TESTTAB
(<COLKEY> DECIMAL(6, 0) NOT NULL,
<COLINT> INT,
<COLCHAR> CHAR(6),
PRIMARY KEY(<COLKEY>)
);
/*