//*************TRANSACCIONES***************
$pdf->SetXY(170,30);
$pdf->Cell(0,0,'Ingresos',0,0,M);
/* $pdf->SetXY(190,30);
$pdf->Cell(0,0,'Abonos',0,0,M); */
//****************************************
//cambiar fecha
//$myrow1['fecha1']=cambia_a_normal($myrow1['fecha1']);
//Imprimo con salto de pagina
$pdf->Ln(15); //salto de linea
$pdf->SetFont('Arial','',8);
$pdf->SetXY(2,7);
$pdf->Ln(25); //salto de linea
$sSQL= "SELECT * FROM cargosCuentaPaciente
WHERE
$pdf->Cell(30, 6, "�ͼ�����", 0, 1);
$pdf->SetXY(30, 50);
$pdf->Cell(60, 6, $dbarr['ward'], 0, 1);
$pdf->SetXY(90, 50);
$pdf->Cell(40, 6, "��§/��ͧ", 0, 1);
$pdf->SetXY(130, 50);
$pdf->Cell(80, 6, $dbarr['bed'], 0, 1);
$pdf->SetXY(0, 58);
$pdf->Cell(0, 6, "�Է�ԡ���ѡ�� " . $dbarr['ptright'], 0, 1);
$pdf->SetXY(0, 66);
$pdf->Cell(65, 6, "���ͧ.........................", 0, 1);
$pdf->SetXY(65, 66);
$pdf->Cell(65, 6, "����Ѻ�ͧ.....................", 0, 1);
$pdf->SetXY(130, 66);
$pdf->Cell(80, 6, "�ѹ���ͧ " . $dbarr['date_regis'], 0, 1);
$pdf->Ln();
$pdf->SetFont('THSarabun', "B", 17);
$pdf->Cell(0, 6, "���й�������ա�èͧ��§�����Ѻ��ç��Һ��", 0, 1);
$pdf->SetFont('THSarabun', "", 17);
$pdf->Cell(0, 6, "1.����ҵԴ���Ἱ�����¹����ѹ-���ҷ���к��㺹Ѵ���ͷ��͡��á���Ѻ����", 0, 1);
$pdf->Cell(0, 6, "2.���Ӻѵû�Шӵ�ǻ�ЪҪ��ͧ�������Ҵ�����ѹ������ҹ�ç��Һ��", 0, 1);
$pdf->SetFont('THSarabun', "B", 17);
$pdf->Cell(0, 6, "3.�óըͧ��ͧ�������� �ç��Һ�Ũ����Ǩ��§���ѹ� 1 �ѹ �ҡ��ͧ����������ҧ�е�ͧ���ͧ�����", 0, 1);
$pdf->Cell(0, 6, "��������ͧ����ɨ���ҧ�֧���������᷹�� ��е�ͧ�դ����ҵ�ʹ 24 ��.", 0, 1);
$pdf->SetFont('THSarabun', "", 17);
$pdf->Cell(0, 6, "4.�ͺ��������š�èͧ��§��ǧ˹���� 1 �ѹ ������ҹ�ç��Һ��", 0, 1);
$pdf->SetFont('THSarabun', "BU", 17);
$pdf->Cell(0, 6, "��������� 054-839305 ��� 1120-1121", 0, 1);
$pdf->SetFont('THSarabun', "", 17);
$pdf->Cell(0, 6, "5.�ҡ��ҹ����ҵ���Ѵ �Թ���� 14.00 �. �ҧ�ç��Һ�Ţ�ʧǹ�Է���¡��ԡ��èͧ��§/��ͧ", 0, 1);
$pdf->Cell(0, 6, "���ͺ�������§����Ѻ�����������蹵���", 0, 1);
//*************TRANSACCIONES***************
$pdf->SetXY(170,30);
$pdf->Cell(0,0,'DEBE',0,0,M);
$pdf->SetXY(190,30);
$pdf->Cell(0,0,'HABER',0,0,M);
//****************************************
//cambiar fecha
//$myrow1['fecha1']=cambia_a_normal($myrow1['fecha1']);
//Imprimo con salto de pagina
$pdf->Ln(15); //salto de linea
$pdf->SetFont('Arial','',8);
$pdf->SetXY(2,7);
$pdf->Ln(25); //salto de linea
$fecha = $fech[0];
$titulo1 = "SOLICITUD DE MATRÍCULA EN " . $n_curso . "º DE E.S.O.";
$an = substr($config['curso_actual'], 0, 4);
$an1 = $an + 1;
$hoy = formatea_fecha(date('Y-m-d'));
$cuerpo3 = "En " . $config['centro_localidad'] . ", a {$hoy}\nFirma del Padre/Madre/Representante legal D/Dª\n\n\n\nFdo. D/Dª ---------------------------------------------\nque asegura la veracidad de los datos registrados en el formulario.\n";
$datos_centro = "PROTECCIÓN DE DATOS.\n En cumplimiento de lo dispuesto en la Ley Orgánica 15/1999, de 13 de Diciembre, de Protección de Datos de Carácter Personal, el " . $config['centro_denominacion'] . " le informa que los datos personales obtenidos mediante la cumplimentación de este formulario y demás documentación que se adjunta van a ser incorporados, para su tratamiento, a nuestra base de datos, con la finalidad de recoger los datos personales y académicos del alumnado que cursa estudios en nuestro Centro, así como de las respectivas unidades familiares.\n De acuerdo con lo previsto en la Ley, puede ejercer los derechos de acceso, rectificación, cancelación y oposición dirigiendo un escrito a la Secretaría del Instituto en " . $config['centro_direccion'] . ", " . $config['centro_codpostal'] . " " . $config['centro_localidad'] . ", Málaga";
# insertamos la primera pagina del documento
$MiPDF->Addpage();
$MiPDF->SetFont('Times', '', 10);
$MiPDF->SetTextColor(0, 0, 0);
$MiPDF->SetFillColor(230, 230, 230);
// Formulario de matrícula
#Cuerpo.
$MiPDF->Image('../../img/encabezado2.jpg', 10, 10, 180, '', 'jpg');
$MiPDF->Ln(10);
$MiPDF->Multicell(0, 4, $titulo1, 0, 'C', 0);
$MiPDF->Ln(5);
$MiPDF->Cell(168, 6, "DATOS PERSONALES DEL ALUMNO", 1, 0, 'C', 1);
$MiPDF->Ln(8);
$MiPDF->Cell(112, 8, $apellidos, 1);
$MiPDF->Cell(56, 8, $nombre, 1);
$MiPDF->Ln(8);
$MiPDF->Cell(56, 8, $nacido, 1);
$MiPDF->Cell(56, 8, $provincia, 1);
$MiPDF->Cell(56, 8, $fecha_nacimiento, 1);
$MiPDF->Ln(8);
$MiPDF->Cell(72, 8, $domicilio, 1);
$MiPDF->Cell(40, 8, $localidad, 1);
$MiPDF->Cell(56, 8, $dni, 1);
$MiPDF->Ln(8);
} else {
$sSQL455 = "Select * from clientes where entidad='" . $_GET['entidad'] . "' and numCliente='" . $_GET['seguro'] . "'";
$result455 = mysql_db_query($basedatos, $sSQL455);
$myrow455 = mysql_fetch_array($result455);
}
$razonSocial1 = $myrow455['razonSocial1'];
$razonSocial = $myrow455['razonSocial'];
$nombreCliente = $myrow455['nomCliente'];
$pdf->SetXY(28, 27);
if ($_GET['razonSocial']) {
$pdf->Cell(0, 0, $_GET['razonSocial'], 0, 0, L);
} else {
if ($razonSocial) {
if ($razonSocial1) {
$pdf->Cell(0, 0, $razonSocial, 0, 0, L);
$pdf->Ln(3);
//salto de linea
$pdf->SetXY(28, 30);
$pdf->Cell(0, 0, $razonSocial1, 0, 0, L);
} else {
$pdf->Cell(0, 0, $razonSocial, 0, 0, L);
}
} else {
$pdf->Cell(0, 0, $nombreCliente, 0, L);
}
}
//expediente
$pdf->SetXY(22, 34);
if ($_GET['calle']) {
$pdf->Cell(0, 0, $_GET['calle'], 0, 0, L);
} else {
//usuario
$pdf->SetXY(2, 41);
$pdf->Cell(0, 0, 'Usuario: ' . $_GET['usuario'], 0, 0, L);
//REFERENCIA
$pdf->SetXY(2, 45);
$pdf->Cell(0, 0, 'numCorte: ' . $_GET['numCorte'], 0, 0, L);
//numero de paciente
$pdf->SetXY(302, 25);
$pdf->Cell(0, 0, 'Recibo: ' . $_GET['numRecibo'], 0, 0, R);
//cambiar fecha
//$myrow1['fecha1']=cambia_a_normal($myrow1['fecha1']);
$fecha1 = date("d/m/Y");
$pdf->SetY(40);
$pdf->Cell(0, 0, 'Fecha: ' . $fecha1, 0, 0, R);
//Imprimo con salto de pagina
$pdf->Ln(25);
//salto de linea
$pdf->SetFont('Arial', '', 10);
$pdf->SetXY(2, 37);
//dibujar una linea
$pdf->Line(2, 48, 200, 48);
//linea divisoria
//$pdf->Line(23, 48, 23, 52);
//etiquetas
$pdf->SetFont('Arial', '', 10);
$pdf->SetXY(2, 50);
$pdf->Cell(0, 0, 'C', 0, 0, L);
$pdf->SetXY(7, 50);
$pdf->Cell(0, 0, 'Descripcion', 0, 0, L);
$pdf->SetXY(183, 50);
$pdf->Cell(0, 0, 'Importe', 0, 0, L);
$pdf->SetXY(1, 30);
$pdf->Cell(0, 0, 'Folio', 0, 0, M);
$pdf->SetXY(15, 30);
$pdf->Cell(0, 0, 'Departamento', 0, 0, M);
$pdf->SetXY(170, 30);
$pdf->Cell(0, 0, 'Importe', 0, 0, M);
$pdf->SetXY(190, 30);
$pdf->Cell(0, 0, 'IVA', 0, 0, M);
//************************************
//cambiar fecha
//$myrow1['fecha1']=cambia_a_normal($myrow1['fecha1']);
$fecha1 = date("d/m/Y");
$pdf->SetY(10);
$pdf->Cell(0, 0, $fecha1, 0, 0, R);
//Imprimo con salto de pagina
$pdf->Ln(15);
//salto de linea
$pdf->SetFont('Arial', '', 8);
$pdf->SetXY(2, 7);
$pdf->Ln(25);
//salto de linea
$sSQL = "SELECT *,almacenes.descripcion as descri from cargosCuentaPaciente,clientesInternos,almacenes\r\nwhere\r\n\r\ncargosCuentaPaciente.entidad='" . $entidad . "'\r\nand\r\n(cargosCuentaPaciente.precioVenta!='' and cargosCuentaPaciente.folioVenta)\r\nand\r\ncargosCuentaPaciente.status='particular'\r\nand\r\ncargosCuentaPaciente.statusCaja='pagado'\r\nand\r\ncargosCuentaPaciente.numCorte='" . $_GET['numCorte'] . "'\r\nand\r\nclientesInternos.keyClientesInternos=cargosCuentaPaciente.keyClientesInternos\r\nand\r\ncargosCuentaPaciente.almacenDestino=almacenes.almacen\r\ngroup by clientesInternos.keyClientesInternos\r\norder by \r\ncargosCuentaPaciente.folioVenta,clientesInternos.paciente ASC\r\n ";
$result = mysql_db_query($basedatos, $sSQL);
while ($myrow = mysql_fetch_array($result)) {
$y += 7;
$y1 = 70;
$y1 += 1;
$sSQL7 = "SELECT sum(cargosCuentaPaciente.precioVenta*cargosCuentaPaciente.cantidad) as efectivo\r\nFROM\r\ncargosCuentaPaciente,almacenes\r\nWHERE\r\ncargosCuentaPaciente.entidad='" . $entidad . "' \r\nand\r\ncargosCuentaPaciente.almacenDestino='" . $myrow['almacenDestino'] . "' \r\nand\r\ncargosCuentaPaciente.almacenSolicitante=almacenes.almacen\r\nand\r\ncargosCuentaPaciente.numCorte='" . $_GET['numCorte'] . "'\r\nand\r\ncargosCuentaPaciente.statusCargo='cargado'\r\nand\r\ncargosCuentaPaciente.statusCaja='pagado'\r\nand\r\ncargosCuentaPaciente.status='particular'\r\n\r\n ";
$result7 = mysql_db_query($basedatos, $sSQL7);
$myrow7 = mysql_fetch_array($result7);
$sSQL71 = "SELECT sum(cargosCuentaPaciente.iva*cargosCuentaPaciente.cantidad) as ivas\r\nFROM\r\ncargosCuentaPaciente,almacenes\r\nWHERE\r\ncargosCuentaPaciente.entidad='" . $entidad . "' \r\nand\r\ncargosCuentaPaciente.almacenDestino='" . $myrow['almacenDestino'] . "' \r\nand\r\ncargosCuentaPaciente.almacenSolicitante=almacenes.almacen\r\nand\r\ncargosCuentaPaciente.numCorte='" . $_GET['numCorte'] . "'\r\nand\r\ncargosCuentaPaciente.statusCargo='cargado'\r\nand\r\ncargosCuentaPaciente.statusCaja='pagado'\r\nand\r\ncargosCuentaPaciente.status='particular'\r\n\r\n ";
$pdf->SetXY(2,10); $pdf->Cell(0,0,"HOSPITAL LA CARLOTA",0,0,M); $pdf->SetX(1); //**********************************************************************************************************PACIENTES INTERNOS PAGADOS*************************************************************************************************************************** $pdf->Ln(10); //salto de linea $pdf->SetX(2); $pdf->Cell(0,0,"IVA VENTAS DIRECTAS",0,0,M); $pdf->SetX(1); $sSQL= "SELECT * FROM cargosCuentaPaciente WHERE entidad='".$_GET['entidad']."' and (fechaCierre>='".$_GET['fechaInicial']."' and fechaCierre<='".$_GET['fechaFinal']."') and gpoProducto!='' and ventasDirectas='si' and iva>0
$fecha1=$_GET['fecha']; $pdf->SetY(10); $pdf->Cell(0,0,'Fecha Inicial: '.cambia_a_normal($_GET['fechaInicial']).' a la fecha: '.cambia_a_normal($_GET['fechaFinal']),0,0,R); /* $pdf->SetXY(2,10); $pdf->Cell(0,0,"HOSPITAL LA CARLOTA",0,0,M); */ $pdf->Ln(3); //salto de linea $pdf->SetXY(2,25); $pdf->Cell(0,0,"HONORARIOS PACIENTES INTERNOS",0,0,M); $pdf->SetX(1);
$cliente_direccion = $venta->cli_direccion;
$cliente_ruc = $venta->cli_ruc;
$e_fecha = $venta->_util->obtiene_fecha($venta->ven_fecha);
$fecha = explode("/", $e_fecha);
//si fecha esta en formato dia-mes-año
$dia = $fecha[0];
$mes = $venta->_util->ver_nombre_mes($fecha[1]);
$mes_numero = $fecha[1];
$anio = substr($fecha[2], 2);
$pdf->Cell(1.2, 0.4, '', 0, 0, 'L');
//señor(es)
$pdf->Cell(5.8, 0.4, $cliente_nombre, 0, 0, 'L');
$pdf->Cell(2, 0.4, '', 0, 0, 'L');
//documento
$pdf->Cell(2.8, 0.4, '', 0, 0, 'L');
$pdf->Ln(0.4);
$pdf->Cell(1.2, 0.4, '', 0, 0, 'L');
//señor(es)
$pdf->Cell(5.8, 0.4, '', 0, 0, 'L');
$pdf->Cell(2, 0.4, '', 0, 0, 'L');
//documento
$pdf->Cell(2.8, 0.4, '', 0, 0, 'L');
$pdf->Ln(0.4);
$pdf->Cell(1.2, 0.4, '', 0, 0, 'L');
//direccion
$pdf->Cell(5.8, 0.4, $cliente_direccion, 0, 0, 'L');
$pdf->Cell(2, 0.4, '', 0, 0, 'L');
//fecha
$pdf->Cell(2.8, 0.4, $e_fecha, 0, 0, 'R');
$pdf->Ln(0.4);
$pdf->Cell(1.2, 0.36, '', 0, 0, 'L');
//establece el nombre del paciente
$pdf->SetXY(2, 5);
$pdf->Cell(0, 0, 'FOLIOS DE VENTA', 0, 0, M);
$pdf->SetX(1);
//*****************ech*************
if (!$_GET['folioFactura']) {
$_GET['folioFactura'] = $_GET['numFactura'];
}
$fecha1 = $_GET['fecha'];
$pdf->SetY(10);
$pdf->Cell(0, 0, 'FACTURA #: ' . $_GET['folioFactura'], 0, 0, R);
$pdf->SetXY(2, 10);
$pdf->Cell(0, 0, "HOSPITAL LA CARLOTA", 0, 0, M);
$pdf->SetX(1);
//**********************************************************************************************************PACIENTES INTERNOS PAGADOS***************************************************************************************************************************
$pdf->Ln(10);
//salto de linea
$pdf->SetX(2);
$pdf->Cell(0, 0, "FOLIOS", 0, 0, M);
$pdf->SetX(30);
$pdf->Cell(0, 0, "PACIENTE", 0, 0, M);
$pdf->SetX(140);
$pdf->Cell(0, 0, "IMPORTE", 0, 0, M);
$pdf->SetX(170);
$pdf->Cell(0, 0, "IVA", 0, 0, M);
$pdf->SetX(190);
$pdf->Cell(0, 0, "TOTAL", 0, 0, M);
$pdf->SetX(1);
$sSQL = "SELECT * FROM facturasAplicadas\r\nWHERE\r\nentidad='" . $_GET['entidad'] . "'\r\nand\r\nnumSolicitud='" . $_GET['numSolicitud'] . "'\r\n\r\ngroup by folioVenta\r\norder by folioVenta\r\n\r\n";
$result = mysql_db_query($basedatos, $sSQL);
while ($myrow = mysql_fetch_array($result)) {
$pdf->SetXY(182, 18);
$pdf->Cell(0, 0, 'Aseg.', 0, 0, L);
}
$pdf->SetY(5);
$pdf->Cell(0, 0, $numeroTransaccion, 0, 0, R);
//numero de paciente
$pdf->SetXY(18, 10);
$pdf->Cell(0, 0, 'LISTADO DE PRECIOS ' . $_GET['almacen'], 0, 0, L);
$pdf->SetX(1);
//cambiar fecha
//$myrow1['fecha1']=cambia_a_normal($myrow1['fecha1']);
$fecha1 = date("d/m/Y");
$pdf->SetXY(170, 10);
$pdf->Cell(0, 0, $fecha1, 0, 0, L);
//Imprimo con salto de pagina
$pdf->Ln(15);
//salto de linea
$pdf->SetFont('Arial', '', 5);
$pdf->SetXY(30, 7);
$pdf->Ln(15);
//salto de linea
if ($_GET['referido'] == 'si') {
$sSQL = "SELECT *\r\nFROM\r\narticulos,existencias\r\n\r\nWHERE\r\nexistencias.codigo=articulos.codigo\r\nand\r\nexistencias.almacen='" . $_GET['almacen'] . "'\r\nand\r\narticulos.gpoProducto='" . $_GET['gpoProducto'] . "'\r\nand\r\narticulos.referido='si'\r\norder by \r\narticulos.descripcion ASC";
} else {
$sSQL = "SELECT *\r\nFROM\r\narticulos,existencias\r\n\r\nWHERE\r\nexistencias.codigo=articulos.codigo\r\nand\r\nexistencias.almacen='" . $_GET['almacen'] . "'\r\nand\r\narticulos.gpoProducto='" . $_GET['gpoProducto'] . "'\r\norder by \r\narticulos.descripcion ASC\r\n ";
}
$result = mysql_db_query($basedatos, $sSQL);
while ($myrow = mysql_fetch_array($result)) {
$codigo = $myrow['codigo'];
$gpoProducto = $myrow['gpoProducto'];
$SUBTOTAL[0] += $myrow['precioVenta'] * $myrow['cantidad'];
$venta->ventas_ver($_REQUEST['venta']);
$nro_documento = $venta->ven_nrodoc;
$cliente_nombre = $venta->cli_razonsocial;
$cliente_direccion = $venta->cli_direccion;
$cliente_ruc = $venta->cli_ruc;
$e_fecha = $venta->_util->obtiene_fecha($venta->ven_fecha);
$fecha = explode("/", $e_fecha);
//si fecha esta en formato dia-mes-año
$dia = $fecha[0];
$mes = $venta->_util->ver_nombre_mes($fecha[1]);
$mes_numero = $fecha[1];
$anio = substr($fecha[2], 2);
$pdf->Cell(1.7, 0.5, '', 0, 0, 'L');
//señor(es)
$pdf->Cell(10.8, 0.5, $cliente_nombre, 0, 0, 'L');
$pdf->Ln(0.5);
$pdf->Cell(1.7, 0.5, '', 0, 0, 'L');
//dirección
$pdf->Cell(10.8, 0.5, $cliente_direccion, 0, 0, 'L');
$pdf->Ln(0.5);
$pdf->Cell(1.7, 0.5, '', 0, 0, 'L');
//ruc
$pdf->Cell(2.5, 0.5, $cliente_ruc, 0, 0, 'L');
$pdf->Cell(2.7, 0.5, '', 0, 0, 'L');
//guia
$pdf->Cell(1.9, 0.5, '', 0, 0, 'L');
$pdf->Cell(1.1, 0.5, '', 0, 0, 'L');
//fecha
$pdf->Cell(2.6, 0.5, $e_fecha, 0, 0, 'L');
$pdf->Ln(0.5);
$pdf->Cell(1.9, 0.5, '', 0, 0, 'L');
$pdf->SetXY(2, 30);
$pdf->Cell(0, 0, 'Folio', 0, 0, M);
$pdf->SetXY(15, 30);
$pdf->Cell(0, 0, 'Recibo', 0, 0, M);
$pdf->SetXY(30, 30);
$pdf->Cell(0, 0, 'Descripcion', 0, 0, M);
//*************TRANSACCIONES***************
$pdf->SetXY(170, 30);
$pdf->Cell(0, 0, 'Cargos', 0, 0, M);
$pdf->SetXY(190, 30);
$pdf->Cell(0, 0, 'Abonos', 0, 0, M);
//****************************************
//cambiar fecha
//$myrow1['fecha1']=cambia_a_normal($myrow1['fecha1']);
//Imprimo con salto de pagina
$pdf->Ln(15);
//salto de linea
$pdf->SetFont('Arial', '', 8);
$pdf->SetXY(2, 7);
$pdf->Ln(25);
//salto de linea
$sSQL = "SELECT * FROM cargosCuentaPaciente\r\nWHERE\r\nentidad='" . $_GET['entidad'] . "'\r\n\r\nand\r\ncodigoCaja='" . $_GET['codigoCaja'] . "'\r\nand\r\nnumCorte='" . $_GET['numCorte'] . "'\r\nand\r\nfolioVenta!=''\r\n\r\n\r\n\r\n\r\n\r\ngroup by folioVenta\r\norder by \r\nnumRecibo,almacen ASC ";
$result = mysql_db_query($basedatos, $sSQL);
while ($myrow = mysql_fetch_array($result)) {
//*******************SOLO ENTRA AQUI UNA SOLA VEZ
if ($myrow['folioVenta'] != $folioVenta) {
$pdf->Ln(5);
//salto de linea
$pdf->SetX('2');
$pdf->Cell(0, 0, '* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *', 0, 0, L);
//****SOLO IMPRIMO EL NUMERO DE RECIBO
$pdf->SetFont('Arial', '', 10);
$pdf->line(2, 32, 203, 32);
$pdf->SetXY(2, 30);
$pdf->Cell(0, 0, 'Mov', 0, 0, M);
$pdf->SetXY(15, 30);
$pdf->Cell(0, 0, 'Concepto', 0, 0, M);
//*************TRANSACCIONES***************
$pdf->SetXY(170, 30);
$pdf->Cell(0, 0, 'DEBE', 0, 0, M);
$pdf->SetXY(190, 30);
$pdf->Cell(0, 0, 'HABER', 0, 0, M);
//****************************************
//cambiar fecha
//$myrow1['fecha1']=cambia_a_normal($myrow1['fecha1']);
//Imprimo con salto de pagina
$pdf->Ln(15);
//salto de linea
$pdf->SetFont('Arial', '', 8);
$pdf->SetXY(2, 7);
$pdf->Ln(25);
//salto de linea
$sSQL = "SELECT * FROM cargosCuentaPaciente\r\nWHERE\r\nentidad='" . $_GET['entidad'] . "'\r\nand\r\n(fecha1>='" . $_GET['fechaInicial'] . "' and fecha1<='" . $_GET['fechaFinal'] . "')\r\n\r\nand\r\ntipoPaciente='externo'\r\nand\r\ngpoProducto=''\r\nand\r\n(naturaleza='C' or naturaleza='A')\r\nand\r\nventasDirectas!='si'\r\norder by numMovimiento\r\n\r\n";
$result = mysql_db_query($basedatos, $sSQL);
while ($myrow = mysql_fetch_array($result)) {
//*******************SOLO ENTRA AQUI UNA SOLA VEZ
$pdf->Ln(3);
//salto de linea
//*************************************************************************
$pdf->SetX('2');
$pdf->Cell(0, 0, $myrow['numMovimiento'], 0, 0, M);
$pdf->SetX('15');
$pdf->SetFont('Arial', '', 10);
$pdf->line(2, 32, 203, 32);
$pdf->SetXY(1, 30);
$pdf->Cell(0, 0, 'Folio', 0, 0, M);
$pdf->SetXY(15, 30);
$pdf->Cell(0, 0, 'Departamento', 0, 0, M);
$pdf->SetXY(190, 30);
$pdf->Cell(0, 0, 'Importe', 0, 0, M);
//************************************
//cambiar fecha
//$myrow1['fecha1']=cambia_a_normal($myrow1['fecha1']);
$fecha1 = date("d/m/Y");
$pdf->SetY(10);
$pdf->Cell(0, 0, $fecha1, 0, 0, R);
//Imprimo con salto de pagina
$pdf->Ln(15);
//salto de linea
$pdf->SetFont('Arial', '', 8);
$pdf->SetXY(2, 7);
$pdf->Ln(25);
//salto de linea
$sSQL = "SELECT * from clientesInternos,cargosCuentaPaciente\r\nwhere\r\n\r\ncargosCuentaPaciente.entidad='" . $entidad . "'\r\nand\r\nclientesInternos.status='devolucion'\r\nand\r\n(cargosCuentaPaciente.precioVenta!='' and cargosCuentaPaciente.folioVenta)\r\n\r\nand\r\ncargosCuentaPaciente.statusCaja='pagado'\r\nand\r\ncargosCuentaPaciente.numCorte='" . $_GET['numCorte'] . "'\r\nand\r\nclientesInternos.keyClientesInternos=cargosCuentaPaciente.keyClientesInternos\r\ngroup by cargosCuentaPaciente.keyClientesInternos\r\norder by \r\ncargosCuentaPaciente.folioVenta ASC\r\n ";
$result = mysql_db_query($basedatos, $sSQL);
while ($myrow = mysql_fetch_array($result)) {
$y += 7;
$y1 = 70;
$y1 += 1;
$cos = "\$" . number_format($myrow['precioVenta'] * $myrow['cantidad'], 2);
$efectivo[0] += $myrow['precioVenta'] * $myrow['cantidad'];
$iva[0] += $myrow71['ivas'];
$pdf->Ln(3);
$datos_junta = "PROTECCIÓN DE DATOS.\n En cumplimiento de lo dispuesto en la Ley Orgánica 15/1999, de 13 de Diciembre, de Protección de Datos de Carácter Personal, la Consejería de Educación le informa que los datos personales obtenidos mediante la cumplimentación de este formulario y demás documentación que se adjunta van a ser incorporados, para su tratamiento, al fichero 'Séneca. Datos personales y académicos del alumnado', con la finalidad de recoger los datos personales y académicos del alumnado que cursa estudios en centros dependientes de la Conserjería de Educación, así como de las respectivas unidades familiares.\n De acuerdo con lo previsto en la Ley, puede ejercer los derechos de acceso, rectificación, cancelación y oposición dirigiendo un escrito a la Secretaría General Técnica de la Conserjería de Educación de la Junta de Andalucía en Avda. Juan Antonio de Vizarrón, s/n, Edificio Torretriana 41071 SEVILLA";
// Normas de telefonía móvil
$titulo_moviles = "SOBRE EL USO DE TELÉFONOS MÓVILES Y OTROS DISPOSITIVOS EN EL CENTRO";
$texto_moviles = "\n Estimadas familias:\n\n Les informamos de que está prohibido el uso de teléfonos móviles y otros dispositivos de grabación/reproducción multimedia por parte del alumnado durante el horario escolar. Dicha medida es consecuencia de salvaguardar la intimidad tanto del alumnado como del profesorado, quienes pudieran ver vulnerados sus derechos de protección por grabaciones y/o difusiones de imágenes capturadas de forma ajena a su voluntad. Por este motivo, recordamos que la utilización de estos aparatos está prohibida en el Centro. En caso de que algún alumno sea sorprendido con cualquier dispositivo electrónico, este le será requisado aplicándose las medidas que en materia de convivencia hay estipuladas en nuestro Reglamento al efecto.\n El teléfono móvil en el Centro es absolutamente innecesario y constituye un elemento perturbador del clima de estudio y trabajo en el mismo. En aquellos casos en los que el alumnado tenga que comunicarse con la familia (que se entienden como situaciones graves o de urgencia), los teléfonos del Centro están siempre a disposición del alumnado. \n Por último anunciar que dado que se ha dejado claro que están prohibidos estos dispositivos en el instituto, informamos que el Centro no se hace responsable ni va a mediar en situaciones donde se produzcan <<desapariciones>> de dichos dispositivos dentro de nuestras instalaciones.";
$final_moviles = "\nD./Dª. {$papa}, con DNI número {$datos_ya->dnitutor}, padre/madre/tutor legal del alumno/ a {$datos_ya->nombre} {$datos_ya->apellidos} del curso {$curso}, teniendo en cuenta la información aportada, es conocedor de la prohibición de la tenencia y uso de los teléfonos móviles, así como de cualquier otro dispositivo electrónico que difunda o grabe imágenes de vídeo/audio.\n";
$firma_moviles = "\nFirmado,\n\n\nPadre/madre/tutor legal.";
// Formulario de la junta
$pags = array("1", "2");
foreach ($pags as $pag_pdf) {
$MiPDF->Addpage();
#### Cabecera con dirección
$MiPDF->SetFont('Times', 'B', 10);
$MiPDF->SetTextColor(0, 0, 0);
$MiPDF->SetFillColor(230, 230, 230);
$MiPDF->Image('../../img/encabezado2.jpg', 10, 10, 180, '', 'jpg');
$MiPDF->Ln(8);
$titulo2 = "MATRÍCULA DE " . $n_curso . "º DE BACHILLERATO";
$MiPDF->Multicell(0, 4, $titulo2, 0, 'C', 0);
$MiPDF->Ln(8);
$MiPDF->SetFont('Times', '', 7);
$MiPDF->Cell(21, 6, "Nº MATRÍCULA: ", 0);
$MiPDF->Cell(24, 6, "", 1);
$adv = " ANTES DE FIRMAR ESTE IMPRESO, COMPRUEBE QUE CORRESPONDE A LA\n\t ETAPA EDUCATIVA EN LA QUE DESEA REALIZAR LA MATRÍCULA.\n\t ESTA MATRÍCULA ESTÁ CONDICIONADA A LA COMPROBACIÓN DE LOS DATOS, DE CUYA\n\t VERACIDAD SE RESPONSABILIZA LA PERSONA FIRMANTE. ";
$MiPDF->MultiCell(120, 3, $adv, 0, 'L', 0);
$MiPDF->Ln(5);
$MiPDF->SetFont('Times', '', 10);
$MiPDF->Cell(5, 6, "1", 1, 0, 'C', 1);
$MiPDF->Cell(163, 6, "DATOS PERSONALES DEL ALUMNO", 1, 0, 'C', 1);
$MiPDF->Ln(8);
$MiPDF->Cell(84, 5, "APELLIDOS", 0, 0, "C");
$MiPDF->Cell(84, 5, "NOMBRE", 0, 0, "C");
$pdf->SetXY(2, 30);
$pdf->Cell(0, 0, 'Folio', 0, 0, M);
$pdf->SetXY(15, 30);
$pdf->Cell(0, 0, 'Recibo', 0, 0, M);
$pdf->SetXY(30, 30);
$pdf->Cell(0, 0, 'Descripción', 0, 0, M);
//*************TRANSACCIONES***************
$pdf->SetXY(170, 30);
$pdf->Cell(0, 0, 'Cargos', 0, 0, M);
$pdf->SetXY(190, 30);
$pdf->Cell(0, 0, 'Abonos', 0, 0, M);
//****************************************
//cambiar fecha
//$myrow1['fecha1']=cambia_a_normal($myrow1['fecha1']);
//Imprimo con salto de pagina
$pdf->Ln(15);
//salto de linea
$pdf->SetFont('Arial', '', 8);
$pdf->SetXY(2, 7);
$pdf->Ln(25);
//salto de linea
$sSQL = "SELECT * FROM cargosCuentaPaciente\r\nWHERE\r\nentidad='" . $_GET['entidad'] . "'\r\nand\r\ncodigoCaja='" . $_GET['codigoCaja'] . "'\r\nand\r\nnumCorte='" . $_GET['numCorte'] . "'\r\n\r\n\r\norder by \r\nnumRecibo ASC\r\n ";
$result = mysql_db_query($basedatos, $sSQL);
while ($myrow = mysql_fetch_array($result)) {
if ($myrow['folioVenta'] != $folioVenta) {
$pdf->Ln(5);
//salto de linea
$pdf->SetX('2');
$pdf->Cell(0, 0, '* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *', 0, 0, L);
}
$y += 7;
//$pdf->SetXY(2,37);
//dibujar una linea
$pdf->Line(2, 48, 200, 48);
//linea divisoria
//$pdf->Line(23, 48, 23, 52);
//etiquetas
$pdf->SetFont('Arial', '', 10);
$pdf->SetXY(2, 50);
$pdf->Cell(0, 0, 'C', 0, 0, L);
$pdf->SetXY(7, 50);
$pdf->Cell(0, 0, 'Descripcion', 0, 0, L);
$pdf->SetXY(183, 50);
$pdf->Cell(0, 0, 'Importe', 0, 0, L);
$pdf->Line(2, 52, 200, 52);
//*****************
$pdf->Ln(5);
//salto de linea 15 lineas
$pdf->SetFont('Arial', '', 10);
$sSQL3171 = "Select * From catTTCaja WHERE banderaPaquete = 'si'";
$result3171 = mysql_db_query($basedatos, $sSQL3171);
$myrow3171 = mysql_fetch_array($result3171);
$codigoTT = $myrow3171['codigoTT'];
$sSQL40 = "\r\nSELECT\r\n*\r\nFROM\r\ncatTTCaja\r\nWHERE codigoTT='" . $codigoTT . "'";
$result40 = mysql_db_query($basedatos, $sSQL40);
$myrow40 = mysql_fetch_array($result40);
$sSQL40c = "\r\n SELECT\r\nSUM(precioVenta*cantidad) as suma,SUM(iva*cantidad) as sumaIVA\r\nFROM\r\ncargosCuentaPaciente\r\nWHERE\r\nfolioVenta='" . $_GET['folioVenta'] . "'\r\nand\r\nnaturaleza='C'\r\n";
$result40c = mysql_db_query($basedatos, $sSQL40c);
$myrow40c = mysql_fetch_array($result40c);
$pdf->SetX('2');
$pdf->Cell(0, 0, '1', 0, 0, L);
$pdf->SetX('7');
/*
$pdf->SetXY(180,30);
$pdf->Cell(0,0,'Cantidad',0,0,M);
*/
//****************************************
//cambiar fecha
//$myrow1['fecha1']=cambia_a_normal($myrow1['fecha1']);
//Imprimo con salto de pagina
$pdf->Ln(15); //salto de linea
$pdf->SetFont('Arial','',8);
$pdf->SetXY(2,7);
//etiquetas
$pdf->SetFont('Arial','',10);
$pdf->SetXY(3,49);
//$pdf->Cell(0,0,'C',0,0,L);
$pdf->SetXY(12,49);
//$pdf->Cell(0,0,'Descripcion',0,0,L);
$pdf->SetXY(186,55);
//$pdf->Cell(0,0,'Importe',0,0,L);
//$pdf->Line(3, 51, 199, 51);
//*****************
$pdf->SetFont('Arial','',10);
$pdf->Ln(2); //salto de linea 15 lineas
$sSQL= "SELECT *
FROM
cargosCuentaPaciente
WHERE
entidad='".$_GET['entidad']."'
and
folioVenta='".$_GET['folioVenta']."'
and
(naturaleza='A' or naturaleza='C')
order by status='transaccion'
//$pdf->SetXY(140,30);
//$pdf->Cell(0,0,'Hora',0,0,M);
//
//$pdf->SetXY(160,30);
//$pdf->Cell(0,0,'Fecha',0,0,M);
$pdf->SetXY(140, 30);
$pdf->Cell(0, 0, 'Status', 0, 0, M);
$pdf->SetXY(155, 30);
$pdf->Cell(0, 0, 'Costo', 0, 0, M);
$pdf->SetXY(180, 30);
$pdf->Cell(0, 0, 'Cantidad', 0, 0, M);
//****************************************
//cambiar fecha
//$myrow1['fecha1']=cambia_a_normal($myrow1['fecha1']);
//Imprimo con salto de pagina
$pdf->Ln(15);
//salto de linea
$pdf->SetFont('Arial', '', 8);
$pdf->SetXY(2, 7);
$pdf->SetX(2);
$pdf->Ln(15);
//salto de linea
//$pdf->Cell(0,0,"Reposiciones de Venta",0,0,M);
$pdf->SetX(1);
$pdf->Ln(10);
//salto de linea
$sSQL = "\r\n \r\n\r\nSELECT \r\n*\r\nFROM\r\ncargosCuentaPaciente\r\nWHERE \r\nentidad='" . $_GET['entidad'] . "'\r\n and\r\n folioVenta='" . $_GET['folioVenta'] . "'\r\n and\r\n numSolicitud='" . $_GET['numSolicitud'] . "'\r\nand\r\nalmacenDestino='" . $_GET['almacenDestino'] . "'\r\n";
$result = mysql_db_query($basedatos, $sSQL);
while ($myrow = mysql_fetch_array($result)) {
$a += 1;
$vector += 20;
if ($hermanos == '' or $hermanos == '0') {
$hermanos = "";
}
}
$fech = explode(" ", $fecha_total);
$fecha = $fech[0];
$datos_junta = "PROTECCIÓN DE DATOS.\n En cumplimiento de lo dispuesto en la Ley Orgánica 15/1999, de 13 de Diciembre, de Protección de Datos de Carácter Personal, la Consejería de Educación le informa que los datos personales obtenidos mediante la cumplimentación de este formulario y demás documentación que se adjunta van a ser incorporados, para su tratamiento, al fichero 'Séneca. Datos personales y académicos del alumnado', con la finalidad de recoger los datos personales y académicos del alumnado que cursa estudios en centros dependientes de la Conserjería de Educación, así como de las respectivas unidades familiares.\n De acuerdo con lo previsto en la Ley, puede ejercer los derechos de acceso, rectificación, cancelación y oposición dirigiendo un escrito a la Secretaría General Técnica de la Conserjería de Educación de la Junta de Andalucía en Avda. Juan Antonio de Vizarrón, s/n, Edificio Torretriana 41071 SEVILLA";
// Formulario de la junta
for ($i = 1; $i < 3; $i++) {
$MiPDF->Addpage();
#### Cabecera con dirección
$MiPDF->SetFont('Times', 'B', 10);
$MiPDF->SetTextColor(0, 0, 0);
$MiPDF->SetFillColor(230, 230, 230);
$MiPDF->Image('../../img/encabezado2.jpg', 10, 10, 180, '', 'jpg');
$MiPDF->Ln(15);
$titulo1 = "SOLICITUD DE MATRÍCULA EN " . $n_curso . "º DE BACHILLERATO";
$MiPDF->Multicell(0, 4, $titulo1, 0, 'C', 0);
$MiPDF->Ln(5);
$MiPDF->SetFont('Times', '', 10);
$MiPDF->Cell(5, 6, "1", 1, 0, 'C', 1);
$MiPDF->Cell(163, 6, "DATOS PERSONALES DEL ALUMNO", 1, 0, 'C', 1);
$MiPDF->Ln(8);
$MiPDF->Cell(84, 5, "APELLIDOS", 0, 0, "C");
$MiPDF->Cell(84, 5, "NOMBRE", 0, 0, "C");
$MiPDF->Ln(5);
$MiPDF->Cell(84, 5, $datos_ya->apellidos, 1, 0, 'C');
$MiPDF->Cell(84, 5, $datos_ya->nombre, 1, 0, 'C');
$MiPDF->Ln(8);
$MiPDF->Cell(40, 5, "FECHA NACIMIENTO", 0, 0, "C");
$MiPDF->Cell(26, 5, "DNI/NIE", 0, 0, "C");
//dibujar una linea
$pdf->Line(3, 47, 199, 47);
//linea divisoria
//$pdf->Line(23, 48, 23, 52);
//etiquetas
$pdf->SetFont('Arial', '', 10);
$pdf->SetXY(2, 49);
$pdf->Cell(0, 0, 'C', 0, 0, L);
$pdf->SetXY(7, 49);
$pdf->Cell(0, 0, 'Descripcion', 0, 0, L);
$pdf->SetXY(186, 49);
$pdf->Cell(0, 0, 'Importe', 0, 0, L);
$pdf->Line(3, 51, 199, 51);
//*****************
$pdf->SetFont('Arial', '', 10);
$pdf->Ln(2);
//salto de linea 15 lineas
$sSQL = "SELECT *\r\nFROM\r\ncargosCuentaPaciente\r\nWHERE \r\nentidad='" . $_GET['entidad'] . "'\r\nand\r\nfolioVenta='" . $_GET['folioVenta'] . "'\r\nand\r\nrandom='" . $_GET['random'] . "'\r\n\r\n ";
$result = mysql_db_query($basedatos, $sSQL);
$registros = mysql_num_rows($result);
while ($myrow = mysql_fetch_array($result)) {
$codigoTT = $myrow['tipoTransaccion'];
$flag += 1;
$pdf->Ln(2);
//salto de linea
$cargos[0] += $myrow['precioVenta'] * $myrow['cantidad'];
$ivaCargos[0] += $myrow['iva'] * $myrow['cantidad'];
if ($myrow['statusDescuento'] == 'si') {
$totalDescuento[0] += $myrow['precioVenta'] * $myrow['cantidad'];
}
$codigoTT = $myrow['tipoTransaccion'];
//$pdf->Cell(0,0,'FOLIOS',0,0,M);
$pdf->SetFont('Arial', '', 10);
$pdf->SetXY(1, 30);
//$pdf->Cell(0,0,'Recibo',0,0,M);
//$pdf->SetXY(2,30);
//$pdf->Cell(0,0,'Tipo de Pago',0,0,M);
//$pdf->SetXY(110,30);
//$pdf->Cell(0,0,'Importe',0,0,M);
//**********************s**************
//cambiar fecha
//$myrow1['fecha1']=cambia_a_normal($myrow1['fecha1']);
$fecha1 = date("d/m/Y");
$pdf->SetY(10);
$pdf->Cell(0, 0, $fecha1, 0, 0, R);
//Imprimo con salto de pagina
$pdf->Ln(15);
//salto de linea
$pdf->SetFont('Arial', '', 8);
$pdf->Ln(17);
//salto de linea
//************************************
$sSQLa = "SELECT sum(precioVenta) as efectivo\r\nFROM\r\ncargosCuentaPaciente\r\nWHERE\r\nentidad='" . $_GET['entidad'] . "' \r\nand\r\nstatus='transaccion'\r\nand\r\ntipoPago='Efectivo'\r\nand\r\ncodigoCaja='" . $_GET['codigoCaja'] . "' \r\nand\r\nnumCorte='" . $_GET['numCorte'] . "'\r\nand\r\nstatusCaja='pagado'\r\n\r\n\r\n ";
$resulta = mysql_db_query($basedatos, $sSQLa);
$myrowa = mysql_fetch_array($resulta);
$pdf->Cell(0, 0, 'Efectivo', 0, 0, M);
$pdf->SetX(110);
$pdf->Cell(0, 0, '$' . number_format($myrowa['efectivo'], 2), 0, 0, M);
//*******************************************************
$pdf->Ln(4);
//salto de linea
//************************************