PL/SQLで変数へ値の代入

質問

PROCEDURE TEST(PI_ABC IN A_TABLE.A_CODE%TYPE)
IS
CURSOR CUR IS
SELECT A_CODE
FROM A_TABLE;
BEGIN
--抽出したデータを代入
FOR REC_CUR IN CUR LOOP
PI_ABC := REC_CUR.A_CODE;
END LOOP;

上記のコードを実行すると
ORA-06502:数値または値のエラー
PL/SQL: 文字列バッファが小さすぎます。
とエラーが出ます。
このプロシージャを呼び出す時にも同じテーブル同じ項目を渡しています。
同パッケージ内で同じ事をやっているのに特定のプロシージャだけ
上記のエラーが出てしまいます。

環境：Windows2003Server　oracle9i

回答No.1

k_o_r_o_c_h_a_n

PROCEDURE TEST(PI_ABC IN A_TABLE.A_CODE%TYPE)
は
PROCEDURE TEST(PI_ABC out A_TABLE.A_CODE%TYPE)
の間違いではないですか？