function index()
{
$departamento = new departamento();
$this->registry->template->dep_id = $departamento->obtenerSelect();
$fondo = new fondo();
$this->registry->template->fon_id = $fondo->obtenerSelectFondos();
$this->registry->template->uni_id = "";
$this->registry->template->ser_id = "";
//$this->registry->template->exp_id = "";
$this->registry->template->tra_id = "";
$this->registry->template->cue_id = "";
$tmenu = new menu();
$liMenu = $tmenu->imprimirMenu("prestamos", $_SESSION['USU_ID']);
$this->registry->template->men_titulo = $liMenu;
$this->registry->template->UNI_ID = $_SESSION['UNI_ID'];
$this->registry->template->PATH_WEB = PATH_WEB;
$this->registry->template->PATH_DOMAIN = PATH_DOMAIN;
$this->registry->template->PATH_EVENT = "search";
$this->registry->template->PATH_EVENT2 = "verifpass";
$this->registry->template->PATH_EVENT_VERIF_PASS = "******";
$this->registry->template->PATH_EVENT3 = "download";
$this->registry->template->PATH_EVENT4 = "getConfidencialidad";
$this->registry->template->PATH_EVENT_EXPORT = "exportar";
$this->registry->template->GRID_SW = "false";
$this->registry->template->PATH_J = "jquery-1.4.1";
//session
//ajax
$this->registry->template->PATH_EVENT_LISTA = "guardarLista";
//$this->registry->template->cantidad= $tseries->countBySQL();
$this->registry->template->show('headerBuscador');
$this->registry->template->show('prestamos/buscarArchivo.tpl');
$this->registry->template->show('footer');
}
function index()
{
$series = new series();
$this->registry->template->optSerie = $series->obtenerSelectTodas();
$this->registry->template->PATH_WEB = PATH_WEB;
$this->registry->template->PATH_DOMAIN = PATH_DOMAIN;
$this->registry->template->PATH_EVENT = "rpteVer";
$this->registry->template->GRID_SW = "true";
$this->registry->template->PATH_J = "jquery-1.4.1";
$this->menu = new menu();
$liMenu = $this->menu->imprimirMenu("rpteGeneral", $_SESSION['USU_ID']);
$fondo = new fondo();
$this->registry->template->fondo = $fondo->obtenerSelectUbicacion();
$this->registry->template->men_titulo = $liMenu;
$this->registry->template->seccion = $series->obtenerSeccionGeneral();
$this->registry->template->show('headerG');
$this->registry->template->show('tab_rpteInventarioGeneralSecciones.tpl');
$this->registry->template->show('footer');
}
function index()
{
$tseries = new series();
$series = "";
if ($_SESSION["ROL_COD"] == "AA" || $_SESSION["ROL_COD"] == "AC" || $_SESSION["ROL_COD"] == "AI") {
$series = $tseries->obtenerSelectTodas();
} else {
$series = $tseries->obtenerSelectSeries();
}
$departamento = new departamento();
$this->registry->template->dep_id = $departamento->obtenerSelect();
$fondo = new fondo();
$this->registry->template->fon_id = $fondo->obtenerSelectFondos();
$this->registry->template->uni_id = "";
$this->registry->template->ser_id = "";
//$this->registry->template->exp_id = "";
$this->registry->template->tra_id = "";
$this->registry->template->cue_id = "";
$tmenu = new menu();
$liMenu = $tmenu->imprimirMenu("buscarArchivo", $_SESSION['USU_ID']);
$this->registry->template->men_titulo = $liMenu;
$this->registry->template->UNI_ID = $_SESSION['UNI_ID'];
$this->registry->template->PATH_WEB = PATH_WEB;
$this->registry->template->PATH_DOMAIN = PATH_DOMAIN;
$this->registry->template->PATH_EVENT = "search";
$this->registry->template->PATH_EVENT2 = "verifpass";
$this->registry->template->PATH_EVENT_VERIF_PASS = "******";
$this->registry->template->PATH_EVENT3 = "download";
$this->registry->template->PATH_EVENT4 = "getConfidencialidad";
$this->registry->template->PATH_EVENT_EXPORT = "exportar";
$this->registry->template->GRID_SW = "false";
$this->registry->template->PATH_J = "jquery-1.4.1";
$this->registry->template->show('headerBuscador');
$this->registry->template->show('archivo/buscarArchivo.tpl');
$this->registry->template->show('footer');
}
function verRpteExcel()
{
$id = VAR3;
$where = "";
$tab_extransferencia = new tab_exptransferencia();
$result = $tab_extransferencia->dbSelectBySQL("select* from tab_exptransferencia where str_id={$id}");
$cantidad = count($result);
$valor3 = "";
$t = 1;
foreach ($result as $row) {
$valor3 .= "tab_expediente.exp_id={$row->exp_id}";
if ($t < $cantidad) {
$valor3 .= " or ";
}
$t++;
}
$where .= " AND {$valor3} ";
$sql = "SELECT\r\n f.fon_codigo,\r\n f.fon_cod,\r\n (SELECT fon_codigo from tab_fondo WHERE fon_id=f.fon_par) ||'.'|| f.fon_codigo ||'.'||tab_unidad.uni_cod ||'.'|| tab_tipocorr.tco_codigo ||'.'||tab_series.ser_codigo||'.'||\r\n tab_expediente.exp_codigo AS codigo,\r\n (NULLIF(tab_expediente.exp_codigo,'')::int) as cantidad,\r\n tab_soltransferencia.str_id,\r\n tab_soltransferencia.str_fecha,\r\n tab_soltransferencia.uni_id,\r\n tab_soltransferencia.unid_id,\r\n tab_soltransferencia.str_nrocajas,\r\n tab_soltransferencia.str_totpzas,\r\n tab_soltransferencia.str_totml,\r\n tab_soltransferencia.str_nroreg,\r\n tab_soltransferencia.str_fecini,\r\n tab_soltransferencia.str_fecfin,\r\n tab_soltransferencia.str_estado,\r\n tab_soltransferencia.usu_id,\r\n tab_soltransferencia.usud_id,\r\n tab_soltransferencia.str_direccion,\r\n tab_soltransferencia.str_telefono,\r\n tab_expisadg.exp_fecha_exi,\r\n tab_expisadg.exp_fecha_exf,\r\n tab_expisadg.exp_anioi,\r\n tab_expisadg.exp_aniof,\r\n tab_expisadg.exp_titulo,\r\n tab_series.ser_codigo,\r\n tab_unidad.uni_codigo,\r\n tab_unidad.uni_id,\r\n tab_unidad.uni_par,\r\n tab_unidad.uni_cod,\r\n tab_unidad.uni_descripcion,\r\n f.fon_cod,\r\n tab_series.ser_categoria,\r\n tab_expisadg.exp_titulo,\r\n tab_expediente.exp_obs,\r\n tab_series.ser_id,\r\n tab_series.ser_par,\r\n tab_expediente.exp_id\r\n FROM\r\n tab_unidad\r\n INNER JOIN tab_fondo as f ON tab_unidad.fon_id = f.fon_id\r\n INNER JOIN tab_series ON tab_series.uni_id = tab_unidad.uni_id\r\n INNER JOIN tab_expediente ON tab_expediente.ser_id = tab_series.ser_id\r\n INNER JOIN tab_expisadg ON tab_expisadg.exp_id = tab_expediente.exp_id\r\n INNER JOIN tab_exptransferencia ON tab_expediente.exp_id = tab_exptransferencia.exp_id\r\n INNER JOIN tab_soltransferencia ON tab_soltransferencia.str_id = tab_exptransferencia.str_id\r\n INNER JOIN tab_tipocorr ON tab_tipocorr.tco_id = tab_series.tco_id\r\n WHERE\r\n tab_soltransferencia.str_estado = 2 AND\r\n tab_expediente.exp_estado = 1 {$where} order by tab_expediente.exp_id ";
$usua = new usuario();
$subfondo = new fondo();
$seccion = new unidad();
$expedientes = new expediente();
$archivo = new tab_archivo();
$archivo2 = new tab_archivo();
$query = $archivo->dbSelectBySQL($sql);
$query2 = $archivo2->dbSelectBySQL($sql);
foreach ($query2 as $ids) {
$usu_id = $ids->usu_id;
$uni_id = $ids->uni_id;
$uni_par = $ids->uni_par;
$uni_cod = $ids->uni_cod;
$str_telefono = $ids->str_telefono;
$str_id = $ids->str_id;
$str_fecha = $ids->str_fecha;
$str_direccion = $ids->str_direccion;
$uni_descripcion = $ids->uni_descripcion;
}
$usuarioOrigen = $usua->obtenerNombre($usu_id);
$usuarioDestino = $usua->obtenerNombre($usu_id);
$fond = $subfondo->obtenerfon($usu_id);
$ob_seccion = $seccion->obtenerSeccion($uni_id);
$cadena = "";
$cadena = "<br/><br/><br/><br/><br/><br/><br/>";
$cadena .= '<table width="740" border="1">';
$cadena .= '<tr>';
$cadena .= '<td colspan="10" align="center" ><b>';
$cadena .= 'FORMULARIO DE RELACION DE TRANSFERENCIAS</b><br /></td>';
$cadena .= '</tr>';
$cadena .= '<tr>';
$cadena .= '<td colspan="9" align="right" style=border:none ><b>';
$cadena .= 'Nº de transferencia:</b></td><td align="center">' . $str_id . '</td>';
$cadena .= '</tr>';
// $cadena.='<tr>';
// $cadena.='<td colspan="10" align="right" ><b>';
// $cadena.='<b>Nº de transferencia:</b> '.$str_id.'</td>';
// $cadena.='</tr>';
$cadena .= '<tr>';
$cadena .= '<td colspan="5"><blockquote>';
$cadena .= '<b>Subfondo:</b> ' . $fond . '<br />';
$cadena .= '<b>Sección:</b> ';
$explode = explode(".", $uni_cod);
$contado = count($explode);
$codigo = "";
for ($t = 0; $t < $contado - 1; $t++) {
$codigo .= $explode[$t];
if ($t < $contado - 2) {
$codigo .= ".";
}
}
$codigo2 = $codigo;
if (strlen($codigo) == 1) {
$codigo = $codigo . ".0";
} else {
$estraer_codigo = explode(".", $codigo);
$codigo = $estraer_codigo[0] . ".0";
}
$tab_unidad = new Tab_unidad();
$unidad = new unidad();
$sqlUni2 = "SELECT\r\n tab_unidad.uni_descripcion\r\n FROM\r\n tab_unidad\r\n WHERE\r\n tab_unidad.uni_cod = '{$codigo}'";
$codigoss = explode(".", $codigo2);
$cantcodigo2 = count($codigoss);
if ($cantcodigo2 == 1) {
$codigo2 = "{$codigo2}.1";
}
$sqlUni1 = "SELECT\r\n tab_unidad.uni_descripcion\r\n FROM\r\n tab_unidad\r\n WHERE\r\n tab_unidad.uni_cod = '{$codigo2}'";
$resultadott = $tab_unidad->dbSelectBySQL($sqlUni2);
$resultadott1 = $tab_unidad->dbSelectBySQL($sqlUni1);
$ca1 = "";
foreach ($resultadott1 as $rowss2) {
$ca1 = $rowss2->uni_descripcion;
}
foreach ($resultadott as $rowss) {
$ca = $rowss->uni_descripcion;
}
$variable = $ca;
$excluirparent = explode("(", $variable);
if ($excluirparent[1] == "") {
$ca = $ca;
} else {
$excluirultimoparent = $excluirparent[1] . "x";
$imprimir_descripcion = explode(")", $excluirultimoparent);
$ca = $imprimir_descripcion[0];
}
$ca = $unidad->obtenerPadre($uni_par, $uni_descripcion);
$cadena .= $ca;
$cadena .= '<br><b>Subsección:</b> ';
$cadena .= $ca1;
$cadena .= '</blockquote></td>';
//$cadena.='<td colspan="5" ><blockquote><b>Unidad:</b> '.$uni_descripcion;
$cadena .= '<td colspan="5" ><blockquote>';
$cadena .= '<br /><b>Teléfono:</b> ' . $str_telefono . '</blockquote></td>';
$cadena .= '</tr>';
$cadena .= '<tr>';
$cadena .= '<td width="20" rowspan="2" align="center" bgcolor="#CCCCCC"><strong>Nº</strong></td>';
$cadena .= '<td width="105" rowspan="2" style="text-align:center" bgcolor="#CCCCCC"><strong>Serie</strong></td>';
$cadena .= '<td width="120" rowspan="2" style="text-align:center" bgcolor="#CCCCCC"><strong>Subserie</strong></td>';
$cadena .= '<td width="125" rowspan="2" style="text-align:center" bgcolor="#CCCCCC"><strong>Título del Expediente</strong></td>';
$cadena .= '<td width="80" rowspan="2" style="text-align:center" bgcolor="#CCCCCC"><strong>Código de Referencia</strong></td>';
$cadena .= '<td colspan="2" width="130" style="text-align:center" bgcolor="#CCCCCC"><strong>Fechas extremas</strong></td>';
$cadena .= '<td width="30" rowspan="2" bgcolor="#CCCCCC" style="font-size:25px"><strong >NºDoc.</strong></td>';
$cadena .= '<td width="30" rowspan="2" bgcolor="#CCCCCC"><strong>Cajas</strong></td>';
$cadena .= '<td width="100" rowspan="2" style="text-align:center" bgcolor="#CCCCCC"><p><strong>Observ.</strong></p></td>';
$cadena .= '</tr>';
$cadena .= '<tr>';
$cadena .= '<td width="65" style="text-align:center" bgcolor="#CCCCCC"><strong>Inicio</strong></td>';
$cadena .= '<td width="65" style="text-align:center" bgcolor="#CCCCCC"><strong>Final</strong></td>';
$cadena .= '</tr>';
$sum = 0;
$i = 1;
$cant = 0;
foreach ($query as $row) {
$tabserie = new tab_series();
if ($row->exp_fecha_exi == "") {
$fei = "";
} else {
$fechainicial = explode("-", $row->exp_fecha_exi);
$fei = $fechainicial[2] . "/" . $fechainicial[1] . "/" . $fechainicial[0];
}
if ($row->exp_fecha_exf == "") {
$fef = "";
} else {
$fechafinal = explode("-", $row->exp_fecha_exf);
$fef = $fechafinal[2] . "/" . $fechafinal[1] . "/" . $fechafinal[0];
}
$lugar = "";
$cadena .= '<tr>';
$cadena .= '<td align="center">' . $i . '</td>';
$cadena .= '<td style="font-size:22px">';
$tab_serie = new Tab_series();
$lugar2 = "";
if ($row->ser_par != -1) {
$rowsdb = $tab_serie->dbselectByField("ser_id", $row->ser_par);
foreach ($rowsdb as $fila) {
$ser_par = $fila->ser_par;
$ser_categoria = $fila->ser_categoria;
}
if ($ser_par != -1) {
$cadena .= $ser_categoria;
} else {
$cadena .= $row->ser_categoria;
$lugar = $row->ser_categoria;
}
} else {
$cadena .= $row->ser_categoria;
$lugar2 = $row->ser_categoria;
}
$cadena .= '</td>';
$cadena .= '<td style="font-size:22px">';
if ($lugar2 != $row->ser_categoria && $row->ser_categoria != $lugar) {
$cadena .= $row->ser_categoria;
}
$expsum = $expedientes->cantidadExpedientes($row->exp_id);
// $cajas=$expedientes->cantidadCajas($row->exp_id);
$cant = $cant + $expsum;
// $sum=$sum+$cajas;
$cadena .= '</td>';
$cadena .= '<td align="left" style="font-size:22px">' . htmlentities($row->exp_titulo, ENT_COMPAT, 'utf-8') . '</td>';
$cadena .= '<td align="center" style="font-size:22px">' . $row->codigo . '</td>';
$cadena .= '<td align="center" style="font-size:22px">' . $row->exp_anioi . '</td>';
$cadena .= '<td align="center" style="font-size:22px">' . $row->exp_aniof . '</td>';
$cadena .= '<td align="center" style="font-size:22px">' . $expsum . '</td>';
$cadena .= '<td align="center"></td>';
$cadena .= '<td style="font-size:22px">' . $row->exp_obs . '</td>';
$cadena .= '</tr>';
$i++;
}
$cadena .= '<tr>';
$cadena .= '<td colspan="6" align="right" >TOTAL</td>';
$cadena .= '<td align="center"></td>';
$cadena .= '<td align="center">' . $cant . '</td>';
$cadena .= '<td></td>';
$cadena .= '<td> </td>';
$cadena .= '</tr>';
$cadena .= '</table>';
$fecha = explode("-", $str_fecha);
$anio = $fecha[0];
$mes = $fecha[1];
$dia = $fecha[2];
switch ($mes) {
case 1:
$mes = "Enero";
break;
case 2:
$mes = "Enero";
break;
case 3:
$mes = "Enero";
break;
case 4:
$mes = "Enero";
break;
case 5:
$mes = "Enero";
break;
case 6:
$mes = "Enero";
break;
case 7:
$mes = "Enero";
break;
case 8:
$mes = "Enero";
break;
case 9:
$mes = "Enero";
break;
case 10:
$mes = "Enero";
break;
case 11:
$mes = "Enero";
break;
case 12:
$mes = "Enero";
break;
}
$cadena .= '<b>Lugar y fecha de la transferencia:</b> ' . $str_direccion . ' ' . $dia . ' de ' . $mes . ' de ' . $anio;
$cadena .= '<br/>';
require_once 'tcpdf/config/lang/eng.php';
require_once 'tcpdf/tcpdf.php';
$pdf = new TCPDF('L', PDF_UNIT, 'LETTER', true, 'UTF-8', false);
$pdf->SetCreator(PDF_CREATOR);
$pdf->setFontSubsetting(FALSE);
$pdf->SetAuthor("Castellon");
$pdf->SetTitle('Reporte de Transferencia');
$pdf->SetSubject('Reporte de Transferencia');
// aumentado
$pdf->SetKeywords('Castellon, TEAM DIGITAL');
// set default header data
$pdf->SetHeaderData('logo2.png', 20, 'MPD', 'ADMINISTRADORA BOLIVIANA DE CARRETERAS (MPD)');
// set header and footer fonts
$pdf->setHeaderFont(array(PDF_FONT_NAME_MAIN, '', PDF_FONT_SIZE_MAIN));
// $pdf->setFooterFont(Array(PDF_FONT_NAME_DATA, '', PDF_FONT_SIZE_DATA));
//
$pdf->SetDefaultMonospacedFont(PDF_FONT_MONOSPACED);
$pdf->SetMargins(5, 30, 10);
$pdf->SetHeaderMargin(PDF_MARGIN_HEADER);
// $pdf->setPrintHeader(false);
$pdf->setPrintFooter(false);
//set auto page breaks
$pdf->SetAutoPageBreak(TRUE, 14);
// $pdf->setImageScale(PDF_IMAGE_SCALE_RATIO);
//set some language-dependent strings
$pdf->setLanguageArray($l);
$pdf->SetFont('helvetica', '', 10);
// add a page
$pdf->AddPage();
// $pdf->SetXY(110, 200);
$pdf->Image(PATH_ROOT . '/web/img/iso.png', '255', '8', 15, 15, 'PNG', '', 'T', false, 300, '', false, false, 1, false, false, false);
$cadena2 = "";
$cadena2 .= "<br/><br/><br/><br/>";
$cadena2 .= '<table width="740" border="0">';
$cadena2 .= '<tr>';
$cadena2 .= '<td width="100" height="65" ></td><td width="160" align="center" >';
$cadena2 .= '<h4 style="border-top:1px solid black">Archivista Remitente<br>' . $usuarioOrigen . '</h4>';
$cadena2 .= '</td><td width="100"></td>';
$cadena2 .= '<td width="100" ></td><td width="150" align="center">';
$cadena2 .= '<h4 style="border-top:1px solid black">Archivista de Recepción<br>' . $usuarioDestino . '</h4></td>';
$cadena2 .= '<td width="100"></td></tr>';
$cadena2 .= '<tr>';
$cadena2 .= '<td width="100" height="65" ></td><td width="160" align="center" >';
$cadena2 .= '<h4 style="border-top:1px solid black">Autoridad<br>Unidad Remitente</h4>';
$cadena2 .= '</td><td width="100"></td>';
$cadena2 .= '<td width="100" ></td><td width="150" align="center">';
$cadena2 .= '<h4 style="border-top:1px solid black">SGE / DOC<br></h4></td>';
$cadena2 .= '<td width="100"></td></tr>';
$cadena2 .= '</table>';
$cadena = $cadena . $cadena2;
$pdf->writeHTML($cadena, true, false, false, false, '');
// -----------------------------------------------------------------------------
//Close and output PDF document
// $pdf->Output('reporte_transferencia.pdf', 'D');
$pdf->Output('reporte_transferencia.pdf', 'I');
Header("Location: " . PATH_DOMAIN . "/soltransferencia/");
}
function verRpteExcel()
{
header("Content-type: application/vnd.ms-excel; name='excel'");
header("Content-Disposition: filename=transferencia_expedientes.xls");
header("Pragma: no-cache");
header("Expires: 0");
$id = VAR3;
$where = "";
$tab_extransferencia = new tab_exptransferencia();
$result = $tab_extransferencia->dbSelectBySQL("select* from tab_exptransferencia where str_id={$id}");
$cantidad = count($result);
$valor3 = "";
$t = 1;
foreach ($result as $row) {
$valor3 .= "tab_expediente.exp_id={$row->exp_id}";
if ($t < $cantidad) {
$valor3 .= " or ";
}
$t++;
}
$where .= " AND {$valor3} ";
$sql = "SELECT\r\n f.fon_codigo,\r\n f.fon_cod,\r\n (SELECT fon_codigo from tab_fondo WHERE fon_id=f.fon_par) ||'.'|| f.fon_codigo ||'.'||tab_unidad.uni_cod ||'.'|| tab_tipocorr.tco_codigo ||'.'||tab_series.ser_codigo||'.'||\r\n tab_expediente.exp_codigo AS codigo,\r\n (NULLIF(tab_expediente.exp_codigo,'')::int) as cantidad,\r\n tab_soltransferencia.str_id,\r\n tab_soltransferencia.str_fecha,\r\n tab_soltransferencia.uni_id,\r\n tab_soltransferencia.unid_id,\r\n tab_soltransferencia.str_nrocajas,\r\n tab_soltransferencia.str_totpzas,\r\n tab_soltransferencia.str_totml,\r\n tab_soltransferencia.str_nroreg,\r\n tab_soltransferencia.str_fecini,\r\n tab_soltransferencia.str_fecfin,\r\n tab_soltransferencia.str_estado,\r\n tab_soltransferencia.usu_id,\r\n tab_soltransferencia.usud_id,\r\n tab_soltransferencia.str_direccion,\r\n tab_soltransferencia.str_telefono,\r\n tab_expisadg.exp_fecha_exi,\r\n tab_expisadg.exp_fecha_exf,\r\n tab_expisadg.exp_anioi,\r\n tab_expisadg.exp_aniof,\r\n tab_expisadg.exp_titulo,\r\n tab_series.ser_codigo,\r\n tab_unidad.uni_codigo,\r\n tab_unidad.uni_id,\r\n tab_unidad.uni_par,\r\n tab_unidad.uni_cod,\r\n tab_unidad.uni_descripcion,\r\n f.fon_cod,\r\n tab_series.ser_categoria,\r\n tab_expisadg.exp_titulo,\r\n tab_expediente.exp_obs,\r\n tab_series.ser_id,\r\n tab_series.ser_par,\r\n tab_expediente.exp_id\r\n FROM\r\n tab_unidad\r\n INNER JOIN tab_fondo as f ON tab_unidad.fon_id = f.fon_id\r\n INNER JOIN tab_series ON tab_series.uni_id = tab_unidad.uni_id\r\n INNER JOIN tab_expediente ON tab_expediente.ser_id = tab_series.ser_id\r\n INNER JOIN tab_expisadg ON tab_expisadg.exp_id = tab_expediente.exp_id\r\n INNER JOIN tab_exptransferencia ON tab_expediente.exp_id = tab_exptransferencia.exp_id\r\n INNER JOIN tab_soltransferencia ON tab_soltransferencia.str_id = tab_exptransferencia.str_id\r\n INNER JOIN tab_tipocorr ON tab_tipocorr.tco_id = tab_series.tco_id\r\n WHERE\r\n tab_soltransferencia.str_estado = 2 \r\n AND tab_expediente.exp_estado = 1 \r\n {$where} \r\n ORDER BY f.fon_cod,\r\n tab_unidad.uni_cod,\r\n tab_series.ser_orden, \r\n tab_series.ser_codigo, \r\n tab_expediente.exp_codigo::int ";
$usua = new usuario();
$subfondo = new fondo();
$seccion = new unidad();
$expedientes = new expediente();
$archivo = new tab_archivo();
$archivo2 = new tab_archivo();
$query = $archivo->dbSelectBySQL($sql);
$query2 = $archivo2->dbSelectBySQL($sql);
$usu_id = "";
$usud_id = "";
$uni_id = "";
foreach ($query2 as $ids) {
$usu_id = $ids->usu_id;
$usud_id = $ids->usud_id;
$uni_id = $ids->uni_id;
$uni_par = $ids->uni_par;
$uni_cod = $ids->uni_cod;
$str_telefono = $ids->str_telefono;
$str_id = $ids->str_id;
$str_fecha = $ids->str_fecha;
$str_direccion = $ids->str_direccion;
$uni_descripcion = $ids->uni_descripcion;
}
$usuarioOrigen = $usua->obtenerNombre($usu_id);
$usuarioDestino = $usua->obtenerNombre($usud_id);
$fond = $subfondo->obtenerfon($usu_id);
$ob_seccion = $seccion->obtenerSeccion($uni_id);
$cadena = "";
$cadena .= '<table width="740" border="1">';
$cadena .= '<tr>';
$cadena .= '<td colspan="10" align="center" ><b>';
$cadena .= 'FORMULARIO DE RELACION DE TRANSFERENCIAS</b><br /></td>';
$cadena .= '</tr>';
$cadena .= '<tr>';
$cadena .= '<td colspan="9" align="right" style=border:none ><b>';
$cadena .= 'Nro. de transferencia:</b></td><td align="center">' . $str_id . '</td>';
$cadena .= '</tr>';
$cadena .= '<tr>';
$cadena .= '<td colspan="5">';
$cadena .= '<b>Subfondo:</b> ' . $fond . '<br />';
$cadena .= '<b>Sección:</b> ';
$explode = explode(".", $uni_cod);
$contado = count($explode);
$codigo = "";
for ($t = 0; $t < $contado - 1; $t++) {
$codigo .= $explode[$t];
if ($t < $contado - 2) {
$codigo .= ".";
}
}
$codigo2 = $codigo;
if (strlen($codigo) == 1) {
$codigo = $codigo . ".0";
} else {
$estraer_codigo = explode(".", $codigo);
$codigo = $estraer_codigo[0] . ".0";
}
$tab_unidad = new Tab_unidad();
$unidad = new unidad();
$sqlUni2 = "SELECT\r\n tab_unidad.uni_descripcion\r\n FROM\r\n tab_unidad\r\n WHERE\r\n tab_unidad.uni_cod = '{$codigo}'";
$codigoss = explode(".", $codigo2);
$cantcodigo2 = count($codigoss);
if ($cantcodigo2 == 1) {
$codigo2 = "{$codigo2}.1";
}
$sqlUni1 = "SELECT\r\n tab_unidad.uni_descripcion\r\n FROM\r\n tab_unidad\r\n WHERE\r\n tab_unidad.uni_cod = '{$codigo2}'";
$resultadott = $tab_unidad->dbSelectBySQL($sqlUni2);
$resultadott1 = $tab_unidad->dbSelectBySQL($sqlUni1);
$ca1 = "";
foreach ($resultadott1 as $rowss2) {
$ca1 = $rowss2->uni_descripcion;
}
foreach ($resultadott as $rowss) {
$ca = $rowss->uni_descripcion;
}
$variable = $ca;
$excluirparent = explode("(", $variable);
if ($excluirparent[1] == "") {
$ca = $ca;
} else {
$excluirultimoparent = $excluirparent[1] . "x";
$imprimir_descripcion = explode(")", $excluirultimoparent);
$ca = $imprimir_descripcion[0];
}
$ca = $unidad->obtenerPadre($uni_par, $uni_descripcion);
$cadena .= $ca;
$cadena .= '<br><b>Subsección:</b> ';
$cadena .= $ca1;
$cadena .= '</td>';
$cadena .= '<td colspan="5" >';
$cadena .= '<br /><b>Teléfono:</b> ' . $str_telefono . '</td>';
$cadena .= '</tr>';
$cadena .= '<tr>';
$cadena .= '<td width="20" rowspan="2" align="center" bgcolor="#CCCCCC"><strong>Nro.</strong></td>';
$cadena .= '<td width="125" colspan="2" rowspan="2" style="text-align:center" bgcolor="#CCCCCC"><strong>Serie/Subserie</strong></td>';
$cadena .= '<td width="225" rowspan="2" style="text-align:center" bgcolor="#CCCCCC"><strong>Título del Expediente</strong></td>';
$cadena .= '<td width="90" rowspan="2" style="text-align:center" bgcolor="#CCCCCC"><strong>Código de Referencia</strong></td>';
$cadena .= '<td width="100" colspan="2" style="text-align:center" bgcolor="#CCCCCC"><strong>Fechas extremas</strong></td>';
$cadena .= '<td width="40" rowspan="2" bgcolor="#CCCCCC" style="font-size:25px"><strong >Nro.Doc.</strong></td>';
$cadena .= '<td width="40" rowspan="2" bgcolor="#CCCCCC"><strong>Cajas</strong></td>';
$cadena .= '<td width="100" rowspan="2" style="text-align:center" bgcolor="#CCCCCC"><p><strong>Obs.</strong></p></td>';
$cadena .= '</tr>';
$cadena .= '<tr>';
$cadena .= '<td width="50" style="text-align:center" bgcolor="#CCCCCC"><strong>Inicio</strong></td>';
$cadena .= '<td width="50" style="text-align:center" bgcolor="#CCCCCC"><strong>Final</strong></td>';
$cadena .= '</tr>';
$sum = 0;
$i = 1;
$cant = 0;
foreach ($query as $row) {
$tabserie = new tab_series();
if ($row->exp_fecha_exi == "") {
$fei = "";
} else {
$fechainicial = explode("-", $row->exp_fecha_exi);
$fei = $fechainicial[2] . "/" . $fechainicial[1] . "/" . $fechainicial[0];
}
if ($row->exp_fecha_exf == "") {
$fef = "";
} else {
$fechafinal = explode("-", $row->exp_fecha_exf);
$fef = $fechafinal[2] . "/" . $fechafinal[1] . "/" . $fechafinal[0];
}
$cadena .= '<tr>';
$cadena .= '<td align="center">' . $i . '</td>';
$cadena .= '<td colspan="2" style="font-size:22px">';
$cadena .= $row->ser_categoria;
$expsum = $expedientes->cantidadExpedientes($row->exp_id);
$cant = $cant + $expsum;
$cadena .= '</td>';
$cadena .= '<td align="left" style="font-size:22px">' . htmlentities($row->exp_titulo, ENT_COMPAT, 'utf-8') . '</td>';
$cadena .= '<td align="center" style="font-size:22px">' . $row->codigo . '</td>';
$cadena .= '<td align="center" style="font-size:22px">' . $row->exp_anioi . '</td>';
$cadena .= '<td align="center" style="font-size:22px">' . $row->exp_aniof . '</td>';
$cadena .= '<td align="center" style="font-size:22px">' . $expsum . '</td>';
$cadena .= '<td align="center"></td>';
$cadena .= '<td style="font-size:22px">' . $row->exp_obs . '</td>';
$cadena .= '</tr>';
$i++;
}
$cadena .= '<tr>';
$cadena .= '<td colspan="6" align="right" >TOTAL</td>';
$cadena .= '<td align="center"></td>';
$cadena .= '<td align="center">' . $cant . '</td>';
$cadena .= '<td></td>';
$cadena .= '<td> </td>';
$cadena .= '</tr>';
$cadena .= '</table>';
$fecha = explode("-", $str_fecha);
$anio = $fecha[0];
$mes = $fecha[1];
$dia = $fecha[2];
switch ($mes) {
case 1:
$mes = "Enero";
break;
case 2:
$mes = "Febrero";
break;
case 3:
$mes = "Marzo";
break;
case 4:
$mes = "Abril";
break;
case 5:
$mes = "Mayo";
break;
case 6:
$mes = "Junio";
break;
case 7:
$mes = "Julio";
break;
case 8:
$mes = "Agosto";
break;
case 9:
$mes = "Septiembre";
break;
case 10:
$mes = "Octubre";
break;
case 11:
$mes = "Noviembre";
break;
case 12:
$mes = "Diciembre";
break;
}
$cadena .= '<b>Lugar y fecha de la transferencia:</b> ' . $str_direccion . ' ' . $dia . ' de ' . $mes . ' de ' . $anio;
$cadena2 = "";
$cadena2 .= '<table width="740" border="0">';
$cadena2 .= '<tr>';
$cadena2 .= '<td width="100" height="65" ></td><td width="160" align="center" >';
$cadena2 .= '<h4 style="border-top:1px solid black">Archivista Remitente<br>' . $usuarioOrigen . '</h4>';
$cadena2 .= '</td><td width="100"></td>';
$cadena2 .= '<td width="100" ></td><td width="150" align="center">';
$cadena2 .= '<h4 style="border-top:1px solid black">Archivista de Recepción<br>' . $usuarioDestino . '</h4></td>';
$cadena2 .= '<td width="100"></td></tr>';
$cadena2 .= '<tr>';
$cadena2 .= '<td width="100" height="65" ></td><td width="160" align="center" >';
$cadena2 .= '<h4 style="border-top:1px solid black">Autoridad<br>Unidad Remitente</h4>';
$cadena2 .= '</td><td width="100"></td>';
$cadena2 .= '<td width="100" ></td><td width="150" align="center">';
$cadena2 .= '<h4 style="border-top:1px solid black">SGE / DOC<br></h4></td>';
$cadena2 .= '<td width="100"></td></tr>';
$cadena2 .= '</table>';
$cadena = $cadena . $cadena2;
echo $cadena;
}
function clonar_view()
{
if (!VAR3) {
die("Error del sistema 404");
}
// Clonar serie del sistema de información
$this->usuario = new usuario();
$adm = $this->usuario->esAdm();
$departamento = new departamento();
$this->registry->template->dep_id = $departamento->obtenerSelect();
$unidad = new unidad();
//$this->registry->template->uni_id = $unidad->obtenerSelect();
$this->registry->template->uni_id = "";
$serie = new series();
$tipo_corr = new tipocorr();
$retensiondoc = new retensiondoc();
$fondo = new fondo();
$this->registry->template->adm = $adm;
$this->registry->template->delimiter = DELIMITER;
// Clonacion de serie
$this->registry->template->serclon_id = VAR3;
$this->registry->template->ser_id = "";
$this->registry->template->fon_id = $fondo->obtenerSelectFondos();
//$this->registry->template->ser_par = $serie->obtenerSelectTodas();
$this->registry->template->ser_par = "";
$this->registry->template->ser_categoria = "";
$this->registry->template->ser_tipo = "N";
$this->registry->template->ser_codigop = "";
$this->registry->template->ser_codigo = "";
$this->registry->template->titulo = "Nueva ";
$this->registry->template->tco_id = $tipo_corr->obtenerSelect();
$this->registry->template->red_id = $retensiondoc->obtenerSelect();
$this->registry->template->fon_cod = "";
$this->registry->template->uni_cod = "";
$this->registry->template->tco_codigo = "";
$this->registry->template->ser_contador = "0";
$this->registry->template->ser_corr = "<OPTION>AUTO</OPTION><OPTION>MANUAL</OPTION>";
$this->registry->template->ser_exp = "0";
$tramiteSerie = new tab_tramite();
$tramites = $tramiteSerie->dbSelectBySQL("SELECT * FROM tab_tramite\r\n WHERE tra_estado = '1' ORDER BY tra_descripcion ASC ");
$tramiteTr = "";
$i = 0;
if (count($tramites)) {
foreach ($tramites as $tramite) {
$tramiteTr .= "<tr><td><input type='checkbox' class='' name='tramite[{$i}]' value='" . $tramite->tra_id . "' /></td><td>" . $tramite->tra_descripcion . "</td></tr>\n";
$i++;
}
} else {
$tramiteTr = "<tr><td colspan='2'>No existen tramites</td></tr>";
}
$this->registry->template->LISTA_TRAMITES = $tramiteTr;
$this->registry->template->LISTA_TRAMITES_SELECT = "";
$this->menu = new menu();
$this->liMenu = $this->menu->imprimirMenu(VAR1, $_SESSION['USU_ID']);
$this->registry->template->men_titulo = $this->liMenu;
$this->registry->template->PATH_WEB = PATH_WEB;
$this->registry->template->PATH_DOMAIN = PATH_DOMAIN;
$this->registry->template->PATH_EVENT = "save_clon";
$this->registry->template->GRID_SW = "false";
$this->registry->template->PATH_J = "jquery-1.4.1";
$this->registry->template->show('headerG');
$this->registry->template->show('tab_series.tpl');
$this->registry->template->show('footer');
}
function VerRTransferencia()
{
$filtro_serie = $_REQUEST['filtro_serie'];
$filtro_unidad = $_REQUEST['filtro_unidad'];
$filtro_funcionario = $_REQUEST['filtro_funcionario'];
$f_prestdesde = $_REQUEST['f_prestdesde'];
$f_presthasta = $_REQUEST['f_presthasta'];
$where = "";
$tab_extransferencia = new tab_exptransferencia();
$result = $tab_extransferencia->dbSelectBySQL("select DISTINCT(exp_id) from tab_exptransferencia");
$cantidad = count($result);
$valor3 = "";
$t = 1;
foreach ($result as $row) {
$valor3 .= "tab_expediente.exp_id={$row->exp_id}";
if ($t < $cantidad) {
$valor3 .= " or ";
}
$t++;
}
$where .= " AND {$valor3} ";
if ($filtro_serie != "") {
$where .= " AND tab_series.ser_id=" . $filtro_serie;
}
if ($filtro_unidad != "") {
$where .= " AND tab_soltransferencia.uni_id=" . $filtro_unidad;
}
if ($filtro_funcionario != "") {
$where .= " AND tab_soltransferencia.usu_id=" . $filtro_funcionario;
}
$sql = "SELECT\r\ntab_fondo.fon_codigo,\r\ntab_expediente.exp_codigo,\r\ntab_soltransferencia.str_id,\r\ntab_soltransferencia.str_fecha,\r\ntab_soltransferencia.uni_id,\r\ntab_soltransferencia.unid_id,\r\ntab_soltransferencia.str_nrocajas,\r\ntab_soltransferencia.str_totpzas,\r\ntab_soltransferencia.str_totml,\r\ntab_soltransferencia.str_nroreg,\r\ntab_soltransferencia.str_fecini,\r\ntab_soltransferencia.str_fecfin,\r\ntab_soltransferencia.str_estado,\r\ntab_soltransferencia.usu_id,\r\ntab_soltransferencia.usud_id,\r\ntab_soltransferencia.str_direccion,\r\ntab_soltransferencia.str_telefono,\r\ntab_expisadg.exp_fecha_exi,\r\ntab_expisadg.exp_fecha_exf,\r\ntab_series.ser_codigo,\r\ntab_unidad.uni_codigo,\r\ntab_fondo.fon_cod,\r\ntab_series.ser_categoria,\r\ntab_expisadg.exp_titulo,\r\ntab_expediente.exp_obs,\r\ntab_series.ser_id,\r\ntab_series.ser_par,\r\ntab_expediente.exp_id\r\nFROM\r\ntab_unidad\r\nINNER JOIN tab_fondo ON tab_unidad.fon_id = tab_fondo.fon_id\r\nINNER JOIN tab_series ON tab_series.uni_id = tab_unidad.uni_id\r\nINNER JOIN tab_expediente ON tab_expediente.ser_id = tab_series.ser_id\r\nINNER JOIN tab_expisadg ON tab_expisadg.exp_id = tab_expediente.exp_id\r\nINNER JOIN tab_exptransferencia ON tab_expediente.exp_id = tab_exptransferencia.exp_id\r\nINNER JOIN tab_soltransferencia ON tab_soltransferencia.str_id = tab_exptransferencia.str_id\r\nWHERE\r\ntab_soltransferencia.str_estado = 2 AND\r\ntab_expediente.exp_estado = 1 " . $where . " ORDER BY tab_soltransferencia.str_id";
$usua = new usuario();
$subfondo = new fondo();
$seccion = new unidad();
$expedientes = new expediente();
$archivo = new tab_archivo();
$archivo2 = new tab_archivo();
$query = $archivo->dbSelectBySQL($sql);
$query2 = $archivo2->dbSelectBySQL($sql);
$query2 = $query2[0];
$usuarioOrigen = $usua->obtenerNombre($query2->usu_id);
$usuarioDestino = $usua->obtenerNombre($query2->usud_id);
$fond = $subfondo->obtenerfon($query2->usu_id);
$cadena = "";
$cadena = "<br/><br/><br/><br/><br/><br/><br/>";
$cadena .= '<b>Cuadro 8. Formulario Normalizado de Transferencias</b>';
$cadena .= '<br/><br/>';
$cadena .= '<table width="740" border="1">';
$cadena .= '<tr>';
$cadena .= '<td colspan="10" align="center"><b>ADMINISTRADORA BOLIVIANA DE CARRETERAS</b><br />';
$cadena .= 'Formulario de Relacion de Transferencias<br /></td>';
$cadena .= '</tr></table>';
$i = 1;
foreach ($query as $row) {
$tabserie = new tab_series();
$cadena .= '<table border="1" width="740"><tr>';
$cadena .= '<td colspan="5"><blockquote>';
$cadena .= '<b>Subfondo:</b> ' . $fond . '<br />';
$cadena .= '<b>Sección:</b> ';
$ob_seccion = $seccion->obtenerSeccion($row->usu_id);
if ($ob_seccion->tab_sec == "") {
$cadena .= $ob_seccion->uni_descripcion . '<br />';
} else {
$cadena .= $ob_seccion->tab_sec . '<br />';
}
$cadena .= '<b>Subsección:</b> ';
if ($ob_seccion->tab_sec != "") {
$cadena .= $ob_seccion->uni_descripcion;
}
$cadena .= '</blockquote></td>';
$cadena .= '<td colspan="5" ><blockquote><b>Nº de transferencia:</b> ' . $row->str_id;
$cadena .= '<br /><b>Dirección y Teléfono:</b> ' . $row->str_direccion . ' ' . $row->str_telefono . '</blockquote></td>';
$cadena .= '</tr>';
$cadena .= '<tr>';
$cadena .= '<td width="20" rowspan="2" align="center"><strong>Nº</strong></td>';
$cadena .= '<td width="140" rowspan="2"><strong>Serie</strong></td>';
$cadena .= '<td width="120" rowspan="2"><strong>Subserie</strong></td>';
$cadena .= '<td width="80" rowspan="2"><strong>Código de Referencia</strong></td>';
$cadena .= '<td colspan="2" width="130"><strong>Fechas extremas</strong></td>';
$cadena .= '<td width="30" rowspan="2"><strong>Nº Piezas Docum.</strong></td>';
$cadena .= '<td width="30" rowspan="2"><strong>Cajas</strong></td>';
$cadena .= '<td width="30" rowspan="2"><strong>M.L.</strong></td>';
$cadena .= '<td width="160" rowspan="2"><p><strong>Observ.</strong></p></td>';
$cadena .= '</tr>';
$cadena .= '<tr>';
$cadena .= '<td width="65"><strong>Inicio</strong></td>';
$cadena .= '<td width="65"><strong>Final</strong></td>';
$cadena .= '</tr>';
$sum = 0;
$sum2 = 0;
if ($row->exp_fecha_exi == "") {
$fei = "";
} else {
$fechainicial = explode("-", $row->exp_fecha_exi);
$fei = $fechainicial[2] . "/" . $fechainicial[1] . "/" . $fechainicial[0];
}
if ($row->exp_fecha_exf == "") {
$fef = "";
} else {
$fechafinal = explode("-", $row->exp_fecha_exf);
$fef = $fechafinal[2] . "/" . $fechafinal[1] . "/" . $fechafinal[0];
}
if ($row->ser_par == "") {
$ser_id = 0;
} else {
$ser_id = $row->ser_par;
}
$obtenerSubserie = $tabserie->dbselectByField("ser_id", $ser_id);
$u = 0;
foreach ($obtenerSubserie as $ver) {
$u++;
$cte = $ver->ser_categoria;
}
$cadena .= '<tr>';
$cadena .= '<td align="center">' . $i . '</td>';
$cadena .= '<td>';
if ($u == 0) {
$cadena .= $row->ser_categoria;
} else {
$cadena .= $cte;
}
$cadena .= '</td>';
$cadena .= '<td>';
if ($u != 0) {
$cadena .= $row->ser_categoria;
}
$sum = $sum + $expedientes->cantidadExpedientes($row->exp_id);
$sum2 = $sum2 + $row->str_nrocajas;
$cadena .= '</td>';
$cadena .= '<td align="center">' . $row->fon_codigo . DELIMITER . $row->uni_codigo . DELIMITER . $row->ser_codigo . DELIMITER . $row->exp_codigo . '</td>';
$cadena .= '<td align="center">' . $fei . '</td>';
$cadena .= '<td align="center">' . $fef . '</td>';
$cadena .= '<td align="center">' . $expedientes->cantidadExpedientes($row->exp_id) . '</td>';
$cadena .= '<td align="center">' . $row->str_nrocajas . '</td>';
$cadena .= '<td align="center">' . $row->str_totml . '</td>';
$cadena .= '<td>' . $row->exp_obs . '</td>';
$cadena .= '</tr>';
$i++;
$cadena .= '</table><br><br>';
}
require_once 'tcpdf/config/lang/eng.php';
require_once 'tcpdf/tcpdf.php';
$pdf = new TCPDF('L', PDF_UNIT, 'LETTER', true, 'UTF-8', false);
$pdf->SetCreator(PDF_CREATOR);
$pdf->setFontSubsetting(FALSE);
$pdf->SetAuthor("Castellon");
$pdf->SetTitle('Reporte de Transferencia');
$pdf->SetSubject('Reporte de Transferencia');
// aumentado
$pdf->SetKeywords('Castellon, TEAM DIGITAL');
// set default header data
$pdf->SetHeaderData('logo2.png', 20, 'MPD', 'ADMINISTRADORA BOLIVIANA DE CARRETERAS (MPD)');
// set header and footer fonts
$pdf->setHeaderFont(array(PDF_FONT_NAME_MAIN, '', PDF_FONT_SIZE_MAIN));
// $pdf->setFooterFont(Array(PDF_FONT_NAME_DATA, '', PDF_FONT_SIZE_DATA));
//
$pdf->SetDefaultMonospacedFont(PDF_FONT_MONOSPACED);
$pdf->SetMargins(5, 30, 10);
$pdf->SetHeaderMargin(PDF_MARGIN_HEADER);
// $pdf->setPrintHeader(false);
$pdf->setPrintFooter(false);
//set auto page breaks
$pdf->SetAutoPageBreak(TRUE, 14);
// $pdf->setImageScale(PDF_IMAGE_SCALE_RATIO);
//set some language-dependent strings
$pdf->setLanguageArray($l);
$pdf->SetFont('helvetica', '', 10);
// add a page
$pdf->AddPage();
// $pdf->SetXY(110, 200);
$pdf->Image(PATH_ROOT . '/web/img/iso.png', '255', '8', 15, 15, 'PNG', '', 'T', false, 300, '', false, false, 1, false, false, false);
$cadena = $cadena;
$pdf->writeHTML($cadena, true, false, false, false, '');
// -----------------------------------------------------------------------------
//Close and output PDF document
// $pdf->Output('reporte_transferencia.pdf', 'D');
$pdf->Output('reporte_transferencia.pdf', 'I');
}
function validaDepen()
{
$fondo = new fondo();
$swDepen = $fondo->validaDependencia($_REQUEST['fon_id']);
if ($swDepen != 0) {
echo 'No se puede eliminar el fondo. Tiene subfondos, secciones, series o expedientes';
} else {
echo '';
}
}
