%PDF-
%PDF-
Mini Shell
Mini Shell
<?php
require 'flowing_block.php';
session_start();
require '../../../config/config.php';
$id_usuario = $_SESSION['usuario_id'];
$id_departamento = $_SESSION['id_departamento'];
//Biblioteca en uso, contiene:
// -FlowingBlock: Permite justificar y cargar estilos al texto encapsulados.
// -WriteHMTL: Permite cargar etiquestas HTML de estilos de texto.
// -Justify: Permite justificar sin cargar estilos de texto
// Variables y campos de insersión
// Usuario, fecha y lugar
$susart = $_POST['txtsusart'];
$sustit = $_POST['txtsustit'];
$susnom = $_POST['txtsusnom'];
$suspuegen;
$fedia = $_POST['txtfedia'];
$fediatex = convertirdia($fedia);
$femes = $_POST['txtfemes'];
$feano = $_POST['txtfeano'];
$fecha = $_POST['txtfecha'];
$lugloc = $_POST['txtlugloc'];
$lugest = $_POST['txtlugest'];
// Datos de solicitante
$solart = $_POST['txtsolart'];
$soltit = $_POST['txtsoltit'];
$solnom = $_POST['txtsolnom'];
$solineife = $_POST['txtsolineife'];
// Lugar de solicitante
$solloc2 = $_POST['txtsolloc2'];
$solest2 = $_POST['txtsolest2'];
$solmun2 = $_POST['txtsolmun2'];
$solcal = $_POST['txtsolcal'];
$solnum = $_POST['txtsolnum'];
$solcp = $_POST['txtsolcp'];
$solcol = $_POST['txtsolcol'];
$solelesta = $_POST['txtsolelesta'];
$solloc = $_POST['txtsolloc'];
$solest = $_POST['txtsolest'];
$solmun = $_POST['txtsolmun'];
// Datos de referente
$refart = $_POST['txtrefart'];
$reftit = $_POST['txtreftit'];
$refnom = $_POST['txtrefnom'];
$refineife = $_POST['txtrefineife'];
$solcal2 = $_POST['txtsolcal2'];
$solnum2 = $_POST['txtsolnum2'];
$solcp2 = $_POST['txtsolcp2'];
$solcol2 = $_POST['txtsolcol2'];
$esprel = $_POST['txtesprel'];
// Localidad de referente
$refelesta = $_POST['txtrefelesta'];
$refloc = $_POST['txtrefloc'];
$refest = $_POST['txtrefest'];
$refmun = $_POST['txtrefmun'];
$espjus = $_POST['txtespjus'];
$espfot = $_POST['txtespfot'];
// MEMBRETADO Y CABECERA
$cabdep = $_POST['txtcabdep'];
$cabsec = $_POST['txtcabsec'];
$cabram = $_POST['txtcabram'];
$cabexp = $_POST['txtcabexp'];
$cabofi = $_POST['txtcabofi'];
$cabini = $_POST['txtcabini'];
$cabley = $_POST['txtcabley'];
//Opcion
$oriopc = $_POST['txtoriopc'];
$pdfmembretado = $_POST['txtpdfmembretado'];
if ($susart=='El') {
$suspuegen='o';
}else{
$suspuegen='a';
}
if ($refelesta=='esta cabecera municipal') {
$refloc='';
}elseif ($refelesta=='el municipio') {
$refloc='';
}else{
$refloc=$refloc.', Mun. de ';
}
if ($solart=='el') {
$solpuegen='o';
}else{
$solpuegen='a';
}
if ($solelesta=='esta cabecera municipal') {
$solloc='';
}elseif ($solelesta=='el municipio') {
$solloc='';
}else{
$solloc=$solloc.', Mun. de ';
}
if ($solloc2==null) {
} else {
if ($oriopc=='2' || $oriopc=='3') {
$solloc2=$solloc2;
} elseif ($oriopc=='1') {
$solloc2=$solloc2.', Mun. de ';
}
}
//COMIENZA CONSTRUCIÓN DE PDF Y REGISTRO
$pdf = new PDF_FlowingBlock();
$pdf->AddPage();
if ($pdfmembretado>='1') {
// REGISTRO
$conf = new Configuracion();
$conf->conectarBD();
//Agregar ID usuario
$SQLinsertar = "INSERT INTO secretaria_tramites_constancias (`habilitado`,`id_tipo`,`id_usuario`,`id_area`,`formato`,`token`,`lugar_suscripcion`,`nombre_suscritor`,`nombre_solicitante`,`nombre_referente`,`nombre_solicitante2`,`credencial_solicitante`,`credencial_solicitante2`,`lugar_solicitante`,`direccion_solicitante`,`lugar_referente`,`direccion_referente`,`clave_documento`,`transporte`,`sepultura`,`manifesto`)
VALUES (1,1, $id_usuario ,$id_departamento , 'Constancia_bajos_recursos', 'NA', '$lugloc,$lugest', '$susnom', '$solnom', '$refnom', '', '', '', '', '$solcal,$solnum,$solcol,$solcp', '$solloc$solmun,$solest', '$solcal2,$solnum2,$solcol2,$solcp2', 'CLAVEDOC', '', '', 'Parentesco de referente: $esprel')";
$id_constancia = $conf->insertRegLID($SQLinsertar);
$num_folio = date('Y').'/C'.str_pad($id_constancia, 4, "0", STR_PAD_LEFT);
$token = ofusca_key($id_constancia);
$sql1 = "UPDATE secretaria_tramites_constancias SET token = '$token',clave_documento = '$num_folio' WHERE id_constancia = $id_constancia";
$conf->actualizacion($sql1);
}else{}
// MEMBRETADO
if ($pdfmembretado=='1') {
$pdf->Image('membretada.png',0,0,-300);
}else{}
// Cabecera derecha-superior
$pdf->SetTextColor(50 , 50, 50);
$pdf->SetFont('helvetica','B',8);
if ($cabdep==null) {}else{$pdf->Cell(135, 5, utf8_decode(' '), 0, 0, 'FJ');
$pdf->Cell(45, 5, utf8_decode('Dependencia: '.$cabdep), 0, 1, 'FJ');}
if ($cabsec==null) {}else{$pdf->Cell(135, 5, utf8_decode(' '), 0, 0, 'FJ');
$pdf->Cell(45, 5, utf8_decode('Sección: '.$cabsec), 0, 1, 'FJ');}
if ($cabram==null) {}else{$pdf->Cell(135, 5, utf8_decode(' '), 0, 0, 'FJ');
$pdf->Cell(45, 5, utf8_decode('Ramo: '.$cabram), 0, 1, 'FJ');}
if ($cabexp==null) {}else{$pdf->Cell(135, 5, utf8_decode(' '), 0, 0, 'FJ');
$pdf->Cell(45, 5, utf8_decode('Expediente: '.$cabexp), 0, 1, 'FJ');}
if ($cabofi==null) {$pdf->Cell(135, 5, utf8_decode(' '), 0, 0, 'FJ');
$pdf->Cell(45, 5, utf8_decode('Núm. Oficio: '.$num_folio), 0, 1, 'FJ');}else{
$pdf->Cell(135, 5, utf8_decode(' '), 0, 0, 'FJ');
$pdf->Cell(45, 5, utf8_decode('Núm. Oficio: '.$cabofi), 0, 1, 'FJ');
}
$pdf->SetFont('helvetica','B',12);
$pdf->Cell(180, 5, ' ', 0, 1, 'R');
$pdf->Cell(180, 5, ' ', 0, 1, 'R');
$pdf->Cell(180, 5, ' ', 0, 1, 'R');
$pdf->Cell(180, 5, ' ', 0, 1, 'R');
if ($cabley==null) {$pdf->Cell(180, 5, '', 0, 1, 'C');}else{
$pdf->Cell(180, 5, utf8_decode('"'.$cabley.'"'), 0, 1, 'C');
}
$pdf->Cell(180, 5, ' ', 0, 1, 'R');
$pdf->SetFont('helvetica','',12);
$pdf->SetTextColor(000 , 000, 000);
//BLOQUE FECHA
$pdf->SetFont('helvetica','B',12);
$pdf->Cell(180,8,utf8_decode(''.$lugloc.', '.$lugest.', a '.$fedia.' de '.$femes.' del '.$feano.''),0,0,'R',0);
$pdf->Cell(50,8,utf8_decode(''),0,0,'R',0);
$pdf->Cell(180,8,'',0,1,'FJ',0);
$pdf->Cell(180, 5, ' ', 0, 1, 'R');
$pdf->Cell(180, 5, ' ', 0, 1, 'R');
//Presentación y cuerpo de documento
$pdf->SetFont('helvetica','',12);
$pdf->Cell(180, 5, 'A QUIEN CORRESPONDA', 0, 1, 'L');
$pdf->Cell(180, 5, 'PRESENTE:', 0, 1, 'L');
$pdf->Cell(180, 5, ' ', 0, 1, 'R');
$pdf->Cell(180, 5, ' ', 0, 1, 'R');
$pdf->Cell(180, 5, ' ', 0, 1, 'R');
$pdf->Cell(180, 5, ' ', 0, 1, 'R');
//BLOQUE PARRAFO
$pdf->newFlowingBlock( 180, 5, 'J' );
$pdf->SetFont('helvetica','',11);
$pdf->WriteFlowingBlock(utf8_decode(' '.$susart.' que suscribe '));
$pdf->SetFont('helvetica','B',11);
$pdf->WriteFlowingBlock(utf8_decode(''.$sustit.' '.$susnom.' '));
$pdf->SetFont('helvetica','',11);
$pdf->WriteFlowingBlock(utf8_decode('Secretari'.$suspuegen.' del H. Ayuntamiento de '.$lugloc.', del Estado de '.$lugest.', hago constar que el día de hoy compareció ante este servicio público '.$solart.' '));
$pdf->SetFont('helvetica','B',11);
$pdf->WriteFlowingBlock(utf8_decode(''.$soltit.' '.$solnom.''));
$pdf->SetFont('helvetica','',11);
if ($oriopc=='1') {
if ($solloc==$solloc2 && $solmun==$solmun2 && $solest==$solest2) {
//Origen local
$pdf->WriteFlowingBlock(utf8_decode(', quien es originari'.$solpuegen.' y residente de'));
$pdf->WriteFlowingBlock(utf8_decode(' '.$solelesta.' de '));
$pdf->WriteFlowingBlock(utf8_decode($solloc.''.$solmun.', '.$solest.''));
}else{
$pdf->WriteFlowingBlock(utf8_decode(', quien es originari'.$solpuegen.' de '));
$pdf->WriteFlowingBlock(utf8_decode($solloc2.''.$solmun2.', '.$solest2.''));
$pdf->WriteFlowingBlock(utf8_decode(', y residente de'));
$pdf->WriteFlowingBlock(utf8_decode(' '.$solelesta.' de '));
$pdf->WriteFlowingBlock(utf8_decode($solloc.''.$solmun.', '.$solest.''));
}
} elseif ($oriopc=='2') {
//Origen en el extranjero
$pdf->WriteFlowingBlock(utf8_decode(', quien es originari'.$solpuegen.' de '));
$pdf->WriteFlowingBlock(utf8_decode($solloc2.''));
$pdf->WriteFlowingBlock(utf8_decode(', y residente de'));
$pdf->WriteFlowingBlock(utf8_decode(' '.$solelesta.' de '));
$pdf->WriteFlowingBlock(utf8_decode($solloc.''.$solmun.', '.$solest.''));
} elseif ($oriopc=='3') {
//No origen
$pdf->WriteFlowingBlock(utf8_decode(', quien es residente de'));
$pdf->WriteFlowingBlock(utf8_decode(' '.$solelesta.' de '));
$pdf->WriteFlowingBlock(utf8_decode($solloc.''.$solmun.', '.$solest.''));
}
if ($solcal==null && $solnum==null && $solcol==null && $solcp==null) {$pdf->WriteFlowingBlock(utf8_decode(', con domicilio Conocido'));}else{$pdf->WriteFlowingBlock(utf8_decode(', con domicilio ubicado en'));}
if ($solcal==null) {}else{$pdf->WriteFlowingBlock(utf8_decode(' la Calle '.$solcal.','));}
if ($solnum==null) {}else{$pdf->WriteFlowingBlock(utf8_decode(' Número '.$solnum.','));}
if ($solcol==null) {}else{$pdf->WriteFlowingBlock(utf8_decode(' Colonia '.$solcol.','));}
if ($solcp==null) {}else{$pdf->WriteFlowingBlock(utf8_decode(' C.P. '.$solcp.','));}
$pdf->SetFont('helvetica','B',11);
$pdf->WriteFlowingBlock(utf8_decode(' MANIFESTANDO BAJO PROTESTA DE DECIR VERDAD'));
$pdf->SetFont('helvetica','',11);
if ($esprel==null) {
//REFERENTE VACÍO SI ES EL MISMO SOLICITANTE
}else{
$pdf->WriteFlowingBlock(utf8_decode(', que '.$refart.' '));
$pdf->SetFont('helvetica','B',11);
$pdf->WriteFlowingBlock(utf8_decode(''.$reftit.' '.$refnom));
if ($refineife==null) {}else{$pdf->WriteFlowingBlock(utf8_decode(' con su credencial de identificación: '.$refineife.', '));}
$pdf->SetFont('helvetica','',11);
$pdf->WriteFlowingBlock(utf8_decode(' es su '));
$pdf->SetFont('helvetica','B',11);
$pdf->WriteFlowingBlock(utf8_decode($esprel));
$pdf->SetFont('helvetica','',11);
//if ($solineife==null) {}else{$pdf->WriteFlowingBlock(utf8_decode('quien se identifica con su credencial de elector dejando anexada una copia de la misma '.$solineife.''));}
if ($refcal==null && $refnum==null && $refcol==null && $refcp==null) {$pdf->WriteFlowingBlock(utf8_decode(', con domicilio Conocido '));}else{$pdf->WriteFlowingBlock(utf8_decode(', con domicilio particular ubicado en '));}
if ($refcal==null) {}else{$pdf->WriteFlowingBlock(utf8_decode('la Calle '.$refcal.', '));}
if ($refnum==null) {}else{$pdf->WriteFlowingBlock(utf8_decode('Número '.$refnum.', '));}
if ($refcol==null) {}else{$pdf->WriteFlowingBlock(utf8_decode('Colonia '.$refcol.', '));}
if ($refcp==null) {}else{$pdf->WriteFlowingBlock(utf8_decode('C.P. '.$refcp.', '));}
$pdf->WriteFlowingBlock(utf8_decode('en '.$refelesta.' de '));
$pdf->WriteFlowingBlock(utf8_decode($refloc.''.$refmun.', '.$refest.', '));
}
$pdf->WriteFlowingBlock(utf8_decode(' que es una persona de escasos recursos, '.$espjus.''));
if ($espfot==NO) {}else{$pdf->WriteFlowingBlock(utf8_decode('. Aparece la fotografía al margen superior derecho de la presente, para su plena identificación'));}
$pdf->WriteFlowingBlock(utf8_decode('.'));
$pdf->finishFlowingBlock();
$pdf->WriteHTML('<br>');
$pdf->SetFont('helvetica','',11);
$pdf->Multicell(180, 5,utf8_decode('A solicitud de la persona interesada, se extiende la presente para los usos legales que le convengan al interesado.'), 0, 'C');
//FIRMA Y PIE DE PAGINA
$pdf->WriteHTML('<br>');
$pdf->SetFont('helvetica','',12);
$pdf->Multicell(180, 5, 'ATENTAMENTE', 0, 'C', 0);
$pdf->WriteHTML('<br><br>');
$pdf->Multicell(180, 5, '_________________________', 0, 'C', 0);
$pdf->SetFont('helvetica','B',12);
$pdf->Cell(180, 5,'', 0, 1, 'C');
$pdf->Cell(180, 5, utf8_decode(''.$sustit.' '.$susnom.''), 0, 1, 'C');
$pdf->Cell(180, 5, utf8_decode('Secretari'.$suspuegen.' del H. Ayuntamiento'), 0, 1, 'C');
$pdf->WriteHTML('<br>');
$pdf->SetFont('helvetica','',8);
$pdf->Cell(180, 3, utf8_decode('C.c.p Archivo/'.$cabini), 0, 1, 'L');
if ($pdfmembretado>='1') {
$pdf->Cell(180, 3, utf8_decode("Sello digital: XML-".$token.date('d/m/Y')), 0, 1, 'L');
$dia = date("d");
$mes = date("m");
$anio = date("Y");
$targetDir = "../documentos/$anio/$mes/$dia/";
@rmdir($targetDir);
// Create target dir
if (!file_exists($targetDir)) {
@mkdir($targetDir,0777, true);
}
$token = md5(uniqid(rand(), true));
$file_name = $token.'.pdf';
$ruta = $targetDir.$file_name;
$db_url_img = "$anio/$mes/$dia/$file_name";
$SQLsave = "UPDATE secretaria_tramites_constancias SET url_pdf = '$db_url_img'
WHERE id_constancia = $id_constancia";
$conf->actualizacion($SQLsave);
$conf->desconectarDB();
$pdf->Output($ruta,"F");
}else{}
$pdf->Output();
?>
Zerion Mini Shell 1.0