例題
[P2934.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2934. 000003 ENVIRONMENT DIVISION. 000004 CONFIGURATION SECTION. 000005 SPECIAL-NAMES. 000006 CRT STATUS IS CRTST1. 000007 DATA DIVISION. 000008 WORKING-STORAGE SECTION. 000009 01 CRTST1 PIC X(8). 000010 PROCEDURE DIVISION. 000011 END PROGRAM P2934.
P2934.cob 6: JMN2934I-S CRT STATUS句のデータ名は作業場所節に定義された長さ3の項目でなければなりません．
詳細な説明
CRT STATUS句は，スクリーン操作機能のACCEPT文で画面入力状態(ACCEPT文の実行結果を示す3文字の概念上の領域)を受け取るためのデータ項目を指定します．
