NetCOBOL V11.0 メッセージ集

2.6.128 JMN5568I-S

スクリーン機能を使用する@1@文は，プログラム定義だけに使用できます．

埋め込みの説明

@1@ : ACCEPTまたはDISPLAY．

例題

[C5568.cob]
000001 IDENTIFICATION DIVISION.
000002 CLASS-ID.      C5568.
000003 IDENTIFICATION DIVISION.
000004 OBJECT.
000005 PROCEDURE DIVISION.
000006 IDENTIFICATION DIVISION.
000007 METHOD-ID.     M5568.
000008 DATA           DIVISION.
000009 WORKING-STORAGE SECTION.
000010 PROCEDURE      DIVISION.
000011     DISPLAY "SCREEN FUNCTION" UPON CRT.
000012 END METHOD        M5568.
000013 END OBJECT.
000014 END CLASS         C5568.

C5568.cob 11: JMN5568I-S スクリーン機能を使用するDISPLAY文は，プログラム定義だけに使用できます．