埋め込みの説明
@1@ : CHARACTER TYPEまたはPRINTING POSITION
例題
[C5126.cob] 000001 IDENTIFICATION DIVISION. 000002 CLASS-ID. C5126. 000003 ENVIRONMENT DIVISION. 000004 CONFIGURATION SECTION. 000005 SPECIAL-NAMES. 000006 YA IS CT1. 000007 FACTORY. 000008 PROCEDURE DIVISION. 000009 METHOD-ID. FMT1. 000010 DATA DIVISION. 000011 LINKAGE SECTION. 000012 01 PRM1 PIC N(10) CHARACTER TYPE IS CT1. *> NO ERROR 000013 PROCEDURE DIVISION USING PRM1. 000014 END METHOD FMT1. 000015 END FACTORY. 000016 OBJECT. 000017 PROCEDURE DIVISION. 000018 METHOD-ID. IMT1 PROTOTYPE. 000019 DATA DIVISION. 000020 LINKAGE SECTION. 000021 01 PRM2 PIC N(10) CHARACTER TYPE MODE-1 *> ERROR 000022 PRINTING POSITION IS 8. *> ERROR 000023 PROCEDURE DIVISION RETURNING PRM2. 000024 END METHOD IMT1. 000025 END OBJECT. 000026 END CLASS C5126.
C5126.cob 21: JMN5126I-S CHARACTER TYPE句はメソッド原型定義または分離されたメソッド定義の連絡節には記述できません．CHARACTER TYPE句は無効になります．
C5126.cob 22: JMN5126I-S PRINTING POSITION句はメソッド原型定義または分離されたメソッド定義の連絡節には記述できません．PRINTING POSITION句は無効になります．
詳細な説明
メソッド原型定義では，メソッド原型を定義します．メソッド原型とは，メソッド名およびメソッドのパラメタの型および復帰項目(あれば)です．メソッド原型には，CHARACTER TYPE句あるいはPRINTING POSITION句による印字情報は含まれません．
