Para aquellos a los que no les gusta buscar y examinar enlaces que pueden desaparecer en cualquier momento, aquí hay un fragmento rápido de cortar y pegar.
set termout on
set serveroutput on
set feedback off
set verify off
-- start
column 1 new_value 1 noprint
select '' "1" from dual where rownum = 0;
define param = &1 "default"
-- end
begin
dbms_output.put_line ( 'Param 1 value is ¶m' );
end;
/
exit 0
/
Ejecución: