/** * Retorna un array con los datos del remitente de un radicado, este vector contiene los indices 'nombre','direccion','deptoNombre','muniNombre','deptoCodi','muniCodi'; antes de invocar esta funcion, se debe llamar a radicado_codigo() * @return array */ function getDatosRemitente() { //almacena el query $q = "select * from sgd_dir_drecciones where radi_nume_radi =" . $this->radi_nume_radi; $rs = $this->cursor->query($q); //Agregada por Johnny debido a solicitud de usuarios $direccion = $rs->fields['SGD_DIR_DIRECCION']; $deptoCodi = $rs->fields['DPTO_CODI']; $muniCodi = $rs->fields['MUNI_CODI']; $paisCodi = $rs->fields['ID_PAIS']; $contCodi = $rs->fields['ID_CONT']; //Agregada por Johnny debido a solicitud de usuarios $nombre = $rs->fields['SGD_DIR_NOMREMDES']; $dep = new Departamento($this->cursor); $mun = new Municipio($this->cursor); $dep->departamento_codigo($paisCodi . '-' . $deptoCodi); $mun->municipio_codigo($paisCodi . '-' . $deptoCodi, $paisCodi . '-' . $deptoCodi . '-' . $muniCodi); //Si se hallaron datos del remitente if ($dep) { $vecDatos["nombre"] = $nombre; $vecDatos["direccion"] = $direccion; $vecDatos["deptoNombre"] = $dep->get_dpto_nomb(); $vecDatos["muniNombre"] = $mun->get_muni_nomb(); $vecDatos["contCodi"] = $contCodi; $vecDatos["paisCodi"] = $paisCodi; $vecDatos["deptoCodi"] = $deptoCodi; $vecDatos["muniCodi"] = $muniCodi; } return $vecDatos; }
/** * Genera un archivo PDF con la informacion de las empresas que recibe como parametro * @param $s(0/1/2/) string con las (ESP/Empresas/Ciudadanos) seleccionadas * @param $ruta_raiz string con el path a la raiz de ORFEO * @param $archivo string con el archivo a crear * @param $sc(0/1/2) string con los contactos de las (ESP/Empresas/Ciudadanos) seleccionados * @return string */ function generarPDF($s0, $ruta_raiz, $archivo, $sc0, $s1 = null, $s2 = null, $sc1 = null, $sc2 = null) { $pdf = new Cezpdf("LETTER", "landscape"); $justCentro = array("justification" => "center"); $estilo1 = array("justification" => "left", "leading" => 8); $estilo2 = array("left" => 0, "leading" => 12); $estilo3 = array("left" => 0, "leading" => 15); $pdf->ezSetCmMargins(4, 3, 4, 2); //top,botton,left,right // Se establece la fuente que se utilizara para el texto. $pdf->selectFont($ruta_raiz . "/include/pdf/fonts/Times-Roman.afm"); $pdf->ezText("LISTADO PREVIO REGISTROS SELECCIONADOS\n\n", 15, $justCentro); $txtformat = "Se ha seleccionado:"; $data = array(); $y = 0; //variable que almacena el caracter comilla $com = chr(34); //variable que almacena el contenido del archivo $contenido = "{$com}*TIPO*{$com},{$com}*NOMBRE*{$com},{$com}*DIR*{$com},{$com}*MUNI_NOMBRE*{$com},{$com}*DEPTO_NOMBRE*{$com},{$com}*PAIS_NOMBRE*{$com},{$com}*NUIR*{$com},{$com}*NOMBRE_REP*{$com},{$com}*DIGNATARIO*{$com},{$com}*CARGO*{$com}\n"; $depto = new Departamento($this->cursor); $muni = new Municipio($this->cursor); for ($i = 0; $i < 3; $i++) { if (${'s' . $i}) { //arreglo con las empresas seleccionadas $arrEmpresas = explode(",", ${'s' . $i}); $arrContacto = explode(",", ${'sc' . $i}); //variable que almacena la cantidad de empresas que llegarom como parametro $num = count($arrEmpresas); $x = 0; //Se recorre el arreglo de las empresas para armar el IN dentro del where de la busqueda while ($x < $num) { $nuir = $arrEmpresas[$x]; if (strlen(trim($nuir)) > 0) { if (strlen($selectedSQL)) { $selectedSQL = $selectedSQL . "," . "'{$nuir}'"; } else { $selectedSQL = "'{$nuir}'"; } } $x++; } //query final switch ($i) { case 0: $q = "select ID_PAIS AS IDPAIS,CODIGO_DEL_DEPARTAMENTO AS IDDPTO,CODIGO_DEL_MUNICIPIO AS IDMPIO,NUIR AS NUIR,\n\t \t\t\t\t\t\tNOMBRE_DE_LA_EMPRESA AS PPAL,DIRECCION AS DIR,IDENTIFICADOR_EMPRESA AS ID,NOMBRE_REP_LEGAL AS DESCR\n\t \t\t\t\t\tfrom BODEGA_EMPRESAS where IDENTIFICADOR_EMPRESA in ({$selectedSQL}) ORDER BY CODIGO_DEL_DEPARTAMENTO, CODIGO_DEL_MUNICIPIO, NOMBRE_DE_LA_EMPRESA"; break; case 1: $q = "select ID_PAIS AS IDPAIS,DPTO_CODI AS IDDPTO,MUNI_CODI AS IDMPIO,SGD_OEM_OEMPRESA AS PPAL,\n\t \t\t\t\t\t\tSGD_OEM_DIRECCION AS DIR,SGD_OEM_CODIGO AS ID,SGD_OEM_REP_LEGAL AS DESCR\n\t \t\t\t\t\tfrom SGD_OEM_OEMPRESAS where SGD_OEM_CODIGO in ({$selectedSQL}) ORDER BY IDDPTO, IDMPIO, SGD_OEM_OEMPRESA"; break; case 2: $q = "select ID_PAIS AS IDPAIS,DPTO_CODI AS IDDPTO,MUNI_CODI AS IDMPIO,SGD_CIU_NOMBRE AS PPAL,\n\t \t\t\t\t\t\tSGD_CIU_DIRECCION AS DIR,SGD_CIU_CODIGO AS ID,SGD_CIU_APELL2 AS DESCR\n\t \t\t\t\t\tfrom SGD_CIU_CIUDADANO where SGD_CIU_CODIGO in ({$selectedSQL}) ORDER BY IDDPTO, IDMPIO, SGD_CIU_NOMBRE"; break; } $selectedSQL = ""; $rs = $this->cursor->query($q); while (!$rs->EOF) { $y++; $paisCodi = $rs->fields['IDPAIS']; $codDepto = $paisCodi . '-' . $rs->fields['IDDPTO']; $codMuni = $codDepto . '-' . $rs->fields['IDMPIO']; $depto->departamento_codigo($codDepto); $muni->municipio_codigo($codDepto, $codMuni); $nombDepto = $depto->get_dpto_nomb(); $nombMuni = $muni->get_muni_nomb(); // Trae nombre del pais $tmp_rs = $this->cursor->query("SELECT NOMBRE_PAIS FROM SGD_DEF_PAISES WHERE ID_PAIS=" . $paisCodi); if ($tmp_rs) { trim($tmp_rs->fields['NOMBRE_PAIS']) == "" ? $nombPais = "<ESPACIO>" : ($nombPais = $tmp_rs->fields['NOMBRE_PAIS']); $tmp_rs->Close(); unset($tmp_rs); } else { $nombPais = "<ESPACIO>"; } $nombESP = $rs->fields['PPAL']; $dirESP = $rs->fields['DIR']; $nuir = $rs->fields['ID']; $nomRepESP = $rs->fields['DESCR']; // Trae nombre del dignatario reset($arrEmpresas); $tmp_var = array_search($nuir, $arrEmpresas); $tmp_vec = explode(",", ${'sc' . $i}); $tmp_rs = $this->cursor->query("SELECT CTT_NOMBRE,CTT_CARGO FROM SGD_DEF_CONTACTOS WHERE CTT_ID=" . $tmp_vec[$tmp_var]); if ($tmp_rs) { trim($tmp_rs->fields['CTT_NOMBRE']) == "" ? $dignatario = "<ESPACIO>" : ($dignatario = $tmp_rs->fields['CTT_NOMBRE']); trim($tmp_rs->fields['CTT_CARGO']) == "" ? $cargo = "<ESPACIO>" : ($cargo = $tmp_rs->fields['CTT_CARGO']); $tmp_rs->Close(); unset($tmp_rs); } else { $dignatario = ""; $cargo = ""; } $contenido = $contenido . "{$i},{$com}{$nombESP}{$com},{$com}{$dirESP}{$com},{$com}{$nombMuni}{$com},{$com}{$nombDepto}{$com},{$com}{$nombPais}{$com},{$com}{$nuir}{$com},{$com}{$nomRepESP}{$com},{$com}{$dignatario}{$com},{$com}{$cargo}{$com}\n"; $data = array_merge($data, array(array('#' => $y, 'Tipo' => $i, 'Nombre' => $nombESP, 'Direcci�n' => $dirESP, 'Pa�s' => $nombPais, 'Departamento' => $nombDepto, 'Municipio' => $nombMuni, 'Nuir' => $nuir, 'Representante' => $nomRepESP, 'Dignatario' => $dignatario, 'Cargo' => $cargo))); $rs->MoveNext(); } } } $pdf->ezTable($data, '', '', array('fontSize' => 6, 'width' => 700)); //Referencia el PDF a generar $pdfcode = $pdf->ezOutput(); $fp = fopen($archivo, 'wb'); fwrite($fp, $pdfcode); fclose($fp); }