プロトタイプは DCL-PR ステートメントで始まります。
DCL-PR ステートメントの後には、ゼロ個またはそれ以上のパラメーター が続き、その後に END-PR ステートメントが続きます。
最初のステートメントは DCL-PR で始まり、 その後にプロトタイプの名前が続き、 さらにその後にキーワードが続き、最後はセミコロンで終わります。
自由形式のパラメーター定義を参照してください。
DCL-PR myPgm EXTPGM; 1
name CHAR(10) CONST;
END-PR;
DCL-PR addNewOrder;
id INT(10) CONST;
quantity INT(10) CONST;
price PACKED(7 : 2) CONST;
END-PR; 2
DCL-PR addNewOrder;
id INT(10) CONST;
quantity INT(10) CONST;
price PACKED(7 : 2) CONST;
END-PR addNewOrder; 3
DCL-PR getCurrentUser CHAR(10) END-PR; 4
DCL-PR myProc;
DCL-PARM select CHAR(10); 5a
name CHAR(10); 5b
DCL-PARM address CHAR(25); 5c
END-PR;
