GB/T 4092.13-1992 程序设计语言COBOL 通信模块 GB/T4092.13-1992 标准下载解压密码：www.bzxz.net

1.1 功能
中华人民共和国国家标准
程序设计语言COBOL
通信模块
Programming language COBOL
Communlcation module
GB/T 4092. 13—92
代替 GB 4092. 13-- 83
通信模块提供存取，处理和建立消息或部分消息的功能。它提供用通信投备的消息控制系统(MCS)进行通信的能力。
1.2级别特征
1级通信对通信描述款提供局部功能。在过程部中，1级通信对RECEIVE和SEND语创提供局部功能而对ACCEPTMESSAGECOUNT语句提供完整功能。2级通信对通信插述款提供完整功能。在过程部中，2级通信为ACCEPTMESSAGECOUNT、DISABLE ENABLE,PURGE、RECEIVE和 SEND语句提供完整功能。2通信模块的数据部
2.1通信节
通信节位于源程序的数据部。通信节描述源程序中作为消息控制系统（MCS）和程序之间接口的数据项。这个MCS接口区由通信描述款定义。通信描述款后跟以零个、一个或多个记录描述款。下面给出通信节的般格式：
COMMUNICATION SECTION
[通信描述款
［记录描述款}}
2.1.1通信描述款
在COBOL程序中，通信描述款（CD款）代表通信节中最高一级的组织。通信节首后跟以通信描述款，该描述款是由层指示符(CD）、cd名以及一串独立子句组成。描述款本身是由号终止的。对输人通信描述款，这些子句指明输入的队列、子队列、消息日期和时间、符号源、正文长度、状态和末端键以及消息计数。对输出通信描述款、这些子句指明口的地计数、正文长度、状态键、错误键和符号日的地。对输入输出通信捕述款，这些子句指明消息日期和时间、符号终端，正文长度、状态和末端键。2.1.2记录描述结构
与通信描述款相关联的记录威可以隐含地通过用户指定紧龈在通信描述款之后书写的各种记录描述款来重定义。
记录描述款由组描述特定记录之特性的数据描述款组成。每个数据描述款由层号后随数据名或FILLER子句（若指明），当需要时跟以一串独立子句组成。记录描述可以有层次结构，因此使用某款的了句可以颇为不同，这依赖于其后是否跟以从属款。记录描述结构和记录描述款中允许的元素的结构固家技术监督局1992-08-04批准1993-05-01实施
GB/T 4092- 13—92
在层的概念和数据描述款中解释。数据描述款中特定子句的可用性依赖于实现支撑的核心模块的级。2.2通信描述款
2.2.1功能
通信描述款指明消息控制系统(MCS)和COBOL程序阴的接口区。2.2.2一般格式
格式1：
CDed名！
[[[SYMBOLICQUEUEIS数据名1]
[SYMBOLIC SUB-QUEUE-1 IS 数据名 2][SYMBOLICSUB-QUEUE-2IS数据名3][SYMBOLIC SUL-QUEUE-3 IS数据名4［MESSAGEDATEIS数据名5]
[MESSAGETIMEIS数据名6]
FOREINITIALINPUT
格式2：
[SYMBOLICSOURCEIS数据名7]
[TEXTLENGTHIS数据名8]
[END.KEY IS数据名 9]
[STATUSKEYIS数据名1D]
LMESSAGECOUNTIS数据名11J
［数据名1.数据名2，数据名3，数据名4，数据名5，数据名6，数据名7，数据名8，数据名9，数据名10，数据名11
cd 名 1 FOR OUTPUT
[DESTINATIONCOUNTIS数据名1]
[TEXT L.ENGTH IS 数据名 2]
[STATUSKEYIS数据名3]
『DESTINATIONTABLEOCCURS整数1TIMES[INDEXEDBY(位标名1}.
[ERRORKEYIS数据名4]
[SYMBOLICDESTINATIONIS数据名5]格式3：
CD cd 名1
T[MESSAGEDATEIS数据名1]
[MESSAGETIMEIS数据名2]
[SYMBOLICTERMINALIS数据名3］FOR INITIALJI-0
[TEXT LENGTH IS 数据名 4]
［ENDKFYIS数据名S]
[STATUSKEYJS.数据名6]
[数据名1,数据名2,数据名3，
数据名4，数据名5，数据名6]
2.2.3·语法规则
所有格式！
GB/T 4092. 13--92
(1）CD款必须而且仅能在通信节中出现。格式1和3：
（2）在单个程序中，INIT1AL子句仅能在一个CD描述款中指明。INITIAI.子句不能用于过程部首有 USING短语的程序中。
（3）除INITIAL子句外这些任选子句可以按任意次序书写。（4）若在指定的接口区中无任选了句，那么01层数据描述款必须跟着该CD描述款。任何一个任选可以龈着U1层数据描述款。
格式1：
（5）跟着输入CD描述款的记录描述款隐含地重定义由输入CD描述款建立的记录区，而且必须描述为确是87个标准数据格式字符的记求。这个记录允许多次重定义但只有第一次重定义可以包含VALUE了句。然而，MCS总是根据一般规则2中定义的数据描述来引用这个记录的（见GB/T4092.2中 5. 15 VALUE 了句)。
（6）数据名1、数据名2、，数据名11在CD描述款中必须唯一在这个序列中，任一数据名可以用保留字FIL.LER来替换。
格式2：
（7）任选了句的书写顺序是无关紧要的。(8）若CD描述数中没有指明任选子句，层号为01的数据描述款必须跟着CD描述款。（9）从属于输出CD描述款的记录描述款，隐含地重新定义了出输出CD描述款建立的记录区。这个记录的多次重定义是允许的，但仅第一次重定义可以包含VALUE子句。然而MCS总是按在一般规则16中定义的数据描述米引用这个记录的（见核心模块5.15VALUE子司）。（10）数据名1、数据名2、、数据名5在CD描述款中必须是唯--的。（11）诺若未指明DESTINATIONTABLE(OCCCRS子句，将假定有一个错误键和符号日的地域。此种情况，当引旧这些数据项时，带下标是不允许的。（12）若指明有DESTINATIOVTABLEOCCURS子句)，数据名4稚数据名5仅可以带下标来引用。
（13）在1级巾，由数据名1引用的数据项的值必须是1。在2级中·数据名1引用的数据项的值没有限制。格式3：
（14）限着输入输出CD描述款的记录描述款隐含地重定义了由输入输山CD款建立的记录区，而且必须描述为确是33个标准数据格式字符的记录。这个记录允许多次重定义：但只有第一次重定义可以包含VALUE子句。MCS总是按-般规则24中定义的数据描述来引用这个记录（见GB/T4092.2中 5. 15 VALUE 子句)。
(15）数据名1、数据名2、*、数据名6在CD款中必须是唯一的。这个序列中，任一数据名可以用保留字FILLER来替换。
2.2.4一般规则
格式1：
(1）输入CD描述款的信息构成消息控制系统(MCS)和消息处理程序之间的通信，这个信息不可以从终端作为消息的一部分来到的(2）对于每个输入CI)描述款，分配一个有87个相邻的字符位置的记录域。这个记录域对-MCS定义如下：
GB/T 4092. 13--92
SYMBOLICQUFUE子句定义数据名1为占有该记录中的第1-12位的12个字符的字符型初等数据项，
bSYMBOL.ICSUB-QUEUE-1子句定义数据名2为占有该记录中的第13-24的12个宇符的字符型初等数据项。
心。SYMBOLISSUB-QUEUE-2了句定义数据名3为占有该记录中的第25-36位的12个字符的字符型初等数据项。
d、SYMBOLICSUB-QUEUE-3子句定义数据名4为占有该记录中的第37-48位的12个字符的字符型初等数据项，
MESSAGEDATE子句定义数据名5为个数据项的名：它隐含的描述为占据该记录的第e
49-54字符位的无正负号的6位数字的整数。f．MESSAGETIMF子句定义数据名6为一个数据项的名，它隐含的描述为占据该记录的第55-62字符位的无正负号的8位数字的整数。g-SYMBOLIC SOURCE子句定义数据名7为占据该记录的第 63-74 位的 12个学符的字符型初等数据项的名。
h。TEXTLENGTH子句定义数据名8为一个初等数据项的名，隐含的描述为包括该记录中第75-78位的无正负号的4位数字的整数。i.ENDKEY子句定义数据名9为占据该记录中的第79位的一个字符的符型初等数据项的名。
小STATUSKEY子句定义数据名10为占据该记录中的第80.81位的两个字符的字符型初等数据项的名。
i、MESSAGECOUNT子句定义数据名1I为初等数据项的名，它隐含地描述为占据该记录的第82-87字符位的无正负号的6位数字的整数。第二个任选可以用一串数据名依次替换相应的由这些子句定义的数据名任何任选产生一个记录，它的隐含摘述等价于：隐含描述
数据名0.
数据名1
数据名2
数据名3
数据名4
数据名5
数据名6
数据名7
数据名8
数据名9
数据名10
PICTUREX(12).
PICTURE
PICTURE
PICTURE
PICTURE
PICTURE 9( 8)bzxz.net
PICTURE X(12).
PICTURE 9( 4).
PICTURE X.
PICTURE XX.
符号队列
符号子队列1
符号子队列2
符号了队列3
消息日期
消息时间
符号源
正文长度
末端键
状态键
数据名11
CB/T 4092-13—92
PTCTURE9(6).
注意在“注解”下的信息只是为了阐明而不是数据描述的部分。消息计数
（3）由数据名2.数据名3和数据名4引用的数据项的内容不使用时必须包含空格。（4）出数据名1、数据名2、数据名3和数据名4引用的数据项分别包含从列子队列，……等符号名。所有符号名必须遵守系统名的形成规则，并且必须预先对MCS定义。（5）RECEIVE语句导致从CD中的描述款所指定的队列中串行回送\下个\消息或部分消息在RECEIVE语句的执行期间，输入CD必须包含，在数据名1的内容中,符号队列的名。数据名2、数据名3和数据名4规定的数据项的内容可以包含符号子队列名或空格当指明队列结构的给定层时，那么也必须指明所有队列结构的较高层。若有小于所有队列层次的层号时，那么由MCS在输入CD指定的队列和/或子队列中决定存取下一个消息或者部分消息。RECEIVE语执行以后，由数据名1到数据名4引用的数据项的内容将包含队列结构的所有层的符号名。
（6）每当MCS调度一个程序处理消息时，那个程序建立一个运行单位并且具有这种动作性的队列结构的符号名作为可应用的放进与INITIAL子句相关的CD描述款的数据名1到数据名4所引用的数据项中。在所有其它情况中,与 INITIAL 了-句相关联的 CD 描述款的数据名 1到数据名 4引用的数据项的内，初始化为空格，
符号名插入或初始化成空格是在过程部第个语何执行之前完成的。执行指明的数据名1到数据名 4所引用的数据项的同一内容的下一个RECEIVE语句回送使程序进行调度的实在消息，仅在此时修改CD描述款的其余部分。（7）若MCS提示调度·个缺少INITIAI.了句的程序，其结果将是无定义的（8）RECEIVE语句执行期间，在数据名5引用的数据顶中，MCS提供它认为该消息完成时的日期,格式为“YYMMDD’（年、H、日）。由数据5引用的数据翊内容仅能由MCS作为RECEIVE语句的执行部分来修改。
（9）RECEIVE语句执行期间。在数据名6引用的数据项中，MCS提供它认为消息完成时的时间，格式为‘HHMMSSTT（小时、分、秒、百分之：-秒）。由数据名6引用的数据项内容仅能由MCS作为RECEIVE语句的执行部分来修改。(10）在RECEIRVE语何的执行期间。由数据名7引用的数据项内,MCS提供传输消息源通信终端的符号名。这个符号名必须遵循系统名的形成划则。然而,君MCS不知道通信终端的符号名：那么由数据7引用的数据项内穿将包含空格，(11)MSC借助于数据名8引用的数据项内容求指出执行REEIVE语句得到的填满的字符位置数。
（12）由数据名9引用的数据项内容仅能出MCS作为执行RECEIVE语句的部分结果来置值，置值根据下列规则进行：
a。当指明RFCEIVEMESSAGE短语时.那么：1）若检测到消息组术端，那么由数据名9引用的数据项的内容置为3。2）若检测到消息末端，那么出数据名9引用的数据项的内容置为2。3)若不足个消息被传输，那么由数据名9引用的数据项的内容置为0。b.当指明RECEIVESEGMEVT短语时那么：1）若检测到消息纽末端,那么由数据名9引用的数据项的内容置为3。2）若检测到消息来端，那么由数据名9引用的数据项的内容置为2.3）若检测到消息段末端,那么由数据名9引用的数据项的内容置为1。4）若不足一个消息段被传输，那么由数据名9引用的数据项的内容胃为0。GE/F4092.13—92
：当「述条件同附满足一个以上，则以列表次序中首先满足的规划来决定数据名9引用的数据项的内穿。
（I3）出数据名TO引用的数据项内容指出先前执行过的RECEIVE、ACCEPTMEESAGECOUNT，ENARI.FINPUT或DISABLBINPUT语句的状态条件。由数据名10引用的数据项内餐和状态条件本身的实际联系在下面的图1（通信状态键条件）中定义。
（14）数据名11引用的数据项的内容指出消息的数日，这些消息存在十队列，了队列1…中。MCS把数据名11引的数据项的内容只能作为ACCEPTMESSAGE（OUNT语执行的部分进行修改。
格式2：
（15）输出CI)捕述款信息的实质是不发送到终端，们它构成有关消息处理的程序和MCS之间的通讯。
（16）在1级中，对每个输出（D分配23个相邻字符位置的记录域。在2级1，对于每个输出（D描述款，根据下列公式：（10+13＊整数1)分配兵有相邻字符位置的记录域。
这个记录域的隐含捕述是：
FESTINATIONCOUNT子句定义数据名1为--个数据项的名，它隐含描述为占据记录中第1-1字符位的无正负号的整数。
b.TEXTI.FN(HH了句定义数据名2为初等数据项的名.它隐含捕述为证录中占据第5-8字符位的无正负号的4位数字的整数。项。
C。STATLISKEY子句定义数据名3是个占据记录的第9-10位的2个字符的宁符型初等数据d：第11到23位的字符位置及其以后的每组13个字符形成如下描述的表项：1）ERRORKEY了-尚定义数据名4为1个字符的字符型初等数据项名。2）SYMHOI.ICSTINATION子句定义数据名5为12个字符的字符型切等数据顶名：使用上面子句产生一个记录，它的隐含描述等价丁：隐含描述
数据名0.
数据名1
数据名2
数据名3
数据名
数据名4
数销名5
PICTURE
PICTURE
PICTURE
整数1TIMES
FICTURE
PICTURE
H的地计数
正文长度
状态键
目的地表
错误键
符号目的地
汁意：布“注解”下的信息是为了阐明而不是数据摘述的部分。（17）SENDPURGE.ENARLEQUTPUT或DISABLEOUTPUT语句的执行期间山数据名1引用的数据项的内容对MCS.指出符号日的地数·这些符号目的地使用数据名5引用的区域。MCS找到由数据名5引用的区域的第·次出现的第一个符号目的地名，由数据名5引用的区域的第二次出现中的第二个符号目的地名，，直到包含出现出数据名1的内容指出的由数据名5引用的区域为止。在执行SENIDILRGE、ENABIEOUTPUT或DISABLEOUTPUT语创期H，若出数据名1引用的数据项的值在1倒整数1之外，那么产生·个错误条件，对任何目的地不采取动作，且终止执行GB/T 4092.13—92
SEND、PURGE、ENABLEOUTPUT或DISABLEOUTPUT语句。（18）用广的责任是保证数据名1引用的数据项的值在执行SFNDPURGE、ENABLEOUTPUT或DISABL.FUTIUT语句时是含法的。（19）作为SEND语句执行的一部分，MCS把数据名2弓用的数据项内容解释为瓜户对数据项的最左字符位置个数的指示，该数据项是由传送该数据的相应的SENT)语句中的标识符所引用的见3.6SEND语句)。
（20）由数据名5引用的数据项的每一次出现包含先前MCS已知的符凸目的地名。这紫符号日的地名必须服从系统名的形成规则。（21）由数据名3引用的数据项的内穿指出先前执行的SENDPURGE、ENABLEOUTPUIT或DISAHLEOUTPUT语句的状念条件。由数据名3引用的数据项的内容和状态条件本身之间的实际联系丁下面的表1（通信状态键条件）中定义。
（22）在SEND、PURGE，ENABLEOUTPUT或DISABLEOCTPUT语句的执行期间，若MCS判定有一错误，则数据名3引用的数据项的内容及数据名4的每次出现的内容，直到包括数据名1内容指明的出现均被修改。
由数据名4引用的数据项的内容和错误条件本身之问的实际联系十下面的表2错误键值）中定义。
格式3：
（23）输入输山CD描述款信息构成有关消息处理的MCS和程序之间的通信。这个信息不可从终端作为消息的一部分来到的。
(24）对于每个输入输出CD描述款，分配个有33个相邻字符位置的记录域。这个记录域对MCS定义如下：
a， MESSAGE DATE子句定义数据名 1为一个数据项的名。它隐含的描述为据该记录的第1～6字符位置的无正负号且为6位数字的整数。b.MESSAGETIME子句定义数据名2为一个数据项的名。它隐含的描述为占据该记录的第7～14字衍位置的尤正负号H为8位数字的整数。SYMBOLICTERMINAL子句定义数据名3为占据该记录第15-26位的12个字符位置的了符型初等数据项的名，
d．TEXT LENCTH子句定义数据名4为一个初等数据项的名。它险含的描述为占该记录的第27-30字符位置的无正负号的4位数字的整数。．ENDKEY子句定义数据名5为占据该记录的第31位的一个字符的字符型初等数据项的名。f.STATUSKEY子勿定义数据名6为占据该记录的第32和33位的两个字符的字符型初等数据项的名。
第个任选可以用一申数据名依饮替换对应的由这些子句定义的数据名。托何任选产生…个记录，它的隐舍描述等价于，隐含描述
01数据名.
02数据名1
PICTURE9(6).
消息口期
02数据名2
02数据名3
02数据名4
02数据名5
02数据名6
PICTURE9(8).
GB/T 4092.13—92
PICTUREX(12)
PICTURE 9(4).
PICTURE X.
PICTURE XX.
消息时间
符号终端
正文长度
末瓣键
状态键
注意，在“注解”下的信息是为了阐明而不是数据描述的部分。：（25）当 MCS调度一个程序处理消息时,引用具有 INITAL 子句的输人输出 CD 的第一个 RE-CEIVE语句回送使程序进行调度的实际消息。(26）数据名1具有格式“YYMMDD（年、月、日）。它的内容表示MCS认为该消息完成时的日期。数据名1引用的数据项的内容仅由MCS作为RECEIVE语句的执行部分来修改。(27）数据名2有格式“HHMMSSTT’（时、分,秒,百分之一秒）。它的内容表示MCS认为该消息完成时的时间。
数据名2引用的数据项的内容仪由MCS作为RECEIVE语句的执行部分来修改。(28）每当MCS调度一个程序处理消息时，那个程序建立一个运行单位并且这程序调用的消息源的通信终端的符号名作为可应用的放进与INITIAL子句相关的输入输出CD描述款的数据名3引用的数据项中。这个符号名必须遵循系统名的形成规则。在所有其它情况，与IVITIAL子句相关的输入输出CD描述款的数据名3引用的数据项的内容初始化为牵格。
符号名插入或初始化为空格是在过程部第一个语句执行之前完成的。(29）若MCS提示调度一个缺少INITIAL子句的程序.其结果将是无定义的。（30）当对输人输出CD指定了INITIAL子句而且MCS调度该程序时，数据名3引用的数据项的内容不能被程序改变。若内容被改变了，则执行任何引用cd名1的语句是不成功的，而且当应用时。数据名6引用的数据项被指示成不认识的源或目的地（见表1通信状态键条件）。（31）对不带INITIAI.子句的输入-输出CD，或对县有INITLAL子句的输入输出CD，当程序未被MCS调度到时，程序必须在第一个引用cd名1的语句执行之前在数据名3里规定源或目的地的符号名。
在第一个引用ed名1的语句执行以后，数据名3引用的数据项的内容不可被程序改变。若该内容被改变了，则执行任何引旧cd名1的语句是不成功的，而且当应用时，数据名6引用的数据项被标记为不认识的源或目的地（见表1通信状态键条件）。（32）MCS借助于数据名4引用的数据项内容来指出执行RECEIVE语句得到的填满的字符位置数（见3.5RECEIVE语句）
作为SENI)语句执行的一部分，MCS把数据名4引用的数据项的内容解释为用户对数据项的最左字符位置数的指示，该数据项是由传送该数据的相应的SEND标识符所引用的（见3.6SEND语）。（33）数据名5引用的数据项内容仅能出MCS作为执行RECEIVE语句的部分结果来置值，按下列规则置值：
、当有 RECEIVE MESSAGE短语时：1）若检测到消息组端，那么由数据名5引用的数据项的内容置为3。2）若检测到消息端，那么由数据名5引用的数据项的内容置为2。3）若不是一个消息被传送时，那么由数据名5用的数据项的内容置为0。容
GB/T 4Q92- 13—92
当指明RECEIVESEGMANT短语时：h.
1）若检测到消息组末端,数据名5引用的数据项的内容置为3。2)若检测到消息末端，那么由数据名5引用的数据项的内容置为2。3）若检测到消息段未端，那么由数据名5引用的数据项的内穿置为1。4）若不足一个消息段被传输，那么由数据名5引用的数据项内容置为0。当儿个条件同时满足时，则以列表饮序中首先满足的规则来决定数据名5引用的数据项的内（34）由数据名6引用的数据项内容指出先前执行过的DISABLEENABLE、PURGE、RECEIVE或SEND语句的状态条件。
由数据名6引旧的数据项内容和状态条件本身之间的实际联系在下面的表1《通信状态键条件）巾定义。
2.2.5通信状态键条件
在所示的各语句完成时，下面的图指出格式1中数据名10、格式2中数据名3和格式3中数据名6引用的数据项的可能的内容。在语句列的行上的“×”指明该行所表明的状态键码对该语句是可能的符号2指出在1级巾不可用的2级元款表1
通信状态键茶件
RECEIVE
SEND input-output-ud
Doutput-ed
AOCEPT MESSAGE COUNT
ENAHI.E INPUT
ENABLE INPL:T---O TERMINAL
ENABLE OLTPUT
DISABI.F INPUT
DISABLE INPUT-I-O TERMINAL.
DISABLE
OLTPUT
状态健催
未发现蜡误，动作完成
断开一个或多个日的地，动作完成（见错误键码）断开日的地，不做动作
符号源，或一个或多个队列或日的地已经断开/接通（见错误键码）
个或多个目的地未知，对已知的目的地动作完成（见错误健键码）
一个或多个队列或子队列未知，不做动作符号源未知，不做动作
目的地计数非法，不做动作
口令非法，不发生接通/断开动作正文长度超过标识符1的长度
请求发送的部分消息其正文长度为零或缺了标识符1，不做动作
超过输出队列的容基(见错误键码）HECEIVE
SEND input-ouput-ud
SENDurpud
ACCEPT MESSAGE COUNT
2.2.6错误键值
ENABLE INPUT
ENABILE INFUT>I-O TERMINAT.
DISAHI.E INPUTIUTERMINAL
ENABLF OUTPUT
DISABLE INPI:T
GB/T 4092. 13- --92
续表1
DISABLE OUTPUT
状慈健值
一个或多个目的地没有与其相关联的部分消息，对其它目的地动作完戒
出现了至少两个状态键条件10，15和20的联合，（见错误键码）
实现者定义的状态
在所示的各语句完成时，下面的表2指出格式2中数据名4引用的数据项的可能的内容。在语句列的行上的×，指明该行所表明的有关错误键值对该语句是可能的。符号2指示在1级中不可用的2级完素
表2错误键值
PCREG3
ENABLE
OUTPUT
3通信模块的过程部
DISARLE OUTPLT:
错误键值
无错误
符号目的地未知
3.1ACCEPTMESSAGE COUNT语句
3.1.1 功能
符号目的地断开
无与引用的符号目的地有关的郝分消息”符号目的地已经接/断开
超出输出队列容量
为进一步使用面保留
实现者定义的条件
ACCEITMESSAGECOLNT语句使得队列中的完整消息的个数是可用的。3. 1. 2
·般格式
GB/T4092.13—92
ACCEPTcd名1MESSAGECOUNT
3.1.3语法规则
（1）cd名1必须引用个输入CD描述款。3.1.4般规则
（1）ACCEPTMESSAGECOUNT语句cd名1指明的消息计数数据项被修改，以指出在队列结构中存在的完整消息的个数，该队列结构由cd名1引用域的数据名1（SYMBOLICQUEUE）到数据名4（SYMHOLICSUB-QUEUE3>规定的数据项的内察来指定。（2）当ACCFI\IMESSAGECOUNT语句执行时，由通信描述款指明的域的内容必须至少包含费测试的符队列名。测试该件导致数据项名10(STATUSKEY)引用的数据项的内容和与通信描述款有关的域中的数据名11(MESSAGECOUNT)内容作相应地修改（见2.2通信描述款）。3.2DISABLE语句
3.2.1功能
DISABIF语句通知MCS对下输出禁止指定的输出队列和目地之间进行数据传输，或对于输入禁止指定的源和输入队列之间进行数据传送，或对于输入输出禁止程序和指定的一个源或目的地之间进行数据传输。在标准COBOL的这一版本中视WITIIKEY短语是一个过时成分因为在标准COBOL的以后的修改版中把它删掉。3.2.2一般格式
DISABLE I-0
TERMINAL
TERMINAL
lOUTPUT
3.2.3语法规则
ITHKEY
标识符1
字值1
(1）当有INPUT翘语时，cd名1必颈引用·个输入CD描述款。（2）当有I-0TERMINAL短语时，cd名1必须引用一个输入输出CD描述款，(3）当有OUTPUT短语时，cd名1必须引用一个输出CD描述款。(4)由标识符1引用的数据项的内容或字值1必须定义为字符型3.2.4般规则
（1）DISABLE语句使得MCS和指定的源或月的地之问实现遥辑断川。当这种逆辑断开已经存在，或若已由这个程序之外的某些其他手段处理，那么征这个程序巾IDISABLE语句是不需要。当指定已经断开的源或月的地的IISABLE语句被执行时，除了状态键数据项中的值指示这个条件外，不做其它工作。TISABLE语句不影响COBOL程序利MCS之间的数据传输的逻辑路径。（2）MCS保证执行DISABLE语句导致在源或目的地在刚开始不活动时的逻辑断开。执行DISABLE语句使得在传进或传山终端期问永不会停止传输该消息的余下部分。（3）当指明不带任选宁TERMINAI.的INPUT短语，那么cd名1引用域的数据名1（SYMBOL红CQUEUE)到数据名4(SYMBOLICSUBQ)FUF-3)的内容所指明的有关队列和子队列和所有可能相联的源之间的逻辑路径为不活动的。（4）当指明带有任选字TERMINAL的INIUT短语时，源和所有有关的队列和子队列之间的遇辑路径为不活动的，这个源由数据名7(SYMBULICSOURCE)所引用的数据项的内容定义。（5）当指明I-0TERMINAL短语时，源和程序间的逻辑路径为不活动的：这个源由数据名3（SYMBC>LTCTERMINAL)所[用的数据项的内容定义。（6）当指明OUTPUT短语时.由数据名5每次出现的内容规定的全部国的地和直到包含由cd名1引用域的数据名1的内容所规定的出现之间的逻辑路径都是不活动的。（7）字值1或由标识符1引用的数据项内容需和建进系统的几令相匹配。仅当字值1或标识符1GB/T 4092.13-92
引用的数据项内容和系统口令相匹配时，DISABI.E谱句才有效若字佰1或标识符1引用的数据项内容和系统口令不匹配,那么名1引用域内的 STATUS KEY项的值要修改，MCS 必须处理包含从 1 个字符到 10 字符的口令。3.3ENABIE语句
3.3.1功能
ENABI.E语句通知MCS允许输出时在指定的输出队列和且的地之间或者输入时在指定的源和输入队列之间进行数据传输，或者在输入输出时在程序和指定的一个源或口的地之间进行数据传输。在标准COBOL的这一版本中视WITHKEY短语是一个过时成分，因为在标准COBOL的以后的修改版中要把它删掉。
3.3.2—般格式
ENABLEI-O
lOUTPUT
3.3.3语法规则
TERMINALI
TERMINAL
[WITHKEY|标识符]
字值-
（1）当指明IVPUT短语时，c名1必须引用一个输人CD描述款。（2）当指明I-0TERMINAL短语时，cd名1必须引用一个输入-输出CD捕述款。(3）当指明（JUITPUT短语时,cd名1必须引用个输出 CD描述款，(4)字值 1或者由标识符 1 引用的数据项内容必须定义成字符型的。3.3.4一般规则
（1）ENABLE语创在所指定的源或日的地和MCS之间建立逻辑联系。当这种逻辑联系已经存在，或者已由该程序以外的某些其他-于段处理，那么在该程序中的ENABLE语勿是不需要的。当指定已经联系的源或目的地的FNABLE语句被执行时，除了状态键数据项中的值指示这个条件外，不做其它T作。COBOL程序和MCS之间数据传输的逻辑路径不受EVABLE语句影响。（2）当指明不带任选TERMINAL的INFUT短诉时，那么cd名1引用域内的数据名1（SYMBOLICQUEUE）到数据名4(SYM13OI.ICSUB-QI:EUE-3)的内容指明有关队列和子队列和所右有关的源之间的逻辑路径是活动的。（3）当指明带有任选字TERM1NAI.的INPUT短语时.源和所有有关的队列和子队列之间的逻辑路径是活动的。这个源由数据名7(SYMB)LICS(URCE)所引用的数据项的内容定义。（4）当指明I-OTERMINAL短讲时，源和程序间的设辑路径是活动的。这个源由数据名3(SYM-ROLIC TERMINAI)所引用的数据项的内容定义。(5）当指明(OUTPUT短语时，对丁由数据名 5 每次出现内容所规定的全部月的地直至并包括由cd名1引用域的数据名1所规定的出现之问的逻辑路径都是活动的。（6）字值1或标识符1引用的数据项的内容需和建进系统的口令相匹配。仅当字值1或标识符1引用的数据项的内容和系统口令相匹配时，EVABLE语句才有效。若字值1或标识符1引用的数据项的内容和系统口令不匹配.那么修改出cd名1引用的域内的STATUSKEY项的值。MCS必须能处理从1个字符到10个字符的口令。
小提示：此标准内容仅展示完整标准里的部分截取内容，若需要完整标准请到上方自行免费下载完整标准文档。