我有一些2006年的IBM COBOL。它包含"$CICS ON"one_answers"$CICS OFF"我对IBM COBOL和EXEC基本熟悉。语句和指令,但我从未见过这对。
这些命令做什么,它们的文档在哪里(IBM参考手册名称是理想的答案)?在网上搜索没有明显的结果。
下面的COBOL程序片段:
000750 01 WG-YOB.
000760 05 FILLER PIC X(4).
000770 05 WX-YOB PIC X(2).
000780$CICS ON.
000790$CICS OFF.
000800$COPY CMPLDBF.
000810$COPY CMPLDBH.
000820 LINKAGE SECTION.
000830 01 DFHCOMMAREA.
000840 COPY COMMAREA.
000850 PROCEDURE DIVISION.
编辑:这是一个大约1000个程序的代码库~~ 450K SLOC。我在整个代码库中发现的唯一$命令是:
$CICS ON.
$CICS OFF.
$COPY <filename>.
$BLOCK.
$BlOCKS.
如果有帮助的话,$ copy引用的复制库包含非标准COBOL声明(注意"COMMBLOCK")和";FORM"从第7列开始)
000100COMMBLOCK OF HCPDSDB.
000110 01 HCPDSDB-DB.
000120 05 RECORD-NAME.
000130 05 RETURN-KODE.
000140 05 FREE.
000150 05 LAST-RECORD-FLAG.
000160 05 PASSWD.
000170 05 NO-OF-RECORDS.
...
000380FORM YYMMDD.
000390 05 C4-RED REDEFINES C4.
000400 07 C4-YY PIC 99.
000410 07 C4-MM PIC 99.
000420 07 C4-DD PIC 99.
000430 05 C5 PIC 9(11).
000440 05 C6 PIC 9(6).
将评论转换为OP请求的答案
可能是System 2000引用。20多年前的V1 PDF包括$CICS ON
和$CICS OFF
指令。我找不到任何包含这些指令的V2文档。
从评论中,OP在https://support.sas.com/resources/papers/proceedings/pdfs/s2k/PLEX.pdf找到了一个更有用的手册,其中"似乎包含了提到的所有$xxxx指令"。
我很高兴我至少能指出一个有用的方向。