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

2.6.119 JMN5559I-S

ENTRY文を含むプログラム定義の手続き部見出しには,RETURNING指定は記述できません. RETURNING指定は無効になります.

例題

[P5559.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.    P5559.
000003 ENVIRONMENT    DIVISION.
000004 DATA           DIVISION.
000005 LINKAGE        SECTION.
000006 01 LK1         PIC X(8).
000007 01 LK2         PIC S9(8) BINARY.
000008 PROCEDURE      DIVISION
000009                RETURNING LK1.
000010     DISPLAY "MAIN ENTRY"
000011     EXIT PROGRAM.
000012     ENTRY "P5559SUB".
000013     DISPLAY "SECONDARY ENTRY".
000014     EXIT PROGRAM.
000015 END PROGRAM    P5559.

P5559.cob 8: JMN5559I-S ENTRY文を含むプログラム定義の手続き部見出しには,RETURNING指定は記述できません.RETURNING指定は無効になります.