呼び出し側プログラムに情報を戻すには、プログラムの PROCEDURE DIVISION ヘッダーで RETURNING 句を使用してください。
PROCEDURE DIVISION RETURNING dataname2
上の例で、呼び出し先プログラムが正常にその呼び出し側に戻ると、dataname2 の値が、CALL ステートメントの RETURNING 句で指定された ID に保管されます。
CALL . . . RETURNING dataname2