/**
* 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);
}
