//error_reporting(E_ALL); //ini_set('display_errors', '1'); session_start(); if ($_SESSION['codigo'] == "" || $_SESSION['cedula'] == ""){ header ("Location: login_CPS.php?pagina=solicitudes_publicaciones_cps.php"); } else { $cedula = $_SESSION['cedula']; $codigo = $_SESSION['codigo']; } require("../conex/connect_oracle_cps.php"); //require("../functions/cod_asociado.php"); //$codigo = codigoasoc($CEDULA); //Se obtiene K_IDTERC del Asociado $CEDULA = $cedula; $k_idterc = $codigo; $i = 0; //Varriable de control para los huellitas $ctr_huell = $_GET['ctr_huell']; function getRealIP() { if( $_SERVER['HTTP_X_FORWARDED_FOR'] != '' ) { $client_ip = ( !empty($_SERVER['REMOTE_ADDR']) ) ? $_SERVER['REMOTE_ADDR'] : ( ( !empty($_ENV['REMOTE_ADDR']) ) ? $_ENV['REMOTE_ADDR'] : "unknown" ); // los proxys van añadiendo al final de esta cabecera // las direcciones ip que van "ocultando". Para localizar la ip real // del usuario se comienza a mirar por el principio hasta encontrar // una dirección ip que no sea del rango privado. En caso de no // encontrarse ninguna se toma como valor el REMOTE_ADDR $entries = split('[, ]', $_SERVER['HTTP_X_FORWARDED_FOR']); reset($entries); while (list(, $entry) = each($entries)) { $entry = trim($entry); if ( preg_match("/^([0-9]+\.[0-9]+\.[0-9]+\.[0-9]+)/", $entry, $ip_list) ) { $private_ip = array( '/^0\./', '/^127\.0\.0\.1/', '/^192\.168\..*/', '/^172\.((1[6-9])|(2[0-9])|(3[0-1]))\..*/', '/^10\..*/'); $found_ip = preg_replace($private_ip, $client_ip, $ip_list[1]); if ($client_ip != $found_ip) { $client_ip = $found_ip; break; } } } } else { $client_ip = ( !empty($_SERVER['REMOTE_ADDR']) ) ? $_SERVER['REMOTE_ADDR'] : ( ( !empty($_ENV['REMOTE_ADDR']) ) ? $_ENV['REMOTE_ADDR'] : "unknown" ); } return $client_ip; } //Se listan los HUELLITAS VINCULADOS $link_huell = Conectar(); if ($CEDULA!=NULL) { $link = Conectar(); //Se establece conexión con la base de datos //****************** DATOS GENERALES DEL ASOCIADO ********************************* $q_dat_asoc = "SELECT AANUMNIT, NNASOCIA, F_ULTAFI, N_CIUDAD, D_TERCER, T_TERCER, N_NOMINA, N_UBICA2, K_CODBAN, O_NUMCTA, V_SUELDO, D_EMAIL FROM V_WEF_INFO_DATBASASOC WHERE K_IDTERC = :p_k_idterc"; $stmt1 = oci_parse($link, $q_dat_asoc); oci_bind_by_name($stmt1, ":P_K_IDTERC", $k_idterc); $r1 = oci_execute($stmt1); if ($array1 = oci_fetch_array($stmt1, OCI_BOTH)) { $Nombre = $array1[NNASOCIA]; //NOMBRE $Cedula = $array1[AANUMNIT]; //CEDULA $Nomina = $array1[N_NOMINA]; //EMPRESA $Seccion = $array1[N_CARGOC]; $Ciudad = $array1[N_CIUDAD]; //Ciudad $Regional = $array1[N_REGIONAL]; $D_EMAIL = $array1[D_EMAIL]; $Telefono = $array1[T_TERCER]; $Direccion = $array1[D_TERCER]; } oci_close($link); //Se arma el nombre a mostrar en la ToolBar $linkN = Conectar(); //Se establece conexión con la base de datos $q_dat_asocN = "SELECT GR001.N_NOMBR1, GR001.N_NOMBR2, GR001.N_APELL1, GR001.N_APELL2 FROM GR001MTERCERO GR001, AP014MCLIENTE AP014 WHERE AP014.I_ESTASO = 'A' AND AP014.K_IDTERC = GR001.K_IDTERC AND GR001.K_IDTERC = :P_K_IDTERC"; $stmtN = oci_parse($linkN, $q_dat_asocN); oci_bind_by_name($stmtN, ":P_K_IDTERC", $k_idterc); oci_execute($stmtN); if ($arrayN = oci_fetch_array($stmtN, OCI_BOTH)) { $Nombre_bar = $arrayN[N_NOMBR1] . " " . $arrayN[N_NOMBR2] . " " . $arrayN[N_APELL1] . " " . $arrayN[N_APELL2]; } oci_close($linkN); ?>