function loadAjaxUnidades()
{
$fon_id = $_POST["Fon_id"];
$sql = "SELECT\r\n tab_fondo.fon_cod,\r\n tab_fondo.fon_descripcion,\r\n tab_unidad.uni_id,\r\n tab_unidad.uni_cod,\r\n tab_unidad.uni_codigo,\r\n tab_unidad.uni_descripcion,\r\n tab_unidad.uni_par\r\n FROM\r\n tab_unidad\r\n INNER JOIN tab_fondo ON tab_fondo.fon_id = tab_unidad.fon_id\r\n WHERE\r\n tab_unidad.uni_estado = 1\r\n AND tab_unidad.fon_id = '{$fon_id}'\r\n ORDER BY tab_fondo.fon_cod,\r\n tab_unidad.uni_cod ";
$unidad = new tab_unidad();
$result = $unidad->dbSelectBySQL($sql);
$res = array();
foreach ($result as $row) {
if ($row->uni_par == '-1') {
$res[$row->uni_id] = $row->uni_descripcion;
} else {
$res[$row->uni_id] = "----- " . $row->uni_descripcion;
}
}
echo json_encode($res);
}
function viewFolders2()
{
$cantidad_ejem = $_REQUEST['cantidad_ejem'];
$dim = $_REQUEST['dim'];
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, PDF_PAGE_FORMAT, true, 'UTF-8', false);
$pdf->SetCreator(PDF_CREATOR);
$pdf->SetAuthor($this->usuario->obtenerNombre($_SESSION['USU_ID']));
$pdf->SetTitle('Etiquetado de Expedientes');
$pdf->SetSubject('Etiquetado de Expedientes');
$pdf->SetDefaultMonospacedFont(PDF_FONT_MONOSPACED);
$pdf->SetKeywords('Castellon, IT, Castellon SRL');
$pdf->SetHeaderData('logo2.png', 25, 'ADMINISTRADORA BOLIVIANA DE CARRETERA', 'UNIDAD DE TECNOLOGIA, INFORMACION Y COMUNICACION');
$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(15, 0, PDF_MARGIN_RIGHT);
$pdf->SetHeaderMargin(PDF_MARGIN_HEADER);
$pdf->SetFooterMargin(PDF_MARGIN_FOOTER);
$pdf->SetAutoPageBreak(TRUE, PDF_MARGIN_BOTTOM);
$pdf->setImageScale(PDF_IMAGE_SCALE_RATIO);
$pdf->setLanguageArray($l);
$pdf->setPrintHeader(false);
$pdf->setPrintFooter(false);
//set auto page breaks
$pdf->SetAutoPageBreak(TRUE, 3);
$pdf->SetFont('helvetica', '', 17);
$st = '';
//$pdf->AddPage('P', 'LETTER');
$texp = new Tab_etiquetas();
$sql = "SELECT\r\n tab_fondo.fon_cod,\r\n u.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_nro,\r\n tab_fondo.fon_descripcion,\r\n (SELECT uni_descripcion from tab_unidad WHERE uni_id=u.uni_par) AS uni_par_cod,\r\n u.uni_codigo,\r\n u.uni_descripcion,\r\n tab_series.ser_categoria,\r\n tab_expisadg.exp_titulo,\r\n tab_expisadg.exp_anioi,\r\n tab_expisadg.exp_fecha_exi,\r\n (tab_expisadg.exp_fecha_exi +\r\n (SELECT tab_retensiondoc.red_prearc * INTERVAL '1 year'\r\n FROM tab_retensiondoc\r\n WHERE tab_retensiondoc.red_id = tab_series.red_id)) ::DATE AS exp_fecha_exf,\r\n tab_expediente.exp_nroejem,\r\n tab_expediente.exp_tomovol,\r\n tab_expediente.exp_nrocaj,\r\n (SELECT sof_nombre FROM tab_sopfisico WHERE sof_id=tab_expediente.sof_id AND tab_sopfisico.sof_estado = '1' ) AS sof_nombre,\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_archivo.fil_titulo,\r\n tab_archivo.fil_tomovol\r\n FROM\r\n tab_fondo\r\n INNER JOIN tab_unidad AS u ON tab_fondo.fon_id = u.fon_id\r\n INNER JOIN tab_series ON u.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_exparchivo ON tab_expediente.exp_id = tab_exparchivo.exp_id\r\n INNER JOIN tab_archivo ON tab_exparchivo.fil_id = tab_archivo.fil_id\r\n WHERE\r\n tab_fondo.fon_estado = 1 AND\r\n u.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_archivo.fil_estado=1 AND\r\n tab_expisadg.exp_estado = 1 AND\r\n tab_expediente.exp_id = '" . $_REQUEST['exp_id'] . "' ";
$valorsi = 0;
$rows = $texp->dbSelectBySQL($sql);
if (count($rows) == 0) {
$valorsi = 1;
$sql2 = "SELECT\r\n tab_fondo.fon_cod,\r\n u.uni_cod,\r\n tab_tipocorr.tco_codigo,\r\n tab_series.ser_codigo,\r\n tab_expediente.exp_codigo,\r\n tab_fondo.fon_descripcion,\r\n (SELECT uni_descripcion from tab_unidad WHERE uni_id=u.uni_par) AS uni_par_cod,\r\n u.uni_codigo,\r\n u.uni_descripcion,\r\n tab_series.ser_categoria,\r\n tab_expisadg.exp_titulo,\r\n tab_expisadg.exp_anioi,\r\n tab_expisadg.exp_fecha_exi,\r\n (tab_expisadg.exp_fecha_exi +\r\n (SELECT tab_retensiondoc.red_prearc * INTERVAL '1 year'\r\n FROM tab_retensiondoc\r\n WHERE tab_retensiondoc.red_id = tab_series.red_id)) ::DATE AS exp_fecha_exf,\r\n tab_expediente.exp_nroejem,\r\n tab_expediente.exp_tomovol,\r\n tab_expediente.exp_nrocaj,\r\n (SELECT sof_nombre FROM tab_sopfisico WHERE sof_id=tab_expediente.sof_id AND tab_sopfisico.sof_estado = '1' ) AS sof_nombre,\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 FROM\r\n tab_fondo\r\n INNER JOIN tab_unidad AS u ON tab_fondo.fon_id = u.fon_id\r\n INNER JOIN tab_series ON u.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 WHERE\r\n tab_fondo.fon_estado = 1 AND\r\n u.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_expisadg.exp_estado = 1 AND\r\n tab_expediente.exp_id = '" . $_REQUEST['exp_id'] . "'";
$rows = $texp->dbSelectBySQL($sql2);
}
if ($dim == 1) {
foreach ($rows as $value) {
$unicodigo = $value->uni_cod;
$extraer_unicodigo = explode(".", $unicodigo);
$cantidad_unicod = count($extraer_unicodigo);
if ($cantidad_unicod == 3) {
$codigo_extraido = $extraer_unicodigo[0] . "." . $extraer_unicodigo[1];
$tab_unidad = new Tab_unidad();
$papa_titulo = $tab_unidad->dbselectByField("uni_cod", $codigo_extraido);
$papa_titulo = $papa_titulo[0];
}
$st .= '<table border = "1" style="width: 170px;" cellspacing="0" >';
$st .= '<tr>';
$st .= '<td colspan="2" ><br>';
$st .= '<img src="' . PATH_ROOT . '/web/img/logo2.png" border="0" style="border-top:1px solid black"/>';
$st .= '</td>';
$st .= '</tr>';
$explode = explode(".", $value->uni_cod);
$tab_unidad = new tab_unidad();
$seccion = $tab_unidad->dbselectByField("uni_cod", $explode[0] . ".0");
$seccion = $seccion[0];
$st .= '<tr>';
$st .= '<td colspan="2">';
$st .= '<table border = "1" style="width: 100%; text-align: center" cellpadding="3">';
$st .= '<tr>';
if ($valorsi == 1) {
$st .= '<td style="font-size:35px;line-height:10px" height="38"><b>' . $value->fon_cod . DELIMITER . $value->uni_cod . DELIMITER . $value->tco_codigo . DELIMITER . $value->ser_codigo . DELIMITER . $value->exp_codigo . '</b></td>';
} else {
$st .= '<td style="font-size:35px;line-height:10px" height="38"><b>' . $value->fon_cod . DELIMITER . $value->uni_cod . DELIMITER . $value->tco_codigo . DELIMITER . $value->ser_codigo . DELIMITER . $value->exp_codigo . DELIMITER . $value->fil_nro . '</b></td>';
}
$st .= '</tr>';
$ex = explode("(", $seccion->uni_descripcion);
$st .= '<tr>';
$st .= '<td style="font-size:35px;padding-top:10px" height="95" bgcolor="#f2f2f2" ><b>';
if ($ex[1] == "") {
$st .= $seccion->uni_descripcion;
} else {
$convertsinparent = $ex[1] . "a";
$extraertParent = explode(")", $convertsinparent);
$st .= $extraertParent[0];
if ($cantidad_unicod == 3) {
$st .= " / " . $papa_titulo->uni_descripcion;
}
}
$st .= '</b></td>';
$st .= '</tr>';
// $objeto->Cell($ancho, $alto=0, $texto="", $borde=0, $salto_de_linea=0, $alineacion="", $fondo=false, $enlace="", $ajuste_horizontal=0, $ignore_min_height=false, $alin_vertical_texto='T', $alineacion_vertical='M')
$st .= '<tr>';
$st .= '<td style="font-size:42px;vertical-align: middle" height="75"><b>';
$st .= $value->uni_descripcion;
$st .= '</b></td>';
$st .= '</tr>';
$st .= '<tr>';
$st .= '<td bgcolor="#f2f2f2" style="font-size:40px;" height="92"><b>' . $value->ser_categoria . '</b></td>';
$st .= '</tr>';
$st .= '<tr>';
$st .= '<td height="303" style="font-size:35px"><br><br>';
if ($valorsi == 1) {
$st .= $value->exp_titulo;
} else {
$st .= $value->fil_titulo;
}
$st .= '</td>';
$st .= '</tr>';
$st .= '<tr>';
$st .= '<td bgcolor="#f2f2f2"><b>';
if ($valorsi == 1) {
$st .= $value->exp_tomovol;
} else {
$st .= $value->fil_tomovol;
}
$st .= '</b></td>';
$st .= '</tr>';
$st .= '<tr>';
$st .= '<td><b>' . $value->exp_anioi . '</b></td>';
$st .= '</tr>';
$st .= '</table>';
$st .= '</td>';
$st .= '</tr>';
$st .= '</table>';
}
$pdf->AddPage();
$pdf->writeHTML($st, false, false, false, false, '');
}
if ($dim == 2) {
foreach ($rows as $value) {
$st .= '<table border = "1" style="width: 205px;" cellspacing="0" >';
$st .= '<tr>';
$st .= '<td colspan="2" ><br>';
$st .= '<img src="' . PATH_ROOT . '/web/img/logo2.png" border="0" style="border-top:1px solid black"/>';
$st .= '</td>';
$st .= '</tr>';
$explode = explode(".", $value->uni_cod);
$tab_unidad = new tab_unidad();
$seccion = $tab_unidad->dbselectByField("uni_cod", $explode[0] . ".0");
$seccion = $seccion[0];
$st .= '<tr>';
$st .= '<td colspan="2">';
$st .= '<table border = "1" style="width: 100%; text-align: center" cellpadding="3">';
$st .= '<tr>';
if ($valorsi == 1) {
$st .= '<td style="font-size:40px;line-height:10px" height="38"><b>' . $value->fon_cod . DELIMITER . $value->uni_cod . DELIMITER . $value->tco_codigo . DELIMITER . $value->ser_codigo . DELIMITER . $value->exp_codigo . '</b></td>';
} else {
$st .= '<td style="font-size:40px;line-height:10px" height="38"><b>' . $value->fon_cod . DELIMITER . $value->uni_cod . DELIMITER . $value->tco_codigo . DELIMITER . $value->ser_codigo . DELIMITER . $value->exp_codigo . DELIMITER . $value->fil_nro . '</b></td>';
}
$st .= '</tr>';
$ex = explode("(", $seccion->uni_descripcion);
$st .= '<tr>';
$st .= '<td style="font-size:42px" height="55" bgcolor="#f2f2f2"><b>';
if ($ex[1] == "") {
$st .= $seccion->uni_descripcion;
} else {
$convertsinparent = $ex[1] . "a";
$extraertParent = explode(")", $convertsinparent);
$st .= $extraertParent[0];
}
$st .= '</b></td>';
$st .= '</tr>';
$st .= '<tr>';
$st .= '<td style="font-size:42px" height="75"><b>' . $value->uni_descripcion . '</b></td>';
$st .= '</tr>';
$st .= '<tr>';
$st .= '<td bgcolor="#f2f2f2" style="font-size:40px" height="92"><b>' . $value->ser_categoria . '</b></td>';
$st .= '</tr>';
$st .= '<tr>';
$st .= '<td height="330" style="font-size:45px" ><br><br>';
if ($valorsi == 1) {
$st .= $value->exp_titulo;
} else {
$st .= $value->fil_titulo;
}
$st .= '</td>';
$st .= '</tr>';
$st .= '<tr>';
$st .= '<td bgcolor="#f2f2f2"><b>';
if ($valorsi == 1) {
$st .= $value->exp_tomovol;
} else {
$st .= $value->fil_tomovol;
}
$st .= '</b></td>';
$st .= '</tr>';
$st .= '<tr>';
$st .= '<td><b>' . $value->exp_anioi . '</b></td>';
$st .= '</tr>';
$st .= '</table>';
$st .= '</td>';
$st .= '</tr>';
$st .= '</table>';
}
$pdf->AddPage();
$pdf->writeHTML($st, false, false, false, false, '');
}
if ($dim == 3) {
foreach ($rows as $value) {
$st .= '<table border = "1" style="width: 243px;" cellspacing="0" >';
$st .= '<tr>';
$st .= '<td colspan="2" ><br>';
$st .= '<img src="' . PATH_ROOT . '/web/img/logo2.png" border="0" style="border-top:1px solid black"/>';
$st .= '</td>';
$st .= '</tr>';
$explode = explode(".", $value->uni_cod);
$tab_unidad = new tab_unidad();
$seccion = $tab_unidad->dbselectByField("uni_cod", $explode[0] . ".0");
$seccion = $seccion[0];
$st .= '<tr>';
$st .= '<td colspan="2">';
$st .= '<table border = "1" style="width: 100%; text-align: center" cellpadding="3">';
$st .= '<tr>';
if ($valorsi == 1) {
$st .= '<td style="font-size:45px;line-height:10px" height="38"><b>' . $value->fon_cod . DELIMITER . $value->uni_cod . DELIMITER . $value->tco_codigo . DELIMITER . $value->ser_codigo . DELIMITER . $value->exp_codigo . '</b></td>';
} else {
$st .= '<td style="font-size:45px;line-height:10px" height="38"><b>' . $value->fon_cod . DELIMITER . $value->uni_cod . DELIMITER . $value->tco_codigo . DELIMITER . $value->ser_codigo . DELIMITER . $value->exp_codigo . DELIMITER . $value->fil_nro . '</b></td>';
}
$st .= '</tr>';
$ex = explode("(", $seccion->uni_descripcion);
$st .= '<tr>';
$st .= '<td style="font-size:42px" height="55" bgcolor="#f2f2f2"><b>';
if ($ex[1] == "") {
$st .= $seccion->uni_descripcion;
} else {
$convertsinparent = $ex[1] . "a";
$extraertParent = explode(")", $convertsinparent);
$st .= $extraertParent[0];
}
$st .= '</b></td>';
$st .= '</tr>';
$st .= '<tr>';
$st .= '<td style="font-size:42px" height="75"><b>';
$st .= $value->uni_descripcion;
$st .= '</b></td>';
$st .= '</tr>';
$st .= '<tr>';
$st .= '<td bgcolor="#f2f2f2" style="font-size:40px" height="92"><b>' . $value->ser_categoria . '</b></td>';
$st .= '</tr>';
$st .= '<tr>';
$st .= '<td height="313" style="font-size:45px"><br><br>';
if ($valorsi == 1) {
$st .= $value->exp_titulo;
} else {
$st .= $value->fil_titulo;
}
$st .= '</td>';
$st .= '</tr>';
$st .= '<tr>';
$st .= '<td bgcolor="#f2f2f2"><b>';
if ($valorsi == 1) {
$st .= $value->exp_tomovol;
} else {
$st .= $value->fil_tomovol;
}
$st .= '</b></td>';
$st .= '</tr>';
$st .= '<tr>';
$st .= '<td><b>' . $value->exp_anioi . '</b></td>';
$st .= '</tr>';
$st .= '</table>';
$st .= '</td>';
$st .= '</tr>';
$st .= '</table>';
}
$pdf->AddPage();
$pdf->writeHTML($st, false, false, false, false, '');
}
$pdf->Output('etiquetasFolders.pdf', 'I');
}
function loadAjaxUnidades()
{
$fon_id = $_POST["Fon_id"];
$sql = "SELECT \n uni_id,\n uni_par,\n uni_descripcion\n\t\tFROM\n\t\ttab_unidad\n\t\tWHERE\n tab_unidad.uni_estado = '1' AND\n tab_unidad.fon_id = '{$fon_id}'\n ORDER BY uni_cod ";
$unidad = new tab_unidad();
$result = $unidad->dbSelectBySQL($sql);
$res = array();
foreach ($result as $row) {
if ($row->uni_par == '-1') {
$res[$row->uni_id] = $row->uni_descripcion;
} else {
$res[$row->uni_id] = "----- " . $row->uni_descripcion;
}
}
echo json_encode($res);
}
function loadAjaxUnidades()
{
$uni_id = $_POST["Uni_id"];
$sql = "SELECT\r\n ser_id,\r\n ser_par,\r\n ser_categoria\r\n\t\tFROM\r\n\t\ttab_series\r\n\t\tWHERE\r\n tab_series.ser_estado = '1' AND\r\n tab_series.uni_id = '{$uni_id}'\r\n ORDER BY ser_id ";
$unidad = new tab_unidad();
$result = $unidad->dbSelectBySQL($sql);
$res = array();
foreach ($result as $row) {
if ($row->ser_par == '-1') {
$res[$row->ser_id] = $row->ser_categoria;
} else {
$res[$row->ser_id] = "----- " . $row->ser_categoria;
}
}
echo json_encode($res);
}
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 obtenerSeccion($valor)
{
$usuario = new tab_unidad();
$sql = "SELECT\r\n f.uni_descripcion,\r\n (SELECT uni_descripcion FROM tab_unidad WHERE uni_id =f.uni_par) AS tab_sec\r\n FROM\r\n tab_unidad as f\r\n WHERE\r\n f.uni_id = {$valor}";
$uni_descripcion = "";
$nombre = $usuario->dbSelectBySQL($sql);
foreach ($nombre as $row) {
$uni_descripcion = $row->uni_descripcion;
}
return $uni_descripcion;
}
