CURSORES IMPLICITOS EN ORACLE

 declare
        c1 usuario%rowtype;
        begin
             select * into c1 from usuario
             where usuario='BERTHA';
             dbms_output.put_line('User:' || c1.usuario || 'Password:' || c1.contrasena);
        end;  

declare
       c2 paciente%rowtype;
begin
     select * into c2
     from paciente
    where paciente='1987002690';
    dbms_output.put_line('Paciente:' || c2.nombres);
end;
       
declare
        vnombre varchar2(100);
        begin
             select nombre into vnombre
             from medico
             where plaza='106481';
             dbms_output.put_line('Nombre Medico: ' || vnombre);
        end;
               
declare
        vnombre medico.nombre%type;
        begin
             select nombre into vnombre
             from medico
             where plaza='106481';
             dbms_output.put_line('Nombre Medico: ' || vnombre);
        end;
       
declare
       vnom medico.nombre%type;
       vplaza medico.plaza%type;
       begin
            select plaza, nombre
            into vplaza, vnom
            from medico
            where plaza='106481';
             dbms_output.put_line('Plaza: ' || vplaza || ' -- ' || 'Medico: ' || vnom);
        end;
------------------------------------------------------------------------------
by: Ing. Jhonatan Abal Mejia