如何预编译COBOL-DB2程序?
预编译是将COBOL-DB2程序中使用的SQL语句替换为相应的COBOL调用的过程。预编译在实际编译之前是必要的,因为COBOL编译器无法识别DB2 SQL语句,并且会因这些语句而引发错误。
DB2实用程序DSNHPC用于预编译。预编译JCL步骤的输入是用于COBOL-DB2程序中相应表的DCLGEN(在SYSLIB中)和COBOL-DB2源程序(在SYSIN中)。
//STEP010 EXEC PGM=IKJEFT01 //SYSIN DD DSN=DIS.TEST.COBOL(PSNEW2),DISP=SHR //SYSLIB DD DSN=DIS.TEST.DCLGEN(PSDC2), DISP=SHR //DBRMLIB DD DSN=DIS.TEST.DBRMLIB(PSNEW2),DISP=SHR //SYSCIN DD DSN=DIS.TEST.COBL(PSCOB2), DISP=(NEW,CATLG,DEL), SPACE=(20, (90,90)) //SYSOUT DD SYSOUT=*
执行此JCL步骤后,我们将收到以下两个主要元素:
DBRM接收在DBRMLIB中,其中包含程序中存在的所有SQL语句。DBRM在后续的BIND步骤中用于获取PLAN或PACKAGE。
修改后的COBOL源程序接收在SYSCIN中,其中所有SQL语句都被替换为COBOL调用。此修改后的源代码将进一步编译和链接编辑。
广告