例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2958.
000003 ENVIRONMENT DIVISION.
000004 DATA DIVISION.
000005 WORKING-STORAGE SECTION.
000006 LINKAGE SECTION.
000007 01 PARAM1 PIC X(8).
000008 PROCEDURE DIVISION
000009 WITH COBOL LINKAGE
000010 USING PNAME2.
000011 END PROGRAM P2958.
P2958.cob (9) : JMN2958I-S 手続き部始め見出しのWITH指定には，C，PASCAL，またはSTDCALLが指定されなければなりません．WITH指定は無効になります．
詳細な説明
WITH指定は，呼ばれるプログラムの呼出し規約を指定します．WITH指定を省略指定した場合，COBOLの定めたリンケージの規約を使用します．