Cree un canvas con todos los campos de la tabla corredor. Y en un botón escoja el “trigger WHEN-BUTTON-PRESSED” y despliegue la siguiente codificación.
declare
alert_button NUMBER;
cursor prueba_cur IS
select *
from corredor
where id_cor = :corredor.id_cor;
corredores corredor%rowtype;
begin
open prueba_cur;
fetch prueba_cur into corredores;
if prueba_cur%notfound then
alert_button := Show_alert
('alert41');
end if;
while prueba_cur%found loop
:corredor.id_cor := corredores.id_cor;
:corredor.nombre := corredores.nombre;
:corredor.apellido := corredores.apellido;
:corredor.direccion := corredores.direccion;
:corredor.tipo_sangre :=
corredores.tipo_sangre;
:corredor.asegurado := corredores.asegurado;
fetch prueba_cur into corredores;
end loop;
close prueba_cur;
end;