格式 4

此格式描述布尔数据。 布尔数据项是限制为值 1 或 0 的项。
注意: 在 COBOL 程序中使用指示符时,必须使用布尔数据的数据描述条目将其描述为布尔数据项。

格式 4: 布尔数据

读取语法图跳过可视语法图层号data-name-1FILLER1REDEFINESdata-name-2LIKEdata-name-3ISTYPEDEFISEXTERNALISGLOBAL2JUSTJUSTIFIEDRIGHTOCCURS 子句-格式 1OCCURS 子句-格式 2INDICATORINDICATORSINDICinteger-3PICTUREPICIS1VALUEIS布尔文字3SYNCHRONIZEDSYNCLEFTRIGHTTYPEtype-name-1USAGEISDISPLAY.
OCCURS 子句-格式 1
读取语法图跳过可视语法图OCCURSinteger-2TIMES INDEXEDBYindex-name-1
OCCURS 子句-格式 2
读取语法图跳过可视语法图OCCURSinteger-1TOinteger-2 TIMESDEPENDINGONdata-name-4 INDEXEDBYindex-name-1
注:
  • 1 不能与 TYPEDEF 子句一起使用
  • 2 语法-仅选中
  • 3 语法-仅选中

下面是与布尔数据一起使用的子句的特殊注意事项。 条款的所有其他规则都与其他数据的规则相同。