DECLARE
cpf_buscado arrematante.cpf%TYPE := UPPER('&cpf');
cpf_a arrematante.cpf%TYPE;
nm arrematante.nome%TYPE;

begin
SELECT cpf,nome into cpf_a,nm from arrematante where cpf = cpf_buscado;
DBMS_OUTPUT.PUT_LINE('O cpf esta cadastrado no nome de: '||nm);
EXCEPTION
WHEN NO_DATA_FOUND THEN
DBMS_OUTPUT.PUT_LINE('Cpf inexistente!');
end;
/



exec mostrar(82652799142,1);
--Mostrar todos os bens leiloeirdos por leiloeiro x e que tavam no leilao y
create or replace procedure mostrar (cpf_lei leiloeiro.cpf%type, num_lei leilao.num%type) is
bemAtual bem.id_bem%type;
valorAtual bem.valor_min%type;
cursor meu_cursor is
                  select b.id_bem, b.valor_min
                  from bem b, oferta_rel o 
                  where b.id_bem = o.id_bem and o.cpf_leiloeiro = cpf_lei and o.num = num_lei;
begin

open meu_cursor;
loop
fetch meu_cursor into bemAtual, valoratual;
exit when meu_cursor%notfound;
dbms_output.put_line('Bem: '|| bemAtual || ' com valor mininimo: ' || valorAtual);

end loop;
close meu_cursor;

end;
/

------------------
CREATE or REPLACE TRIGGER bem_trigger 
BEFORE UPDATE or DELETE OF id_bem, valor_min 
ON bem
FOR EACH ROW 
BEGIN 
dbms_output.put_line('Operacao ilegal. Nao eh permitido alterar valores de bem.');
END; 
/ 
-----------
create or replace trigger mostrar_ano
AFTER INSERT on  OFERTA_ENT
for each row
declare 
idBem bem.id_bem%type := 1;
nossoAno automovel.ano%type;
begin
--select id_bem into idBem from oferta_ent; 
select ano into nossoAno from automovel where id_bem = new.id_bem;
dbms_output.put_line('Ano foi '|| nossoAno);
end;
/

-----
delete oferta_ent;
INSERT INTO OFERTA_ENT (id_bem,num,idbc,cpf_leiloeiro,preco,qtd_lances,cpf_arrematante) values(5,2,4321,'53486105850',147,125,'02488195236');