Sample JCL to operate a DB2 table.
//OPERTBL JOB (DSNTEP4),'OPERTBL',REGION=0M,CLASS=2,MSGCLASS=X,
// NOTIFY=&SYSUID
//*============================================================
//STEPINS 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 *
INSERT INTO TESTTAB(
<COLKEY>,
<COLINT>,
<COLCHAR>,
)
VALUES(
1, -- <COLKEY> DECIMAL(6, 0)
11, -- <COLINT> INT
'ABCDEF' -- <COLCHAR> CHAR(6)
);
INSERT INTO TESTTAB(
<COLKEY>,
<COLINT>,
<COLCHAR>,
)
VALUES(
2, -- <COLKEY> DECIMAL(6, 0)
22, -- <COLINT> INT
'abcdef' -- <COLCHAR> CHAR(6)
);
/*

本文提供了一个使用JCL操作DB2表的示例代码,包括插入数据到指定表的具体实现方式。通过此示例,读者可以了解如何利用JCL进行数据库表的数据插入操作。
573

被折叠的 条评论
为什么被折叠?



