function escribe_archivo_via_sftp($cadena, $nombre_archivo_remoto = "", $factura_id, $fe_folio)
{
$sql_update = "update vta_p_facturas set \n\tFE_SERIE='A', FE_FOLIO={$fe_folio}\n\twhere (FE_SERIE = '' OR FE_SERIE IS NULL or FE_SERIE=0) AND (FE_FOLIO = '' OR FE_FOLIO IS NULL or FE_FOLIO =0) \n\tAND FACTURA_ID=" . $factura_id;
$result_update = mysql_db_query(DB_NAME, $sql_update);
// echo $sql_update;
define("TEPath", "../TableEditor/");
include '../TableEditor/Net/SFTP.php';
// $ftp_sitio="demo-partners.xsa.com.mx";
// $ftp_usuario="testftpfacciisa";
// $ftp_pass="******";
$ftp_sitio = "173.205.255.84";
$ftp_usuario = "ftpciisa";
$ftp_pass = "******";
$sftp = new Net_SFTP($ftp_sitio);
if (!$sftp->login($ftp_usuario, $ftp_pass)) {
exit('Acceso incorrecto..');
}
$sftp->put($nombre_archivo_remoto, utf8_encode($cadena));
$sftp->chdir("1");
$sftp->put($nombre_archivo_remoto, utf8_encode($cadena));
$folio_fiscal = consulta("select FOLIO_FISCAL from vta_p_facturas WHERE FACTURA_ID=" . $factura_id);
$folio_fiscal = $folio_fiscal["FOLIO_FISCAL"];
//echo $fe_serie["FE_FOLIO"]."+";
echo "Envio exitoso... Factura " . $folio_fiscal;
}
function concepto_precio($concepto_id, $cliente_id)
{
$aux_concepto = consulta("select * from c_conceptos where CONCEPTO_ID='" . $concepto_id . "'");
if ($cliente_id > 0) {
$aux_especiales = consulta("select PRECIO from c_precios_especiales where CONCEPTO_ID='" . $concepto_id . "' and CLIENTE_ID='" . $cliente_id . "'");
// echo count($aux_especiales); print_r($aux_especiales);echo "*** ".$aux_especiales."----";
if ($aux_especiales == "") {
// echo "111111111111111111";
$aux_cliente = consulta("select LISTA_PRECIOS from c_clientes where CLIENTE_ID=" . $cliente_id);
//echo "PRECIO_".$aux_cliente["LISTA_PRECIOS"];
echo $aux_cliente["PRECIO_" . $aux_cliente["LISTA_PRECIOS"]];
if (count($aux_cliente) == 0) {
$precio = $aux_concepto["PRECIO_1"];
} else {
$precio = $aux_concepto["PRECIO_" . $aux_cliente["LISTA_PRECIOS"]];
}
} else {
$precio = $aux_especiales["PRECIO"];
}
} else {
//echo "++";
$precio = $aux_concepto["PRECIO_1"];
}
return $precio;
}
function getSubskills($json = TRUE)
{
/**
* Gets the list of available subskills
* @author Germán Sánchez (GREC-ESADE), Collage
* @version march 2014
*/
global $conn;
$sql = 'SELECT * FROM ' . TABLE_SUBSKILLS . ' ORDER BY lower(text) ASC';
$result = consulta($sql, $conn);
$out = array();
while ($obj = pg_fetch_object($result)) {
$out[] = $obj;
}
if (FALSE) {
# hand-build
$out = array();
$out[] = array('id' => 1, 'text' => 'quick response');
$out[] = array('id' => 2, 'text' => 'prolific');
$out[] = array('id' => 3, 'text' => 'extensive');
}
if ($json) {
$out = json_encode($out);
}
return $out;
}
function valida_existencia(&$obj, $data)
{
$clave = $_POST["CLAVE"];
$cantidad = $_POST["CANTIDAD"];
$calidad = $_POST["CALIDAD_ID"];
$largo = $_POST["LARGO_ID"];
// $proveedor=$_POST["PROVEEDOR_ID"];
for ($i = 1; $i <= count($clave); $i++) {
if ($clave[$i] != "") {
if ($cantidad[$i] == "" or $cantidad[$i] == 0 or $calidad[$i] == "" or $calidad[$i] == 0 or $largo[$i] == "" or $largo[$i] == 0) {
} else {
$existencia = existencias($clave[$i], $calidad[$i], $largo[$i], "");
if ($existencia == "") {
$existencia = 0;
}
if ($existencia < $cantidad[$i]) {
$calidad_desc = consulta("select DESCRIPCION FROM inv_c_calidad WHERE CALIDAD_ID='" . $calidad[$i] . "'");
$largo_desc = consulta("select DESCRIPCION FROM inv_c_largo WHERE LARGO_ID='" . $largo[$i] . "'");
$info = $clave[$i] . ', Calidad ' . $calidad_desc["DESCRIPCION"] . ', largo ' . $largo_desc["DESCRIPCION"];
$obj->addError('No hay existencia suficiente(' . $existencia . ')...Clave ' . $info);
}
// $obj->addError('de prueba');
}
}
}
return $data;
}
function colorea($id)
{
//FUNCION QUE SE EJECUTA PARA LA COLUMNA EXTRA
$aux = consulta("select * from p_analisis_resultados where ANALISIS_RESULTADO_ID=" . $id);
$anormal = resultado_anormal($aux["VALOR_MINIMO"], $aux["VALOR_MAXIMO"], $aux["VALOR"]);
if ($anormal) {
$color = "fa2805";
$string = '<table id="func_' . $id . '" border="0" width="100%" cellpadding="0" cellspacing="1" bgcolor="' . $color . '"><tr><td> </td></tr></table>';
}
return $string;
}
function extra_grupos($id)
{
$aux = consulta("select * from c_conceptos where CONCEPTO_ID=" . $id);
if ($aux["CONCEPTO_TIPO_ID"] == "3") {
$link = '<a target="_blank" class="link_ajax" target="_blank" id="id_' . $id . '" href="../admin/?table=c_conceptos_grupo&id_padre=' . $id . '" onMouseOver="pintar(' . $id . ')" onmouseout="pintar_out(' . $id . ')"><span class="tooltip"></span><img src="../images/samples_ico1.png" width="16" height="16" border="0" />
</a>';
$string = '<table id="func_' . $id . '" border="0" cellpadding="0" cellspacing="1"><tr>';
$string .= '<td>' . $link . '</td>';
$string .= '</tr></table>';
}
return $string;
}
function getFeasibleCandidates($reqs = NULL)
{
/**
* Gets initial list of feasible candidates. Requirements are needed?
* It also returns the profile of each initial candidate
*/
global $conn, $token, $debugar, $moodle;
if (FALSE) {
// Check if "user" is inside $reqs
if ($reqs['userRequest'] != null) {
//$sql = 'SELECT * FROM zer_users WHERE username != \''.$reqs['userRequest'].'\'';
$sql = 'SELECT * FROM ' . TABLE_USERS;
} else {
//$userCred = checkTokenESB($token);
//$sql = 'SELECT * FROM zer_users WHERE username != "'.$userCred['username'].'"';
}
}
$sql = 'SELECT * FROM ' . TABLE_USERS;
if ($moodle) {
// If we are in Moodle environment, the feasible candidates are the ones registered in moodle.
// Obtain list of users (core_user_get_users)
// Add them the the select or filter the results according them
$url = 'http://moodle.projectcollage.eu/webservice/rest/server.php';
if ($debugar) {
echo 'getFeasibleCandidates: getting ' . $url . '<br />' . "\n";
}
$param = 'wstoken=e85ad37a66710486d3ced2fab08de5da&moodlewsrestformat=json&wsfunction=core_user_get_users&criteria[0][key]=auth&criteria[0][value]=cas';
$candidates = requestER($url, $param);
if ($debugar) {
echo 'getFeasibleCandidates: List of CAS users: ' . $candidates . '<br />' . "\n";
}
}
$result = consulta($sql, $conn);
$out = array();
while ($obj = pg_fetch_object($result)) {
// Convert stdClass to array
//$candidate = objectToArray(json_decode(json_encode($obj), true));
$candidate = json_decode(json_encode($obj), true);
$candidate['profile'] = getCandidateProfile($candidate['username']);
//($candidate['userid']);
$out[] = $candidate;
}
return $out;
}
function extra_function($id)
{
//FUNCION QUE SE EJECUTA PARA LA COLUMNA EXTRA
$aux = consulta("select c.CONCEPTO_TIPO_ID from c_conceptos c, p_recepcion_partidas p where c.CLAVE = p.CLAVE and p.RECEPCION_PARTIDAS_ID =" . $id);
if ($aux["CONCEPTO_TIPO_ID"] == "2") {
$link = '<a href="../admin/?table=p_analisis_resultados&recepcion_partidas_id=' . $id . '" title="Capturar resultados"><img src="' . TEImagesPath . 'laboratorio.png" width="16" height="16" border="0" />Capturar</a>';
$link2 = '<a target="_blank" href="../formatos/imprimir_2.php?id=' . $id . '" title="Ver resultados"><img src="' . TEImagesPath . 'resultados.png" width="16" height="16" border="0" />Imprimir</a>';
$string = '<table id="func_' . $id . '" border="0" cellpadding="0" cellspacing="4"><tr>';
$string .= '<td align="left">' . $link . '</td><td align="right">' . $link2 . '</td>';
$string .= '</tr></table>';
}
if ($aux["CONCEPTO_TIPO_ID"] == "4") {
$link = '<a href="../admin/?table=p_analisis_resultados&recepcion_partidas_id=' . $id . '" title="Capturar resultados"><img src="' . TEImagesPath . 'laboratorio.png" width="16" height="16" border="0" />Capturar</a>';
$link2 = '<a target="_blank" href="../formatos/imprimir_3.php?id=' . $id . '" title="Ver resultados"><img src="' . TEImagesPath . 'resultados.png" width="16" height="16" border="0" />Imprimir</a>';
$string = '<table id="func_' . $id . '" border="0" cellpadding="0" cellspacing="4"><tr>';
$string .= '<td align="left">' . $link . '</td><td align="right">' . $link2 . '</td>';
$string .= '</tr></table>';
}
return $string;
}
function generateRandomKey($table, $field, $length = null)
{
// 62 caracteres
$availables = array('A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K', 'L', 'M', 'N', 'O', 'P', 'Q', 'R', 'S', 'T', 'U', 'V', 'W', 'X', 'Y', 'Z', 'a', 'b', 'c', 'd', 'e', 'f', 'g', 'h', 'i', 'j', 'k', 'l', 'm', 'n', 'o', 'p', 'q', 'r', 's', 't', 'u', 'v', 'w', 'x', 'y', 'z');
// para generar las semillas aplica
for ($i = 0; $i < 2; $i++) {
rand(0, count($availables) - 1);
}
$repeat = true;
$key = '';
while ($repeat) {
$key = '';
for ($i = 0; $i < $length; $i++) {
$key .= $availables[rand(0, count($availables) - 1)];
}
// comprueba que no exista en la tabla
if (!consulta("SELECT {$field} FROM {$table} WHERE {$field} = '{$key}'")) {
$repeat = false;
}
}
return $key;
}
case "ban_p_bancos_egresos":
if ($valor == "EGRESO_ID") {
echo "";
$aux = consulta("select * FROM egr_p_egresos where EGRESO_ID=" . $campo_dato);
echo $aux["MONEDA"] . ", ";
echo "Mt : " . formato_moneda($aux["MONTO"], 2);
echo ", <B>IVA : </B>" . formato_moneda($aux["IVA"], 2);
echo ", <B>R ISR : </B>" . formato_moneda($aux["RETENCION_ISR"], 2);
echo ", <B>R IVA : </B>" . formato_moneda($aux["RETENCION_IVA"], 2);
echo ", <B>Tot : </B>" . formato_moneda($aux["TOTAL"], 2);
echo " <a href='../admin/index.php?table=egr_p_egresos&edit=" . $aux["EGRESO_ID"] . "' target=_new><img alt='Ver egreso' border=0 src='../images/samples_ico1.png'></a>";
echo "";
}
break;
case "egr_p_egresos_facturas":
if ($valor == "FACTURA") {
echo "";
$aux = consulta("select * FROM com_p_proveedores_facturas where FACTURA='" . $campo_dato . "'");
echo $aux["MONEDA"] . ", ";
echo "Mt : " . formato_moneda($aux["MONTO"], 2);
echo ", <B>IVA : </B>" . formato_moneda($aux["IVA"], 2);
echo ", <B>R ISR : </B>" . formato_moneda($aux["RETENCION_ISR"], 2);
echo ", <B>R IVA : </B>" . formato_moneda($aux["RETENCION_IVA"], 2);
echo ", <B>Tot : </B>" . formato_moneda($aux["TOTAL"], 2);
// echo "Tot : ".formato_moneda($aux["MONTO"],2);
echo " <a href='../admin/index.php?table=com_p_proveedores_facturas&edit=" . $aux["PROVEEDOR_FACTURA_ID"] . "' target=_new><img alt='Ver factura' border=0 src='../images/samples_ico1.png'></a>";
echo "";
}
break;
}
}
function busqueda_popup_2(tabla, filtro, campo_padre)
{
aux_1=filtro.toLowerCase()+"="+document.getElementsByName(filtro.toUpperCase())[0].value;
window.open('<?php
echo TEditorUrl . $agregar_al_url . "&table=";
?>
'+tabla+'&busqueda_popup='+campo_padre+'&'+aux_1,'new'+ aux_date,'location=yes,resizable=yes,status=yes, scrollbars=yes');
}
</script>
<?php
}
}
if ($table == "ban_c_cuentas") {
if ($FieldName == "FORMATO_IMPRESION") {
// echo "<a href=javascript:busqueda_popup('com_p_proveedores_facturas','proveedor_id','".$FieldName."') title='Formato de impresion de cheques'> <img border=0 width=20 src='".TEImagesPath.'facturas.png'."'></a>";
$aux_formato = consulta("select * from print_formatos where TABLA='" . $FieldValue . "'");
print_r($aux_formato);
//echo "select * from print_formatos where TABLA='".$FieldValue."'";
echo "<a href='?&table=print_formatos&edit='" . $aux_formato["FORMATO_ID"] . " target=_blank><img alt='Formato de impresion de cheques' border=0 width=20 src='" . TEImagesPath . 'categories.png' . "'></a>";
}
}
if ($table == "egr_p_egresos") {
if ($FieldName == "PROVEEDOR_ID") {
echo "<a href=javascript:busqueda_popup_2('com_p_proveedores_facturas','proveedor_id','" . $FieldName . "') title='Facturas del proveedor, solo no pagadas'> <img border=0 width=20 src='" . TEImagesPath . 'facturas.png' . "'></a>";
$agregar_al_url_2 = "&filtro=no_pagados";
?>
<script language="javascript">
function busqueda_popup_2(tabla, filtro, campo_padre)
{
aux_1=filtro.toLowerCase()+"="+document.getElementsByName(filtro.toUpperCase())[0].value;
window.open('<?php
<?php
if ($table != "vta_c_clientes") {
if ($_SESSION["TE_user_tipo_id"] == 2) {
$datos_usuario = consulta("select * from te_usuarios where USUARIO_ID=" . $_SESSION["TE_user_id"]);
$where_cte = " where CLIENTE_ID='" . $datos_usuario["CLIENTE_ID"] . "' ";
$editor->setDefaultValues(array('CLIENTE_ID' => $datos_usuario["CLIENTE_ID"]));
$editor->addDataFilter(' CLIENTE_ID=' . $datos_usuario["CLIENTE_ID"]);
} else {
$where_cte = "";
}
$editor->setInputType('CLIENTE_ID', 'select');
$editor->setValuesFromQuery('CLIENTE_ID', "SELECT CLIENTE_ID, RAZON_SOCIAL FROM vta_c_clientes {$where_cte} ORDER BY RAZON_SOCIAL");
}
$editor->setDisplayNames(array('VENDEDOR_ID' => 'Vendedor', 'cm_email' => 'Email'));
$editor->setDefaultValues(array('CIUDAD_ID' => '39', 'ESTADO_ID' => '1', 'ESTATUS_ID' => '1'));
/*
$editor->setInputType('ESTATUS_ID', 'select'); // Este tipo de campos se aplica unicamente desde el codigo y debe ser acompañado de la siguiente consulta...
$editor->setValuesFromQuery('ESTATUS_ID', "SELECT ESTATUS_ID, DESCRIPCION FROM cfg_estatus order by DESCRIPCION"); //Aqui obtenemos los valores de la tabla "te_sample_select_sql" relacionando los campos Identificadores.
*/
/*
if ($table<>"c_sucursales")
{
$editor->setInputType('SUCURSAL_ID', 'select');
$editor->setValuesFromQuery('SUCURSAL_ID', "SELECT SUCURSAL_ID, DESCRIPCION FROM c_sucursales ORDER BY DESCRIPCION");
}
*/
//if ($table<>"c_hospitales")
//{
// $editor->setInputType('UB_H_HOSPITAL_ID', 'select');
//$editor->setValuesFromQuery('UB_H_HOSPITAL_ID', "SELECT HOSPITAL_ID, DESCRIPCION FROM c_hospitales ORDER BY DESCRIPCION");
<tr><td align="left" width = "200"><b>- ' . $con[0] . '</b></td><td align="left"><strong>Rresultado</strong></td><td><strong>Valores de referencia</strong></td></tr>
<tr><td align="left"></td><td align = "left">' . $cabecera . '</td><td colspan="2" align = "left"><h5>' . $des_con . '</h5></td></tr>
</table>';
$tipo_consulta = "select CONCEPTO_TIPO_ID FROM c_conceptos c, p_recepcion_partidas p where c.CONCEPTO_ID = p.CONCEPTO_ID and RECEPCION_PARTIDAS_ID= '" . $_GET["id"] . "'";
//echo $tipo_consulta;
$res_tipo = mysql_query($tipo_consulta);
$tipo = mysql_fetch_array($res_tipo);
//echo $tipo['CONCEPTO_TIPO_ID'];
//echo $tipo['CONCEPTO_TIPO_ID'];
$cuerpo .= '<table border="0" width= "500px" align="center" rules ="none">
<tr>
<td align= "left" width ="200">' . $metodo . '</td></tr>
<tr><td></td></tr>
<tr><td></td></tr>
<tr><td align= "left" width =" 350">' . $nom_cultivo . '</td></tr><tr><td></td></tr>';
while ($resultados = mysql_fetch_assoc($res1)) {
$contenido .= '<tr><td align= "left" width =" 300"><strong>' . $resultados["PARAMETRO"] . '</strong></td><td align= "left"><strong>' . $resultados["VALOR"] . '</strong></td></tr>';
$contenido .= '<tr><td align= "left" width =" 300">____________________________________________</td></tr>';
}
$contenido .= '</table>';
$aux = consulta("select QUIMICA_FIRMA FROM c_sucursales where SUCURSAL_ID=" . $sucursal);
if ($aux["QUIMICA_FIRMA"] != "") {
$firma = '<img src="../archivos/' . $aux["QUIMICA_FIRMA"] . '" width="150" height="90">';
}
$piepag = '<br/><br/><table width ="600px"><tr><td width="550">' . $pie_pag . '</td></tr><tr><td align="center">' . $firma . '</td></tr>';
$piepag .= '</table></body></html>';
$html = $encabezado . $inicio . $cuerpo . $contenido . $piepag;
//echo $html;
$pdf->writeHTML(utf8_encode($html), true, false, false, false, '');
$pdf->lastPage();
$pdf->Output('resultados.pdf', 'I');
if ($no_vacio == 0) {
continue;
}
$arma_campos = substr($arma_campos, 0, strlen($arma_campos) - 2);
if ($_POST[$llave_tabla_hijo][$i] != "") {
$sql = "update " . $TABLA_HIJO["TABLA_HIJO"] . " set " . $arma_campos . " WHERE " . $llave_tabla_hijo . "=" . $_POST[$llave_tabla_hijo][$i];
$result = mysql_db_query(DB_NAME, $sql);
//echo "<br>--".$sql."--<br>"; // exit();
$guardado = consulta("select * from " . $TABLA_HIJO["TABLA_HIJO"] . " where " . $llave_tabla_hijo . "=" . $_POST[$llave_tabla_hijo][$i]);
if (!empty($NUEVO_editor_hijo[$TABLA_HIJO["TABLA_HIJO"]]->editCallbacks)) {
foreach ($NUEVO_editor_hijo[$TABLA_HIJO["TABLA_HIJO"]]->editCallbacks as $c) {
call_user_func($c, $guardado);
}
}
} else {
$sql = "insert into " . $TABLA_HIJO["TABLA_HIJO"] . " set " . $arma_campos . ", " . $llave_tabla_padre . "=" . ID . "";
$result = mysql_db_query(DB_NAME, $sql);
// echo $sql; exit();
$guardado = consulta("select * from " . $TABLA_HIJO["TABLA_HIJO"] . " where " . $llave_tabla_hijo . "=" . mysql_insert_id());
// echo print_r($NUEVO_editor_hijo[$TABLA_HIJO["TABLA_HIJO"]]->addCallbacks);
if (!empty($NUEVO_editor_hijo[$TABLA_HIJO["TABLA_HIJO"]]->addCallbacks)) {
foreach ($NUEVO_editor_hijo[$TABLA_HIJO["TABLA_HIJO"]]->addCallbacks as $c) {
call_user_func($c, $guardado);
}
}
// print_r($guardado); exit();
}
}
}
// >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> TABLA HIJO
}
$codcategoria = $_POST['codcategoria'];
$sql = "SELECT * FROM producto WHERE nombre LIKE '{$nombre}%' and codcategoria LIKE '{$codcategoria}' and activo=1 ORDER BY nombre";
$reg = consulta($sql);
?>
<div class="header bordered-red">Datos de la Categoria</div>
<table class="table table-bordered table-hover">
<thead>
<tr>
<th>N</th><th>Nombre</th><th>Categoria</th><th>Código</th><th>Talla</th><th>Precio Mínimo</th><th></th>
</tr>
</thead>
<?php
foreach ($reg as $r) {
$i++;
$sql = "SELECT * FROM categoria WHERE codcategoria=" . $r['codcategoria'] . " and activo=1 ORDER BY nombre";
$cat = consulta($sql);
$c = array_shift($cat);
?>
<tr>
<td class="der"><?php
echo $i;
?>
</td>
<td><?php
echo $r['nombre'];
?>
</td>
<td><?php
echo $c['nombre'];
?>
</td>
function listaDeMenciones($data)
{
$listaDeMenciones = consulta('mencion');
respond(200, $listaDeMenciones);
}
function alerta_cliente()
{
$mostrar = "";
$cliente_id = $_GET["cliente_id"];
// $cliente_id=4;
if ($cliente_id) {
$sql = "select * from c_clientes where MOSTRAR_COMENTARIO<>'' AND CLIENTE_ID='" . $cliente_id . "'";
logea($GLOBALS['contar_alertas']);
$aux = consulta($sql);
// print_r($aux); logea(print_r($aux));
if ($aux["MOSTRAR_COMENTARIO"] != "" and $GLOBALS['contar_alertas'] == "") {
$GLOBALS['contar_alertas'] = "no";
#$mostrar= 'alert("'.$aux["MOSTRAR_COMENTARIO"].'");';
}
}
echo $mostrar;
}
<?php
$id = $_GET['id'];
//include("../admin/index.php");
include "../config/variables.php";
include "../config/funciones_generales.php";
@mysql_connect(DB_HOST, DB_USER, DB_PASS);
mysql_select_db(DB_NAME);
//obtenemos los datos personales del paciente
$sql = "SELECT \r\r\nRECEPCION_ID, NOMBRE, APELLIDOS, TELEFONO, FECHA_NACIMIENTO,\r\r\nCOMENTARIOS, (SELECT concat(TITULO, ' ', NOMBRE, ' ', APELLIDOS) FROM c_medicos where MEDICO_ID=p_recepcion.MEDICO_ID) as MEDICO, \r\r\n(SELECT NOMBRE FROM c_clientes where CLIENTE_ID=p_recepcion.CLIENTE_ID) as EMPRESA, \r\r\nDATE_FORMAT(FECHA, '%d/%m/%Y') as FECHA, GENERO \r\r\nfrom \r\r\np_recepcion where RECEPCION_ID = " . $id;
//echo $sql;
$fila = consulta($sql);
$folio = $fila["RECEPCION_ID"];
$nombre = $fila["NOMBRE"];
$apellidos = $fila["APELLIDOS"];
$medico = $fila["MEDICO"];
$fecha = $fila["FECHA"];
$genero = $fila["GENERO"];
$telefono = $fila["TELEFONO"];
$comentarios = $fila["COMENTARIOS"];
$empresa = $fila["EMPRESA"];
$edad = edad_relativa(mysql_to_fecha($fila["FECHA_NACIMIENTO"]), mysql_to_fecha($fila["FECHA"]));
$dom = CONFIG('domicilio');
$pie_pag = CONFIG('pieimpresion');
//sacamos los valores para rellenar los conceptos
$sql1 = "select a.CLAVE, a.DESCRIPCION, a.PRECIO*a.CANTIDAD, b.TOTAL from p_recepcion_partidas a, p_recepcion b where a.RECEPCION_ID = " . $id . " AND a.RECEPCION_ID = b.RECEPCION_ID";
$res1 = mysql_query($sql1);
//Encabezado
$a = "<body>\r\r\n<table border= 0 width= 950px>\r\r\n<tr><td align= left><img border=0 src=" . CONFIG_ARCHIVOS('logo') . "></td><td align=right>" . $dom . "</td><tr>\r\r\n</table>\r\r\n<div class=ex><table border= 0>\r\r\n<tr>\r\r\n<td WIDTH=750px >Folio: " . $folio . "</td><td WIDTH=250px >Fecha: " . $fecha . "</td>\r\r\n</tr>\r\r\n<tr>\r\r\n<td>Empresa: " . $empresa . "</td><td></td>\r\r\n</tr>\r\r\n<tr>\r\r\n<td>Paciente: " . $nombre . " " . $apellidos . "</td><td>Edad: " . $edad . "</td>\r\r\n</tr>\r\r\n<tr>\r\r\n<td>Médico: " . $medico . "</td><td>Sexo: " . $genero . "</td>\r\r\n</tr>\r\r\n<tr>\r\r\n<td>Tel: " . $telefono . "</td><td></td>\r\r\n</tr>\r\r\n<tr>\r\r\n<td>Comentarios: " . $comentarios . "</td><td></td>\r\r\n</tr>\r\r\n</table> </div>";
//Contenido
$a .= "<div class=es>\r\r\n<table border=0 cellspacing=20px align=center>\r\r\n <col style=width: 350px span=2 />\r\r\n <tr>\r\r\n ESTUDIOS SOLICITADOS\r\r\n </tr>\r\r\n <tr>\r\r\n <td WIDTH=250px>Clave</td>\r\r\n <td WIDTH=250px>Descripcion</td>\r\r\n <td WIDTH=250px align= center>Costo</td>\r\r\n </tr>";
<?php
$criterios = "<b>Criterios de búsqueda : </b><br>";
#$where= "where a.ESTATUS_FACTURA_ID<>2 ";
$where = "where 1 ";
if ($fecha_ini != "") {
$where .= " and FECHA>='" . fecha_to_mysql($fecha_ini) . "' ";
$criterios .= " De {$fecha_ini} ";
}
if ($fecha_fin != "") {
$where .= " and FECHA<='" . fecha_to_mysql($fecha_fin) . "' ";
$criterios .= " A {$fecha_fin} <br>";
}
if ($CLIENTE_ID != "") {
$where .= " AND CLIENTE_ID='{$CLIENTE_ID}' ";
$aux = consulta("select RAZON_SOCIAL FROM vta_c_clientes where CLIENTE_ID='" . $CLIENTE_ID . "'");
$criterios .= " Cliente : " . $aux["RAZON_SOCIAL"] . "<br>";
}
include "where_FACTURADOR_ID_multiple.php";
include "where_ESTATUS_FACTURA_ID.php";
include "where_USUARIO_ID.php";
// El usuario es el vendedor
if ($TIPO_REPORTE != "") {
$criterios .= " Por " . $TIPO_REPORTE . "<br>";
}
if (!$orderby) {
$orderby = "FACTURA";
}
if ($orderby == "FECHA") {
$orderby = "a.FECHA";
}
function listarEstudiantes($data)
{
$rol = consulta('rol', array('id'), array('Nombre' => 'Estudiante'), true);
$estudiantes = consulta('usuario', array(), array('id_rol' => $rol['id']));
foreach ($estudiantes as $index => $element) {
$estudiantes[$index]['FechaDeNacimiento'] = date('d/m/Y', strtotime($element['FechaDeNacimiento']));
}
respond(200, $estudiantes);
}
function isCandidate($username)
{
global $conn, $debugar, $token, $versionDataBase;
// Obtenemos el id del usuario
$sql = 'SELECT * FROM ' . TABLE_USERS . ' WHERE username =\'' . $username . '\'';
$result = consulta($sql, $conn);
$quants = pg_num_rows($result);
if ($quants == 0) {
// Comprobamos si tiene perfil en P2PUM
$profile = getUserProfileFromP2PUM($token);
return FALSE;
} else {
$obj = pg_fetch_object($result);
$userid = $obj->userid;
# Devolvemos el departamento
if ($versionDataBase == 'waag') {
$sql = 'SELECT id FROM ' . TABLE_PROFILE_DEPARTMENT . ' WHERE userid =' . $userid . '';
$result = consulta($sql, $conn);
$obj = pg_fetch_object($result);
return $obj->id;
} else {
$sql = 'SELECT dept FROM ' . TABLE_PROFILE_DEPARTMENT . ' WHERE userid =' . $userid . '';
$result = consulta($sql, $conn);
$obj = pg_fetch_object($result);
return $obj->dept;
}
}
}
if ($fecha_fin != "") {
$where .= " and FECHA_CANCELACION<='" . fecha_to_mysql($fecha_fin) . "' ";
$criterios .= " A {$fecha_fin} <br>";
}
/*
if ($CLIENTE_ID!="")
{
$where.=" AND CLIENTE_ID='$CLIENTE_ID' ";
$aux=consulta("select RAZON_SOCIAL FROM vta_c_clientes where CLIENTE_ID='".$CLIENTE_ID."'");
$criterios.=" Cliente : ".$aux["RAZON_SOCIAL"]."<br>";
}
include("where_FACTURADOR_ID_multiple.php");
*/
if ($ESTATUS_FACTURA_ID != "") {
$where .= " AND ESTATUS_FACTURA_ID='{$ESTATUS_FACTURA_ID}' ";
$aux = consulta("select DESCRIPCION FROM vta_c_facturas_estatus where ESTATUS_FACTURA_ID='" . $ESTATUS_FACTURA_ID . "'");
$criterios .= " Estatus factura : " . $aux["DESCRIPCION"] . "<br>";
}
/*
include("where_USUARIO_ID.php"); // El usuario es el vendedor
if ($TIPO_REPORTE!="")
{
$criterios.=" Por ".$TIPO_REPORTE."<br>";
}
*/
if (!$orderby) {
$orderby = "FACTURA";
}
if ($orderby == "FECHA") {
$orderby = "a.FECHA";
}
?>
<div class="header bordered-red">Datos de la Categoria</div>
<table class="table table-bordered table-hover">
<thead>
<tr>
<th>N</th><th>Nombre</th><th>Categoria</th><th>Código</th><th>Talla</th><th>Precio Mínimo</th><th class="">Stock</th><th></th>
</tr>
</thead>
<?php
foreach ($reg as $r) {
$i++;
$sql = "SELECT * FROM categoria WHERE codcategoria=" . $r['codcategoria'] . " and activo=1 ORDER BY nombre";
$cat = consulta($sql);
$c = array_shift($cat);
$sql = "SELECT sum(cantidadstock) as cantidastock FROM compra WHERE codproducto LIKE '" . $r['codproducto'] . "' and activo=1";
$cantidastock = consulta($sql);
$cantidastock = array_shift($cantidastock);
$stock = $cantidastock['cantidastock'];
if ($stock == "") {
$stock = 0;
}
?>
<tr>
<td class="der"><?php
echo $i;
?>
</td>
<td><?php
echo $r['nombre'];
?>
</td>
function desliega_expedidos($sql)
{
global $TOTALES, $direccion, $REPORTE_campos_hidden;
$link = mysql_connect(DB_HOST, DB_USER, DB_PASS);
mysql_select_db(DB_NAME);
$campos_moneda = array('MONTO', 'ACUMULADO');
// $campos_hidden=array('ESTATUS_CHEQUE_ID', 'TIPO_MOV_BANCO_ID', 'FECHA_ORDENADA');
$result = mysql_db_query(DB_NAME, $sql);
if (mysql_error() != "") {
echo "<br>" . $sql . "<br><font class='TEditorError'><br>";
echo mysql_error() . "</font>";
exit;
}
?>
<table border="0" align="center" cellspacing="5" id="tblDefects"><?php
$conta_aux = 0;
$acumulado = 0;
$cuenta_anterior = "";
while ($dato = mysql_fetch_array($result, MYSQL_BOTH)) {
if ($cuenta_anterior != $dato["CUENTA"] and $cuenta_anterior != "") {
echo "<tr>";
echo "<td class='TEsubtotales' colspan=15>";
echo "Saldo " . formato_moneda($acumulado, 2);
echo "</td>";
echo "</tr>";
$acumulado = 0;
$conta_aux = 0;
}
$cuenta_anterior = $dato["CUENTA"];
if ($conta == 0) {
echo "<tr>";
$i = count($dato) / 2;
for ($aux = 0; $aux < $i; $aux++) {
$campo = mysql_field_name($result, $aux);
if (in_array($campo, $REPORTE_campos_hidden)) {
continue;
}
$img_ordenamiento = "";
if ($orderby == $campo) {
if ($direccion == "ASC" or $direccion == "") {
$img_ordenamiento = "<img src=" . TEImagesPath . "arror_up.png>";
} else {
$img_ordenamiento = "<img src=" . TEImagesPath . "arror_down.png>";
}
}
// echo "<th align=center><a href='javascript:reordena(\"$campo\")'><font style='font-size:11px'>".despiega_nombre_columna_reportes($campo)."</font></a> $img_ordenamiento</th>";
echo "<th align=center><font style='font-size:11px'>" . despiega_nombre_columna_reportes($campo) . "</font></th>";
}
echo "</tr>";
$conta++;
}
$conta_aux++;
if ($conta_aux == 1) {
echo "<tr>";
$i = count($dato) / 2;
for ($aux = 0; $aux < $i; $aux++) {
$campo = mysql_field_name($result, $aux);
if ($campo == "RAZON_SOCIAL") {
$aux_banco = consulta("select * from ban_c_cuentas where DESCRIPCION='" . $dato["CUENTA"] . "'");
//echo $dato["CUENTA"]."++";
$acumulado = $aux_banco["SALDO_INICIAL"];
$fecha_saldo_inicial = $_POST["fecha_ini"];
// $fecha_saldo_inicial='2011-01-10';
$valor = BANCOS_saldo_cuenta_fecha($aux_banco["CUENTA_ID"], $fecha_saldo_inicial);
$acumulado = $valor;
echo "<td align=right><b>Saldo inicial</b></td><td align=right><b>" . formato_moneda($valor, 2) . "</b></td><td align=right><b>" . formato_moneda($valor, 2) . "</b></td>";
} else {
echo "<td></td>";
}
}
echo "</tr>";
$conta++;
}
if ($conta == 2) {
$conta = 1;
$aux_f = " bgcolor=#f5f5f4";
} else {
$aux_f = "";
$conta = 2;
}
// if(($dato["ESTATUS_CHEQUE"]<>"Cancelado") and ($dato["ESTATUS_CHEQUE"]<>"Sin cobrar"))
if ($dato["ESTATUS_CHEQUE"] != "Cobrado" and $dato["MOV"] == "Egreso x Cheque") {
if ($_POST["tipo_reporte"] == "cuenta") {
continue;
}
// echo $dato["ESTATUS_CHEQUE_ID"];
// echo "++++".($_POST["tipo_reporte"]=="expedidos")."----".($dato["ESTATUS_CHEQUE"]=="Sin Cobrar")."_";
if ($_POST["tipo_reporte"] == "expedidos" and $dato["ESTATUS_CHEQUE_ID"] == "1") {
if ($dato["EN_GARANTIA"] != 1) {
$acumulado = $acumulado - $dato["MONTO"];
}
// echo "-".$acumulado."+++".$dato["MONTO"];
}
} else {
if ($dato["ACUMULADO"] < 100) {
$acumulado = $acumulado + $dato["MONTO"];
} else {
$acumulado = $acumulado - $dato["MONTO"];
}
}
echo "<tr {$aux_f}>";
$i = count($dato) / 2;
for ($aux = 0; $aux < $i; $aux++) {
$valor = $dato[$aux];
$campo = mysql_field_name($result, $aux);
if (in_array($campo, $REPORTE_campos_hidden)) {
continue;
}
if ($campo == "ACUMULADO") {
$valor = $acumulado;
}
$TOTALES[$campo] = $TOTALES[mysql_field_name($result, $aux)] * 1 + $valor;
// echo "<td nowrap align=right>";
global $REPORTE_COLUMNA;
$alineacion = "right";
if ($REPORTE_COLUMNA[$campo]["ALINEACION"]) {
$alineacion = $REPORTE_COLUMNA[$campo]["ALINEACION"];
}
$titulo = " title='" . $valor . "'";
echo "<td nowrap align='{$alineacion}' {$titulo}>";
if (in_array($campo, $campos_moneda)) {
echo formato_moneda($valor, 2);
} else {
if ($REPORTE_COLUMNA[$campo]["SIZE"]) {
$size = $REPORTE_COLUMNA[$campo]["SIZE"];
} else {
$size = 30;
}
if (strlen($valor) > $size) {
echo substr($valor, 0, $size) . "...";
} else {
echo $valor;
}
}
echo "</td>";
}
echo "</tr>";
}
echo "<tr>";
echo "<td class='TEsubtotales' colspan=10>";
echo "Saldo " . formato_moneda($acumulado, 2);
echo "</td>";
echo "</tr>";
$TOTALES["REGISTROS"] = mysql_num_rows($result);
echo "</table>";
}
and open the template in the editor.
-->
<html>
<head>
<meta charset="UTF-8">
<title></title>
</head>
<body>
<?php
include_once 'banco.php';
$mes = $_POST['mes'];
$ano = $_POST['ano'];
if ($mes < 10) {
$mes = '0' . $mes;
}
$consulta = consulta('contas', 'count(idconta),sum(valorparcela)', 'date_format(datavencimento,"%m%Y") = ' . $mes . $ano . ' and ativo=0');
foreach ($consulta as $linha) {
$quantidade = $linha[0];
$som = $linha[1];
$soma2 = sprintf("R\$ %.2f", $som);
$soma = str_ireplace('.', ',', $soma2);
}
?>
<div class="huge" id="ContasCanceladasquantidade"></div>
<div id="CanceladasConcordancia">Canceladas</div>
<div id="ContasCanceladassoma"></div>
<script type='text/javascript'>
var ContasCanceladasquantidade = <?php
echo $quantidade;
?>
<!-- HTML5 Shim and Respond.js IE8 support of HTML5 elements and media queries -->
<!-- WARNING: Respond.js doesn't work if you view the page via file:// -->
<!--[if lt IE 9]>
<script src="https://oss.maxcdn.com/libs/html5shiv/3.7.0/html5shiv.js"></script>
<script src="https://oss.maxcdn.com/libs/respond.js/1.4.2/respond.min.js"></script>
<![endif]-->
</head>
<body>
<?php
include_once 'banco.php';
if (!isset($_POST) or !isset($_POST['grupos'])) {
header("location:index.html");
}
$grupos = consulta('grupocontas', '*', 'ativo=1');
$linha = '';
foreach ($grupos as $g) {
//if($g[2] == 0){$g[2] = '';}
//if($g[3] == 0){$g[3] = '';}
//$g[7] = str_ireplace('.',',',$g[7]);
//$g[3] = str_ireplace('.',',',$g[3]);
$linha .= "<tr>";
$linha .= "<td style='max-width:20px;text-align:right'>{$g['0']}</td>";
$linha .= "<td style='max-width:50px'>{$g['1']}</td>";
$linha .= "<td>{$g['2']}</td>";
//$linha .= "<td style='max-width:20px'>$g[24]</td>";
//$linha .= "<td style='max-width:20px;text-align:center'>$g[6]/$g[5]</td>";
//$linha .= "<td style='max-width:20px;text-align:right'>$g[7]</td>";
//$linha .= "<td style='max-width:20px;text-align:center'>$g[10]</td>";
//$linha .= "<td style='max-width:20px;text-align:center'>$g[16]</td>";
function actualiza_resultados_de_equipos($debug = 0)
{
@mysql_connect(DB_HOST, DB_USER, DB_PASS);
mysql_select_db(DB_NAME);
if ($_GET["log_id"] != "") {
$where_log_id = " AND LOG_ID=" . $_GET["log_id"];
} else {
$where_log_id = "";
}
//echo $_GET["log_id"];
$sql = "select * from cdrs_log WHERE CAPTURADO=0" . $where_log_id . " ORDER BY LOG_ID DESC LIMIT 0,500";
// Lee solo las que no se han procesado
//$sql="select * from cdrs_log WHERE LOG_ID=2724";
//$sql="select * from cdrs_log WHERE LOG_ID>=2651 and LOG_ID<=2654";
//$sql="select * from cdrs_log WHERE LOG_ID>=439 and LOG_ID<=441";
//$sql="select * from cdrs_log "; // Lee solo las que no se han procesado
$result = mysql_db_query(DB_NAME, $sql);
$logear = 0;
// Poner 1 para que se guarde info en tabla te_logs
//$debug=1;
include "../admin/equipos_ubicacion_parametros.php";
$var_debug = "<table border='1'><tr>";
$var_debug_2 = "<table border='1'><tr>";
while ($dato = mysql_fetch_array($result, MYSQL_BOTH)) {
if (preg_match("/RECV_RSLTS/", $dato["CDR_ORIGINAL"])) {
$equipo = "CIBA";
} elseif (preg_match("/RESULT/", $dato["CDR_ORIGINAL"])) {
$equipo = "MICRO60";
} elseif (preg_match("/MSH/", $dato["CDR_ORIGINAL"])) {
$equipo = "MINDRAY";
} else {
$equipo = "";
$msj = "No se reconoce formato de algun equipo... " . $dato["CDR_ORIGINAL"];
logea($msj);
//echo $msj; // La funcion logea, guarda en tabla te_logs
}
switch ($equipo) {
case "CIBA":
//continue 2;
$registro = preg_split("/" . chr(29) . "/", $dato["CDR_ORIGINAL"]);
// echo "++".$equipo_data["CIBA"]["FOLIO"]."--";
$folio = $registro[$equipo_data["CIBA"]["FOLIO"]];
// $parametro_equipo["CIBA"]["FOLIO"] se define en ../admin/equipos_ubicacion_parametros.php
$parametro = trim(str_replace("TS=", "", $registro[$equipo_data["CIBA"]["PARAMETRO"]]));
$parametro_equipo = preg_replace('/[^a-z\\d ]/i', '', $parametro);
// Quita todo lo que no sea letra o numero
$valor = str_replace("TS=", "", (double) $registro[$equipo_data["CIBA"]["VALOR"]]);
//echo "--".$registro[25];
$var_debug .= "<tr><td colspan=100><font color='red'>Folio=" . $folio . ", Parametro=" . $parametro_equipo . ", Valor=" . $valor . "</td></tr>";
$sql_param_adminte = "select PARAMETRO from c_equipos_parametros WHERE PARAMETRO_EQUIPO='" . $parametro_equipo . "'";
$parametro = consulta($sql_param_adminte);
// echo"hi".$equipo."++".$parametro["PARAMETRO"]."--".$sql_param_adminte; exit();
if ($parametro["PARAMETRO"] == "") {
$msj = "No existe analisis con clave " . $parametro_equipo . " relacionado al equipo " . $equipo . "->" . $dato["CDR_ORIGINAL"];
if ($logear) {
logea($msj);
}
//echo $msj;
} else {
$busca_folio = consulta("select * from p_recepcion where RECEPCION_ID ='" . $folio . "'");
// busca si existe el folio
if ($busca_folio["RECEPCION_ID"] == "") {
$msj = "En el sistema, no se encuentra el folio " . $folio . " \n. " . $equipo . "->" . $dato["CDR_ORIGINAL"];
if ($logear) {
logea($msj);
}
//echo $msj;
} else {
$sql_concepto = 'select a.CONCEPTO_ID, b.RECEPCION_PARTIDAS_ID from c_analisis_parametros a, p_recepcion_partidas b where a.CONCEPTO_ID=b.CONCEPTO_ID and a.PARAMETRO="' . $parametro["PARAMETRO"] . '" AND b.RECEPCION_ID="' . $folio . '"';
$concepto_id = consulta($sql_concepto);
//echo "---".$sql_concepto."</br>";
$sql_4 = "INSERT IGNORE INTO p_analisis_resultados(RECEPCION_PARTIDAS_ID, PARAMETRO, VALOR_MINIMO, VALOR_MAXIMO) SELECT " . $concepto_id["RECEPCION_PARTIDAS_ID"] . ", PARAMETRO, VALOR_MINIMO, VALOR_MAXIMO FROM c_analisis_parametros WHERE CONCEPTO_ID='" . $concepto_id["CONCEPTO_ID"] . "' order by RECEPCION_PARTIDAS_ID";
//consulta($sql_4); // inserta los parametros asignados en analisis-parametros y que no estan en la partida
$partida_sql = "select a.RECEPCION_PARTIDAS_ID from p_analisis_resultados a, p_recepcion_partidas b where a.RECEPCION_PARTIDAS_ID=b.RECEPCION_PARTIDAS_ID and b.RECEPCION_ID='" . $folio . "' AND PARAMETRO='" . $parametro["PARAMETRO"] . "'";
$partida = consulta($partida_sql);
// echo $partida_sql."------";
if ($partida["RECEPCION_PARTIDAS_ID"] == "") {
$msj = "En el sistema, no existe el analisis en el folio " . $folio . ". " . $equipo . "-> " . $dato["CDR_ORIGINAL"];
if ($logear) {
logea($msj);
}
//echo $msj;
} else {
switch ($parametro["PARAMETRO"]) {
case "ACIDO URICO":
$val = number_format($valor, 1);
$val_i = round($val, 1);
$val_ins = number_format($val_i, 1);
break;
case "NITROGENO UREICO":
$val = number_format($valor, 2);
$val_i = round($val, 1);
$val_ins = number_format($val_i, 1);
break;
case "UREA":
$val = number_format($valor, 1);
$val_i = round($val);
$val_ins = number_format($val_i, 1);
break;
case "TRIGLICERIDOS":
$val = number_format($valor, 1);
$val_i = round($val);
$val_ins = number_format($val_i, 1);
break;
case "Colesterol Total":
$val = number_format($valor, 1);
$val_i = round($val);
$val_ins = number_format($val_i, 1);
break;
case "GLUCOSA SERICA":
$val = number_format($valor, 1);
$val_i = round($val);
$val_ins = number_format($val_i, 1);
break;
case "CREATININA":
$val_ins = number_format($valor, 2);
break;
}
/*if(($parametro["PARAMETRO"]=="CREATININA") || ($parametro["PARAMETRO"]=="ACIDO URICO")) { $val_ins = number_format($valor,2);}
else { $val_ins = number_format($valor,1); }*/
$actualiza_sql = "update p_analisis_resultados set VALOR='" . $val_ins . "' where \n\n\n\n RECEPCION_PARTIDAS_ID='" . $partida["RECEPCION_PARTIDAS_ID"] . "' and PARAMETRO='" . $parametro["PARAMETRO"] . "'";
//echo $actualiza_sql."<br>";
consulta($actualiza_sql);
consulta("update cdrs_log set CAPTURADO=1 where LOG_ID='" . $dato["LOG_ID"] . "'");
// para que no se vuelva a procesar
}
}
}
// consulta("select CONCEPTO_ID FROM c_equipos_parametros WHERE CLAVE_EQUIPO");
break;
case "MICRO60":
// Equipo Micro 60;
$prepara_cdr = str_replace(" ", " ", $dato["CDR_ORIGINAL"]);
$registro = preg_split("/" . chr(13) . "/", $prepara_cdr);
// Crea arreglo
/*
if($debug)
{
echo"<pre>";
print_r($registro);
echo"</pre>";
} */
$aux = explode(' ', $registro[6]);
$aux = split(" ", $registro[$equipo_data["MICRO"]["FOLIO"]]);
//print_r($aux);
$folio = $aux[1];
//echo "Folio=".$folio."--";
//echo $folio."--";
$campos_disponibles = array('LEUCOCITOS', 'ERITROCITOS', 'HEMOGLOBINA', 'HEMATOCRITO', 'VOLUMEN GLOBULAR MEDIO', 'CONCENTRACION MEDIA DE HEMOGLOBINA', 'CONCENTRACION MEDIA DE HEMOGLOBINA CORPUSCULAR', 'NO SE USA', 'PLAQUETAS', 'NO SE USA', 'LINFOCITOS', 'MONOCITOS', 'NEUTROFILOS TOTALES');
// [16] [17] [18] [19] [20] [21]
$var_debug .= "<tr><td colspan=100>Folio=" . $folio . " => ";
for ($i = 0; $i < count($campos_disponibles); $i++) {
$aux = split(" ", $registro[$equipo_data["MICRO"][$campos_disponibles[$i]]]);
//print_r($aux);
$valor = $aux[1];
$var_debug .= $campos_disponibles[$i] . "=" . $valor . "--";
}
$var_debug .= "</td>";
if ($folio == "") {
$msj = "No se reconoce formato, no se localizo el campo folio en la informacion del equipo \n. " . $equipo . "->" . $dato["CDR_ORIGINAL"];
if ($logear) {
logea($msj);
}
//echo $msj;
} else {
$busca_folio = consulta("select * from p_recepcion where RECEPCION_ID ='" . $folio . "'");
// echo "select * from p_recepcion where RECEPCION_ID ='".$folio."'";
if ($busca_folio["RECEPCION_ID"] == "") {
$msj = "En el sistema, no se encuentra el folio " . $folio . " \n. " . $equipo . "->" . $dato["CDR_ORIGINAL"];
if ($logear) {
logea($msj);
}
} else {
$partida = consulta("select RECEPCION_PARTIDAS_ID from p_recepcion_partidas where RECEPCION_ID=" . $busca_folio["RECEPCION_ID"] . " AND CONCEPTO_ID='16'");
//CONCEPTO_ID=16 es BCH
if ($partida["RECEPCION_PARTIDAS_ID"] == "") {
$msj = "En el sistema, no existe el analisis BCH en el folio " . $folio . ". " . $equipo . "-> " . $dato["CDR_ORIGINAL"];
if ($logear) {
logea($msj);
}
} else {
$sql_4 = "INSERT IGNORE INTO p_analisis_resultados(RECEPCION_PARTIDAS_ID, PARAMETRO, VALOR_MINIMO, VALOR_MAXIMO) \n\n\n\n SELECT " . $partida["RECEPCION_PARTIDAS_ID"] . ", PARAMETRO, VALOR_MINIMO, VALOR_MAXIMO FROM c_analisis_parametros WHERE CONCEPTO_ID='16' order by ANALISIS_PARAMETRO_ID";
consulta($sql_4);
// inserta los parametros asignados en analisis-parametros y que no estan en la partida
if (1 == 0) {
$msj = "No se localizason los parametros en " . $dato["CDR_ORIGINAL"];
if ($logear) {
logea($msj);
}
} else {
// t R € D ! 006.7 2 04.65 3 013.5 4 040.3 5 00087 6 029.1 7 033.6 8 012.0 @ 00227 A 007.6 l # 031.2 % 013.2 h ' 055.6 " 002.1 $ 000.8 h& 003.8 W
//$campos_disponibles=array('LEUCOCITOS TOTALES', 'ERITROCITOS', 'HEMOGLOBINA', 'HEMATOCRITO', 'VOLUMEN GLOBULAR MEDIO', 'CONCENTRACION MEDIA DE HEMOGLOBINA','??',
// 'MONOCITOS', 'PLAQUETAS', '??', 'LINFOCITOS', '??', 'NEUTROFILOS SEGMENTADOS', '??', 'EOSINOFILOS');
// [9] [10] [11] [12] [13] [14] [15]
$var_debug .= "<tr><td colspan=100>";
//echo "test!!!!!!";
for ($i = 0; $i < count($campos_disponibles); $i++) {
$aux = split(" ", $registro[$equipo_data["MICRO"][$campos_disponibles[$i]]]);
//print_r($aux);
$valor = $aux[1];
/*
for($i = 0; $i < count($campos_disponibles); $i++)
{
switch ($i) {
case 0: $valor=$registro[$equipo_data["MICRO"][$campos_disponibles[$i]]]; break;
case 1: $valor=$registro[$equipo_data["MICRO"][$campos_disponibles[$i]]]; break;
case 2: $valor=$registro[$equipo_data["MICRO"][$campos_disponibles[$i]]]; break;
case 3: $valor=$registro[$equipo_data["MICRO"][$campos_disponibles[$i]]]; break;
case 4: $valor=$registro[$equipo_data["MICRO"][$campos_disponibles[$i]]]; break;
case 5: $valor=$registro[$equipo_data["MICRO"][$campos_disponibles[$i]]]; break;
case 6: $valor=$registro[$equipo_data["MICRO"][$campos_disponibles[$i]]]; break;
case 7: $valor=$registro[$equipo_data["MICRO"][$campos_disponibles[$i]]]; break;
case 8: $valor=$registro[$equipo_data["MICRO"][$campos_disponibles[$i]]]; break;
case 9: $valor=$registro[$equipo_data["MICRO"][$campos_disponibles[$i]]]; break;
case 10:$valor=$registro[$equipo_data["MICRO"][$campos_disponibles[$i]]]; break;
case 11:$valor=$registro[$equipo_data["MICRO"][$campos_disponibles[$i]]]; break;
case 12:$valor=$registro[$equipo_data["MICRO"][$campos_disponibles[$i]]]; break;
}
*/
/*
if($campos_disponibles[$i]=='PLAQUETAS') { $valor_in= number_format((double)$valor,0);}
elseif(($campos_disponibles[$i=='HEMOGLOBINA']) || ($campos_disponibles[$i=='HEMATOCRITO']) || ($campos_disponibles[$i=='CONCENTRACION MEDIA DE HEMOGLOBINA']) ||($campos_disponibles[$i=='CONCENTRACION MEDIA DE HEMOGLOBINA CORPUSCULAR'])) { $valor_in= number_format((double)$valor,1);}
else { $valor_in= number_format((double)$valor,2);}
*/
switch ($campos_disponibles[$i]) {
case 'ERITROCITOS':
$valor_in = number_format($valor, 2);
/*$val_i = round($val, 2);
$valor_in = number_format($val_i,1); */
//se modificó el formato de eritrocitos en los resultados de equipo
break;
case 'PLAQUETAS':
$valor_in = number_format($valor, 0);
break;
case 'NEUTROFILOS BANDA':
$valor_in = '0';
break;
case 'EOSINOFILOS':
$valor_in = '0';
break;
case 'BASOFILOS':
$valor_in = '0';
break;
case 'NEUTROFILOS TOTALES':
$val = number_format($valor, 1);
$valor_in = round($val, 1);
break;
default:
$valor_in = number_format($valor, 1);
break;
}
$actualiza_sql = "update p_analisis_resultados set VALOR='" . $valor_in . "' where \n\n\n\n RECEPCION_PARTIDAS_ID='" . $partida["RECEPCION_PARTIDAS_ID"] . "' and PARAMETRO='" . $campos_disponibles[$i] . "'";
// echo $actualiza_sql;
consulta($actualiza_sql);
if ($i == 12) {
$actualiza_sql_2 = "update p_analisis_resultados set VALOR='" . $valor_in . "' where \n\n\n\n RECEPCION_PARTIDAS_ID='" . $partida["RECEPCION_PARTIDAS_ID"] . "' and PARAMETRO='NEUTROFILOS SEGMENTADOS'";
consulta($actualiza_sql_2);
}
$var_debug .= "<font color='red'>" . $campos_disponibles[$i] . "(" . $equipo_data["MICRO"][$campos_disponibles[$i]] . ")=<b>" . $valor_in . "</b> -- ";
// $cual=$cual+1;
}
$actualiza_sql_3 = "update p_analisis_resultados set VALOR='0' where RECEPCION_PARTIDAS_ID='" . $partida["RECEPCION_PARTIDAS_ID"] . "' and PARAMETRO='EOSINOFILOS'";
consulta($actualiza_sql_3);
$actualiza_sql_3 = "update p_analisis_resultados set VALOR='0' where RECEPCION_PARTIDAS_ID='" . $partida["RECEPCION_PARTIDAS_ID"] . "' and PARAMETRO='NEUTROFILOS BANDA'";
consulta($actualiza_sql_3);
$actualiza_sql_3 = "update p_analisis_resultados set VALOR='0' where RECEPCION_PARTIDAS_ID='" . $partida["RECEPCION_PARTIDAS_ID"] . "' and PARAMETRO='BASOFILOS'";
consulta($actualiza_sql_3);
$var_debug .= "</td></tr>";
consulta("update cdrs_log set CAPTURADO=1 where LOG_ID='" . $dato["LOG_ID"] . "'");
// para que no se vuelva a procesar
}
}
}
}
break;
case "MINDRAY":
$registro = explode("|", $dato["CDR_ORIGINAL"]);
//echo '<pre>'; print_r($registro); echo '</pre>';
$folio = $registro[$equipo_data["MINDRAY"]["FOLIO"]];
//echo "FOLIO: ".$folio."<br/>";
$parametro_equipo = $registro[$equipo_data["MINDRAY"]["PARAMETRO"]];
//echo "PARAMETRO_EQUIPO: ".$parametro_equipo."<br/>";
//parametros
$parametro = consulta("select PARAMETRO from c_equipos_parametros WHERE PARAMETRO_EQUIPO='" . $parametro_equipo . "' AND EQUIPO_ID = 3");
$parametro = $parametro["PARAMETRO"];
//echo "PARAMETRO_ANALISIS: ".$parametro."<br/>";
//valor de los parametros
$valor = $registro[$equipo_data["MINDRAY"]["VALOR"]];
if ($parametro == "") {
$msj = "No existe analisis con clave " . $parametro_equipo . " relacionado al equipo " . $equipo . ":<br/>---------<br/> " . $dato["CDR_ORIGINAL"] . "<br/>---------<br/>";
if ($logear) {
logea($msj);
}
//echo $msj;
} else {
//folio
$busca_folio = consulta("select * from p_recepcion where RECEPCION_ID ='" . $folio . "'");
// busca si existe el folio
$recepcion_id = $busca_folio["RECEPCION_ID"];
//echo "RECEPCION_ID: ".$recepcion_id."<br/>";
if ($recepcion_id == "") {
$msj = "En el sistema, no se encuentra el folio " . $folio . ". <br/>" . $equipo . ":<br/>---------<br/> " . $dato["CDR_ORIGINAL"] . "<br/>---------<br/>";
if ($logear) {
logea($msj);
}
//echo $msj;
} else {
//conceptos
$sql_concepto = consulta('select a.CONCEPTO_ID, b.RECEPCION_PARTIDAS_ID from c_analisis_parametros a, p_recepcion_partidas b where
a.CONCEPTO_ID=b.CONCEPTO_ID and a.PARAMETRO="' . $parametro . '" AND b.RECEPCION_ID="' . $recepcion_id . '"');
//echo '<br/>select a.CONCEPTO_ID, b.RECEPCION_PARTIDAS_ID from c_analisis_parametros a, p_recepcion_partidas b where
//a.CONCEPTO_ID=b.CONCEPTO_ID and a.PARAMETRO="'.$parametro.'" AND b.RECEPCION_ID="'.$recepcion_id.'"<br/>';
$concepto_id = $sql_concepto["CONCEPTO_ID"];
//echo "CONCEPTO_ID: ".$concepto_id."<br/>";
$concepto_recepcion_partidas_id = $sql_concepto["RECEPCION_PARTIDAS_ID"];
//echo "CONCEPTO_RECEPCION_PARTIDAS_ID: ".$concepto_recepcion_partidas_id."<br/>";
//insertar en analisis_resultados
$sql_4 = "INSERT IGNORE INTO p_analisis_resultados(RECEPCION_PARTIDAS_ID, PARAMETRO, VALOR_MINIMO, VALOR_MAXIMO) SELECT " . $concepto_recepcion_partidas_id . ", PARAMETRO, VALOR_MINIMO, VALOR_MAXIMO FROM c_analisis_parametros WHERE CONCEPTO_ID='" . $concepto_id . "' order by RECEPCION_PARTIDAS_ID";
//seleccionar recepcion_partida_id
$partida_sql = consulta("select a.RECEPCION_PARTIDAS_ID from p_analisis_resultados a, p_recepcion_partidas b where a.RECEPCION_PARTIDAS_ID=b.RECEPCION_PARTIDAS_ID and b.RECEPCION_ID='" . $recepcion_id . "' AND a.PARAMETRO='" . $parametro . "'");
//echo "select a.RECEPCION_PARTIDAS_ID from p_analisis_resultados a, p_recepcion_partidas b where a.RECEPCION_PARTIDAS_ID=b.RECEPCION_PARTIDAS_ID and b.RECEPCION_ID='".$recepcion_id."' AND a.PARAMETRO='".$parametro."'";
$recepcion_partida_id = $partida_sql["RECEPCION_PARTIDAS_ID"];
//echo "RECEPCION_PARTIDAS_ID: ".$recepcion_partida_id."<br/>";
if ($recepcion_partida_id == "") {
$msj = "En el sistema, no existe el analisis " . $parametro . " en el folio " . $folio . ". <br/>" . $equipo . ":<br/>---------<br/> " . $dato["CDR_ORIGINAL"] . "<br/>---------<br/>";
if ($logear) {
logea($msj);
}
//echo $msj;
} else {
switch ($parametro) {
case "ACIDO URICO":
$val = number_format($valor, 1);
$val_i = round($val, 1);
$val_ins = number_format($val_i, 1);
break;
case "NITROGENO UREICO":
$val = number_format($valor, 2);
$val_i = round($val, 1);
$val_ins = number_format($val_i, 1);
break;
case "UREA":
$val = number_format($valor, 1);
$val_i = round($val);
$val_ins = number_format($val_i, 1);
break;
case "TRIGLICERIDOS":
$val = number_format($valor, 1);
$val_i = round($val);
$val_ins = number_format($val_i, 1);
break;
case "Colesterol Total":
$val = number_format($valor, 1);
$val_i = round($val);
$val_ins = number_format($val_i, 1);
break;
case "GLUCOSA SERICA":
$val = number_format($valor, 1);
$val_i = round($val);
$val_ins = number_format($val_i, 1);
break;
case "CREATININA":
$val_ins = number_format($valor, 2);
break;
default:
$valor_ff = $valor;
$separa_decimales = explode(".", $valor_ff);
$enteros = (int) $separa_decimales[0];
//echo 'numero: '.$enteros.'</br>';
$decimales = (int) $separa_decimales[1];
//echo 'decimales: '.$decimales.'</br>';
$long_decimales = strlen($separa_decimales[1]);
//echo 'longitud decimales: '.$long_decimales.'</br>';
if ($long_decimales > 2) {
$valor_dec = (double) $valor_ff;
if ($decimales > 100) {
//echo 'decimales mayor a 100</br>';
$valor_form = number_format($valor_dec, 1);
$formatea_val = $valor_form;
} else {
$valor_dec = (double) $valor_ff;
//echo 'Valor con decimales: '.$valor_dec.'</br>';
$redondea_val = round($valor_dec);
//echo 'Valor Redondeado: '.$redondea_val.'</br>';
$formatea_val = number_format($redondea_val, 1);
}
} else {
$valor_dec = (double) $valor_ff;
$redondea_val = round($valor_dec);
$formatea_val = number_format($redondea_val, 1);
}
//echo 'Formatea valor: '.$formatea_val.'</br>';
$val_ins = $formatea_val;
break;
}
//end switch parametro
//comenté el switch para aplicar formateo a todos los parametros
//$val_ins = number_format($valor, 3);
//actualizar p_analisis_resultados con el valor capturado en cdr_log
$actualiza_sql = "update p_analisis_resultados set VALOR='" . $val_ins . "' where \n\n\t\t\t\t\t\t\t\tRECEPCION_PARTIDAS_ID='" . $recepcion_partida_id . "' and PARAMETRO='" . $parametro . "'";
//echo $actualiza_sql."<br>";
consulta($actualiza_sql);
//echo $actualiza_sql;
//update cdr_log para que no se vuela a procesar
consulta("update cdrs_log set CAPTURADO=1 where LOG_ID='" . $dato["LOG_ID"] . "'");
}
}
}
break;
}
//////////////////////////////////////////////////// Switch
if ($debug) {
$conta = 0;
// echo print_r($registro);
$var_debug .= "<tr>";
foreach ($registro as $i => $val) {
if ($equipo == "CIBA") {
if (in_array($i, $equipo_data["CIBA"])) {
$font = " bgcolor=red ";
} else {
$font = "";
}
}
if ($equipo == "MICRO60") {
if (in_array($i, $equipo_data["MICRO"])) {
$font = " bgcolor=red ";
} else {
$font = "";
}
}
$var_debug .= "<td align='center' valign='top' " . $font . ">" . $i . "<br>" . $val . "</td>";
}
$var_debug .= "<td></td></tr>";
$var_debug_2 .= "<tr>";
$infor = $dato["CDR_ORIGINAL"];
for ($i = 0; $i < strlen($infor); $i++) {
$conta++;
$var_debug_2 .= "<td width=50 align='center' >" . $infor[$i] . "<Br>" . ord($infor[$i]) . "<br>" . $conta . "</td>";
}
$var_debug_2 .= "</tr>";
}
}
if ($debug) {
$var_debug .= "</tr></table>";
echo $var_debug;
echo $var_debug_2;
}
}
$contenido_detalle = "<table border=0>";
while ($dato = mysql_fetch_array($result, MYSQL_ASSOC)) {
$contenido_detalle .= "<tr>";
foreach ($dato as $campo => $valor) {
if ($campo == "SERIES_DEBAJO") {
continue;
}
$sql_ancho = "select * FROM print_formatos_detalle a, print_formatos b where a.CAMPO='" . $campo . "' and a.FORMATO_ID=b.FORMATO_ID AND b.TABLA='" . $table . "'";
//if($campo=="CANTIDAD") echo $sql_ancho."++";
$resultado = consulta($sql_ancho);
$ancho = $resultado["ANCHO"] * 37.8;
$conta_detalle++;
$contenido_detalle .= "<td style='word-wrap: break-word;' valign='top' width=" . $ancho . " align=" . $resultado["ALINEAR"] . "><font size=1.2 pt>";
if ($conta_detalle == 1) {
$sql_coordenadas = "select a.COORDENADA_X, a.COORDENADA_Y FROM print_formatos_detalle a, print_formatos b where a.CAMPO='" . $campo . "' and a.FORMATO_ID=b.FORMATO_ID AND b.TABLA='" . $table . "'";
$coordenadas = consulta($sql_coordenadas);
$x = $coordenadas["COORDENADA_X"];
$y = $coordenadas["COORDENADA_Y"] + $conta;
}
// $valor=str_replace("\r\n", "<br>", $valor);
if (in_array($campo, $numericos)) {
$contenido_detalle .= formato_numero($valor, 2);
} else {
$contenido_detalle .= htmlspecialchars($valor);
}
$contenido_detalle .= "</font></td>";
}
$conta = $conta + 0.5;
$contenido_detalle .= "</tr>";
// if($dato["SERIES_DEBAJO"]<>"") $contenido_detalle.="<tr><td colspan=10 style='word-wrap: break-word;' width=700><font size=1.8pt>".$dato["SERIES_DEBAJO"]."</td></tr>";
if ($dato["SERIES_DEBAJO"] != "") {
function upload_form()
{
$s_1 = "delete from tmp_lineas";
$r_1 = mysql_query($s_1);
?>
<form action="?op=upload_file" method="post" enctype="multipart/form-data" name="form1">
<table align="center" class="tabla" cellpadding="0" cellspacing="5">
<caption>Subir Archivo CSV con Líneas y Proyectos</caption>
<tbody>
<tr>
<td valign="top">Archivo:</td>
<td><input type="file" name="archivo" class="texto" size="50"></td>
</tr>
</tbody>
</table>
<br><div align="center">
<input type="button" value="Guardar" class="submit" onclick="upload();">
</div>
</form>
<div align="center" class="aviso_naranja">Se insertarán solamente los registros que no existan</div>
<br><div align="center">
<table align="center" width="450" border="0" cellspacing="5" style="border-color:#999999; border-style:solid; border-width:1px;">
<tr><td align="center" width="60" rowspan="8" valign="top">
<img src="../imagenes/exclamation.gif">
</td><td align="left" class="gris" width="440"><b>
Formato del Archivo para Líneas y Proyectos</b></td></tr>
<tr><td class="gris" align="left">
Los encabezados del archivo deben ser minúsculas sin acentos ó ñ</td>
</tr>
<tr><td class="gris" align="left">
<span title="header=[ Nombre de Áreas] body=[<?php
echo consulta('area');
?>
]"><img src="../imagenes/information.png" border="0"></span> La primera columna contiene el nombre del área</td>
</tr>
<tr><td class="gris" align="left">
<span title="header=[ Nombre de Estaciones] body=[<?php
echo consulta('estacion');
?>
]"><img src="../imagenes/information.png" border="0"></span> La segunda columna contiene el nombre de la tecnología</td>
</tr>
<tr><td class="gris" align="left">
La tercera columna contiene el nombre de la línea</td>
</tr>
<tr><td class="gris" align="left">
<span title="header=[ Nombre de Divisiones] body=[<?php
echo consulta('division');
?>
]"><img src="../imagenes/information.png" border="0"></span> La cuarta columna contiene el nombre de la división del proyecto</td>
</tr>
<tr><td class="gris" align="left">
<span title="header=[ Nombre de Proyectos] body=[<?php
echo consulta('proyecto');
?>
]"><img src="../imagenes/information.png" border="0"></span> La quinta columna contiene el nombre del proyecto</td>
</tr>
<tr><td class="gris" align="left">
<a href="archivos/ejemplo_lineas.csv"><img src="../imagenes/attach.png" border="0"></a>
Descargue un archivo de ejemplo</td>
</tr>
</table>
</div>
<?php
}
function obtenerListaProducto()
{
$sentencia = 'SELECT * FROM products';
$lista = consulta($sentencia);
return $lista->fetchAll();
}
