NetCOBOL V11.0 メッセージ集

2.4.575 JMN2958I-S

手続き部始め見出しのWITH指定には，C，PASCAL，またはSTDCALLが指定されなければなりません．WITH指定は無効になります．

例題

[P2958.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.    P2958.
000003 ENVIRONMENT    DIVISION.
000004 DATA           DIVISION.
000005 WORKING-STORAGE SECTION.
000006 01 PNAME1      PIC X(8) VALUE "P2958SUB".
000007 LINKAGE         SECTION.
000008 01 PNAME2      PIC X(8).
000009 PROCEDURE      DIVISION
000010                  WITH COBOL LINKAGE
000011                  USING PNAME2.
000012     DISPLAY PNAME1 " CALLED BY " PNAME2.
000013 END PROGRAM    P2958.

詳細な説明

WITH指定は，呼ばれるプログラムの呼出し規約を指定します．WITH指定を省略指定した場合，COBOLの定めたリンケージの規約を使用します．