Cobol 理解呼叫x“;91“;

Cobol 理解呼叫x“;91“;,cobol,Cobol,有人能用简单的例子帮助我理解调用x“91”函数11和函数12吗。我试着去搜索,但无法理解。现在我正在UNIX环境下的COBOL中使用这段代码,这个调用在windows环境中也能工作吗? 呼叫的X“F4”、X“F5”、X“91”来自MF。 您可以在下面的联机MF文档中找到它们 库例程 F4/F5用于从/到字节打包/解包位。 91是一个多用途电话。实现了这些子功能 获取/设置cobol开关(11、12)和获取调用参数数(16) 使用 将8字节数组-VAR中每个字节的最后一位打包为1字节字节-VAR的

有人能用简单的例子帮助我理解调用x“91”函数11和函数12吗。我试着去搜索,但无法理解。现在我正在UNIX环境下的COBOL中使用这段代码,这个调用在windows环境中也能工作吗?

呼叫的X“F4”、X“F5”、X“91”来自MF。 您可以在下面的联机MF文档中找到它们 库例程

F4/F5用于从/到字节打包/解包位。 91是一个多用途电话。实现了这些子功能 获取/设置cobol开关(11、12)和获取调用参数数(16)

使用

将8字节数组-VAR中每个字节的最后一位打包为1字节字节-VAR的相应位

X“F5”例程获取字节的八位,并将它们移动到数组中相应的引用处

X“91”是一个多功能例程

CALL X"91" USING
           RESULT-VAR
           FUNCTION-NUM
           PARAMETER-VAR
       RETURNING STATUS-VAR
正如Roger所提到的,OpenCOBOL支持11、12和16的FUNCTION-NUM


11和12获取并设置特殊名称段落中定义的8(八)个运行时OpenCOBOL开关的开-关状态。16返回给定给当前模块的调用参数数。

x'91'
是一个常规库例程,有关这些参数的完整列表,请参阅。
本文档还指定了其和的作用:它们设置/读取和内部调试模式开关


除了这些库例程之外,您还可以从COBOL中通过。

Googled
“COBOL”“x91”“function 11”
。。。天哪!谈论缺乏搜索结果。似乎
x91
函数只是供应商放置其杂项“外部系统”例程的地方。编写一些我们可以看的代码?这里的文档是唯一明显提到的。但这完全没有帮助:-/啊哈!最好逃走!谷歌搜索“cobol”“x\'91\'函数11”给出<代码>功能11设置可编程COBOL开关,并将其读回。是在MS DOS fwiw中调用
函数35
的一个示例(这应该表明它将在windows上工作)。对于11和12,它们可能是指传递给cobol可执行文件的命令行参数?为什么你想知道它是否能在Windows下工作?
CALL X"91" USING
           RESULT-VAR
           FUNCTION-NUM
           PARAMETER-VAR
       RETURNING STATUS-VAR