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

2.5.42 JMN3054I-S

ACCEPT文のFROM指定に,DATE,DAY,DAY-OF-WEEKまたはTIMEが指定された場合,@1@は,固定長集団項目,英数字,英数字編集,数字編集,外部10進または2進項目でなければなりません.

埋め込みの説明

@1@ : 一意名

例題

[C3054.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.  C3054.
000003 ENVIRONMENT  DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006     SELECT IN-FILE ASSIGN TO DA-S-SYS006.
000007 DATA  DIVISION.
000008 FILE SECTION.
000009 FD   IN-FILE LABEL RECORD STANDARD.
000010 01  REC.
000011     02 REC-NO    PIC 9(4).
000012     02 REC-DATA  PIC X(8).
000013     02 FILLER    PIC X(68).
000014 WORKING-STORAGE  SECTION.
000015 77  AA           PIC 1(8).
000016 PROCEDURE  DIVISION.
000017 P-START.
000018     ACCEPT AA FROM DATE.
000019     STOP RUN.

C3054.cob 18: JMN3054I-S ACCEPT文のFROM指定に,DATE,DAY,DAY-OF-WEEKまたはTIMEが指定された場合,'AA'は,固定長集団項目,英数字,英数字編集,数字編集,外部10進または2進項目でなければなりません.