例題
[C3390.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3390. 000003 DATA DIVISION. 000004 WORKING-STORAGE SECTION. 000005 01 A PIC S9(8) BINARY. 000006 01 B PIC S9(4) BINARY. 000007 01 C PIC X(1). 000008 PROCEDURE DIVISION. 000009 CALL "SUBPROG" WITH PASCAL LINKAGE USING A B C. 000010 END PROGRAM C3390.
C3390.cob 9: JMN3390I-W このシステムではPASCAL呼出し規約を使用できません．STDCALL呼出し規約とみなします．
