} // Fin del For
if ($lb_valido_transferencia)
{
$msg->message("Transferencia de Usuarios realizada con éxito !!!");
}
else
{
$msg->message("Error al realizar Transferencia de Usuarios !!!");
}
}
else
{
if ($ls_operacion == "CREARCONEXION")
{
$lb_conexion = uf_get_datos_bddestino($ls_dbdestino,$empresa);
if ($lb_conexion)
{
$li_conexion = 1;
$msg->message("La Conexión con la Base de Datos Destino es Correcta !!!");
}
}
}
}
}
else
{
uf_agregarlineablanca($lo_object,1);
}
?>
$resultado = $io_comprobantes->uf_cargar_bddestino();//busca todas las bases configuradas como consolidadoras
$li_numrows = $io_sql->num_rows($resultado);
if ($li_numrows > 0)
{
$ls_dbdestino = "";
$i = 0;
if ($ls_selusu=='1')
{
$la_bddestino = array();
$lb_valido_transferencia = true;
while(($li_numrows>0)&&($lb_valido_transferencia))
{
$row = $io_sql->fetch_row($resultado);
$li_numrows--;
$ls_dbdestino = trim($row["nombasdat"]);
$lb_encontrado = uf_get_datos_bddestino($ls_dbdestino,$empresa);
if ($lb_encontrado)
{
$ls_registro = "";
$io_transferencia = new sigesp_spg_c_transferencia($_SESSION["ls_hostname_destino"],$_SESSION["ls_login_destino"],$_SESSION["ls_password_destino"] ,$_SESSION["ls_database_destino"],$_SESSION["ls_gestor_destino"]);
$ls_codempdes = $io_transferencia->uf_obtener_codempresa_bd($_SESSION["ls_hostname_destino"],$_SESSION["ls_login_destino"],$_SESSION["ls_password_destino"] ,$_SESSION["ls_database_destino"],$_SESSION["ls_gestor_destino"]);
$lb_valido_transferencia = false;
$lb_valido_transferencia = $io_transferencia->uf_transferir_comprobantes(rtrim($ls_codempdes),rtrim($ls_comprobante),rtrim($ls_fecha),rtrim($ls_fecaprsol),rtrim($ls_procede),$ls_codban,$ls_ctaban);
if ($lb_valido_transferencia)
{
if ($li_i < $li_totrows)
{
$ls_registro = $ls_registro." ".$ls_comprobante." ";
}
else
{
$li_numcmp=$io_sql->num_rows($rs_data);
if($li_numcmp > 0)
{
while($li_numcmp>0)
{
$fila=$io_sql->fetch_row($rs_data);
$li_numcmp=$li_numcmp-1;
$ls_comprobante =rtrim($fila["comprobante"]);
$ld_fecha =$fila["fecha"];
$ls_procede =$fila["procede"];
$ls_codban =$fila["codban"];
$ls_ctaban =$fila["ctaban"];
$ls_dbdestino ="";
$i=0;
$la_bddestino=array();
$lb_encontrado = uf_get_datos_bddestino($ls_basdatcon,$empresa);
if ($lb_encontrado)
{
$ls_registro = "";
$io_transferencia=new sigesp_spg_c_transferencia($_SESSION["ls_hostname_destino"],$_SESSION["ls_login_destino"],$_SESSION["ls_password_destino"] ,$_SESSION["ls_database_destino"],$_SESSION["ls_gestor_destino"]);
$ls_codempdes = $io_transferencia->uf_obtener_codempresa_bd($_SESSION["ls_hostname_destino"],$_SESSION["ls_login_destino"],$_SESSION["ls_password_destino"] ,$_SESSION["ls_database_destino"],$_SESSION["ls_gestor_destino"]);
$lb_valido_transferencia = false;
$lb_valido_transferencia=$io_transferencia->uf_transferir_asipre($ls_codempdes,$ls_comprobante,$ld_fecha,$ls_procede,$ls_codban,$ls_ctaban,'UE');
if ($lb_valido_transferencia)
{
$la_bddestino[$i][0] = $_SESSION["ls_hostname_destino"];
$la_bddestino[$i][1] = $_SESSION["ls_login_destino"];
$la_bddestino[$i][2] = $_SESSION["ls_password_destino"];
$la_bddestino[$i][3] = $_SESSION["ls_database_destino"];
$la_bddestino[$i][4] = $_SESSION["ls_gestor_destino"];
$i++;
