示例:C 程序调用 COBOL 程序
下面的示例展示了如何编写由 C 程序调用的 COBOL 程序。
COBOL 程序 tprog1 由程序 MyFun 中的 C 函数 MyFunD 调用 (参见示例:被 COBOL 调用和调用 COBOL C 程序 )。 被调用的 COBOL 程序包含以下源代码:
*
IDENTIFICATION DIVISION.
PROGRAM-ID. TPROG1.
*
DATA DIVISION.
LINKAGE SECTION.
*
01 X USAGE COMP-2.
*
PROCEDURE DIVISION USING X.
DISPLAY "TPROG1 got x= " X
GOBACK.