Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } function getLstABMTipoTratamientoAsoc() { $where = ""; if(isset($_REQUEST["key"])) { $where = " WHERE ttr.trat_numero = '".addslashes($_REQUEST["key"])."'"; } $sql = "SELECT ttr.tptrat_numero as cod ,ttr.tptrat_denom as denom ,ttr.trat_numero AS trcod ,tr.trat_denom AS tratamiento ,0 as itemselected ,0 as rem ,0 as erst FROM tbl_onc_tipo_tratamientos_asoc as ttr INNER JOIN tbl_onc_tipo_tratamientos as tr ON ttr.trat_numero = tr.trat_numero" . $where." ORDER BY 2"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } function getLstABMTipoRecaida() { $sql = "SELECT tprec_numero as cod ,tprec_denom as denom ,tprec_abrev as abrev ,0 as itemselected ,0 as rem FROM tbl_onc_tipo_recaida ORDER BY 2"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } function getLstABMOrgRecaida() { $sql = "SELECT orgrc_numero as cod ,orgrc_denom as denom ,orgrc_abrev as abrev ,0 as itemselected ,0 as rem FROM tbl_onc_origen_recaida ORDER BY 2"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } function getLstABMRespuesta() { $sql = "SELECT res_numero as cod ,res_denom as denom ,res_abrev as abrev ,0 as itemselected ,0 as rem FROM tbl_onc_respuesta ORDER BY 2"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } function getLstABMProtocolo() { $sql = "SELECT prot_numero as cod ,prot_denom as denom ,prot_abrev as abrev ,0 as itemselected ,0 as rem FROM tbl_onc_protocolo ORDER BY 2"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } function getLstABMToxicidad() { $sql = "SELECT tox_numero as cod ,tox_denom as denom ,tox_abrev as abrev ,0 as itemselected ,0 as rem FROM tbl_onc_toxicidad ORDER BY 2"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } function getLstABMGradoToxicidad() { $sql = "SELECT grtox_numero as cod ,grtox_denom as denom ,grtox_abrev as abrev ,0 as itemselected ,0 as rem FROM tbl_onc_grado_toxicidad ORDER BY 2"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } function getLstABMRegion() { $sql = "SELECT reg_numero as cod ,reg_denom as denom ,reg_abrev as abrev ,0 as itemselected ,0 as rem FROM tbl_onc_region ORDER BY 2"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } function getLstABMTipoDiagnostico() { $sql = "SELECT tdiag_numero as cod ,tdiag_denom as denom ,tdiag_abrev as abrev ,0 as itemselected ,0 as rem FROM tbl_onc_tipo_diagnostico ORDER BY 2"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } function getLstABMMetodoDetecion() { $sql = "SELECT tdet_numero as cod ,tdet_denom as denom ,tdet_abrev as abrev ,0 as itemselected ,0 as rem FROM tbl_onc_tipo_detecion ORDER BY 2"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } function getLstABMOrgano() { $sql = "SELECT org_numero as cod ,org_denom as denom ,org_abrev as abrev ,0 as itemselected ,0 as rem FROM tbl_onc_organo ORDER BY 2"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } function getLstABMAnatPatologica() { $sql = "SELECT apat_numero as cod ,apat_denom as denom ,apat_abrev as abrev ,0 as itemselected ,0 as rem FROM tbl_onc_anat_patologica ORDER BY 2"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } function getLstABMCausaMuerte() { $sql = "SELECT cmue_numero as cod ,cmue_denom as denom ,cmue_abrev as abrev ,0 as itemselected ,0 as rem FROM tbl_onc_causa_muerte ORDER BY 2"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } function getLstABMOcupacion() { $sql = "SELECT ocu_codigo as cod ,ocu_denom as denom ,ocu_abrev as abrev ,0 as itemselected ,0 as rem FROM tbl_ocupaciones ORDER BY 2"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } function getLstABMProductos() { $sql = "SELECT p.pro_codigo as cod ,p.pro_denom as denom ,p.pro_abrev as abrev ,(CASE WHEN pd.prdr_dosis IS NULL THEN '' ELSE pd.prdr_dosis END) as dosisp ,CONCAT(p.pro_denom,' ',(CASE WHEN pd.prdr_dosis IS NULL THEN '' ELSE pd.prdr_dosis END)) as denomdet ,(CASE WHEN pd.prdr_tiempo IS NULL THEN '' ELSE pd.prdr_tiempo END) as tiempo ,0 as itemselected ,0 as rem FROM productos as p LEFT JOIN tbl_onc_protocolo_drogas as pd ON pd.pro_codigo = p.pro_codigo ORDER BY 2"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } function getTratamientoPlanes($tratnro) { //LEFT JOIN tbl_onc_protocolo_drogas AS pd ON pd.prot_numero = t.prot_numero AND pd.pro_codigo = tp.dro_numero $sql = "SELECT tp.cltratpl_numero as nro ,tp.cltrat_numero as codtrat ,ISNULL(tp.dro_numero,0) as cod ,(CASE WHEN p.pro_denom IS NULL THEN 'Sin Asignar' ELSE p.pro_denom END) as denom ,tp.cltratpl_dosis as dosis ,tp.cltratpl_ciclo as ciclo ,tp.cltratpl_dosisp as dosisp ,tp.cltratpl_tiempo as tiempo ,(CASE WHEN tp.cltratpl_fecha IS NULL THEN '' ELSE CONVERT(VARCHAR(10),tp.cltratpl_fecha,103) END) AS fecha ,tp.cltratpl_observacion as nota ,0 as itemselected ,0 as rem FROM cli_onc_tratamiento_planes tp INNER JOIN cli_onc_tratamiento AS t ON t.cltrat_numero = tp.cltrat_numero LEFT JOIN productos AS p ON p.pro_codigo = tp.dro_numero WHERE tp.cltrat_numero = ".$tratnro;//." //ORDER BY 6 DESC"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST_OBJ; } return EMPTY_LST_OBJ; } function getTratamientoProtocoloDrogas($protocolo) { $sql = "SELECT pd.prot_numero as protocolo ,pd.pro_codigo as prodcod ,p.pro_denom as denom ,pd.prdr_dosis as dosisp ,pd.prdr_tiempo as tiempo ,0 as itemselected ,0 as rem FROM productos AS p INNER JOIN tbl_onc_protocolo_drogas AS pd ON pd.pro_codigo = p.pro_codigo WHERE pd.prot_numero = ".$protocolo." ORDER BY 3 DESC"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST_OBJ; } return EMPTY_LST_OBJ; } function getTratamientoToxicidades($tratnro) { $sql = "SELECT tp.cltrattx_numero as nro ,tp.cltrat_numero as codtr ,tp.tox_numero as cod ,p.tox_denom as denom ,tp.cltrattx_grado as gr ,0 as itemselected ,0 as rem FROM cli_onc_tratamiento_toxicidades tp INNER JOIN tbl_onc_toxicidad AS p ON p.tox_numero = tp.tox_numero WHERE cltrat_numero = ".$tratnro." ORDER BY 4"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST_OBJ; } return EMPTY_LST_OBJ; } function getLstABMEstado() { $sql = "SELECT est_numero as cod ,est_denom as denom ,est_abrev as abrev ,0 as itemselected ,0 as rem FROM tbl_onc_estado ORDER BY 2"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } function getLstABMEstudios() { $sql = "SELECT test_numero as cod ,test_denom as denom ,test_abrev as abrev ,0 as itemselected ,0 as rem FROM tbl_onc_tipo_estudio ORDER BY 2"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } function getLstABMPronostico() { $where = ""; if(isset($_REQUEST["keyextra"])) { $where = " WHERE pro.tpro_numero IN (SELECT tpro_numero FROM tbl_onc_tipo_pronostico_diagnostico WHERE tdiag_numero='".addslashes($_REQUEST["keyextra"])."') "; } $sql = "SELECT pro.tpro_numero as cod ,pro.tpro_denom as denom ,pro.tpro_abrev as abrev ,0 as itemselected ,0 as rem FROM tbl_onc_tipo_pronostico AS pro ".$where." ORDER BY 2"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } function getLstABMIntensidad() { $sql = "SELECT tprint_numero as cod ,tprint_denom as denom ,tprint_abrev as abrev ,0 as itemselected ,0 as rem FROM tbl_onc_pronostico_intensidad ORDER BY 2"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } function getLstABMLaboratorio() { $sql = "SELECT tprint_numero as cod ,tprint_denom as denom ,tprint_abrev as abrev ,0 as itemselected ,0 as rem FROM tbl_laboratorios ORDER BY 2"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } function getListaPacientesOnc() { //hx_onc_pacientes //,FORMAT(e.emp_alta,'dd/MM/yyyy') as falta $params = false; $flagCliente = false; if( isset($_REQUEST["cl_d"])&&intval($_REQUEST["cl_d"])!==(-1) && isset($_REQUEST["cl_h"])&&intval($_REQUEST["cl_h"])!==(-1)) { $flagCliente = true; } $flagSMed = false; if( isset($_REQUEST["sm_d"])&&intval($_REQUEST["sm_d"])!==(-1) && isset($_REQUEST["sm_h"])&&intval($_REQUEST["sm_h"])!==(-1)) { $flagSMed = true; } $flagNombre = false; if( isset($_REQUEST["cnam"])&&intval($_REQUEST["cnam"])!==(-1)) { $flagNombre = true; } $flagDoc = false; if( isset($_REQUEST["ndoc"])&&intval($_REQUEST["ndoc"])!==(-1)) { $flagDoc = true; } $flagEmail = false; if( isset($_REQUEST["cema"])&&intval($_REQUEST["cema"])!==(-1)) { $flagEmail = true; } $flagTipoTumor = false; if( isset($_REQUEST["ttumor"])&&intval($_REQUEST["ttumor"])!==(-1)) { $flagTipoTumor = true; } $flagOrderbyDesc = false; if( isset($_REQUEST["orderdes"])&&intval($_REQUEST["orderdes"])!==(-1)) { $flagOrderbyDesc = true; } $flagFechaDiag = false; if( isset($_REQUEST["fd_d"])&&intval($_REQUEST["fd_d"])!==(-1) && isset($_REQUEST["fd_h"])&&intval($_REQUEST["fd_h"])!==(-1)) { $rango = array(); $rango[0] = DateTime::createFromFormat('d/m/Y', $_REQUEST["fd_d"]); $rango[1] = DateTime::createFromFormat('d/m/Y', $_REQUEST["fd_h"]); $desde = date("Y-m-d",strtotime($rango[0]->format('Y-m-d'))); $hasta = date("Y-m-d",strtotime($rango[1]->format('Y-m-d'))); $flagFechaDiag = true; } if($flagCliente||$flagNombre||$flagEmail||$flagTipoTumor||$flagFechaDiag) { $params = ""; } if($flagCliente) {$params = ($params==""?" ":" AND ") . " ( c.cli_codigo BETWEEN '".$_REQUEST["cl_d"]."' AND '".$_REQUEST["cl_h"]."')";} if($flagSMed) {$params = ($params==""?" ":" AND ") . " ( c.obs_codigo BETWEEN '".$_REQUEST["sm_d"]."' AND '".$_REQUEST["sm_h"]."')";} if($flagNombre) {$params.= ($params==""?" ":" AND ") . " ( LOWER(LTRIM(RTRIM(c.cli_nombre))) LIKE '%".addslashes(strtolower(trim($_REQUEST["cnam"])))."%')";} if($flagDoc) {$params.= ($params==""?" ":" AND ") . " ( c.cli_dni = '".addslashes($_REQUEST["cnam"])."')";} if($flagEmail) {$params.= ($params==""?" ":" AND ") . " ( LOWER(LTRIM(RTRIM(c.cli_email))) LIKE '%".addslashes(strtolower(trim($_REQUEST["cema"])))."%')";} if(false&&!$flagOrderbyDesc) { if($flagTipoTumor) {$params.= ($params==""?" ":" AND ") . " ( EXISTS (SELECT 1 FROM dbo.cli_onc_diagnostico as tdiag WHERE tdiag.cli_codigo = c.cli_codigo AND tdiag.tdiag_numero = '".addslashes($_REQUEST["ttumor"])."'))";} } else { if($flagTipoTumor) {$params.= ($params==""?" ":" AND ") . " ( diag.tdiag_numero = '".addslashes($_REQUEST["ttumor"])."')";} } if($flagFechaDiag) { $params.= ($params==""?" ":" AND ") . " (diag.cldiag_fecha_diagnostico IS NOT NULL) AND ( LEFT(CONVERT(VARCHAR,diag.cldiag_fecha_diagnostico, 120), 10) BETWEEN LEFT(CONVERT(VARCHAR,'".$desde."', 120), 10) AND LEFT(CONVERT(VARCHAR,'".$hasta."', 120), 10) )"; } $where = ""; if($params) { $where = " WHERE ".$params; } //, dbo.GetAge(c.cli_fecnto) AS edad if(false&&!$flagOrderbyDesc) { $sql = "SELECT ".$GLOBALS['N_RECORDS']." c.cli_codigo as cod ,c.cli_nombre as nombre ,FORMAT(c.cli_fecnto,'dd/MM/yyyy') as fnto ,FORMAT(c.cli_registracion,'dd/MM/yyyy') as falta , c.cli_tel AS tel , c.cli_email AS email , c.cli_carnet AS afil ,0 as itemselected ,0 as rem ,0 as erst ,cli_bloqueado AS bloquedo ,ob.obs_denom as obs ,obp.obsp_denom AS plan_ ,dbo.GetAge(c.cli_fecnto) AS edad ,c.cli_dni as doc ,td.tid_abrev as dname ,CONCAT(td.tid_abrev,' ',c.cli_dni) AS tdoc ,(CASE WHEN c.obs_gravado = 1 THEN 'SI' ELSE 'NO' END) as grv ,dgi.dgi_cond as iva ,( SELECT t1.tdiag_denom FROM cli_onc_diagnostico AS tdg LEFT JOIN tbl_onc_tipo_diagnostico AS t1 ON t1.tdiag_numero = tdg.tdiag_numero WHERE tdg.cldiag_numero = (SELECT MAX(t3.cldiag_numero ) FROM dbo.cli_onc_diagnostico AS t3 WHERE t3.cli_codigo = c.cli_codigo) )as ultdiag ,( SELECT FORMAT(tdgf.cldiag_tmsp_registracion, 'dd/MM/yyyy') FROM cli_onc_diagnostico AS tdgf WHERE tdgf.cldiag_numero = (SELECT MAX(t4.cldiag_numero ) FROM dbo.cli_onc_diagnostico AS t4 WHERE t4.cli_codigo = c.cli_codigo) )as ultdiagfecha FROM clientes as c LEFT JOIN obrasoc as ob ON ob.obs_codigo = c.obs_codigo LEFT JOIN obsplan as obp ON obp.obs_codigo = c.obs_codigo AND obp.obsp_cod = c.obsp_cod LEFT JOIN tbl_tipoid AS td ON td.tid_codigo = c.tid_codigo LEFT JOIN dgicond AS dgi ON dgi.dgi_codigo = c.tid_codigo ".$where." ORDER BY c.cli_nombre"; } else { // ,( SELECT t1.tdiag_denom // FROM cli_onc_diagnostico AS tdg // LEFT JOIN tbl_onc_tipo_diagnostico AS t1 ON t1.tdiag_numero = tdg.tdiag_numero // WHERE tdg.cldiag_numero = (SELECT MAX(t3.cldiag_numero ) // FROM dbo.cli_onc_diagnostico AS t3 // WHERE t3.cli_codigo = c.cli_codigo) // )as ultdiag // ,( SELECT FORMAT(tdgf.cldiag_tmsp_registracion, 'dd/MM/yyyy') // FROM cli_onc_diagnostico AS tdgf // WHERE tdgf.cldiag_numero = (SELECT MAX(t4.cldiag_numero ) // FROM dbo.cli_onc_diagnostico AS t4 // WHERE t4.cli_codigo = c.cli_codigo) // )as ultdiagfecha $sql = "SELECT ".$GLOBALS['N_RECORDS']." c.cli_codigo as cod ,c.cli_nombre as nombre ,FORMAT(c.cli_fecnto,'dd/MM/yyyy') as fnto ,FORMAT(c.cli_registracion,'dd/MM/yyyy') as falta , c.cli_tel AS tel , c.cli_email AS email , c.cli_carnet AS afil ,0 as itemselected ,0 as rem ,0 as erst ,cli_bloqueado AS bloquedo ,ob.obs_denom as obs ,obp.obsp_denom AS plan_ ,dbo.GetAge(c.cli_fecnto) AS edad ,c.cli_dni as doc ,tipodoc.tid_abrev as dname ,CONCAT(tipodoc.tid_abrev,' ',c.cli_dni) AS tdoc ,(CASE WHEN c.obs_gravado = 1 THEN 'SI' ELSE 'NO' END) as grv ,dgi.dgi_cond as iva ,td.tdiag_denom as ultdiag ,(CASE WHEN diag.cldiag_fecha_diagnostico IS NULL THEN '' ELSE FORMAT(diag.cldiag_fecha_diagnostico, 'dd/MM/yyyy') END ) as ultdiagfecha FROM clientes as c LEFT JOIN cli_onc_diagnostico as diag ON c.cli_codigo = diag.cli_codigo LEFT JOIN tbl_onc_tipo_diagnostico AS td ON td.tdiag_numero = diag.tdiag_numero LEFT JOIN obrasoc as ob ON ob.obs_codigo = c.obs_codigo LEFT JOIN obsplan as obp ON obp.obs_codigo = c.obs_codigo AND obp.obsp_cod = c.obsp_cod LEFT JOIN tbl_tipoid AS tipodoc ON tipodoc.tid_codigo = c.tid_codigo LEFT JOIN dgicond AS dgi ON dgi.dgi_codigo = c.tid_codigo ".$where." ORDER BY diag.cldiag_tmsp_registracion DESC"; } //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $clientes = $GLOBALS['dbSQL']->getAll(); if( is_array($clientes)&&count($clientes)>0 ) { /*for($i=0,$t=count($clientes);$i<$t;$i++) { //Pagos $esp = array(); $pagoslst = getClientePagos($clientes[$i]["cod"]); if($pagoslst==EMPTY_LST) { $clientes[$i]["pglst"] = array(); } else { $clientes[$i]["pglst"] = $pagoslst; // print_r($esp);print_r("\n"); // print_r($esplst);print_r("\n"); // print_r($profesionales[$i]["esplst"]);die; } //Atenciones $grilla = getProfesionalSMIGrilla($profesionales[$i]["cod"]); if($esplst==EMPTY_LST) { $profesionales[$i]["gri"] = $esp; } else { $profesionales[$i]["gri"] = $grilla; } }*/ //print_r($clientes);die; return $clientes; } return EMPTY_LST; } return false; } function getDiagnosticoPronosticos($diagnro) { $emptylist = array(); $sql = "SELECT tp.dipro_numero as nro ,tp.cldiag_numero as coddiag ,tp.tpro_numero as pron ,tp.tprint_numero as intens ,tp.med_codigo as medcod ,(CASE WHEN tp.dipro_fecha IS NULL THEN '' ELSE CONVERT(VARCHAR(10),tp.dipro_fecha,103) END) AS fecha ,tp.dipro_observacion as observ ,0 as itemselected ,0 as rem FROM cli_onc_diag_pronosticos tp INNER JOIN cli_onc_diagnostico as dg ON dg.cldiag_numero = tp.cldiag_numero INNER JOIN tbl_onc_tipo_diagnostico as ttr ON ttr.tdiag_numero = dg.tdiag_numero INNER JOIN tbl_onc_tipo_pronostico AS pr ON pr.tpro_numero = tp.tpro_numero INNER JOIN tbl_onc_pronostico_intensidad AS inte ON inte.tprint_numero = tp.tprint_numero WHERE tp.cldiag_numero = ".$diagnro." ORDER BY tp.dipro_fecha DESC, tp.dipro_numero ASC"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST_OBJ; } return EMPTY_LST_OBJ; } function getDiagnosticoPronosticoPreliminares($diagnostico) { $sql = "SELECT pd.tpro_numero as cod ,pd.tpro_denom as denom ,0 as itemselected ,0 as rem FROM tbl_onc_tipo_pronostico_preliminar AS p INNER JOIN tbl_onc_tipo_pronostico AS pd ON pd.tpro_numero = p.tpro_numero WHERE p.tdiag_numero = ".$diagnostico." ORDER BY 3 DESC"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST_OBJ; } return EMPTY_LST_OBJ; } function getListaPacienteOncDiagnosticos() { $where = ""; if(isset($_REQUEST["key"])) { //$where = " WHERE tr.cltrat_numero = '".addslashes($_REQUEST["key"])."'"; $where = " WHERE tr.cli_codigo = '".addslashes($_REQUEST["key"])."'"; $sql = "SELECT tr.cldiag_numero as cod ,ttr.tdiag_denom as denom ,tr.tdiag_numero AS trcod ,CONVERT(VARCHAR(10),tr.cldiag_fecha_diagnostico,103) AS fecha ,0 as itemselected ,0 as rem ,0 as erst FROM cli_onc_diagnostico as tr INNER JOIN tbl_onc_tipo_diagnostico as ttr ON ttr.tdiag_numero = tr.tdiag_numero" . $where." ORDER BY tr.cldiag_fecha_diagnostico DESC";; } //EDITAR/VISUALIZAR if(isset($_REQUEST["keyextra"])) { $where = " WHERE tr.cldiag_numero = '".addslashes($_REQUEST["keyextra"])."'"; $sql = "SELECT tr.cldiag_numero as cod ,tr.cli_codigo as clicod ,tr.tdiag_numero AS trcod ,(CASE WHEN tr.tdiag_numero IS NULL THEN '' ELSE tr.tdiag_numero END) as tipodiag ,(CASE WHEN tr.org_numero_localizacion IS NULL THEN '' ELSE tr.org_numero_localizacion END) as organo ,(CASE WHEN tr.tdet_numero IS NULL THEN '' ELSE tr.tdet_numero END) as metodo ,(CASE WHEN tr.org_numero_metastasis IS NULL THEN '' ELSE tr.org_numero_metastasis END) as metastasis ,(CASE WHEN tr.cldiag_tnm_clinico_t IS NULL THEN '' ELSE tr.cldiag_tnm_clinico_t END) as tnm_clinico_t ,(CASE WHEN tr.cldiag_tnm_clinico_n IS NULL THEN '' ELSE tr.cldiag_tnm_clinico_n END) as tnm_clinico_n ,(CASE WHEN tr.cldiag_tnm_clinico_m IS NULL THEN '' ELSE tr.cldiag_tnm_clinico_m END) as tnm_clinico_m ,(CASE WHEN tr.cldiag_tnm_patologico_t IS NULL THEN '' ELSE tr.cldiag_tnm_patologico_t END) as tnm_patologico_t ,(CASE WHEN tr.cldiag_tnm_patologico_n IS NULL THEN '' ELSE tr.cldiag_tnm_patologico_n END) as tnm_patologico_n ,(CASE WHEN tr.cldiag_tnm_patologico_m IS NULL THEN '' ELSE tr.cldiag_tnm_patologico_m END) as tnm_patologico_m ,(CASE WHEN tr.est_numero_inicial IS NULL THEN '' ELSE tr.est_numero_inicial END) AS estado_inicial ,(CASE WHEN tr.est_numero_actual IS NULL THEN '' ELSE tr.est_numero_actual END) AS estado_actual ,(CASE WHEN tr.cldiag_fecha_estini IS NULL THEN '' ELSE CONVERT(VARCHAR(10),tr.cldiag_fecha_estini,103) END) AS fecha_estini ,(CASE WHEN tr.cldiag_fecha_estact IS NULL THEN '' ELSE CONVERT(VARCHAR(10),tr.cldiag_fecha_estact,103) END) AS fecha_estact ,(CASE WHEN tr.cldiag_fecha_1ersint IS NULL THEN '' ELSE CONVERT(VARCHAR(10),tr.cldiag_fecha_1ersint,103) END) AS fecha_1ersint ,(CASE WHEN tr.cldiag_fecha_1erconsul IS NULL THEN '' ELSE CONVERT(VARCHAR(10),tr.cldiag_fecha_1erconsul,103) END) AS fecha_1erconsul ,(CASE WHEN tr.cldiag_fecha_1ertrat IS NULL THEN '' ELSE CONVERT(VARCHAR(10),tr.cldiag_fecha_1ertrat,103) END) AS fecha_1ertrat ,(CASE WHEN tr.cldiag_fecha_ultconsul IS NULL THEN '' ELSE CONVERT(VARCHAR(10),tr.cldiag_fecha_ultconsul,103) END) AS fecha_ultconsul ,(CASE WHEN tr.cldiag_fecha_diagnostico IS NULL THEN '' ELSE CONVERT(VARCHAR(10),tr.cldiag_fecha_diagnostico,103) END) AS fecha_diagnostico ,tr.cldiag_edad_diagnostico ,(CASE WHEN tr.apat_numero IS NULL THEN '' ELSE tr.apat_numero END) AS anatpat ,(CASE WHEN tr.cldiag_descripcion IS NULL THEN '' ELSE tr.cldiag_descripcion END) AS observacion ,(CASE WHEN tr.cldiag_fecha_muerte IS NULL THEN '' ELSE CONVERT(VARCHAR(10),tr.cldiag_fecha_muerte,103) END) AS fecha_muerte ,(CASE WHEN tr.cmue_numero IS NULL THEN '' ELSE tr.cmue_numero END) as cmue_numero ,(CASE WHEN tr.cldiag_ganglios_ais IS NULL THEN '' ELSE tr.cldiag_ganglios_ais END) as cldiag_ganglios_ais ,(CASE WHEN tr.cldiag_ganglios_pos IS NULL THEN '' ELSE tr.cldiag_ganglios_pos END) as cldiag_ganglios_pos ,(CASE WHEN tr.cldiag_nro_protocolo IS NULL THEN '' ELSE tr.cldiag_nro_protocolo END) as cldiag_nro_protocolo ,(CASE WHEN tr.cldiag_patologo IS NULL THEN '' ELSE tr.cldiag_patologo END) as cldiag_patologo ,0 as itemselected ,0 as rem ,0 as erst FROM cli_onc_diagnostico as tr" . $where." ORDER BY 2"; } //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { //Planes Tratamiento for($i=0,$t=count($rs);$i<$t;$i++) { if(isset($_REQUEST["keyextra"])) { $rs[$i]["observacionenc"] = base64_encode($rs[$i]["observacion"]); } $rs[$i]["pronost"] = getDiagnosticoPronosticos($rs[$i]["cod"]); $rs[$i]["pronpre"] = getDiagnosticoPronosticoPreliminares($rs[$i]["trcod"]); } return $rs; } return EMPTY_LST; } return false; } function getDiagnosticoInfo($diagnro) { $where = " WHERE tr.cldiag_numero = '".addslashes($diagnro)."'"; $sql = "SELECT tr.cldiag_numero as cod ,tr.cli_codigo as clicod ,c.cli_nombre as nombre ,dg.tdiag_denom as diag ,oc.ocu_denom as ocup ,obs.obs_denom as segmed ,(CASE WHEN c.cli_tel IS NULL THEN '' ELSE c.cli_tel END) as tel ,(CASE WHEN c.cli_dir IS NULL THEN '' ELSE c.cli_dir END) as dir ,(CASE WHEN c.cli_dni IS NULL THEN '' ELSE c.cli_dni END) as doc ,(CASE WHEN c.cli_sexo IS NULL THEN '' ELSE c.cli_sexo END) as sex ,(CASE WHEN c.cli_carnet IS NULL THEN '' ELSE c.cli_carnet END) as carnet ,(CASE WHEN ec.esc_denom IS NULL THEN '' ELSE ec.esc_denom END) as ecivil ,(CASE WHEN c.cli_fecnto IS NULL THEN '' ELSE dbo.GetAge(c.cli_fecnto) END) as edad ,(CASE WHEN c.cli_fecnto IS NULL THEN '' ELSE CONVERT(VARCHAR(10),c.cli_fecnto,103) END) AS fnac FROM cli_onc_diagnostico as tr INNER JOIN tbl_onc_tipo_diagnostico as dg ON dg.tdiag_numero = tr.tdiag_numero INNER JOIN clientes as c ON c.cli_codigo = tr.cli_codigo LEFT JOIN obrasoc as obs ON obs.obs_codigo = c.obs_codigo LEFT JOIN tbl_ocupaciones as oc ON oc.ocu_codigo = c.ocu_codigo LEFT JOIN tbl_estadocivil as ec ON ec.esc_codigo = c.esc_codigo". $where; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } function getFichaDiariaInfo($clicod) { $where = " WHERE c.cli_codigo = '".addslashes($clicod)."'"; $sql = "SELECT c.cli_codigo as clicod ,c.cli_nombre as nombre ,oc.ocu_denom as ocup ,obs.obs_denom as segmed ,(CASE WHEN c.cli_tel IS NULL THEN '' ELSE c.cli_tel END) as tel ,(CASE WHEN c.cli_dir IS NULL THEN '' ELSE c.cli_dir END) as dir ,(CASE WHEN c.cli_dni IS NULL THEN '' ELSE c.cli_dni END) as doc ,(CASE WHEN c.cli_sexo IS NULL THEN '' ELSE c.cli_sexo END) as sex ,(CASE WHEN c.cli_carnet IS NULL THEN '' ELSE c.cli_carnet END) as carnet ,(CASE WHEN ec.esc_denom IS NULL THEN '' ELSE ec.esc_denom END) as ecivil ,(CASE WHEN c.cli_fecnto IS NULL THEN '' ELSE dbo.GetAge(c.cli_fecnto) END) as edad ,(CASE WHEN c.cli_fecnto IS NULL THEN '' ELSE CONVERT(VARCHAR(10),c.cli_fecnto,103) END) AS fnac FROM clientes as c LEFT JOIN obrasoc as obs ON obs.obs_codigo = c.obs_codigo LEFT JOIN tbl_ocupaciones as oc ON oc.ocu_codigo = c.ocu_codigo LEFT JOIN tbl_estadocivil as ec ON ec.esc_codigo = c.esc_codigo". $where; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } function getEpicrisisInfo($clicod) { $where = " WHERE ep.cli_codigo = '".addslashes($clicod)."'"; $sql = "SELECT ep.oncep_numero as cod ,ep.cli_codigo as clicod ,c.cli_nombre as nombre ,(CASE WHEN ep.oncep_resumen IS NULL THEN '' ELSE ep.oncep_resumen END) as resumen FROM cli_onc_epicrisis as ep INNER JOIN clientes as c ON c.cli_codigo = ep.cli_codigo". $where; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } function getOncEpicrisis() { $where = ""; if(isset($_REQUEST["key"])) { $where = " WHERE tr.cli_codigo = '".addslashes($_REQUEST["key"])."'"; $sql = "SELECT tr.oncep_numero as cod ,tr.emp_codigo as empcod ,tr.oncep_resumen AS resumen ,em.emp_nombre as emple ,FORMAT(tr.oncep_tmsp, 'dd/MM/yyyy HH:mm:ss') AS fecha FROM cli_onc_epicrisis as tr INNER JOIN empleado as em ON em.emp_codigo=tr.emp_codigo" . $where; } //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } function getOncExamFisico() { $where = ""; if(isset($_REQUEST["key"])) { $where = " WHERE tr.cli_codigo = '".addslashes($_REQUEST["key"])."'"; $sql = "SELECT tr.cexf_numero as cod ,tr.cexf_fc AS fc ,tr.cexf_peso as peso ,tr.cexf_ta as ta ,tr.cexf_altura as altura ,tr.cexf_fr as fr ,tr.cexf_t as t ,tr.cexf_ecog as ecog ,tr.cexf_mb as mb ,tr.cexf_me as me ,tr.cexf_gu as gu ,tr.cexf_pt as pt ,tr.cexf_ab as ab ,tr.cexf_ldhcol as ldhcol ,tr.cexf_neutrofilos as neutrofilos ,tr.cexf_linfocitos as linfocitos ,tr.cexf_inspecion as inspecion ,em1.emp_nombre as emplereg ,em2.emp_nombre as empleult ,(CASE WHEN tr.clenf_tmsp_ult_cambio IS NULL THEN '' ELSE FORMAT(tr.clenf_tmsp_ult_cambio, 'dd/MM/yyyy HH:mm:ss') END) AS fechault ,(CASE WHEN tr.clenf_tmsp_registracion IS NULL THEN '' ELSE FORMAT(tr.clenf_tmsp_registracion, 'dd/MM/yyyy HH:mm:ss') END) AS fechareg FROM cli_onc_examen_fisico as tr LEFT JOIN empleado as em1 ON em1.emp_codigo = tr.emp_codigo_registracion LEFT JOIN empleado as em2 ON em2.emp_codigo = tr.emp_codigo_ult_cambio" . $where; } //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { for($i=0,$t=count($rs);$i<$t;$i++) { $rs[$i]["inspecionenc"] = $rs[$i]["inspecion"]; } return $rs; } return EMPTY_LST; } return false; } function getOncAntecedentes() { $where = ""; $sql=false; if(isset($_REQUEST["key"])) { $where = " WHERE tr.cli_codigo = '".addslashes($_REQUEST["key"])."'"; $sql = "SELECT tr.ant_numero as nro ,tr.cli_codigo as clicod ,(CASE WHEN ant_cigcantidad IS NULL THEN '' ELSE CAST(ant_cigcantidad as VARCHAR) END) AS cigcantidad ,(CASE WHEN ant_cigedaddesde IS NULL THEN CAST(0 as VARCHAR) ELSE CAST(ant_cigedaddesde as VARCHAR) END) AS cigedaddesde ,(CASE WHEN ant_cigedadhasta IS NULL THEN CAST(0 as VARCHAR) ELSE CAST(ant_cigedadhasta as VARCHAR) END) AS cigedadhasta ,(CASE WHEN ant_cigobservaciones IS NULL THEN '' ELSE CAST(ant_cigobservaciones as VARCHAR) END) AS cigobservaciones ,(CASE WHEN ant_alclitros IS NULL THEN CAST(0 as VARCHAR) ELSE CAST(ant_alclitros as VARCHAR) END) AS alclitros ,(CASE WHEN ant_alcedaddesde IS NULL THEN CAST(0 as VARCHAR) ELSE CAST(ant_alcedaddesde as VARCHAR) END) AS alcedaddesde ,(CASE WHEN ant_alcedadhasta IS NULL THEN CAST(0 as VARCHAR) ELSE CAST(ant_alcedadhasta as VARCHAR) END) AS alcedadhasta ,(CASE WHEN ant_alctipobeb IS NULL THEN '' ELSE CAST(ant_alctipobeb as VARCHAR) END) AS alctipobeb ,(CASE WHEN ant_menarca IS NULL THEN CAST(0 as VARCHAR) ELSE CAST(ant_menarca as VARCHAR) END) AS menarca ,(CASE WHEN ant_menarcaanos IS NULL THEN '' ELSE CAST(ant_menarcaanos as VARCHAR) END) AS menarcaanos ,(CASE WHEN ant_lactanciatipo IS NULL THEN '' ELSE CAST(ant_lactanciatipo as VARCHAR) END) AS lactanciatipo ,(CASE WHEN ant_lactantiempo IS NULL THEN '' ELSE CAST(ant_lactantiempo as VARCHAR) END) AS lactantiempo ,(CASE WHEN ant_estadomenstrual IS NULL THEN '' ELSE CAST(ant_estadomenstrual as VARCHAR) END) AS estadomenstrual ,(CASE WHEN ant_menstruaedad IS NULL THEN CAST(0 as VARCHAR) ELSE CAST(ant_menstruaedad as VARCHAR) END) AS menstruaedad ,(CASE WHEN ant_menstruatxt IS NULL THEN '' ELSE CAST(ant_menstruatxt as VARCHAR) END) AS menstruatxt ,(CASE WHEN ant_embarazos IS NULL THEN CAST(0 as VARCHAR) ELSE CAST(ant_embarazos as VARCHAR) END) AS embarazos ,(CASE WHEN ant_edad1eremb IS NULL THEN CAST(0 as VARCHAR) ELSE CAST(ant_edad1eremb as VARCHAR) END) AS edad1eremb ,(CASE WHEN ant_partos IS NULL THEN CAST(0 as VARCHAR) ELSE CAST(ant_partos as VARCHAR) END) AS partos ,(CASE WHEN ant_abortosesp IS NULL THEN CAST(0 as VARCHAR) ELSE CAST(ant_abortosesp as VARCHAR) END) AS abortosesp ,(CASE WHEN ant_abortosprov IS NULL THEN CAST(0 as VARCHAR) ELSE CAST(ant_abortosprov as VARCHAR) END) AS abortosprov ,(CASE WHEN ant_dietagrasa IS NULL THEN '' ELSE CAST(ant_dietagrasa as VARCHAR) END) AS dietagrasa ,(CASE WHEN ant_dietagratxt IS NULL THEN '' ELSE CAST(ant_dietagratxt as VARCHAR) END) AS dietagratxt ,(CASE WHEN ant_ejercio IS NULL THEN '' ELSE CAST(ant_ejercio as VARCHAR) END) AS ejercio ,(CASE WHEN ant_respitarorios IS NULL THEN '' ELSE CAST(ant_respitarorios as VARCHAR) END) AS respitarorios ,(CASE WHEN ant_cardiacos IS NULL THEN '' ELSE CAST(ant_cardiacos as VARCHAR) END) AS cardiacos ,(CASE WHEN ant_metabolicos IS NULL THEN '' ELSE CAST(ant_metabolicos as VARCHAR) END) AS metabolicos ,(CASE WHEN ant_renales IS NULL THEN '' ELSE CAST(ant_renales as VARCHAR) END) AS renales ,(CASE WHEN ant_inmunologicos IS NULL THEN '' ELSE CAST(ant_inmunologicos as VARCHAR) END) AS inmunologicos ,(CASE WHEN ant_otros IS NULL THEN '' ELSE CAST(ant_otros as VARCHAR) END) AS otros ,(CASE WHEN ant_diabetes IS NULL THEN '' ELSE CAST(ant_diabetes as VARCHAR) END) AS diabetes ,(CASE WHEN ant_metformina IS NULL THEN '' ELSE CAST(ant_metformina as VARCHAR) END) AS metformina ,(CASE WHEN ant_antquir IS NULL THEN '' ELSE CAST(ant_antquir as VARCHAR) END) AS antquir ,(CASE WHEN ant_padrediagonco IS NULL THEN '' ELSE CAST(ant_padrediagonco as VARCHAR) END) AS padrediagonco ,(CASE WHEN ant_padreotros IS NULL THEN '' ELSE CAST(ant_padreotros as VARCHAR) END) AS padreotros ,(CASE WHEN ant_madrediagonco IS NULL THEN '' ELSE CAST(ant_madrediagonco as VARCHAR) END) AS madrediagonco ,(CASE WHEN ant_madreotros IS NULL THEN '' ELSE CAST(ant_madreotros as VARCHAR) END) AS madreotros ,(CASE WHEN ant_herrediagonco IS NULL THEN '' ELSE CAST(ant_herrediagonco as VARCHAR) END) AS herrediagonco ,(CASE WHEN ant_herreotros IS NULL THEN '' ELSE CAST(ant_herreotros as VARCHAR) END) AS herreotros ,(CASE WHEN ant_tiosrediagonco IS NULL THEN '' ELSE CAST(ant_tiosrediagonco as VARCHAR) END) AS tiosrediagonco ,(CASE WHEN ant_tiosreotros IS NULL THEN '' ELSE CAST(ant_tiosreotros as VARCHAR) END) AS tiosreotros ,(CASE WHEN ant_otrosrediagonco IS NULL THEN '' ELSE CAST(ant_otrosrediagonco as VARCHAR) END) AS otrosrediagonco ,(CASE WHEN ant_otrosreotros IS NULL THEN '' ELSE CAST(ant_otrosreotros as VARCHAR) END) AS otrosreotros ,(CASE WHEN ant_cigfdesde IS NULL THEN '' ELSE FORMAT(ant_cigfdesde,'dd/MM/yyyy') END) AS cigfdesde ,(CASE WHEN ant_cigfhasta IS NULL THEN '' ELSE FORMAT(ant_cigfhasta,'dd/MM/yyyy') END) AS cigfhasta ,(CASE WHEN ant_alcfdesde IS NULL THEN '' ELSE FORMAT(ant_alcfdesde,'dd/MM/yyyy') END) AS alcfdesde ,(CASE WHEN ant_alcfhasta IS NULL THEN '' ELSE FORMAT(ant_alcfhasta,'dd/MM/yyyy') END) AS alcfhasta ,(CASE WHEN ant_ultmenstrual IS NULL THEN '' ELSE FORMAT(ant_ultmenstrual,'dd/MM/yyyy') END) AS ultmenstrual ,(CASE WHEN emp_codigo_registracion IS NULL THEN '' ELSE CAST(emp_codigo_registracion as VARCHAR) END) as empcod ,(CASE WHEN emp_codigo_ult_cambio IS NULL THEN '' ELSE CAST(emp_codigo_ult_cambio as VARCHAR) END) as ultempcod ,(CASE WHEN clenf_tmsp_registracion IS NULL THEN '' ELSE FORMAT(clenf_tmsp_registracion,'dd/MM/yyyy') END) AS empreg ,(CASE WHEN clenf_tmsp_ult_cambio IS NULL THEN '' ELSE FORMAT(clenf_tmsp_ult_cambio,'dd/MM/yyyy') END) AS ultmest FROM cli_onc_antecedentes as tr LEFT JOIN empleado as em1 ON em1.emp_codigo = tr.emp_codigo_registracion LEFT JOIN empleado as em2 ON em2.emp_codigo = tr.emp_codigo_ult_cambio" . $where; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { for($i=0,$t=count($rs);$i<$t;$i++) { $rs[$i]["cigobservacionesenc"] = base64_encode($rs[$i]["cigobservaciones"]); $rs[$i]["respitaroriosenc"] = base64_encode($rs[$i]["respitarorios"]); $rs[$i]["cardiacosenc"] = base64_encode($rs[$i]["cardiacos"]); $rs[$i]["metabolicosenc"] = base64_encode($rs[$i]["metabolicos"]); $rs[$i]["renalesenc"] = base64_encode($rs[$i]["renales"]); $rs[$i]["inmunologicosenc"] = base64_encode($rs[$i]["inmunologicos"]); $rs[$i]["otrosenc"] = base64_encode($rs[$i]["otros"]); $rs[$i]["antquirenc"] = base64_encode($rs[$i]["antquir"]); $rs[$i]["padreotrosenc"] = base64_encode($rs[$i]["padreotros"]); $rs[$i]["madreotrosenc"] = base64_encode($rs[$i]["madreotros"]); $rs[$i]["herreotrosenc"] = base64_encode($rs[$i]["herreotros"]); $rs[$i]["tiosreotrosenc"] = base64_encode($rs[$i]["tiosreotros"]); $rs[$i]["otrosreotrosenc"] = base64_encode($rs[$i]["otrosreotros"]); } return $rs; } return EMPTY_LST; } } return false; } function getOncEnfermedad() { $where = ""; if(isset($_REQUEST["key"])) { $where = " WHERE tr.cli_codigo = '".addslashes($_REQUEST["key"])."'"; $sql = "SELECT tr.clenf_numero as nro ,tr.cli_codigo as clicod ,(CASE WHEN clenf_antecedente IS NULL THEN '' ELSE clenf_antecedente END) AS antecedente ,(CASE WHEN clenf_motivo IS NULL THEN '' ELSE clenf_motivo END) AS motivo ,(CASE WHEN emp_codigo_registracion IS NULL THEN '' ELSE CAST(emp_codigo_registracion as VARCHAR) END) AS empcod ,(CASE WHEN emp_codigo_ult_cambio IS NULL THEN '' ELSE CAST(emp_codigo_ult_cambio as VARCHAR) END) AS ultempcod ,(CASE WHEN clenf_tmsp_registracion IS NULL THEN '' ELSE FORMAT(clenf_tmsp_registracion,'dd/MM/yyyy') END) AS empreg ,(CASE WHEN clenf_tmsp_ult_cambio IS NULL THEN '' ELSE FORMAT(clenf_tmsp_ult_cambio,'dd/MM/yyyy') END) AS ultmest FROM cli_onc_enfermedad as tr LEFT JOIN empleado as em1 ON em1.emp_codigo = tr.emp_codigo_registracion LEFT JOIN empleado as em2 ON em2.emp_codigo = tr.emp_codigo_ult_cambio" . $where; } //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { for($i=0,$t=count($rs);$i<$t;$i++) { $rs[$i]["motivoenc"] = base64_encode($rs[$i]["motivo"]); $rs[$i]["antecedenteenc"] = base64_encode($rs[$i]["antecedente"]); /*if(isset($_REQUEST["key"])&&intval($_REQUEST["key"])==13182) { print_r("--ANT--");print_r("\n"); print_r($rs[$i]["antecedente"]);print_r("\n"); print_r("---COD----");print_r("\n"); print_r($rs[$i]["antecedenteenc"]);print_r("\n"); print_r("-------");print_r("\n"); }*/ } return $rs; } return EMPTY_LST_OBJ; } return EMPTY_LST_OBJ; } function getOncEstudios() { $where = ""; if(isset($_REQUEST["key"])) { $where = " WHERE tr.cli_codigo = '".addslashes($_REQUEST["key"])."'"; //,tr.est_fecha as fecha $sql = "SELECT tr.est_numero as cod ,tr.cli_codigo as clicod ,tr.med_codigo as medcod ,tr.test_numero as tecod ,FORMAT(tr.est_fecha,'dd/MM/yyyy') AS fecha ,tr.est_fechaprox as fechaprox ,(CASE WHEN tr.est_avisa IS NULL THEN 0 ELSE tr.est_avisa END) as avisaval ,(CASE WHEN tr.est_avisa IS NULL THEN 'NO' WHEN tr.est_avisa = 0 THEN 'NO' ELSE 'SI' END) as avisa ,te.test_denom as denom ,med.med_nombre as medico ,(CASE WHEN est_observacion IS NULL THEN '' ELSE est_observacion END) AS observacion ,(CASE WHEN est_fechaprox IS NULL THEN '' ELSE FORMAT(est_fechaprox,'dd/MM/yyyy') END) AS fechaprox ,(CASE WHEN clenf_tmsp_registracion IS NULL THEN '' ELSE FORMAT(clenf_tmsp_registracion,'dd/MM/yyyy') END) AS ultmest ,(CASE WHEN clenf_tmsp_ult_cambio IS NULL THEN '' ELSE FORMAT(clenf_tmsp_ult_cambio,'dd/MM/yyyy') END) AS ultmest ,0 as itemselected ,0 as rem ,0 as erst FROM cli_onc_estudios as tr INNER JOIN medicos as med ON med.med_codigo = tr.med_codigo INNER JOIN tbl_onc_tipo_estudio as te ON te.test_numero = tr.test_numero LEFT JOIN empleado as em1 ON em1.emp_codigo = tr.emp_codigo_registracion LEFT JOIN empleado as em2 ON em2.emp_codigo = tr.emp_codigo_ult_cambio" . $where." ORDER BY tr.est_fecha DESC"; } if(isset($_REQUEST["keyextra"])) { $where = " WHERE tr.est_numero = '".addslashes($_REQUEST["keyextra"])."'"; $sql = "SELECT tr.est_numero as cod ,tr.cli_codigo as clicod ,tr.med_codigo as medcod ,tr.test_numero as tecod ,(CASE WHEN tr.est_fecha IS NULL THEN '' ELSE CONVERT(VARCHAR(10),tr.est_fecha,103) END) as fecha ,(CASE WHEN tr.est_fechaprox IS NULL THEN '' ELSE CONVERT(VARCHAR(10),tr.est_fechaprox,103) END) as fechaprox ,(CASE WHEN tr.est_avisa IS NULL THEN 0 ELSE tr.est_avisa END) as avisaval ,(CASE WHEN est_observacion IS NULL THEN '' ELSE est_observacion END) AS observacion ,0 as itemselected ,0 as rem ,0 as erst FROM cli_onc_estudios as tr" . $where; } //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { for($i=0,$t=count($rs);$i<$t;$i++) { $rs[$i]["observacion_sf"] = strip_tags($rs[$i]["observacion"]); $rs[$i]["observacion_sf2"]= strip_tags(str_replace("
"," _TAG_ ",str_replace("","",$rs[$i]["observacion"]))); } return $rs; } return EMPTY_LST; } return false; } function getOncDiagPronosticos() { $where = ""; if(isset($_REQUEST["key"])) { $where = " WHERE tr.cli_codigo = '".addslashes($_REQUEST["key"])."'"; //,tr.est_fecha as fecha $sql = "SELECT tr.est_numero as cod ,tr.cli_codigo as clicod ,tr.med_codigo as medcod ,tr.test_numero as tecod ,FORMAT(tr.est_fecha,'dd/MM/yyyy') AS fecha ,tr.est_fechaprox as fechaprox ,(CASE WHEN tr.est_avisa IS NULL THEN 0 ELSE tr.est_avisa END) as avisaval ,(CASE WHEN tr.est_avisa IS NULL THEN 'NO' WHEN tr.est_avisa = 0 THEN 'NO' ELSE 'SI' END) as avisa ,te.test_denom as denom ,med.med_nombre as medico ,(CASE WHEN est_observacion IS NULL THEN '' ELSE est_observacion END) AS observacion ,(CASE WHEN est_fechaprox IS NULL THEN '' ELSE FORMAT(est_fechaprox,'dd/MM/yyyy') END) AS fechaprox ,(CASE WHEN clenf_tmsp_registracion IS NULL THEN '' ELSE FORMAT(clenf_tmsp_registracion,'dd/MM/yyyy') END) AS ultmest ,(CASE WHEN clenf_tmsp_ult_cambio IS NULL THEN '' ELSE FORMAT(clenf_tmsp_ult_cambio,'dd/MM/yyyy') END) AS ultmest ,0 as itemselected ,0 as rem ,0 as erst FROM cli_onc_estudios as tr INNER JOIN medicos as med ON med.med_codigo = tr.med_codigo INNER JOIN tbl_onc_tipo_estudio as te ON te.test_numero = tr.test_numero LEFT JOIN empleado as em1 ON em1.emp_codigo = tr.emp_codigo_registracion LEFT JOIN empleado as em2 ON em2.emp_codigo = tr.emp_codigo_ult_cambio" . $where." ORDER BY tr.est_fecha DESC"; } if(isset($_REQUEST["keyextra"])) { $where = " WHERE tr.est_numero = '".addslashes($_REQUEST["keyextra"])."'"; $sql = "SELECT tr.est_numero as cod ,tr.cli_codigo as clicod ,tr.med_codigo as medcod ,tr.test_numero as tecod ,(CASE WHEN tr.est_fecha IS NULL THEN '' ELSE CONVERT(VARCHAR(10),tr.est_fecha,103) END) as fecha ,(CASE WHEN tr.est_fechaprox IS NULL THEN '' ELSE CONVERT(VARCHAR(10),tr.est_fechaprox,103) END) as fechaprox ,(CASE WHEN tr.est_avisa IS NULL THEN 0 ELSE tr.est_avisa END) as avisaval ,(CASE WHEN est_observacion IS NULL THEN '' ELSE est_observacion END) AS observacion ,0 as itemselected ,0 as rem ,0 as erst FROM cli_onc_estudios as tr" . $where; } //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } //spider pochi function getLaboratorioDetalle($labonro) { $emptylist = array(); $sql = "SELECT tp.dipro_numero as nro ,tp.cldiag_numero as coddiag ,tp.tpro_numero as pron ,tp.tprint_numero as intens ,tp.med_codigo as medcod ,(CASE WHEN tp.dipro_fecha IS NULL THEN '' ELSE CONVERT(VARCHAR(10),tp.dipro_fecha,103) END) AS fecha ,tp.dipro_observacion as observ ,0 as itemselected ,0 as rem FROM cli_onc_laboratorio_analisis_detalle tp INNER JOIN cli_onc_diagnostico as dg ON dg.cldiag_numero = tp.cldiag_numero INNER JOIN tbl_onc_tipo_diagnostico as ttr ON ttr.tdiag_numero = dg.tdiag_numero INNER JOIN tbl_onc_tipo_pronostico AS pr ON pr.tpro_numero = tp.tpro_numero INNER JOIN tbl_onc_pronostico_intensidad AS inte ON inte.tprint_numero = tp.tprint_numero WHERE tp.cldiag_numero = ".$labonro." ORDER BY tp.dipro_fecha DESC, tp.dipro_numero ASC"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST_OBJ; } return EMPTY_LST_OBJ; } function getOncLaboratorio() { $where = ""; if(isset($_REQUEST["key"])) { $where = " WHERE ca.cli_codigo = '".addslashes($_REQUEST["key"])."'"; //,tr.est_fecha as fecha $sql = "SELECT tr.est_numero as cod ,tr.cli_codigo as clicod ,tr.med_codigo as medcod ,tr.test_numero as tecod ,FORMAT(tr.est_fecha,'dd/MM/yyyy') AS fecha ,tr.est_fechaprox as fechaprox ,(CASE WHEN tr.est_avisa IS NULL THEN 0 ELSE tr.est_avisa END) as avisaval ,(CASE WHEN tr.est_avisa IS NULL THEN 'NO' WHEN tr.est_avisa = 0 THEN 'NO' ELSE 'SI' END) as avisa ,te.test_denom as denom ,med.med_nombre as medico ,(CASE WHEN est_observacion IS NULL THEN '' ELSE est_observacion END) AS observacion ,(CASE WHEN est_fechaprox IS NULL THEN '' ELSE FORMAT(est_fechaprox,'dd/MM/yyyy') END) AS fechaprox ,(CASE WHEN clenf_tmsp_registracion IS NULL THEN '' ELSE FORMAT(clenf_tmsp_registracion,'dd/MM/yyyy') END) AS ultmest ,(CASE WHEN clenf_tmsp_ult_cambio IS NULL THEN '' ELSE FORMAT(clenf_tmsp_ult_cambio,'dd/MM/yyyy') END) AS ultmest FROM cli_onc_estudios as tr INNER JOIN medicos as med ON med.med_codigo = tr.med_codigo INNER JOIN tbl_onc_tipo_estudio as te ON te.test_numero = tr.test_numero LEFT JOIN empleado as em1 ON em1.emp_codigo = tr.emp_codigo_registracion LEFT JOIN empleado as em2 ON em2.emp_codigo = tr.emp_codigo_ult_cambio" . $where." ORDER BY tr.est_fecha DESC"; $sql = " SELECT cla_numero as cod ,FORMAT ( cla_fecha, 'dd/MM/yyyy' ) as fecha ,ca.labest_numero as estcod ,lest.labest_denom as estado ,em1.emp_nombre as emplereg ,em2.emp_nombre as empleult ,(CASE WHEN tr.clenf_tmsp_ult_cambio IS NULL THEN '' ELSE FORMAT(tr.clenf_tmsp_ult_cambio, 'dd/MM/yyyy HH:mm:ss') END) AS fechault ,(CASE WHEN tr.clenf_tmsp_registracion IS NULL THEN '' ELSE FORMAT(tr.clenf_tmsp_registracion, 'dd/MM/yyyy HH:mm:ss') END) AS fechareg ,0 as itemselected ,0 as rem ,0 as erst FROM cli_onc_laboratorio_analisis ca INNER JOIN clientes c ON c.cli_codigo = ca.cli_codigo INNER JOIN obrasoc o ON ca.obs_codigo = o.obs_codigo INNER JOIN cli_onc_laboratorio_estado as lest ON lest.labest_numero = ca.labest_numero LEFT JOIN empleado as em1 ON em1.emp_codigo = tr.emp_codigo_registracion LEFT JOIN empleado as em2 ON em2.emp_codigo = tr.emp_codigo_ult_cambio". $where." ORDER BY ca.cla_fecha DESC"; } if(isset($_REQUEST["keyextra"])) { $where = " WHERE ca.cla_numero = '".addslashes($_REQUEST["keyextra"])."'"; $sql = " SELECT cla_numero as cod ,FORMAT ( cla_fecha, 'dd/MM/yyyy' ) as fecha ,ca.labest_numero as estcod ,lest.labest_denom as estado ,em1.emp_nombre as emplereg ,em2.emp_nombre as empleult ,(CASE WHEN tr.clenf_tmsp_ult_cambio IS NULL THEN '' ELSE FORMAT(tr.clenf_tmsp_ult_cambio, 'dd/MM/yyyy HH:mm:ss') END) AS fechault ,(CASE WHEN tr.clenf_tmsp_registracion IS NULL THEN '' ELSE FORMAT(tr.clenf_tmsp_registracion, 'dd/MM/yyyy HH:mm:ss') END) AS fechareg ,0 as itemselected ,0 as rem ,0 as erst FROM cli_onc_laboratorio_analisis ca INNER JOIN clientes c ON c.cli_codigo = ca.cli_codigo INNER JOIN obrasoc o ON ca.obs_codigo = o.obs_codigo INNER JOIN cli_onc_laboratorio_estado as lest ON lest.labest_numero = ca.labest_numero LEFT JOIN empleado as em1 ON em1.emp_codigo = tr.emp_codigo_registracion LEFT JOIN empleado as em2 ON em2.emp_codigo = tr.emp_codigo_ult_cambio". $where." ORDER BY ca.cla_fecha DESC"; } //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { //Detalle del Laboratorio $rs[$i]["labdet"] = array(); if(isset($_REQUEST["keyextra"])) { for($i=0,$t=count($rs);$i<$t;$i++) { $rs[$i]["labdet"] = getLaboratorioDetalle($rs[$i]["cod"]); } } return $rs; } return EMPTY_LST; } return false; } function getLstProfesionalesOnc($codProf=false) { $where = ''; if($codProf) { $where = "AND med_codigo = ". $codProf; } elseif(isset($_REQUEST["key"])) { $where = " AND med_codigo = '".addslashes($_REQUEST["key"])."'"; } //,FORMAT(e.emp_alta,'dd/MM/yyyy') as falta // select * from med_especialidades // $sql = "SELECT m.esp_codigo as cod // ,e.esp_denom as denom // FROM med_especialidades as m // INNER JOIN especial as e ON e.esp_codigo = m.esp_codigo // WHERE ".$where." // ORDER BY e.esp_denom"; $sql = " SELECT med_codigo as cod ,CONCAT((CASE WHEN mt.tit_denom IS NULL THEN '' ELSE mt.tit_denom END),' ',med_nombre) AS denom FROM medicos as m LEFT JOIN especial AS me ON me.esp_codigo = m.esp_codigo LEFT JOIN tbl_titulos AS mt ON mt.tit_codigo = m.tit_codigo WHERE med_bloqueado = 0 ".$where." ORDER BY med_nombre"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } function getOncEvoluciones() { $where = ""; if(isset($_REQUEST["key"])) { $resultado = getHcPaciente($_REQUEST["key"]); if ( $resultado ) { if( is_array($resultado)&&count($resultado)>0 ) { //if($_REQUEST["key"]==13182){print_r($resultado);die;} for($i=0,$t=count($resultado["hc"]);$i<$t;$i++) { $resultado["hc"][$i]["evo_sf"] = strip_tags($resultado["hc"][$i]["evo"]); $resultado["hc"][$i]["evo_sf2"] = strip_tags(str_replace("
"," _TAG_ ",str_replace("","",$resultado["hc"][$i]["evo"]))); } return $resultado; } return EMPTY_LST; } } //print_r($sql);die; return false; } function getProtocoloTratamiento() { $sql = "SELECT prot_numero FROM cli_onc_tratamiento as tr WHERE tr.cltrat_numero = '".addslashes($_REQUEST["key"])."'"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)<=0 ) { //Protocolo return EMPTY_LST; } } $where = " WHERE tr.prot_numero = '".$rs[0]["prot_numero"]."'"; $sql = "SELECT tr.prdr_numero as cod ,tr.prot_numero as prot ,tr.pro_codigo as pcod ,p.pro_denom as denomn ,(CASE WHEN tr.prdr_dosis IS NULL THEN '' ELSE tr.prdr_dosis END) as dosis ,(CASE WHEN tr.prdr_tiempo IS NULL THEN '' ELSE tr.prdr_tiempo END) as tiempo ,0 as itemselected ,0 as rem ,0 as erst FROM tbl_onc_protocolo_drogas as tr INNER JOIN productos as p ON p.pro_codigo = tr.pro_codigo" . $where." ORDER BY 4"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { return $rs; } return EMPTY_LST; } return false; } function getListaPacienteOncTratamientos() { $where = ""; if(isset($_REQUEST["key"])) { //$where = " WHERE tr.cltrat_numero = '".addslashes($_REQUEST["key"])."'"; $where = " WHERE tr.cli_codigo = '".addslashes($_REQUEST["key"])."'"; $sql = "SELECT tr.cltrat_numero as cod ,ttr.trat_denom as denom ,tdiag.tdiag_denom as diagdenom ,tr.trat_numero AS trcod ,(CASE WHEN tr.prot_numero IS NULL THEN '' ELSE tr.prot_numero END) as protocolo ,CONVERT(VARCHAR(10),tr.cltrat_fdiag,103) AS fecha ,(CASE WHEN tr.cltrat_fin IS NULL THEN '' ELSE CONVERT(VARCHAR(10),tr.cltrat_fin,103) END) as ffin ,0 as itemselected ,0 as rem ,0 as erst FROM cli_onc_tratamiento as tr INNER JOIN tbl_onc_tipo_tratamientos as ttr ON ttr.trat_numero = tr.trat_numero INNER JOIN cli_onc_diagnostico as diag ON diag.cldiag_numero = tr.cldiag_numero INNER JOIN tbl_onc_tipo_diagnostico as tdiag ON tdiag.tdiag_numero = diag.tdiag_numero" . $where." ORDER BY tr.cltrat_tmsp_registracion DESC"; } //EDITAR/VISUALIZAR UN TRATAMIENTO // INNER JOIN tbl_onc_tipo_tratamientos as ttr ON ttr.trat_numero = tr.trat_numero // INNER JOIN tbl_onc_tipo_tratamientos_asoc AS ttrasoc ON ttr.tptrat_numero = tr.tptrat_numero if(isset($_REQUEST["keyextra"])) { $where = " WHERE tr.cltrat_numero = '".addslashes($_REQUEST["keyextra"])."'"; $sql = "SELECT tr.cltrat_numero as cod ,tr.cli_codigo as clicod ,(CASE WHEN tr.cldiag_numero IS NULL THEN '' ELSE tr.cldiag_numero END) as diagnostico ,(CASE WHEN tr.trat_numero IS NULL THEN '' ELSE tr.trat_numero END) as tipotratamiento ,(CASE WHEN tr.tptrat_numero IS NULL THEN '' ELSE tr.tptrat_numero END) as tipotratamientoasoc ,(CASE WHEN tr.cltrat_region1 IS NULL THEN '' ELSE tr.cltrat_region1 END) as region ,(CASE WHEN tr.cltrat_region2 IS NULL THEN '' ELSE tr.cltrat_region1 END) as region2 ,(CASE WHEN tr.cltrat_region3 IS NULL THEN '' ELSE tr.cltrat_region1 END) as region3 ,(CASE WHEN tr.cltrat_region4 IS NULL THEN '' ELSE tr.cltrat_region1 END) as region4 ,(CASE WHEN tr.cltrat_dosis1 IS NULL THEN 0 ELSE tr.cltrat_dosis1 END) as dosis ,(CASE WHEN tr.cltrat_dosis2 IS NULL THEN 0 ELSE tr.cltrat_dosis1 END) as dosis2 ,(CASE WHEN tr.cltrat_dosis3 IS NULL THEN 0 ELSE tr.cltrat_dosis1 END) as dosis3 ,(CASE WHEN tr.cltrat_dosis4 IS NULL THEN 0 ELSE tr.cltrat_dosis1 END) as dosis4 ,(CASE WHEN tr.org_numero_1 IS NULL THEN '' ELSE tr.org_numero_1 END) as orgrac1 ,(CASE WHEN tr.org_numero_2 IS NULL THEN '' ELSE tr.org_numero_2 END) as orgrac2 ,(CASE WHEN tr.org_numero_3 IS NULL THEN '' ELSE tr.org_numero_3 END) as orgrac3 ,(CASE WHEN tr.cltrat_inicio IS NULL THEN '' ELSE CONVERT(VARCHAR(10),tr.cltrat_inicio,103) END) as fechaini ,(CASE WHEN tr.cltrat_fin IS NULL THEN '' ELSE CONVERT(VARCHAR(10),tr.cltrat_fin,103) END) as fechafin ,(CASE WHEN tr.cltrat_frecaida IS NULL THEN '' ELSE CONVERT(VARCHAR(10),tr.cltrat_frecaida,103) END) as fecharecaida ,(CASE WHEN tr.tprec_numero IS NULL THEN '' ELSE tr.tprec_numero END) as tiporecaida ,(CASE WHEN tr.res_numero IS NULL THEN '' ELSE tr.res_numero END) as respuesta ,(CASE WHEN tr.prot_numero IS NULL THEN '' ELSE tr.prot_numero END) as protocolo ,(CASE WHEN tr.cltrat_ciclos IS NULL THEN 0 ELSE tr.cltrat_ciclos END) as ciclos ,(CASE WHEN tr.cltrat_linea IS NULL THEN 0 ELSE tr.cltrat_linea END) as linea ,(CASE WHEN tr.cltrat_suspendido IS NULL THEN '' ELSE tr.cltrat_suspendido END) as suspendido ,(CASE WHEN tr.cltrat_interrumpido IS NULL THEN '' ELSE tr.cltrat_interrumpido END) as interrumpido ,(CASE WHEN tr.cltrat_reduccion_dosis IS NULL THEN '' ELSE tr.cltrat_reduccion_dosis END) as reducciondosis ,(CASE WHEN tr.cltrat_observaciones IS NULL THEN '' ELSE tr.cltrat_observaciones END) as observaciones ,(CASE WHEN tr.cltrat_fdiag IS NULL THEN '' ELSE CONVERT(VARCHAR(10),tr.cltrat_fdiag,103) END) as fechadiag ,(CASE WHEN tr.cltrat_fmuerte IS NULL THEN '' ELSE CONVERT(VARCHAR(10),tr.cltrat_fmuerte,103) END) as fechamuerte ,(CASE WHEN tr.cltrat_sobrevida IS NULL THEN 0 ELSE tr.cltrat_sobrevida END) as sobrevidaglo ,(CASE WHEN tr.cltrat_edadtratamiento IS NULL THEN 0 ELSE tr.cltrat_edadtratamiento END) as edadentrat ,0 as itemselected ,0 as rem ,0 as erst FROM cli_onc_tratamiento as tr" . $where." ORDER BY tr.cltrat_tmsp_registracion DESC"; } //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { //Planes Tratamiento for($i=0,$t=count($rs);$i<$t;$i++) { $rs[$i]["planes"] = getTratamientoPlanes($rs[$i]["cod"]); $rs[$i]["toxicidades"] = getTratamientoToxicidades($rs[$i]["cod"]); $rs[$i]["protdro"] = array(); if(!is_null($rs[$i]["protocolo"])&&!empty($rs[$i]["protocolo"])&&trim($rs[$i]["protocolo"])!='') { $rs[$i]["protdro"] = getTratamientoProtocoloDrogas($rs[$i]["protocolo"]); } if(isset($_REQUEST["keyextra"])) { $rs[$i]["observacionesenc"] = base64_encode($rs[$i]["observaciones"]); } } return $rs; } return EMPTY_LST; } return false; } function saveDiagnostico(&$resultInfo,$params) { try { //print_r($params);print_r("\n");die; $flagTransactionInit = false; $continue = true; $cmpInsertSQL = false; $cmpUpdateSQL = false; $params["params"] = json_decode($params["params"]); if( is_array($params["items"]) && count($params["items"])>0 ) { //print_r($params);die("-----AAAAA-----"); $user = $params["userid"]; //print_r("nomenclador[$nomenclador]obrasocial[$obrasocial]plan[$plan]");print_r("\n");die; $flagInsert = false; $flagUpdate = false; if(trim($params["items"][0]["cod"])=='') { $flagInsert = true; $cmpInsertSQL =" INSERT INTO cli_onc_diagnostico ( cli_codigo ,tdiag_numero ,org_numero_localizacion ,tdet_numero ,org_numero_metastasis ,cldiag_tnm_clinico_t ,cldiag_tnm_clinico_n ,cldiag_tnm_clinico_m ,cldiag_tnm_patologico_t ,cldiag_tnm_patologico_n ,cldiag_tnm_patologico_m ,est_numero_inicial ,est_numero_actual ,cldiag_fecha_estini ,cldiag_fecha_estact ,cldiag_fecha_1ersint ,cldiag_fecha_1erconsul ,cldiag_fecha_1ertrat ,cldiag_fecha_ultconsul ,cldiag_fecha_diagnostico ,apat_numero ,cldiag_descripcion ,cldiag_fecha_muerte ,cmue_numero ,cldiag_ganglios_ais ,cldiag_ganglios_pos ,cldiag_nro_protocolo ,cldiag_patologo ,emp_codigo_registracion ,emp_codigo_ult_cambio ,cldiag_tmsp_registracion ,cldiag_tmsp_ult_cambio ) VALUES ( '".addslashes(trim(strtoupper($params["items"][0]["clicod"])))."' ,".getDBNullValue(trim(strtoupper($params["items"][0]["diagnostico"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["localizacion"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["metodo"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["metastasis"])))." ,".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["tnm_cli_t"])))." ,".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["tnm_cli_n"])))." ,".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["tnm_cli_m"])))." ,".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["tnm_pat_t"])))." ,".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["tnm_pat_n"])))." ,".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["tnm_pat_m"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["estadoini"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["estadoact"])))." ,".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["estadoinifecha"]))))." ,".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["estadoactfecha"]))))." ,".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["fecha1ersintoma"]))))." ,".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["fecha1erconsulta"]))))." ,".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["fecha1ertratamiento"]))))." ,".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["fechaultconsul"]))))." ,".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["fechadiagnostico"]))))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["anatpatolo"])))." ,".getDBNullValue(trim($params["items"][0]["observacion"]))." ,".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["fechamuerte"]))))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["causamuerte"])))." ,".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["gangliosaisl"])))." ,".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["gangliospos"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["nroprotoloco"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["patologo"])))." ,".getDBNullValue(trim(strtoupper($params["userid"])))." ,".getDBNullValue(trim(strtoupper($params["userid"])))." ,GETDATE() ,GETDATE() )"; // ,cldiag_edad_diagnostico = '".addslashes(trim(strtoupper(XXXX)))."' } elseif(trim($params["items"][0]["cod"])!='') { $flagUpdate = true; $cmpUpdateSQL = "UPDATE dbo.cli_onc_diagnostico SET tdiag_numero = '".addslashes(trim(strtoupper($params["items"][0]["diagnostico"])))."' ,org_numero_localizacion = ".getDBNullValue(trim(strtoupper($params["items"][0]["localizacion"])))." ,tdet_numero = ".getDBNullValue(trim(strtoupper($params["items"][0]["metodo"])))." ,org_numero_metastasis = ".getDBNullValue(trim(strtoupper($params["items"][0]["metastasis"])))." ,cldiag_tnm_clinico_t = ".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["tnm_cli_t"])))." ,cldiag_tnm_clinico_n = ".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["tnm_cli_n"])))." ,cldiag_tnm_clinico_m = ".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["tnm_cli_m"])))." ,cldiag_tnm_patologico_t = ".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["tnm_pat_t"])))." ,cldiag_tnm_patologico_n = ".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["tnm_pat_n"])))." ,cldiag_tnm_patologico_m = ".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["tnm_pat_m"])))." ,est_numero_inicial = ".getDBNullValue(trim(strtoupper($params["items"][0]["estadoini"])))." ,est_numero_actual = ".getDBNullValue(trim(strtoupper($params["items"][0]["estadoact"])))." ,cldiag_fecha_estini = ".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["estadoinifecha"]))))." ,cldiag_fecha_estact = ".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["estadoactfecha"]))))." ,cldiag_fecha_1ersint = ".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["fecha1ersintoma"]))))." ,cldiag_fecha_1erconsul = ".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["fecha1erconsulta"]))))." ,cldiag_fecha_1ertrat = ".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["fecha1ertratamiento"]))))." ,cldiag_fecha_ultconsul = ".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["fechaultconsul"]))))." ,cldiag_fecha_diagnostico = ".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["fechadiagnostico"]))))." ,apat_numero = ".getDBNullValue(trim(strtoupper($params["items"][0]["anatpatolo"])))." ,cldiag_descripcion = ".getDBNullValue(trim($params["items"][0]["observacion"]))." ,cldiag_fecha_muerte = ".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["fechamuerte"]))))." ,cmue_numero = ".getDBNullValue(trim(strtoupper($params["items"][0]["causamuerte"])))." ,cldiag_ganglios_ais = ".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["gangliosaisl"])))." ,cldiag_ganglios_pos = ".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["gangliospos"])))." ,cldiag_nro_protocolo = ".getDBNullValue(trim(strtoupper($params["items"][0]["nroprotoloco"])))." ,cldiag_patologo = ".getDBNullValue(trim(strtoupper($params["items"][0]["patologo"])))." ,emp_codigo_ult_cambio = '".addslashes(trim(strtoupper($params["userid"])))."' ,cldiag_tmsp_ult_cambio = GETDATE() WHERE cldiag_numero = '".addslashes(trim(strtoupper($params["items"][0]["cod"])))."'"; } // print_r($cmpInsertSQL);print_r("\n"); //print_r($cmpUpdateSQL);print_r("\n");die; if( $flagInsert || $flagUpdate ) { if( setConeccionTransaccion() ) //if( true ) { $flagTransactionInit = true; $GLOBALS['dbSQLTR']->setBeginTransaction(); $continue = true; if($flagInsert && $cmpInsertSQL) { //print_r("flagDelete[$flagDelete]");print_r("\n"); $resultado = $GLOBALS['dbSQLTR']->QueryTR($cmpInsertSQL,true); if ( !$resultado ) { //print_r($cmpInsertSQL);print_r("\n"); $res = $GLOBALS['dbSQLTR']->setRollbackTransaction(); $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1001]"; } } else { //print_r("flagPrOblst[$flagPrOblst]");print_r("\n"); $resultado = $GLOBALS['dbSQLTR']->QueryTR($cmpUpdateSQL,true); if ( !$resultado ) { //print_r($cmpUpdateSQL);print_r("\n"); $res = $GLOBALS['dbSQLTR']->setRollbackTransaction(); $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1003]"; } } if( $continue ) { $res = $GLOBALS['dbSQLTR']->setCommitTransaction(); $resultInfo['res'] = 1; return true; } } else { $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1004]"; } } else { $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1005]"; } } return true; } catch ( Exception $e ) { if( $flagTransactionInit ) { $GLOBALS['dbSQLTR']->setRollbackTransaction(); } $resultInfo['code'] = CODE_RESULT_ERROR_FATAL; $resultInfo['errorDes'] = "Error:".($e->__toString()); //$this->logTrace(debug_backtrace(),$e->__toString()); //print_r($e->__toString()); return false; } } function saveTratamiento(&$resultInfo,$params) { try { //print_r($params);print_r("\n");die; $flagTransactionInit = false; $continue = true; $cmpInsertSQL = false; $cmpUpdateSQL = false; $cmpDeleteToxicidadesSQL = false; $cmpInsertToxicidadesSQL = false; $params["params"] = json_decode($params["params"]); if( is_array($params["items"]) && count($params["items"])>0 ) { //print_r($params);die("-----AAAAA-----"); $user = $params["userid"]; //print_r("nomenclador[$nomenclador]obrasocial[$obrasocial]plan[$plan]");print_r("\n");die; $flagInsert = false; $flagUpdate = false; if(trim($params["items"][0]["cod"])=='') { $flagInsert = true; //,".getDBNullValue(trim(strtoupper($params["items"][0]["durrespuesta"])))." //,".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["fechanac"]))))." $cmpInsertSQL =" INSERT INTO cli_onc_tratamiento ( cli_codigo ,cldiag_numero ,trat_numero ,tptrat_numero ,cltrat_region1 ,cltrat_dosis1 ,org_numero_1 ,org_numero_2 ,org_numero_3 ,cltrat_inicio ,cltrat_fin ,cltrat_frecaida ,tprec_numero ,res_numero ,prot_numero ,cltrat_ciclos ,cltrat_linea ,cltrat_suspendido ,cltrat_interrumpido ,cltrat_reduccion_dosis ,cltrat_observaciones ,cltrat_fdiag ,cltrat_fmuerte ,cltrat_sobrevida ,cltrat_edadtratamiento ,emp_codigo_registracion ,emp_codigo_ult_cambio ,cltrat_tmsp_registracion ,cltrat_tmsp_ult_cambio ) VALUES ( '".addslashes(trim(strtoupper($params["items"][0]["clicod"])))."' ,".getDBNullValue(trim(strtoupper($params["items"][0]["diagnostico"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["tipotratamiento"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["tipotratamientoasoc"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["region"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["dosis"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["orgrac1"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["orgrac2"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["orgrac3"])))." ,".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["fechaini"]))))." ,".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["fechafin"]))))." ,".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["fecharecaida"]))))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["tiporecaida"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["respuesta"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["protocolo"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["ciclos"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["linea"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["suspendido"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["interrumpido"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["reducciondosis"])))." ,".getDBNullValue(trim($params["items"][0]["observaciones"]))." ,".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["fechadiag"]))))." ,".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["fechamuerte"]))))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["sobrevidaglo"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["edadentrat"])))." ,".getDBNullValue(trim(strtoupper($params["userid"])))." ,".getDBNullValue(trim(strtoupper($params["userid"])))." ,GETDATE() ,GETDATE() )"; // ,cldiag_edad_diagnostico = '".addslashes(trim(strtoupper(XXXX)))."' } elseif(trim($params["items"][0]["cod"])!='') { //,org_numero_localizacion = ".getDBNullValue(trim(strtoupper($params["items"][0]["durrespuesta"])))." $flagUpdate = true; $cmpUpdateSQL = "UPDATE dbo.cli_onc_tratamiento SET cldiag_numero = ".getDBNullValue(trim(strtoupper($params["items"][0]["diagnostico"])))." ,trat_numero = ".getDBNullValue(trim(strtoupper($params["items"][0]["tipotratamiento"])))." ,tptrat_numero = ".getDBNullValue(trim(strtoupper($params["items"][0]["tipotratamientoasoc"])))." ,cltrat_region1 = ".getDBNullValue(trim(strtoupper($params["items"][0]["region"])))." ,cltrat_dosis1 = ".getDBNullValue(trim(strtoupper($params["items"][0]["dosis"])))." ,org_numero_1 = ".getDBNullValue(trim(strtoupper($params["items"][0]["orgrac1"])))." ,org_numero_2 = ".getDBNullValue(trim(strtoupper($params["items"][0]["orgrac2"])))." ,org_numero_3 = ".getDBNullValue(trim(strtoupper($params["items"][0]["orgrac3"])))." ,cltrat_inicio = ".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["fechaini"]))))." ,cltrat_fin = ".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["fechafin"]))))." ,cltrat_frecaida = ".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["fecharecaida"]))))." ,tprec_numero = ".getDBNullValue(trim(strtoupper($params["items"][0]["tiporecaida"])))." ,res_numero = ".getDBNullValue(trim(strtoupper($params["items"][0]["respuesta"])))." ,prot_numero = ".getDBNullValue(trim(strtoupper($params["items"][0]["protocolo"])))." ,cltrat_ciclos = ".getDBNullValue(trim(strtoupper($params["items"][0]["ciclos"])))." ,cltrat_linea = ".getDBNullValue(trim(strtoupper($params["items"][0]["linea"])))." ,cltrat_suspendido = ".getDBNullValue(trim(strtoupper($params["items"][0]["suspendido"])))." ,cltrat_interrumpido = ".getDBNullValue(trim(strtoupper($params["items"][0]["interrumpido"])))." ,cltrat_reduccion_dosis = ".getDBNullValue(trim(strtoupper($params["items"][0]["reducciondosis"])))." ,cltrat_observaciones = ".getDBNullValue(trim($params["items"][0]["observaciones"]))." ,cltrat_fmuerte = ".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["fechamuerte"]))))." ,cltrat_fdiag = ".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["fechadiag"]))))." ,cltrat_sobrevida = ".getDBNullValue(trim(strtoupper($params["items"][0]["sobrevidaglo"])))." ,cltrat_edadtratamiento = ".getDBNullValue(trim(strtoupper($params["items"][0]["edadentrat"])))." ,emp_codigo_ult_cambio = '".addslashes(trim(strtoupper($params["userid"])))."' ,cltrat_tmsp_ult_cambio = GETDATE() WHERE cltrat_numero = '".addslashes(trim(strtoupper($params["items"][0]["cod"])))."'"; //$cmpDeletePlanesSQL = "DELETE FROM cli_onc_tratamiento_planes WHERE cltrat_numero = '".addslashes(trim(strtoupper($params["items"][0]["cod"])))."'"; } $cmpDeleteToxicidadesSQL = "DELETE FROM cli_onc_tratamiento_toxicidades WHERE cltrat_numero = '".addslashes(trim(strtoupper($params["items"][0]["cod"])))."'"; if(is_array($params["items"][0]["toxicidades"])&&count($params["items"][0]["toxicidades"])) { $items = ''; for($i=0,$t=count($params["items"][0]["toxicidades"]);$i<$t;$i++) { $it ="( '".addslashes(trim(strtoupper($params["items"][0]["cod"])))."' ,".getDBNullValue(trim(strtoupper($params["items"][0]["toxicidades"][$i]["cod"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["toxicidades"][$i]["gr"])))." )"; $sep=','; if($items == ''){$sep='';} $items.=$sep.$it; } $cmpInsertToxicidadesSQL = "INSERT INTO cli_onc_tratamiento_toxicidades ( cltrat_numero ,tox_numero ,cltrattx_grado ) VALUES ".$items; } // print_r($cmpInsertSQL);print_r("\n"); // print_r($cmpUpdateSQL);print_r("\n"); // print_r($cmpDeleteToxicidadesSQL);print_r("\n"); // print_r($cmpInsertToxicidadesSQL);print_r("\n");die; if( $flagInsert || $flagUpdate ) { if( setConeccionTransaccion() ) //if( true ) { $flagTransactionInit = true; $GLOBALS['dbSQLTR']->setBeginTransaction(); $continue = true; if($flagInsert && $cmpInsertSQL) { //print_r("flagDelete[$flagDelete]");print_r("\n"); $resultado = $GLOBALS['dbSQLTR']->QueryTR($cmpInsertSQL,true); if ( !$resultado ) { //print_r($cmpInsertSQL);print_r("\n"); $res = $GLOBALS['dbSQLTR']->setRollbackTransaction(); $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1001]"; } } else { //print_r("flagPrOblst[$flagPrOblst]");print_r("\n"); $resultado = $GLOBALS['dbSQLTR']->QueryTR($cmpUpdateSQL,true); if ( !$resultado ) { //print_r($cmpUpdateSQL);print_r("\n"); $res = $GLOBALS['dbSQLTR']->setRollbackTransaction(); $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1003]"; } } if($continue && $cmpDeleteToxicidadesSQL) { $resultado = $GLOBALS['dbSQLTR']->QueryTR($cmpDeleteToxicidadesSQL,true); if ( !$resultado ) { //print_r($cmpDeleteToxicidadesSQL);print_r("\n"); $res = $GLOBALS['dbSQLTR']->setRollbackTransaction(); $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1003]"; } } if($continue && $cmpInsertToxicidadesSQL) { $resultado = $GLOBALS['dbSQLTR']->QueryTR($cmpInsertToxicidadesSQL,true); if ( !$resultado ) { //print_r($cmpInsertToxicidadesSQL);print_r("\n"); $res = $GLOBALS['dbSQLTR']->setRollbackTransaction(); $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1003]"; } } if( $continue ) { $res = $GLOBALS['dbSQLTR']->setCommitTransaction(); $resultInfo['res'] = 1; return true; } } else { $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1004]"; } } else { $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1005]"; } } return true; } catch ( Exception $e ) { if( $flagTransactionInit ) { $GLOBALS['dbSQLTR']->setRollbackTransaction(); } $resultInfo['code'] = CODE_RESULT_ERROR_FATAL; $resultInfo['errorDes'] = "Error:".($e->__toString()); //$this->logTrace(debug_backtrace(),$e->__toString()); //print_r($e->__toString()); return false; } } function saveTratamientoPlanes(&$resultInfo,$params) { try { //print_r($params);print_r("\n");die; $flagTransactionInit = false; $continue = true; $cmpDeletePlanesSQL = false; $cmpInsertPlanesSQL = false; $params["params"] = json_decode($params["params"]); if( is_array($params["items"]) && count($params["items"])>0 ) { //print_r($params);die("-----AAAAA-----"); $user = $params["userid"]; //print_r("nomenclador[$nomenclador]obrasocial[$obrasocial]plan[$plan]");print_r("\n");die; $flagInsert = false; $flagUpdate = false; $cmpDeletePlanesSQL = "DELETE FROM cli_onc_tratamiento_planes WHERE cltrat_numero = '".addslashes(trim(strtoupper($params["items"][0]["cod"])))."'"; if(is_array($params["items"][0]["planes"])&&count($params["items"][0]["planes"])) { $items = ''; for($i=0,$t=count($params["items"][0]["planes"]);$i<$t;$i++) { $it ="( '".addslashes(trim(strtoupper($params["items"][0]["cod"])))."' ,".getDBNullValue(trim(strtoupper($params["items"][0]["planes"][$i]["cod"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["planes"][$i]["dosis"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["planes"][$i]["ciclo"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["planes"][$i]["fecha"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["planes"][$i]["nota"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["planes"][$i]["dosisp"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["planes"][$i]["tiempo"])))." )"; $sep=','; if($items == ''){$sep='';} $items.=$sep.$it; } $cmpInsertPlanesSQL = "INSERT INTO cli_onc_tratamiento_planes ( cltrat_numero ,dro_numero ,cltratpl_dosis ,cltratpl_ciclo ,cltratpl_fecha ,cltratpl_observacion ,cltratpl_dosisp ,cltratpl_tiempo ) VALUES ".$items; } // print_r($cmpInsertSQL);print_r("\n"); // print_r($cmpUpdateSQL);print_r("\n");die; if( setConeccionTransaccion() ) //if( true ) { $flagTransactionInit = true; $GLOBALS['dbSQLTR']->setBeginTransaction(); $continue = true; //print_r("flagDelete[$flagDelete]");print_r("\n"); $resultado = $GLOBALS['dbSQLTR']->QueryTR($cmpDeletePlanesSQL,true); if ( !$resultado ) { //print_r($cmpDeletePlanesSQL);print_r("\n"); $res = $GLOBALS['dbSQLTR']->setRollbackTransaction(); $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1001]"; } if($cmpInsertPlanesSQL) { //print_r("flagPrOblst[$flagPrOblst]");print_r("\n"); $resultado = $GLOBALS['dbSQLTR']->QueryTR($cmpInsertPlanesSQL,true); if ( !$resultado ) { //print_r($cmpInsertPlanesSQL);print_r("\n"); $res = $GLOBALS['dbSQLTR']->setRollbackTransaction(); $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1003]"; } } if( $continue ) { $res = $GLOBALS['dbSQLTR']->setCommitTransaction(); $resultInfo['res'] = 1; return true; } } else { $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1004]"; } } return true; } catch ( Exception $e ) { if( $flagTransactionInit ) { $GLOBALS['dbSQLTR']->setRollbackTransaction(); } $resultInfo['code'] = CODE_RESULT_ERROR_FATAL; $resultInfo['errorDes'] = "Error:".($e->__toString()); //$this->logTrace(debug_backtrace(),$e->__toString()); //print_r($e->__toString()); return false; } } function saveDiagnosticoPronos(&$resultInfo,$params) { try { //print_r($params);print_r("\n");die; $flagTransactionInit = false; $continue = true; $cmpDeletePlanesSQL = false; $cmpInsertPlanesSQL = false; $params["params"] = json_decode($params["params"]); if( is_array($params["items"]) && count($params["items"])>0 ) { //print_r($params);die("-----AAAAA-----"); $user = $params["userid"]; $continue = false; //OBTENER EL MEDICO $medico=false; $sql = "SELECT med_codigo FROM medicos WHERE usu_mapeo = " . $params["userid"]; //print_r($sql);print_r("\n");//die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $resultado = $GLOBALS['dbSQL']->getAll(); if(is_array($resultado)&&count($resultado)>0) { $medico=$resultado[0]["med_codigo"]; $continue = true; } } if($continue) { $flagInsert = false; $flagUpdate = false; $cmpDeletePlanesSQL = "DELETE FROM cli_onc_diag_pronosticos WHERE cldiag_numero = '".addslashes(trim(strtoupper($params["items"][0]["cod"])))."'"; if(is_array($params["items"][0]["pronos"])&&count($params["items"][0]["pronos"])) { $items = ''; for($i=0,$t=count($params["items"][0]["pronos"]);$i<$t;$i++) { $fecha = getDBDateFormated(trim(strtoupper($params["items"][0]["pronos"][$i]["fecha"]))); $fecha = ($fecha==''?'GETDATE()':"'".$fecha."'"); $it ="( '".addslashes(trim(strtoupper($params["items"][0]["cod"])))."' ,".getDBNullValue(trim(strtoupper($params["items"][0]["pronos"][$i]["prono"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["pronos"][$i]["inten"])))." ,".$fecha." ,".getDBNullValue(trim(strtoupper($params["items"][0]["pronos"][$i]["observ"])))." ,".$medico." ,".$params["userid"]." ,GETDATE() )"; $sep=','; if($items == ''){$sep='';} $items.=$sep.$it; } $cmpInsertPlanesSQL = "INSERT INTO cli_onc_diag_pronosticos ( cldiag_numero ,tpro_numero ,tprint_numero ,dipro_fecha ,dipro_observacion ,med_codigo ,emp_codigo_ult_cambio ,clenf_tmsp_ult_cambio ) VALUES ".$items; } // print_r($cmpDeletePlanesSQL);print_r("\n"); // print_r($cmpInsertPlanesSQL);print_r("\n");die; if( setConeccionTransaccion() ) //if( true ) { $flagTransactionInit = true; $GLOBALS['dbSQLTR']->setBeginTransaction(); $continue = true; //print_r("flagDelete[$flagDelete]");print_r("\n"); $resultado = $GLOBALS['dbSQLTR']->QueryTR($cmpDeletePlanesSQL,true); if ( !$resultado ) { //print_r($cmpDeletePlanesSQL);print_r("\n"); $res = $GLOBALS['dbSQLTR']->setRollbackTransaction(); $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1001]"; } if($cmpInsertPlanesSQL) { //print_r("flagPrOblst[$flagPrOblst]");print_r("\n"); $resultado = $GLOBALS['dbSQLTR']->QueryTR($cmpInsertPlanesSQL,true); if ( !$resultado ) { //print_r($cmpInsertPlanesSQL);print_r("\n"); $res = $GLOBALS['dbSQLTR']->setRollbackTransaction(); $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1003]"; } } if( $continue ) { $res = $GLOBALS['dbSQLTR']->setCommitTransaction(); $resultInfo['res'] = 1; return true; } } else { $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1004]"; } } else { $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error: El usuario actual no esta asociado a un Profesional - [Codigo 1001]"; } } return true; } catch ( Exception $e ) { if( $flagTransactionInit ) { $GLOBALS['dbSQLTR']->setRollbackTransaction(); } $resultInfo['code'] = CODE_RESULT_ERROR_FATAL; $resultInfo['errorDes'] = "Error:".($e->__toString()); //$this->logTrace(debug_backtrace(),$e->__toString()); //print_r($e->__toString()); return false; } } function saveEvolucion(&$resultInfo,$params) { try { $params["params"] = json_decode($params["params"]); if( is_array($params["items"]) && count($params["items"])>0 ) { //print_r($params);die("-----AAAAA-----"); $continue = false; //OBTENER EL MEDICO $medico=false; $sql = "SELECT med_codigo FROM medicos WHERE usu_mapeo = " . $params["userid"]; //print_r($sql);print_r("\n");die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $resultado = $GLOBALS['dbSQL']->getAll(); if(is_array($resultado)&&count($resultado)>0) { $medico=$resultado[0]["med_codigo"]; $continue = true; } } if($continue) { //diagnosticos $fecha = getDBDateFormated(trim(strtoupper($params["items"][0]["fecha"]))); $fecha = ($fecha==''?'GETDATE()':"'".$fecha."'"); //$hx = getDBNullValue(trim($params["items"][0]["evol"])); $hx = getDBScapeSingleQuote(trim($params["items"][0]["evol"])); $hx = ($hx=='NULL'?'NULL':$hx); if( isset($params["items"][0]["id"]) && !empty($params["items"][0]["id"]) && is_numeric($params["items"][0]["id"]) && trim($params["items"][0]["id"])!="" ) { $sql = "UPDATE cli_diagnosticos SET med_codigo = '".addslashes($medico)."' ,cd_observ = ".$hx." ,cd_fecha = ".$fecha." WHERE cli_id = '".$params["items"][0]["id"]."'"; } else { $sql = "INSERT INTO cli_diagnosticos ( cli_codigo ,med_codigo ,cd_item ,cd_fecha ,cd_observ ) VALUES ( '".addslashes($params["items"][0]["cod"])."' ,'".addslashes($medico)."' ,1 ,".$fecha." ,".$hx." )"; } //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql,true); if ( !$rs ) { $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar la Evolución - [Codigo 1002]"; } else { $resultInfo['res'] = 1; } } else { $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error: El usuario actual no esta asociado a un Profesional - [Codigo 1001]"; } } else { $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error: parámetros faltantes - [Codigo 1003]"; } return true; } catch ( Exception $e ) { $resultInfo['code'] = CODE_RESULT_ERROR_FATAL; $resultInfo['errorDes'] = "Error:".($e->__toString()); //$this->logTrace(debug_backtrace(),$e->__toString()); //print_r($e->__toString()); return false; } } function existONCEpicrisisCliente($clicod) { $sql = "SELECT oncep_numero FROM cli_onc_epicrisis WHERE cli_codigo = '".addslashes($clicod)."'"; //print_r($sql);print_r("\n");//die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $resultado = $GLOBALS['dbSQL']->getAll(); if(is_array($resultado)&&count($resultado)>0) { return $resultado[0]["oncep_numero"]; } } return false; } function saveONCEpicrisis(&$resultInfo,$params) { try { $params["params"] = json_decode($params["params"]); if( is_array($params["items"]) && count($params["items"])>0 ) { //print_r($params);die("-----AAAAA-----"); $continue = false; //OBTENER EL MEDICO $medico=false; $sql = "SELECT med_codigo FROM medicos WHERE usu_mapeo = " . $params["userid"]; //print_r($sql);print_r("\n");die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $resultado = $GLOBALS['dbSQL']->getAll(); if(is_array($resultado)&&count($resultado)>0) { $medico=$resultado[0]["med_codigo"]; $continue = true; } } if($continue) { $cmpInsertSQL = false; $cmpUpdateSQL = false; $cmpInsertaccMedSQL = false; //VERIFICAR SI EXISTE UN RESUMEN DE EPICRISIS ONCOLOGICO $idEpicrisis = existONCEpicrisisCliente($params["items"][0]["cod"]); $resumen = getDBNullValue(trim($params["items"][0]["resumen"])); $resumen = ($resumen=='NULL'?'NULL':$resumen); if(!$idEpicrisis) { $cmpInsertSQL = "INSERT INTO cli_onc_epicrisis ( cli_codigo ,oncep_resumen ,emp_codigo ,oncep_tmsp ) VALUES ( '".addslashes($params["items"][0]["cod"])."' ,".$resumen." ,".$params["userid"]." ,GETDATE() )"; } else { $cmpUpdateSQL = "UPDATE cli_onc_epicrisis SET emp_codigo = ".$params["userid"]." ,oncep_resumen = ".$resumen." ,oncep_tmsp = GETDATE() WHERE cli_codigo = '".addslashes($params["items"][0]["cod"])."'"; } $cmpInsertaccMedSQL = "INSERT INTO cli_onc_epicrisis_accesos_medicos ( oncep_numero ,med_codigo ,oncepam_tmsp ) VALUES ( {IDEPI} ,".$medico." ,GETDATE() )"; if( setConeccionTransaccion() ) { $flagTransactionInit = true; $GLOBALS['dbSQLTR']->setBeginTransaction(); $continue = true; if($cmpInsertSQL) { //print_r("flagDelete[$flagDelete]");print_r("\n"); $resultado = $GLOBALS['dbSQLTR']->QueryTR($cmpInsertSQL,true); if ( !$resultado ) { //print_r($cmpInsertSQL);print_r("\n"); $res = $GLOBALS['dbSQLTR']->setRollbackTransaction(); $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1001]"; } else { $idEpicrisis = $GLOBALS['dbSQLTR']->getTRLastId('cli_onc_epicrisis','oncep_numero'); } } else { //print_r("flagPrOblst[$flagPrOblst]");print_r("\n"); $resultado = $GLOBALS['dbSQLTR']->QueryTR($cmpUpdateSQL,true); if ( !$resultado ) { //print_r($cmpUpdateSQL);print_r("\n"); $res = $GLOBALS['dbSQLTR']->setRollbackTransaction(); $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1003]"; } } if($continue && $cmpInsertaccMedSQL) { $cmpInsertaccMedSQL = str_replace("{IDEPI}",$idEpicrisis,$cmpInsertaccMedSQL); $resultado = $GLOBALS['dbSQLTR']->QueryTR($cmpInsertaccMedSQL,true); if ( !$resultado ) { print_r($cmpInsertaccMedSQL);print_r("\n"); $res = $GLOBALS['dbSQLTR']->setRollbackTransaction(); $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1003]"; } } if( $continue ) { $res = $GLOBALS['dbSQLTR']->setCommitTransaction(); $resultInfo['res'] = 1; return true; } } else { $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1004]"; } } else { $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error: El usuario actual no esta asociado a un Profesional - [Codigo 1001]"; } } else { $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error: parámetros faltantes - [Codigo 1003]"; } return true; } catch ( Exception $e ) { $resultInfo['code'] = CODE_RESULT_ERROR_FATAL; $resultInfo['errorDes'] = "Error:".($e->__toString()); //$this->logTrace(debug_backtrace(),$e->__toString()); //print_r($e->__toString()); return false; } } function existONCExamFisico($clicod) { $sql = "SELECT cexf_numero FROM cli_onc_examen_fisico WHERE cli_codigo = '".addslashes($clicod)."'"; //print_r($sql);print_r("\n");//die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $resultado = $GLOBALS['dbSQL']->getAll(); if(is_array($resultado)&&count($resultado)>0) { return $resultado[0]["cexf_numero"]; } } return false; } function saveONCExamFisico(&$resultInfo,$params) { try { $params["params"] = json_decode($params["params"]); if( is_array($params["items"]) && count($params["items"])>0 ) { //print_r($params);die("-----AAAAA-----"); $continue = false; //OBTENER EL MEDICO $medico=false; $sql = "SELECT med_codigo FROM medicos WHERE usu_mapeo = " . $params["userid"]; //print_r($sql);print_r("\n");//die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $resultado = $GLOBALS['dbSQL']->getAll(); if(is_array($resultado)&&count($resultado)>0) { $medico=$resultado[0]["med_codigo"]; $continue = true; } } if($continue) { $cmpInsertSQL = false; $cmpUpdateSQL = false; $cmpInsertaccMedSQL = false; //VERIFICAR SI EXISTE UN RESUMEN DE EPICRISIS ONCOLOGICO $idExamFisico = existONCExamFisico($params["items"][0]["cod"]); $inspecion = getDBNullValue(trim($params["items"][0]["inspecion"])); $inspecion = ($inspecion=='NULL'?'NULL':$inspecion); if(!$idExamFisico) { $cmpInsertSQL = "INSERT INTO cli_onc_examen_fisico ( cli_codigo ,cexf_fc ,cexf_peso ,cexf_ta ,cexf_altura ,cexf_fr ,cexf_t ,cexf_ecog ,cexf_mb ,cexf_me ,cexf_gu ,cexf_pt ,cexf_ab ,cexf_ldhcol ,cexf_neutrofilos ,cexf_linfocitos ,cexf_inspecion ,emp_codigo_registracion ,clenf_tmsp_registracion ,clenf_tmsp_ult_cambio ,emp_codigo_ult_cambio ) VALUES ( '".addslashes($params["items"][0]["cod"])."' ,".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["fc"])))." ,".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["peso"])))." ,".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["ta"])))." ,".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["altura"])))." ,".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["fr"])))." ,".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["t"])))." ,".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["ecog"])))." ,".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["mb"])))." ,".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["me"])))." ,".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["gu"])))." ,".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["pt"])))." ,".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["ab"])))." ,".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["ldhcol"])))." ,".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["neutrofilos"])))." ,".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["linfocitos"])))." ,".$inspecion." ,".$params["userid"]." ,GETDATE() ,GETDATE() ,".$params["userid"]." )"; } else { $cmpUpdateSQL = "UPDATE cli_onc_examen_fisico SET emp_codigo_ult_cambio = ".$params["userid"]." ,cexf_inspecion = ".$inspecion." ,cexf_fc = ".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["fc"])))." ,cexf_peso = ".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["peso"])))." ,cexf_ta = ".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["ta"])))." ,cexf_altura = ".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["altura"])))." ,cexf_fr = ".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["fr"])))." ,cexf_t = ".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["t"])))." ,cexf_ecog = ".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["ecog"])))." ,cexf_mb = ".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["mb"])))." ,cexf_me = ".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["me"])))." ,cexf_gu = ".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["gu"])))." ,cexf_pt = ".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["pt"])))." ,cexf_ab = ".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["ab"])))." ,cexf_ldhcol = ".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["ldhcol"])))." ,cexf_neutrofilos = ".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["neutrofilos"])))." ,cexf_linfocitos = ".getDBNullValueNumeric(trim(strtoupper($params["items"][0]["linfocitos"])))." ,clenf_tmsp_ult_cambio = GETDATE() WHERE cli_codigo = '".addslashes($params["items"][0]["cod"])."'"; } // $cmpInsertaccMedSQL = "INSERT INTO cli_onc_epicrisis_accesos_medicos // ( // oncep_numero // ,med_codigo // ,oncepam_tmsp // ) // VALUES // ( // {IDEPI} // ,".$medico." // ,GETDATE() // )"; if( setConeccionTransaccion() ) { $flagTransactionInit = true; $GLOBALS['dbSQLTR']->setBeginTransaction(); $continue = true; if($cmpInsertSQL) { //print_r("flagDelete[$flagDelete]");print_r("\n"); //print_r($cmpInsertSQL);print_r("\n"); $resultado = $GLOBALS['dbSQLTR']->QueryTR($cmpInsertSQL,true); if ( !$resultado ) { //print_r($cmpInsertSQL);print_r("\n"); $res = $GLOBALS['dbSQLTR']->setRollbackTransaction(); $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1001]"; } else { $idExamFisico = $GLOBALS['dbSQLTR']->getTRLastId('cli_onc_epicrisis','oncep_numero'); } } else { //print_r("flagPrOblst[$flagPrOblst]");print_r("\n"); //print_r($cmpUpdateSQL);print_r("\n"); $resultado = $GLOBALS['dbSQLTR']->QueryTR($cmpUpdateSQL,true); if ( !$resultado ) { //print_r($cmpUpdateSQL);print_r("\n"); $res = $GLOBALS['dbSQLTR']->setRollbackTransaction(); $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1003]"; } } // if($continue && $cmpInsertaccMedSQL) // { // $cmpInsertaccMedSQL = str_replace("{IDEPI}",$idExamFisico,$cmpInsertaccMedSQL); // $resultado = $GLOBALS['dbSQLTR']->QueryTR($cmpInsertaccMedSQL,true); // if ( !$resultado ) // { // print_r($cmpInsertaccMedSQL);print_r("\n"); // $res = $GLOBALS['dbSQLTR']->setRollbackTransaction(); // $continue = false; // $resultInfo['code'] = -1; // $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1003]"; // } // } if( $continue ) { $res = $GLOBALS['dbSQLTR']->setCommitTransaction(); $resultInfo['res'] = 1; return true; } } else { $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1004]"; } } else { $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error: El usuario actual no esta asociado a un Profesional - [Codigo 1001]"; } } else { $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error: parámetros faltantes - [Codigo 1003]"; } return true; } catch ( Exception $e ) { $resultInfo['code'] = CODE_RESULT_ERROR_FATAL; $resultInfo['errorDes'] = "Error:".($e->__toString()); //$this->logTrace(debug_backtrace(),$e->__toString()); //print_r($e->__toString()); return false; } } function existONCAntecedentes($clicod) { $sql = "SELECT ant_numero FROM cli_onc_antecedentes WHERE cli_codigo = '".addslashes($clicod)."'"; //print_r($sql);print_r("\n");//die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $resultado = $GLOBALS['dbSQL']->getAll(); if(is_array($resultado)&&count($resultado)>0) { return $resultado[0]["ant_numero"]; } } return false; } function saveONCAntecedentes(&$resultInfo,$params) { try { $params["params"] = json_decode($params["params"]); if( is_array($params["items"]) && count($params["items"])>0 ) { //print_r($params);die("-----AAAAA-----"); $continue = false; //OBTENER EL MEDICO $medico=false; $sql = "SELECT med_codigo FROM medicos WHERE usu_mapeo = " . $params["userid"]; //print_r($sql);print_r("\n");//die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $resultado = $GLOBALS['dbSQL']->getAll(); if(is_array($resultado)&&count($resultado)>0) { $medico=$resultado[0]["med_codigo"]; $continue = true; } } if($continue) { $cmpInsertSQL = false; $cmpUpdateSQL = false; $cmpInsertaccMedSQL = false; //VERIFICAR SI EXISTE UN RESUMEN DE EPICRISIS ONCOLOGICO $idExamFisico = existONCAntecedentes($params["items"][0]["cod"]); $cigobservaciones = getDBNullValue(trim($params["items"][0]["cigobservaciones"])); $cigobservaciones = ($cigobservaciones=='NULL'?'NULL':$cigobservaciones); $alctipobeb = getDBNullValue(trim($params["items"][0]["alctipobeb"])); $alctipobeb = ($alctipobeb=='NULL'?'NULL':$alctipobeb); $menarcaanos = getDBNullValue(trim($params["items"][0]["menarcaanos"])); $menarcaanos = ($menarcaanos=='NULL'?'NULL':$menarcaanos); $lactantiempo = getDBNullValue(trim($params["items"][0]["lactantiempo"])); $lactantiempo = ($lactantiempo=='NULL'?'NULL':$lactantiempo); $menstruatxt = getDBNullValue(trim($params["items"][0]["menstruatxt"])); $menstruatxt = ($menstruatxt=='NULL'?'NULL':$menstruatxt); $dietagratxt = getDBNullValue(trim($params["items"][0]["dietagratxt"])); $dietagratxt = ($dietagratxt=='NULL'?'NULL':$dietagratxt); $respitarorios = getDBNullValue(trim($params["items"][0]["respitarorios"])); $respitarorios = ($respitarorios=='NULL'?'NULL':$respitarorios); $cardiacos = getDBNullValue(trim($params["items"][0]["cardiacos"])); $cardiacos = ($cardiacos=='NULL'?'NULL':$cardiacos); $metabolicos = getDBNullValue(trim($params["items"][0]["metabolicos"])); $metabolicos = ($metabolicos=='NULL'?'NULL':$metabolicos); $renales = getDBNullValue(trim($params["items"][0]["renales"])); $renales = ($renales=='NULL'?'NULL':$renales); $inmunologicos = getDBNullValue(trim($params["items"][0]["inmunologicos"])); $inmunologicos = ($inmunologicos=='NULL'?'NULL':$inmunologicos); $otros = getDBNullValue(trim($params["items"][0]["otros"])); $otros = ($otros=='NULL'?'NULL':$otros); $antquir = getDBNullValue(trim($params["items"][0]["antquir"])); $antquir = ($antquir=='NULL'?'NULL':$antquir); $padrediagonco = getDBNullValue(trim($params["items"][0]["padrediagonco"])); $padrediagonco = ($padrediagonco=='NULL'?'NULL':$padrediagonco); $padreotros = getDBNullValue(trim($params["items"][0]["padreotros"])); $padreotros = ($padreotros=='NULL'?'NULL':$padreotros); $madrediagonco = getDBNullValue(trim($params["items"][0]["madrediagonco"])); $madrediagonco = ($madrediagonco=='NULL'?'NULL':$madrediagonco); $madreotros = getDBNullValue(trim($params["items"][0]["madreotros"])); $madreotros = ($madreotros=='NULL'?'NULL':$madreotros); $herrediagonco = getDBNullValue(trim($params["items"][0]["herrediagonco"])); $herrediagonco = ($herrediagonco=='NULL'?'NULL':$herrediagonco); $herreotros = getDBNullValue(trim($params["items"][0]["herreotros"])); $herreotros = ($herreotros=='NULL'?'NULL':$herreotros); $tiosrediagonco = getDBNullValue(trim($params["items"][0]["tiosrediagonco"])); $tiosrediagonco = ($tiosrediagonco=='NULL'?'NULL':$tiosrediagonco); $tiosreotros = getDBNullValue(trim($params["items"][0]["tiosreotros"])); $tiosreotros = ($tiosreotros=='NULL'?'NULL':$tiosreotros); $otrosrediagonco = getDBNullValue(trim($params["items"][0]["otrosrediagonco"])); $otrosrediagonco = ($otrosrediagonco=='NULL'?'NULL':$otrosrediagonco); $otrosreotros = getDBNullValue(trim($params["items"][0]["otrosreotros"])); $otrosreotros = ($otrosreotros=='NULL'?'NULL':$otrosreotros); if(!$idExamFisico) { $cmpInsertSQL = "INSERT INTO cli_onc_antecedentes ( cli_codigo ,ant_cigcantidad ,ant_cigedaddesde ,ant_cigedadhasta ,ant_alclitros ,ant_alcedaddesde ,ant_alcedadhasta ,ant_menarca ,ant_lactanciatipo ,ant_estadomenstrual ,ant_menstruaedad ,ant_embarazos ,ant_edad1eremb ,ant_partos ,ant_abortosesp ,ant_abortosprov ,ant_dietagrasa ,ant_ejercio ,ant_diabetes ,ant_metformina ,emp_codigo_registracion ,emp_codigo_ult_cambio ,ant_cigobservaciones ,ant_alctipobeb ,ant_menarcaanos ,ant_lactantiempo ,ant_menstruatxt ,ant_dietagratxt ,ant_respitarorios ,ant_cardiacos ,ant_metabolicos ,ant_renales ,ant_inmunologicos ,ant_otros ,ant_antquir ,ant_padrediagonco ,ant_padreotros ,ant_madrediagonco ,ant_madreotros ,ant_herrediagonco ,ant_herreotros ,ant_tiosrediagonco ,ant_tiosreotros ,ant_otrosrediagonco ,ant_otrosreotros ,ant_cigfdesde ,ant_cigfhasta ,ant_alcfdesde ,ant_alcfhasta ,ant_ultmenstrual ,clenf_tmsp_registracion ,clenf_tmsp_ult_cambio ) VALUES ( '".addslashes($params["items"][0]["cod"])."' ,".getDBNullValue(trim(strtoupper($params["items"][0]["cigcantidad"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["cigedaddesde"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["cigedadhasta"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["alclitros"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["alcedaddesde"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["alcedadhasta"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["menarca"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["lactanciatipo"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["estadomenstrual"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["menstruaedad"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["embarazos"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["edad1eremb"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["partos"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["abortosesp"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["abortosprov"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["dietagrasa"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["ejercio"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["diabetes"])))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["metformina"])))." ,".$params["userid"]." ,".$params["userid"]." ,".$cigobservaciones." ,".$alctipobeb." ,".$menarcaanos." ,".$lactantiempo." ,".$menstruatxt." ,".$dietagratxt." ,".$respitarorios." ,".$cardiacos." ,".$metabolicos." ,".$renales." ,".$inmunologicos." ,".$otros." ,".$antquir." ,".$padrediagonco." ,".$padreotros." ,".$madrediagonco." ,".$madreotros." ,".$herrediagonco." ,".$herreotros." ,".$tiosrediagonco." ,".$tiosreotros." ,".$otrosrediagonco." ,".$otrosreotros." ,".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["cigfdesde"]))))." ,".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["cigfhasta"]))))." ,".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["alcfdesde"]))))." ,".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["alcfhasta"]))))." ,".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["ultmenstrual"]))))." ,GETDATE() ,GETDATE() )"; } else { $cmpUpdateSQL = "UPDATE cli_onc_antecedentes SET emp_codigo_ult_cambio = ".$params["userid"]." ,clenf_tmsp_ult_cambio = GETDATE() ,ant_cigcantidad =".getDBNullValue(trim(strtoupper($params["items"][0]["cigcantidad"])))." ,ant_cigedaddesde =".getDBNullValue(trim(strtoupper($params["items"][0]["cigedaddesde"])))." ,ant_cigedadhasta =".getDBNullValue(trim(strtoupper($params["items"][0]["cigedadhasta"])))." ,ant_alclitros =".getDBNullValue(trim(strtoupper($params["items"][0]["alclitros"])))." ,ant_alcedaddesde =".getDBNullValue(trim(strtoupper($params["items"][0]["alcedaddesde"])))." ,ant_alcedadhasta =".getDBNullValue(trim(strtoupper($params["items"][0]["alcedadhasta"])))." ,ant_menarca =".getDBNullValue(trim(strtoupper($params["items"][0]["menarca"])))." ,ant_lactanciatipo =".getDBNullValue(trim(strtoupper($params["items"][0]["lactanciatipo"])))." ,ant_estadomenstrual =".getDBNullValue(trim(strtoupper($params["items"][0]["estadomenstrual"])))." ,ant_menstruaedad =".getDBNullValue(trim(strtoupper($params["items"][0]["menstruaedad"])))." ,ant_embarazos =".getDBNullValue(trim(strtoupper($params["items"][0]["embarazos"])))." ,ant_edad1eremb =".getDBNullValue(trim(strtoupper($params["items"][0]["edad1eremb"])))." ,ant_partos =".getDBNullValue(trim(strtoupper($params["items"][0]["partos"])))." ,ant_abortosesp =".getDBNullValue(trim(strtoupper($params["items"][0]["abortosesp"])))." ,ant_abortosprov =".getDBNullValue(trim(strtoupper($params["items"][0]["abortosprov"])))." ,ant_dietagrasa =".getDBNullValue(trim(strtoupper($params["items"][0]["dietagrasa"])))." ,ant_ejercio =".getDBNullValue(trim(strtoupper($params["items"][0]["ejercio"])))." ,ant_diabetes =".getDBNullValue(trim(strtoupper($params["items"][0]["diabetes"])))." ,ant_metformina =".getDBNullValue(trim(strtoupper($params["items"][0]["metformina"])))." ,ant_cigobservaciones =".$cigobservaciones." ,ant_alctipobeb =".$alctipobeb." ,ant_menarcaanos =".$menarcaanos." ,ant_lactantiempo =".$lactantiempo." ,ant_menstruatxt =".$menstruatxt." ,ant_dietagratxt =".$dietagratxt." ,ant_respitarorios =".$respitarorios." ,ant_cardiacos =".$cardiacos." ,ant_metabolicos =".$metabolicos." ,ant_renales =".$renales." ,ant_inmunologicos =".$inmunologicos." ,ant_otros =".$otros." ,ant_antquir =".$antquir." ,ant_padrediagonco =".$padrediagonco." ,ant_padreotros =".$padreotros." ,ant_madrediagonco =".$madrediagonco." ,ant_madreotros =".$madreotros." ,ant_herrediagonco =".$herrediagonco." ,ant_herreotros =".$herreotros." ,ant_tiosrediagonco =".$tiosrediagonco." ,ant_tiosreotros =".$tiosreotros." ,ant_otrosrediagonco =".$otrosrediagonco." ,ant_otrosreotros =".$otrosreotros." ,ant_cigfdesde =".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["cigfdesde"]))))." ,ant_cigfhasta =".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["cigfhasta"]))))." ,ant_alcfdesde =".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["alcfdesde"]))))." ,ant_alcfhasta =".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["alcfhasta"]))))." ,ant_ultmenstrual =".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["ultmenstrual"]))))." WHERE cli_codigo = '".addslashes($params["items"][0]["cod"])."'"; } // $cmpInsertaccMedSQL = "INSERT INTO cli_onc_epicrisis_accesos_medicos // ( // oncep_numero // ,med_codigo // ,oncepam_tmsp // ) // VALUES // ( // {IDEPI} // ,".$medico." // ,GETDATE() // )"; if( setConeccionTransaccion() ) { $flagTransactionInit = true; $GLOBALS['dbSQLTR']->setBeginTransaction(); $continue = true; if($cmpInsertSQL) { //print_r("flagDelete[$flagDelete]");print_r("\n"); //print_r($cmpInsertSQL);print_r("\n"); $resultado = $GLOBALS['dbSQLTR']->QueryTR($cmpInsertSQL,true); if ( !$resultado ) { //print_r($cmpInsertSQL);print_r("\n"); $res = $GLOBALS['dbSQLTR']->setRollbackTransaction(); $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1001]"; } else { $idExamFisico = $GLOBALS['dbSQLTR']->getTRLastId('cli_onc_epicrisis','oncep_numero'); } } else { //print_r("flagPrOblst[$flagPrOblst]");print_r("\n"); //print_r($cmpUpdateSQL);print_r("\n"); $resultado = $GLOBALS['dbSQLTR']->QueryTR($cmpUpdateSQL,true); if ( !$resultado ) { //print_r($cmpUpdateSQL);print_r("\n"); $res = $GLOBALS['dbSQLTR']->setRollbackTransaction(); $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1003]"; } } // if($continue && $cmpInsertaccMedSQL) // { // $cmpInsertaccMedSQL = str_replace("{IDEPI}",$idExamFisico,$cmpInsertaccMedSQL); // $resultado = $GLOBALS['dbSQLTR']->QueryTR($cmpInsertaccMedSQL,true); // if ( !$resultado ) // { // print_r($cmpInsertaccMedSQL);print_r("\n"); // $res = $GLOBALS['dbSQLTR']->setRollbackTransaction(); // $continue = false; // $resultInfo['code'] = -1; // $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1003]"; // } // } if( $continue ) { $res = $GLOBALS['dbSQLTR']->setCommitTransaction(); $resultInfo['res'] = 1; return true; } } else { $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1004]"; } } else { $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error: El usuario actual no esta asociado a un Profesional - [Codigo 1001]"; } } else { $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error: parámetros faltantes - [Codigo 1003]"; } return true; } catch ( Exception $e ) { $resultInfo['code'] = CODE_RESULT_ERROR_FATAL; $resultInfo['errorDes'] = "Error:".($e->__toString()); //$this->logTrace(debug_backtrace(),$e->__toString()); //print_r($e->__toString()); return false; } } function existONCEnfermedad($clicod) { $sql = "SELECT clenf_numero FROM cli_onc_enfermedad WHERE cli_codigo = '".addslashes($clicod)."'"; //print_r($sql);print_r("\n");//die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $resultado = $GLOBALS['dbSQL']->getAll(); if(is_array($resultado)&&count($resultado)>0) { return $resultado[0]["clenf_numero"]; } } return false; } function saveONCEnfermedad(&$resultInfo,$params) { try { $params["params"] = json_decode($params["params"]); if( is_array($params["items"]) && count($params["items"])>0 ) { //print_r($params);die("-----AAAAA-----"); $continue = false; //OBTENER EL MEDICO $medico=false; $sql = "SELECT med_codigo FROM medicos WHERE usu_mapeo = " . $params["userid"]; //print_r($sql);print_r("\n");//die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $resultado = $GLOBALS['dbSQL']->getAll(); if(is_array($resultado)&&count($resultado)>0) { $medico=$resultado[0]["med_codigo"]; $continue = true; } } if($continue) { $cmpInsertSQL = false; $cmpUpdateSQL = false; $cmpInsertaccMedSQL = false; //VERIFICAR SI EXISTE UN RESUMEN DE EPICRISIS ONCOLOGICO $idEnfermedad = existONCEnfermedad($params["items"][0]["cod"]); $antecedente = getDBNullValue(trim($params["items"][0]["antecedente"])); $antecedente = ($antecedente=='NULL'?'NULL':$antecedente); $motivo = getDBNullValue(trim($params["items"][0]["motivo"])); $motivo = ($motivo=='NULL'?'NULL':$motivo); //$antecedente = getDBScapeSingleQuote(trim($params["items"][0]["antecedente"])); //$motivo = getDBScapeSingleQuote(trim($params["items"][0]["motivo"])); if(!$idEnfermedad) { // $cmpInsertSQL = "INSERT INTO cli_onc_enfermedad // ( // cli_codigo // ,clenf_antecedente // ,clenf_motivo // ,emp_codigo_registracion // ,emp_codigo_ult_cambio // ,clenf_tmsp_registracion // ,clenf_tmsp_ult_cambio // ) // VALUES // ( // '".addslashes($params["items"][0]["cod"])."' // ,".getDBNullValue(trim($params["items"][0]["antecedente"]))." // ,".getDBNullValue(trim($params["items"][0]["motivo"]))." // ,".$params["userid"]." // ,".$params["userid"]." // ,GETDATE() // ,GETDATE() // )"; //,".$antecedente." //,".$motivo." $cmpInsertSQL = "INSERT INTO cli_onc_enfermedad ( cli_codigo ,clenf_antecedente ,clenf_motivo ,emp_codigo_registracion ,emp_codigo_ult_cambio ,clenf_tmsp_registracion ,clenf_tmsp_ult_cambio ) VALUES ( '".addslashes($params["items"][0]["cod"])."' ,".getDBNullValue(trim($params["items"][0]["antecedente"]))." ,".getDBNullValue(trim($params["items"][0]["motivo"]))." ,".$params["userid"]." ,".$params["userid"]." ,GETDATE() ,GETDATE() )"; } else { $cmpUpdateSQL = "UPDATE cli_onc_enfermedad SET emp_codigo_ult_cambio = ".$params["userid"]." ,clenf_tmsp_ult_cambio = GETDATE() ,clenf_antecedente =".getDBNullValue(trim($params["items"][0]["antecedente"]))." ,clenf_motivo =".getDBNullValue(trim($params["items"][0]["motivo"]))." WHERE cli_codigo = '".addslashes($params["items"][0]["cod"])."'"; //$cmpUpdateSQL = "UPDATE cli_onc_enfermedad // SET emp_codigo_ult_cambio = ".$params["userid"]." // ,clenf_tmsp_ult_cambio = GETDATE() // ,clenf_antecedente =".$antecedente." // ,clenf_motivo =".$motivo." // WHERE cli_codigo = '".addslashes($params["items"][0]["cod"])."'"; } if( setConeccionTransaccion() ) { $flagTransactionInit = true; $GLOBALS['dbSQLTR']->setBeginTransaction(); $continue = true; if($cmpInsertSQL) { //print_r($cmpInsertSQL);print_r("\n"); $resultado = $GLOBALS['dbSQLTR']->QueryTR($cmpInsertSQL,true); if ( !$resultado ) { //print_r($cmpInsertSQL);print_r("\n"); $res = $GLOBALS['dbSQLTR']->setRollbackTransaction(); $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1001]"; } else { $idEnfermedad = $GLOBALS['dbSQLTR']->getTRLastId('cli_onc_enfermedad','clenf_numero'); } } else { //print_r($cmpUpdateSQL);print_r("\n"); $resultado = $GLOBALS['dbSQLTR']->QueryTR($cmpUpdateSQL,true); if ( !$resultado ) { //print_r($cmpUpdateSQL);print_r("\n"); $res = $GLOBALS['dbSQLTR']->setRollbackTransaction(); $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1003]"; } } if( $continue ) { $res = $GLOBALS['dbSQLTR']->setCommitTransaction(); $resultInfo['res'] = 1; return true; } } else { $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1004]"; } } else { $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error: El usuario actual no esta asociado a un Profesional - [Codigo 1001]"; } } else { $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error: parámetros faltantes - [Codigo 1003]"; } return true; } catch ( Exception $e ) { $resultInfo['code'] = CODE_RESULT_ERROR_FATAL; $resultInfo['errorDes'] = "Error:".($e->__toString()); //$this->logTrace(debug_backtrace(),$e->__toString()); //print_r($e->__toString()); return false; } } function saveEstudio(&$resultInfo,$params) { try { //print_r($params);print_r("\n");die; $flagTransactionInit = false; $continue = true; $cmpInsertSQL = false; $cmpUpdateSQL = false; $cmpDeleteToxicidadesSQL = false; $cmpInsertToxicidadesSQL = false; $params["params"] = json_decode($params["params"]); if( is_array($params["items"]) && count($params["items"])>0 ) { $continue = false; //OBTENER EL MEDICO $medico=false; $sql = "SELECT med_codigo FROM medicos WHERE usu_mapeo = " . $params["userid"]; //print_r($sql);print_r("\n");//die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $resultado = $GLOBALS['dbSQL']->getAll(); if(is_array($resultado)&&count($resultado)>0) { $medico=$resultado[0]["med_codigo"]; $continue = true; } } if($continue) { //print_r($params);die("-----AAAAA-----"); $user = $params["userid"]; //print_r("nomenclador[$nomenclador]obrasocial[$obrasocial]plan[$plan]");print_r("\n");die; $flagInsert = false; $flagUpdate = false; if(trim($params["items"][0]["cod"])=='') { $flagInsert = true; $cmpInsertSQL =" INSERT INTO cli_onc_estudios ( cli_codigo ,med_codigo ,test_numero ,est_observacion ,est_avisa ,est_fecha ,est_fechaprox ,emp_codigo_registracion ,emp_codigo_ult_cambio ,clenf_tmsp_registracion ,clenf_tmsp_ult_cambio ) VALUES ( '".addslashes(trim(strtoupper($params["items"][0]["clicod"])))."' ,".$medico." ,".getDBNullValue(trim(strtoupper($params["items"][0]["estudio"])))." ,".getDBNullValue(trim($params["items"][0]["resultado"]))." ,".getDBNullValue(trim(strtoupper($params["items"][0]["avisa"])))." ,".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["fecha"]))))." ,".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["proxf"]))))." ,".getDBNullValue(trim(strtoupper($params["userid"])))." ,".getDBNullValue(trim(strtoupper($params["userid"])))." ,GETDATE() ,GETDATE() )"; } elseif(trim($params["items"][0]["cod"])!='') { //,org_numero_localizacion = ".getDBNullValue(trim(strtoupper($params["items"][0]["durrespuesta"])))." $flagUpdate = true; $cmpUpdateSQL = "UPDATE dbo.cli_onc_estudios SET med_codigo =".getDBNullValue(trim(strtoupper($params["items"][0]["medico"])))." ,test_numero =".getDBNullValue(trim(strtoupper($params["items"][0]["estudio"])))." ,est_observacion=".getDBNullValue(trim($params["items"][0]["resultado"]))." ,est_avisa =".getDBNullValue(trim(strtoupper($params["items"][0]["avisa"])))." ,est_fecha =".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["fecha"]))))." ,est_fechaprox =".getDBNullValue(getDBDateFormated(trim(strtoupper($params["items"][0]["proxf"]))))." ,emp_codigo_ult_cambio = '".addslashes(trim(strtoupper($params["userid"])))."' ,clenf_tmsp_ult_cambio = GETDATE() WHERE est_numero = '".addslashes(trim(strtoupper($params["items"][0]["cod"])))."'"; } // print_r($cmpInsertSQL);print_r("\n"); // print_r($cmpUpdateSQL);print_r("\n"); // print_r($cmpDeleteToxicidadesSQL);print_r("\n"); // print_r($cmpInsertToxicidadesSQL);print_r("\n");die; if( $flagInsert || $flagUpdate ) { if( setConeccionTransaccion() ) //if( true ) { $flagTransactionInit = true; $GLOBALS['dbSQLTR']->setBeginTransaction(); $continue = true; if($flagInsert && $cmpInsertSQL) { $resultado = $GLOBALS['dbSQLTR']->QueryTR($cmpInsertSQL,true); if ( !$resultado ) { //print_r($cmpInsertSQL);print_r("\n"); $res = $GLOBALS['dbSQLTR']->setRollbackTransaction(); $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1001]"; } } else { $resultado = $GLOBALS['dbSQLTR']->QueryTR($cmpUpdateSQL,true); if ( !$resultado ) { //print_r($cmpUpdateSQL);print_r("\n"); $res = $GLOBALS['dbSQLTR']->setRollbackTransaction(); $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1003]"; } } if( $continue ) { $res = $GLOBALS['dbSQLTR']->setCommitTransaction(); $resultInfo['res'] = 1; return true; } } else { $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1004]"; } } else { $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1005]"; } } else { $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error: El usuario actual no esta asociado a un Profesional - [Codigo 1001-5]"; } } return true; } catch ( Exception $e ) { if( $flagTransactionInit ) { $GLOBALS['dbSQLTR']->setRollbackTransaction(); } $resultInfo['code'] = CODE_RESULT_ERROR_FATAL; $resultInfo['errorDes'] = "Error:".($e->__toString()); //$this->logTrace(debug_backtrace(),$e->__toString()); //print_r($e->__toString()); return false; } } function procesarREsumenesBase64() { try { $flagTransactionInit = false; $sql = "SELECT oncep_numero, oncep_resumen FROM cli_onc_epicrisis"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $rs = $GLOBALS['dbSQL']->getAll(); if( is_array($rs)&&count($rs)>0 ) { if( setConeccionTransaccion() ) //if( true ) { $flagTransactionInit = true; $GLOBALS['dbSQLTR']->setBeginTransaction(); $continue = true; //print_r("flagDelete[$flagDelete]");print_r("\n"); $continue=true; for($i=0,$t=count($rs);$i<$t&&$continue;$i++) { $resumen = $rs[$i]["oncep_resumen"]; $updateSQL="UPDATE cli_onc_epicrisis SET oncep_resumen = '". base64_encode($resumen)."' WHERE oncep_numero = ".$rs[$i]["oncep_numero"]; $resultado = $GLOBALS['dbSQLTR']->QueryTR($updateSQL,true); if ( !$resultado ) { //print_r($updateSQL);print_r("\n"); $res = $GLOBALS['dbSQLTR']->setRollbackTransaction(); $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1001]"; } } if( $continue ) { $res = $GLOBALS['dbSQLTR']->setCommitTransaction(); print_r("-FIN -OK-"); } } else { print_r( "Error al grabar los cambios - [Codigo 1004]"); } } } } catch ( Exception $e ) { if( $flagTransactionInit ) { $GLOBALS['dbSQLTR']->setRollbackTransaction(); } $resultInfo['code'] = CODE_RESULT_ERROR_FATAL; $resultInfo['errorDes'] = "Error:".($e->__toString()); //$this->logTrace(debug_backtrace(),$e->__toString()); //print_r($e->__toString()); return false; } } // -------------------------------------------- // END IONC // -------------------------------------------- ?>