$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_revtran = new sigesp_spg_c_transferencia($hostname_destino,$login_destino,$password_destino,$database_destino,$gestor_destino); global $io_revtran; // elimina los comprobante de modificaciòn $ls_valido_rev_md = $io_revtran->uf_reversar_transferencia_comprobantes_md(rtrim($ls_comprobante),rtrim($ls_fecha), rtrim($ls_fecaprsol),rtrim($ls_procede),$la_seguridad); if ($ls_valido_rev_md) { //elimina los comprobantes en sigesp_cmp $ls_valido_reverso = $io_revtran->uf_reversar_transferencia_comprobantes(rtrim($ls_comprobante),rtrim($ls_fecha), rtrim($ls_fecaprsol),rtrim($ls_procede),$ls_codban,$ls_ctaban,$la_seguridad); if (!$ls_valido_reverso) { $ls_valido_trans=$io_revtran->uf_transferir_comprobantes_md(rtrim($ls_codempdes),rtrim($ls_comprobante),rtrim($ls_fecha),rtrim($ls_fecaprsol),rtrim($ls_procede)); if (!$ls_valido_trans) { $msg->message("Error al realizar Transferencia de Modificaciones Presupuestarias de Reverso!!!"); } } } unset($io_revtran);//libero el objeto