function update()
{
$this->expediente = new tab_expediente();
$this->expediente->setRequest2Object($_REQUEST);
$rows2 = $this->expediente->dbselectByField("exp_id", $_REQUEST['exp_id']);
$row2 = $rows2[0];
$exp_id = $row2->exp_id;
// $this->expediente->setExp_id($_REQUEST['exp_id']);
$this->expediente->setExp_id($row2->exp_id);
$this->expediente->setSer_id($_REQUEST['ser_id']);
if ($_REQUEST['ser_corr'] == 'AUTO') {
$this->expediente->setExp_codigo($_REQUEST['exp_codigo']);
} else {
$this->expediente->setExp_codigo($_REQUEST['exp_codigo']);
}
$this->expediente->setExp_lugar(strtoupper($_REQUEST['exp_lugar']));
$this->expediente->setSof_id($_REQUEST['sof_id']);
$this->expediente->setExp_nrofoj(strtoupper($_REQUEST['exp_nrofoj']));
$this->expediente->setExp_tomovol(strtoupper($_REQUEST['exp_tomovol']));
$this->expediente->setExp_nroejem(strtoupper($_REQUEST['exp_nroejem']));
$this->expediente->setExp_nrocaj(strtoupper($_REQUEST['exp_nrocaj']));
$this->expediente->setExp_sala(strtoupper($_REQUEST['exp_sala']));
$this->expediente->setExp_estante(strtoupper($_REQUEST['exp_estante']));
$this->expediente->setExp_cuerpo(strtoupper($_REQUEST['exp_cuerpo']));
$this->expediente->setExp_balda(strtoupper($_REQUEST['exp_balda']));
if ($_REQUEST['exp_ori']) {
$this->expediente->setExp_ori($_REQUEST['exp_ori']);
} else {
$this->expediente->setExp_ori(0);
}
if ($_REQUEST['exp_cop']) {
$this->expediente->setExp_cop($_REQUEST['exp_cop']);
} else {
$this->expediente->setExp_cop(0);
}
if ($_REQUEST['exp_fot']) {
$this->expediente->setExp_fot($_REQUEST['exp_fot']);
} else {
$this->expediente->setExp_fot(0);
}
$this->expediente->setExp_obs($_REQUEST['exp_obs']);
$this->expediente->setExp_corr($_REQUEST['exp_corr']);
$this->expediente->setExp_estado(1);
$this->expediente->setExp_mexcel(0);
$this->expediente->update2();
// isadg
$this->tab_expisadg = new tab_expisadg();
$rows = $this->tab_expisadg->dbselectByField("exp_id", $_REQUEST['exp_id']);
$row = $rows[0];
$this->tab_expisadg->setEig_id($row->eig_id);
$this->tab_expisadg->setExp_id($_REQUEST['exp_id']);
$this->tab_expisadg->setExp_titulo(strtoupper(trim($_REQUEST['exp_titulo'])));
if ($_REQUEST['exp_anioi'] == "") {
$anioi = " ";
} else {
$anioi = $_REQUEST['exp_anioi'];
}
if ($_REQUEST['exp_aniof'] == "") {
$aniof = " ";
} else {
$aniof = $_REQUEST['exp_aniof'];
}
if ($_REQUEST['exp_mesi'] == "") {
$mesi = " ";
} else {
$mesi = $_REQUEST['exp_mesi'];
}
if ($_REQUEST['exp_mesf'] == "") {
$mesf = " ";
} else {
$mesf = $_REQUEST['exp_mesf'];
}
$this->tab_expisadg->setExp_fecha_exi($_REQUEST['exp_fecha_exi']);
$this->tab_expisadg->setExp_mesi($mesi);
$this->tab_expisadg->setExp_anioi($anioi);
$this->tab_expisadg->setExp_fecha_exf($_REQUEST['exp_fecha_exf']);
$this->tab_expisadg->setExp_mesf($mesf);
$this->tab_expisadg->setExp_aniof($aniof);
$this->tab_expisadg->setExp_volsop(strtoupper(trim($_REQUEST['exp_volsop'])));
$this->tab_expisadg->setExp_nomprod(strtoupper(trim($_REQUEST['exp_nomprod'])));
$this->tab_expisadg->setExp_hisins(strtoupper(trim($_REQUEST['exp_hisins'])));
$this->tab_expisadg->setExp_hisarc(strtoupper(trim($_REQUEST['exp_hisarc'])));
$this->tab_expisadg->setExp_foring(strtoupper(trim($_REQUEST['exp_foring'])));
$this->tab_expisadg->setExp_alccon(strtoupper(trim($_REQUEST['exp_alccon'])));
$this->tab_expisadg->setExp_vaseel(strtoupper(trim($_REQUEST['exp_vaseel'])));
$this->tab_expisadg->setExp_nueing(strtoupper(trim($_REQUEST['exp_nueing'])));
$this->tab_expisadg->setExp_org(strtoupper(trim($_REQUEST['exp_org'])));
$this->tab_expisadg->setExp_conacc(strtoupper(trim($_REQUEST['exp_conacc'])));
$this->tab_expisadg->setExp_conrep(strtoupper(trim($_REQUEST['exp_conrep'])));
$this->tab_expisadg->setIdi_id($_REQUEST['idi_id']);
$this->tab_expisadg->setExp_carfis(strtoupper(trim($_REQUEST['exp_carfis'])));
$this->tab_expisadg->setExp_insdes(strtoupper(trim($_REQUEST['exp_insdes'])));
$this->tab_expisadg->setExp_exloor(strtoupper(trim($_REQUEST['exp_exloor'])));
$this->tab_expisadg->setExp_exloco(strtoupper(trim($_REQUEST['exp_exloco'])));
$this->tab_expisadg->setExp_underel(strtoupper(trim($_REQUEST['exp_underel'])));
$this->tab_expisadg->setExp_notpub(strtoupper(trim($_REQUEST['exp_notpub'])));
$this->tab_expisadg->setExp_notas(strtoupper(trim($_REQUEST['exp_notas'])));
$this->tab_expisadg->setExp_notarc(strtoupper(trim($_REQUEST['exp_notarc'])));
$this->tab_expisadg->setExp_regnor(strtoupper(trim($_REQUEST['exp_regnor'])));
$this->tab_expisadg->setExp_estado(1);
$this->tab_expisadg->update();
// Update dynamic data
$expcampo = new expcampo();
$rows3 = $expcampo->obtenerCampos($_REQUEST['ser_id']);
if (count($rows3) > 0) {
foreach ($rows3 as $val) {
if ($val->ecp_tipdat == 'Lista') {
$ecp_id = $val->ecp_id;
$ecp_valor = $_REQUEST[$ecp_id];
$expcampovalor = new expcampovalor();
$ecv_id = $expcampovalor->obtenerIdCampoValorporExpediente($ecp_id, $exp_id);
if ($ecv_id == 0) {
$this->expcampovalor = new tab_expcampovalor();
$this->expcampovalor->setExp_id($exp_id);
$this->expcampovalor->setEcp_id($ecp_id);
$this->expcampovalor->setEcl_id($ecp_valor);
$this->expcampovalor->setEcv_valor($ecp_valor);
$this->expcampovalor->setEcv_estado(1);
$this->expcampovalor->insert();
} else {
$this->expcampovalor = new tab_expcampovalor();
$this->expcampovalor->setEcv_id($ecv_id);
$this->expcampovalor->setExp_id($exp_id);
$this->expcampovalor->setEcp_id($ecp_id);
$this->expcampovalor->setEcl_id($ecp_valor);
$this->expcampovalor->setEcv_valor($ecp_valor);
$this->expcampovalor->setEcv_estado(1);
$this->expcampovalor->update();
}
} else {
$ecp_id = (string) $val->ecp_id;
$ecp_valor = $_REQUEST[$ecp_id];
$expcampovalor = new expcampovalor();
$ecv_id = $expcampovalor->obtenerIdCampoValorporExpediente($ecp_id, $exp_id);
if ($ecv_id == 0) {
$this->expcampovalor = new tab_expcampovalor();
$this->expcampovalor->setExp_id($exp_id);
$this->expcampovalor->setEcp_id($ecp_id);
$this->expcampovalor->setEcv_valor($ecp_valor);
$this->expcampovalor->setEcv_estado(1);
$this->expcampovalor->insert();
} else {
$this->expcampovalor = new tab_expcampovalor();
$this->expcampovalor->setEcv_id($ecv_id);
$this->expcampovalor->setExp_id($exp_id);
$this->expcampovalor->setEcp_id($ecp_id);
$this->expcampovalor->setEcv_valor($ecp_valor);
$this->expcampovalor->setEcv_estado(1);
$this->expcampovalor->update();
}
}
}
}
$expusuario = new tab_expusuario();
$row4 = $expusuario->dbselectByField("exp_id", $_REQUEST['exp_id']);
if (count($row4) == 0) {
$this->expusuario = new Tab_expusuario();
$this->expusuario->eus_id = '';
$this->expusuario->exp_id = $_REQUEST['exp_id'];
$this->expusuario->usu_id = $_SESSION['USU_ID'];
$this->expusuario->eus_fecha_crea = date("Y-m-d");
$this->expusuario->eus_estado = '1';
$this->expusuario->insert();
}
// Keywords
$this->palclave = new tab_palclave();
$this->palclave->deleteByField("exp_id", $exp_id);
if (!empty($_REQUEST['exp_descripcion'])) {
$pac_nombre = trim($_REQUEST['exp_descripcion']);
$array = explode(SEPARATOR_SEARCH, $pac_nombre);
for ($j = 0; $j < count($array); $j++) {
if ($array[$j] != '') {
$this->palclave->setExp_id($exp_id);
$this->palclave->setPac_nombre(strtoupper(trim($array[$j])));
$this->palclave->setPac_formulario('Expediente');
$this->palclave->setPac_estado(1);
$this->palclave->insert();
}
}
}
if ($_REQUEST['accion'] == 'guardarsinsalir') {
$msm_guardado_archivo = 1;
Header("Location: " . PATH_DOMAIN . "/expediente/view/" . $_REQUEST['exp_id'] . "/" . $msm_guardado_archivo . "/");
} else {
if ($_REQUEST['accion'] == 'guardarnuevo') {
$_SESSION['SER_ID'] = $_REQUEST['ser_id'];
$this->add();
} else {
if ($_REQUEST['accion'] == 'guardar') {
Header("Location: " . PATH_DOMAIN . "/expediente/index/");
} else {
Header("Location: " . PATH_DOMAIN . "/expediente/index/");
}
}
}
}
function verRpteDoc()
{
$filtro_expediente = $_REQUEST["exp_id"];
$filtro_serie = $_REQUEST["ser_id"];
$where = "";
//PARA LA ORDENACION SOLO SE ESCOJE UNA OPCION
$order_by = "";
$order_by .= " ORDER BY tab_archivo.fil_codigo, tab_archivo.fil_titulo ASC ";
//PARA LOS FILTROS
if ($filtro_expediente != '') {
$where .= " AND tab_expediente.exp_id = '{$filtro_expediente}' ";
}
$sqlh = "SELECT\r\n fonp.fon_descripcion as fondes,\r\n tab_fondo.fon_descripcion,\r\n sec.uni_descripcion AS seccion,\r\n\t\ttab_fondo.fon_cod,\r\n tab_unidad.uni_cod,\r\n tab_tipocorr.tco_codigo,\r\n tab_series.ser_codigo,\r\n tab_expediente.exp_codigo,\r\n tab_unidad.uni_descripcion,\r\n tab_unidad.uni_codigo,\r\n tab_rol.rol_titulo,\r\n tab_rol.rol_cod,\r\n tab_series.ser_categoria,\r\n tab_expisadg.exp_titulo,\r\n (SELECT COUNT (DISTINCT arc.fil_nrocaj)\r\n FROM tab_archivo as arc INNER JOIN\r\n tab_exparchivo AS exa ON arc.fil_id = exa.fil_id\r\n WHERE exa.exp_id = tab_expediente.exp_id) AS totcja,\r\n (SELECT COUNT (arc.fil_id) FROM tab_archivo as arc INNER JOIN\r\n tab_exparchivo AS exa ON arc.fil_id = exa.fil_id\r\n WHERE exa.exp_id = tab_expediente.exp_id) AS totpzs,\r\n (SELECT (COUNT (DISTINCT arc.fil_nrocaj))* 0.32\r\n FROM tab_archivo as arc INNER JOIN\r\n tab_exparchivo AS exa ON arc.fil_id = exa.fil_id\r\n WHERE exa.exp_id = tab_expediente.exp_id) AS totml,\r\n (SELECT MIN (isad.exp_fecha_exi)\r\n FROM tab_expediente as exp INNER JOIN\r\n tab_expisadg AS isad ON exp.exp_id = isad.exp_id INNER JOIN\r\n tab_expusuario AS use ON exp.exp_id = use.exp_id\r\n WHERE exp.ser_id = tab_series.ser_id AND use.usu_id = tab_usuario.usu_id AND use.eus_estado = 1) AS fechaini,\r\n (SELECT MAX (isad.exp_fecha_exf)\r\n FROM tab_expediente as exp INNER JOIN\r\n tab_expisadg AS isad ON exp.exp_id = isad.exp_id INNER JOIN\r\n tab_expusuario AS use ON exp.exp_id = use.exp_id\r\n WHERE exp.ser_id = tab_series.ser_id AND use.usu_id = tab_usuario.usu_id AND use.eus_estado = 1) AS fechafin\r\n FROM\r\n\t\t\t\t\t\t\t\ttab_expediente\r\n INNER JOIN tab_expisadg ON tab_expediente.exp_id =tab_expisadg.exp_id\r\n INNER JOIN tab_series ON tab_expediente.ser_id = tab_series.ser_id\r\n INNER JOIN tab_tipocorr ON tab_tipocorr.tco_id = tab_series.tco_id\r\n INNER JOIN tab_expusuario ON tab_expediente.exp_id = tab_expusuario.exp_id\r\n INNER JOIN tab_usuario ON tab_expusuario.usu_id = tab_usuario.usu_id\r\n INNER JOIN tab_rol ON tab_usuario.rol_id = tab_rol.rol_id\r\n INNER JOIN tab_unidad ON tab_series.uni_id = tab_unidad.uni_id\r\n INNER JOIN tab_unidad AS sec ON tab_unidad.uni_par = sec.uni_id\r\n INNER JOIN tab_fondo ON sec.fon_id = tab_fondo.fon_id\r\n INNER JOIN tab_fondo as fonp ON tab_fondo.fon_par = fonp.fon_id \r\n WHERE tab_expusuario.eus_estado = 1 " . $where;
$expedienteh = new Tab_expediente();
$resulth = $expedienteh->dbselectBySQL($sqlh);
$cadenah = "<br/><br/><br/><br/><br/><br/><br/><br/>";
if (count($resulth) > 0) {
$cadenah .= '<table width="780" border="0" cellpadding="2">';
$cadenah .= '<tr><td align="center">';
$cadenah .= '<span style="font-size: 24px;">' . $resulth[0]->uni_descripcion . ' (' . $resulth[0]->uni_codigo . ')</span>';
$cadenah .= '</td></tr>';
$cadenah .= '<tr><td align="center">';
$cadenah .= '<span style="font-size: 24px;">' . $resulth[0]->rol_titulo . ' (' . $resulth[0]->rol_cod . ')</span>';
$cadenah .= '</td></tr>';
$cadenah .= '<tr><td align="center">';
$cadenah .= '<span style="font-size: 30px;font-weight: bold;text-decoration: underline;">';
$cadenah .= 'FORMULARIO DE INVENTARIO DE EXPEDIENTES';
$cadenah .= '</span>';
$cadenah .= '</td></tr>';
$cadenah .= '</table>';
$cadenah .= '<br/><br/>';
$cadenah .= '<table width="760" border="1" cellpadding="2">';
$cadenah .= '<tr>';
$cadenah .= '<td width="100" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;"> FONDO:</span></td>';
$cadenah .= '<td width="350"><span style="font-size: 14px;">' . $resulth[0]->fondes . '</span></td>';
$cadenah .= '<td width="90" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;">INSTRUMENTO DE CONSULTA:</span></td>';
$cadenah .= '<td width="220"><span style="font-size: 14px;">INVENTARIO DE DOCUMENTOS</span></td>';
$cadenah .= '</tr>';
$cadenah .= '<tr>';
$cadenah .= '<td width="100" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;">SUB-FONDO:</span></td>';
$cadenah .= '<td width="350"><span style="font-size: 14px;">' . $resulth[0]->fon_descripcion . '</span></td>';
$cadenah .= '<td width="90" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;">TOTAL DE CAJAS:</span></td>';
$cadenah .= '<td width="220"><span style="font-size: 14px;">' . $resulth[0]->totcja . '</span></td>';
$cadenah .= '</tr>';
$cadenah .= '<tr>';
$cadenah .= '<td width="100" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;">SECCIÓN:</span></td>';
$cadenah .= '<td width="350"><span style="font-size: 14px;">' . $resulth[0]->seccion . '</span></td>';
$cadenah .= '<td width="90" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;">TOTAL DE PIEZAS:</span></td>';
$cadenah .= '<td width="220"><span style="font-size: 14px;">' . $resulth[0]->totpzs . '</span></td>';
$cadenah .= '</tr>';
$cadenah .= '<tr>';
$cadenah .= '<td width="100" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;">SUB SECCIÓN:</span></td>';
$cadenah .= '<td width="350"><span style="font-size: 14px;">' . $resulth[0]->uni_descripcion . '</span></td>';
$cadenah .= '<td width="90" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;">TOTAL DE ML:</span></td>';
$cadenah .= '<td width="220"><span style="font-size: 14px;">' . $resulth[0]->totml . '</span></td>';
$cadenah .= '</tr>';
$cadenah .= '<tr>';
$cadenah .= '<td width="100" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;">CÓDIGO DE REFERENCIA:</span></td>';
$cadenah .= '<td width="350"><span style="font-size: 14px;">' . $resulth[0]->fon_cod . DELIMITER . $resulth[0]->uni_cod . DELIMITER . $resulth[0]->tco_codigo . DELIMITER . $resulth[0]->ser_codigo . DELIMITER . $resulth[0]->exp_codigo . '</span></td>';
$cadenah .= '<td width="90" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;">NIVEL DE DESCRIPCIÓN:</span></td>';
$cadenah .= '<td width="220"><span style="font-size: 14px;">UNIDAD DOCUMENTAL SIMPLE</span></td>';
$cadenah .= '</tr>';
$cadenah .= '<tr>';
$cadenah .= '<td width="100" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;">SERIES:</span></td>';
$cadenah .= '<td width="350"><span style="font-size: 14px;">' . $resulth[0]->ser_categoria . '</span></td>';
$cadenah .= '<td width="90" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;">FECHAS EXTREMAS:</span></td>';
$cadenah .= '<td width="220"><span style="font-size: 14px;">' . $resulth[0]->fechaini . '-' . $resulth[0]->fechafin . '</span></td>';
$cadenah .= '</tr>';
$cadenah .= '<tr>';
$cadenah .= '<td width="100" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;">EXPEDIENTE(PROYECTO):</span></td>';
$cadenah .= '<td width="350" ><span style="font-size: 14px;">' . $resulth[0]->exp_titulo . '</span></td>';
$cadenah .= '<td width="90" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;"></span></td>';
$cadenah .= '<td width="220"><span style="font-size: 14px;"></span></td>';
$cadenah .= '</tr>';
/////
//consulta para campos adicionales
$camposc = new expcampo();
$resultdc = $camposc->obtenerSelectCamposRepDoc($filtro_serie, $filtro_expediente);
$cadenah .= $resultdc;
/////
$cadenah .= '</table>';
}
$sql = "SELECT\r\n tab_archivo.fil_nrocaj,\r\n tab_archivo.fil_nroejem,\r\n tab_fondo.fon_cod,\r\n tab_unidad.uni_cod,\r\n tab_tipocorr.tco_codigo,\r\n tab_series.ser_codigo,\r\n tab_expediente.exp_codigo,\r\n tab_archivo.fil_codigo,\r\n tab_departamento.dep_nombre,\r\n tab_archivo.fil_titulo,\r\n tab_archivo.fil_subtitulo,\r\n tab_archivo.fil_proc,\r\n tab_archivo.fil_firma,\r\n tab_expisadg.exp_fecha_exi,\r\n tab_expisadg.exp_fecha_exf,\r\n tab_archivo.fil_tomovol,\r\n tab_archivo.fil_nrofoj,\r\n (SELECT tab_sopfisico.sof_codigo\r\n FROM tab_sopfisico \r\n WHERE tab_sopfisico.sof_id = tab_archivo.sof_id ) as sof_codigo,\r\n tab_archivo.fil_mrb,\r\n tab_archivo.fil_sala,\r\n tab_archivo.fil_estante,\r\n tab_archivo.fil_cuerpo,\r\n tab_archivo.fil_balda,\r\n tab_archivo.fil_obs\r\n FROM\r\n tab_expediente\r\n INNER JOIN tab_expisadg ON tab_expediente.exp_id =tab_expisadg.exp_id\r\n INNER JOIN tab_series ON tab_expediente.ser_id = tab_series.ser_id\r\n INNER JOIN tab_tipocorr ON tab_tipocorr.tco_id = tab_series.tco_id\r\n INNER JOIN tab_expusuario ON tab_expediente.exp_id = tab_expusuario.exp_id\r\n INNER JOIN tab_usuario ON tab_expusuario.usu_id = tab_usuario.usu_id\r\n INNER JOIN tab_rol ON tab_usuario.rol_id = tab_rol.rol_id\r\n INNER JOIN tab_unidad ON tab_series.uni_id = tab_unidad.uni_id\r\n INNER JOIN tab_unidad AS sec ON tab_unidad.uni_par = sec.uni_id\r\n INNER JOIN tab_fondo ON sec.fon_id = tab_fondo.fon_id\r\n INNER JOIN tab_fondo as fonp ON tab_fondo.fon_par = fonp.fon_id\r\n INNER JOIN tab_exparchivo ON tab_expediente.exp_id = tab_exparchivo.exp_id\r\n INNER JOIN tab_archivo ON tab_archivo.fil_id = tab_exparchivo.fil_id\r\n INNER JOIN tab_archivo_digital ON tab_archivo.fil_id = tab_archivo_digital.fil_id\r\n INNER JOIN tab_ubicacion ON tab_unidad.ubi_id = tab_ubicacion.ubi_id\r\n INNER JOIN tab_localidad ON tab_ubicacion.loc_id = tab_localidad.loc_id\r\n INNER JOIN tab_provincia ON tab_localidad.pro_id = tab_provincia.pro_id\r\n INNER JOIN tab_departamento ON tab_provincia.dep_id = tab_departamento.dep_id\r\n WHERE tab_expusuario.eus_estado = 1 " . $where . $order_by;
//
// //echo ($sql); die ();
//
$expediente = new Tab_expediente();
$result = $expediente->dbselectBySQL($sql);
require_once 'tcpdf/config/lang/eng.php';
require_once 'tcpdf/tcpdf.php';
$this->usuario = new usuario();
// create new PDF document
$pdf = new TCPDF('L', PDF_UNIT, 'LETTER', true, 'UTF-8', false);
$pdf->SetCreator(PDF_CREATOR);
$pdf->setFontSubsetting(FALSE);
$pdf->SetAuthor($this->usuario->obtenerNombre($_SESSION['USU_ID']));
$pdf->SetTitle('Reporte de Inventario');
$pdf->SetSubject('Reporte de Inventario');
// 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, 15);
// $pdf->setImageScale(PDF_IMAGE_SCALE_RATIO);
//set some language-dependent strings
$pdf->setLanguageArray($l);
$pdf->SetFont('helvetica', '', 8);
// 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 .= '<table width="760" border="1" cellpadding="2">';
$cadena .= '<tr bgcolor="#CCCCCC">';
$cadena .= '<td colspan="19" align="center" width="700"><span style="font-size: 20px;font-weight: bolder;">�?REA DE IDENTIFICACIÓN</span></td>';
$cadena .= '<td width="80" align="center"><span style="font-size: 20px;font-weight: bolder;">�?REA DE NOTAS</span></td>';
$cadena .= '</tr>';
$cadena .= '<tr bgcolor="#CCCCCC">';
$cadena .= '<td width="25" rowspan="2" align="center"><span style="font-size: 11px ;font-weight: bold;">N de Caja</span></td>';
$cadena .= '<td width="25" rowspan="2" align="center"><span style="font-size: 11px ;font-weight: bold;">Total piezas/cajas</span></td>';
$cadena .= '<td width="25" rowspan="2" align="center"><span style="font-size: 11px ;font-weight: bold;">N ejem.</span></td>';
$cadena .= '<td width="25" rowspan="2" align="center"><span style="font-size: 11px; font-weight: bold;">ML</span></td>';
$cadena .= '<td width="60" rowspan="2" align="center" valign="middle"><span style="font-size: 11px ;font-weight: bold;">N de Orden doc.</span></td>';
$cadena .= '<td width="40" rowspan="2" align="center" valign="middle"><span style="font-size: 11px ;font-weight: bold;">Depto.</span></td>';
$cadena .= '<td width="90" rowspan="2" align="center" valign="middle"><span style="font-size: 11px ;font-weight: bold;">Titulo del Documento</span></td>';
$cadena .= '<td width="70" rowspan="2" align="center" valign="middle"><span style="font-size: 11px ;font-weight: bold;">Sub titulo</span></td>';
$cadena .= '<td width="45" rowspan="2" align="center" valign="middle"><span style="font-size: 11px ;font-weight: bold;">Productor</span></td>';
$cadena .= '<td width="40" rowspan="2" align="center" valign="middle"><span style="font-size: 11px ;font-weight: bold;">Firma</span></td>';
$cadena .= '<td width="35" rowspan="2" align="center" valign="middle"><span style="font-size: 11px ;font-weight: bold;">Fecha</span></td>';
$cadena .= '<td width="125" rowspan="2" align="center" valign="middle"><span style="font-size: 11px ;font-weight: bold;">Tomo/Volumen</span></td>';
$cadena .= '<td width="25" rowspan="2" align="center" valign="middle"><span style="font-size: 11px ;font-weight: bold;">Fojas</span></td>';
$cadena .= '<td width="30" rowspan="2" align="center" valign="middle"><span style="font-size: 11px ;font-weight: bold;">Soporte Físico</span></td>';
$cadena .= '<td width="30" rowspan="2" align="center" valign="middle"><span style="font-size: 11px ;font-weight: bold;">Conser. Doc.</span></td>';
$cadena .= '<td width="100" colspan="4" align="center"><span style="font-size: 11px ;font-weight: bold;">Ubicación Topografica</span></td>';
$cadena .= '<td width="60" rowspan="2" align="center" valign="middle"><span style="font-size: 11px ;font-weight: bold;">Observaciones</span></td>';
$cadena .= '</tr>';
$cadena .= '<tr bgcolor="#CCCCCC">';
$cadena .= '<td width="25" align="center"><span style="font-size: 11px ;font-weight: bold;">Sala</span></td>';
$cadena .= '<td width="25" align="center"><span style="font-size: 11px ;font-weight: bold;">Estante</span></td>';
$cadena .= '<td width="25" align="center"><span style="font-size: 11px ;font-weight: bold;">Cuerpo</span></td>';
$cadena .= '<td width="25" align="center"><span style="font-size: 11px ;font-weight: bold;">Balda</span></td>';
$cadena .= '</tr>';
$numero = 1;
foreach ($result as $fila) {
$cadena .= '<tr>';
$cadena .= '<td width="25"><span style="font-size: 11px;">' . $fila->fil_nrocaj . '</span></td>';
$cadena .= '<td width="25"><span style="font-size: 11px;"></span></td>';
$cadena .= '<td width="25"><span style="font-size: 11px;">' . $fila->fil_nroejem . '</span></td>';
$cadena .= '<td width="25"><span style="font-size: 11px;">0,32</span></td>';
$cadena .= '<td width="60"><span style="font-size: 11px;">' . $fila->fon_cod . DELIMITER . $fila->uni_cod . DELIMITER . $fila->tco_codigo . DELIMITER . $fila->ser_codigo . DELIMITER . $fila->exp_codigo . DELIMITER . $fila->fil_codigo . '</span></td>';
$cadena .= '<td width="40"><span style="font-size: 11px;">' . $fila->dep_nombre . '</span></td>';
$cadena .= '<td width="90"><span style="font-size: 11px;">' . $fila->fil_titulo . '</span></td>';
$cadena .= '<td width="70"><span style="font-size: 11px;">' . $fila->fil_subtitulo . '</span></td>';
$cadena .= '<td width="45"><span style="font-size: 11px;">' . $fila->fil_proc . '</span></td>';
$cadena .= '<td width="40"><span style="font-size: 11px;">' . $fila->fil_firma . '</span></td>';
$cadena .= '<td width="35"><span style="font-size: 11px;">' . $fila->exp_fecha_exi . ' - ' . $fila->exp_fecha_exf . '</span></td>';
$cadena .= '<td width="35"><span style="font-size: 11px;">' . $fila->fil_tomovol . '</span></td>';
$cadena .= '<td width="25"><span style="font-size: 11px;">' . $fila->fil_nrofoj . '</span></td>';
$cadena .= '<td width="30"><span style="font-size: 11px;">' . $fila->sof_codigo . '</span></td>';
$cadena .= '<td width="30"><span style="font-size: 11px;">' . $fila->fil_mrb . '</span></td>';
$cadena .= '<td width="25"><span style="font-size: 11px;">' . $fila->fil_sala . '</span></td>';
$cadena .= '<td width="25"><span style="font-size: 11px;">' . $fila->fil_estante . '</span></td>';
$cadena .= '<td width="25"><span style="font-size: 11px;">' . $fila->fil_cuerpo . '</span></td>';
$cadena .= '<td width="25"><span style="font-size: 11px;">' . $fila->fil_balda . '</span></td>';
$cadena .= '<td width="60"><span style="font-size: 11px;">' . $fila->fil_obs . '</span></td>';
$cadena .= '</tr>';
$numero++;
}
//obtenerSelectCamposRepC
$cadena .= '</table>';
$cadena = $cadenah . $cadena;
$pdf->writeHTML($cadena, true, false, false, false, '');
// -----------------------------------------------------------------------------
//Close and output PDF document
$pdf->Output('reporte_inventario.pdf', 'I');
}
function verRpteXls()
{
header("Content-type: application/vnd.ms-excel; name='excel'");
header("Content-Disposition: filename=inventario_documentos.xls");
header("Pragma: no-cache");
header("Expires: 0");
if (isset($_REQUEST["exp_id2"])) {
$filtro_expediente = $_REQUEST["exp_id2"];
} else {
$filtro_expediente = "";
}
$filtro_serie = $_REQUEST["ser_id2"];
$where = "";
$order_by = "";
$order_by .= " ORDER BY tab_tramite.tra_orden, tab_archivo.fil_nro ASC ";
if ($filtro_expediente != '') {
$where .= " AND tab_expediente.exp_id = '{$filtro_expediente}' ";
}
$sqlh = "SELECT \r\n fonp.fon_descripcion as fondes,\r\n tab_fondo.fon_descripcion,tab_unidad.uni_par,tab_unidad.uni_id,\r\n ( SELECT sec.uni_descripcion\r\n FROM tab_unidad AS sec \r\n WHERE sec.uni_id = tab_unidad.uni_par) AS seccion,\r\n\t\ttab_fondo.fon_cod,\r\n tab_unidad.uni_cod,\r\n tab_tipocorr.tco_codigo,\r\n tab_series.ser_codigo,\r\n tab_expediente.exp_codigo,\r\n tab_unidad.uni_descripcion,\r\n tab_unidad.uni_codigo,\r\n tab_rol.rol_titulo,\r\n tab_rol.rol_cod,\r\n tab_series.ser_categoria,\r\n tab_expisadg.exp_titulo,\r\n tab_expisadg.exp_anioi,\r\n tab_expisadg.exp_aniof,\r\n tab_expisadg.exp_mesi,\r\n tab_expisadg.exp_mesf,\r\n (SELECT COUNT (DISTINCT arc.fil_nrocaj)\r\n FROM tab_archivo as arc INNER JOIN\r\n tab_exparchivo AS exa ON arc.fil_id = exa.fil_id\r\n WHERE exa.exp_id = tab_expediente.exp_id) AS totcja,\r\n (SELECT COUNT (arc.fil_id) FROM tab_archivo as arc INNER JOIN\r\n tab_exparchivo AS exa ON arc.fil_id = exa.fil_id\r\n WHERE exa.exp_id = tab_expediente.exp_id and arc.fil_estado=1) AS totpzs,\r\n (SELECT (COUNT (DISTINCT arc.fil_nrocaj))* 0.32\r\n FROM tab_archivo as arc INNER JOIN\r\n tab_exparchivo AS exa ON arc.fil_id = exa.fil_id\r\n WHERE exa.exp_id = tab_expediente.exp_id) AS totml,\r\n (SELECT MIN (isad.exp_fecha_exi)\r\n FROM tab_expediente as exp INNER JOIN\r\n tab_expisadg AS isad ON exp.exp_id = isad.exp_id INNER JOIN\r\n tab_expusuario AS use ON exp.exp_id = use.exp_id\r\n WHERE exp.ser_id = tab_series.ser_id AND use.usu_id = tab_usuario.usu_id AND use.eus_estado = 1) AS fechaini,\r\n (SELECT MAX (isad.exp_fecha_exf)\r\n FROM tab_expediente as exp INNER JOIN\r\n tab_expisadg AS isad ON exp.exp_id = isad.exp_id INNER JOIN\r\n tab_expusuario AS use ON exp.exp_id = use.exp_id\r\n WHERE exp.ser_id = tab_series.ser_id AND use.usu_id = tab_usuario.usu_id AND use.eus_estado = 1) AS fechafin\r\n FROM\r\n\t\ttab_expediente\r\n INNER JOIN tab_expisadg ON tab_expediente.exp_id =tab_expisadg.exp_id\r\n INNER JOIN tab_series ON tab_expediente.ser_id = tab_series.ser_id\r\n INNER JOIN tab_tipocorr ON tab_tipocorr.tco_id = tab_series.tco_id\r\n INNER JOIN tab_expusuario ON tab_expediente.exp_id = tab_expusuario.exp_id\r\n INNER JOIN tab_usuario ON tab_expusuario.usu_id = tab_usuario.usu_id\r\n INNER JOIN tab_rol ON tab_usuario.rol_id = tab_rol.rol_id\r\n INNER JOIN tab_unidad ON tab_series.uni_id = tab_unidad.uni_id\r\n INNER JOIN tab_fondo ON tab_unidad.fon_id = tab_fondo.fon_id\r\n INNER JOIN tab_fondo as fonp ON tab_fondo.fon_par = fonp.fon_id \r\n WHERE tab_expusuario.eus_estado = 1 " . $where;
$expedienteh = new Tab_expediente();
$resulth = $expedienteh->dbselectBySQL($sqlh);
$cadenah = "";
$exp_titulo = "";
if (count($resulth) > 0) {
$cadenah .= '<table width="780" border="0" cellpadding="2">';
$cadenah .= '<tr><td align="center">';
$cadenah .= 'MPD';
$cadenah .= '</td></tr>';
$cadenah .= '<tr><td align="center">';
$cadenah .= '<span style="font-size:24px;">' . $resulth[0]->uni_descripcion . ' (' . $resulth[0]->uni_codigo . ')</span>';
$cadenah .= '</td></tr>';
$cadenah .= '<tr><td align="center">';
$cadenah .= '<span style="font-size:24px;">' . $resulth[0]->rol_titulo . ' (' . $resulth[0]->rol_cod . ')</span>';
$cadenah .= '</td></tr>';
$cadenah .= '<tr><td align="center">';
$cadenah .= '<span style="font-size: 30px;font-weight: bold;text-decoration: underline;">';
$cadenah .= 'FORMULARIO DE INVENTARIO DE EXPEDIENTES';
$cadenah .= '</span>';
$cadenah .= '</td></tr>';
$cadenah .= '</table>';
$cadenah .= '<table width="760" border="1" cellpadding="2">';
$cadenah .= '<tr>';
$cadenah .= '<td width="100" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;"> FONDO:</span></td>';
$cadenah .= '<td width="350"><span style="font-size: 14px;">' . $resulth[0]->fondes . '</span></td>';
$cadenah .= '<td width="90" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;">INSTRUMENTO DE CONSULTA:</span></td>';
$cadenah .= '<td width="220"><span style="font-size: 14px;">INVENTARIO DE DOCUMENTOS</span></td>';
$cadenah .= '</tr>';
$cadenah .= '<tr>';
$cadenah .= '<td width="100" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;">SUB-FONDO:</span></td>';
$cadenah .= '<td width="350"><span style="font-size: 14px;">' . $resulth[0]->fon_descripcion . '</span></td>';
$cadenah .= '<td width="90" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;">TOTAL DE CAJAS:</span></td>';
$cadenah .= '<td width="220"><span style="font-size: 14px;">' . $resulth[0]->totcja . '</span></td>';
$cadenah .= '</tr>';
$cadenah .= '<tr>';
$cadenah .= '<td width="100" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;">SECCIÓN:</span></td>';
$cadenah .= '<td width="350"><span style="font-size:14px;">';
if ($resulth[0]->uni_par == -1) {
$seccion = $resulth[0]->uni_descripcion;
$variable = $seccion;
$excluirparent = explode("(", $variable);
if ($excluirparent[1] == "") {
$cadenah .= $resulth[0]->uni_descripcion;
} else {
$excluirultimoparent = $excluirparent[1] . "x";
$imprimir_descripcion = explode(")", $excluirultimoparent);
$cadenah .= $imprimir_descripcion[0];
}
} else {
$t = 0;
if ($resulth[0]->uni_par == $resulth[0]->uni_id) {
$buscar = $resulth[0]->uni_par - 1;
} else {
$buscar = $resulth[0]->uni_par;
}
while ($t < 1) {
$sql = "SELECT\r\n tab_unidad.uni_descripcion,tab_unidad.uni_par\r\n FROM\r\n tab_unidad\r\n WHERE\r\n tab_unidad.uni_id = {$buscar}";
$tab_unidad = new tab_unidad();
$resultado = $tab_unidad->dbSelectBySQL($sql);
$uni_par = $resultado[0]->uni_par;
if ($resultado[0]->uni_par == -1) {
$t++;
$seccion = $resultado[0]->uni_descripcion;
$variable = $seccion;
$excluirparent = explode("(", $variable);
if ($excluirparent[1] == "") {
$cadenah .= $resultado[0]->uni_descripcion;
} else {
$excluirultimoparent = $excluirparent[1] . "x";
$imprimir_descripcion = explode(")", $excluirultimoparent);
$cadenah .= $imprimir_descripcion[0];
}
} else {
$buscar = $resultado[0]->uni_par - 1;
}
}
}
//fin de codigo de seccion
$cadenah .= '</span></td>';
$cadenah .= '<td width="90" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;">TOTAL DE PIEZAS:</span></td>';
$cadenah .= '<td width="220"><span style="font-size: 14px;">' . $resulth[0]->totpzs . '</span></td>';
$cadenah .= '</tr>';
$cadenah .= '<tr>';
$cadenah .= '<td width="100" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;">SUB SECCIÓN:</span></td>';
$cadenah .= '<td width="350"><span style="font-size: 14px;">';
$cadenah .= $resulth[0]->uni_descripcion;
$cadenah .= '</span></td>';
$cadenah .= '<td width="90" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;">TOTAL DE ML:</span></td>';
$cadenah .= '<td width="220"><span style="font-size: 14px;">' . $resulth[0]->totml . '</span></td>';
$cadenah .= '</tr>';
$cadenah .= '<tr>';
$cadenah .= '<td width="100" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;">CÓDIGO DE REFERENCIA:</span></td>';
$cadenah .= '<td width="350"><span style="font-size: 14px;">' . $resulth[0]->fon_cod . DELIMITER . $resulth[0]->uni_cod . DELIMITER . $resulth[0]->tco_codigo . DELIMITER . $resulth[0]->ser_codigo . DELIMITER . $resulth[0]->exp_codigo . '</span></td>';
$cadenah .= '<td width="90" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;">NIVEL DE DESCRIPCIÓN:</span></td>';
$cadenah .= '<td width="220"><span style="font-size: 14px;">UNIDAD DOCUMENTAL SIMPLE</span></td>';
$cadenah .= '</tr>';
$cadenah .= '<tr>';
$cadenah .= '<td width="100" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;">SERIES:</span></td>';
$cadenah .= '<td width="350"><span style="font-size: 14px;">' . $resulth[0]->ser_categoria . '</span></td>';
$cadenah .= '<td width="90" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;">FECHAS EXTREMAS:</span></td>';
$cadenah .= '<td width="270"><span style="font-size: 22px;">' . $resulth[0]->exp_mesi . ' ' . $resulth[0]->exp_anioi;
if (trim($resulth[0]->exp_aniof) != "") {
$cadenah .= ' - ' . $resulth[0]->exp_mesf . ' ' . $resulth[0]->exp_aniof;
}
$cadenah .= '</span></td>';
$cadenah .= '</tr>';
$cadenah .= '<tr>';
$cadenah .= '<td width="100" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;">EXPEDIENTE(PROYECTO):</span></td>';
$cadenah .= '<td width="350" ><span style="font-size: 14px;">' . $resulth[0]->exp_titulo . '</span></td>';
$cadenah .= '<td width="90" bgcolor="#CCCCCC"><span style="font-size: 14px;font-weight: bold;"></span></td>';
$cadenah .= '<td width="220"><span style="font-size: 14px;"></span></td>';
$cadenah .= '</tr>';
$exp_titulo = $resulth[0]->exp_titulo;
$camposc = new expcampo();
$resultdc = $camposc->obtenerSelectCamposRepDoc($filtro_serie, $filtro_expediente);
$cadenah .= $resultdc;
$cadenah .= '</table>';
}
$sql = "SELECT\r\n tab_archivo.fil_nrocaj,\r\n tab_archivo.fil_nroejem,\r\n tab_fondo.fon_cod,\r\n tab_unidad.uni_cod,\r\n tab_tipocorr.tco_codigo,\r\n tab_series.ser_codigo,\r\n tab_expediente.exp_codigo,\r\n tab_cuerpos.cue_codigo,\r\n tab_archivo.fil_codigo,\r\n tab_archivo.fil_nro,\r\n tab_expediente.exp_lugar,\r\n tab_archivo.fil_titulo,\r\n tab_archivo.fil_subtitulo,\r\n tab_archivo.fil_proc,\r\n tab_archivo.fil_firma,\r\n tab_expisadg.exp_fecha_exi,\r\n tab_expisadg.exp_fecha_exf,\r\n tab_archivo.fil_tomovol,\r\n tab_archivo.fil_nrofoj,\r\n (SELECT tab_sopfisico.sof_codigo\r\n FROM tab_sopfisico \r\n WHERE tab_sopfisico.sof_id = tab_archivo.sof_id ) AS sof_codigo,\r\n tab_archivo.fil_mrb,\r\n tab_archivo.fil_sala,\r\n tab_archivo.fil_estante,\r\n tab_archivo.fil_cuerpo,\r\n tab_archivo.fil_balda,\r\n tab_archivo.fil_obs,\r\n tab_archivo.fil_mes,\r\n tab_archivo.fil_anio,\r\n tab_archivo.fil_mesf,\r\n tab_archivo.fil_aniof,\r\n tab_tramite.tra_descripcion\r\n FROM\r\n tab_expediente\r\n INNER JOIN tab_expisadg ON tab_expediente.exp_id = tab_expisadg.exp_id\r\n INNER JOIN tab_series ON tab_expediente.ser_id = tab_series.ser_id\r\n INNER JOIN tab_tipocorr ON tab_tipocorr.tco_id = tab_series.tco_id\r\n INNER JOIN tab_expusuario ON tab_expediente.exp_id = tab_expusuario.exp_id\r\n INNER JOIN tab_usuario ON tab_expusuario.usu_id = tab_usuario.usu_id\r\n INNER JOIN tab_unidad ON tab_series.uni_id = tab_unidad.uni_id\r\n INNER JOIN tab_fondo ON tab_unidad.fon_id = tab_fondo.fon_id\r\n INNER JOIN tab_exparchivo ON tab_expediente.exp_id = tab_exparchivo.exp_id\r\n INNER JOIN tab_archivo ON tab_archivo.fil_id = tab_exparchivo.fil_id\r\n INNER JOIN tab_ubicacion ON tab_unidad.ubi_id = tab_ubicacion.ubi_id\r\n INNER JOIN tab_localidad ON tab_ubicacion.loc_id = tab_localidad.loc_id\r\n INNER JOIN tab_provincia ON tab_localidad.pro_id = tab_provincia.pro_id\r\n INNER JOIN tab_departamento ON tab_provincia.dep_id = tab_departamento.dep_id\r\n INNER JOIN tab_cuerpos ON tab_cuerpos.cue_id = tab_exparchivo.cue_id\r\n INNER JOIN tab_tramite ON tab_tramite.tra_id = tab_exparchivo.tra_id\r\n WHERE tab_expusuario.eus_estado = 1 AND tab_archivo.fil_estado=1" . $where . $order_by;
$expediente = new Tab_expediente();
$result = $expediente->dbselectBySQL($sql);
$this->usuario = new usuario();
$cadena = "";
$cadena .= '<table width="760" border="1" cellpadding="2">';
$cadena .= '<tr bgcolor="#CCCCCC">';
$cadena .= '<td colspan="19" align="center" width="700"><span style="font-size: 12px;font-weight: bolder;">ÁREA DE IDENTIFICACIÓN</span></td>';
$cadena .= '<td width="60" align="center"><span style="font-size: 12px;font-weight: bolder;">ÁREA DE NOTAS</span></td>';
$cadena .= '</tr>';
$cadena .= '<tr bgcolor="#CCCCCC">';
$cadena .= '<td width="25" rowspan="2" align="center"><span style="font-size: 11px ;font-weight: bold;">N de Caja</span></td>';
$cadena .= '<td width="25" rowspan="2" align="center"><span style="font-size: 11px ;font-weight: bold;">Total piezas/cajas</span></td>';
$cadena .= '<td width="25" rowspan="2" align="center"><span style="font-size: 11px ;font-weight: bold;">N ejem.</span></td>';
$cadena .= '<td width="25" rowspan="2" align="center"><span style="font-size: 11px; font-weight: bold;">ML</span></td>';
$cadena .= '<td width="60" rowspan="2" align="center" valign="middle"><span style="font-size: 11px ;font-weight: bold;">N de Orden doc.</span></td>';
$cadena .= '<td width="40" rowspan="2" align="center" valign="middle"><span style="font-size: 11px ;font-weight: bold;">Depto.</span></td>';
$cadena .= '<td width="90" rowspan="2" align="center" valign="middle"><span style="font-size: 11px ;font-weight: bold;">Titulo del Documento</span></td>';
$cadena .= '<td width="70" rowspan="2" align="center" valign="middle"><span style="font-size: 11px ;font-weight: bold;">Sub titulo</span></td>';
$cadena .= '<td width="45" rowspan="2" align="center" valign="middle"><span style="font-size: 11px ;font-weight: bold;">Productor</span></td>';
$cadena .= '<td width="40" rowspan="2" align="center" valign="middle"><span style="font-size: 11px ;font-weight: bold;">Firma</span></td>';
$cadena .= '<td width="35" rowspan="2" align="center" valign="middle"><span style="font-size: 11px ;font-weight: bold;">Fecha</span></td>';
$cadena .= '<td width="35" rowspan="2" align="center" valign="middle"><span style="font-size: 11px ;font-weight: bold;">Tomo/Volumen</span></td>';
$cadena .= '<td width="25" rowspan="2" align="center" valign="middle"><span style="font-size: 11px ;font-weight: bold;">Fojas</span></td>';
$cadena .= '<td width="30" rowspan="2" align="center" valign="middle"><span style="font-size: 11px ;font-weight: bold;">Soporte Físico</span></td>';
$cadena .= '<td width="30" rowspan="2" align="center" valign="middle"><span style="font-size: 11px ;font-weight: bold;">Conser. Doc.</span></td>';
$cadena .= '<td width="100" colspan="4" align="center"><span style="font-size: 11px ;font-weight: bold;">Ubicación Topografica</span></td>';
$cadena .= '<td width="60" rowspan="2" align="center" valign="middle"><span style="font-size: 11px ;font-weight: bold;">Observaciones</span></td>';
$cadena .= '</tr>';
$cadena .= '<tr bgcolor="#CCCCCC">';
$cadena .= '<td width="25" align="center"><span style="font-size: 11px ;font-weight: bold;">Sala</span></td>';
$cadena .= '<td width="25" align="center"><span style="font-size: 11px ;font-weight: bold;">Estante</span></td>';
$cadena .= '<td width="25" align="center"><span style="font-size: 11px ;font-weight: bold;">Cuerpo</span></td>';
$cadena .= '<td width="25" align="center"><span style="font-size: 11px ;font-weight: bold;">Balda</span></td>';
$cadena .= '</tr>';
$numero = 1;
$tra_descripciona = "";
$tra_descripcionn = "";
foreach ($result as $fila) {
// New
$tra_descripcionn = $fila->tra_descripcion;
if ($tra_descripcionn != $tra_descripciona) {
$cadena .= '<tr>';
$cadena .= '<td width="100%" colspan="20"><span style="font-size: 11px;">' . $fila->tra_descripcion . '</span></td>';
$cadena .= '</tr>';
//
$cadena .= '<tr>';
$cadena .= '<td width="25"><span style="font-size: 11px;">' . $fila->fil_nrocaj . '</span></td>';
$cadena .= '<td width="25"><span style="font-size: 11px;"></span></td>';
$cadena .= '<td width="25"><span style="font-size: 11px;">' . $fila->fil_nroejem . '</span></td>';
$cadena .= '<td width="25"><span style="font-size: 11px;"></span></td>';
$cadena .= '<td width="60"><span style="font-size: 11px;">' . $fila->fon_cod . DELIMITER . $fila->uni_cod . DELIMITER . $fila->tco_codigo . DELIMITER . $fila->ser_codigo . DELIMITER . $fila->exp_codigo . DELIMITER . $fila->fil_nro . '</span></td>';
$cadena .= '<td width="40"><span style="font-size: 11px;">' . $fila->exp_lugar . '</span></td>';
$cadena .= '<td width="90"><span style="font-size: 11px;">' . $fila->fil_titulo . '</span></td>';
$cadena .= '<td width="70"><span style="font-size: 11px;">' . $fila->fil_subtitulo . '</span></td>';
$cadena .= '<td width="45"><span style="font-size: 11px;">' . $fila->fil_proc . '</span></td>';
$cadena .= '<td width="40"><span style="font-size: 11px;">' . $fila->fil_firma . '</span></td>';
$cadena .= '<td width="35"><span style="font-size: 11px;">' . $fila->fil_mes . ' ' . $fila->fil_anio . ' - ' . $fila->fil_mesf . ' ' . $fila->fil_aniof . '</span></td>';
$cadena .= '<td width="35"><span style="font-size: 11px;">' . $fila->fil_tomovol . '</span></td>';
$cadena .= '<td width="25"><span style="font-size: 11px;">' . $fila->fil_nrofoj . '</span></td>';
$cadena .= '<td width="30"><span style="font-size: 11px;">' . $fila->sof_codigo . '</span></td>';
$cadena .= '<td width="30"><span style="font-size: 11px;">' . $fila->fil_mrb . '</span></td>';
$cadena .= '<td width="25"><span style="font-size: 11px;">' . $fila->fil_sala . '</span></td>';
$cadena .= '<td width="25"><span style="font-size: 11px;">' . $fila->fil_estante . '</span></td>';
$cadena .= '<td width="25"><span style="font-size: 11px;">' . $fila->fil_cuerpo . '</span></td>';
$cadena .= '<td width="25"><span style="font-size: 11px;">' . $fila->fil_balda . '</span></td>';
$cadena .= '<td width="60"><span style="font-size: 11px;">' . $fila->fil_obs . '</span></td>';
$cadena .= '</tr>';
} else {
$cadena .= '<tr>';
$cadena .= '<td width="25"><span style="font-size: 11px;">' . $fila->fil_nrocaj . '</span></td>';
$cadena .= '<td width="25"><span style="font-size: 11px;"></span></td>';
$cadena .= '<td width="25"><span style="font-size: 11px;">' . $fila->fil_nroejem . '</span></td>';
$cadena .= '<td width="25"><span style="font-size: 11px;"></span></td>';
$cadena .= '<td width="60"><span style="font-size: 11px;">' . $fila->fon_cod . DELIMITER . $fila->uni_cod . DELIMITER . $fila->tco_codigo . DELIMITER . $fila->ser_codigo . DELIMITER . $fila->exp_codigo . DELIMITER . $fila->cue_codigo . DELIMITER . $fila->fil_nro . '</span></td>';
$cadena .= '<td width="40"><span style="font-size: 11px;">' . $fila->exp_lugar . '</span></td>';
$cadena .= '<td width="90"><span style="font-size: 11px;">' . $fila->fil_titulo . '</span></td>';
$cadena .= '<td width="70"><span style="font-size: 11px;">' . $fila->fil_subtitulo . '</span></td>';
$cadena .= '<td width="45"><span style="font-size: 11px;">' . $fila->fil_proc . '</span></td>';
$cadena .= '<td width="40"><span style="font-size: 11px;">' . $fila->fil_firma . '</span></td>';
$cadena .= '<td width="35"><span style="font-size: 11px;">' . $fila->fil_mes . ' ' . $fila->fil_anio . ' - ' . $fila->fil_mesf . ' ' . $fila->fil_aniof . '</span></td>';
$cadena .= '<td width="35"><span style="font-size: 11px;">' . $fila->fil_tomovol . '</span></td>';
$cadena .= '<td width="25"><span style="font-size: 11px;">' . $fila->fil_nrofoj . '</span></td>';
$cadena .= '<td width="30"><span style="font-size: 11px;">' . $fila->sof_codigo . '</span></td>';
$cadena .= '<td width="30"><span style="font-size: 11px;">' . $fila->fil_mrb . '</span></td>';
$cadena .= '<td width="25"><span style="font-size: 11px;">' . $fila->fil_sala . '</span></td>';
$cadena .= '<td width="25"><span style="font-size: 11px;">' . $fila->fil_estante . '</span></td>';
$cadena .= '<td width="25"><span style="font-size: 11px;">' . $fila->fil_cuerpo . '</span></td>';
$cadena .= '<td width="25"><span style="font-size: 11px;">' . $fila->fil_balda . '</span></td>';
$cadena .= '<td width="60"><span style="font-size: 11px;">' . $fila->fil_obs . '</span></td>';
$cadena .= '</tr>';
}
$numero++;
$tra_descripciona = $fila->tra_descripcion;
}
//obtenerSelectCamposRepC
$cadena .= '</table>';
$cadena = $cadenah . $cadena;
echo $cadena;
}
function printFichaSearchExpediente()
{
$exp_id = VAR3;
$dov_id = VAR4;
$where = "";
// if ($_SESSION['ROL_COD'] != 'AA') {
// $where = " AND tab_expusuario.usu_id=" . $_SESSION['USU_ID'] . "";
// }
$tarchivo = new tab_archivo();
$select = "SELECT\r\n (SELECT fon_codigo from tab_fondo WHERE fon_id=f.fon_par) AS fon_codigo,\r\n tab_unidad.uni_descripcion,\r\n tab_series.ser_categoria,\r\n tab_expisadg.exp_titulo,\r\n f.fon_cod,\r\n tab_unidad.uni_cod,\r\n tab_tipocorr.tco_codigo,\r\n tab_series.ser_id,\r\n tab_series.ser_codigo,\r\n tab_expediente.exp_id,\r\n tab_expediente.exp_codigo,\r\n tab_expisadg.exp_fecha_exi,\r\n tab_expisadg.exp_fecha_exf,\r\n tab_expisadg.exp_nivdes,\r\n tab_expisadg.exp_volsop,\r\n tab_expisadg.exp_nomprod,\r\n tab_expisadg.exp_hisins,\r\n tab_expisadg.exp_hisarc,\r\n tab_expisadg.exp_foring,\r\n tab_expisadg.exp_alccon,\r\n tab_expisadg.exp_vaseel,\r\n tab_expisadg.exp_nueing,\r\n tab_expisadg.exp_org,\r\n tab_expisadg.exp_conacc,\r\n tab_expisadg.exp_conrep,\r\n tab_expisadg.exp_lengua,\r\n tab_expisadg.exp_carfis,\r\n tab_expisadg.exp_insdes,\r\n tab_expisadg.exp_exloor,\r\n tab_expisadg.exp_exloco,\r\n tab_expisadg.exp_underel,\r\n tab_expisadg.exp_notpub,\r\n tab_expisadg.exp_notas,\r\n tab_expisadg.exp_notarc,\r\n tab_expisadg.exp_regnor,\r\n tab_expisadg.exp_fecdes,\r\n tab_expisadg.exp_estado,\r\n tab_expisadg.exp_mesi,\r\n tab_expisadg.exp_anioi,\r\n tab_expisadg.exp_mesf,\r\n tab_expisadg.exp_aniof,\r\n tab_expediente.sof_id,\r\n tab_expediente.exp_nrofoj,\r\n tab_expediente.exp_tomovol,\r\n tab_expediente.exp_nroejem,\r\n tab_expediente.exp_nrocaj,\r\n tab_expediente.exp_sala,\r\n tab_expediente.exp_estante,\r\n tab_expediente.exp_cuerpo,\r\n tab_expediente.exp_balda,\r\n tab_expediente.exp_obs,\r\n tab_expediente.exp_estado,\r\n tab_expisadg.idi_id,\r\n tab_expediente.exp_ori,\r\n tab_expediente.exp_cop,\r\n tab_expediente.exp_fot,\r\n tab_expediente.exp_lugar";
$from = "FROM\r\n tab_fondo AS f\r\n INNER JOIN tab_unidad ON f.fon_id = tab_unidad.fon_id\r\n INNER JOIN tab_series ON tab_unidad.uni_id = tab_series.uni_id\r\n INNER JOIN tab_tipocorr ON tab_tipocorr.tco_id = tab_series.tco_id\r\n INNER JOIN tab_expediente ON tab_series.ser_id = tab_expediente.ser_id\r\n INNER JOIN tab_expisadg ON tab_expediente.exp_id = tab_expisadg.exp_id\r\n INNER JOIN tab_expusuario ON tab_expediente.exp_id = tab_expusuario.exp_id\r\n WHERE\r\n f.fon_estado = 1 AND\r\n tab_unidad.uni_estado = 1 AND\r\n tab_tipocorr.tco_estado = 1 AND\r\n tab_series.ser_estado = 1 AND\r\n tab_expediente.exp_estado = 1 AND\r\n tab_expusuario.eus_estado = 1 AND\r\n tab_expediente.exp_id = '{$exp_id}'\r\n {$where} ";
$sql = "{$select} {$from} ";
$result = $tarchivo->dbSelectBySQL($sql);
//print $sql;
$this->usuario = new usuario();
// PDF
// Landscape
require_once 'tcpdf/config/lang/eng.php';
require_once 'tcpdf/tcpdf.php';
$pdf = new TCPDF('P', PDF_UNIT, PDF_PAGE_FORMAT, true, 'UTF-8', false);
$pdf->SetCreator(PDF_CREATOR);
$pdf->setFontSubsetting(FALSE);
$pdf->SetAuthor($this->usuario->obtenerNombre($_SESSION['USU_ID']));
$pdf->SetTitle('Reporte Ficha del Expediente');
$pdf->SetSubject('Reporte Ficha del Expediente');
$pdf->SetDefaultMonospacedFont(PDF_FONT_MONOSPACED);
// aumentado
$pdf->SetKeywords('Castellon, SISTEMA DE PASAJES Y VIÁTICOS');
// set default header data
$pdf->SetHeaderData('logo2.png', 20, 'MPD', 'Administradora Boliviana de Carreteras');
// 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->SetMargins(10, 30, 10);
$pdf->SetHeaderMargin(PDF_MARGIN_HEADER);
// $pdf->setPrintHeader(false);
$pdf->setPrintFooter(false);
//set auto page breaks
$pdf->SetAutoPageBreak(TRUE, 15);
// $pdf->setImageScale(PDF_IMAGE_SCALE_RATIO);
$pdf->SetFont('helvetica', '', 11);
// add a page
$pdf->AddPage();
// Report
$pdf->Image(PATH_ROOT . '/web/img/iso.png', '255', '8', 15, 15, 'PNG', '', 'T', false, 300, '', false, false, 1, false, false, false);
$cadena = "<br/><br/><br/><br/><br/><br/>";
$cadena .= '<table width="580" border="0" >';
$cadena .= '<tr><td align="center">';
$cadena .= '<span style="font-size: 30px;font-weight: bold;">';
$cadena .= 'Reporte Ficha del Expediente';
$cadena .= '</span>';
$cadena .= '</td></tr>';
foreach ($result as $fila) {
$cadena .= '<tr><td align="left"><b>1. AREA DE INDENTIFICACIÓN</b></td></tr>';
$cadena .= '<tr><td align="left"><b>Id: </b>' . $fila->exp_id . '</td></tr>';
$cadena .= '<tr><td align="left"><b>Código: </b>' . $fila->fon_cod . DELIMITER . $fila->uni_cod . DELIMITER . $fila->tco_codigo . DELIMITER . $fila->ser_codigo . DELIMITER . $fila->exp_codigo . '</td></tr>';
$cadena .= '<tr><td align="left"><b>Fondo:</b> ' . $fila->fon_codigo . '</td></tr>';
$cadena .= '<tr><td align="left"><b>Sección:</b> ' . $fila->uni_descripcion . '</td></tr>';
$cadena .= '<tr><td align="left"><b>Serie:</b> ' . $fila->ser_categoria . '</td></tr>';
$cadena .= '<tr><td align="left"><b>Título:</b> <b>' . $fila->exp_titulo . '</b></td></tr>';
if ($fila->exp_mesi) {
if ($fila->exp_anioi) {
$cadena .= '<tr><td align="left"><b>Fecha Inicial:</b> ' . $fila->exp_mesi . "/" . $fila->exp_anioi . '</td></tr>';
} else {
$cadena .= '<tr><td align="left"><b>Fecha Inicial:</b> ' . $fila->exp_mesi . '</td></tr>';
}
} else {
if ($fila->exp_anioi) {
$cadena .= '<tr><td align="left"><b>Fecha Inicial:</b> ' . $fila->fil_anioi . '</td></tr>';
}
}
if ($fila->exp_mesf) {
if ($fila->exp_aniof) {
$cadena .= '<tr><td align="left"><b>Fecha Final:</b> ' . $fila->exp_mesf . "/" . $fila->exp_aniof . '</td></tr>';
} else {
$cadena .= '<tr><td align="left"><b>Fecha Final:</b> ' . $fila->exp_mesf . '</td></tr>';
}
} else {
if ($fila->exp_aniof) {
$cadena .= '<tr><td align="left"><b>Fecha Final:</b> ' . $fila->exp_aniof . '</td></tr>';
}
}
// $cadena .= '<tr><td align="left"><b>Fecha Inicial:</b> ' . $fila->exp_mesi . "/" . $fila->exp_anioi . '</td></tr>';
// $cadena .= '<tr><td align="left"><b>Fecha Final:</b> ' . $fila->exp_mesf . "/" . $fila->exp_aniof . '</td></tr>';
$cadena .= '<tr><td align="left"><b>Ubicación Geográfica:</b> ' . $fila->exp_lugar . '</td></tr>';
$cadena .= '<tr><td align="left"><b>Volumen y soporte de la Unidad de Descripción:</b> ' . $fila->exp_volsop . '</td></tr>';
// Include dynamic fields
$expcampo = new expcampo();
$filcampo = $expcampo->obtenerSelectCamposShow($fila->ser_id, $fila->exp_id);
if ($filcampo) {
$cadena .= '<br/>';
$cadena .= '<tr><td align="left"><b>Datos adicionales en la identificación:</b> ' . "" . '</td></tr>';
$cadena .= $filcampo;
}
$cadena .= '<br/><tr><td align="left"><b>2. AREA DE CONTEXTO</b></td></tr>';
if ($fila->exp_nomprod) {
$cadena .= '<tr><td align="left"><b>Nombre del o de los Productores:</b> ' . $fila->exp_nomprod . '</td></tr>';
}
if ($fila->exp_hisins) {
$cadena .= '<tr><td align="left"><b>Historia Institucional/Reseña biográfica:</b> ' . $fila->exp_hisins . '</td></tr>';
}
if ($fila->exp_hisarc) {
$cadena .= '<tr><td align="left"><b>Historia Archivística:</b> ' . $fila->exp_hisarc . '</td></tr>';
}
if ($fila->exp_foring) {
$cadena .= '<tr><td align="left"><b>Forma de ingreso:</b> ' . $fila->exp_foring . '</td></tr>';
}
$cadena .= '<br/><tr><td align="left"><b>3. AREA DE CONTENIDO Y ESTRUCTURA</b></td></tr>';
if ($fila->exp_alccon) {
$cadena .= '<tr><td align="left"><b>Alcance y contenido:</b> ' . $fila->exp_alccon . '</td></tr>';
}
if ($fila->exp_vaseel) {
$cadena .= '<tr><td align="left"><b>Valoración, selección y eliminación:</b> ' . $fila->exp_vaseel . '</td></tr>';
}
if ($fila->exp_nueing) {
$cadena .= '<tr><td align="left"><b>Nuevos Ingresos:</b> ' . $fila->exp_nueing . '</td></tr>';
}
if ($fila->exp_org) {
$cadena .= '<tr><td align="left"><b>Organización:</b> ' . $fila->exp_org . '</td></tr>';
}
$idioma = new idioma();
$cadena .= '<br/><tr><td align="left"><b>4. AREA DE CONDICIONES DE ACCESO Y USO</b></td></tr>';
if ($fila->exp_conacc) {
$cadena .= '<tr><td align="left"><b>Condiciones de Acceso:</b> ' . $fila->exp_conacc . '</td></tr>';
}
if ($fila->exp_conrep) {
$cadena .= '<tr><td align="left"><b>Condiciones de Reproducción:</b> ' . $fila->exp_conrep . '</td></tr>';
}
if ($fila->idi_id) {
$cadena .= '<tr><td align="left"><b>Lengua/Escritura de la documentación:</b> ' . $idioma->obtenerIdioma($fila->idi_id) . '</td></tr>';
}
if ($fila->exp_carfis) {
$cadena .= '<tr><td align="left"><b>Caraterísticas físicas o requisitos técnicos:</b> ' . $fila->exp_carfis . '</td></tr>';
}
if ($fila->exp_insdes) {
$cadena .= '<tr><td align="left"><b>Instrumentos de descripción:</b> ' . $fila->exp_insdes . '</td></tr>';
}
$cadena .= '<br/><tr><td align="left"><b>5. AREA DE DOCUMENTACIÓN ASOCIADA</b></td></tr>';
if ($fila->exp_exloor) {
$cadena .= '<tr><td align="left"><b>Existencia y localización de originales:</b> ' . $fila->exp_exloor . '</td></tr>';
}
if ($fila->exp_exloco) {
$cadena .= '<tr><td align="left"><b>Existencia y localización de copias:</b> ' . $fila->exp_exloco . '</td></tr>';
}
if ($fila->exp_underel) {
$cadena .= '<tr><td align="left"><b>Unidades de descripción relacionadas:</b> ' . $fila->exp_underel . '</td></tr>';
}
if ($fila->exp_notpub) {
$cadena .= '<tr><td align="left"><b>Notas de publicación:</b> ' . $fila->exp_notpub . '</td></tr>';
}
$cadena .= '<br/><tr><td align="left"><b>6. AREA DE NOTAS</b></td></tr>';
if ($fila->exp_notas) {
$cadena .= '<tr><td align="left"><b>Notas:</b> ' . $fila->exp_notas . '</td></tr>';
}
$cadena .= '<br/><tr><td align="left"><b>7. AREA DE CONTROL DE LA DESCRIPCIÓN</b></td></tr>';
if ($fila->exp_notarc) {
$cadena .= '<tr><td align="left"><b>Notas del archivero:</b> ' . $fila->exp_notarc . '</td></tr>';
}
if ($fila->exp_regnor) {
$cadena .= '<tr><td align="left"><b>Reglas o Normas:</b> ' . $fila->exp_regnor . '</td></tr>';
}
if ($fila->exp_fecdes) {
$cadena .= '<tr><td align="left"><b>Fecha de la descripción:</b> ' . $fila->exp_fecdes . '</td></tr>';
}
$sop_fisico = new tab_sopfisico();
$nombresopf = $sop_fisico->dbselectByField("sof_id", $fila->sof_id);
$nombresopf = $nombresopf[0];
$cadena .= '<br/><tr><td align="left"><b>8. PRESENTACIÓN DEL EXPEDIENTE</b></td></tr>';
if ($nombresopf->sof_nombre) {
$cadena .= '<tr><td align="left"><b>Soporte Físico:</b> ' . $nombresopf->sof_nombre . '</td></tr>';
}
if ($fila->exp_nrofoj) {
$cadena .= '<tr><td align="left"><b>Nro. de Fojas:</b> ' . $fila->exp_nrofoj . '</td></tr>';
}
if ($fila->exp_tomovol) {
$cadena .= '<tr><td align="left"><b>Tomos (Vols):</b> ' . $fila->exp_tomovol . '</td></tr>';
}
if ($fila->exp_nroejem) {
$cadena .= '<tr><td align="left"><b>Nro. Ejemplares:</b> ' . $fila->exp_nroejem . '</td></tr>';
}
if ($fila->exp_ori) {
$cadena .= '<tr><td align="left"><b>Originales:</b> ' . $fila->exp_ori . '</td></tr>';
}
if ($fila->exp_cop) {
$cadena .= '<tr><td align="left"><b>Copias:</b> ' . $fila->exp_cop . '</td></tr>';
}
if ($fila->exp_fot) {
$cadena .= '<tr><td align="left"><b>Duplicados:</b> ' . $fila->exp_fot . '</td></tr>';
}
if ($fila->exp_nrocaj) {
$cadena .= '<tr><td align="left"><b>Nro. de Caja:</b> ' . $fila->exp_nrocaj . '</td></tr>';
}
if ($fila->exp_sala) {
$cadena .= '<tr><td align="left"><b>Sala:</b> ' . $fila->exp_sala . '</td></tr>';
}
if ($fila->exp_estante) {
$cadena .= '<tr><td align="left"><b>Estante:</b> ' . $fila->exp_estante . '</td></tr>';
}
if ($fila->exp_cuerpo) {
$cadena .= '<tr><td align="left"><b>Cuerpo:</b> ' . $fila->exp_cuerpo . '</td></tr>';
}
if ($fila->exp_balda) {
$cadena .= '<tr><td align="left"><b>Balda:</b> ' . $fila->exp_balda . '</td></tr>';
}
if ($fila->exp_obs) {
$cadena .= '<tr><td align="left"><b>Observaciones:</b> ' . $fila->exp_obs . '</td></tr>';
}
// Key words
$palclave = new palclave();
$cadena .= '<tr><td align="left"><b>Palabras claves:</b> ' . $palclave->listaPCFile2($fila->exp_id) . '</td></tr>';
}
$cadena .= '</table>';
//$cadena .= '</table>';
$pdf->writeHTML($cadena, true, false, false, false, '');
// Close and output PDF document
$pdf->Output('ficha_expediente.pdf', 'I');
}
function view()
{
if (!VAR3) {
die("Error del sistema 404");
}
$expcampo = new expcampo();
$ser_categoria = "";
$this->expcampo = new tab_expcampo();
$sql = "SELECT * \r\n FROM tab_expcampo \r\n WHERE ecp_id = " . VAR3;
$resul = $this->expcampo->dbselectBySQL($sql);
if (!$resul) {
die("Error del sistema 404");
}
if (count($resul)) {
$ser_id = $resul[0]->ser_id;
$series = new series();
$ser_categoria = $series->getTitle($ser_id);
} else {
$ser_id = "";
}
$this->expcampo->setRequest2Object($_REQUEST);
$ecp_id = VAR3;
$row = $this->expcampo->dbselectByField("ecp_id", $ecp_id);
$row = $row[0];
$this->registry->template->ser_categoria = $ser_categoria;
$this->registry->template->ser_id = $ser_id;
$this->registry->template->ecp_id = $row->ecp_id;
$this->registry->template->ecp_orden = $row->ecp_orden;
$this->registry->template->ecp_nombre = $row->ecp_nombre;
$this->registry->template->ecp_eti = $row->ecp_eti;
$this->registry->template->ecp_tipdat = $expcampo->obtenerSelectTipoDato($row->ecp_tipdat);
$this->registry->template->titulo = "Editar ";
$this->registry->template->PATH_WEB = PATH_WEB;
$this->registry->template->PATH_DOMAIN = PATH_DOMAIN;
$this->registry->template->PATH_EVENT = "update";
$this->registry->template->GRID_SW = "true";
$this->registry->template->PATH_J = "jquery";
$this->menu = new menu();
$this->liMenu = $this->menu->imprimirMenu(VAR1, $_SESSION['USU_ID']);
$this->registry->template->men_titulo = $this->liMenu;
$this->registry->template->show('headerG');
$this->registry->template->show('serie/tab_expcampo.tpl');
$this->registry->template->show('footer');
}
function getDetalles($id)
{
$expediente = new expediente();
$det = "";
$tab_expediente = new Tab_expediente();
$rows = $tab_expediente->dbselectByField("exp_id", $id);
if (count($rows) == 1) {
$tab_expediente = $rows[0];
// Expediente ISAD-G
$tab_expisadg = new Tab_expisadg();
$rows2 = $tab_expisadg->dbselectByField("exp_id", $id);
$tab_expisadg = $rows2[0];
// Include dynamic fields
$expcampo = new expcampo();
$expadicional = $expcampo->obtenerSelectCamposMostrar($tab_expediente->ser_id, $tab_expediente->exp_id);
$det .= '<tr><td><strong>Código:</strong></td><td colspan="3">' . $expediente->obtenerCodigo($id) . '</td></tr>';
$det .= '<tr><td><strong>Fecha Inicial:</strong></td><td colspan="3">' . $tab_expisadg->exp_mesi . '/' . $tab_expisadg->exp_anioi . '</td></tr>';
$det .= '<tr><td><strong>Fecha Final:</strong></td><td colspan="3">' . $tab_expisadg->exp_mesf . '/' . $tab_expisadg->exp_aniof . '</td></tr>';
if ($tab_expediente->exp_sala || $tab_expediente->exp_estante || $tab_expediente->exp_cuerpo || $tab_expediente->exp_balda) {
$det .= '<tr><td>Unidad de instalación:</td><td colspan="3"></td></tr>';
}
if ($tab_expediente->exp_sala) {
$det .= '<tr><td><strong>Sala:</strong></td><td colspan="3">' . $tab_expediente->exp_sala . '</td></tr>';
}
if ($tab_expediente->exp_estante) {
$det .= '<tr><td><strong>Estante:</strong></td><td colspan="3">' . $tab_expediente->exp_estante . '</td></tr>';
}
if ($tab_expediente->exp_cuerpo) {
$det .= '<tr><td><strong>Cuerpo:</strong></td><td colspan="3">' . $tab_expediente->exp_cuerpo . '</td></tr>';
}
if ($tab_expediente->exp_balda) {
$det .= '<tr><td><strong>Balda:</strong></td><td colspan="3">' . $tab_expediente->exp_balda . '</td></tr>';
}
if ($expadicional) {
$det .= '<tr><td>Datos adicionales:</td><td colspan="3"></td></tr>' . $expadicional;
}
}
return $det;
}