下面是一个从 COBOL97 应用程序中启动 EXE 的示例程序。
查看http://www.netcobol.com/support/code-samples/中的CallEXE演示
当谈到微焦...
不能从 Micro Focus INT 或 GNT 调用 EXE,但您可以调用非大型机程序(MFE 中的 Micro Focus 方言)并向 DOS 发出 shell,然后从那里执行执行 EXE 的命令行或执行直接在 Micro Focus CALL 上传递的 EXE 文件(x'91' 功能代码 =35)。
此外,您将不会取回任何传递的参数,因为一旦 DOS shell 关闭,就无法返回任何参数。因此,获取参数的最佳方法是将它们写入文件。
我包含了一个示例程序,它显示了这个 x'91' FC=35 调用。如您所见,您可以直接执行批处理文件或命令或 EXE。
Working-Storage Section.
1 Cmd-Line-Str.
2 Pic X(45)
* value 'RUN $IMSDIR\PCIMS RUNIMS BMP,DBUTIL,DEMO001T'.
* value 'run lorince'.
value 'dir c:\ /o > d.d'.
2 N-1 Pic X Value Low-Value.
1 Call-Func Pic X Comp-X Value 35.
1 Result Pic X Comp-X.
1 Cmd-Line-Len Pic X Comp-X Value 0.
Procedure Division.
P1.
Display Cmd-Line-Str upon Command-Line
Call x'91' using Result, Call-Func, Cmd-Line-Len
If Result = Zeroes
Display 'Call worked'
End-If
Goback.
我希望这篇文章能给你更多的信息,我只有大型机知识,还没有尝试过上面的任何一个。