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

2.5.26 JMN3029I-S

このCALL文では,USING指定に手続き名を記述できません.

例題

[C3029.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. C3029.
000003 ENVIRONMENT DIVISION.
000004 DATA  DIVISION.
000005 WORKING-STORAGE SECTION.
000006 PROCEDURE  DIVISION.
000007 P-START.
000008     CALL "C3029SUB" USING INT-START.
000009 INT-START.
000010     EXIT PROGRAM.
000011 IDENTIFICATION DIVISION.
000012 PROGRAM-ID.  C3029SUB.
000013 ENVIRONMENT  DIVISION.
000014 DATA  DIVISION.
000015 LINKAGE SECTION.
000016 01  RETURN-P     POINTER.
000017 PROCEDURE  DIVISION USING RETURN-P.
000018     DISPLAY "C3029SUB".
000019 END PROGRAM C3029SUB.
000020 END PROGRAM C3029.

C3029.cob 8: JMN3029I-S このCALL文では,USING指定に手続き名を記述できません.