cursores implicitos
Publicado por lodima (12 intervenciones) el 03/12/2008 18:06:40
hola!! necesito ayuda para hacerca de cursores implicitos.el problema es hacer lo mismo que hhace este cursor explicito pero debo hacerlo con cursores implicitos y ademas debo de meter un for o un loop para imprimir varios registros y con ello el nombre del persona con el maximo y mimimo clavetrabajador
create or replace procedure cargardatos is
cClavetrabajador personalx.clavetrabajador%type;
cNombre personalx.nombres%type;
cPaterno personalx.paterno%type;
cMaterno personalx.materno%type;
cSexo personalx.sexo%type;
cursor c_dato is
select clavetrabajador,nombres,paterno,materno,sexo from personalx;
begin
open c_dato;
fetch c_dato into cClavetrabajador,cNombre,cPaterno,cMaterno,cSexo;
dbms_output.put_line('nombre:'||cNombre||
' paterno:' ||cPaterno||
' materno:' ||cMaterno||
' sexo:'||cSexo);
close c_dato;
exception
when TOO_MANY_ROWS then
dbms_output.put_line('ERROR DE FILAS');
when NO_DATA_FOUND then
dbms_output.put_line('ERROR DE NINGUN DATO');
when others then
dbms_output.put_line('OTRO ERROR');
end;
/
begin
cargardatos;
end;
//alguien me puede ayudar a resolver mi problema
create or replace procedure cargardatos is
cClavetrabajador personalx.clavetrabajador%type;
cNombre personalx.nombres%type;
cPaterno personalx.paterno%type;
cMaterno personalx.materno%type;
cSexo personalx.sexo%type;
cursor c_dato is
select clavetrabajador,nombres,paterno,materno,sexo from personalx;
begin
open c_dato;
fetch c_dato into cClavetrabajador,cNombre,cPaterno,cMaterno,cSexo;
dbms_output.put_line('nombre:'||cNombre||
' paterno:' ||cPaterno||
' materno:' ||cMaterno||
' sexo:'||cSexo);
close c_dato;
exception
when TOO_MANY_ROWS then
dbms_output.put_line('ERROR DE FILAS');
when NO_DATA_FOUND then
dbms_output.put_line('ERROR DE NINGUN DATO');
when others then
dbms_output.put_line('OTRO ERROR');
end;
/
begin
cargardatos;
end;
//alguien me puede ayudar a resolver mi problema
Valora esta pregunta


0