RE:Procedimientos almacenados
Te mando un codigo para el sqlpreview de las dw, para que las dw, puedan ser mantenidas por sp:
if row = 0 then return
//------BEG Determina las variables qidu
integer ll_status=-1
string ls_qidu_opcion,ls_sp_titulo,ls_sp_mensaje,ls_sp_llamador
setnull(ls_qidu_opcion)
IF sqltype=PreviewDelete! THEN ls_qidu_opcion ="D"
IF sqltype=PreviewInsert! THEN ls_qidu_opcion ="I"
IF sqltype=PreviewSelect! THEN ls_qidu_opcion ="S"
IF sqltype=PreviewUpdate! THEN ls_qidu_opcion ="U"
ls_sp_titulo = "Usuarios del Sistema"
ls_sp_llamador = ls_sp_titulo
//------END Determina las variables qidu
//------BEG Carga de las variables de ram
string ls_id_usuario, ls_nombres, ls_apellidos
ls_id_usuario = this.GetItemString(row,"id_usuario",buffer,false)
ls_nombres = this.GetItemString(row,"nombres",buffer,false)
ls_apellidos = this.GetItemString(row,"apellidos",buffer,false)
//------END Carga de las variables de ram
DECLARE SPA_IDU PROCEDURE FOR dbo.spa_idu_t_seg_usuarios
:ls_qidu_opcion,:ls_sp_llamador,:ls_sp_titulo,:ls_sp_mensaje,
/*Datos de la tabla*/
:ls_id_usuario,:ls_nombres,:ls_apellidos
USING SQLCA;
//------BEG Ejecución del SP
EXECUTE SPA_IDU ;
IF sqlca.sqlcode <> 0 THEN
CHOOSE CASE sqlca.sqlcode
CASE -1
//Envia el sqldbcode
f_seg_mensajes(sqlca.sqldbcode,"","",0,ls_sp_llamador)
CASE 100
f_seg_mensajes(0,"El SP, esperaba par%E