Script SQL*Plus para Windows:
set define "&"
set verify off
define mytable = dual
accept param prompt "Enter option 1-9: "
-- Generate a script named prompt_for_tablename.sql which prompts the user for a table name
-- or does nothing, depending on the value of ¶m:
set termout off
column mytable new_value mytable
set head off feedback off
spool prompt_for_tablename.sql
select 'accept mytable char prompt "Enter table name: "' as prompt from dual where ¶m = 1;
spool off
set termout on head on feedback on
@prompt_for_tablename.sql
host del prompt_for_tablename.sql
declare
vari_axu number;
begin
if ¶m = 1 then
dbms_output.put_line ('work here');
select count(*) into vari_axu from &mytable ;
dbms_output.put_line('Count of &mytable: ' || vari_axu);
return;
end if;
dbms_output.put_line ('do not work' );
end;
/
Se o usuário digitar
1
no primeiro prompt, o script gerado prompt_for_tablename.sql
solicitará um nome de tabela. Para qualquer outro valor, não fará nada. Em seguida,
prompt_for_tablename.sql
é executado (e imediatamente excluído, pois não precisamos mais dele). Agora &mytable
contém seu valor padrão desde o início do script ou o que o usuário digitou no prompt. Adicionado:versão com duas variáveis
Isso cria uma consulta dinâmica como:
select count(*) into vari_axu from &mytable where created > date '&busdate';
Para fins de demonstração, você pode inserir o nome da tabela como
user_objects
(onde created
é uma coluna de data). Obviamente, esse tipo de construção fica complicado e propenso a erros, pois o usuário deve especificar uma tabela que tenha o nome de coluna esperado, então não tenho certeza se recomendo ir muito longe nesse caminho, mas de qualquer maneira:
set define "&"
set verify off
define mytable = dual
define busdate = "0001-01-01"
define if_param_is_1 = "--"
accept param prompt "Enter option 1-9: "
-- Generate a script named prompt_for_tablename.sql which prompts the user for a table name
-- or does nothing, depending on the value of ¶m:
set termout off
column mytable new_value mytable
column if_param_is_1 new_value if_param_is_1
set head off feedback off
spool prompt_for_tablename.sql
select prompt, null as if_param_is_1 -- uncomment
from
(
select 'accept mytable char prompt "Enter table name: "'||chr(13)||chr(10) as prompt from dual
union all
select 'accept busdate date format ''YYYY-MM-DD'' prompt "Enter business date (YYYY-MM-DD): "' from dual
)
where ¶m = 1;
spool off
set termout on head on feedback on
@prompt_for_tablename.sql
host del prompt_for_tablename.sql
declare
vari_axu number;
begin
&if_param_is_1 dbms_output.put_line ('work here');
&if_param_is_1 select count(*) into vari_axu from &mytable where created > date '&busdate';
&if_param_is_1 dbms_output.put_line('Count of &mytable created after &busdate: ' || vari_axu);
&if_param_is_1 return;
dbms_output.put_line ('do not work' );
end;
/
Teste passando o parâmetro como 2:
SQL> @demo
Enter option 1-9: 2
do not work
PL/SQL procedure successfully completed.
Teste passando o parâmetro como 1:
SQL> @demo
Enter option 1-9: 1
Enter table name: user_objects
Enter business date (YYYY-MM-DD): 2010-01-01
work here
Count of user_objects created after 2010-01-01: 93772
PL/SQL procedure successfully completed.
(Você pode suprimir o
successfully completed
mensagens com set feedback off
.)