$msg->message("Error al realizar Transferencia de Modificaciones Presupuestarias de Reverso!!!");
}
}
}
unset($io_revtran);//libero el objeto
}// fin del for
}
else
{
unset($la_bddestino);
}
//---------------------------------------------------------------------------------------------------
//----------------si el traspaso fue exitoso en todas las bases de datos-----------------------------
if ($lb_valido_transferencia === true)
{
$lb_valido_update=$io_comprobantes->uf_update_estatus(rtrim($ls_comprobante),rtrim($ls_fecha),rtrim($ls_fecaprsol),rtrim($ls_procede),$as_codban,$as_ctaban);
$ls_evento="PROCESS";
$ls_desc_event="Ejecutó el proceso de Transferencia de Modificaciones Presupuestarias desde la Base de Datos Origen ".$_SESSION["ls_database"]." hacia la Base de Datos Destino ".$_SESSION["ls_database_destino"]." , se transfirieron las siguientes solicitudes : ".$ls_registro;
$ls_variable= $io_seguridad->uf_sss_insert_eventos_ventana($ls_empresa,$ls_sistema,$ls_evento,$ls_logusr,$ls_ventana,$ls_desc_event);
}
}
}
}
if (($lb_valido_transferencia)&&($lb_valido_update))
{
$msg->message("Transferencia de Modificaciones Presupuestarias realizada con éxito !!!");
}
else
{
$msg->message("Error al realizar Transferencia de Modificaciones Presupuestarias !!!");
}
$io_revtran=new sigesp_spg_c_transferencia($hostname_destino,$login_destino,$password_destino,$database_destino,$gestor_destino);
global $io_revtran;
$ls_valido_reverso=$io_revtran->uf_reversar_transferencia_comprobantes(rtrim($ls_comprobante),rtrim($ls_fecha),
rtrim($ls_fecaprsol),rtrim($ls_procede),$la_seguridad);
unset($io_revtran);//libero el objeto
}// fin del for
}// fin del if ($i>0)
else
{
unset($la_bddestino);
}
//---------------------------------------------------------------------------------------------------
//----------------si el traspaso fue exitoso en todas las bases de datos-----------------------------
if ($lb_valido_transferencia === true)
{
$lb_valido_update=$io_comprobantes->uf_update_estatus(rtrim($ls_comprobante),rtrim($ld_fecha),rtrim($ld_fecha),rtrim($ls_procede));
if($lb_valido_update)
{
$ls_evento="PROCESS";
$ls_desc_event="Ejecutó el proceso de Transferencia de Asientos Presupuestarios y Contables desde la Base de Datos Origen ".$_SESSION["ls_database"]." hacia la Base de Datos Destino ".$_SESSION["ls_database_destino"];
$ls_variable= $io_seguridad->uf_sss_insert_eventos_ventana($ls_empresa,$ls_sistema,$ls_evento,$ls_logusr,$ls_ventana,$ls_desc_event);
}
}
//---------------------------------------------------------------------------------------------------
} // FIN DEL if($li_numrows > 0)
//unset($io_transferencia);
} // End While Comprobantes
} // if numcmp > 0
if (($lb_valido_transferencia)&&($lb_valido_update))
{
