Revision: 59636
Updated Code
at September 21, 2012 03:39 by thescorpion
Updated Code
Procedure pr_obtener_cursor (PN_CODIGO In Number,
PC_CURSOR Out Sys_Refcursor,
PV_ERROR Out Varchar2) Is
lv_programa Varchar2(100) := 'pr_obtener_cursor';
Begin
If PN_CODIGO Is Null Then
Pv_error := 'El c�³digo no puede ser nulo';
Return;
End If;
Open PC_CURSOR For
Select *
From TABLA T
Where T.CODIGO= PN_CODIGO
And T.ESTADO In ('A', 'I');
Exception
When no_data_found Then
pv_error:='C�³digo no existe';
When Others Then
pv_error:= lv_programa ||'-'||Sqlerrm;
End pr_obtener_cursor;
Revision: 59635
Updated Code
at September 21, 2012 03:38 by thescorpion
Updated Code
Procedure pr_obtener_cursor (PN_CODIGO In Number,
PC_CURSOR Out Sys_Refcursor,
PV_ERROR Out Varchar2) Is
lv_programa Varchar2(100) := 'pr_obtener_cursor';
Begin
If PN_CODIGO Is Null Then
Pv_error := 'El código no puede ser nulo';
Return;
End If;
Open PC_CURSOR For
Select *
From TABLA T
Where T.CODIGO= PN_CODIGO
And T.ESTADO In ('A', 'I');
Exception
When no_data_found Then
pv_error:='Código no existe';
When Others Then
pv_error:= lv_programa ||'-'||Sqlerrm;
End pr_obtener_cursor;
Revision: 59634
Initial Code
Initial URL
Initial Description
Initial Title
Initial Tags
Initial Language
at September 21, 2012 03:34 by thescorpion
Initial Code
Procedure pr_obtener_cursor (PN_CODIGO In Number,
PC_CURSOR Out Sys_Refcursor,
PV_ERROR Out Varchar2) Is
lv_programa Varchar2(100) := 'pr_obtener_cursor';
Begin
If PN_CODIGO Is Null Then
Pv_error := 'El código no puede ser nulo';
Return;
End If;
Open PC_CURSOR For
Select *
From TABLA T
Where T.CODIGO= PN_CODIGO
And T.ESTADO In ('A', 'I');
Exception
When no_data_found Then
pv_error:='Código no existe';
When Others Then
pv_error:= lv_programa ||'-'||Sqlerrm;
End pr_obtener_cursor;
Initial URL
Initial Description
Procedimiento para retornar un Cursor y recorrerlo en Java
Initial Title
Retornar Cursor Oracle para Java
Initial Tags
java
Initial Language
PL/SQL