ページの先頭行へ戻る
NetCOBOL V11.0 メッセージ集
FUJITSU Software

2.8.51 JMN9133I-W

(@1@)ACCEPT文中の@2@は共通範囲外です. 処理を続行します.

埋め込みの説明

@1@ : STD
@2@ : DATE,DAY,DAY-OF-WEEK

例題

[C9133.cob]
000001 @OPTIONS FLAGSW(STDM)
000002 IDENTIFICATION  DIVISION.
000003 PROGRAM-ID.     C9133.
000004 ENVIRONMENT     DIVISION.
000005 DATA            DIVISION.
000006 WORKING-STORAGE SECTION.
000007   01  REC01      PIC 9(5).
000008 PROCEDURE       DIVISION.
000009 P-START.
000010     ACCEPT REC01 FROM DAY-OF-WEEK.
000011     STOP RUN.

C9133.cob 10: JMN9133I-W (STD)ACCEPT文中のDAY-OF-WEEKは共通範囲外です.処理を続行します.