$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
{
$ls_registro = $ls_registro." ".$ls_comprobante.".";
}
//arreglo que guarda las bases de datos cuando la insersiòn es exitosa
$la_bddestino[$i][0] = $_SESSION["ls_hostname_destino"];
$la_bddestino[$i][1] = $_SESSION["ls_login_destino"];
elseif($i>0)
{
$hostname_destino = "";
$login_destino = "";
$password_destino = "";
$database_destino = "";
$gestor_destino = "";
for ($ls_j=0;$ls_j<$i;$ls_j++)
{
$hostname_destino = $la_bddestino[$ls_j][0];
$login_destino = $la_bddestino[$ls_j][1];
$password_destino = $la_bddestino[$ls_j][2];
$database_destino = $la_bddestino[$ls_j][3];
$gestor_destino = $la_bddestino[$ls_j][4];
$io_revcierre = new sigesp_spg_c_transferencia($hostname_destino,$login_destino,$password_destino,$database_destino,$gestor_destino);
$ls_codemprev = $io_revcierre->uf_obtener_codempresa_bd($hostname_destino,$login_destino,$password_destino,$database_destino,$gestor_destino);
$io_transferencia->uf_cerrar_presupuesto($ls_codemprev,1);
}
}
} // Si encontrado
unset($io_transferencia);
} //FIN DEL while
} // FIN DEL if($li_numrows > 0)
else
{
$msg->message("No existen Bases de Datos para Consolidacion Configuradas, consulte a su Administrador de Sistema!!!");
}
if (($lb_valido_cierre))
{
$lb_valido_cierre = $io_comprobantes->uf_cerrar_presupuesto(0);
