PL/SQL パッケージでのプロンプト使用
こんにちは。
独学でPL/SQLを学んでいるのですが、パッケージの使用でうまく処理が走らないので、
アドバイスを頂けたらと思い書き込みさせて頂くことにしました。
パッケージtestは、オーバーロードプロシージャSHOW_BIZDAYS(日付, 数値)とSHOW_BIZDAYS(日付)を含んでいます。パッケージコードは質問の下に書いております。
■質問1
オーバーロードプロシージャSHOW_BIZDAYSの日付のみパラメータとする2つ目のプロシージャを
EXECUTE test.SHOW_BIZDAYS('20-NOV-13')
コマンドで実行したところ、『PLS-00307: このコールに一致する'string'が複数宣言されています。』というエラーが表示されてしまいます。
2つのオーバーロードプロシージャのパラメータ数が異なるよう指定しているので、このエラーに関する原因を見つけれておりません。
■質問2:
SHOW_BIZDAYS(日付)において、ユーザーに数値を入力するようプロンプトをしたいのですが、
PROCEDURE SHOW_BIZDAYS(
v_start_date IN DATE := sysdate) IS
ACCEPT tdays PROMPT 'Enter how many days are needed: '
v_bus_days NUMBER := &tdays;
と記載するとACCEPT文が無効とのエラーが検出されます。パッケージ内ではACCEPTが使用できないということでしょうか。
■パッケージ
create or replace
PACKAGE test IS
PROCEDURE SHOW_BIZDAYS(
v_start_date IN DATE := sysdate,
v_bus_days IN NUMBER := 30);
PROCEDURE SHOW_BIZDAYS(
v_start_date IN DATE := sysdate);
END test;
■パッケージ本体
create or replace
PACKAGE BODY test IS
PROCEDURE SHOW_BIZDAYS(
v_start_date IN DATE := sysdate,
v_bus_days IN NUMBER := 30) IS
v_counter NUMBER(3) := 1;
v_date DATE := v_start_date;
BEGIN
WHILE v_counter <= v_bus_days LOOP
IF UPPER(TO_CHAR(v_date, 'D')) NOT IN (1, 7) THEN
DBMS_OUTPUT.PUT_LINE('The index is : ' || v_counter || ' and the table value is: ' || v_date);
v_counter := v_counter + 1;
END IF;
v_date := v_date + 1;
END LOOP;
END SHOW_BIZDAYS;
PROCEDURE SHOW_BIZDAYS(
v_start_date IN DATE := sysdate) IS
ACCEPT tdays PROMPT 'Enter how many days are needed : ';
v_bus_days NUMBER := &tdays;
v_counter NUMBER(3) := 1;
v_date DATE := v_start_date;
BEGIN
WHILE v_counter <= v_bus_days LOOP
IF UPPER(TO_CHAR(v_date, 'D')) NOT IN (1, 7) THEN
DBMS_OUTPUT.PUT_LINE('The index is : ' || v_counter || ' and the table value is: ' || v_date);
v_counter := v_counter + 1;
END IF;
v_date := v_date + 1;
END LOOP;
END SHOW_BIZDAYS;
END test;
初歩的な質問で申し訳ありませんが、下記につきアドバイスをお願いします。