message("No pudo conectar con el servidor de datos MYSQL ".$as_servidor." , consulte a su Administrador de Sistema");
}
else
{
$lb_ok=@mysql_select_db(trim($as_dbdestino),$conec);
if (!$lb_ok)
{
$msg->message("No existe la base de datos ".$as_dbdestino);
}
}
}
elseif(strtoupper($as_gestor)==strtoupper("postgres"))
{
$conec = @pg_connect("host=".$as_servidor." port=".$as_puerto." dbname=".$as_dbdestino." user=".$as_usuario." password=".$as_password);
if (!$conec)
{
$msg->message("No pudo conectar a la base de datos ".$as_dbdestino." en el servidor ".$as_servidor.", consulte a su Administrador de Sistema");
}
}
return $conec;
}// fin de function uf_conectar_destino()
function uf_get_datos_bddestino($as_dbdestino,$aa_empresa)
{
$encontrado = false;
$li_total = count($aa_empresa["database"]);
for($i=1;(($i <= $li_total)&&(!$encontrado)); $i++)
{
if(trim($aa_empresa["database"][$i])==trim($as_dbdestino))
{
$lb_conecta = uf_conectar_destino($aa_empresa["gestor"][$i],$aa_empresa["database"][$i],$aa_empresa["port"][$i],$aa_empresa["hostname"][$i], $aa_empresa["login"][$i],$aa_empresa["password"][$i]);
if($lb_conecta)
{
$_SESSION["ls_database_destino"] = $aa_empresa["database"][$i];
$_SESSION["ls_hostname_destino"] = $aa_empresa["hostname"][$i];
$_SESSION["ls_login_destino"] = $aa_empresa["login"][$i];
$_SESSION["ls_password_destino"] = $aa_empresa["password"][$i];
$_SESSION["ls_gestor_destino"] = $aa_empresa["gestor"][$i];
$_SESSION["ls_port_destino"] = $aa_empresa["port"][$i];
$encontrado = true;
}
}
}
return $encontrado;
}
if(array_key_exists("operacion",$_POST))
{
$ls_operacion=$_POST["operacion"];
if($ls_operacion=="PROCESAR_CIERRE_MULTIEMPRESA")
{
$lb_valido_cierre = false;
$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;
$la_bddestino=array();
$lb_valido_cierre = true;
while(($li_numrows>0)&&($lb_valido_cierre))
{
$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)
{
$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_cierre=$io_transferencia->uf_cerrar_presupuesto($ls_codempdes,1);
if ($lb_valido_cierre)
{
///arreglo que guarda las bases de datos cuando la actualizacion es exitosa
$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++;
}
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);
$lb_valido_cierre= $io_transferencia->uf_cerrar_presupuesto($ls_codemprev,0);
}
}
} // 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(1);
if ($lb_valido_cierre)
{
$msg->message("El Presupuesto de Gasto fué cerrado con Éxito !!!");
$li_ciepre = 1;
$ls_evento="PROCESS";
$ls_desc_event="Ejecutó el proceso de Cierre de Presupuesto de Gasto ";
$ls_variable= $io_seguridad->uf_sss_insert_eventos_ventana($ls_empresa,$ls_sistema,$ls_evento,$ls_logusr,$ls_ventana,$ls_desc_event);
}
else
{
$msg->message("Error al realizar Cierre del Presupuesto de Gasto !!!");
}
}
else
{
$msg->message("Error al realizar Cierre del Presupuesto de Gasto !!!");
}
}//FIN DEL IF PROCESAR
elseif($ls_operacion=="PROCESAR_REVERSO_MULTIEMPRESA")
{
$lb_valido_cierre = false;
$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;
$la_bddestino=array();
$lb_valido_cierre = true;
while(($li_numrows>0)&&($lb_valido_cierre))
{
$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)
{
$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_cierre=$io_transferencia->uf_cerrar_presupuesto($ls_codempdes,0);
if ($lb_valido_cierre)
{
///arreglo que guarda las bases de datos cuando la actualizacion es exitosa
$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++;
}
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);
if($lb_valido_cierre)
{
$msg->message("El Cierre de Presupuesto de Gasto fué reversado con Éxito !!!");
$li_ciepre = 0;
$ls_evento="PROCESS";
$ls_desc_event="Ejecutó el proceso de reverso de Cierre de Presupuesto de Gasto ";
$ls_variable= $io_seguridad->uf_sss_insert_eventos_ventana($ls_empresa,$ls_sistema,$ls_evento,$ls_logusr,$ls_ventana,$ls_desc_event);
}
else
{
$msg->message("Error al realizar Reverso del Cierre del Presupuesto de Gasto !!!");
}
}
else
{
$msg->message("Error al realizar Reverso del Cierre del Presupuesto de Gasto !!!");
}
}
elseif($ls_operacion=="PROCESAR_CIERRE")
{
$lb_valido_cierre = $io_comprobantes->uf_cerrar_presupuesto(1);
if ($lb_valido_cierre)
{
$msg->message("El Presupuesto de Gasto fué cerrado con Éxito !!!");
$li_ciepre = 1;
$ls_evento="PROCESS";
$ls_desc_event="Ejecutó el proceso de Cierre de Presupuesto de Gasto ";
$ls_variable= $io_seguridad->uf_sss_insert_eventos_ventana($ls_empresa,$ls_sistema,$ls_evento,$ls_logusr,$ls_ventana,$ls_desc_event);
}
else
{
$msg->message("Error al realizar Cierre del Presupuesto de Gasto !!!");
}
}
elseif($ls_operacion=="PROCESAR_REVERSO")
{
$lb_valido_cierre = $io_comprobantes->uf_cerrar_presupuesto(0);
if($lb_valido_cierre)
{
$msg->message("El Cierre de Presupuesto de Gasto fué reversado con Éxito !!!");
$li_ciepre = 0;
$ls_evento="PROCESS";
$ls_desc_event="Ejecutó el proceso de reverso de Cierre de Presupuesto de Gasto ";
$ls_variable= $io_seguridad->uf_sss_insert_eventos_ventana($ls_empresa,$ls_sistema,$ls_evento,$ls_logusr,$ls_ventana,$ls_desc_event);
}
else
{
$msg->message("Error al realizar Reverso del Cierre del Presupuesto de Gasto !!!");
}
}
}
?>
