1 CALL 2 ID-1 2 リテラル-1 2 プロシージャー・ポインター-1 2 関数ポインター-1 3? USING 3.1+ 3.1.0.0? BY 3.1.0.0.1 REFERENCE 3.1.0.1+ 3.1.0.1.0? ADDRESS OF 3.1.0.1.0.1 ID-2 3.1.0.1.0 OMITTED 3.1.0? BY 3.1.0.1 CONTENT 3.1.0.2+ 3.1.0.2.0.0? 3.1.0.2.0.0 ADDRESS OF 3.1.0.2.0.0 LENGTH OF 3.1.0.2.0.1 ID-3 3.1.0.2.0 リテラル-2 3.1.0.2.0 OMITTED 3.1.0? BY 3.1.0.1 VALUE 3.1.0.2+ 3.1.0.2.0.0? 3.1.0.2.0.0 ADDRESS OF 3.1.0.2.0.0 LENGTH OF 3.1.0.2.0.1 ID-4 3.1.0.2.0 リテラル-3 4? 4 RETURNING ID-5 5? %例外句 6? END-CALL 例外句: 1? 1.0? ON 1.0.1 EXCEPTION 命令ステートメント-1 1.1? %非例外句 1? ON 1.1 OVERFLOW 命令ステートメント-3 非例外句: 1? NOT 1.1? ON 1.2 EXCEPTION 命令ステートメント-2