Query($sql); if ( !$rs ) { return false; } $turnoCie10lst = $GLOBALS['dbSQL']->getAll(); //print_r($rs);die; if(count($turnoCie10lst)>0) { return $turnoCie10lst; } return false; } catch ( Exception $e ) { //Error: al ejecutar el metodo //print_r($e->__toString());die; return false; } } function getTurnoCIE10Registrado($idTurno) { try { $sql = "SELECT tw.ant_id as id ,tw.ant_codigo as c ,ta.ant_denom as d FROM turnos_autorizar_web AS tw INNER JOIN tipantecedentes AS ta ON ta.ant_id = tw.ant_id WHERE tw.pra_numero = '".$idTurno ."'"; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $trwantidInfo = $GLOBALS['dbSQL']->getAll(); //print_r($rs);die; if(is_array($trwantidInfo)&&count($trwantidInfo)>0) { return ($trwantidInfo[0]["c"]."-".$trwantidInfo[0]["d"]); } } return ''; } catch ( Exception $e ) { //Error: al ejecutar el metodo //print_r($e->__toString());die; return ''; } } function getPracticaCIE10($idPractica,$flagActivas=false) { try { $filter = ""; if($flagActivas) { $filter = " AND pcie.pra_registrado = 0"; } $sql = "SELECT pcie.pra_id ,pcie.pra_numero ,pcie.pra_tstamp ,pcie.ant_id ,pcie.usu_codigo ,pcie.pra_registrado ,tpcie.ant_codigo AS codigo ,tpcie.ant_denom AS denom ,ISNULL(ant_ppal,0) AS ppal ,ISNULL(ant_evo,0) AS evo ,ISNULL(ant_poa,0) AS poa ,ISNULL(ant_ant,0) AS ant FROM practicas_cie10 AS pcie INNER JOIN tipantecedentes AS tpcie ON tpcie.ant_id = pcie.ant_id WHERE pra_numero = ".$idPractica . $filter; $rs = $GLOBALS['dbSQL']->Query($sql); if ( !$rs ) { return false; } $practicaCie10lst = $GLOBALS['dbSQL']->getAll(); //print_r($rs);die; if(count($practicaCie10lst)>0) { return $practicaCie10lst; } return false; } catch ( Exception $e ) { //Error: al ejecutar el metodo //print_r($e->__toString());die; return false; } } function getPracticaCIE10Registrado($idPractica) { try { $sql = "SELECT tw.ant_id as id ,tw.ant_codigo as c ,ta.ant_denom as d FROM practicas_autorizar_web AS tw INNER JOIN tipantecedentes AS ta ON ta.ant_id = tw.ant_id WHERE tw.pra_numero = '".$idPractica ."'"; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $prwantidInfo = $GLOBALS['dbSQL']->getAll(); //print_r($rs);die; if(is_array($prwantidInfo)&&count($prwantidInfo)>0) { return ($prwantidInfo[0]["c"]."-".$prwantidInfo[0]["d"]); } } return ''; } catch ( Exception $e ) { //Error: al ejecutar el metodo //print_r($e->__toString());die; return ''; } } function getGuardiaCIE10($idGuardia,$flagActivas=false) { try { $filter = ""; if($flagActivas) { $filter = " AND gcie.gua_registrado = 0"; } $sql = "SELECT gcie.gua_id ,gcie.gua_numero ,gcie.gua_tstamp ,gcie.ant_id ,gcie.usu_codigo ,gcie.gua_registrado ,tpcie.ant_codigo AS codigo ,tpcie.ant_denom AS denom ,ISNULL(ant_ppal,0) AS ppal ,ISNULL(ant_evo,0) AS evo ,ISNULL(ant_poa,0) AS poa ,ISNULL(ant_ant,0) AS ant FROM guardia_cie10 AS gcie INNER JOIN tipantecedentes AS tpcie ON tpcie.ant_id = gcie.ant_id WHERE gua_numero = ".$idGuardia . $filter." AND NOT EXISTS (SELECT 1 FROM guardia_atenciones AS ga WHERE ga.ant_id = gcie.ant_id)"; $sql = "SELECT gcie.gua_id ,gcie.gua_numero ,gcie.gua_tstamp ,gcie.ant_id ,gcie.usu_codigo ,gcie.gua_registrado ,tpcie.ant_codigo AS codigo ,tpcie.ant_denom AS denom ,ISNULL(ant_ppal,0) AS ppal ,ISNULL(ant_evo,0) AS evo ,ISNULL(ant_poa,0) AS poa ,ISNULL(ant_ant,0) AS ant FROM guardia_cie10 AS gcie INNER JOIN tipantecedentes AS tpcie ON tpcie.ant_id = gcie.ant_id WHERE gua_numero = ".$idGuardia . $filter; /*$sql.= " UNION ALL "; // gcie.gua_id $sql.= "SELECT -1 as gua_id ,gcie.gua_numero ,gcie.gua_tstamp_cie10 as gua_tstamp ,gcie.ant_id ,gcie.usu_codigo_regcie10 as usu_codigo ,gcie.gua_registrado ,tpcie.ant_codigo AS codigo ,tpcie.ant_denom AS denom ,ISNULL(ant_ppal,0) AS ppal ,ISNULL(ant_evo,0) AS evo ,ISNULL(ant_poa,0) AS poa ,ISNULL(ant_ant,0) AS ant FROM guardia_atenciones AS gcie INNER JOIN tipantecedentes AS tpcie ON tpcie.ant_id = gcie.ant_id WHERE gua_numero = ".$idGuardia . $filter;*/ //print_r($sql);die; //if(isset($_REQUEST['debug'])){print_r($sql);die;} $rs = $GLOBALS['dbSQL']->Query($sql); if ( !$rs ) { return false; } $guardiaCie10lst = $GLOBALS['dbSQL']->getAll(); //print_r($rs);die; if(count($guardiaCie10lst)>0) { return $guardiaCie10lst; } return false; } catch ( Exception $e ) { //Error: al ejecutar el metodo //print_r($e->__toString());die; return false; } } function getGuardiaCIE10Registrado($idPractica) { try { $sql = "SELECT tw.ant_id as id ,tw.ant_codigo as c ,ta.ant_denom as d FROM guardia_autorizar_web AS tw INNER JOIN tipantecedentes AS ta ON ta.ant_id = tw.ant_id WHERE tw.gua_numero = '".$idPractica ."'"; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $grwantidInfo = $GLOBALS['dbSQL']->getAll(); //print_r($rs);die; if(is_array($grwantidInfo)&&count($grwantidInfo)>0) { return ($grwantidInfo[0]["c"]."-".$grwantidInfo[0]["d"]); } } return ''; } catch ( Exception $e ) { //Error: al ejecutar el metodo //print_r($e->__toString());die; return ''; } } function getOInternacionCIE10($idOInternacion,$praCodigo,$flagActivas=false) { try { $filter = ""; if($flagActivas) { $filter = " AND oicie.oi_registrado = 0"; } $sql = "SELECT oicie.oi_id ,oicie.oi_numero ,oicie.pra_codigo ,oicie.oi_tstamp ,oicie.ant_id ,oicie.usu_codigo ,oicie.oi_registrado ,tpcie.ant_codigo AS codigo ,tpcie.ant_denom AS denom ,ISNULL(ant_ppal,0) AS ppal ,ISNULL(ant_evo,0) AS evo ,ISNULL(ant_poa,0) AS poa ,ISNULL(ant_ant,0) AS ant FROM orden_internacion_cie10 AS oicie INNER JOIN tipantecedentes AS tpcie ON tpcie.ant_id = oicie.ant_id WHERE oi_numero = ".$idOInternacion ." AND pra_codigo= ".$praCodigo . $filter; $rs = $GLOBALS['dbSQL']->Query($sql); if ( !$rs ) { return false; } $ointernacionCie10lst = $GLOBALS['dbSQL']->getAll(); //print_r($rs);die; if(count($ointernacionCie10lst)>0) { return $ointernacionCie10lst; } return false; } catch ( Exception $e ) { //Error: al ejecutar el metodo //print_r($e->__toString());die; return false; } } //function getOInternacionCIE10Union($idOInternacion,$praCodigo=false,$flagActivas=false) function getOInternacionCIE10Union($idOInternacion,$flagActivas=false) { try { $filter_oi = ""; $filter_ev = ""; $filter_i = ""; if($flagActivas){$filter_oi = " AND oicie.oi_registrado = 0";} if($flagActivas){$filter_ev = " AND fievc10.ici_registrado = 0";} if($flagActivas){$filter_i = " AND fic10.ici_registrado = 0";} // ,oicie.pra_codigo // AND pra_codigo= ".$praCodigo // $sql = "SELECT oicie.oi_id as id // ,oicie.oi_numero as oinro // ,0 as nro // ,oicie.oi_tstamp as fecha // ,oicie.ant_id // ,oicie.usu_codigo // ,ISNULL(oicie.oi_registrado,0) as reg // ,tpcie.ant_codigo AS codigo // ,tpcie.ant_denom AS denom // ,ISNULL(ant_ppal,0) AS ppal // ,ISNULL(ant_evo,0) AS evo // ,ISNULL(ant_poa,0) AS poa // ,ISNULL(ant_ant,0) AS ant // ,'INT' as org // ,1 as foi // FROM orden_internacion_cie10 AS oicie // INNER JOIN tipantecedentes AS tpcie ON tpcie.ant_id = oicie.ant_id // WHERE oi_numero = ".$idOInternacion . $filter_oi; //-->$sql.= " UNION ALL "; /*$sql.= "SELECT fievc10.ici_id as id ,fi.oi_numero as oinro ,fi.int_numero as nro ,fievc10.ici_tstamp as fecha ,fievc10.ant_id ,fievc10.usu_codigo ,ISNULL(fievc10.ici_registrado,0)as reg ,tpcie.ant_codigo AS codigo ,tpcie.ant_denom AS denom ,ISNULL(ant_ppal,0) AS ppal ,ISNULL(ant_evo,0) AS evo ,ISNULL(ant_poa,0) AS poa ,ISNULL(ant_ant,0) AS ant ,'EVO' as org ,1 as foi FROM cli_fichainternacion_evo_cie10 as fievc10 INNER JOIN tipantecedentes AS tpcie ON tpcie.ant_id = fievc10.ant_id INNER JOIN cli_fichainternacion_evolucion as fiev ON fiev.int_id = fievc10.int_id INNER JOIN cli_fichainternacion as fi ON fi.int_numero = fiev.int_numero WHERE fi.oi_numero = ".$idOInternacion . $filter_ev; $sql.= " UNION ALL ";*/ //$sql.= "SELECT fic10.ici_id as id $sql = "SELECT fic10.ici_id as id ,fi.oi_numero as oinro ,fi.int_numero as nro ,fic10.ici_tstamp as fecha ,fic10.ant_id ,fic10.usu_codigo ,ISNULL(fic10.ici_registrado,0) as reg ,tpcie.ant_codigo AS codigo ,tpcie.ant_denom AS denom ,ISNULL(ant_ppal,0) AS ppal ,ISNULL(ant_evo,0) AS evo ,ISNULL(ant_poa,0) AS poa ,ISNULL(ant_ant,0) AS ant ,'FINT' as org ,1 as foi FROM cli_fichainternacion_cie10 as fic10 INNER JOIN tipantecedentes AS tpcie ON tpcie.ant_id = fic10.ant_id INNER JOIN cli_fichainternacion as fi ON fi.int_numero = fic10.int_numero WHERE fi.oi_numero = ".$idOInternacion . $filter_i; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( !$rs ) { return false; } $ointernacionCie10lst = $GLOBALS['dbSQL']->getAll(); //print_r($rs);die; if(is_array($ointernacionCie10lst)&&count($ointernacionCie10lst)>0) { return $ointernacionCie10lst; } return false; } catch ( Exception $e ) { //Error: al ejecutar el metodo //print_r($e->__toString());die; return false; } } function getOInternacionPracticas_old($idOInternacion) { try { $ointernacionPracticaslstOutput = array(); //-------------------------------------------------------- // PRACTICAS DE LA ORDEN DE INTERNACION //-------------------------------------------------------- $sql = "SELECT oipr.oi_numero as oinro ,oipr.oi_item as item ,oipr.nom_codigo as nom ,oipr.pra_codigo as ino ,ino.inos_denom as denom ,oipr.med_codigo as medcod ,med.med_nombre as meddenom ,CONVERT(varchar, oip_fecha, 103) AS fecha ,CONVERT(varchar, oip_fecha, 23) AS tfecha ,ISNULL(oiaw.aut_validacion,0) as registrado ,ISNULL(oic10reg.oicie10_numero,0) as cie10registrado ,(CASE WHEN oiaw.aut_validacion IS NULL THEN '' ELSE oiaw.aut_validacion END) as idval ,(CASE WHEN oiaw.ant_id IS NULL THEN '' ELSE oiaw.ant_id END) as ant_id ,(CASE WHEN oiaw.ant_id IS NULL THEN '' ELSE (SELECT CONCAT(ant_codigo,'-',ant_denom) FROM tipantecedentes as c10 WHERE c10.ant_id= oiaw.ant_id) END) as cie10denom ,(CASE WHEN oiaw.aut_origen IS NULL THEN '' ELSE oiaw.aut_origen END) as aut_origen ,0 as itemselected ,'' as token ,'' as c10 ,'' as err ,'' as succes ,0 as c10reg ,'I' as prorigen ,'' AS fcirugia ,'' AS tfcirugia ,'' as tven ,'' as tcir FROM oi_practicas AS oipr INNER JOIN nomenclador AS ino ON ino.nom_codigo = oipr.nom_codigo AND ino.inos_cod = oipr.pra_codigo INNER JOIN medicos AS med ON med.med_codigo = oipr.med_codigo LEFT JOIN ointernacion_autorizar_web AS oiaw ON oiaw.oi_numero = oipr.oi_numero AND oiaw.oi_item = oipr.oi_item AND oiaw.pra_codigo = oipr.pra_codigo LEFT JOIN ointernacion_cie10_registracion AS oic10reg ON oic10reg.oi_numero = oipr.oi_numero AND oic10reg.oi_item = oipr.oi_item AND oic10reg.pra_codigo = oipr.pra_codigo WHERE oipr.oi_numero = ".$idOInternacion." ORDER BY oip_fecha DESC"; //AND oiaw.aut_origen = 'I' // if(intval($idOInternacion)==6){ // print_r("-----sql---");print_r("\n"); // print_r($sql);print_r("\n");die;}//die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $ointernacionPracticaslst = $GLOBALS['dbSQL']->getAll(); // if(intval($idOInternacion)==6){ // print_r("-----ointernacionPracticaslst---");print_r("\n"); // print_r($ointernacionPracticaslst);print_r("\n");}//die; if(is_array($ointernacionPracticaslst)&&count($ointernacionPracticaslst)>0) { $practicas=array(); $total=count($ointernacionPracticaslst); //OBTENER LOS CIE10 DE LA OI $cie10Legajo = getOInternacionCIE10Union($idOInternacion); //BUSCAR EL CIE-10 PRINCIPAL $lstc10Ppal = array(); for($i=0;$i $cie10Legajo[$i]["ant_id"] ,"cod" => $cie10Legajo[$i]["codigo"] ,"denomsf" => $cie10Legajo[$i]["denom"] ,"denom" => $cie10Legajo[$i]["codigo"]." - ".$cie10Legajo[$i]["denom"] //,"org" => 'I' ); $x = array_push($lstc10Ppal,$item); } } //SI NO SE ENCONTRO UN PRINCIPAL, TOMAR EL PRIMERO (ESTO QUEDO DEPRECADO VIA LANDAMED, YA QUE ESTE EXIGE UN PRINCIPAL, PERO LA WEB PERMITE SIN PRINCIPAL) if(count($lstc10Ppal)<=0) { //Buscar el primer CIE-10 no principal, ya que no se definio nada $item = array( "ant_id" => $cie10Legajo[0]["ant_id"] ,"cod" => $cie10Legajo[0]["codigo"] ,"denomsf" => $cie10Legajo[0]["denom"] ,"denom" => $cie10Legajo[0]["codigo"]." - ".$cie10Legajo[0]["denom"] //,"org" => 'I' ); $x = array_push($lstc10Ppal,$item); } // print_r("-----CIE10 DE LA INTERNACION GLOBAL---");print_r("\n"); // print_r($cie10Legajo);print_r("\n");die; //ASOCIA A CADA PRACTICA EL LISTADO DE CIE10 for($i=0;$i<$total;$i++) { $continue=false; if( trim($ointernacionPracticaslst[$i]["aut_origen"])=='') { $continue=true; } elseif( trim($ointernacionPracticaslst[$i]["aut_origen"])!='' && $ointernacionPracticaslst[$i]["aut_origen"]=='I' ) { $continue=true; } if($continue) { $cie10tmp = $cie10Legajo; //SI EL CIE10 DE LA PRACTICA ESTA REGISTRADO, MARCAR TODOS LOS ITEMS CIE10 COMO REGISTRADOS //PARA DICHA PRACTICA (ESTO EVITARA QUE SE REENVIA A APROSS) if( intval($ointernacionPracticaslst[$i]["cie10registrado"])>0 ) { for($j=0;$j0) { $ointernacionPracticaslst[$i]["c10"] = $lstc10Ppal[0]["ant_id"]; } $x = array_push($ointernacionPracticaslstOutput,$ointernacionPracticaslst[$i]); } } // print_r("-----ointernacionPracticaslst---");print_r("\n"); //print_r($ointernacionPracticaslst);print_r("\n");die; //-->return $ointernacionPracticaslst; } } //-------------------------------------------------------- //-------------------------------------------------------- // PRACTICAS DE LA INTERVENCION QUIRURGICA ASOCIADAS A LA ORDEN DE INTERNACION //-------------------------------------------------------- $sql = "SELECT oiqt.oi_numero as oinro ,1 as item ,oiqtpr.nom_codigo as nom ,oiqtpr.pra_codigo as ino ,ino.inos_denom as denom ,oiqt.med_codigo as medcod ,med.med_nombre as meddenom ,FORMAT(oiqtpr.qpr_tstamp, 'dd/MM/yyyy') AS fecha ,ISNULL(oiaw.aut_validacion,0) as registrado ,ISNULL(oic10reg.oicie10_numero,0) as cie10registrado ,(CASE WHEN oiaw.aut_validacion IS NULL THEN '' ELSE oiaw.aut_validacion END) as idval ,(CASE WHEN oiaw.ant_id IS NULL THEN '' ELSE oiaw.ant_id END) as ant_id ,(CASE WHEN oiaw.ant_id IS NULL THEN '' ELSE (SELECT CONCAT(ant_codigo,'-',ant_denom) FROM tipantecedentes as c10 WHERE c10.ant_id= oiaw.ant_id) END) as cie10denom ,(CASE WHEN oiaw.aut_origen IS NULL THEN '' ELSE oiaw.aut_origen END) as aut_origen ,0 as itemselected ,'' as token ,'' as c10 ,'' as err ,'' as succes ,0 as c10reg ,'Q' as prorigen ,FORMAT(oiqt.qui_fecha,'dd/MM/yyyy') AS fcirugia ,CONVERT(varchar, oiqt.qui_fecha, 23) AS tfcirugia ,qpr_tiempo_intervencion as tcir ,qpr_tiempo_ventilacion as tven FROM quirofano_turnos_practicas AS oiqtpr INNER JOIN quirofano_turnos AS oiqt ON oiqt.qtu_numero = oiqtpr.qtu_numero INNER JOIN nomenclador AS ino ON ino.nom_codigo = oiqtpr.nom_codigo AND ino.inos_cod = oiqtpr.pra_codigo INNER JOIN medicos AS med ON med.med_codigo = oiqt.med_codigo LEFT JOIN ointernacion_autorizar_web AS oiaw ON oiaw.oi_numero = oiqt.oi_numero AND oiaw.pra_codigo = oiqtpr.pra_codigo LEFT JOIN ointernacion_cie10_registracion AS oic10reg ON oic10reg.oi_numero = oiqt.oi_numero AND oic10reg.pra_codigo = oiqtpr.pra_codigo WHERE oiqt.oi_numero = ".$idOInternacion." ORDER BY oiqtpr.qpr_tstamp DESC"; // AND oiaw.aut_origen = 'Q' // AND oic10reg.oicie10_origen = 'Q' // if(intval($idOInternacion)==6){ // print_r("-----sql Q---");print_r("\n"); // print_r($sql);print_r("\n");die;}//die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $ointernacionQuirofanoPracticaslst = $GLOBALS['dbSQL']->getAll(); // if(intval($idOInternacion)==6){ // print_r("-----sql Q---");print_r("\n"); // print_r($ointernacionQuirofanoPracticaslst);print_r("\n");die;}//die; if(is_array($ointernacionQuirofanoPracticaslst)&&count($ointernacionQuirofanoPracticaslst)>0) { $practicas=array(); $total=count($ointernacionQuirofanoPracticaslst); //OBTENER LOS CIE10 DE LA OI $cie10Legajo = getOInternacionCIE10Union($idOInternacion); //BUSCAR EL CIE-10 PRINCIPAL $lstc10Ppal = array(); for($i=0;$i $cie10Legajo[$i]["ant_id"] ,"cod" => $cie10Legajo[$i]["codigo"] ,"denomsf" => $cie10Legajo[$i]["denom"] ,"denom" => $cie10Legajo[$i]["codigo"]." - ".$cie10Legajo[$i]["denom"] //,"org" => 'Q' ); $x = array_push($lstc10Ppal,$item); } } //SI NO SE ENCONTRO UN PRINCIPAL, TOMAR EL PRIMERO (ESTO QUEDO DEPRECADO VIA LANDAMED, YA QUE ESTE EXIGE UN PRINCIPAL, PERO LA WEB PERMITE SIN PRINCIPAL) if(count($lstc10Ppal)<=0) { //Buscar el primer CIE-10 no principal, ya que no se definio nada $item = array( "ant_id" => $cie10Legajo[0]["ant_id"] ,"cod" => $cie10Legajo[0]["codigo"] ,"denomsf" => $cie10Legajo[0]["denom"] ,"denom" => $cie10Legajo[0]["codigo"]." - ".$cie10Legajo[0]["denom"] //,"org" => 'Q' ); $x = array_push($lstc10Ppal,$item); } // print_r("-----CIE10 DE LA INTERNACION GLOBAL---");print_r("\n"); // print_r($cie10Legajo);print_r("\n");die; //ASOCIA A CADA PRACTICA EL LISTADO DE CIE10 for($i=0;$i<$total;$i++) { $continue=false; if( trim($ointernacionPracticaslst[$i]["aut_origen"])=='') { $continue=true; } elseif( trim($ointernacionPracticaslst[$i]["aut_origen"])!='' && $ointernacionPracticaslst[$i]["aut_origen"]=='Q' ) { $continue=true; } if($continue) { $cie10tmp = $cie10Legajo; //SI EL CIE10 DE LA PRACTICA ESTA REGISTRADO, MARCAR TODOS LOS ITEMS CIE10 COMO REGISTRADOS //PARA DICHA PRACTICA (ESTO EVITARA QUE SE REENVIA A APROSS) if( intval($ointernacionQuirofanoPracticaslst[$i]["cie10registrado"])>0 ) { for($j=0;$j0) { $ointernacionQuirofanoPracticaslst[$i]["c10"] = $lstc10Ppal[0]["ant_id"]; } $x = array_push($ointernacionPracticaslstOutput,$ointernacionQuirofanoPracticaslst[$i]); } } } } //-------------------------------- // RETORNAR LISTADO UNIFICADO //-------------------------------- if(is_array($ointernacionPracticaslstOutput)&&count($ointernacionPracticaslstOutput)>=0) { //print_r($ointernacionPracticaslst);print_r("\n");die; return $ointernacionPracticaslstOutput; } //-------------------------------- return false; // print_r($ointernacionPracticaslst);print_r("\n");die; // print_r("---------------------");print_r("\n"); //print_r($rs);die; // print_r("-----OI PRACTICAS---");print_r("\n"); // print_r($ointernacionPracticaslst);print_r("\n"); // if(is_array($ointernacionPracticaslst)&&count($ointernacionPracticaslst)>0) // { // $practicas=array(); // $total=count($ointernacionPracticaslst); // //$cie10Legajo = getOInternacionCIE10($idOInternacion,$ointernacionPracticaslst[$i]["ino"]); // $cie10Legajo = getOInternacionCIE10Union($idOInternacion); // // cie10registrado // $lstc10Ppal = array(); // for($i=0;$i $cie10Legajo[$i]["ant_id"] // ,"cod" => $cie10Legajo[$i]["codigo"] // ,"denomsf" => $cie10Legajo[$i]["denom"] // ,"denom" => $cie10Legajo[$i]["codigo"]." - ".$cie10Legajo[$i]["denom"] // ); // $x = array_push($lstc10Ppal,$item); // } // } // if(count($lstc10Ppal)<=0) // { // //Buscar el primer CIE-10 no principal, ya que no se definio nada // $item = array( // "ant_id" => $cie10Legajo[0]["ant_id"] // ,"cod" => $cie10Legajo[0]["codigo"] // ,"denomsf" => $cie10Legajo[0]["denom"] // ,"denom" => $cie10Legajo[0]["codigo"]." - ".$cie10Legajo[0]["denom"] // ); // $x = array_push($lstc10Ppal,$item); // } // // print_r("-----CIE10 DE LA INTERNACION GLOBAL---");print_r("\n"); // // print_r($cie10Legajo);print_r("\n");die; // for($i=0;$i<$total;$i++) // { // $cie10tmp = $cie10Legajo; // if( intval($ointernacionPracticaslst[$i]["cie10registrado"])>0 ) // { // for($j=0;$j0) // { // $ointernacionPracticaslst[$i]["c10"] = $lstc10Ppal[0]["ant_id"]; // } // } // // print_r("-----ointernacionPracticaslst---");print_r("\n"); // //print_r($ointernacionPracticaslst);print_r("\n");die; // return $ointernacionPracticaslst; // } // return false; } catch ( Exception $e ) { //Error: al ejecutar el metodo //print_r($e->__toString());die; return false; } } function getOInternacionPracticas($idOInternacion,$cie10Legajo=false,$sinregistrar=false,&$totalestiempo=false) { try { $ointernacionPracticaslstOutput = array(); $ointernacionPracticaslst = array(); $ointernacionQuirofanoPracticaslst = array(); //-------------------------------------------------------- // PRACTICAS DE LA ORDEN DE INTERNACION SIN REGISTRAR //-------------------------------------------------------- if($sinregistrar) { // SIN REGISTRAR $sql = "SELECT oipr.oi_numero as oinro ,oipr.oi_item as item ,oipr.nom_codigo as nom ,oipr.pra_codigo as ino ,ino.inos_denom as denom ,oipr.med_codigo as medcod ,med.med_nombre as meddenom ,med.med_cuit as medcuit ,CONVERT(varchar, oipr.oip_fecha, 103) AS fecha ,CONVERT(varchar, oipr.oip_fecha, 23) AS tfecha ,FORMAT(oipr.oip_fecha,'yyyy-MM-dd HH:mm:ss') AS FecTsmpsf ,FORMAT(oipr.oip_fecha,'dd/MM/yyyy HH:mm:ss') AS FecTsmp ,ISNULL(oiaw.aut_validacion,0) as registrado ,0 as cie10registrado ,(CASE WHEN oiaw.aut_validacion IS NULL THEN '' ELSE oiaw.aut_validacion END) as idval ,(CASE WHEN oiaw.ant_id IS NULL THEN '' ELSE oiaw.ant_id END) as ant_id ,(CASE WHEN oiaw.ant_id IS NULL THEN '' ELSE (SELECT CONCAT(ant_codigo,'-',ant_denom) FROM tipantecedentes as c10 WHERE c10.ant_id= oiaw.ant_id) END) as cie10denom ,(CASE WHEN oiaw.aut_origen IS NULL THEN '' ELSE oiaw.aut_origen END) as aut_origen ,0 as itemselected ,'' as token ,'' as c10 ,'' as err ,'' as succes ,0 as c10reg ,'I' as prorigen ,'' AS fcirugia ,'' AS tfcirugia ,'' as tven ,'' as tcir FROM oi_practicas AS oipr INNER JOIN nomenclador AS ino ON ino.nom_codigo = oipr.nom_codigo AND ino.inos_cod = oipr.pra_codigo INNER JOIN medicos AS med ON med.med_codigo = oipr.med_codigo INNER JOIN ointernacion_autorizar_web AS oiaw ON oiaw.oi_numero = oipr.oi_numero WHERE oipr.oi_numero = ".$idOInternacion." AND NOT EXISTS (SELECT 1 FROM ointernacion_practicas_registracion AS oiprareg WHERE oiprareg.oi_numero = oipr.oi_numero AND oiprareg.oi_item = oipr.oi_item AND oiprareg.pra_codigo = oipr.pra_codigo AND oiprareg.oipr_origen= 'I' ) ORDER BY oipr.oi_tstamp DESC"; } else { // REGISTRADAS / NO REGISTRADAS $sql = "SELECT oipr.oi_numero as oinro ,oipr.oi_item as item ,oipr.nom_codigo as nom ,oipr.pra_codigo as ino ,ino.inos_denom as denom ,oipr.med_codigo as medcod ,med.med_nombre as meddenom ,med.med_cuit as medcuit ,CONVERT(varchar, oipr.oip_fecha, 103) AS fecha ,CONVERT(varchar, oipr.oip_fecha, 23) AS tfecha ,FORMAT(oipr.oip_fecha,'yyyy-MM-dd HH:mm:ss') AS FecTsmpsf ,FORMAT(oipr.oip_fecha,'dd/MM/yyyy HH:mm:ss') AS FecTsmp ,ISNULL(oiaw.aut_validacion,0) as registrado ,ISNULL(oic10reg.oicie10_numero,0) as cie10registrado ,(CASE WHEN oiaw.aut_validacion IS NULL THEN '' ELSE oiaw.aut_validacion END) as idval ,(CASE WHEN oiaw.ant_id IS NULL THEN '' ELSE oiaw.ant_id END) as ant_id ,(CASE WHEN oiaw.ant_id IS NULL THEN '' ELSE (SELECT CONCAT(ant_codigo,'-',ant_denom) FROM tipantecedentes as c10 WHERE c10.ant_id= oiaw.ant_id) END) as cie10denom ,(CASE WHEN oiaw.aut_origen IS NULL THEN '' ELSE oiaw.aut_origen END) as aut_origen ,0 as itemselected ,'' as token ,'' as c10 ,'' as err ,'' as succes ,0 as c10reg ,'I' as prorigen ,'' AS fcirugia ,'' AS tfcirugia ,'' as tven ,'' as tcir FROM oi_practicas AS oipr INNER JOIN nomenclador AS ino ON ino.nom_codigo = oipr.nom_codigo AND ino.inos_cod = oipr.pra_codigo INNER JOIN medicos AS med ON med.med_codigo = oipr.med_codigo LEFT JOIN ointernacion_autorizar_web AS oiaw ON oiaw.oi_numero = oipr.oi_numero AND oiaw.oi_item = oipr.oi_item AND oiaw.pra_codigo = oipr.pra_codigo LEFT JOIN ointernacion_cie10_registracion AS oic10reg ON oic10reg.oi_numero = oipr.oi_numero AND oic10reg.oi_item = oipr.oi_item AND oic10reg.pra_codigo = oipr.pra_codigo WHERE oipr.oi_numero = ".$idOInternacion." ORDER BY oip_fecha DESC"; $sql = "SELECT oipr.oi_numero as oinro ,oipr.oi_item as item ,oipr.nom_codigo as nom ,oipr.pra_codigo as ino ,ino.inos_denom as denom ,oipr.med_codigo as medcod ,med.med_nombre as meddenom ,med.med_cuit as medcuit ,CONVERT(varchar, oipr.oip_fecha, 103) AS fecha ,CONVERT(varchar, oipr.oip_fecha, 23) AS tfecha ,FORMAT(oipr.oip_fecha,'yyyy-MM-dd HH:mm:ss') AS FecTsmpsf ,FORMAT(oipr.oip_fecha,'dd/MM/yyyy HH:mm:ss') AS FecTsmp ,ISNULL(oiprreg.oipr_idvalidacion,0) as registrado ,0 as cie10registrado ,(CASE WHEN oiprreg.oipr_idvalidacion IS NULL THEN '' ELSE oiprreg.oipr_idvalidacion END) as idval ,'' as ant_id ,'' as cie10denom ,'' as aut_origen ,0 as itemselected ,'' as token ,'' as c10 ,'' as err ,'' as succes ,0 as c10reg ,'I' as prorigen ,'' AS fcirugia ,'' AS tfcirugia ,'' as tven ,'' as tcir FROM oi_practicas AS oipr INNER JOIN nomenclador AS ino ON ino.nom_codigo = oipr.nom_codigo AND ino.inos_cod = oipr.pra_codigo INNER JOIN medicos AS med ON med.med_codigo = oipr.med_codigo LEFT JOIN ointernacion_practicas_registracion AS oiprreg ON oiprreg.oi_numero = oipr.oi_numero AND oiprreg.oi_item = oipr.oi_item AND oiprreg.pra_codigo = oipr.pra_codigo WHERE oipr.oi_numero = ".$idOInternacion." ORDER BY oip_fecha DESC"; } //print_r($sql);print_r("\n");die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $ointernacionPracticaslst = $GLOBALS['dbSQL']->getAll(); // print_r("-----ointernacionPracticaslst---");print_r("\n"); // print_r($ointernacionPracticaslst);print_r("\n");}//die; if(is_array($ointernacionPracticaslst)&&count($ointernacionPracticaslst)>0) { $practicas=array(); $total=count($ointernacionPracticaslst); //OBTENER LOS CIE10 DE LA OI //-->$cie10Legajo = getOInternacionCIE10Union($idOInternacion); //BUSCAR EL CIE-10 PRINCIPAL $lstc10Ppal = array(); for($i=0;$i $cie10Legajo[$i]["ant_id"] ,"cod" => $cie10Legajo[$i]["codigo"] ,"denomsf" => $cie10Legajo[$i]["denom"] ,"denom" => $cie10Legajo[$i]["codigo"]." - ".$cie10Legajo[$i]["denom"] //,"org" => 'I' ); $x = array_push($lstc10Ppal,$item); } } //SI NO SE ENCONTRO UN PRINCIPAL, TOMAR EL PRIMERO (ESTO QUEDO DEPRECADO VIA LANDAMED, YA QUE ESTE EXIGE UN PRINCIPAL, PERO LA WEB PERMITE SIN PRINCIPAL) if(count($lstc10Ppal)<=0) { //Buscar el primer CIE-10 no principal, ya que no se definio nada $item = array( "ant_id" => $cie10Legajo[0]["ant_id"] ,"cod" => $cie10Legajo[0]["codigo"] ,"denomsf" => $cie10Legajo[0]["denom"] ,"denom" => $cie10Legajo[0]["codigo"]." - ".$cie10Legajo[0]["denom"] //,"org" => 'I' ); $x = array_push($lstc10Ppal,$item); } //ASOCIA A CADA PRACTICA EL LISTADO DE CIE10 for($i=0;$i<$total;$i++) { //REGISTRADO //$ointernacionPracticaslst[$i]["registrado"] = (intval($ointernacionPracticaslst[$i]["registrado"])>0?1:0); $ointernacionPracticaslst[$i]["registrado"] = (trim($ointernacionPracticaslst[$i]["registrado"])!=''?((is_numeric($ointernacionPracticaslst[$i]["registrado"])&&intval($ointernacionPracticaslst[$i]["registrado"])===0)?0:1):0); $continue=false; if( trim($ointernacionPracticaslst[$i]["aut_origen"])=='') { $continue=true; } elseif( trim($ointernacionPracticaslst[$i]["aut_origen"])!='' && $ointernacionPracticaslst[$i]["aut_origen"]=='I' ) { $continue=true; } if($continue) { $cie10tmp = $cie10Legajo; //SI EL CIE10 DE LA PRACTICA ESTA REGISTRADO, MARCAR TODOS LOS ITEMS CIE10 COMO REGISTRADOS //PARA DICHA PRACTICA (ESTO EVITARA QUE SE REENVIA A APROSS) if( intval($ointernacionPracticaslst[$i]["cie10registrado"])>0 ) { for($j=0;$j0) { $ointernacionPracticaslst[$i]["c10"] = $lstc10Ppal[0]["ant_id"]; } $x = array_push($ointernacionPracticaslstOutput,$ointernacionPracticaslst[$i]); } } // print_r("-----ointernacionPracticaslst---");print_r("\n"); //print_r($ointernacionPracticaslst);print_r("\n");die; //-->return $ointernacionPracticaslst; } } //print_r($ointernacionPracticaslstOutput);print_r("\n");die; //-------------------------------------------------------- //-->if($idOInternacion==14){print_r($ointernacionPracticaslstOutput);die("ccccccccccccc");} //-------------------------------------------------------- // PRACTICAS DE LA INTERVENCION QUIRURGICA ASOCIADAS A LA ORDEN DE INTERNACION //-------------------------------------------------------- if($sinregistrar) { // SIN REGISTRAR $sql = "SELECT oiqt.oi_numero as oinro ,1 as item ,oiqtpr.nom_codigo as nom ,oiqtpr.pra_codigo as ino ,ino.inos_denom as denom ,oiqt.med_codigo as medcod ,med.med_nombre as meddenom ,med.med_cuit as medcuit ,FORMAT(oiqtpr.qpr_tstamp, 'dd/MM/yyyy') AS fecha ,FORMAT(oiqtpr.qpr_tstamp, 'yyyy-MM-dd HH:mm:ss') AS FecTsmp ,FORMAT(oiqtpr.qpr_tstamp, 'dd/MM/yyyy HH:mm:ss') AS FecTsmpsf ,0 as registrado ,0 as cie10registrado ,'' as idval ,'' as ant_id ,'' as cie10denom ,'' as aut_origen ,0 as itemselected ,'' as token ,'' as c10 ,'' as err ,'' as succes ,0 as c10reg ,'Q' as prorigen ,FORMAT(oiqt.qui_fecha,'dd/MM/yyyy') AS fcirugia ,CONVERT(varchar, oiqt.qui_fecha, 23) AS tfcirugia ,qpr_tiempo_intervencion as tcir ,qpr_tiempo_ventilacion as tven FROM quirofano_turnos_practicas AS oiqtpr INNER JOIN quirofano_turnos AS oiqt ON oiqt.qtu_numero = oiqtpr.qtu_numero INNER JOIN nomenclador AS ino ON ino.nom_codigo = oiqtpr.nom_codigo AND ino.inos_cod = oiqtpr.pra_codigo INNER JOIN medicos AS med ON med.med_codigo = oiqt.med_codigo WHERE oiqt.oi_numero = ".$idOInternacion." AND NOT EXISTS (SELECT 1 FROM ointernacion_practicas_registracion AS oiprareg WHERE oiprareg.oi_numero = oiqt.oi_numero AND oiprareg.oi_item = oiqtpr.oi_item AND oiprareg.pra_codigo = oiqtpr.pra_codigo AND oiprareg.oipr_origen= 'Q' ) ORDER BY oiqtpr.qpr_tstamp ASC"; } else { // REGISTRADAS / NO REGISTRADAS $sql = "SELECT oiqt.oi_numero as oinro ,1 as item ,oiqtpr.nom_codigo as nom ,oiqtpr.pra_codigo as ino ,ino.inos_denom as denom ,oiqt.med_codigo as medcod ,med.med_nombre as meddenom ,med.med_cuit as medcuit ,FORMAT(oiqtpr.qpr_tstamp, 'dd/MM/yyyy') AS fecha ,FORMAT(oiqtpr.qpr_tstamp,'yyyy-MM-dd HH:mm:ss') AS FecTsmpsf ,FORMAT(oiqtpr.qpr_tstamp, 'dd/MM/yyyy HH:mm:ss') AS FecTsmp ,ISNULL(oiaw.aut_validacion,0) as registrado ,ISNULL(oic10reg.oicie10_numero,0) as cie10registrado ,(CASE WHEN oiaw.aut_validacion IS NULL THEN '' ELSE oiaw.aut_validacion END) as idval ,(CASE WHEN oiaw.ant_id IS NULL THEN '' ELSE oiaw.ant_id END) as ant_id ,(CASE WHEN oiaw.ant_id IS NULL THEN '' ELSE (SELECT CONCAT(ant_codigo,'-',ant_denom) FROM tipantecedentes as c10 WHERE c10.ant_id= oiaw.ant_id) END) as cie10denom ,(CASE WHEN oiaw.aut_origen IS NULL THEN '' ELSE oiaw.aut_origen END) as aut_origen ,0 as itemselected ,'' as token ,'' as c10 ,'' as err ,'' as succes ,0 as c10reg ,'Q' as prorigen ,FORMAT(oiqt.qui_fecha,'dd/MM/yyyy') AS fcirugia ,CONVERT(varchar, oiqt.qui_fecha, 23) AS tfcirugia ,qpr_tiempo_intervencion as tcir ,qpr_tiempo_ventilacion as tven FROM quirofano_turnos_practicas AS oiqtpr INNER JOIN quirofano_turnos AS oiqt ON oiqt.qtu_numero = oiqtpr.qtu_numero INNER JOIN nomenclador AS ino ON ino.nom_codigo = oiqtpr.nom_codigo AND ino.inos_cod = oiqtpr.pra_codigo INNER JOIN medicos AS med ON med.med_codigo = oiqt.med_codigo LEFT JOIN ointernacion_autorizar_web AS oiaw ON oiaw.oi_numero = oiqt.oi_numero AND oiaw.pra_codigo = oiqtpr.pra_codigo LEFT JOIN ointernacion_cie10_registracion AS oic10reg ON oic10reg.oi_numero = oiqt.oi_numero AND oic10reg.pra_codigo = oiqtpr.pra_codigo WHERE oiqt.oi_numero = ".$idOInternacion." ORDER BY oiqtpr.qpr_tstamp DESC"; // LEFT JOIN ointernacion_autorizar_web AS oiaw ON oiaw.oi_numero = oiqt.oi_numero // AND oiaw.oi_item = oiqtpr.oi_item // AND oiaw.pra_codigo = oiqtpr.pra_codigo // LEFT JOIN ointernacion_practicas_registracion AS oiprreg ON oiprreg.oi_numero = oipr.oi_numero // AND oiprreg.oi_item = oipr.oi_item // AND oiprreg.pra_codigo = oipr.pra_codigo $sql = "SELECT oiqt.oi_numero as oinro ,1 as item ,oiqtpr.nom_codigo as nom ,oiqtpr.pra_codigo as ino ,ino.inos_denom as denom ,oiqt.med_codigo as medcod ,med.med_nombre as meddenom ,med.med_cuit as medcuit ,FORMAT(oiqtpr.qpr_tstamp, 'dd/MM/yyyy') AS fecha ,FORMAT(oiqtpr.qpr_tstamp,'yyyy-MM-dd HH:mm:ss') AS FecTsmpsf ,FORMAT(oiqtpr.qpr_tstamp, 'dd/MM/yyyy HH:mm:ss') AS FecTsmp ,ISNULL((SELECT oipr_idvalidacion FROM ointernacion_practicas_registracion as oipreg INNER JOIN quirofano_turnos AS oiqt ON oiqt.oi_numero = oipreg.oi_numero INNER JOIN quirofano_turnos_practicas AS oiqtpr ON oiqt.qtu_numero = oiqtpr.qtu_numero AND oiqt.qtu_numero = oiqtpr.qtu_numero WHERE oipreg.oi_numero = '".addslashes($idOInternacion)."' AND oipreg.oipr_origen = 'Q' ) ,0) as registrado ,0 as cie10registrado ,(CASE WHEN oiaw.aut_validacion IS NULL THEN '' ELSE oiaw.aut_validacion END) as idval ,(CASE WHEN oiaw.ant_id IS NULL THEN '' ELSE oiaw.ant_id END) as ant_id ,(CASE WHEN oiaw.ant_id IS NULL THEN '' ELSE (SELECT CONCAT(ant_codigo,'-',ant_denom) FROM tipantecedentes as c10 WHERE c10.ant_id= oiaw.ant_id) END) as cie10denom ,(CASE WHEN oiaw.aut_origen IS NULL THEN '' ELSE oiaw.aut_origen END) as aut_origen ,0 as itemselected ,'' as token ,'' as c10 ,'' as err ,'' as succes ,0 as c10reg ,'Q' as prorigen ,FORMAT(oiqt.qui_fecha,'dd/MM/yyyy') AS fcirugia ,CONVERT(varchar, oiqt.qui_fecha, 23) AS tfcirugia ,qpr_tiempo_intervencion as tcir ,qpr_tiempo_ventilacion as tven FROM quirofano_turnos_practicas AS oiqtpr INNER JOIN quirofano_turnos AS oiqt ON oiqt.qtu_numero = oiqtpr.qtu_numero INNER JOIN nomenclador AS ino ON ino.nom_codigo = oiqtpr.nom_codigo AND ino.inos_cod = oiqtpr.pra_codigo INNER JOIN medicos AS med ON med.med_codigo = oiqt.med_codigo LEFT JOIN ointernacion_autorizar_web AS oiaw ON oiaw.oi_numero = oiqt.oi_numero WHERE oiqt.oi_numero = '".addslashes($idOInternacion)."' ORDER BY oiqtpr.qpr_tstamp DESC"; } // SELECT oipr_idvalidacion // FROM ointernacion_practicas_registracion AS oiprreg // WHERE oiprreg.oi_numero = oiqtpr.qtu_numero // AND EXISTS(SELECT 1 // FROM quirofano_turnos_practicas AS qtp // INNER JOIN quirofano_turnos AS qt ON qt.qtu_numero = qtp.qtu_numero // WHERE qt.oi_numero = ".$idOInternacion." // AND oiprreg.oi_item = oiqtpr.oi_item // AND oiprreg.pra_codigo = oiqtpr.pra_codigo // ) // if(intval($idOInternacion)==6){ // print_r("-----sql Q---");print_r("\n"); //print_r($sql);print_r("\n");die;//die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $ointernacionQuirofanoPracticaslst = $GLOBALS['dbSQL']->getAll(); // if(intval($idOInternacion)==6){ // print_r("-----sql Q---");print_r("\n"); // print_r($ointernacionQuirofanoPracticaslst);print_r("\n");die;}//die; if(is_array($ointernacionQuirofanoPracticaslst)&&count($ointernacionQuirofanoPracticaslst)>0) { $practicas=array(); $total=count($ointernacionQuirofanoPracticaslst); //OBTENER TOTALES Y FECHA DE LA PRIMER CIRUGIA SI EXISTE if( $sinregistrar ) { $sqlTotTCir = " SELECT SUM(qpr_tiempo_intervencion) as tcir, SUM(qpr_tiempo_ventilacion) as tven FROM quirofano_turnos_practicas AS oiqtpr INNER JOIN quirofano_turnos AS oiqt ON oiqt.qtu_numero = oiqtpr.qtu_numero WHERE oiqt.oi_numero = ".$idOInternacion." AND NOT EXISTS (SELECT 1 FROM ointernacion_practicas_registracion AS oiprareg WHERE oiprareg.oi_numero = oiqt.oi_numero AND oiprareg.oi_item = oiqtpr.oi_item AND oiprareg.pra_codigo = oiqtpr.pra_codigo AND oiprareg.oipr_origen= 'Q' )"; $rsT = $GLOBALS['dbSQL']->Query($sqlTotTCir); if ( $rsT ) { $totalesInfo = $GLOBALS['dbSQL']->getAll(); if(is_array($totalesInfo)&&count($totalesInfo)>0) { $totalestiempo=array( "tvent" => $totalesInfo[0]["tven"] ,"tciru" => $totalesInfo[0]["tcir"] ,"fprimercir" => $ointernacionQuirofanoPracticaslst[0]["FecTsmp"] ); } } } //OBTENER LOS CIE10 DE LA OI //-->$cie10Legajo = getOInternacionCIE10Union($idOInternacion); //BUSCAR EL CIE-10 PRINCIPAL $lstc10Ppal = array(); for($i=0;$i $cie10Legajo[$i]["ant_id"] ,"cod" => $cie10Legajo[$i]["codigo"] ,"denomsf" => $cie10Legajo[$i]["denom"] ,"denom" => $cie10Legajo[$i]["codigo"]." - ".$cie10Legajo[$i]["denom"] //,"org" => 'Q' ); $x = array_push($lstc10Ppal,$item); } } //SI NO SE ENCONTRO UN PRINCIPAL, TOMAR EL PRIMERO (ESTO QUEDO DEPRECADO VIA LANDAMED, YA QUE ESTE EXIGE UN PRINCIPAL, PERO LA WEB PERMITE SIN PRINCIPAL) if(count($lstc10Ppal)<=0) { //Buscar el primer CIE-10 no principal, ya que no se definio nada $item = array( "ant_id" => $cie10Legajo[0]["ant_id"] ,"cod" => $cie10Legajo[0]["codigo"] ,"denomsf" => $cie10Legajo[0]["denom"] ,"denom" => $cie10Legajo[0]["codigo"]." - ".$cie10Legajo[0]["denom"] //,"org" => 'Q' ); $x = array_push($lstc10Ppal,$item); } // print_r("-----CIE10 DE LA INTERNACION GLOBAL---");print_r("\n"); // print_r($cie10Legajo);print_r("\n");die; //ASOCIA A CADA PRACTICA EL LISTADO DE CIE10 for($i=0;$i<$total;$i++) { $continue=false; /*if( trim($ointernacionPracticaslst[$i]["aut_origen"])=='') { $continue=true; } elseif( trim($ointernacionPracticaslst[$i]["aut_origen"])!='' && $ointernacionPracticaslst[$i]["aut_origen"]=='Q' ) { $continue=true; }*/ if( trim($ointernacionQuirofanoPracticaslst[$i]["aut_origen"])=='') { $continue=true; } elseif( trim($ointernacionQuirofanoPracticaslst[$i]["aut_origen"])!='' && $ointernacionQuirofanoPracticaslst[$i]["aut_origen"]=='Q' ) { $continue=true; } if($continue) { $cie10tmp = $cie10Legajo; //SI EL CIE10 DE LA PRACTICA ESTA REGISTRADO, MARCAR TODOS LOS ITEMS CIE10 COMO REGISTRADOS //PARA DICHA PRACTICA (ESTO EVITARA QUE SE REENVIA A APROSS) if( intval($ointernacionQuirofanoPracticaslst[$i]["cie10registrado"])>0 ) { for($j=0;$j0) { $ointernacionQuirofanoPracticaslst[$i]["c10"] = $lstc10Ppal[0]["ant_id"]; } $x = array_push($ointernacionPracticaslstOutput,$ointernacionQuirofanoPracticaslst[$i]); } } } } //-------------------------------- // RETORNAR LISTADO UNIFICADO //-------------------------------- //-->if($idOInternacion==14){print_r($ointernacionPracticaslstOutput);die("yyyyy");} if(is_array($ointernacionPracticaslstOutput)&&count($ointernacionPracticaslstOutput)>=0) { //print_r($ointernacionPracticaslst);print_r("\n");die; return $ointernacionPracticaslstOutput; } //-------------------------------- return false; // print_r($ointernacionPracticaslst);print_r("\n");die; // print_r("---------------------");print_r("\n"); //print_r($rs);die; // print_r("-----OI PRACTICAS---");print_r("\n"); // print_r($ointernacionPracticaslst);print_r("\n"); // if(is_array($ointernacionPracticaslst)&&count($ointernacionPracticaslst)>0) // { // $practicas=array(); // $total=count($ointernacionPracticaslst); // //$cie10Legajo = getOInternacionCIE10($idOInternacion,$ointernacionPracticaslst[$i]["ino"]); // $cie10Legajo = getOInternacionCIE10Union($idOInternacion); // // cie10registrado // $lstc10Ppal = array(); // for($i=0;$i $cie10Legajo[$i]["ant_id"] // ,"cod" => $cie10Legajo[$i]["codigo"] // ,"denomsf" => $cie10Legajo[$i]["denom"] // ,"denom" => $cie10Legajo[$i]["codigo"]." - ".$cie10Legajo[$i]["denom"] // ); // $x = array_push($lstc10Ppal,$item); // } // } // if(count($lstc10Ppal)<=0) // { // //Buscar el primer CIE-10 no principal, ya que no se definio nada // $item = array( // "ant_id" => $cie10Legajo[0]["ant_id"] // ,"cod" => $cie10Legajo[0]["codigo"] // ,"denomsf" => $cie10Legajo[0]["denom"] // ,"denom" => $cie10Legajo[0]["codigo"]." - ".$cie10Legajo[0]["denom"] // ); // $x = array_push($lstc10Ppal,$item); // } // // print_r("-----CIE10 DE LA INTERNACION GLOBAL---");print_r("\n"); // // print_r($cie10Legajo);print_r("\n");die; // for($i=0;$i<$total;$i++) // { // $cie10tmp = $cie10Legajo; // if( intval($ointernacionPracticaslst[$i]["cie10registrado"])>0 ) // { // for($j=0;$j0) // { // $ointernacionPracticaslst[$i]["c10"] = $lstc10Ppal[0]["ant_id"]; // } // } // // print_r("-----ointernacionPracticaslst---");print_r("\n"); // //print_r($ointernacionPracticaslst);print_r("\n");die; // return $ointernacionPracticaslst; // } // return false; } catch ( Exception $e ) { //Error: al ejecutar el metodo //print_r($e->__toString());die; return false; } } //TODO:GINO function getTurnoSinCIE10Registracion($idTurno,$flagActivas=false) { // turnos_cie10_registracion try { $filter = ""; if($flagActivas) { $filter = " AND tur_registrado = 0"; } $sql = "SELECT tcie.tur_id ,tcie.tur_numero ,tcie.tur_tstamp ,tcie.ant_id ,tcie.usu_codigo ,tcie.tur_registrado ,tpcie.ant_codigo AS codigo ,tpcie.ant_denom AS denom FROM turnos_cie10 AS tcie INNER JOIN tipantecedentes AS tpcie ON tpcie.ant_id = tcie.ant_id WHERE tur_numero = ".$idTurno . $filter; $rs = $GLOBALS['dbSQL']->Query($sql); if ( !$rs ) { return false; } $turnoCie10lst = $GLOBALS['dbSQL']->getAll(); //print_r($rs);die; if(count($turnoCie10lst)>0) { return $turnoCie10lst; } return false; } catch ( Exception $e ) { //Error: al ejecutar el metodo //print_r($e->__toString());die; return false; } } function getTurnoInfoApross($idTurno,$flagActivas=false) { try { /*$sql = "SELECT t.inos_cod as codino ,cl.cli_dni as dni ,med.med_cuit as medcuit ,med.med_nombre as medname ,t.tur_numero as turnonro ,CONVERT(varchar, tur_fecha, 23) AS tfecha ,tur_hora AS thora ,(SELECT aut_validacion FROM practicas_autorizar_web AS paw WHERE paw.pra_numero = t.tur_numero AND aut_resultado = 1) as idValidacion ,ISNULL(tur_multiple,0) AS turmultiple FROM turnos AS t INNER JOIN clientes as cl ON cl.cli_codigo = t.cli_codigo INNER JOIN medicos as med ON med.med_codigo = t.med_codigo WHERE t.tur_numero = ".$idTurno;*/ $sql = "SELECT t.inos_cod as codino ,cl.cli_dni as dni ,med.med_cuit as medcuit ,med.med_nombre as medname ,t.tur_numero as turnonro ,CONVERT(varchar, tur_fecha, 23) AS tfecha ,CONCAT(FORMAT(tur_fecha, 'yyyy-MM-ddTHH:mm:ss'),'.000Z') AS ffapross ,tur_hora AS thora ,(SELECT aut_validacion FROM turnos_autorizar_web AS paw WHERE paw.pra_numero = t.tur_numero AND aut_resultado = 1) as idValidacion ,(SELECT (CASE WHEN aut_prefdoc IS NULL THEN 0 ELSE aut_prefdoc END) FROM turnos_autorizar_web AS pawd WHERE pawd.pra_numero = t.tur_numero AND aut_resultado = 1) as aut_prefdoc ,ISNULL(tur_multiple,0) AS turmultiple ,1 as flagFormatHora ,1 as tipo_episodio FROM turnos AS t INNER JOIN clientes as cl ON cl.cli_codigo = t.cli_codigo INNER JOIN medicos as med ON med.med_codigo = t.med_codigo WHERE t.tur_numero = ".$idTurno; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( !$rs ) { return false; } $turno = $GLOBALS['dbSQL']->getAll(); //print_r($turno);die; if(count($turno)>0) { $thora = $turno[0]["thora"]; if(strlen($thora)<4) { $thora = '0'.substr($thora,0,1).':'.substr($thora,1,2); } else { $thora = substr($thora,0,2).':'.substr($thora,2,2); } //Verificar si es un turno multiple if($turno[0]["turmultiple"]=="0"||trim($turno[0]["turmultiple"])=="") { //Obtener registros del CIE10 Asociados si tiene //-->$turno[0]["practicas"] = getTurnoCIE10($turno[0]["turnonro"],$flagActivas); //-->$turno[0]["diagnosticos"] = $turno[0]["practicas"]; //AGREGUE UN CAMPO MAS PARA MANTENER LA COMPATIBILIDAD, SINO DEBERI BORRAR: '$turno[0]["practicas"]' $turno[0]["practicas"] = array(); $item = array( "codigo" => $turno[0]["codino"] ,"fechaing" => $turno[0]["tfecha"]."T".$thora.":00Z" //$turno[0]["tfecha"] ); $x = array_push($turno[0]["practicas"],$item) ; $turno[0]["diagnosticos"] = getTurnoCIE10($turno[0]["turnonro"],$flagActivas); } else { //Obtener registros del CIE10 Asociados si tiene if( $flagActivas ) { //Es un turno multiple $turno[0]["practicas"] = array(); //Turno codigo principal $item = array( "codigo" => $turno[0]["codino"] ,"fechaing" => $turno[0]["tfecha"] ); $x = array_push($turno[0]["practicas"],$item); $turno[0]["diagnosticos"] = getTurnoCIE10($turno[0]["turnonro"],$flagActivas); //Turno practicas restantes $aux = explode(';',$turno[0]["turmultiple"]); for($i=0;$i $aux[$i] ,"fechaing" => $turno[0]["tfecha"] ); $x = array_push($turno[0]["practicas"],$item) ; } } } else { $turno[0]["practicas"] = getTurnoCIE10($turno[0]["turnonro"],$flagActivas); $turno[0]["diagnosticos"] = $turno[0]["practicas"]; //AGREGUE UN CAMPO MAS PARA MANTENER LA COMPATIBILIDAD, SINO DEBERI BORRAR: '$turno[0]["practicas"]' } } // //Obtener registros del CIE10 Asociados si tiene // $turno[0]["practicas"] = getTurnoCIE10($turno[0]["turnonro"],$flagActivas); // $turno[0]["diagnosticos"] = $turno[0]["practicas"]; //AGREGUE UN CAMPO MAS PARA MANTENER LA COMPATIBILIDAD, SINO DEBERI BORRAR: '$turno[0]["practicas"]' // //print_r($turno[0]["practicas"]);die(" <<<<<6"); return $turno[0]; } return false; } catch ( Exception $e ) { //Error: al ejecutar el metodo //print_r($e->__toString());die; return false; } } function getPracticaInfoApross($idPractica,$flagActivas=false) { try { $sql = "SELECT p.inos_cod as codino ,cl.cli_dni as dni ,med.med_cuit as medcuit ,med.med_nombre as medname ,p.pra_numero as practnro ,CONVERT(varchar, pra_fecha, 23) AS tfecha ,CONCAT(FORMAT(pra_fecha, 'yyyy-MM-ddTHH:mm:ss'),'.000Z') AS ffapross ,(SELECT aut_validacion FROM practicas_autorizar_web AS paw WHERE paw.pra_numero = p.pra_numero AND aut_resultado = 1) as idValidacion ,(SELECT (CASE WHEN aut_prefdoc IS NULL THEN 0 ELSE aut_prefdoc END) FROM practicas_autorizar_web AS pawd WHERE pawd.pra_numero = p.pra_numero AND aut_resultado = 1) as aut_prefdoc ,1 as tipo_episodio FROM practica AS p INNER JOIN clientes as cl ON cl.cli_codigo = p.cli_codigo INNER JOIN medicos as med ON med.med_codigo = p.med_codigo WHERE p.pra_numero = ".$idPractica; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( !$rs ) { return false; } $practica = $GLOBALS['dbSQL']->getAll(); //print_r($practica);die; if(count($practica)>0) { //Obtener registros del CIE10 Asociados si tiene if( $flagActivas ) { //Es un practica multiple $practica[0]["practicas"] = array(); //Turno codigo principal $item = array( "codigo" => $practica[0]["codino"] ,"fechaing" => $practica[0]["tfecha"] ); $x = array_push($practica[0]["practicas"],$item); $practica[0]["diagnosticos"] = getPracticaCIE10($practica[0]["practnro"],$flagActivas); // //Turno practicas restantes // $aux = explode(';',$practica[0]["turmultiple"]); // for($i=0;$i $aux[$i] // ,"fechaing" => $practica[0]["tfecha"] // ); // $x = array_push($practica[0]["practicas"],$item) ; // } // } } else { $practica[0]["practicas"] = getPracticaCIE10($practica[0]["practnro"],$flagActivas); $practica[0]["diagnosticos"] = $practica[0]["practicas"]; //AGREGUE UN CAMPO MAS PARA MANTENER LA COMPATIBILIDAD, SINO DEBERI BORRAR: '$practica[0]["practicas"]' } return $practica[0]; } return false; } catch ( Exception $e ) { //Error: al ejecutar el metodo //print_r($e->__toString());die; return false; } } function getOInternacionInfoApross($idOInternacion,$flagActivas=false) { try { $sql = "SELECT oi.pra_codigo as codino ,CONVERT(varchar, oi.oi_fecingreso, 23) as fecha ,FORMAT(oi_tstamp, 'yyyy-MM-ddTHH:mm:ss.000Z') AS ffapross ,cl.cli_dni as dni ,med.med_cuit as medcuit ,med.med_nombre as medname ,oi.oi_numero as oinro ,CONVERT(varchar, oi_fecdes, 23) AS tfecha ,(SELECT TOP 1 aut_validacion FROM ointernacion_autorizar_web AS oiaw WHERE oiaw.oi_numero = oi.oi_numero AND aut_resultado = 1) as idValidacion ,1 as flagFormatHora ,(SELECT ant_id FROM orden_internacion_cie10 AS oicie10 WHERE oicie10.oi_numero = oi.oi_numero) AS ant_id ,(SELECT ant_codigo FROM tipantecedentes WHERE ant_id = (SELECT ant_id FROM orden_internacion_cie10 AS oicie10 WHERE oicie10.oi_numero = oi.oi_numero)) AS cie10 ,(SELECT ant_denom FROM tipantecedentes WHERE ant_id = (SELECT ant_id FROM orden_internacion_cie10 AS oicie10 WHERE oicie10.oi_numero = oi.oi_numero)) AS cie10denom FROM orden_internacion AS oi INNER JOIN clientes as cl ON cl.cli_codigo = oi.cli_codigo INNER JOIN medicos as med ON med.med_codigo = oi.med_codigo WHERE oi.oi_numero = ".$idOInternacion; $sql = "SELECT oi.pra_codigo as codino ,CONVERT(varchar, oi.oi_fecingreso, 23) as fecha ,FORMAT(oi.oi_tstamp, 'yyyy-MM-ddTHH:mm:ss.000Z') AS ffapross ,cl.cli_dni as dni ,med.med_cuit as medcuit ,med.med_nombre as medname ,oi.oi_numero as oinro ,CONVERT(varchar, oi_fecdes, 23) AS tfecha ,(CASE WHEN oi_fecegreso IS NULL THEN CONVERT(varchar, oi_fecdes, 23) ELSE CONVERT(varchar, oi_fecegreso, 23) END) AS tfechaegr ,(SELECT TOP 1 aut_validacion FROM ointernacion_autorizar_web AS oiaw WHERE oiaw.oi_numero = oi.oi_numero AND aut_resultado = 1) as idValidacion ,(SELECT TOP 1 (CASE WHEN aut_prefdoc IS NULL THEN 0 ELSE aut_prefdoc END) FROM ointernacion_autorizar_web AS oiawd WHERE oiawd.oi_numero = oi.oi_numero AND aut_resultado = 1) as aut_prefdoc ,1 as flagFormatHora ,(CASE WHEN oicie10.ant_id IS NULL THEN '' ELSE oicie10.ant_id END) AS ant_id ,(CASE WHEN ta.ant_codigo IS NULL THEN '' ELSE ta.ant_codigo END) AS cie10 ,(CASE WHEN ta.ant_denom IS NULL THEN '' ELSE ta.ant_denom END) AS cie10denom FROM orden_internacion AS oi INNER JOIN clientes as cl ON cl.cli_codigo = oi.cli_codigo INNER JOIN medicos as med ON med.med_codigo = oi.med_codigo LEFT JOIN orden_internacion_cie10 AS oicie10 ON oicie10.oi_numero = oi.oi_numero LEFT JOIN tipantecedentes AS ta ON ta.ant_id = oicie10.ant_id WHERE oi.oi_numero = ".$idOInternacion; /*$sql = "SELECT oi.pra_codigo as codino ,CONVERT(varchar, oi.oi_fecingreso, 23) as fecha ,FORMAT(oi_tstamp, 'yyyy-MM-ddTHH:mm:ss.000Z') AS ffapross ,cl.cli_dni as dni ,med.med_cuit as medcuit ,med.med_nombre as medname ,oi.oi_numero as oinro ,CONVERT(varchar, oi_fecdes, 23) AS tfecha ,(SELECT TOP 1 aut_validacion FROM ointernacion_autorizar_web AS oiaw WHERE oiaw.oi_numero = oi.oi_numero AND aut_resultado = 1) as idValidacion ,1 as flagFormatHora ,(SELECT ant_id FROM ointernacion_autorizar_web AS oicie10 WHERE oicie10.oi_numero = oi.oi_numero) AS ant_id ,(SELECT ant_codigo FROM tipantecedentes WHERE ant_id = (SELECT ant_id FROM ointernacion_autorizar_web AS oicie10 WHERE oicie10.oi_numero = oi.oi_numero)) AS cie10 ,(SELECT ant_denom FROM tipantecedentes WHERE ant_id = (SELECT ant_id FROM ointernacion_autorizar_web AS oicie10 WHERE oicie10.oi_numero = oi.oi_numero)) AS cie10denom FROM orden_internacion AS oi INNER JOIN clientes as cl ON cl.cli_codigo = oi.cli_codigo INNER JOIN medicos as med ON med.med_codigo = oi.med_codigo WHERE oi.oi_numero = ".$idOInternacion;*/ //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( !$rs ) { return false; } $practica = $GLOBALS['dbSQL']->getAll(); //print_r($practica);die; if(is_array($practica)&&count($practica)>0) { //Obtener registros del CIE10 Asociados si tiene if( $flagActivas ) { //Es un practica multiple $practica[0]["practicas"] = array(); //Turno codigo principal $item = array( "codigo" => $practica[0]["codino"] ,"fechaing" => $practica[0]["tfecha"] //,"fechaegr" => $practica[0]["tfechaegr"] ); $x = array_push($practica[0]["practicas"],$item); $practica[0]["diagnosticos"] = getOInternacionCIE10($practica[0]["oinro"],$flagActivas); // //Turno practicas restantes // $aux = explode(';',$practica[0]["turmultiple"]); // for($i=0;$i $aux[$i] // ,"fechaing" => $practica[0]["tfecha"] // ); // $x = array_push($practica[0]["practicas"],$item) ; // } // } } else { $practica[0]["practicas"] = getOInternacionCIE10($practica[0]["oinro"],$flagActivas); $practica[0]["diagnosticos"] = $practica[0]["practicas"]; //AGREGUE UN CAMPO MAS PARA MANTENER LA COMPATIBILIDAD, SINO DEBERI BORRAR: '$practica[0]["practicas"]' } return $practica[0]; } return false; } catch ( Exception $e ) { //Error: al ejecutar el metodo //print_r($e->__toString());die; return false; } } function getGuardiaInfoApross($idGuardia,$flagActivas=false) { try { // practnro $sql = "SELECT g.pra_codigo as codino ,cl.cli_dni as dni ,med.med_cuit as medcuit ,med.med_nombre as medname ,g.gua_numero as guanro ,CONVERT(varchar, gua_fecha, 23) AS tfecha ,CONCAT(FORMAT(gua_fecha, 'yyyy-MM-ddTHH:mm:ss'),'.000Z') AS ffapross ,(SELECT aut_validacion FROM guardia_autorizar_web AS gaw WHERE gaw.gua_numero = g.gua_numero AND aut_resultado = 1) as idValidacion ,(SELECT (CASE WHEN aut_prefdoc IS NULL THEN 0 ELSE aut_prefdoc END) FROM guardia_autorizar_web AS pawd WHERE pawd.gua_numero = g.gua_numero AND aut_resultado = 1) as aut_prefdoc ,1 as tipo_episodio FROM guardia_atenciones AS g INNER JOIN clientes as cl ON cl.cli_codigo = g.cli_codigo INNER JOIN medicos as med ON med.med_codigo = g.med_codigo WHERE g.gua_numero = ".$idGuardia; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( !$rs ) { return false; } $practica = $GLOBALS['dbSQL']->getAll(); //print_r($practica);die; if(is_array($practica)&&count($practica)>0) { //Obtener registros del CIE10 Asociados si tiene if( $flagActivas ) { //Es un practica multiple $practica[0]["practicas"] = array(); //Turno codigo principal $item = array( "codigo" => $practica[0]["codino"] ,"fechaing" => $practica[0]["tfecha"] ); $x = array_push($practica[0]["practicas"],$item); $practica[0]["diagnosticos"] = getGuardiaCIE10($practica[0]["guanro"],$flagActivas); } else { // $practica[0]["practicas"] = getGuardiaCIE10($practica[0]["guanro"],$flagActivas); // $practica[0]["diagnosticos"] = $practica[0]["practicas"]; //AGREGUE UN CAMPO MAS PARA MANTENER LA COMPATIBILIDAD, SINO DEBERI BORRAR: '$practica[0]["practicas"]' $practica[0]["practicas"] = array(); //Turno codigo principal $item = array( "codigo" => $practica[0]["codino"] ,"fechaing" => $practica[0]["tfecha"] ); $x = array_push($practica[0]["practicas"],$item); $practica[0]["practicas"] = $practica[0]["practicas"]; //AGREGUE UN CAMPO MAS PARA MANTENER LA COMPATIBILIDAD, SINO DEBERI BORRAR: '$practica[0]["practicas"]' $practica[0]["diagnosticos"] = getGuardiaCIE10($practica[0]["guanro"],$flagActivas); } return $practica[0]; } return false; } catch ( Exception $e ) { //Error: al ejecutar el metodo //print_r($e->__toString());die; return false; } } function grabarAutorizacionPeticion($turnoId,$tipo,$dataRes,$requestBase64,$usuario,$practInfo=false,$cie10info=false,$prefijoDoc=false) { // print_r("*******");print_r("\n"); // print_r($dataRes["res"]["motivo"]);print_r("\n"); // //var_dump($dataRes["res"]); // print_r("*******");print_r("\n"); /* Array ( [numeroafiliado] => [result] => False [motivo] => numeroAfiliado 5274735 is an invalid apross affiliate number or dni [idValidacion] => ) */ $motivo = $dataRes["res"]["motivo"]; $idVal = (isset($dataRes["res"]["idValidacion"])?$dataRes["res"]["idValidacion"]:''); $resultado = 0; if($dataRes["r"]===1) { //Exito de conexion if(strtolower($dataRes["res"]["result"])=='true') { //Exito de autorización $dataRes["res"]["motivo"]= ''; $resultado = 1; } else { //Error de autorización $dataRes["res"] = array(); $dataRes["res"]["motivo"] = (isset($dataRes["e"])?$dataRes["e"]:""); $dataRes["res"]["idValidacion"] = ''; } } else { //Error de conexion $dataRes["res"] = array(); $dataRes["res"]["motivo"] = 'ERROR DE CONEXION, APROSS NO DISPONIBLE: ' .(isset($dataRes["e"])?$dataRes["e"]:""); $dataRes["res"]["idValidacion"] = ''; } if( $resultado == 1 ) { switch($tipo) { case APROSS_TIPO_TURNO: { $sql = "INSERT INTO dbo.turnos_autorizar_web ( pra_numero ,aut_tstamp ,aut_resultado ,aut_motivo ,aut_validacion ,aut_request ,aut_response ,usu_codigo ,aut_tipo ,ant_id ,ant_codigo ,aut_prefdoc ) VALUES ('".addslashes($turnoId)."' ,GETDATE() ,'".$resultado."' ,'".$motivo."' ,'".$idVal."' ,'".$requestBase64."' ,'".encodeDataB64($dataRes["res"])."' ,".$usuario." ,'".$tipo."' ,'".$cie10info["ant_id"]."' ,'".$cie10info["ant_codigo"]."' ,".(!$prefijoDoc?0:1)." )"; } break; case APROSS_TIPO_PRACTICA: { $sql = "INSERT INTO dbo.practicas_autorizar_web ( pra_numero ,aut_tstamp ,aut_resultado ,aut_motivo ,aut_validacion ,aut_request ,aut_response ,usu_codigo ,aut_tipo ,ant_id ,ant_codigo ,aut_prefdoc ) VALUES ('".addslashes($turnoId)."' ,GETDATE() ,'".$resultado."' ,'".$motivo."' ,'".$idVal."' ,'".$requestBase64."' ,'".encodeDataB64($dataRes["res"])."' ,".$usuario." ,'".$tipo."' ,'".$cie10info["ant_id"]."' ,'".$cie10info["ant_codigo"]."' ,".(!$prefijoDoc?0:1)." )"; } break; case APROSS_TIPO_GUARDIA: { $sql = "INSERT INTO dbo.guardia_autorizar_web ( gua_numero ,aut_tstamp ,aut_resultado ,aut_motivo ,aut_validacion ,aut_request ,aut_response ,usu_codigo ,aut_tipo ,ant_id ,ant_codigo ,aut_prefdoc ) VALUES ('".addslashes($turnoId)."' ,GETDATE() ,'".$resultado."' ,'".$motivo."' ,'".$idVal."' ,'".$requestBase64."' ,'".encodeDataB64($dataRes["res"])."' ,".$usuario." ,'".$tipo."' ,'".$cie10info["ant_id"]."' ,'".$cie10info["ant_codigo"]."' ,".(!$prefijoDoc?0:1)." )"; } break; /* case APROSS_TIPO_INTERNACION: { $sql = "INSERT INTO dbo.ointernacion_autorizar_web ( [oi_numero] ,[oi_item] ,[pra_codigo] ,[aut_tstamp] ,[aut_resultado] ,[aut_motivo] ,[aut_validacion] ,[aut_request] ,[aut_response] ,[usu_codigo] ,aut_tipo ,ant_id ) VALUES ( '".addslashes($practInfo["oinro"])."' ,'".addslashes($practInfo["item"])."' ,'".addslashes($practInfo["ino"])."' ,GETDATE() ,'".$resultado."' ,'".$motivo."' ,'".$idVal."' ,'".$requestBase64."' ,'".encodeDataB64($dataRes["res"])."' ,".$usuario." ,'".$tipo."' ,'".addslashes($practInfo["ant_id"])."')"; } break; */ case APROSS_TIPO_INTERNACION: { /* $sql = "INSERT INTO dbo.ointernacion_autorizar_web ( [oi_numero] ,[oi_item] ,[pra_codigo] ,[aut_tstamp] ,[aut_resultado] ,[aut_motivo] ,[aut_validacion] ,[aut_request] ,[aut_response] ,[usu_codigo] ,aut_tipo ,ant_id ) VALUES ( '".addslashes($practInfo["oinro"])."' ,1 ,'".addslashes($practInfo["codino"])."' ,GETDATE() ,'".$resultado."' ,'".$motivo."' ,'".$idVal."' ,'".$requestBase64."' ,'".encodeDataB64($dataRes["res"])."' ,".$usuario." ,'".$tipo."' ,'".addslashes($practInfo["ant_id"])."' )"; */ $sql = "INSERT INTO dbo.ointernacion_autorizar_web ( oi_numero ,oi_item ,pra_codigo ,aut_tstamp ,aut_resultado ,aut_motivo ,aut_validacion ,aut_request ,aut_response ,usu_codigo ,aut_tipo ,ant_id ,aut_prefdoc ) VALUES ( '".addslashes($turnoId)."' ,1 ,'".addslashes($practInfo["codino"])."' ,GETDATE() ,'".$resultado."' ,'".$motivo."' ,'".$idVal."' ,'".$requestBase64."' ,'".encodeDataB64($dataRes["res"])."' ,".$usuario." ,'".$tipo."' ,'".addslashes($practInfo["ant_id"])."' ,".(!$prefijoDoc?0:1)." )"; } break; } //print_r($sql);print_r("\n"); $rs = $GLOBALS['dbSQL']->Query($sql,true); if ( $rs ) { switch($tipo) { case APROSS_TIPO_TURNO: { $idAutorizacion = $GLOBALS['dbSQL']->getLastId('turnos_autorizar_web','aut_id'); } break; case APROSS_TIPO_PRACTICA: { $idAutorizacion = $GLOBALS['dbSQL']->getLastId('practicas_autorizar_web','aut_id'); } break; case APROSS_TIPO_GUARDIA: { $idAutorizacion = $GLOBALS['dbSQL']->getLastId('guardia_autorizar_web','aut_id'); } break; case APROSS_TIPO_INTERNACION: { $idAutorizacion = $GLOBALS['dbSQL']->getLastId('ointernacion_autorizar_web','aut_id'); } break; } return array($idAutorizacion,$idVal); } } return array(false,false); } function getCie10ByCod($antId) { $sql = "SELECT ant_codigo FROM tipantecedentes WHERE ant_id = '".$antId."'"; $rs = $GLOBALS['dbSQL']->Query($sql); if ( !$rs ) { return false; } $codigos = $GLOBALS['dbSQL']->getAll(); if(is_array($codigos)) { return $codigos[0]["ant_codigo"]; } return false; } function getMedCUITByCod($medId) { $sql = "SELECT med_cuit FROM medicos WHERE med_codigo = '".$medId."'"; $rs = $GLOBALS['dbSQL']->Query($sql); if ( !$rs ) { return false; } $medicos = $GLOBALS['dbSQL']->getAll(); if(is_array($medicos)) { return $medicos[0]["med_cuit"]; } return false; } function getPracticasOINoRegistradas($idOInternacion) { $ointernacionPracticaslst = array(); // ,ino.inos_denom as denom // ,med.med_nombre as meddenom // ,ISNULL(oiaw.aut_validacion,0) as registrado // ,(CASE WHEN oiaw.aut_validacion IS NULL THEN '' ELSE oiaw.aut_validacion END) as idval // ,(CASE WHEN oiaw.ant_id IS NULL THEN '' ELSE oiaw.ant_id END) as ant_id // ,(CASE WHEN oiaw.ant_id IS NULL THEN '' ELSE (SELECT CONCAT(ant_codigo,'-',ant_denom) FROM tipantecedentes as c10 WHERE c10.ant_id= oiaw.ant_id) END) as cie10denom // ,(CASE WHEN oiaw.aut_origen IS NULL THEN '' ELSE oiaw.aut_origen END) as aut_origen $sql = "SELECT oipr.oi_numero as oinro ,oipr.oi_item as item ,oipr.nom_codigo as nom ,oipr.pra_codigo as ino ,oipr.med_codigo as medcod ,CONVERT(varchar, oip_fecha, 103) AS fecha ,CONVERT(varchar, oip_fecha, 23) AS tfecha ,0 as cie10registrado ,0 as itemselected ,'' as token ,'' as c10 ,'' as err ,'' as succes ,0 as c10reg ,'I' as prorigen ,'' AS fcirugia ,'' AS tfcirugia ,'' as tven ,'' as tcir FROM oi_practicas AS oipr WHERE oipr.oi_numero = '".addslashes($idOInternacion)."' AND NOT EXISTS (SELECT 1 FROM ointernacion_practicas_registracion AS oiprreg WHERE oiprreg.oi_numero = oipr.oi_numero AND oiprreg.oi_item = oipr.oi_item AND oiprreg.pra_codigo = oipr.pra_codigo ) ORDER BY oip_fecha DESC"; //print_r($sql);print_r("\n");die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( $rs ) { $ointernacionPracticaslst = $GLOBALS['dbSQL']->getAll(); /*$ointernacionPracticaslstTmp = $GLOBALS['dbSQL']->getAll(); if(is_array($ointernacionPracticaslstTmp)&&count($ointernacionPracticaslstTmp)>0) { for($i=0;$iQuery($sql); if ( $rs ) { $antidCodigo = $GLOBALS['dbSQL']->getAll(); if(is_array($antidCodigo)&&count($antidCodigo)>0) { $codigo = $antidCodigo[0]["ant_codigo"]; } } return $codigo; } function autorizarPrestacion($turnoId,$tipo,$token,$usuario,$pracodigo='',$cie10Sel=false,$prefijoDoc=false) { $pracodigo = ''; //UTILIOZADA SOLO PARA INTERNACION switch($tipo) { case APROSS_TIPO_TURNO: {$turnoInfo = getTurnoInfoApross($turnoId);}break; case APROSS_TIPO_PRACTICA: {$turnoInfo = getPracticaInfoApross($turnoId);}break; case APROSS_TIPO_GUARDIA: {$turnoInfo = getGuardiaInfoApross($turnoId);}break; case APROSS_TIPO_INTERNACION: {$turnoInfo = getOInternacionInfoApross($turnoId);}break; } require_once('apross.php'); $apross = new APROSS(); switch($tipo) { case APROSS_TIPO_TURNO: case APROSS_TIPO_PRACTICA: case APROSS_TIPO_GUARDIA: { //print_r($turnoInfo);die; if( $turnoInfo ) { //Verificar turno multiple //if($turnoInfo[]) $cie10Codigo = getCie10Codigo($cie10Sel); //print_r("[".$cie10Codigo."]");die("ppppp"); $data = array( "codino" => $turnoInfo["codino"] ,"medcuit" => $turnoInfo["medcuit"] ,"dni" => $turnoInfo["dni"] ,"cie10" => $cie10Codigo // $turnoInfo["diagnosticos"][0]["codigo"] ,"token" => $token ,"prefijoDoc" => $prefijoDoc ); $response = false; $request = false; //print_r($data);die; if( !$GLOBALS['APROSS_TEST'] ) { $resultado = $apross->getAutorizacion($data,$response,$request); } else { $response = array( "r" => 1 ,"res" => array( "numeroafiliado"=> $turnoInfo["dni"] ,"motivo" => 'La cita ha sido confirmada' ,"idValidacion" => randomText(19) // '2yub6sdsd23m4cz4q6og' ,"result" => "true" )); } grabarLogApross($response,"autorizarPrestacion"); // print_r("--RESULTADO--");print_r("\n"); // print_r($resultado);print_r("\n"); // print_r("--DATA--");print_r("\n"); // print_r($data);print_r("\n"); // print_r("--RESPONSE--");print_r("\n"); // print_r($response);print_r("\n"); // print_r("--REQUEST--");print_r("\n"); // print_r($request);print_r("\n"); //if($response["r"]===1) /* [r] => 1 [res] => Array ( [numeroafiliado] => [result] => False [motivo] => Error al obtener la identidad de APROSS. Request Timeout [idValidacion] => ) */ if(isset($response["r"])&&$response["r"]===1&&isset($response["res"]["idValidacion"])&&$response["res"]["idValidacion"]!=="") { //Se obtuvo comunicacion y respuesta del APROSS $cie10info = array("ant_codigo"=>$cie10Codigo,"ant_id"=>$cie10Sel); list($idAutorizacion,$idValidacion) = grabarAutorizacionPeticion($turnoId,$tipo,$response,encodeDataB64($request),$usuario,$pracodigo,$cie10info,$prefijoDoc); if( $idAutorizacion ) { //Exito de autorización $resultado = array( "r" => 1 ,"id" => $idValidacion ,"idR" => $idAutorizacion ,"m" => '' ); } else { //Error de autorización //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_AUTORIZAR,$turnoId,$tipo,$response,$usuario,1); $errorDes = ''; if(isset($response["res"]["response"]["description"])) { $errorDes = $response["res"]["response"]["description"]; } //Error detectado $resultado = array( "r" => -1 ,"m" => $errorDes ); } } elseif(isset($response["r"])&&$response["r"]==1&&isset($response["res"]["result"])&&strtolower($response["res"]["result"])=="false") { //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_AUTORIZAR,$turnoId,$tipo,$response,$usuario,2); $errorDes = ''; if(isset($response["res"]["motivo"])) { $errorDes = $response["res"]["motivo"]; } //Error detectado $resultado = array( "r" => -2 ,"m" => $errorDes ); } elseif($response["r"]===0) { //No se obtuvo comunicacion, respuesta o fallo del del APROSS //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_AUTORIZAR,$turnoId,$tipo,$response,$usuario,3); $errorDes = ''; if(isset($response["res"]["response"]["description"])) { $errorDes = $response["res"]["response"]["description"]; } //Error detectado $resultado = array( "r" => -2 ,"m" => $errorDes ); } elseif($response["r"]===-1) { //Error fatal //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_AUTORIZAR,$turnoId,$tipo,$response,$usuario,4); $resultado = array( "r" => -3 ,"m" => "ERROR DE CONEXION, APROSS NO DISPONIBLE: " . (isset($response["e"])?$response["e"]:'') ); } else { //Error fatal sin definir //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_AUTORIZAR,$turnoId,$tipo,$response,$usuario,5); $resultado = array( "r" => -4 ,"m" => "ERROR DE CONEXION, APROSS NO DISPONIBLE: " . (isset($response["e"])?$response["e"]:'') ); } return $resultado; } } break; /* case APROSS_TIPO_INTERNACION: { $continue = true; $resultadoLst = array(); $resultadoErrorLst = array(); //LISTADO DE PRACTICAS DE LA ORDEN if( isset($_REQUEST["lstItems"]) && !empty($_REQUEST["lstItems"]) && !is_null($_REQUEST["lstItems"]) ) { $lstPracticastmp = json_decode($_REQUEST["lstItems"]); //print_r($lstPracticastmp);die; $lstPracticas = array(); for($i=0;$i $lstPracticastmp[$i]->pr ,"nom" => $lstPracticastmp[$i]->nom ,"item" => $lstPracticastmp[$i]->item ,"medcod"=> $lstPracticastmp[$i]->medcod ,"oinro" => $lstPracticastmp[$i]->oinro ,"ant_id"=> $lstPracticastmp[$i]->ant_id ,"token" => $lstPracticastmp[$i]->tk //,"org" => $lstPracticastmp[$i]->org ); $x = array_push($lstPracticas,$item); //print_r($lstPracticas);die; } for($i=0;$i $lstPracticas[$i]["ino"] //$turnoInfo["codino"] ,"medcuit" => getMedCUITByCod($lstPracticas[$i]["medcod"]) //$turnoInfo["medcuit"] ,"dni" => $turnoInfo["dni"] ,"cie10" => getCie10ByCod($lstPracticas[$i]["ant_id"]) //$turnoInfo["diagnosticos"][0]["codigo"] ,"token" => $lstPracticas[$i]["token"] //,"flagQ" => false ); // print_r($data);die("------------wwww--------"); // die; $response = false; $request = false; //print_r($data);print_r("\n");die; $resultado = $apross->getAutorizacion($data,$response,$request); grabarLogApross($response,"autorizarPrestacion"); if(isset($response["r"])&&$response["r"]===1&&isset($response["res"]["idValidacion"])&&$response["res"]["idValidacion"]!=="") { //Se obtuvo comunicacion y respuesta del APROSS list($idAutorizacion,$idValidacion) = grabarAutorizacionPeticion( $turnoId, $tipo, $response, encodeDataB64($request), $usuario, $lstPracticas[$i] ); if( $idAutorizacion ) { //Exito de autorización $resultado = array( "r" => 1 ,"id" => $idValidacion ,"idR" => $idAutorizacion ,"m" => '' ,"p" => $lstPracticas[$i] ); $x = array_push($resultadoLst,$resultado); } else { //Error de autorización $continue=false; //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_AUTORIZAR,$turnoId,$tipo,$response,$usuario,1,$lstPracticas[$i]); $errorDes = ''; if(isset($response["res"]["response"]["description"])) { $errorDes = $response["res"]["response"]["description"]; } //Error detectado $resultado = array( "r" => -1 ,"p" => $lstPracticas[$i] ,"m" => $errorDes ); $x = array_push($resultadoErrorLst,$resultado); } } elseif(isset($response["r"])&&$response["r"]==1&&isset($response["res"]["result"])&&strtolower($response["res"]["result"])=="false") { //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_AUTORIZAR,$turnoId,$tipo,$response,$usuario,2,$lstPracticas[$i]); $continue=false; $errorDes = ''; if(isset($response["res"]["motivo"])) { $errorDes = $response["res"]["motivo"]; } //Error detectado $resultado = array( "r" => -2 ,"p" => $lstPracticas[$i] ,"m" => $errorDes ); //print_r($resultado);die("----33333"); $x = array_push($resultadoErrorLst,$resultado); } elseif($response["r"]===0) {//print_r($response);die("----4444"); //No se obtuvo comunicacion, respuesta o fallo del del APROSS $continue=false; //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_AUTORIZAR,$turnoId,$tipo,$response,$usuario,3,$lstPracticas[$i]); $errorDes = ''; if(isset($response["res"]["response"]["description"])) { $errorDes = $response["res"]["response"]["description"]; } //Error detectado $resultado = array( "r" => -2 ,"p" => $lstPracticas[$i] ,"m" => $errorDes ); $x = array_push($resultadoErrorLst,$resultado); } elseif($response["r"]===-1) {//print_r($response);die("----5555"); //Error fatal $continue=false; //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_AUTORIZAR,$turnoId,$tipo,$response,$usuario,4,$lstPracticas[$i]); $resultado = array( "r" => -3 ,"p" => $lstPracticas[$i] ,"m" => "ERROR DE CONEXION, APROSS NO DISPONIBLE: " . (isset($response["e"])?$response["e"]:'') ); $x = array_push($resultadoErrorLst,$resultado); } else {//print_r($response);die("----6666"); //Error fatal sin definir //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_AUTORIZAR,$turnoId,$tipo,$response,$usuario,5,$lstPracticas[$i]); $continue=false; $resultado = array( "r" => -4 ,"p" => $lstPracticas[$i] ,"m" => "ERROR DE CONEXION, APROSS NO DISPONIBLE: " . (isset($response["e"])?$response["e"]:'') ); $x = array_push($resultadoErrorLst,$resultado); } } } $resoutput = array( "success" => $resultadoLst ,"error" => $resultadoErrorLst ); // print_r("--RESULTADO--");print_r("\n"); // print_r($resoutput);print_r("\n"); return $resoutput; } break; */ case APROSS_TIPO_INTERNACION: { $continue = true; $resultadoLst = array(); $resultadoErrorLst = array(); $cie10Sel = $_REQUEST["lstItems"]; //EL CIE10 SELECCIONADO if( !isset($_REQUEST["lstItems"]) || is_null($_REQUEST["lstItems"]) || empty($_REQUEST["lstItems"]) || $_REQUEST["lstItems"]=="" ) { $cie10Sel = $turnoInfo["cie10"]; } else { $cie10Sel = $_REQUEST["lstItems"]; } $data = array( "codino" => $turnoInfo["codino"] ,"fecha" => $turnoInfo["ffapross"] ,"medcuit" => $turnoInfo["medcuit"] //getMedCUITByCod($lstPracticas[$i]["medcod"]) //$turnoInfo["medcuit"] ,"dni" => $turnoInfo["dni"] ,"cie10" => $cie10Sel //getCie10ByCod($lstPracticas[$i]["ant_id"]) //$turnoInfo["diagnosticos"][0]["codigo"] ,"ant_id" => $turnoInfo["ant_id"] ,"token" => $token ,"prefijoDoc" => $prefijoDoc ); $response = false; $request = false; //print_r($data);print_r("\n");die; if( !$GLOBALS['APROSS_TEST'] ) { $resultado = $apross->getAutorizacion($data,$response,$request); grabarLogApross($response,"autorizarPrestacion"); } else { $response = array( "r" => 1 ,"res" => array( "numeroafiliado"=> $turnoInfo["dni"] ,"motivo" => 'La cita ha sido confirmada' ,"idValidacion" => randomText(19) // '2yub6sdsd23m4cz4q6og' ,"result" => "true" )); } if(isset($response["r"])&&$response["r"]===1&&isset($response["res"]["idValidacion"])&&$response["res"]["idValidacion"]!=="") { //print_r($oiInfo);print_r("\n");die; //Se obtuvo comunicacion y respuesta del APROSS list($idAutorizacion,$idValidacion) = grabarAutorizacionPeticion( $turnoId, $tipo, $response, encodeDataB64($request), $usuario, $turnoInfo, //$lstPracticas[$i] $prefijoDoc ); if( $idAutorizacion ) { //Exito de autorización $resultado = array( "r" => 1 ,"id" => $idValidacion ,"idR" => $idAutorizacion ,"m" => '' ,"p" => $turnoInfo //$lstPracticas[$i] ); //-->$x = array_push($resultadoLst,$resultado); } else { //Error de autorización $continue=false; //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_AUTORIZAR,$turnoId,$tipo,$response,$usuario,1,$turnoInfo); $errorDes = ''; if(isset($response["res"]["response"]["description"])) { $errorDes = $response["res"]["response"]["description"]; } //Error detectado $resultado = array( "r" => -1 ,"p" => $turnoInfo //$lstPracticas[$i] ,"m" => $errorDes ); //-->$x = array_push($resultadoErrorLst,$resultado); } } elseif(isset($response["r"])&&$response["r"]==1&&isset($response["res"]["result"])&&strtolower($response["res"]["result"])=="false") { //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_AUTORIZAR,$turnoId,$tipo,$response,$usuario,2,$turnoInfo); $continue=false; $errorDes = ''; if(isset($response["res"]["motivo"])) { $errorDes = $response["res"]["motivo"]; } //Error detectado $resultado = array( "r" => -2 ,"p" => $turnoInfo //$lstPracticas[$i] ,"m" => $errorDes ); //print_r($resultado);die("----33333"); $x = array_push($resultadoErrorLst,$resultado); } elseif($response["r"]===0) {//print_r($response);die("----4444"); //No se obtuvo comunicacion, respuesta o fallo del del APROSS $continue=false; //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_AUTORIZAR,$turnoId,$tipo,$response,$usuario,3,$turnoInfo); $errorDes = ''; if(isset($response["res"]["response"]["description"])) { $errorDes = $response["res"]["response"]["description"]; } //Error detectado $resultado = array( "r" => -2 ,"p" => $turnoInfo //$lstPracticas[$i] ,"m" => $errorDes ); //-->$x = array_push($resultadoErrorLst,$resultado); } elseif($response["r"]===-1) {//print_r($response);die("----5555"); //Error fatal $continue=false; //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_AUTORIZAR,$turnoId,$tipo,$response,$usuario,4,$turnoInfo); $resultado = array( "r" => -3 ,"p" => $turnoInfo //$lstPracticas[$i] ,"m" => "ERROR DE CONEXION, APROSS NO DISPONIBLE: " . (isset($response["e"])?$response["e"]:'') ); //-->$x = array_push($resultadoErrorLst,$resultado); } else {//print_r($response);die("----6666"); //Error fatal sin definir //print_r($turnoInfo);print_r("\n");die; //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_AUTORIZAR,$turnoId,$tipo,$response,$usuario,5,$turnoInfo); $continue=false; $resultado = array( "r" => -4 ,"p" => $turnoInfo //$lstPracticas[$i] ,"m" => "ERROR DE CONEXION, APROSS NO DISPONIBLE: " . (isset($response["e"])?$response["e"]:'') ); //-->$x = array_push($resultadoErrorLst,$resultado); } // $resoutput = array( // "success" => $resultadoLst // ,"error" => $resultadoErrorLst // ); // print_r("--RESULTADO--");print_r("\n"); // print_r($resoutput);print_r("\n"); //return $resoutput; return $resultado; } break; } return false; } function autorizarPrestacionAprossTurno(&$resultInfo) { if( isset($_REQUEST["t"]) && !empty($_REQUEST["t"]) && !is_null($_REQUEST["t"]) && isset($_REQUEST["tp"]) && !empty($_REQUEST["tp"]) && !is_null($_REQUEST["tp"]) && isset($_REQUEST["tk"]) && !empty($_REQUEST["tk"]) && !is_null($_REQUEST["tk"]) && isset($_REQUEST["token"]) && !is_null($_REQUEST["token"]) ) { // print_r(json_decode($_REQUEST["lstItems"]));die; // print_r($_REQUEST); // die; //Validar el Token $tokenInfo = false; $result = false; $continue = true; $userId = validarTokenFast($resultInfo); if( $userId ) { $pracodigo=''; if( isset($_REQUEST["pr"]) && !empty($_REQUEST["pr"]) && !is_null($_REQUEST["pr"]) ) { $pracodigo = $_REQUEST["pr"]; } $cie10Sel=false; if( isset($_REQUEST["cie10"]) && !empty($_REQUEST["cie10"]) && !is_null($_REQUEST["cie10"]) ) { $cie10Sel = $_REQUEST["cie10"]; } $prefdoc=false; if( isset($_REQUEST["pfdoc"]) && !is_null($_REQUEST["pfdoc"]) ) { $prefdoc = ($_REQUEST["pfdoc"]==1?true:false); } $resultado = autorizarPrestacion($_REQUEST["t"],$_REQUEST["tp"],$_REQUEST["tk"],$userId,$pracodigo,$cie10Sel,$prefdoc); if( $resultado ) { //Retornar informacion de la autorizacion $resultInfo['code'] = 0; $resultInfo['data'] = $resultado; } else { $resultInfo['code'] = 1; $resultInfo['errorDes'] = "SE PRODUJO UN ERROR EN EL SISTEMA AL COMUNICARSE CON APROSS."; } } } else { $resultInfo['code'] = 1; $resultInfo['errorDes'] = "Parametros Faltantes"; } return true; } function grabarRegistracionPrestacionesResultado($turnoInfo,$turnoId,$tipo,$dataRes,$requestBase64,$usuario,&$resultInfo,$praInfo=false) { try { //Para cada practica: // > Marcar como registrado si fue exitoso: tur_registrado = 1 // > Marcar si fue error: tur_error_registrar = 1 // > Marcar si fue procesada: tur_procesado = 1 // > Asociar autorización: tur_autorizacion (token previo) // > Grabar fecha de la autorización: tur_fecha_regsitracion grabarLogApross($turnoInfo,"grabarRegistracionPrestacionesResultado_turnoInfo"); grabarLogApross($turnoId,"grabarRegistracionPrestacionesResultado_turnoId"); grabarLogApross($tipo,"grabarRegistracionPrestacionesResultado_tipo"); grabarLogApross($dataRes,"grabarRegistracionPrestacionesResultado_dataRes"); // print_r("---------PARAMETROS[grabarRegistracionPrestacionesResultado]---------------");print_r("\n"); // print_r($turnoInfo);print_r("\n");die; // print_r("_______________________");print_r("\n"); // print_r("turnoId[$turnoId]");print_r("\n"); // print_r("_______________________");print_r("\n"); // print_r($dataRes);print_r("\n"); // print_r("_______________________");print_r("\n"); // print_r("usuario[$usuario]");print_r("\n"); // print_r("_______________________");print_r("\n"); // print_r("requestBase64[$requestBase64]");print_r("\n"); // print_r("----------------------------");print_r("\n"); $sqlLst = array(); $continue = true; $error = 0; $registrado = 0; //print_r($dataRes);die(" <<<<<< zzzzz"); if( isset($dataRes["res"]["response"]["codigo"])&& intval($dataRes["res"]["response"]["codigo"])===0 ) { //Se proceso ok $error = 0; $registrado = 1; $resultInfo["res"] = array(); $resultInfo["res"]["motivo"] = ''; $resultInfo["res"]["cod"] = 0; } else { //Se produjo un error $error = 1; $registrado = 0; $resultInfo["res"] = array(); $resultInfo["res"]["motivo"] = $dataRes["res"]["response"]["description"]; $resultInfo["res"]["cod"] = $dataRes["res"]["response"]["codigo"]; } // ---------------------------------------------------------- switch($tipo) { case APROSS_TIPO_TURNO: { $sqlResultadoProcesamiento = "INSERT INTO dbo.turnos_cie10_registracion ( tur_numero ,turcie10_idvalidacion ,turcie10_request ,turcie10_response ,turcie10_fecha ) VALUES ( '".addslashes($turnoId)."' ,'".$turnoInfo["idValidacion"]."' ,'".$requestBase64."' ,'".encodeDataB64($dataRes["res"])."' ,GETDATE() )"; $template = "UPDATE turnos_cie10 SET tur_procesado = 1 ,tur_error_registrar = ".$error." ,tur_registrado = ".$registrado." ,tur_autorizacion = '".$turnoInfo["idValidacion"]."' ,tur_fecha_regsitracion = GETDATE() ,tur_fecha_regsitracion_apross= '".$dataRes["res"]["response"]["description"]["created_at"]."' WHERE tur_id = {TURID} AND ant_id = {CIE10ID}"; } break; case APROSS_TIPO_PRACTICA: { $sqlResultadoProcesamiento = "INSERT INTO dbo.practicas_cie10_registracion ( pra_numero ,pracie10_idvalidacion ,pracie10_request ,pracie10_response ,pracie10_fecha ) VALUES ( '".addslashes($turnoId)."' ,'".$turnoInfo["idValidacion"]."' ,'".$requestBase64."' ,'".encodeDataB64($dataRes["res"])."' ,GETDATE() )"; $template = "UPDATE practicas_cie10 SET pra_procesado = 1 ,pra_error_registrar = ".$error." ,pra_registrado = ".$registrado." ,pra_autorizacion = '".$turnoInfo["idValidacion"]."' ,pra_fecha_regsitracion = GETDATE() ,pra_fecha_regsitracion_apross= '".$dataRes["res"]["response"]["description"]["created_at"]."' WHERE pra_id = {TURID} AND ant_id = {CIE10ID}"; } break; case APROSS_TIPO_GUARDIA: { $sqlResultadoProcesamiento = "INSERT INTO dbo.guardia_cie10_registracion ( gua_numero ,guacie10_idvalidacion ,guacie10_request ,guacie10_response ,guacie10_fecha ) VALUES ( '".addslashes($turnoId)."' ,'".$turnoInfo["idValidacion"]."' ,'".$requestBase64."' ,'".encodeDataB64($dataRes["res"])."' ,GETDATE() )"; /*$template = "UPDATE practicas_cie10 SET pra_procesado = 1 ,pra_error_registrar = ".$error." ,pra_registrado = ".$registrado." ,pra_autorizacion = '".$turnoInfo["idValidacion"]."' ,pra_fecha_regsitracion = GETDATE() ,pra_fecha_regsitracion_apross= '".$dataRes["res"]["response"]["description"]["created_at"]."' WHERE pra_id = {TURID} AND ant_id = {CIE10ID}";*/ // $template = "UPDATE guardia_atenciones // SET gua_procesado = 1 // ,gua_error_registrar = ".$error." // ,gua_registrado = ".$registrado." // ,gua_autorizacion = '".$turnoInfo["idValidacion"]."' // ,gua_fecha_regsitracion = GETDATE() // ,gua_fecha_regsitracion_apross= '".$dataRes["res"]["response"]["description"]["created_at"]."' // WHERE gua_numero = {TURID}"; $template = "UPDATE guardia_cie10 SET gua_procesado = 1 ,gua_error_registrar = ".$error." ,gua_registrado = ".$registrado." ,gua_autorizacion = '".$turnoInfo["idValidacion"]."' ,gua_fecha_regsitracion = GETDATE() ,gua_fecha_regsitracion_apross= '".$dataRes["res"]["response"]["description"]["created_at"]."' WHERE gua_numero = {TURID} AND ant_id = {CIE10ID}"; } break; /* case APROSS_TIPO_INTERNACION: { $sqlResultadoProcesamiento = "INSERT INTO dbo.ointernacion_cie10_registracion ( oi_numero ,oi_item ,pra_codigo ,oicie10_idvalidacion ,oicie10_request ,oicie10_response ,oicie10_fecha ) VALUES ( '".addslashes($turnoId)."' ,'".addslashes($praInfo["item"])."' ,'".addslashes($praInfo["ino"])."' ,'".$turnoInfo["idValidacion"]."' ,'".$requestBase64."' ,'".encodeDataB64($dataRes["res"])."' ,GETDATE() )"; // for($i=0;$i;0) { for($i=0;$isetBeginTransaction(); $resultado = $GLOBALS['dbSQLTR']->QueryTR($sqlResultadoProcesamiento,true); if ( !$resultado ) { //print_r($sqlResultadoProcesamiento);print_r("\n"); grabarLogApross($sqlResultadoProcesamiento,"grabarRegistracionPrestacionesResultado_sqlResultadoProcesamiento"); $res = $GLOBALS['dbSQLTR']->setRollbackTransaction(); $continue = false; $resultInfo["res"] = array(); $resultInfo["res"]["motivo"] = "Error al grabar el resultado - [Codigo 1002]"; $resultInfo["res"]["cod"] = 1002; } if( $continue ) { for($i=0;$iQueryTR($sqlLst[$i],true); if ( !$resultado ) { // print_r("INDEX ERROR:[".$i."]");print_r("\n"); // print_r($sqlLst[$i]);print_r("\n"); grabarLogApross($sqlLst[$i],"grabarRegistracionPrestacionesResultado_sqlLst_".$i); $res = $GLOBALS['dbSQLTR']->setRollbackTransaction(); $continue = false; $resultInfo["res"] = array(); $resultInfo["res"]["motivo"] = "Error al actualizar los items de CIE10 - [Codigo 1003]"; $resultInfo["res"]["cod"] = 1003; } } } if( $continue ) { $res = $GLOBALS['dbSQLTR']->setCommitTransaction(); grabarLogApross(0,"grabarRegistracionPrestacionesResultado_exito"); //$GLOBALS['dbSQLTR']->setRollbackTransaction(); //print_r('commit['.$res.']');print_r("\n"); return true; } } else { grabarLogApross(0,"grabarRegistracionPrestacionesResultado_error_prepararTR_"); } return $continue; } catch ( Exception $e ) { if( $flagTransactionInit ) { $GLOBALS['dbSQLTR']->setRollbackTransaction(); } $resultInfo['code'] = -177;//CODE_RESULT_ERROR_FATAL; $resultInfo['errorDes'] = "Error al grabar los cambios - [Codigo 1001] (".$e->__toString().")"; //logTrace(debug_backtrace(),$e->__toString()); return false; } } function getOiPrVal($praInfo) { $sql = "SELECT aut_validacion FROM ointernacion_autorizar_web WHERE oi_numero = '".$praInfo["oinro"]."' AND oi_item = '".$praInfo["item"]."' AND pra_codigo= '".$praInfo["ino"]."' AND ant_id = '".$praInfo["ant_id"]."'"; $rs = $GLOBALS['dbSQL']->Query($sql); if ( !$rs ) { return false; } $praautval = $GLOBALS['dbSQL']->getAll(); if(is_array($praautval)) { return $praautval[0]["aut_validacion"]; } return false; } function registrarPrestacionTurno($turnoId,$tipo,$usuario,&$resultado) { try { require_once('apross.php'); $apross = new APROSS(); //$turnoInfo = getTurnoInfoApross($turnoId,true); switch($tipo) { case APROSS_TIPO_TURNO: { $turnoInfo = getTurnoInfoApross($turnoId,true);//SPIDER //print_r($turnoInfo);print_r("\n"); $idItem = $turnoInfo["turnonro"]; $thora = $turnoInfo["thora"]; if(strlen($thora)<4) { $thora = '0'.substr($thora,0,1).':'.substr($thora,1,2); } else { $thora = substr($thora,0,2).':'.substr($thora,2,2); } } break; case APROSS_TIPO_PRACTICA: { $turnoInfo = getPracticaInfoApross($turnoId,true); $idItem = $turnoInfo["practnro"]; $thora = "00:00"; } break; case APROSS_TIPO_INTERNACION: { //OBTENER LA INFO DE LA OI $turnoInfo = getOInternacionInfoApross($turnoId); //$turnoInfo = getOInternacionInfoApross($turnoId,true); //BUSCAR LAS PRACTICAS Y CIE10 NO REGISTRADOS DE LA OI //$lstPracticasPtmp = getPracticasOINoRegistradas($turnoId); //SOLO OBTENER LAS NO REGISTRADAS $lstcie10 = getOInternacionCIE10Union($turnoId,true); //SOLO OBTENER LAS NO REGISTRADAS $totalestiempo = false; $lstPracticastmp = getOInternacionPracticas($turnoId,$lstcie10,true,$totalestiempo); //print_r($lstPracticastmp);die("---4444"); //$idItem = $turnoInfo["oinro"]; $thora = "00:00"; } break; case APROSS_TIPO_GUARDIA: { $turnoInfo = getGuardiaInfoApross($turnoId,true); $idItem = $turnoInfo["guanro"]; $thora = "00:00"; } break; } switch($tipo) { case APROSS_TIPO_TURNO: case APROSS_TIPO_PRACTICA: case APROSS_TIPO_GUARDIA: { //print_r($turnoInfo); //die(" <<<<<"); if( $turnoInfo ) { if($tipo==APROSS_TIPO_TURNO){$thora="00:00";} $data = array( "codino" => $turnoInfo["codino"] ,"medcuit" => $turnoInfo["medcuit"] ,"dni" => $turnoInfo["dni"] ,"medname" => $turnoInfo["medname"] ,"turnonro" => $idItem //$turnoInfo["turnonro"] ,"idValidacion" => $turnoInfo["idValidacion"] ,"tipo_episodio"=> $turnoInfo["tipo_episodio"] ,"via_ingreso" => 2 ,"estado_salida"=> 9 ,"fechaing" => $turnoInfo["tfecha"]."T".$thora.":00Z" //$turnoInfo["tfecha"]."T".$thora.".000Z" ,"fechaegr" => $turnoInfo["tfecha"]."T".$thora.":00Z" //$turnoInfo["tfecha"]."T".$thora.".000Z" ,"practicas" => $turnoInfo["practicas"] ,"diagnosticos" => $turnoInfo["diagnosticos"] ,"flagFormatHora"=>(isset($turnoInfo["flagFormatHora"])?intval($turnoInfo["flagFormatHora"]):0) ,"prefijoDoc" => (isset($turnoInfo["aut_prefdoc"])?($turnoInfo["aut_prefdoc"]==1?true:false):false) ); $response = false; $request = false; if( !$GLOBALS['APROSS_TEST'] ) { try { $resultado = $apross->sendRegistrarPrestaciones($data,$response,$request); grabarLogApross($response,"response"); } catch ( Exception $e ) { // print_r(" <<<< ERROR WS >>>> ");print_r("\n"); // print_r($e->__toString());print_r("\n"); } } else { $response = array( //ATENCION!!!!!!! COMENTAR ES PARA TEST "r" => 1 ,"res" => array( "success" => true ,"message" => "Item creado con exito" ,"response" => array( "codigo" => 0 ,"description"=> array ( "created_at"=> date("Y-m-dTH:i:s") //"2022-08-01T10:00:00" ,"updated_at"=> date("Y-m-dTH:i:s") //"2022-08-01T10:00:00" ) ) )); } // print_r($data);print_r("\n"); //print_r($response);print_r("\n");die; // print_r($request); //die(" <<<<<"); if( isset($response["r"])&&$response["r"]===1 && isset($response["res"]["success"]) && $response["res"]["success"]!=="" ) { //Verifico si no hay error if( isset($response["res"]["message"]) && strtolower($response["res"]["message"])=="error" ) { //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_REGISTRAR,$turnoId,$tipo,$response,$usuario,7); $errorDes = ''; if(isset($response["res"]["response"]["description"])) { $errorDes = $response["res"]["response"]["description"]; } //Error detectado $resultado = array( "r" => -2 ,"m" => $errorDes ); } else { //Se obtuvo comunicacion y respuesta del APROSS //Verificar resultado: Exito o Error $resultInfo=false; $resultadoGrabar = grabarRegistracionPrestacionesResultado($turnoInfo,$turnoId,$tipo,$response,encodeDataB64($request),$usuario,$resultInfo); //$resultadoGrabar = true; if( $resultadoGrabar ) { //Exito de autorización $resultado = array( "r" => 1 ,"m" => '' ); grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_REGISTRAR,$turnoId,$tipo,$response,$usuario,0); } else { //Error de autorización //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_REGISTRAR,$turnoId,$tipo,$response,$usuario,5); $errorDes = ''; if(isset($response["res"]["response"]["description"])) { $errorDes = $response["res"]["response"]["description"]; } //Error detectado $resultado = array( "r" => -1 ,"m" => $errorDes ); } } } elseif( isset($response["r"])&&$response["r"]==1 && isset($response["res"]["message"]) && strtolower($response["res"]["message"])=="error" ) { //No se obtuvo comunicacion, respuesta o fallo del del APROSS //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_REGISTRAR,$turnoId,$tipo,$response,$usuario,6); $errorDes = ''; if(isset($response["res"]["response"]["description"])) { $errorDes = $response["res"]["response"]["description"]; } //Error detectado $resultado = array( "r" => -2 ,"m" => $errorDes ); } elseif(isset($response["r"])&&$response["r"]===-1) { //Error fatal //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_REGISTRAR,$turnoId,$tipo,$response,$usuario,7); $resultado = array( "r" => -3 ,"m" => "ERROR DE CONEXION, APROSS NO DISPONIBLE: " . (isset($response["e"])?$response["e"]:'') ); } else { //Error fatal sin definir //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_REGISTRAR,$turnoId,$tipo,$response,$usuario,8); $resultado = array( "r" => -4 ,"m" => "ERROR DE CONEXION, APROSS NO DISPONIBLE: " . (isset($response["e"])?$response["e"]:'') ); } } } break; /* case APROSS_TIPO_INTERNACION: { $resultadoLst = array(); $resultadoErrorLst = array(); if( isset($_REQUEST["lstItems"]) && !empty($_REQUEST["lstItems"]) && !is_null($_REQUEST["lstItems"]) ) { $lstPracticastmp = json_decode($_REQUEST["lstItems"]); //print_r($lstPracticastmp);die; $lstPracticas = array(); $cie10Legajo = getOInternacionCIE10Union($turnoId); for($i=0;$i $lstPracticastmp[$i]->pr ,"nom" => $lstPracticastmp[$i]->nom ,"item" => $lstPracticastmp[$i]->item ,"medcod"=> $lstPracticastmp[$i]->medcod ,"oinro" => $lstPracticastmp[$i]->oinro ,"ant_id"=> $lstPracticastmp[$i]->ant_id ,"org" => $lstPracticastmp[$i]->org ,"fcir" => $lstPracticastmp[$i]->fcir ,"tcir" => $lstPracticastmp[$i]->tcir ,"tven" => $lstPracticastmp[$i]->tven ,"cie10" => $cie10Legajo ); $x = array_push($lstPracticas,$item); //print_r($lstPracticas);die; } //print_r($lstPracticas);die("---666"); $continue=true; for($i=0;$i $lstPracticas[$i]["ino"] ,"fechaing" => $turnoInfo["tfecha"]."T".$thora.":00Z" )); $data = array ( "codino" => $lstPracticas[$i]["ino"] ,"medcuit" => $turnoInfo["medcuit"] ,"dni" => $turnoInfo["dni"] ,"medname" => $turnoInfo["medname"] ,"tipo_episodio" => 2 ,"via_ingreso" => 1 ,"estado_salida" => 9 ,"turnonro" => $turnoId.$lstPracticas[$i]["item"] ,"idValidacion" => getOiPrVal($lstPracticas[$i]) ,"fechaing" => $turnoInfo["tfecha"]."T".$thora.":00Z" //$turnoInfo["tfecha"]."T".$thora.".000Z" ,"fechaegr" => $turnoInfo["tfecha"]."T".$thora.":00Z" //$turnoInfo["tfecha"]."T".$thora.".000Z" ,"practicas" => $practicas //$turnoInfo["practicas"] ,"diagnosticos" => $cie10Legajo //$turnoInfo["diagnosticos"] ,"flagFormatHora"=>(isset($turnoInfo["flagFormatHora"])?intval($turnoInfo["flagFormatHora"]):0) ,"org" => $lstPracticas[$i]["org"] ,"fcirugia" => $lstPracticas[$i]["fcir"]."T".$thora.":00Z" ,"tcirugia" => $lstPracticas[$i]["tcir"] ,"tventilacion" => $lstPracticas[$i]["tven"] ); $response = false; $request = false; try { $resultado = $apross->sendRegistrarPrestaciones($data,$response,$request); grabarLogApross($response,"response"); } catch ( Exception $e ) { // print_r(" <<<< ERROR WS >>>> ");print_r("\n"); // print_r($e->__toString());print_r("\n"); } if( isset($response["r"])&&$response["r"]===1 && isset($response["res"]["success"]) && $response["res"]["success"]!=="" ) { //Verifico si no hay error if( isset($response["res"]["message"]) && strtolower($response["res"]["message"])=="error" ) { //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_REGISTRAR,$turnoId,$tipo,$response,$usuario,7); $errorDes = ''; if(isset($response["res"]["response"]["description"])) { $errorDes = $response["res"]["response"]["description"]; } //Error detectado $resultado = array( "r" => -2 ,"p" => $lstPracticas[$i] ,"m" => $errorDes ); //print_r($resultado);die("----33333"); $x = array_push($resultadoErrorLst,$resultado); } else { //Se obtuvo comunicacion y respuesta del APROSS //Verificar resultado: Exito o Error $resultInfo=false; $resultadoGrabar = grabarRegistracionPrestacionesResultado($turnoInfo,$turnoId,$tipo,$response,encodeDataB64($request),$usuario,$resultInfo,$lstPracticas[$i]); //$resultadoGrabar = true; if( $resultadoGrabar ) { //Exito de autorización $resultado = array( "r" => 1 ,"m" => '' ,"p" => $lstPracticas[$i] ); $x = array_push($resultadoLst,$resultado); grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_REGISTRAR,$turnoId,$tipo,$response,$usuario,0); } else { //Error de autorización //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_REGISTRAR,$turnoId,$tipo,$response,$usuario,5); $errorDes = ''; if(isset($response["res"]["response"]["description"])) { $errorDes = $response["res"]["response"]["description"]; } //Error detectado $resultado = array( "r" => -2 ,"p" => $lstPracticas[$i] ,"m" => $errorDes ); //print_r($resultado);die("----33333"); $x = array_push($resultadoErrorLst,$resultado); } } } elseif( isset($response["r"])&&$response["r"]==1 && isset($response["res"]["message"]) && strtolower($response["res"]["message"])=="error" ) { //No se obtuvo comunicacion, respuesta o fallo del del APROSS //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_REGISTRAR,$turnoId,$tipo,$response,$usuario,6); $errorDes = ''; if(isset($response["res"]["response"]["description"])) { $errorDes = $response["res"]["response"]["description"]; } //Error detectado $resultado = array( "r" => -2 ,"p" => $lstPracticas[$i] ,"m" => $errorDes ); //print_r($resultado);die("----33333"); $x = array_push($resultadoErrorLst,$resultado); } elseif(isset($response["r"])&&$response["r"]===-1) { //Error fatal //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_REGISTRAR,$turnoId,$tipo,$response,$usuario,7); //Error detectado $resultado = array( "r" => -3 ,"p" => $lstPracticas[$i] ,"m" => "ERROR DE CONEXION, APROSS NO DISPONIBLE: " . (isset($response["e"])?$response["e"]:'') ); //print_r($resultado);die("----33333"); $x = array_push($resultadoErrorLst,$resultado); } else { //Error fatal sin definir //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_REGISTRAR,$turnoId,$tipo,$response,$usuario,8); //Error detectado $resultado = array( "r" => -4 ,"p" => $lstPracticas[$i] ,"m" => "ERROR DE CONEXION, APROSS NO DISPONIBLE: " . (isset($response["e"])?$response["e"]:'') ); //print_r($resultado);die("----33333"); $x = array_push($resultadoErrorLst,$resultado); } } } $resoutput = array( "success" => $resultadoLst ,"error" => $resultadoErrorLst ); // print_r("--RESULTADO--");print_r("\n"); // print_r($resoutput);print_r("\n");die; return $resoutput; //die("----44444----"); // //print_r($turnoInfo); // //die(" <<<<<"); // if( $turnoInfo ) // { // } } break; */ case APROSS_TIPO_INTERNACION: { $resultadoLst = array(); $resultadoErrorLst = array(); //$lstPracticastmp = json_decode($_REQUEST["lstItems"]); //print_r($lstPracticastmp);die; $lstPracticas = array(); //$cie10Legajo = getOInternacionCIE10Union($turnoId); for($i=0;$i $lstPracticastmp[$i]["ino"]//* ,"nom" => $lstPracticastmp[$i]["nom"]//* ,"item" => $lstPracticastmp[$i]["item"]//* ,"medcod"=> $lstPracticastmp[$i]["medcod"]//* ,"medname"=>$lstPracticastmp[$i]["medcod"]//* ,"medcuit"=>$lstPracticastmp[$i]["medcuit"]//* ,"oinro" => $lstPracticastmp[$i]["oinro"]//* ,"ant_id"=> $lstPracticastmp[$i]["ant_id"]//--- ,"org" => $lstPracticastmp[$i]["prorigen"]//--- ,"fcir" => $lstPracticastmp[$i]["fcirugia"]//---* ,"tcir" => $lstPracticastmp[$i]["tcir"]//* ,"tven" => $lstPracticastmp[$i]["tven"]//* ,"cie10" => $lstcie10 //$cie10Legajo ,"fecha" => str_replace(" ","T",$lstPracticastmp[$i]["FecTsmpsf"]).":00Z" ); $x = array_push($lstPracticas,$item); //print_r($lstPracticas);die; } //print_r($lstPracticas);die("---666"); $continue=true; $practicas=array(); for($i=0;$i $lstPracticas[$i]["ino"] ,"fechaing" => $lstPracticas[$i]["fecha"] //$turnoInfo["tfecha"]."T".$thora.":00Z" ,"org" => $lstPracticas[$i]["org"] )); } $data = array ( //"codino" => $lstPracticas[$i]["ino"] "dni" => $turnoInfo["dni"] ,"medname" => $turnoInfo["medname"] ,"medcuit" => $turnoInfo["medcuit"] ,"tipo_episodio" => 2 ,"via_ingreso" => 1 ,"estado_salida" => 9 ,"turnonro" => $turnoId ,"idValidacion" => $turnoInfo["idValidacion"]//getOiPrVal($lstPracticas[$i]) ,"fechaing" => $turnoInfo["tfecha"]."T".$thora.":00Z" //$turnoInfo["tfecha"]."T".$thora.".000Z" //,"fechaegr" => $turnoInfo["tfecha"]."T".$thora.":00Z" //$turnoInfo["tfecha"]."T".$thora.".000Z" ,"fechaegr" => $turnoInfo["tfechaegr"]."T".$thora.":00Z" //$turnoInfo["tfecha"]."T".$thora.".000Z" ,"practicas" => $practicas //$turnoInfo["practicas"] ,"diagnosticos" => $lstcie10 //$cie10Legajo //$turnoInfo["diagnosticos"] ,"flagFormatHora"=>(isset($turnoInfo["flagFormatHora"])?intval($turnoInfo["flagFormatHora"]):0) ,"org" => ''//$lstPracticas[$i]["org"] ,"tcirugia" => ($totalestiempo?$totalestiempo["tciru"]:'0.0') ,"tventilacion" => ($totalestiempo?$totalestiempo["tvent"]:'0.0') ,"prefijoDoc" => (isset($turnoInfo["aut_prefdoc"])?($turnoInfo["aut_prefdoc"]==1?true:false):false) ); //print_r($data);die("---88888"); if($totalestiempo) { $data["fcirugia"] = str_replace(" ","T",$totalestiempo["fprimercir"]).":00Z"; } $response = false; $request = false; if( !$GLOBALS['APROSS_TEST'] ) { try { $resultado = $apross->sendRegistrarPrestaciones($data,$response,$request,true); grabarLogApross($response,"response"); } catch ( Exception $e ) { // print_r(" <<<< ERROR WS >>>> ");print_r("\n"); // print_r($e->__toString());print_r("\n"); } } else { $response = array( //ATENCION!!!!!!! COMENTAR ES PARA TEST "r" => 1 ,"res" => array( "success" => true ,"message" => "Item creado con exito" ,"response" => array( "codigo" => 0 ,"description"=> array ( "created_at"=> date("Y-m-dTH:i:s") //"2022-08-01T10:00:00" ,"updated_at"=> date("Y-m-dTH:i:s") //"2022-08-01T10:00:00" ) ) )); } if( isset($response["r"])&&$response["r"]===1 && isset($response["res"]["success"]) && $response["res"]["success"]!=="" ) { //Verifico si no hay error if( isset($response["res"]["message"]) && strtolower($response["res"]["message"])=="error" ) { //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_REGISTRAR,$turnoId,$tipo,$response,$usuario,7); $errorDes = ''; if(isset($response["res"]["response"]["description"])) { $errorDes = $response["res"]["response"]["description"]; } //Error detectado $resultado = array( "r" => -2 ,"p" => $lstPracticastmp ,"m" => $errorDes ); //print_r($resultado);die("----33333"); $x = array_push($resultadoErrorLst,$resultado); } else { //Se obtuvo comunicacion y respuesta del APROSS //Verificar resultado: Exito o Error $resultInfo=false; $resultadoGrabar = grabarRegistracionPrestacionesResultado($turnoInfo,$turnoId,$tipo,$response,encodeDataB64($request),$usuario,$resultInfo,$lstPracticastmp); //$resultadoGrabar = true; if( $resultadoGrabar ) { //Exito de autorización $resultado = array( "r" => 1 ,"m" => '' ,"p" => $lstPracticastmp ); $x = array_push($resultadoLst,$resultado); grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_REGISTRAR,$turnoId,$tipo,$response,$usuario,0); } else { //Error de autorización //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_REGISTRAR,$turnoId,$tipo,$response,$usuario,5); $errorDes = ''; if(isset($response["res"]["response"]["description"])) { $errorDes = $response["res"]["response"]["description"]; } //Error detectado $resultado = array( "r" => -2 ,"p" => $lstPracticastmp ,"m" => $errorDes ); //print_r($resultado);die("----33333"); $x = array_push($resultadoErrorLst,$resultado); } } } elseif( isset($response["r"])&&$response["r"]==1 && isset($response["res"]["message"]) && strtolower($response["res"]["message"])=="error" ) { //No se obtuvo comunicacion, respuesta o fallo del del APROSS //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_REGISTRAR,$turnoId,$tipo,$response,$usuario,6); $errorDes = ''; if(isset($response["res"]["response"]["description"])) { $errorDes = $response["res"]["response"]["description"]; } //Error detectado $resultado = array( "r" => -2 ,"p" => $lstPracticastmp ,"m" => $errorDes ); //print_r($resultado);die("----33333"); $x = array_push($resultadoErrorLst,$resultado); } elseif(isset($response["r"])&&$response["r"]===-1) { //Error fatal //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_REGISTRAR,$turnoId,$tipo,$response,$usuario,7); //Error detectado $resultado = array( "r" => -3 ,"p" => $lstPracticastmp ,"m" => "ERROR DE CONEXION, APROSS NO DISPONIBLE: " . (isset($response["e"])?$response["e"]:'') ); //print_r($resultado);die("----33333"); $x = array_push($resultadoErrorLst,$resultado); } else { //Error fatal sin definir //Grabar log grabarLogErrorApross(APROSS_ERROR_LOG_TYPE_REGISTRAR,$turnoId,$tipo,$response,$usuario,8); //Error detectado $resultado = array( "r" => -4 ,"p" => $lstPracticastmp ,"m" => "ERROR DE CONEXION, APROSS NO DISPONIBLE: " . (isset($response["e"])?$response["e"]:'') ); //print_r($resultado);die("----33333"); $x = array_push($resultadoErrorLst,$resultado); } //} $resoutput = array( "success" => $resultadoLst ,"error" => $resultadoErrorLst ); // print_r("--RESULTADO--");print_r("\n"); // print_r($resoutput);print_r("\n");die; return $resoutput; } break; } return true; } catch ( Exception $e ) { //Error: al ejecutar el metodo $response = array( "r" => -10 ,"m" => print_r($e->__toString(),true)." - ".print_r($se->faultcode,true) ); // print_r("-----registrarPrestacionTurno-----");print_r("\n"); // print_r($response_);print_r("\n"); // print_r(" <<<<< registrarPrestacionTurno");print_r("\n"); return false; } } function registrarPrestacionApross(&$resultInfo) { try { if( isset($_REQUEST["t"]) && !empty($_REQUEST["t"]) && !is_null($_REQUEST["t"]) && isset($_REQUEST["tp"]) && !empty($_REQUEST["tp"]) && !is_null($_REQUEST["tp"]) && isset($_REQUEST["token"]) && !empty($_REQUEST["token"]) && !is_null($_REQUEST["token"]) ) { //Validar el Token $userId = validarTokenFast($resultInfo); if( $userId ) { $resultInfoRP=false; $resultado = registrarPrestacionTurno($_REQUEST["t"],$_REQUEST["tp"],$userId,$resultInfoRP); // print_r("resultado[$resultado]");print_r("\n"); // print_r($resultInfo); if( $resultado ) { $resultInfo['code'] = 0; $resultInfo['data'] = $resultInfoRP; } else { $resultInfo['code'] = -2; $resultInfo['data'] = $resultInfoRP; } } } else { $resultInfo['r'] = 0; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "Parametros Faltantes"; } return true; } catch ( Exception $e ) { //Error: al ejecutar el metodo $resultInfo['r'] = 0; $resultInfo['code'] = -10; $resultInfo['errorDes'] = "Error: ".$e->__toString(); // print_r("-----registrarPrestacionApross-----");print_r("\n"); // print_r($resultInfo);print_r("\n"); // print_r(" <<<<< registrarPrestacionApross");print_r("\n"); return false; } } function agregarCIE10($turnoId,$tipo,$cie10,$usuario) { try { $cie10inf = json_decode($cie10,true); switch($tipo) { case APROSS_TIPO_TURNO: { $sql = "INSERT INTO turnos_cie10 ( tur_numero ,tur_tstamp ,ant_id ,usu_codigo ,tur_registrado ,tur_error_registrar ,tur_procesado ,tur_autorizacion ,tur_fecha_regsitracion ,tur_fecha_regsitracion_apross ,ant_ppal ,ant_evo ,ant_poa ,ant_ant ) VALUES ( '".addslashes($turnoId)."' ,GETDATE() ,(SELECT ant_id FROM tipantecedentes WHERE ant_codigo = '".addslashes($cie10inf["codcie"])."') ,'".addslashes($usuario)."' ,0 ,NULL ,0 ,NULL ,NULL ,NULL ,'".addslashes($cie10inf["ppal"])."' ,'".addslashes($cie10inf["evo"])."' ,'".addslashes($cie10inf["poa"])."' ,'".addslashes($cie10inf["ant"])."' )"; $rs = $GLOBALS['dbSQL']->Query($sql,true); if ( !$rs ) { return false; } $cie10lst = getTurnoCIE10($turnoId); if(is_array($cie10lst)&&count($cie10lst)>0) { return $cie10lst; } } break; case APROSS_TIPO_PRACTICA: { $sql = "INSERT INTO practicas_cie10 ( pra_numero ,pra_tstamp ,ant_id ,usu_codigo ,pra_registrado ,pra_error_registrar ,pra_procesado ,pra_autorizacion ,pra_fecha_regsitracion ,pra_fecha_regsitracion_apross ,ant_ppal ,ant_evo ,ant_poa ,ant_ant ) VALUES ( '".addslashes($turnoId)."' ,GETDATE() ,(SELECT ant_id FROM tipantecedentes WHERE ant_codigo = '".addslashes($cie10inf["codcie"])."') ,'".addslashes($usuario)."' ,0 ,NULL ,0 ,NULL ,NULL ,NULL ,'".addslashes($cie10inf["ppal"])."' ,'".addslashes($cie10inf["evo"])."' ,'".addslashes($cie10inf["poa"])."' ,'".addslashes($cie10inf["ant"])."' )"; $rs = $GLOBALS['dbSQL']->Query($sql,true); if ( !$rs ) { return false; } $cie10lst = getPracticaCIE10($turnoId); if(is_array($cie10lst)&&count($cie10lst)>0) { return $cie10lst; } } break; case APROSS_TIPO_GUARDIA: { $sql = "INSERT INTO guardia_cie10 ( gua_numero ,gua_tstamp ,ant_id ,usu_codigo ,gua_registrado ,gua_error_registrar ,gua_procesado ,gua_autorizacion ,gua_fecha_regsitracion ,gua_fecha_regsitracion_apross ,ant_ppal ,ant_evo ,ant_poa ,ant_ant ) VALUES ( '".addslashes($turnoId)."' ,GETDATE() ,(SELECT ant_id FROM tipantecedentes WHERE ant_codigo = '".addslashes($cie10inf["codcie"])."') ,'".addslashes($usuario)."' ,0 ,NULL ,0 ,NULL ,NULL ,NULL ,'".addslashes($cie10inf["ppal"])."' ,'".addslashes($cie10inf["evo"])."' ,'".addslashes($cie10inf["poa"])."' ,'".addslashes($cie10inf["ant"])."' )"; $rs = $GLOBALS['dbSQL']->Query($sql,true); if ( !$rs ) { return false; } $cie10lst = getGuardiaCIE10($turnoId); if(is_array($cie10lst)&&count($cie10lst)>0) { return $cie10lst; } } break; } return true; } catch ( Exception $e ) { //Error: al ejecutar el metodo //print_r($e->__toString());die; return false; } } function agregarCIE10PrestacionAprossTurno(&$resultInfo) { if( isset($_REQUEST["t"]) && !empty($_REQUEST["t"]) && !is_null($_REQUEST["t"]) && isset($_REQUEST["tp"]) && !empty($_REQUEST["tp"]) && !is_null($_REQUEST["tp"]) && isset($_REQUEST["token"]) && !is_null($_REQUEST["token"]) && isset($_REQUEST["cie10"]) && !empty($_REQUEST["cie10"]) && !is_null($_REQUEST["cie10"]) ) { //Validar el Token $tokenInfo = false; $result = false; $userId = false; $continue = Acl::validateToken($_REQUEST["token"],$tokenInfo,$result); if( $result == Acl::TOKEN_VALID ) { $userId = $tokenInfo->uid; $continue = true; } elseif( $result == Acl::TOKEN_EXPIRED ) { $defaultErrorMsj = 'SU SESION HA EXPIRADO. REINGRESE E INTENTE NUEVAMENTE'; $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "SU SESION HA EXPIRADO. REINGRESE E INTENTE NUEVAMENTE"; } else { $defaultErrorMsj = 'SU SESION HA EXPIRADO. REINGRESE E INTENTE NUEVAMENTE'; $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "SU SESION HA EXPIRADO. REINGRESE E INTENTE NUEVAMENTE"; } if( $continue ) { $resultado = agregarCIE10($_REQUEST["t"],$_REQUEST["tp"],$_REQUEST["cie10"],$userId); if( $resultado ) { //Retornar listado actualizado de CIE10 $resultInfo['code'] = 0; $resultInfo['data'] = $resultado; } else { $resultInfo['code'] = 1; $resultInfo['errorDes'] = "SE PRODUJO UN ERROR EN EL SISTEMA AL COMUNICARSE CON APROSS."; } } } else { $resultInfo['code'] = 1; $resultInfo['errorDes'] = "Parametros Faltantes"; } return true; } function borrarCIE10($turnoId,$tipo,$cie10,$usuario) { try { $cie10inf = json_decode($cie10,true); //print_r($cie10inf);die; switch($tipo) { case APROSS_TIPO_TURNO: { $sql = "DELETE FROM turnos_cie10 WHERE tur_id = '".addslashes($cie10inf["tur_id"])."'"; $rs = $GLOBALS['dbSQL']->Query($sql,true); if ( !$rs ) { return false; } $cie10lst = getTurnoCIE10($turnoId); if(is_array($cie10lst)&&count($cie10lst)>0) { return $cie10lst; } } break; case APROSS_TIPO_PRACTICA: { $sql = "DELETE FROM practicas_cie10 WHERE pra_id = '".addslashes($cie10inf["pra_id"])."'"; $rs = $GLOBALS['dbSQL']->Query($sql,true); if ( !$rs ) { return false; } $cie10lst = getPracticaCIE10($turnoId); if(is_array($cie10lst)&&count($cie10lst)>0) { return $cie10lst; } } break; case APROSS_TIPO_GUARDIA: { $sql = "DELETE FROM guardia_cie10 WHERE gua_id = '".addslashes($cie10inf["gua_id"])."'"; $rs = $GLOBALS['dbSQL']->Query($sql,true); if ( !$rs ) { return false; } $cie10lst = getGuardiaCIE10($turnoId); if(is_array($cie10lst)&&count($cie10lst)>0) { return $cie10lst; } } break; } return true; } catch ( Exception $e ) { //Error: al ejecutar el metodo //print_r($e->__toString());die; return false; } } function eliminarCIE10PrestacionAprossTurno(&$resultInfo) { if( isset($_REQUEST["t"]) && !empty($_REQUEST["t"]) && !is_null($_REQUEST["t"]) && isset($_REQUEST["tp"]) && !empty($_REQUEST["tp"]) && !is_null($_REQUEST["tp"]) && isset($_REQUEST["token"]) && !is_null($_REQUEST["token"]) && isset($_REQUEST["cie10"]) && !empty($_REQUEST["cie10"]) && !is_null($_REQUEST["cie10"]) ) { //Validar el Token $tokenInfo = false; $result = false; $userId = false; $continue = Acl::validateToken($_REQUEST["token"],$tokenInfo,$result); if( $result == Acl::TOKEN_VALID ) { $userId = $tokenInfo->uid; $continue = true; } elseif( $result == Acl::TOKEN_EXPIRED ) { $defaultErrorMsj = 'SU SESION HA EXPIRADO. REINGRESE E INTENTE NUEVAMENTE'; $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "SU SESION HA EXPIRADO. REINGRESE E INTENTE NUEVAMENTE"; } else { $defaultErrorMsj = 'SU SESION HA EXPIRADO. REINGRESE E INTENTE NUEVAMENTE'; $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "SU SESION HA EXPIRADO. REINGRESE E INTENTE NUEVAMENTE"; } if( $continue ) { $resultado = borrarCIE10($_REQUEST["t"],$_REQUEST["tp"],$_REQUEST["cie10"],$userId); if( $resultado ) { //Retornar listado actualizado de CIE10 $resultInfo['code'] = 0; $resultInfo['data'] = $resultado; } else { $resultInfo['code'] = 1; $resultInfo['errorDes'] = "SE PRODUJO UN ERROR EN EL SISTEMA AL COMUNICARSE CON APROSS."; } } } else { $resultInfo['code'] = 1; $resultInfo['errorDes'] = "Parametros Faltantes"; } return true; } function getEvolucion($clieId,$tipo,$codItem) { //print_r("tipo[$tipo]");die; switch($tipo) { case APROSS_TIPO_TURNO: case APROSS_TIPO_PRACTICA: case APROSS_TIPO_GUARDIA: { // isset($_REQUEST["token"]) && // !is_null($_REQUEST["token"]) // ) // {fturno $sql = "SELECT tipo ,cli_codigo ,cli_dni ,cli_nombre ,CONVERT(varchar, fecha, 23) AS fecha ,anamnesis ,med_codigo ,med_nombre ,cd_tstamp ,oi_numero FROM v_historia_consolidada AS h WHERE h.CLI_CODIGO = ".$clieId." AND fecha > getdate () - 120 AND oi_numero = '".$codItem."' ORDER BY fecha DESC"; } break; case APROSS_TIPO_INTERNACION: { $sql = "SELECT 'INT' AS tipo ,c.cli_codigo ,c.cli_dni ,c.cli_nombre ,CONVERT(varchar, fiev.int_fecha, 23) AS fecha ,fiev.int_evolucion as anamnesis ,fiev.med_codigo ,m.med_nombre ,fiev.int_tstamp ,fi.oi_numero FROM cli_fichainternacion_evolucion AS fiev INNER JOIN cli_fichainternacion AS fi ON fi.int_numero = fiev.int_numero INNER JOIN clientes as c ON fi.cli_codigo = c.cli_codigo INNER JOIN medicos as m ON m.med_codigo = fiev.med_codigo WHERE fi.oi_numero = '".$codItem."' ORDER BY fiev.int_fecha DESC"; // 'EVO' 'FIC' } break; } // SELECT * // FROM v_historia_consolidada // WHERE CLI_CODIGO = 145763 AND fecha > getdate () - 120 //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( !$rs ) { $resultado = array( "total" => -1 ,"lstevo" => array() ); } $evolucionInfo = $GLOBALS['dbSQL']->getAll(); //print_r($turnoInfo);die; if( $evolucionInfo ) { $resultado = array( "total" => (is_array($evolucionInfo)?count($evolucionInfo):0) ,"lstevo" => (is_array($evolucionInfo)?$evolucionInfo:array()) ); } else { $resultado = array( "total" => 0 ,"lstevo" => array() ); } return $resultado; } function getEvolucionPrestacionAprossTurno(&$resultInfo) { if( isset($_REQUEST["cl"]) && !empty($_REQUEST["cl"]) && !is_null($_REQUEST["cl"]) && isset($_REQUEST["tp"]) && !empty($_REQUEST["tp"]) && !is_null($_REQUEST["tp"]) && isset($_REQUEST["cod"]) && !empty($_REQUEST["cod"]) && !is_null($_REQUEST["cod"]) && isset($_REQUEST["token"]) && !is_null($_REQUEST["token"]) ) { //Validar el Token $tokenInfo = false; $result = false; $userId = false; $continue = Acl::validateToken($_REQUEST["token"],$tokenInfo,$result); if( $result == Acl::TOKEN_VALID ) { $userId = $tokenInfo->uid; $continue = true; } elseif( $result == Acl::TOKEN_EXPIRED ) { $defaultErrorMsj = 'SU SESION HA EXPIRADO. REINGRESE E INTENTE NUEVAMENTE'; $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "SU SESION HA EXPIRADO. REINGRESE E INTENTE NUEVAMENTE"; } else { $defaultErrorMsj = 'SU SESION HA EXPIRADO. REINGRESE E INTENTE NUEVAMENTE'; $continue = false; $resultInfo['code'] = -1; $resultInfo['errorDes'] = "SU SESION HA EXPIRADO. REINGRESE E INTENTE NUEVAMENTE"; } if( $continue ) { $resultado = getEvolucion($_REQUEST["cl"],$_REQUEST["tp"],$_REQUEST["cod"]); if( $resultado ) { //Retornar informacion de la autorizacion $resultInfo['code'] = 0; $resultInfo['data'] = $resultado; } else { $resultInfo['code'] = 1; $resultInfo['errorDes'] = "SE PRODUJO UN ERROR EN EL SISTEMA AL CONSULTAR LA EVOLUCION"; } } } else { $resultInfo['code'] = 1; $resultInfo['errorDes'] = "Parametros Faltantes"; } return true; } function getListadoCIE10() { $filtro = ""; if( isset($_REQUEST["c"])&&!is_null($_REQUEST["c"])&& isset($_REQUEST["v"])&&!is_null($_REQUEST["v"]) ) { switch(intval($_REQUEST["c"])) { case 1:{$campo="ant_codigo";}break; case 2:{$campo="ant_denom";}break; case 3:{$campo="ant_grupo";}break; } $filtro = " WHERE " . $campo . " LIKE '%".str_replace(" ","%",$_REQUEST["v"])."%'"; } //,CONCAT(ant_codigo,' - ',ant_denom) as denom $sql = "SELECT ant_id AS cod ,ant_codigo as codcie ,ant_denom as denom ,ISNULL(ant_grupo,'') as grupo ,0 as ppal ,0 as evo ,0 as ant ,0 as poa FROM tipantecedentes ".$filtro." ORDER BY ant_denom ASC"; //print_r($sql);die; $rs = $GLOBALS['dbSQL']->Query($sql); if ( !$rs ) { $resultado = array( "total" => -1 ,"lstcie10" => array() ); } $cie10lst = $GLOBALS['dbSQL']->getAll(); //print_r($turnoInfo);die; if( $cie10lst ) { $resultado = array( "total" => (is_array($cie10lst)?count($cie10lst):0) ,"lstcie10" => (is_array($cie10lst)?$cie10lst:array()) ); } else { $resultado = array( "total" => 0 ,"lstcie10" => array() ); } return $resultado; } function getCIE10Lst(&$resultInfo) { $resultado = getListadoCIE10(); if( $resultado ) { //Retornar informacion de la autorizacion $resultInfo['code'] = 0; $resultInfo['data'] = $resultado; } else { $resultInfo['code'] = 1; $resultInfo['errorDes'] = "SE PRODUJO UN ERROR EN EL SISTEMA AL CONSULTAR EL LISTADO DE CIE10"; } return true; } // -------------------------------------------- // END APROSS // -------------------------------------------- ?>