while(($li_numrows>0)&&($lb_valido_transferencia))
{
$row=$io_sql->fetch_row($resultado);
$li_numrows=$li_numrows-1;
$ls_dbdestino=rtrim($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_asipre($ls_codempdes,$ls_comprobante,$ld_fecha,$ls_procede,$ls_codban,$ls_ctaban,'CS');
if ($lb_valido_transferencia)
{
$io_transferencia->uf_update_estatus($ls_codempdes,$ls_comprobante,$ld_fecha,$ls_procede,$ls_codban,$ls_ctaban);
$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++;
}
} // Si encontrado
unset($io_transferencia);
} //FIN DEL while
//----en el caso que exista un error al insertar un comprobante se debe reversar---------------------
if (($i>0)&&(!$lb_valido_transferencia))
{
$ls_valido_reverso=true;
$ls_valido_rev_md=false;
