$result12a = mysql_db_query($basedatos, $sSQL12a);
$myrow12a = mysql_fetch_array($result12a);
$cos = $myrow['precioVenta'] * $myrow['cantidad'];
$imp = "\$" . number_format($importe, 2);
if ($codigoTT != NULL) {
//es una transaccion
if ($myrow['tipoPago'] == 'Tarjeta de Credito') {
$descripcion = 'T.Trans: ' . $myrow['tipoPago'] . ',Banco: ' . $myrow['bancoTC'] . ', CodAut: ' . $myrow['codigoAutorizacion'] . ', U.Dígitos: ' . $myrow['ultimosDigitos'];
} else {
if ($myrow['tipoPago'] == 'Cheque') {
$descripcion = 'Transacción: ' . $myrow['tipoPago'] . ',Banco: ' . $myrow['bancoCheque'] . ', #Cheque: ' . $myrow['numeroCheque'];
} else {
$descripcion = 'Tipo de Pago: ' . $myrow['tipoPago'];
}
}
$pdf->SetX('20');
$pdf->Cell(0, 0, trim($descripcion), 0, 0, L);
} else {
if ($myrow38['impresionEspecial'] == 'si') {
$descripcion = $myrow38['descripcionImpresion'];
//$pdf->SetX('40');
//$pdf->Cell(0,0,trim($descripcion),0,0,L);
$pdf->Ln(2);
//salto de linea
//$pdf->Ln(3); //salto de linea
$pdf->SetX('20');
$pdf->SetFont('Arial', '', 10);
$pdf->Cell(0, 0, $descripcion, 0, 0, L);
$pdf->Ln(4);
//salto de linea
$pdf->SetX('20');
}
//******************************************************************
if($seguro)$paciente=$seguro;
$sSQL2c= "Select * From contadorEntregaGranel WHERE keySol='".$_GET['keySol']."' ";
$result2c=mysql_db_query($basedatos,$sSQL2c);
$myrow2c = mysql_fetch_array($result2c);
$pdf->SetFont('Arial','',10);
//establece el nombre del paciente
$pdf->SetXY(2,5);
$pdf->Cell(0,0,'HOSPITAL LA CARLOTA',0,0,M);
$pdf->SetX(1);
//*****************ech*************
//$fecha1=$_GET['fecha'];
$pdf->SetY(10);
$pdf->Cell(0,0,'Orden: '.$myrow2c['contador'],0,0,R);
$pdf->SetXY(2,10);
return $lafecha;
}
//******************************************************************
if($seguro)$paciente=$seguro;
$pdf->SetFont('Arial','',10);
//establece el nombre del paciente
$pdf->SetXY(2,5);
$pdf->Cell(0,0,'POLIZA DE DIARIO',0,0,M);
$pdf->SetX(1);
//*****************ech*************
$fecha1=$_GET['fecha'];
$pdf->SetY(10);
$pdf->Cell(0,0,cambia_a_normal($fecha1),0,0,R);
$pdf->SetXY(2,10);
} else {
if ($myrow['tipoPago'] == 'Cheque') {
$descripcion = 'Transaccion: ' . $myrow['tipoPago'] . ',Banco: ' . $myrow['bancoCheque'] . ', #Cheque: ' . $myrow['numeroCheque'];
} else {
$descripcion = 'Tipo de Pago: ' . $myrow40['descripcion'];
}
}
if ($myrow['statusDescuento'] == 'si' or $myrow['statusCortesia'] == 'si' or $myrow['statusBeneficencia'] == 'si') {
$sSQL1yz = "Select * From usuarios WHERE entidad='" . $_GET['entidad'] . "' AND usuario='" . $myrow['usuarioDescuento'] . "' ";
$result1yz = mysql_db_query($basedatos, $sSQL1yz);
$myrow1yz = mysql_fetch_array($result1yz);
$descripcionDescuento = ', por: ' . $myrow1yz['nombre'] . ' ' . $myrow1yz['aPaterno'] . ' ' . $myrow1yz['aMaterno'];
} else {
$descripcionDescuento = '';
}
$pdf->SetX('5');
$pdf->Cell(0, 0, $descripcion . $descripcionDescuento . ': $' . number_format($myrow['precioVenta'] * $myrow['cantidad'], 2), 0, 0, L);
} else {
if ($myrow38['impresionEspecial'] == 'si') {
$descripcion = $myrow38['descripcionImpresion'];
//$pdf->SetX('40');
//$pdf->Cell(0,0,trim($descripcion),0,0,L);
$pdf->Ln(2);
//salto de linea
//$pdf->Ln(3); //salto de linea
$pdf->SetX('5');
//$pdf->SetFont('Arial','',10);
$pdf->SetFont('Arial', '', $textoSize);
$pdf->Cell(0, 0, $descripcion, 0, 0, L);
$pdf->Ln(4);
//salto de linea
$myrow7 = mysql_fetch_array($result7);
$sSQL7d = "SELECT SUM(precioVenta*cantidad) as acumulado,SUM(iva*cantidad) as sumaIVA\r\n FROM\r\n cargosCuentaPaciente\r\n WHERE\r\nentidad='" . $_GET['entidad'] . "'\r\nand\r\ngpoProducto='" . $myrow['gpoProducto'] . "'\r\nand\r\n numFactura='" . $_GET['folioFactura'] . "'\r\n and\r\n\r\n gpoProducto='" . $C . "'\r\n\r\n and \r\n naturaleza='A'\r\n ";
$result7d = mysql_db_query($basedatos, $sSQL7d);
$myrow7d = mysql_fetch_array($result7d);
$cargos[0] += $myrow7['acumulado'];
$abonos[0] += $myrow7d['acumulado'];
$ivaCargos[0] += $myrow7['sumaIVA'];
$ivaAbonos[0] += $myrow7d['sumaIVA'];
//*****************************************************
$sSQL38d = "\r\n SELECT \r\n porcentajeFacturacion\r\n FROM\r\n facturasAplicadas\r\n WHERE folioVenta='" . $das . "'";
$result38d = mysql_db_query($basedatos, $sSQL38d);
$myrow38d = mysql_fetch_array($result38d);
$importe2[0] += $myrow7['acumulado'];
$sumaIVAS[0] += $myrow7['sumaIVA'];
if ($myrow38['impresionFactura'] != 'si') {
$pdf->SetX('22');
$pdf->Cell(0, 0, $myrow38['descripcionGP'], 0, 0, L);
}
//*********************************************************** especial
if ($myrow38['impresionFactura'] == 'si') {
//$pdf->Ln(4); //salto de linea
$sSQLy = "\r\nSELECT almacenDestino from cargosCuentaPaciente\r\nwhere\r\nfolioVenta='" . $myrow['folioVenta'] . "'\r\nand\r\ngpoProducto='" . $myrow['gpoProducto'] . "'\r\nand tipoCliente='aseguradora'\r\ngroup by almacenDestino\r\n";
$resulty = mysql_db_query($basedatos, $sSQLy);
$r = 34;
$pdf->SetX(22);
//$pdf->Cell(0,0,'Departamentos: ',0,0,L);
while ($myrowy = mysql_fetch_array($resulty)) {
$s += 10;
$sSQL7j = "SELECT SUM(precioVenta*cantidad) as acumulado\r\nFROM\r\ncargosCuentaPaciente\r\nWHERE\r\nfolioVenta='" . $myrow['folioVenta'] . "'\r\nand\r\ngpoProducto='" . $myrow['gpoProducto'] . "'\r\nand\r\nalmacenDestino='" . $myrowy['almacenDestino'] . "'\r\nand\r\nnaturaleza='C'\r\n";
$result7j = mysql_db_query($basedatos, $sSQL7j);
$myrow7j = mysql_fetch_array($result7j);
//**************************************************
function cambia_a_normal($fecha)
{
ereg("([0-9]{2,4})-([0-9]{1,2})-([0-9]{1,2})", $fecha, $mifecha);
$lafecha = $mifecha[3] . "/" . $mifecha[2] . "/" . $mifecha[1];
return $lafecha;
}
//******************************************************************
if ($seguro) {
$paciente = $seguro;
}
$pdf->SetFont('Arial', '', 10);
//establece el nombre del paciente
$pdf->SetXY(2, 5);
$pdf->Cell(0, 0, 'REPORTE DETALLE DE CAJA', 0, 0, M);
$pdf->SetX(1);
//******************************
$fecha1 = date("d/m/Y");
$pdf->SetY(10);
$pdf->Cell(0, 0, $fecha1, 0, 0, R);
//*****************************
$sSQL1a = "Select * From statusCaja where keyCatC='" . $_GET['codigoCaja'] . "' and numCorte='" . $_GET['numCorte'] . "' order by keySTC DESC";
$result1a = mysql_db_query($basedatos, $sSQL1a);
$myrow1a = mysql_fetch_array($result1a);
$pdf->SetXY(2, 10);
$pdf->Cell(0, 0, "Diario de Caja", 0, 0, M);
$pdf->SetX(1);
$pdf->SetXY(2, 13);
$pdf->Cell(0, 0, 'Cajero(a): ' . $myrow1a['usuario'], 0, 0, M);
$pdf->SetX(1);
//********************************************
$codigoTT = $myrow['tipoTransaccion'];
$sSQL39 = "\r\n\tSELECT \r\ndescripcion,codigo,gpoProducto\r\nFROM\r\narticulos\r\nWHERE codigo='" . $myrow['codProcedimiento'] . "'";
$result39 = mysql_db_query($basedatos, $sSQL39);
$myrow39 = mysql_fetch_array($result39);
$sSQL40 = "\r\n SELECT\r\n*\r\nFROM\r\ncatTTCaja\r\nWHERE codigoTT='" . $codigoTT . "'";
$result40 = mysql_db_query($basedatos, $sSQL40);
$myrow40 = mysql_fetch_array($result40);
$sSQL38 = "\r\nSELECT \r\nimpresionEspecial,descripcionImpresion\r\nFROM\r\ngpoProductos\r\nWHERE codigoGP='" . $myrow39['gpoProducto'] . "'";
$result38 = mysql_db_query($basedatos, $sSQL38);
$myrow38 = mysql_fetch_array($result38);
$cos = "\$" . number_format($myrow['precioVenta'] * $myrow['cantidad'] + $sumaIVA[0], 2);
$imp = "\$" . number_format($importe, 2);
if ($codigoTT and $myrow['status'] == 'transaccion') {
//es una transaccion
$descripcion = $myrow40['descripcion'];
$pdf->SetX('40');
$pdf->Cell(0, 0, trim($descripcion), 0, 0, L);
} else {
if ($myrow38['impresionEspecial'] == 'si') {
$descripcion = $myrow38['descripcionImpresion'];
$pdf->SetX('40');
$pdf->Cell(0, 0, trim($descripcion), 0, 0, L);
$pdf->Ln(2);
//salto de linea
$pdf->Ln(3);
//salto de linea
$pdf->SetX('40');
$pdf->SetFont('Arial', '', 8);
$pdf->Cell(0, 0, $myrow39['descripcion'], 0, 0, L);
} else {
$pdf->SetX('40');
$lafecha=$mifecha[3]."/".$mifecha[2]."/".$mifecha[1];
return $lafecha;
}
//******************************************************************
if($seguro)$paciente=$seguro;
$pdf->SetFont('Arial','',10);
//establece el nombre del paciente
$pdf->SetXY(2,5);
$pdf->Cell(0,0,'HOSPITAL LA CARLOTA',0,0,M);
$pdf->SetX(1);
//*****************ech*************
$entidad=$_GET['entidad'];
$date=date("d/m/Y");
$fe=$_GET['fechaCorte'];
$fecha1=date("Y-m-d");
$pdf->SetY(10);
$pdf->Cell(0,0,'Fecha de Impresion '.$date,0,0,R);
$pdf->SetXY(50, 18);
$pdf->Cell(0, 0, $ctaMayor, 0, 0, L);
if ($_GET['particular'] == 'si') {
$pdf->SetXY(170, 18);
$pdf->Cell(0, 0, 'Part.', 0, 0, L);
}
if ($_GET['aseguradora'] == 'si') {
$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 {
//************devuelve seguro
$sSQL39 = "SELECT *\r\nFROM\r\nclientes\r\nwhere \r\nnumCliente='" . $seguro . "'";
$result39 = mysql_db_query($basedatos, $sSQL39);
$myrow39 = mysql_fetch_array($result39);
$seguro = $myrow39['nomCliente'];
$auxiliar = $myrow39['ID_AUXILIAR'];
$ctaMayor = $myrow39['ID_CTAMAYOR'];
//**********cierra devolver seguro
if ($seguro) {
$paciente = $seguro;
}
$pdf->SetFont('Arial', '', 10);
//establece el nombre del paciente
$pdf->SetXY(2, 5);
$pdf->Cell(0, 0, 'HOSPITAL LA CARLOTA', 0, 0, M);
$pdf->SetX(1);
$pdf->SetY(5);
$pdf->Cell(0, 0, 'Num. Corte: ' . $numCorte, 0, 0, R);
//numero de paciente
$pdf->SetXY(2, 10);
$pdf->Cell(0, 0, "Diario de Caja", 0, 0, M);
$pdf->SetX(1);
$pdf->SetXY(2, 13);
$pdf->Cell(0, 0, 'Cajero(a): ' . $usuario, 0, 0, M);
$pdf->SetX(1);
//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
$myrow12a = mysql_fetch_array($result12a);
$cos = $myrow['precioVenta'] * $myrow['cantidad'];
$imp = "\$" . number_format($importe, 2);
if ($myrow['tipoTransaccion'] != NULL) {
//es una transaccion
if ($myrow['tipoPago'] == 'Tarjeta de Credito') {
$descripcion = 'T.Trans: ' . $myrow['tipoPago'] . ',Banco: ' . $myrow['bancoTC'] . ', CodAut: ' . $myrow['codigoAutorizacion'] . ', U.Digitos: ' . $myrow['ultimosDigitos'];
} else {
if ($myrow['tipoPago'] == 'Cheque') {
$descripcion = 'Transaccion: ' . $myrow['tipoPago'] . ',Banco: ' . $myrow['bancoCheque'] . ', #Cheque: ' . $myrow['numeroCheque'];
} else {
//************** cambiar *******************************************
$descripcion = 'Tipo de Pago: ' . $myrow40['descripcion'];
}
}
$pdf->SetX('12');
$pdf->Cell(0, 0, $myrow['descripcionArticulo'], 0, 0, L);
$pdf->Ln(4);
//salto de linea
if ($myrow['statusDescuento'] == 'si' or $myrow['statusCortesia'] == 'si' or $myrow['statusBeneficencia'] == 'si') {
$sSQL1yz = "Select * From usuarios WHERE entidad='" . $_GET['entidad'] . "' AND usuario='" . $myrow['usuarioDescuento'] . "' ";
$result1yz = mysql_db_query($basedatos, $sSQL1yz);
$myrow1yz = mysql_fetch_array($result1yz);
$descripcionDescuento = ', por: ' . $myrow1yz['nombre'] . ' ' . $myrow1yz['aPaterno'] . ' ' . $myrow1yz['aMaterno'];
} else {
$descripcionDescuento = '';
}
$pdf->SetX('12');
$pdf->Cell(0, 0, $descripcion . $descripcionDescuento . ': $' . number_format($myrow['precioVenta'] * $myrow['cantidad'], 2), 0, 0, L);
} else {
if ($myrow38['impresionEspecial'] == 'si') {
//***************************************************
$sSQL71 = "SELECT descripcion\r\nFROM\r\narticulos\r\nWHERE\r\nentidad='" . $entidad . "'\r\nand\r\ncodigo='" . $myrow['codProcedimiento'] . "'\r\n ";
$result71 = mysql_db_query($basedatos, $sSQL71);
$myrow71 = mysql_fetch_array($result71);
$codigoTT = $myrow['tipoTransaccion'];
$sSQL39 = "\r\n\tSELECT \r\ndescripcion,codigo,gpoProducto\r\nFROM\r\narticulos\r\nWHERE codigo='" . $myrow['codProcedimiento'] . "'";
$result39 = mysql_db_query($basedatos, $sSQL39);
$myrow39 = mysql_fetch_array($result39);
$sSQL40 = "\r\n SELECT\r\n*\r\nFROM\r\ncatTTCaja\r\nWHERE codigoTT='" . $codigoTT . "'";
$result40 = mysql_db_query($basedatos, $sSQL40);
$myrow40 = mysql_fetch_array($result40);
$sSQL39a = "\r\n\tSELECT \r\ndescripcion,medico\r\nFROM\r\nalmacenes\r\nWHERE almacen='" . $myrow['almacenDestino'] . "'";
$result39a = mysql_db_query($basedatos, $sSQL39a);
$myrow39a = mysql_fetch_array($result39a);
if ($myrow38['impresionEspecial'] == 'si') {
$pdf->SetX('22');
$pdf->Cell(0, 0, $myrow38['descripcionImpresion'], 0, 0, L);
$pdf->Ln(4);
//salto de linea
$pdf->SetX('22');
if ($myrow39a['medico'] == 'si') {
$pdf->Cell(0, 0, 'Dr(a): ' . $myrow39a['descripcion'], 0, 0, L);
} else {
$pdf->Cell(0, 0, $myrow71['descripcion'], 0, 0, L);
}
} else {
$pdf->SetX('22');
$pdf->Cell(0, 0, $myrow38['descripcionImpresion'], 0, 0, L);
$pdf->SetX('22');
$pdf->Cell(0, 0, '', 0, 0, L);
$pdf->SetX('22');
//************devuelve seguro
$sSQL39 = "SELECT *\r\nFROM\r\nclientes\r\nwhere \r\nnumCliente='" . $seguro . "'";
$result39 = mysql_db_query($basedatos, $sSQL39);
$myrow39 = mysql_fetch_array($result39);
$seguro = $myrow39['nomCliente'];
$auxiliar = $myrow39['ID_AUXILIAR'];
$ctaMayor = $myrow39['ID_CTAMAYOR'];
//**********cierra devolver seguro
if ($seguro) {
$paciente = $seguro;
}
$pdf->SetFont('Arial', '', 8);
//establece el nombre del paciente
$pdf->SetXY(50, 10);
$pdf->Cell(0, 0, $auxiliar, 0, 0, L);
$pdf->SetX(1);
$pdf->SetXY(50, 15);
$pdf->Cell(0, 0, $ctaMayor, 0, 0, L);
$pdf->SetX(1);
$pdf->SetY(5);
$pdf->Cell(0, 0, $numeroTransaccion, 0, 0, R);
//numero de paciente
$pdf->SetXY(50, 5);
$pdf->Cell(0, 0, $paciente, 0, 0, L);
$pdf->SetX(1);
//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->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
$sSQL4 = "SELECT descripcion\r\nFROM\r\ncargosCuentaPaciente\r\nWHERE\r\nentidad='" . $_GET['entidad'] . "'\r\nand\r\nnumMovimiento='" . $_GET['numMovimiento'] . "'\r\nand\r\ndescripcion!=''\r\n\r\n\r\n ";
$result4 = mysql_db_query($basedatos, $sSQL4);
$myrow4 = mysql_fetch_array($result4);
$pdf->Ln(4);
//salto de linea
$pdf->SetX(7);
$pdf->Cell(0, 0, $myrow4['descripcion'], 0, 0, L);
$pdf->Ln(4);
//salto de linea
$sSQL = "SELECT *\r\nFROM\r\ncargosCuentaPaciente\r\nWHERE \r\nentidad='" . $_GET['entidad'] . "'\r\nand\r\nnumMovimiento='" . $_GET['numMovimiento'] . "'\r\n\r\n\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
if ($myrow['gpoProducto'] != '') {
if ($myrow['naturaleza'] == 'C') {
$cargos[0] += $myrow['precioVenta'] * $myrow['cantidad'];
$ivaCargos[0] += $myrow['iva'] * $myrow['cantidad'];
$lafecha=$mifecha[3]."/".$mifecha[2]."/".$mifecha[1];
return $lafecha;
}
//******************************************************************
if($seguro)$paciente=$seguro;
$pdf->SetFont('Arial','',10);
//establece el nombre del paciente
$pdf->SetXY(2,5);
$pdf->Cell(0,0,'REPORTE X FOLIOS DE VENTA PX EXTERNOS' ,0,0,M);
$pdf->SetX(1);
//*****************ech*************
$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);
//************devuelve seguro
$sSQL39 = "SELECT *\r\nFROM\r\nclientes\r\nwhere \r\nnumCliente='" . $seguro . "'";
$result39 = mysql_db_query($basedatos, $sSQL39);
$myrow39 = mysql_fetch_array($result39);
$seguro = $myrow39['nomCliente'];
$auxiliar = $myrow39['ID_AUXILIAR'];
$ctaMayor = $myrow39['ID_CTAMAYOR'];
//**********cierra devolver seguro
if ($seguro) {
$paciente = $seguro;
}
$pdf->SetFont('Arial', '', 10);
//establece el nombre del paciente
$pdf->SetXY(2, 5);
$pdf->Cell(0, 0, 'HOSPITAL LA CARLOTA', 0, 0, M);
$pdf->SetX(1);
$pdf->SetY(5);
$pdf->Cell(0, 0, 'Num. Corte: ' . $_GET['numCorte'], 0, 0, R);
//numero de paciente
$pdf->SetXY(2, 10);
$pdf->Cell(0, 0, "Diario de Caja", 0, 0, M);
$pdf->SetX(1);
$pdf->SetXY(2, 13);
$pdf->Cell(0, 0, 'Cajero(a): ' . $usuario, 0, 0, M);
$pdf->SetX(1);
//***********************************EFECTIVO SOLAMENTE***********************************
$pdf->SetFont('Arial', '', 12);
$pdf->SetXY(1, 25);
$pdf->Cell(0, 0, 'EFECTIVO', 0, 0, M);
$pdf->SetFont('Arial', '', 10);
$pdf->line(2, 32, 200, 32);
$result13 = mysql_db_query($basedatos, $sSQL13);
$myrow13 = mysql_fetch_array($result13);
$iva = $myrow13['sumaiva'];
$pdf->SetFont('Arial', '', 12);
//establece el nombre del paciente
$pdf->SetXY(22, 18);
$pdf->Cell(0, 0, 'Descripci�n', 0, 0, L);
$pdf->SetXY(175, 18);
$pdf->Cell(0, 0, 'Descuento', 0, 0, L);
$pdf->Line(23, 21, 200, 21);
$pdf->SetY(5);
$pdf->Cell(0, 0, $numeroTransaccion, 0, 0, R);
//numero de paciente
$pdf->SetXY(30, 5);
$pdf->Cell(0, 0, $_GET['titulo'], 0, 0, L);
$pdf->SetX(1);
//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', '', 10);
$pdf->SetXY(30, 7);
$pdf->Ln(15);
//salto de linea
$sSQL = "SELECT *\r\nFROM\r\narticulos,existencias\r\n\r\nWHERE\r\nexistencias.codigo=articulos.codigo\r\nand\r\nexistencias.almacen='" . $_GET['almacen'] . "'\r\norder by \r\narticulos.descripcion ASC\r\n ";
$result = mysql_db_query($basedatos, $sSQL);
while ($myrow = mysql_fetch_array($result)) {
$lafecha=$mifecha[3]."/".$mifecha[2]."/".$mifecha[1];
return $lafecha;
}
//******************************************************************
if($seguro)$paciente=$seguro;
$pdf->SetFont('Arial','',10);
//establece el nombre del paciente
$pdf->SetXY(2,5);
$pdf->Cell(0,0,'RESUMEN DETALLADO DE FACTURAS',0,0,M);
$pdf->SetX(1);
//*****************ech*************
$fecha1=$_GET['fecha'];
$pdf->SetY(10);
$pdf->Cell(0,0,cambia_a_normal($fecha1),0,0,R);
$pdf->SetY(20);
if($_GET['fechaImpresion']!=NULL){
//************devuelve seguro
$sSQL39 = "SELECT *\r\nFROM\r\nclientes\r\nwhere \r\nnumCliente='" . $seguro . "'";
$result39 = mysql_db_query($basedatos, $sSQL39);
$myrow39 = mysql_fetch_array($result39);
$seguro = $myrow39['nomCliente'];
$auxiliar = $myrow39['ID_AUXILIAR'];
$ctaMayor = $myrow39['ID_CTAMAYOR'];
//**********cierra devolver seguro
if ($seguro) {
$paciente = $seguro;
}
$pdf->SetFont('Arial', '', 10);
//establece el nombre del paciente
$pdf->SetXY(2, 5);
$pdf->Cell(0, 0, 'HOSPITAL LA CARLOTA', 0, 0, M);
$pdf->SetX(1);
$pdf->SetY(5);
$pdf->Cell(0, 0, 'Num. Corte: ' . $_GET['numCorte'], 0, 0, R);
//numero de paciente
$pdf->SetXY(2, 10);
$pdf->Cell(0, 0, "Diario de Caja", 0, 0, M);
$pdf->SetX(1);
$pdf->SetXY(2, 13);
$pdf->Cell(0, 0, 'Cajero(a): ' . $usuario, 0, 0, M);
$pdf->SetX(1);
//***********************************EFECTIVO SOLAMENTE***********************************
$pdf->SetFont('Arial', '', 12);
$pdf->SetXY(1, 25);
$pdf->Cell(0, 0, 'Devoluciones', 0, 0, M);
$pdf->SetFont('Arial', '', 10);
$pdf->line(2, 32, 203, 32);
if($myrow['tipoTransaccion']!=NULL){
//es una transaccion
if($myrow['tipoPago']=='Tarjeta de Credito'){
$descripcion='T.Trans: '.$myrow['tipoPago'].',Banco: '.$myrow['bancoTC'].', CodAut: '.$myrow['codigoAutorizacion'].', U.Digitos: '.$myrow['ultimosDigitos'];
}else if($myrow['tipoPago']=='Cheque'){
$descripcion='Transaccion: '.$myrow['tipoPago'].',Banco: '.$myrow['bancoCheque'].', #Cheque: '.$myrow['numeroCheque'];
}else{
//************** cambiar *******************************************
$descripcion='Tipo de Pago: '.$myrow40['descripcion'];
}
$pdf->SetX('3');
$pdf->Cell(0,0,$myrow['descripcionArticulo'],0,0,L);
$pdf->Ln(4); //salto de linea
if($myrow['statusDescuento']=='si' or $myrow['statusCortesia']=='si' or $myrow['statusBeneficencia']=='si'){
$sSQL1yz= "Select * From usuarios WHERE entidad='".$_GET['entidad']."' AND usuario='".$myrow['usuarioDescuento']."' ";
$result1yz=mysql_db_query($basedatos,$sSQL1yz);
$myrow1yz = mysql_fetch_array($result1yz);
$descripcionDescuento=', por: '.$myrow1yz['nombre'].' '.$myrow1yz['aPaterno'].' '.$myrow1yz['aMaterno'];
}else{
$descripcionDescuento='';
$lafecha=$mifecha[3]."/".$mifecha[2]."/".$mifecha[1];
return $lafecha;
}
//******************************************************************
if($seguro)$paciente=$seguro;
$pdf->SetFont('Arial','',10);
//establece el nombre del paciente
$pdf->SetXY(2,5);
$pdf->Cell(0,0,'REPORTE DE VENTAS DIRECTAS',0,0,M);
$pdf->SetX(1);
//*****************ech*************
$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);
$myrow39 = mysql_fetch_array($result39);
$sSQL40 = "\r\n SELECT\r\n*\r\nFROM\r\ncatTTCaja\r\nWHERE codigoTT='" . $codigoTT . "'";
$result40 = mysql_db_query($basedatos, $sSQL40);
$myrow40 = mysql_fetch_array($result40);
$sSQL39a = "\r\n\tSELECT \r\ndescripcion,medico\r\nFROM\r\nalmacenes\r\nWHERE almacen='" . $myrow['almacenDestino'] . "'";
$result39a = mysql_db_query($basedatos, $sSQL39a);
$myrow39a = mysql_fetch_array($result39a);
//*********************************
if ($folioVenta1 != $myrow['folioVenta']) {
$sSQL38e = "\r\nSELECT \r\npaciente\r\nFROM\r\nclientesInternos\r\nWHERE folioVenta='" . $myrow['folioVenta'] . "'";
$result38e = mysql_db_query($basedatos, $sSQL38e);
$myrow38e = mysql_fetch_array($result38e);
//
//ENCABEZADO DEL FOLIO DE VENTA
$pdf->SetFont('Arial', 'B', 8);
$pdf->SetX('22');
$pdf->Cell(0, 0, $myrow['folioVenta'] . ' ' . $myrow38e['paciente'], 0, 0, L);
$pdf->Ln(4);
//salto de linea
$folioVenta1 = $myrow['folioVenta'];
}
//****************************************
if ($myrow['naturaleza'] == 'A') {
$signo = '-';
} else {
$signo = '';
}
$pdf->SetFont('Arial', '', 8);
if ($myrow38['impresionEspecial'] == 'si') {
$pdf->SetX('22');
$pdf->Cell(0, 0, $myrow38['descripcionImpresion'], 0, 0, L);
mysql_connect($servidor, $usuario, $passwd);
function cambia_a_normal($fecha)
{
ereg("([0-9]{2,4})-([0-9]{1,2})-([0-9]{1,2})", $fecha, $mifecha);
$lafecha = $mifecha[3] . "/" . $mifecha[2] . "/" . $mifecha[1];
return $lafecha;
}
//******************************************************************
if ($seguro) {
$paciente = $seguro;
}
$pdf->SetFont('Arial', '', 10);
//establece el nombre del paciente
$pdf->SetXY(2, 5);
$pdf->Cell(0, 0, 'REPORTE DETALLE DE CAJA', 0, 0, M);
$pdf->SetX(1);
//******************************
$fecha1 = date("d/m/Y");
$pdf->SetY(10);
$pdf->Cell(0, 0, $fecha1, 0, 0, R);
//*****************************
$sSQL1a = "Select * From statusCaja where keyCatC='" . $_GET['codigoCaja'] . "' and numCorte='" . $_GET['numCorte'] . "' order by keySTC DESC";
$result1a = mysql_db_query($basedatos, $sSQL1a);
$myrow1a = mysql_fetch_array($result1a);
$pdf->SetXY(2, 10);
$pdf->Cell(0, 0, "Diario de Caja", 0, 0, M);
$pdf->SetX(1);
$pdf->SetXY(2, 13);
$pdf->Cell(0, 0, 'Cajero(a): ' . $myrow1a['usuario'], 0, 0, M);
$pdf->SetX(1);
//********************************************
$myrow7d = mysql_fetch_array($result7d);
$cargos[0] += $myrow7['acumulado'];
$abonos[0] += $myrow7d['acumulado'];
$ivaCargos[0] += $myrow7['sumaIVA'];
$ivaAbonos[0] += $myrow7d['sumaIVA'];
//*****************************************************
$sSQL38d = "\r\n SELECT \r\n porcentajeFacturacion\r\n FROM\r\n facturasAplicadas\r\n WHERE folioVenta='" . $das . "'";
$result38d = mysql_db_query($basedatos, $sSQL38d);
$myrow38d = mysql_fetch_array($result38d);
$importe2[0] += $myrow7['acumulado'];
$sumaIVAS[0] += $myrow7['sumaIVA'];
$sSQL38e = "\r\nSELECT \r\npaciente\r\nFROM\r\nclientesInternos\r\nWHERE folioVenta='" . $myrow['folioVenta'] . "'";
$result38e = mysql_db_query($basedatos, $sSQL38e);
$myrow38e = mysql_fetch_array($result38e);
$pdf->Cell(0, 0, $myrow['folioVenta'] . '-' . $myrow38e['paciente'], 0, 0, L);
$pdf->SetX('185');
$pdf->Cell(0, 0, '$' . number_format($myrow7['acumulado'] - $myrow7d['acumulado'], 2), 0, 0, R);
//********************************************************
$sSQL38a = "\r\nSELECT codTASA FROM TASA WHERE codTASA>0";
$result38a = mysql_db_query($basedatos, $sSQL38a);
$myrow38a = mysql_fetch_array($result38a);
if ($myrow38['tasaGP'] == '0') {
$tasaCero[0] += $myrow7['acumulado'] - $myrow7d['acumulado'];
} else {
if ($myrow38['tasaGP'] > 0) {
$gravado = $myrow38['tasaGP'];
$tasaIVA[0] += $myrow7['acumulado'] - $myrow7d['acumulado'];
$sumaIVA[0] += $myrow7['sumaIVA'] - $myrow7d['sumaIVA'];
} else {
if ($myrow38['tasaGP'] == 'E') {
$tasaExento[0] += $myrow7['acumulado'] - $myrow7d['acumulado'];
$myrow39 = mysql_fetch_array($result39);
$sSQL40 = "\r\n SELECT\r\n*\r\nFROM\r\ncatTTCaja\r\nWHERE codigoTT='" . $codigoTT . "'";
$result40 = mysql_db_query($basedatos, $sSQL40);
$myrow40 = mysql_fetch_array($result40);
$sSQL39a = "\r\n\tSELECT \r\ndescripcion,medico\r\nFROM\r\nalmacenes\r\nWHERE almacen='" . $myrow['almacenDestino'] . "'";
$result39a = mysql_db_query($basedatos, $sSQL39a);
$myrow39a = mysql_fetch_array($result39a);
//*********************************
if ($folioVenta1 != $myrow['folioVenta']) {
$sSQL38e = "\r\nSELECT \r\npaciente\r\nFROM\r\nclientesInternos\r\nWHERE folioVenta='" . $myrow['folioVenta'] . "'";
$result38e = mysql_db_query($basedatos, $sSQL38e);
$myrow38e = mysql_fetch_array($result38e);
//
//ENCABEZADO DEL FOLIO DE VENTA
$pdf->SetFont('Arial', 'B', 8);
$pdf->SetX('22');
$pdf->Cell(0, 0, $myrow['folioVenta'] . ' ' . $myrow38e['paciente'], 0, 0, L);
$pdf->Ln(4);
//salto de linea
$folioVenta1 = $myrow['folioVenta'];
}
//****************************************
//echo $myrow['keyCAP'].'</br>';
$pdf->SetFont('Arial', '', 8);
if ($myrow38['impresionEspecial'] == 'si') {
$pdf->SetX('22');
$pdf->Cell(0, 0, $myrow38['descripcionImpresion'], 0, 0, L);
$pdf->Ln(4);
//salto de linea
$pdf->SetX('22');
if ($myrow39a['medico'] == 'si') {
$lafecha=$mifecha[3]."/".$mifecha[2]."/".$mifecha[1];
return $lafecha;
}
//******************************************************************
if($seguro)$paciente=$seguro;
$pdf->SetFont('Arial','',10);
//establece el nombre del paciente
$pdf->SetXY(2,5);
$pdf->Cell(0,0,'CORTE DE FORMAS',0,0,M);
$pdf->SetX(1);
//*****************ech*************
$fecha1=$_GET['fecha'];
$pdf->SetY(10);
$pdf->Cell(0,0,cambia_a_normal($fecha1),0,0,R);
$pdf->SetXY(2,10);
$conexionManual->conecta();
function cambia_a_normal($fecha)
{
ereg("([0-9]{2,4})-([0-9]{1,2})-([0-9]{1,2})", $fecha, $mifecha);
$lafecha = $mifecha[3] . "/" . $mifecha[2] . "/" . $mifecha[1];
return $lafecha;
}
//******************************************************************
if ($seguro) {
$paciente = $seguro;
}
$pdf->SetFont('Arial', '', 10);
//establece el nombre del paciente
$pdf->SetXY(2, 5);
$pdf->Cell(0, 0, 'HOSPITAL LA CARLOTA', 0, 0, M);
$pdf->SetX(1);
//*****************ech*************
//$fecha1=$_GET['fecha'];
$pdf->SetY(10);
$pdf->Cell(0, 0, 'Solicitud: ' . $_GET['numSolicitud'], 0, 0, R);
$pdf->SetXY(2, 10);
$pdf->Cell(0, 0, 'SOLICITUD DIRECTA DEL PACIENTE: ' . $_GET['paciente'], 0, 0, M);
$pdf->SetX(1);
//Usuario
$pdf->SetXY(2, 13);
$pdf->SetFont('Arial', '', 8);
$pdf->Cell(0, 0, 'Usuario Cargo: ' . $_GET['usuarioCargo'], 0, 0, L);
$pdf->SetXY(2, 16);
$pdf->SetFont('Arial', '', 8);
$pdf->Cell(0, 0, 'Fecha Cargo: ' . cambia_a_normal($_GET['fecha']), 0, 0, L);
$pdf->SetXY(2, 19);
$lafecha=$mifecha[3]."/".$mifecha[2]."/".$mifecha[1];
return $lafecha;
}
//******************************************************************
if($seguro)$paciente=$seguro;
$pdf->SetFont('Arial','',10);
//establece el nombre del paciente
$pdf->SetXY(4,5);
$pdf->Cell(0,0,'BENEFICENCIAS',0,0,M);
$pdf->SetX(1);
//*****************ech*************
$fecha1=date("d-M-Y");
$pdf->SetY(10);
$pdf->Cell(0,0,$fecha1,0,0,R);
$pdf->SetXY(4,10);
$imp = "\$" . number_format($importe, 2);
if ($myrow['tipoPago'] == 'Tarjeta de Credito') {
$descripcion = 'T.Trans: ' . $myrow['tipoPago'] . ',Banco: ' . $myrow['bancoTC'] . ', CodAut: ' . $myrow['codigoAutorizacion'] . ', U.Digitos: ' . $myrow['ultimosDigitos'];
} else {
if ($myrow['tipoPago'] == 'Cheque') {
$descripcion = 'Transaccion: ' . $myrow['tipoPago'] . ',Banco: ' . $myrow['bancoCheque'] . ', #Cheque: ' . $myrow['numeroCheque'];
} else {
if ($myrow['tipoPago'] == 'Efectivo') {
$descripcion = 'Tipo de Pago: Efectivo';
} else {
$descripcion = 'Tipo de Pago: ' . $myrow40['descripcion'];
}
}
}
$pdf->Ln(4);
$pdf->SetX('7');
$pdf->Cell(0, 0, trim($myrow['descripcionArticulo']), 0, 0, L);
if ($myrow['descripcionSeguroFacturacion'] != NULL and $myrow['tipoTransaccion'] == 'totros') {
$pdf->Ln(4);
$pdf->SetX('7');
$pdf->Cell(0, 0, trim($myrow['descripcionSeguroFacturacion']), 0, 0, L);
}
$pdf->Ln(4);
$pdf->SetX('7');
$pdf->Cell(0, 0, trim($descripcion), 0, 0, L);
//es una transaccion
//cantidad
$pdf->SetX('2');
$pdf->Cell(0, 0, trim(round($myrow['cantidad'], 3)), 0, 0, L);
$pdf->SetX('2');
//esta mal este precioVenta
$conexionManual->conecta();
function cambia_a_normal($fecha)
{
ereg("([0-9]{2,4})-([0-9]{1,2})-([0-9]{1,2})", $fecha, $mifecha);
$lafecha = $mifecha[3] . "/" . $mifecha[2] . "/" . $mifecha[1];
return $lafecha;
}
//******************************************************************
if ($seguro) {
$paciente = $seguro;
}
$pdf->SetFont('Arial', '', 10);
//establece el nombre del paciente
$pdf->SetXY(2, 5);
$pdf->Cell(0, 0, 'HOSPITAL LA CARLOTA', 0, 0, M);
$pdf->SetX(1);
//*****************ech*************
//$fecha1=$_GET['fecha'];
$pdf->SetY(10);
$pdf->Cell(0, 0, 'Orden: ' . $_GET['nOrden'], 0, 0, R);
$pdf->SetXY(2, 10);
$pdf->Cell(0, 0, "REPOSICION POR VENTA", 0, 0, M);
$pdf->SetX(1);
//Usuario
$pdf->SetXY(2, 13);
$pdf->SetFont('Arial', '', 8);
$pdf->Cell(0, 0, 'Usuario Cargo: ' . $_GET['usuarioCargo'], 0, 0, L);
$pdf->SetXY(2, 16);
$pdf->SetFont('Arial', '', 8);
$pdf->Cell(0, 0, 'Fecha Cargo: ' . cambia_a_normal($_GET['fecha']), 0, 0, L);
$pdf->SetXY(2, 19);