1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
|
create or replace procedure EmpNaoEntregue (code_funcionario in funcionario.cod_func%type)
set SERVEROUTPUT on
declare
texto char(25);
begin
select artigo_roupa.design into texto
from funcionario,encomendas, artigo_roupa, linha_encomenda
where funcionario.cod_func = encomendas.cod_func
and encomendas.cod_encomenda = linha_encomenda.cod_encomenda
and linha_encomenda.cod_artigo = artigo_roupa.cod_artigo
and linha_encomenda.estado_enc like '0'
and funcionario.cod_func = code_funcionario;
dbms_output.put_line(texto);
end;
/ |
Partager