Store Procedure de ORACLE
Hola señores expertos, deseo pasar un argumento de tipo arreglo a un store procedure que se encuentra en ORACLE. Si alguno de ustedes sabe como hacerlo agradeceré me apoye. Gracias.
1 respuesta
Respuesta de davidpy
Aquí te paso un ejemplo sencillo.. espero te sirva...
es para ejecutar un procedure desde powerscript
string ls_detalle
ls_detalle = 'Un mensaje'
DECLARE miproc PROCEDURE FOR
sp_carga_algo(:detalle);
EXECUTE auditoria;
if sqlca.sqlcode < 0 then
rollback using sqlca;
MessageBox("SQL error", SQLCA.SQLErrText)
else
commit using sqlca;
MessageBox("Aviso..", "La operacion se realizo con exito")
end if
es para ejecutar un procedure desde powerscript
string ls_detalle
ls_detalle = 'Un mensaje'
DECLARE miproc PROCEDURE FOR
sp_carga_algo(:detalle);
EXECUTE auditoria;
if sqlca.sqlcode < 0 then
rollback using sqlca;
MessageBox("SQL error", SQLCA.SQLErrText)
else
commit using sqlca;
MessageBox("Aviso..", "La operacion se realizo con exito")
end if
Aquí te paso un ejemplo sencillo.. espero te sirva...
es para ejecutar un procedure desde powerscript
string ls_detalle
ls_detalle = 'Un mensaje'
DECLARE miproc PROCEDURE FOR
sp_carga_algo(:ls_detalle);
EXECUTE miproc;
if sqlca.sqlcode < 0 then
rollback using sqlca;
MessageBox("SQL error", SQLCA.SQLErrText)
else
commit using sqlca;
MessageBox("Aviso..", "La operacion se realizo con exito")
end if
es para ejecutar un procedure desde powerscript
string ls_detalle
ls_detalle = 'Un mensaje'
DECLARE miproc PROCEDURE FOR
sp_carga_algo(:ls_detalle);
EXECUTE miproc;
if sqlca.sqlcode < 0 then
rollback using sqlca;
MessageBox("SQL error", SQLCA.SQLErrText)
else
commit using sqlca;
MessageBox("Aviso..", "La operacion se realizo con exito")
end if
