<?php
  include("header.php");
  include("conexionOdo.php");
  
  session_start();    
  $s_nitEmpresa = $_SESSION['nitEmpresa']; 
  $s_codSede    = $_SESSION['codSede'];
  $s_usuario    = $_SESSION['nombreUsuario'];
  $s_empresa    = $_SESSION['empresaUsuario'];
  $s_cargo      = $_SESSION['cargoUsuario'];
  $s_idUsuario  = $_SESSION['idUsuario']; 
  
  // tipo Consulta
  $s_tipoCon    = $_SESSION['s_tipoCon']; 
  // causa de consulta
  $s_codCausa   =  $_SESSION['s_codCausa'];
  //Tipo Entidad
  $s_codEntidad = $_SESSION['s_codEntidad'];
 
  //familiar
  $s_familiar    = $_SESSION['s_familiar'];
  $s_parentesco  = $_SESSION['s_parentesco'];
  $s_telPariente = $_SESSION['s_telPariente'];

  //paciente
  $s_tipoId     = $_SESSION['e_tipoId'];
  $s_identifica = $_SESSION['e_identifica'];

   date_default_timezone_set('America/Bogota'); 
   $w_fecha          = date("Y-m-d",time()); 
   $w_fechaHora      = date("Y/m/d H:i:s"); 
  
  //Definicion de variables de entrada
  $par    =  $_GET['lin'];
  $par1   =  base64_decode($par);
  $partir = explode("/",$par1);
   
  $s_tipoHistoria = $partir[0];
  $viene          = $partir[1];
  //$s_yaGrabo      = $partir[2];
  $_SESSION['s_pc'] = $partir[3];
  $pc             = $_SESSION['s_pc']; 
        
  // TRAE DATOS DEL PACIENTE
  $query = "SELECT * FROM SIME_BAS_PACIENTE WHERE tipoId='$s_tipoId ' AND idPaciente=$s_identifica ";
  $result = mysql_query($query) or die('Consulta de sexo fallida: ' . mysql_error());
  $line = mysql_fetch_array($result, MYSQL_ASSOC);
  
  $s_sexo            = $line["sexoPaciente"];
  $s_apell1Paciente  = $line["apell1Paciente"];   
  $s_apell2Paciente  = $line["apell2Paciente"]; 
  $s_nomPaciente     = $line["nomPaciente"];  
  $s_nomPaciente2    = $line["nomPaciente2"]; 
  $s_edadPaciente    = $line["edadPaciente"];
  $w_rhPac           = $line["RH"];

  $w_nomPac = $s_nomPaciente . ' ' . $s_nomPaciente2 . ' ' . $s_apell1Paciente . ' ' .  $s_apell2Paciente;

  /*-----ALERGIAS----*/
  $queryAlerg="SELECT alergias FROM SIO_ALERGIAS WHERE tipoId= '$s_tipoId ' AND numeroId=$s_identifica ";
  $resultAlerg = mysql_query($queryAlerg) or die('Consulta de existencia de alergias fallida: ' . mysql_error());   
  $lineAlerg = mysql_fetch_array($resultAlerg, MYSQL_ASSOC);
  $s_alergiaspac = $lineAlerg['alergias'];
  // Liberar resultados
  mysql_free_result($resultAlerg);
  /*-----FIN ALERGIAS----*/ 
   
?>

<?php
        if(isset($_POST['submit']))
        {
          $s_motConsulta  = $_POST['motivoConsulta'];
          $s_enfActual    = $_POST['enfermedadActual']; 
          $s_antFam       = $_POST['antecedentesFam'];
          $s_yaGrabo      = $_POST['yaGrabo'];
          $e_nvoNroCon    = $_POST['nroCta'];
          $s_tipoHistoria = $_POST['s_tipoHistoria'];
          $viene          = $_POST['viD'];
          $pc             = $_POST['pc'];
          $activeBoton    = $_POST['activeBoton'];
          $s_alergiaspac  = $_POST['alergiaspac'];
        
          // VARIABLES SITUACION ACTUAL
          $s_motConsulta = $_POST['motivoConsulta'];
          $s_enfActual   = $_POST['enfermedadActual']; 
          $s_antFam      = $_POST['antecedentesFam'];
         
          //VARIABLES ANTECEDENTES ODONTOLOGICOS
          $s_alergias          = $_POST['alergias'];
          if ($s_alergias =="")
          {
      $s_alergias = "N";
          }
          else
          {    
           $chkAlergia = "checked";
          }
          $s_obsAlergia       = $_POST['obsAlergia'];
          //-------------------------------------------------------//
          $s_altPresArterial   = $_POST['altPresArterial'];
          if ($s_altPresArterial =="")
          {
      $s_altPresArterial = "N";
          }
          else
          {
            $chkPresArt = "checked";
          }
          $s_obsAltPresArterial = $_POST['obsAltPresArterial'];
          //-------------------------------------------------------//
          $s_cardiopatias      = $_POST['cardiopatias'];
          if ($s_cardiopatias =="")
          {
      $s_cardiopatias = "N";
          }
          else
          {    
           $chkCardio = "checked";
          }
          $s_obsCardiopatias  = $_POST['obsCardiopatias'];
          
          //-------------------------------------------------------//
          $s_cirugias          = $_POST['cirugias'];
          if ($s_cirugias =="")
          {
      $s_cirugias = "N";
          }
          else
          {    
           $chkCirugias = "checked";
          }
          $s_obsCirugias = $_POST['obsCirugias'];
          //-------------------------------------------------------//
          $s_diabetes          = $_POST['diabetes'];
          if ($s_diabetes =="")
          {
      $s_diabetes = "N";
          }
          else
          {    
           $chkDiabetes = "checked";
          }
          $s_obsDiabetes = $_POST['obsDiabetes'];
          //-------------------------------------------------------//
          $s_discrasiasSang    = $_POST['discrasiasSang'];
          if ($s_discrasiasSang =="")
          {
      $s_discrasiasSang = "N";
          }
          else
          {    
           $chkDiscrasias = "checked";
          }
          $s_obsDiscrasiasSang= $_POST['obsDiscrasiasSang'];
          //-------------------------------------------------------//
          $s_embarazo          = $_POST['embarazo'];
          if ($s_embarazo =="")
          {
      $s_embarazo = "N";
          }
          else
          {    
           $chkEmbarazo = "checked";
          }
          $s_obsEmbarazo = $_POST['obsEmbarazo'];
          //-------------------------------------------------------//
          $s_enfOrales         = $_POST['enfOrales'];
          if ($s_enfOrales =="")
          {
      $s_enfOrales = "N";
          }
          else
          {    
           $chkEnfOrales = "checked";
          }
          $s_obsEnfOrales = $_POST['obsEnfOrales'];
          //-------------------------------------------------------//
          $s_exodoncias        = $_POST['exodoncias'];
          if ($s_exodoncias =="")
          {
      $s_exodoncias = "N";
          }
          else
          {    
           $chkExodoncias = "checked";
          }
          $s_obsExodoncias = $_POST['obsExodoncias'];
          //-------------------------------------------------------//
          $s_fiebreReum        = $_POST['fiebreReum'];
          if ($s_fiebreReum =="")
          {
      $s_fiebreReum = "N";
          }
          else
          {    
           $chkFiebreReum = "checked";
          }
          $s_obsFiebreReum = $_POST['obsFiebreReum'];
          //-------------------------------------------------------//
          $s_hepatitis         = $_POST['hepatitis'];
          if ($s_hepatitis =="")
          {
      $s_hepatitis = "N";
          }
          else
          {    
           $chkHepatitis = "checked";
          }
          $s_obsHepatitis = $_POST['obsHepatitis'];
          //-------------------------------------------------------//
          $s_inmunosupresion   = $_POST['inmunosupresion'];
          if ($s_inmunosupresion =="")
          {
      $s_inmunosupresion = "N";
          }
          else
          {    
           $chkInmuno = "checked";
          }
          $s_obsInmunosupresion = $_POST['obsInmunosupresion'];
          //-------------------------------------------------------//
          $s_patologiasRenales = $_POST['patologiasRenales'];
          if ($s_patologiasRenales =="")
          {
      $s_patologiasRenales = "N";
          }
          else
          {    
           $chkPatRenal = "checked";
          }
          $s_obsPatologiasRenales = $_POST['obsPatologiasRenales'];
          //-------------------------------------------------------//
          $s_patRespiratoria   = $_POST['patRespiratoria'];
          if ($s_patRespiratoria =="")
          {
      $s_patRespiratoria = "N";
          }
          else
          {    
           $chkPatResp = "checked";
          }
          $s_obsPatRespiratoria = $_POST['obsPatRespiratoria'];
          //-------------------------------------------------------//
          $s_sida              = $_POST['sida'];
          if ($s_sida =="")
          {
      $s_sida = "N";
          }
          else
          {    
           $chkSida = "checked";
          }
          $s_obsSida = $_POST['obsSida'];
          //-------------------------------------------------------//
          $s_sinusitis         = $_POST['sinusitis'];
          if ($s_sinusitis =="")
          {
      $s_sinusitis = "N";
          }
          else
          {    
           $chkSinusitis = "checked";
          }
          $s_obsSinusitis= $_POST['obsSinusitis'];
          //-------------------------------------------------------//
          $s_tomaMedicamentos  = $_GET['tomaMedicamentos'];
          if ($s_tomaMedicamentos =="")
          {
      $s_tomaMedicamentos = "N";
          }
           else
          {    
           $chkTomaMedicamentos = "checked";
          }
          $s_obsTomaMedicamentos = $_GET['obsTomaMedicamentos'];
          //-------------------------------------------------------//
          $s_trasEmocional     = $_POST['trasEmocional'];
          if ($s_trasEmocional =="")
          {
      $s_trasEmocional = "N";
          }
          else
          {    
           $chktTrasEmocional = "checked";
          }
          $s_obsTrasEmocional = $_POST['obsTrasEmocional'];
          //-------------------------------------------------------//
          $s_trasGastricos     = $_POST['trasGastricos'];
          if ($s_trasGastricos =="")
          {
      $s_trasGastricos = "N";
          }
          else
          {    
           $chkTrasGastricos = "checked";
          }
          $s_obsTrasGastricos = $_POST['obsTrasGastricos'];
          //-------------------------------------------------------//
          $s_tratMedActual     = $_POST['tratMedActual'];
          if ($s_tratMedActual =="")
          {
      $s_tratMedActual = "N";
          }
           else
          {    
           $chkTratMedActual = "checked";
          }
          $s_obsTratMedActual= $_POST['obsTratMedActual'];
          //-------------------------------------------------------//
          $s_usoProtesis       = $_POST['usoProtesis'];
          if ($s_usoProtesis =="")
          {
      $s_usoProtesis = "N";
          }
           else
          {    
           $chkUsoProtesis = "checked";
          }
          $s_obsUsoProtesis = $_POST['obsUsoProtesis'];
          //-------------------------------------------------------//
          $s_habitos           = $_POST['habitos'];
          
          //VARIABLES EXAMEN ESTOMATOLOGICO
          $s_labioInferior    = $_POST['labioInferior'];
          if ($s_labioInferior == "Normal")
          {
               $labioInferiorNormal ="selected";
          }
          if ($s_labioInferior == "Anormal")
          {
               $labioInferiorAnormal ="selected";
          }
          $s_obsLabioInferior = $_POST['obsLabioInferior'];
          //-------------------------------------------------------//
          //-------------------------------------------------------//
          $s_labioSuperior    = $_POST['labioSuperior'];
          if ($s_labioSuperior == "Normal")
          {
               $labioSuperiorNormal ="selected";
          }
          if ($s_labioSuperior == "Anormal")
          {
               $labioSuperiorAnormal ="selected";
          }
          $s_obsLabioSuperior = $_POST['obsLabioSuperior'];
          //-------------------------------------------------------//
          $s_comisuras= $_POST['comisuras'];
          if ($s_comisuras == "Normal")
          {
               $comisurasNormal ="selected";
          }
          if ($s_comisuras == "Anormal")
          {
               $comisurasAnormal ="selected";
          }
          $s_obsComisuras= $_POST['obsComisuras'];
          //-------------------------------------------------------//
          $s_mucosaOral= $_POST['mucosaOral'];
          if ($s_mucosaOral == "Normal")
          {
               $mucosaOralNormal ="selected";
          }
          if ($s_mucosaOral == "Anormal")
          {
               $mucosaOralAnormal ="selected";
          }
          $s_obsMucosaOral= $_POST['obsMucosaOral'];
          //-------------------------------------------------------//
          $s_surcosYugales= $_POST['surcosYugales'];
          if ($s_surcosYugales == "Normal")
          {
               $surcosYugalesNormal ="selected";
          }
          if ($s_surcosYugales == "Anormal")
          {
               $surcosYugalesAnormal ="selected";
          }
          $s_obsSurcosYugales = $_POST['obsSurcosYugales'];
          //-------------------------------------------------------//
          $s_frenillos = $_POST['frenillos'];
          if ($s_frenillos == "Normal")
          {
               $frenillosNormal ="selected";
          }
          if ($s_frenillos == "Anormal")
          {
               $frenillosAnormal ="selected";
          }
          $s_obsFrenillos= $_POST['obsFrenillos'];
          //-------------------------------------------------------//
          $s_oroFaringe= $_POST['oroFaringe'];
          if ($s_oroFaringe == "Normal")
          {
               $oroFaringeNormal ="selected";
          }
          if ($s_oroFaringe == "Anormal")
          {
               $oroFaringeAnormal ="selected";
          }
          $s_obsOrofaringe= $_POST['obsOrofaringe'];
          //-------------------------------------------------------//
          $s_paladar= $_POST['paladar'];
          if ($s_paladar == "Normal")
          {
               $paladarNormal ="selected";
          }
          if ($s_paladar == "Anormal")
          {
               $paladarAnormal ="selected";
          }
          $s_obsPaladar= $_POST['obsPaladar'];
          //-------------------------------------------------------//
          $s_glandSalivales= $_POST['glandSalivales'];
          if ($s_glandSalivales == "Normal")
          {
               $glandSalivalesNormal ="selected";
          }
          if ($s_glandSalivales == "Anormal")
          {
               $glandSalivalesAnormal ="selected";
          }
          $s_obsGlandSalivales = $_POST['obsGlandSalivales'];
          //-------------------------------------------------------//
          $s_pisoBoca    = $_POST['pisoBoca'];
          if ($s_pisoBoca == "Normal")
          {
               $pisoBocaNormal ="selected";
          }
          if ($s_pisoBoca == "Anormal")
          {
               $pisoBocaAnormal ="selected";
          }
          $s_obsPisoBoca  = $_POST['obsPisoBoca'];
          //-------------------------------------------------------//
          $s_dorsoLengua= $_POST['dorsoLengua'];
          if ($s_dorsoLengua == "Normal")
          {
               $dorsoLenguaNormal ="selected";
          }
          if ($s_dorsoLengua == "Anormal")
          {
               $dorsoLenguaAnormal ="selected";
          }
          $s_obsDorsoLengua= $_POST['obsDorsoLengua'];
          //-------------------------------------------------------//
          $s_vientreLengua= $_POST['vientreLengua'];
          if ($s_vientreLengua == "Normal")
          {
               $vientreLenguaNormal ="selected";
          }
          if ($s_vientreLengua == "Anormal")
          {
               $vientreLenguaAnormal ="selected";
          }
          $s_obsVientreLengua= $_POST['obsVientreLengua'];
          //-------------------------------------------------------//
          //VARIABLES EXAMEN ARTICULACION TEMPORO MANDIBULAR
          $s_ruidos= $_POST['ruidos'];
          if ($s_ruidos == "Normal")
          {
               $ruidosNormal ="selected";
          }
          if ($s_ruidos == "Anormal")
          {
               $ruidosAnormal ="selected";
          }
          $s_obsRuidos= $_POST['obsRuidos'];
          //-------------------------------------------------------//
          $s_desviacion= $_POST['desviacion'];
          if ($s_desviacion == "Normal")
          {
               $desviacionNormal ="selected";
          }
          if ($s_desviacion == "Anormal")
          {
               $desviacionAnormal ="selected";
          }
          $s_obsDesviacion= $_POST['obsDesviacion'];
          //-------------------------------------------------------//
          $s_cambioVolumen= $_POST['cambioVolumen'];
          if ($s_cambioVolumen == "Normal")
          {
               $cambioVolumenNormal ="selected";
          }
          if ($s_cambioVolumen == "Anormal")
          {
               $cambioVolumenAnormal ="selected";
          }
          $s_obsCambioVolumen= $_POST['obsCambioVolumen'];
          //-------------------------------------------------------//
          $s_bloqueoMand= $_POST['bloqueoMand'];
          if ($s_bloqueoMand == "Normal")
          {
               $bloqueoMandNormal ="selected";
          }
          if ($s_bloqueoMand == "Anormal")
          {
               $bloqueoMandAnormal ="selected";
          }
          $s_obsBloqueMand= $_POST['obsBloqueMand'];
          //-------------------------------------------------------//
          $s_limitApertura= $_POST['limitApertura'];
          if ($s_limitApertura == "Normal")
          {
               $limitAperturaNormal ="selected";
          }
          if ($s_limitApertura == "Anormal")
          {
               $limitAperturaAnormal ="selected";
          }
          $s_obsLimitApertura= $_POST['obsLimitApertura'];
          //-------------------------------------------------------//
          $s_dolorArticular= $_POST['dolorArticular'];
          if ($s_dolorArticular == "Normal")
          {
               $dolorArticularNormal ="selected";
          }
          if ($s_dolorArticular == "Anormal")
          {
               $dolorArticularAnormal ="selected";
          }
          $s_obsDolorArticular= $_POST['obsDolorArticular'];
          //-------------------------------------------------------//
          $s_dolorMuscular= $_POST['dolorMuscular'];
          if ($s_dolorMuscular == "Normal")
          {
               $dolorMuscularNormal ="selected";
          }
          if ($s_dolorMuscular == "Anormal")
          {
               $dolorMuscularAnormal ="selected";
          }
          $s_obsDolorMuscular= $_POST['obsDolorMuscular'];
          //-------------------------------------------------------//
          //VARIABLES HIGIENE ORAL
          $s_higiene= $_POST['higiene'];
          if ($s_higiene == "Buena")
          {
               $hBuena="selected";
          }
          if ($s_higiene == "Regular")
          {
               $hRegular="selected";
          }
          if ($s_higiene == "Mala")
          {
               $hMala="selected";
          }
          //-------------------------------------------------------//
          $s_freCepillado= $_POST['freCepillado'];
          if ($s_freCepillado == "Tres Veces")
          {
               $fCtres="selected";
          }
          if ($s_freCepillado == "Dos Veces")
          {
               $fCdos="selected";
          }
          if ($s_freCepillado == "Una Vez")
          {
               $fCuno="selected";
          }
          //-------------------------------------------------------//
          $s_sedaDental= $_POST['sedaDental'];
          if ($s_sedaDental =="")
          {
      $s_sedaDental = "N";
          }
           else
          {    
           $chkSedaDental = "checked";
          }
          //-------------------------------------------------------//
          
          $s_pigmentacion= $_POST['pigmentacion'];
          if ($s_pigmentacion =="")
          {
      $s_pigmentacion = "N";
          }
           else
          {    
           $chkPigmentacion = "checked";
          }
          //-------------------------------------------------------//
          $s_gradoRiesgo= $_POST['gradoRiesgo'];
          if ($s_gradoRiesgo == "Bajo")
          {
               $grBajo="selected";
          }
          if ($s_gradoRiesgo == "Medio")
          {
               $grMedio="selected";
          }
          if ($s_gradoRiesgo == "Alto")
          {
               $grAlto="selected";
          }
          //-------------------------------------------------------//
          $s_obsHigiene= $_POST['obsHigiene'];
          
          //VARIABLES EXAMEN PULPAR
          $s_cuelloSencible= $_POST['cuelloSencible'];
          if ($s_cuelloSencible =="")
          {
      $s_cuelloSencible = "N";
          }
           else
          {    
           $chkCuelloSencible = "checked";
          }
          $s_obsCuelloSencible= $_POST['obsCuelloSencible'];
          //-------------------------------------------------------//
          $s_abscesos= $_POST['abscesos'];
          if ($s_abscesos =="")
          {
      $s_abscesos = "N";
          }
           else
          {    
           $chkAbscesos= "checked";
          }
          $s_obsAbscesos= $_POST['obsAbscesos'];
          //-------------------------------------------------------//
          $s_exposicionPulpar= $_POST['exposicionPulpar'];
          if ($s_exposicionPulpar =="")
          {
      $s_exposicionPulpar = "N";
          }
           else
          {    
           $chkExposicionPulpar= "checked";
          }
          $s_obsExposicionPulpar= $_POST['obsExposicionPulpar'];
          //-------------------------------------------------------//
          $s_cambioColor= $_POST['cambioColor'];
          if ($s_cambioColor =="")
          {
      $s_cambioColor = "N";
          }
           else
          {    
           $chkCambioColor= "checked";
          }
          $s_obsCambioColor= $_POST['obsCambioColor'];
          //-------------------------------------------------------//
          //VARIABLES TEJIDOS DENTARIOS Y OCLUSION
          $s_supernumerarios= $_POST['supernumerarios'];
          if ($s_supernumerarios =="")
          {
      $s_supernumerarios = "N";
          }
           else
          {    
           $chkSupernumerarios= "checked";
          }
          $s_obsSupernumerarios= $_POST['obsSupernumerarios'];
          //-------------------------------------------------------//
          $s_decoloracion= $_POST['decoloracion'];
          if ($s_decoloracion =="")
          {
      $s_decoloracion = "N";
          }
           else
          {    
           $chkDecoloracion= "checked";
          }
          $s_obsDecoloracion= $_POST['obsDecoloracion'];
          //-------------------------------------------------------//
          $s_descalsificacion= $_POST['descalsificacion'];
          if ($s_descalsificacion =="")
          {
      $s_descalsificacion = "N";
          }
           else
          {    
           $chkDescalsificacion= "checked";
          }
          $s_obsDescalsificacion= $_POST['obsDescalsificacion'];
          //-------------------------------------------------------//
          $s_facetaDesgaste= $_POST['facetaDesgaste'];
          if ($s_facetaDesgaste =="")
          {
      $s_facetaDesgaste = "N";
          }
           else
          {    
           $chkFacetaDesgaste= "checked";
          }
          $s_obsFacetaDesgaste= $_POST['obsFacetaDesgaste'];
          //-------------------------------------------------------//
          $s_abrasion= $_POST['abrasion'];
          if ($s_abrasion =="")
          {
      $s_abrasion = "N";
          }
           else
          {    
           $chkAbrasion= "checked";
          }
          $s_obsAbrasion= $_POST['obsAbrasion'];
          //-------------------------------------------------------//
          //VARIABLES PROTESIS   
          $s_protesis = $_POST['protesis'];
          if ($s_protesis =="")
          {
      $s_protesis = "N";
          }
           else
          {    
           $chkProtesis = "checked";
          }
          $s_obsProtesis = $_POST['obsProtesis'];
          //-------------------------------------------------------//
          //VARIABLES ALTERACIONES PERIODENTALES  
          $s_sangrado= $_POST['sangrado'];
          if ($s_sangrado =="")
          {
              $s_sangrado = "N";
          }
          else
          {    
              $chkSangrado = "checked";
          }
          $s_obsSangrado= $_POST['obsSangrado'];
          //---------------------------------------//
          $s_exudado = $_POST['exudado'];
          if ($s_exudado=="")
          {
              $s_exudado = "N";
          }
          else
          {    
              $chkExudado = "checked";
          }
          $s_obsExudado = $_POST['obsExudado'];
          //---------------------------------------//
          $s_supuracion = $_POST['supuracion'];
          if ($s_supuracion =="")
          {
              $s_supuracion = "N";
          }
          else
          {    
              $chkSupuracion = "checked";
          }
          $s_obsSupuracion = $_POST['obsSupuracion'];
          //---------------------------------------// 
          $s_calculos= $_POST['calculos'];
          if ($s_calculos =="")
          {
              $s_calculos = "N";
          }
          else
          {    
              $chkCalculos = "checked";
          }
          $s_obsCalculos= $_POST['obsCalculos'];
          //-------------------------------------------------------//
          $s_inflamacion= $_POST['inflamacion'];
          if ($s_inflamacion =="")
          {
              $s_inflamacion = "N";
          }
          else
          {    
              $chkInflamacion = "checked";
          }
          $s_obsInflamacion= $_POST['obsInflamacion'];
          //-------------------------------------------------------//
          $s_retracciones= $_POST['retracciones'];
          if ($s_retracciones =="")
          {
              $s_retracciones = "N";
          }
          else
          {    
              $chkRetracciones = "checked";
          }
          $s_obsRetracciones= $_POST['obsRetracciones'];
          //-------------------------------------------------------//
          $s_presenciaBolsas= $_POST['presenciaBolsas'];
          if ($s_presenciaBolsas =="")
          {
              $s_presenciaBolsas = "N";
          }
          else
          {    
              $chkPresenciaBolsas = "checked";
          }
          $s_obsPresenciaBolsas= $_POST['obsPresenciaBolsas'];
          //-------------------------------------------------------//
          $s_tipOclusion= $_POST['tipOclusion'];
          if ($s_tipOclusion =="")
          {
              $s_tipOclusion = "N";
          }
          else
          {    
              $chkTipOclusion = "checked";
          }
          $s_obsTipOclusion= $_POST['obsTipOclusion'];
          //-------------------------------------------------------//
          
          //Controla el numero de consulta
          if ($s_yaGrabo=="")
          {
            $activeBoton = "S";
            $mensaje = "Toque Seguir Para Ingresar los Ordenamientos";
            // conexion a la base de datos
            //include("conexion.php");
            // Realiza consulta del numero de consulta a asignar MySQL
            $query = "SELECT numConsulta AS nroCon FROM SIO_CON_CONSULTAS"; //WHERE nitEmpresa=$s_nitEmpresa";
            
            $result = mysql_query($query) or die('Consulta de Numero Consulta fallida: ' . mysql_error());
            $line = mysql_fetch_array($result, MYSQL_ASSOC);
            //asigna valores a variables de trabajo
            $nvoNroCon = $line["nroCon"];
            $nvoNroCon = $nvoNroCon+1;
            $e_nvoNroCon = $nvoNroCon; 
          
            $s_yaGrabo="S";
            // Liberar resultados
            mysql_free_result($result);
            
            //<!---------------- Realiza insercion de datos de movimiento de consultas de pacientes ---------------->
            // MOVIMIENTO DE CONSULTAS
            $query  = "INSERT INTO SIO_CON_PACIENTE " .
                       "(nitEmpresa, codSede, tipoId, idPaciente, numConsulta, tipoHistoria, causaConsulta, ".
                       "codEntidad, codTipoConsulta, fechaConsulta, medConsulta) " .
                       " VALUES($s_nitEmpresa, $s_codSede, '$s_tipoId', $s_identifica, $e_nvoNroCon, '$s_tipoHistoria', ".
                       " '$s_codCausa', '$s_codEntidad', $s_tipoCon, '$w_fechaHora', $s_idUsuario)";
            $result = mysql_query($query) or die('Adicion de movimiento en SIO_CON_PACIENTE: ' . mysql_error());  
            // Liberar resultados
             mysql_free_result($result); 
             
            //<!---------------- Realiza actualizacion de consecutivo de consultas ---------------->
            // NUMERO DE CONSULTA
            $query = "UPDATE SIO_CON_CONSULTAS SET numConsulta = $e_nvoNroCon";// WHERE nitEmpresa=$s_nitEmpresa";
            $result = mysql_query($query) or die('Modificacion numero de consulta  fallida: ' . mysql_error());
            // Liberar resultados
            mysql_free_result($result);
            
            //<!---------------- Realiza insercion de datos en movimiento de citas y actualiza estado de citas ----------------> 
    
           //echo "VIENE.." . $viene;
    
            if ($viene=="ME")
            {
              $w_fecha          = date("Y-m-d",time()); 
              date_default_timezone_set("America/Bogota");
              $fecha =  date("Y/m/d H:i:s");
              $queryU=" UPDATE SIO_O_CITAS set estado='ATENDIDA', fechaAtencion='$w_fecha', horaIniAtencion='$fecha', numConsulta=$nvoNroCon, tipoHistoria='$s_tipoHistoria' WHERE preconsulta=$pc";  
              $result = mysql_query($queryU) or die('Modificacion estado de preconsulta fallida: ' . mysql_error()); 
              // Liberar resultados
              mysql_free_result($result);
        
              $query = " INSERT INTO `SIO_O_CITAS_MOV` (`preConsulta`, `nitEmpresa`, `codSede`, `tipoId`, `idPaciente`, `estado`, `usuario`, `fechaEstado`, horaIniAtencion) ".
                        " VALUES ($pc, $s_nitEmpresa, $s_codSede, '$s_tipoId', $s_identifica, 'ATENDIDA',$s_idUsuario,'$w_fecha', '$w_fecha')";
              $result = mysql_query($query) or die('Insercion de movimiento de cita fallida: ' . mysql_error());  
              // Liberar resultados
              mysql_free_result($result); 
           }   
     
        //<!---------------- Inicio Situacion Actual ---------------->    
          }
          
          //Verifica existencia del registro en la tabla SIO_SIT_ACTUAL   
          $ct = cuantos("SIO_SIT_ACTUAL", $e_nvoNroCon, $s_tipoHistoria, $s_tipoId );
         
          if ($ct==0)//Insertar datos en SIO_SIT_ACTUAL
          {
            // conexion a la base de datos
            //include("conexion.php");
            $query = " INSERT INTO SIO_SIT_ACTUAL " .
                     " (nitEmpresa, codSede, numConsulta, idPaciente, tipoHistoria,  " .
                     " motivoConsulta, EnfermedadActual,antFamiliares, medConsulta) " .
                     " VALUES($s_nitEmpresa, $s_codSede, $e_nvoNroCon, $s_identifica, '$s_tipoHistoria', ".
                     "        '$s_motConsulta', '$s_enfActual', '$s_antFam', $s_idUsuario)";
           $result = mysql_query($query) or die('Error en Insercion de SIO_SIT_ACTUAL: ' . mysql_error());          
            // Liberar resultados
            mysql_free_result($result);
          }
          if ($ct==1)//Actualizar datos en SIO_SIT_ACTUAL
          {  
            // conexion a la base de datos
            //include("conexion.php");
            $query = " UPDATE SIO_SIT_ACTUAL ".
                     " SET motivoConsulta='$s_motConsulta', EnfermedadActual='$s_enfActual', antFamiliares='$s_antFam' ".
                     " WHERE numConsulta=$e_nvoNroCon ";
            $result = mysql_query($query) or die('Error en Actualizacion de SIO_SIT_ACTUAL: ' . mysql_error());
            // Liberar resultados
            mysql_free_result($result);
          }
          
          //Verifica existencia del registro en la tabla SIO_ANT_ODYMED
          $ct = cuantos("SIO_ANT_ODYMED", $e_nvoNroCon, $s_tipoHistoria, $s_tipoId );
          if ($ct==0)//Insertar datos en SIO_ANT_ODYMED
          {
            // conexion a la base de datos
            //include("conexion.php");
            $query = " INSERT INTO SIO_ANT_ODYMED(nitEmpresa, codSede, numConsulta, idPaciente, tipoHistoria, " .
                     " alergias, obsAlergias, altPresArterial, obsAltPresArterial, cardiopatias, obsCardiopatias, ".
                     " cirugias, obsCirugias, diabetes, obsDiabetes, discrasiasSang, obsDiscrasiasSang, ".
                     " embarazo, obsEmbarazo, enfOrales, obsEnfOrales, exodoncias, obsExodoncias, ".
                     " fiebreReum, obsFiebreReum, hepatitis, obsHepatitis, inmunosupresion, obsInmunosupresion, ". 
                     " patologiasRenales, obsPatologiasRenales, patRespiratoria, obsPatRespiratoria, sida, obsSida, ". 
                     " tomaMedicamentos, obsTomaMedicamentos, sinusitis, obsSinusitis, trasEmocional, obsTrasEmocional, ".
                     " trasGastricos, obsTrasGastricos, tratMedActual, obsTratMedActual, ".
                     " usoProtesis, obsUsoProtesis, habitos, medConsulta) ".
                     " VALUES($s_nitEmpresa, $s_codSede, $e_nvoNroCon, $s_identifica, '$s_tipoHistoria', ". 
                     " '$s_alergias', '$s_obsAlergia', '$s_altPresArterial', '$s_obsAltPresArterial', '$s_cardiopatias', '$s_obsCardiopatias', ".
                     " '$s_cirugias', '$s_obsCirugias','$s_diabetes','$s_obsDiabetes', '$s_discrasiasSang', '$s_obsDiscrasiasSang', ".
                     " '$s_embarazo', '$s_obsEmbarazo', '$s_enfOrales', '$s_obsEnfOrales', '$s_exodoncias', '$s_obsExodoncias', ".              
                     " '$s_fiebreReum', '$s_obsFiebreReum', '$s_hepatitis', '$s_obsHepatitis', '$s_inmunosupresion', '$s_obsInmunosupresion', ".
                     " '$s_patologiasRenales', '$s_obsPatologiasRenales', '$s_patRespiratoria', '$s_obsPatRespiratoria', '$s_sida', '$s_obsSida', ". 
                     " '$s_tomaMedicamentos', '$s_obsTomaMedicamentos', '$s_sinusitis', '$s_obsSinusitis', '$s_trasEmocional', '$s_obsTrasEmocional', ".
                     " '$s_trasGastricos', '$s_obsTrasGastricos', '$s_tratMedActual', '$s_obsTratMedActual', ".  
                     " '$s_usoProtesis', '$s_obsUsoProtesis', '$s_habitos', $s_idUsuario) ";
            $result = mysql_query($query) or die('Error en adicion de SIO_ANT_ODYMED: ' . mysql_error());
            // Liberar resultados
            mysql_free_result($result);        
          }
          if ($ct==1)//Actualizar datos en SIO_ANT_ODYMED
          {
            // conexion a la base de datos
            //include("conexion.php");
            $query = " UPDATE SIO_ANT_ODYMED ".
                     " SET alergias='$s_alergias', obsAlergias='$s_obsAlergia', altPresArterial='$s_altPresArterial', obsAltPresArterial='$s_obsAltPresArterial', ".
                     " cardiopatias='$s_cardiopatias', obsCardiopatias='$s_obsCardiopatias', cirugias='$s_cirugias', obsCirugias='$s_obsCirugias', ".
                     " diabetes='$s_diabetes', obsDiabetes='$s_obsDiabetes', discrasiasSang='$s_discrasiasSang', obsDiscrasiasSang='$s_obsDiscrasiasSang', ".
                     " embarazo='$s_embarazo', obsEmbarazo='$s_obsEmbarazo', enfOrales='$s_enfOrales', obsEnfOrales='$s_obsEnfOrales', ".
                     " exodoncias='$s_exodoncias', obsExodoncias='$s_obsExodoncias', fiebreReum='$s_fiebreReum', obsFiebreReum='$s_obsFiebreReum',".
                     " hepatitis='$s_hepatitis', obsHepatitis='$s_obsHepatitis', inmunosupresion='$s_inmunosupresion', obsInmunosupresion='$s_obsInmunosupresion', ".
                     " patologiasRenales='$s_patologiasRenales', obsPatologiasRenales='$s_obsPatologiasRenales', patRespiratoria='$s_patRespiratoria', ".
                     " obsPatRespiratoria='$s_obsPatRespiratoria', sida='$s_sida', obsSida='$s_obsSida',tomaMedicamentos='$s_tomaMedicamentos', ".
                     " obsTomaMedicamentos='$s_obsTomaMedicamentos', sinusitis='$s_sinusitis', obsSinusitis='$s_obsSinusitis', trasEmocional='$s_trasEmocional', ".
                     " obsTrasEmocional='$s_obsTrasEmocional', trasGastricos='$s_trasGastricos', obsTrasGastricos='$s_obsTrasGastricos', tratMedActual='$s_tratMedActual',".
                     " obsTratMedActual='$s_obsTratMedActual', usoProtesis='$s_usoProtesis', obsUsoProtesis='$s_obsUsoProtesis', habitos='$s_habitos' ".
                     " WHERE numConsulta=$e_nvoNroCon ";
                     
            $result = mysql_query($query) or die('Error en modificacion de SIO_ANT_ODYMED: ' . mysql_error());
            // Liberar resultados
            mysql_free_result($result);
          }
          
          //Verifica existencia del registro en la tabla SIO_EXA_ESTOMATOLOGICO
          $ct = cuantos("SIO_EXA_ESTOMATOLOGICO", $e_nvoNroCon, $s_tipoHistoria, $s_tipoId );
          if ($ct==0)//Insertar datos en SIO_EXA_ESTOMATOLOGICO
          {
            // conexion a la base de datos
            //include("conexion.php");
            $query = " INSERT INTO SIO_EXA_ESTOMATOLOGICO(nitEmpresa, codSede, numConsulta, idPaciente, tipoHistoria, ". 
                     " labioInferior, obsLabioInferior, labioSuperior, obsLabioSuperior, comisuras, obsComisuras, mucosaOral, obsMucosaOral, ". 
                     " surcosYugales, obsSurcosYugales, frenillos, obsFrenillos, oroFaringe, obsOrofaringe, ".
                     " paladar, obsPaladar, glandSalivales, obsGlandSalivales, pisoBoca, obsPisoBoca, ".
                     " dorsoLengua, obsDorsoLengua, vientreLengua, obsVientreLengua, medConsulta )".
                     " VALUES ($s_nitEmpresa, $s_codSede, $e_nvoNroCon, $s_identifica, '$s_tipoHistoria', ".
                     " '$s_labioInferior', '$s_obsLabioInferior', '$s_labioSuperior', '$s_obsLabioSuperior', '$s_comisuras', '$s_obsComisuras', '$s_mucosaOral', ".
                     " '$s_obsMucosaOral', ".
                     " '$s_surcosYugales', '$s_obsSurcosYugales', '$s_frenillos', '$s_obsFrenillos', '$s_oroFaringe', '$s_obsOrofaringe', ".
                     " '$s_paladar', '$s_obsPaladar', '$s_glandSalivales', '$s_obsGlandSalivales', '$s_pisoBoca', '$s_obsPisoBoca', ".
                     " '$s_dorsoLengua', '$s_obsDorsoLengua', '$s_vientreLengua', '$s_obsVientreLengua', $s_idUsuario)";
            $result = mysql_query($query) or die('Error en adicion de SIO_EXA_ESTOMATOLOGICO: ' . mysql_error());
            // Liberar resultados
            mysql_free_result($result);         
          }
          if ($ct==1)//Actualizar datos en SIO_EXA_ESTOMATOLOGICO
          {
            // conexion a la base de datos
            //include("conexion.php");
            $query = " UPDATE SIO_EXA_ESTOMATOLOGICO " .
                     " SET labioInferior='$s_labioInferior', obsLabioInferior='$s_obsLabioInferior', labioSuperior='$s_labioSuperior', ".
                     " obsLabioSuperior='$s_obsLabioSuperior', comisuras='$s_comisuras', obsComisuras='$s_obsComisuras', mucosaOral='$s_mucosaOral', ".
                     " obsMucosaOral='$s_obsMucosaOral', surcosYugales='$s_surcosYugales', obsSurcosYugales='$s_obsSurcosYugales', frenillos='$s_frenillos',".
                     " obsFrenillos='$s_obsFrenillos', oroFaringe='$s_oroFaringe', obsOrofaringe='$s_obsOrofaringe',  paladar='$s_paladar', obsPaladar='$s_obsPaladar',".
                     " glandSalivales='$s_glandSalivales', obsGlandSalivales='$s_obsGlandSalivales', pisoBoca='$s_pisoBoca', obsPisoBoca='$s_obsPisoBoca', ".
                     " dorsoLengua='$s_dorsoLengua', obsDorsoLengua='$s_obsDorsoLengua', vientreLengua='$s_vientreLengua', obsVientreLengua='$s_obsVientreLengua'".
                     " WHERE numConsulta=$e_nvoNroCon ";          
            $result = mysql_query($query) or die('Error en modificacion de SIO_EXA_ESTOMATOLOGICO: ' . mysql_error());
            // Liberar resultados
            mysql_free_result($result);
          } 
          
          //Verifica existencia del registro en la tabla SIO_ART_TEMPORO
          $ct = cuantos("SIO_ART_TEMPORO", $e_nvoNroCon, $s_tipoHistoria, $s_tipoId );
          if ($ct==0)//Insertar datos en SIO_ART_TEMPORO
          {
            // conexion a la base de datos
            //include("conexion.php");
            $query = " INSERT INTO SIO_ART_TEMPORO(nitEmpresa, codSede, numConsulta, idPaciente, tipoHistoria, ".
                     " ruidos, obsRuidos, desviacion, obsDesviacion, cambioVolumen, obsCambioVolumen, bloqueoMand, obsBloqueMand, ".
                     " limitApertura, obsLimitApertura, dolorArticular, obsDolorArticular, dolorMuscular, obsDolorMuscular, medConsulta) ".
                     " VALUES ($s_nitEmpresa, $s_codSede, $e_nvoNroCon, $s_identifica, '$s_tipoHistoria', ".
                     " '$s_ruidos','$s_obsRuidos','$s_desviacion','$s_obsDesviacion','$s_cambioVolumen','$s_obsCambioVolumen','$s_bloqueoMand', ".
                     " '$s_obsBloqueMand','$s_limitApertura','$s_obsLimitApertura','$s_dolorArticular','$s_obsDolorArticular','$s_dolorMuscular',".
                     " '$s_obsDolorMuscular', $s_idUsuario)";
            $result = mysql_query($query) or die('Error en ADICION de SIO_ART_TEMPORO: ' . mysql_error());      
            // Liberar resultados
            mysql_free_result($result);        
          }
          if ($ct==1)//Actualizar datos en SIO_ART_TEMPORO
          {
            // conexion a la base de datos
            //include("conexion.php");
            $query = " UPDATE SIO_ART_TEMPORO ".
                     " SET ruidos='$s_ruidos', obsRuidos='$s_obsRuidos', desviacion='$s_desviacion', obsDesviacion='$s_obsDesviacion', ".
                     " cambioVolumen='$s_cambioVolumen', obsCambioVolumen='$s_obsCambioVolumen', bloqueoMand='$s_bloqueoMand',obsBloqueMand='$s_obsBloqueMand',".
                     " limitApertura='$s_limitApertura', obsLimitApertura='$s_obsLimitApertura', dolorArticular='$s_dolorArticular', ".
                     " obsDolorArticular='$s_obsDolorArticular', dolorMuscular='$s_dolorMuscular', obsDolorMuscular='$s_obsDolorMuscular'".
            " WHERE numConsulta=$e_nvoNroCon ";   
            $result = mysql_query($query) or die('Error en modificacion de SIO_ART_TEMPORO: ' . mysql_error());         
            // Liberar resultados
            mysql_free_result($result);
          } 
             
          //Verifica existencia del registro en la tabla SIO_HIG_ORAL
          $ct = cuantos("SIO_HIG_ORAL", $e_nvoNroCon, $s_tipoHistoria, $s_tipoId );
          if ($ct==0)//Insertar datos en SIO_HIG_ORAL
          {
            // conexion a la base de datos
            include("conexion.php");
            $query = " INSERT INTO SIO_HIG_ORAL(nitEmpresa, codSede, numConsulta, idPaciente, tipoHistoria, ".
                     " higiene, freCepillado, sedaDental, pigmentacion, gradoRiesgo, obsHigiene, medConsulta) ".
                     " VALUES ($s_nitEmpresa, $s_codSede, $e_nvoNroCon, $s_identifica, '$s_tipoHistoria', ".
                     " '$s_higiene', '$s_freCepillado', '$s_sedaDental', '$s_pigmentacion', '$s_gradoRiesgo', '$s_obsHigiene', $s_idUsuario)";
            $result = mysql_query($query) or die('Error en adicion de SIO_HIG_ORAL: ' . mysql_error());
            // Liberar resultados
            mysql_free_result($result);         
          }
          if ($ct==1)//Actualizar datos en SIO_HIG_ORAL
          {
            // conexion a la base de datos
            //include("conexion.php");
            $query = " UPDATE SIO_HIG_ORAL " .         
                     " SET higiene='$s_higiene', freCepillado='$s_freCepillado', sedaDental='$s_sedaDental', pigmentacion='$s_pigmentacion', ".
                     " gradoRiesgo='$s_gradoRiesgo', obsHigiene='$s_obsHigiene' ".
            " WHERE numConsulta=$e_nvoNroCon ";   
            $result = mysql_query($query) or die('Error en modificacion de SIO_HIG_ORAL: ' . mysql_error());         
            // Liberar resultados
            mysql_free_result($result);
          }   
          
          //Verifica existencia del registro en la tabla SIO_EXA_PULPAR
          $ct = cuantos("SIO_EXA_PULPAR", $e_nvoNroCon, $s_tipoHistoria, $s_tipoId );
          if ($ct==0)//Insertar datos en SIO_EXA_PULPAR
          {
            // conexion a la base de datos
            include("conexion.php");
            $query = " INSERT INTO SIO_EXA_PULPAR(nitEmpresa, codSede, numConsulta, idPaciente, tipoHistoria, ".
                     " cuelloSencible, obsCuelloSencible, abscesos, obsAbscesos, exposicionPulpar, ".
                     " obsExposicionPulpar, cambioColor, obsCambioColor, medConsulta)". 
                     " VALUES ($s_nitEmpresa, $s_codSede, $e_nvoNroCon, $s_identifica, '$s_tipoHistoria', ".   
                     " '$s_cuelloSencible', '$s_obsCuelloSencible', '$s_abscesos','$s_obsAbscesos', '$s_exposicionPulpar',".
                     " '$s_obsExposicionPulpar','$s_cambioColor', '$s_obsCambioColor', $s_idUsuario)";
            $result = mysql_query($query) or die('Error en adicion de SIO_HIG_ORAL: ' . mysql_error());
            // Liberar resultados
            mysql_free_result($result);         
          }
          if ($ct==1)//Actualizar datos en SIO_EXA_PULPAR
          {
            // conexion a la base de datos
            //include("conexion.php");
            $query = " UPDATE SIO_EXA_PULPAR ".
                     " SET cuelloSencible='$s_cuelloSencible', obsCuelloSencible='$s_obsCuelloSencible', abscesos='$s_abscesos', obsAbscesos='$s_obsAbscesos', ".
                     " exposicionPulpar='$s_exposicionPulpar', obsExposicionPulpar='$s_obsExposicionPulpar', cambioColor='$s_cambioColor', ".
                     " obsCambioColor='$s_obsCambioColor' ".
            " WHERE numConsulta=$e_nvoNroCon ";
            $result = mysql_query($query) or die('Error en modificacion de SIO_EXA_PULPAR: ' . mysql_error());
            // Liberar resultados
            mysql_free_result($result);         
          }  
          
          //Verifica existencia del registro en la tabla SIO_TEJ_DENTARIOS
          $ct = cuantos("SIO_TEJ_DENTARIOS", $e_nvoNroCon, $s_tipoHistoria, $s_tipoId );
          if ($ct==0)//Insertar datos en SIO_TEJ_DENTARIOS
          {
            // conexion a la base de datos
            //include("conexion.php");
            $query = " INSERT INTO SIO_TEJ_DENTARIOS(nitEmpresa, codSede, numConsulta, idPaciente, tipoHistoria, ".
                     " Supernumerarios, obsSupernumerarios, decoloracion ,obsDecoloracion, Descalsificacion, obsDescalsificacion, ".
                     " facetaDesgaste, obsFacetaDesgaste, abrasion, obsAbrasion, medConsulta)".
                     " VALUES ($s_nitEmpresa, $s_codSede, $e_nvoNroCon, $s_identifica, '$s_tipoHistoria', ".
                     " '$s_supernumerarios', '$s_obsSupernumerarios', '$s_decoloracion', '$s_obsDecoloracion', '$s_descalsificacion', ".
                     " '$s_obsDescalsificacion', '$s_facetaDesgaste', '$s_obsFacetaDesgaste', '$s_abrasion', '$s_obsAbrasion', $s_idUsuario)";
             $result = mysql_query($query) or die('Error en adicion de SIO_TEJ_DENTARIOS: ' . mysql_error());
             // Liberar resultados
             mysql_free_result($result);         
          }
          if ($ct==1)//Actualizar datos en SIO_TEJ_DENTARIOS
          {
            // conexion a la base de datos
            //include("conexion.php");
            $query = " UPDATE SIO_TEJ_DENTARIOS ".    
                     " SET supernumerarios='$s_supernumerarios',obsSupernumerarios='$s_obsSupernumerarios',decoloracion='$s_decoloracion',".
                     " obsDecoloracion='$s_obsDecoloracion', descalsificacion='$s_descalsificacion',obsDescalsificacion='$s_obsDescalsificacion', ".
                     " facetaDesgaste='$s_facetaDesgaste',obsFacetaDesgaste='$s_obsFacetaDesgaste',abrasion='$s_abrasion',obsAbrasion='$s_obsAbrasion'".    
                     " WHERE numConsulta=$e_nvoNroCon ";
            $result = mysql_query($query) or die('Error en modificacion de SIO_TEJ_DENTARIOS: ' . mysql_error());
            // Liberar resultados
            mysql_free_result($result);         
          }   
          
          //Verifica existencia del registro en la tabla SIO_PRE_PROTESIS
          $ct = cuantos("SIO_PRE_PROTESIS", $e_nvoNroCon, $s_tipoHistoria, $s_tipoId );
          if ($ct==0)//Insertar datos en SIO_PRE_PROTESIS
          {
            // conexion a la base de datos
            include("conexion.php");
            $query = " INSERT INTO SIO_PRE_PROTESIS(nitEmpresa, codSede, numConsulta, idPaciente, tipoHistoria, ".
                     " protesis, obsProtesis, medConsulta)".
                     " VALUES ($s_nitEmpresa, $s_codSede, $e_nvoNroCon, $s_identifica, '$s_tipoHistoria', ".
                     " '$s_protesis', '$s_obsProtesis', $s_idUsuario)"; 
            $result = mysql_query($query) or die('Error en adicion de SIO_PRE_PROTESIS: ' . mysql_error());
             // Liberar resultados
             mysql_free_result($result);         
          }
          if ($ct==1)//Actualizar datos en SIO_PRE_PROTESIS;
          {
            // conexion a la base de datos
            //include("conexion.php");
            $query = " UPDATE SIO_PRE_PROTESIS ".    
                     " SET protesis='$s_protesis', obsProtesis='$s_obsProtesis'".
                     " WHERE numConsulta=$e_nvoNroCon ";
                     
            $result = mysql_query($query) or die('Error en modificacion de SIO_PRE_PROTESIS: ' . mysql_error());
            // Liberar resultados
            mysql_free_result($result);         
          }   
          
          //Verifica existencia del registro en la tabla SIO_ALT_PERIODONTALESS
          $ct = cuantos("SIO_ALT_PERIODONTALES", $e_nvoNroCon, $s_tipoHistoria, $s_tipoId );
          if ($ct==0)//Insertar datos en SIO_ALT_PERIODONTALESS
          {
            // conexion a la base de datos
            //include("conexion.php");
            $query = " INSERT INTO SIO_ALT_PERIODONTALES(nitEmpresa, codSede, numConsulta, idPaciente, tipoHistoria, ".
                     " sangrado, obsSangrado, exudado, obsExudado, supuracion, obsSupuracion,calculos, obsCalculos , inflamacion, ".
                     " obsInflamacion, retracciones, obsRetracciones, presenciaBolsas, obsPresenciaBolsas, tipOclusion, obsTipOclusion, medConsulta)". 
                     " VALUES ($s_nitEmpresa, $s_codSede, $e_nvoNroCon, $s_identifica, '$s_tipoHistoria', ".
                     " '$s_sangrado', '$s_obsSangrado', '$s_exudado', '$s_obsExudado', '$s_supuracion', '$s_obsSupuracion', '$s_calculos', '$s_obsCalculos',". 
                     " '$s_inflamacion', '$s_obsInflamacion', '$s_retracciones', '$s_obsRetracciones', '$s_presenciaBolsas', '$s_obsPresenciaBolsas', ".   
                     " '$s_tipOclusion', '$s_obsTipOclusion', $s_idUsuario)"; 
                          
             $result = mysql_query($query) or die('Error en adicion de SIO_ALT_PERIODONTALES: ' . mysql_error());
             // Liberar resultados
             mysql_free_result($result);         
          }
          if ($ct==1)//Actualizar datos en SIO_ALT_PERIODENTALESS
          {
            // conexion a la base de datos
            //include("conexion.php");
            $query = " UPDATE SIO_ALT_PERIODONTALES ".
                     " SET sangrado='$s_sangrado', obsSangrado='$s_obsSangrado', exudado='$s_exudado', obsExudado='$s_obsExudado', supuracion='$s_supuracion',".
                     " obsSupuracion='$s_obsSupuracion', calculos='$s_calculos', obsCalculos='$s_obsCalculos', inflamacion='$s_inflamacion', ".
                     " obsInflamacion='$s_obsInflamacion', retracciones='$s_retracciones', obsRetracciones='$s_obsRetracciones', ".
                     " presenciaBolsas='$s_presenciaBolsas',  obsPresenciaBolsas='$s_obsPresenciaBolsas', tipOclusion='$s_tipOclusion', obsTipOclusion='$s_obsTipOclusion' ". 
                     " WHERE numConsulta=$e_nvoNroCon ";
            $result = mysql_query($query) or die('Error en modificacion de SIO_ALT_PERIODONTALES: ' . mysql_error());
            // Liberar resultados
            mysql_free_result($result);         
          }             
          
          /*-----ALERGIAS----*/
          if ($s_alergias!=""){
               $queryAlerg="SELECT COUNT(*) AS cuantos FROM SIO_ALERGIAS WHERE tipoId= '$s_tipoId ' AND numeroId=$s_identifica ";
               $resultAlerg = mysql_query($queryAlerg) or die('Consulta de existencia de alergias fallida: ' . mysql_error());   
               $lineAlerg = mysql_fetch_array($resultAlerg, MYSQL_ASSOC);

               //asigna valores a variables de trabajo
               $cuantos = $lineAlerg["cuantos"];
  
               if ($cuantos==0){
                //inserta en alergias
                $queryA = "INSERT INTO SIO_ALERGIAS(tipoId, numeroId, alergias) VALUES('$s_tipoId', $s_identifica, '$s_alergiaspac')";
                $resultAlerg = mysql_query($queryA) or die('Adicion de alergias fallida: ' . mysql_error());   
               }
               else
               {
                 //modifica en alergias
                 $queryA = "UPDATE SIO_ALERGIAS SET alergias = '$s_alergiaspac' WHERE tipoId= '$s_tipoId ' AND numeroId=$s_identifica ";
                 $resultAlerg = mysql_query($queryA) or die('Modificacion de alergias fallida: ' . mysql_error());
               }
               
          }//if alergias
          /*-----FIN ALERGIAS----*/  


          /*-----FAMILIAR----*/
          if($s_familiar!="")
          {
            //Verifica existencia del registro en la tabla SIO_FAMILIAR   
            $query  = " SELECT COUNT(*) as cuantos FROM SIO_FAMILIAR WHERE numConsulta = $e_nvoNroCon";
            $result = mysql_query($query) or die('Consulta de cantidad $tabla: ' . mysql_error());
            $line   = mysql_fetch_array($result, MYSQL_ASSOC);
            $ct     = $line["cuantos"];

            if($ct==0)
            {
              $queryFam = "INSERT INTO SIO_FAMILIAR (tipoId, idPaciente, numConsulta, familiar, parentesco, telPariente)".
                          " VALUES ('$s_tipoId', $s_identifica,  $e_nvoNroCon, '$s_familiar', '$s_parentesco', '$s_telPariente')";  
              $resultFam = mysql_query($queryFam) or die('Adicion de familiares fallida: ' . mysql_error());  
            }
          } 
          /*-----FIN FAMILIAR----*/ 

          // Cerrar la conexion
          mysql_close($link);
    
        } //fin if _post
        
      ?>
      <p></p>
      <table width="960" border="0" align="center" cellpadding="0" class="tablaProductos">  
         <tr>
           <td align="center" class="titulosTabla" colspan="3">
             <label>HISTORIA CLINICA ODONTOLOGICA DE URGENCIAS <?=$e_nvoNroCon?></label>
           </td>
         </tr> 
        
        <tr>
           <td width="30%"class="subtutulosTabla" align="center" style="border-radius:3px;" >Paciente:</td>
           <td width="60%" class="titulosTabla1" align="left">
             <?=$s_tipoId?> No.: <?=$s_identifica?>  - <?=$w_nomPac?> 
          </td>
          <td width="10%" class="titulosTabla1">RH: <?=$w_rhPac?></td>
        </tr>       
      </table> 
      
      <form method="post" action="<?php echo $_SERVER['PHP_SELF']; ?>">
        <table align="center" border="0" width="960" > 
         <tr>
            <td class="negrita" colspan="2" align="center">En las descripciones no incluir caracteres especiales como las comillas dobles o las comillas simples (" o ')</td>
         </tr>
        </table>    
        <table align="center" border="0" width="960" class="tablaProductos"> 
          <tr>
             <td align="center"><span class="icon-volume-high" style="font-size:16px; color:#e74c3c;"></span> <span style="font-size:16px; color:#e74c3c; font-family:Arial;"> ALERTAS:Alergias - Medicamentos </span></td>
           </tr>
           <tr>
             <td align="center">
               <textarea rows="3" cols="110" wrap="soft" name="alergiaspac" id="alergiaspac"><?=$s_alergiaspac?></textarea>
             </td>
           </tr> 
         </table>     

        <p></p>
        <div id="CollapsiblePanel1" class="CollapsiblePanel">
          <div class="CollapsiblePanelTab" tabindex="0" align="left">[+]SITUACION ACTUAL</div>
            <div class="CollapsiblePanelContent"> 
              <table width="960" border="1" align="center" cellpadding="0">
                <tr class="titulosTabla">
                  <td><label>Motivo Consulta</label></td>
                </tr>
                
                <tr> 
                  <td align="center">
                    <textarea rows="4" cols="115" wrap="soft" name="motivoConsulta" id="motivoConsulta" required><?=$s_motConsulta?></textarea>
                  </td>
                </tr> 
                <tr class="titulosTabla">
                  <td><label>Enfermedad Actual</label></td>
                </tr> 
                <tr>
                  <td align="center">
                   <textarea rows="4" cols="115" wrap="soft" name="enfermedadActual" id="enfermedadActual" required><?=$s_enfActual?></textarea>   
                  </td>
                </tr>  
                <tr class="titulosTabla">
                  <td align="center">
                    <label>Antecedentes Familiares</label>                        
                  </td>
                </tr> 
                <tr>
                  <td align="center">
                    <textarea rows="4" cols="115" wrap="soft" name="antecedentesFam" id="antecedentesFam"><?=$s_antFam?></textarea>   
                  </td>
                </tr>  
                <!--<tr>
                  <td align="center">
                  <input type="submit" name="submit" value="Grabar Situaci&oacute;n Actual" style="width:400px;height:40px;"><br>   
                  </td>
                </tr>-->        
              </table>
           </div>
         </div> <!-- SITUACION ACTUAL -->
         
         <div id="CollapsiblePanel2" class="CollapsiblePanel">
          <div class="CollapsiblePanelTab" tabindex="0" align="left">[+]ANTECEDENTES ODONTOLOGICOS Y MEDICOS GENERALES</div>
            <div class="CollapsiblePanelContent"> 
              <table width="960" border="1" align="center" cellpadding="0">
                <tr class="titulosTabla" align="center">
                  <td width="60%"><label>Antecedente</label></td>
                  <td width="5%"><label>SI</label></td>
                  <td width="35%"><label>Observaciones</label></td>
                </tr>
                <tr class="camposTabla">
                  <td>Alergias</td>
                  <td align="center"><input <?=$chkAlergia?> id="alergias" name="alergias" type="checkbox" value="S" /></td>
                  <td align="center"><textarea rows="2" cols="80" wrap="soft" name="obsAlergia" id="obsAlergia"><?=$s_obsAlergia?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Alteracion presion arterial</td>
                  <td align="center"><input <?=$chkPresArt?> id="altPresArterial" name="altPresArterial" type="checkbox" value="S" /></td>
                  <td align="center"><textarea rows="2" cols="80" wrap="soft" name="obsAltPresArterial" id="obsAltPresArterial"><?=$s_obsAltPresArterial?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Cardiopatias</td>
                  <td align="center"><input <?=$chkCardio?> id="cardiopatias" name="cardiopatias" type="checkbox" value="S" /></td>
                  <td align="center"><textarea rows="2" cols="80" wrap="soft" name="obsCardiopatias" id="obsCardiopatias"><?=$s_obsCardiopatias?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Cirugias (Inclusion Orales)</td>
                  <td align="center"><input <?=$chkCirugias?> id="cirugias" name="cirugias" type="checkbox" value="S" /></td>
                  <td align="center"><textarea rows="2" cols="80" wrap="soft" name="obsCirugias" id="obsCirugias"><?=$s_obsCirugias?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Diabetes</td>
                  <td align="center"><input <?=$chkDiabetes?> id="diabetes" name="diabetes" type="checkbox" value="S" /></td>
                  <td align="center"><textarea rows="2" cols="80" wrap="soft" name="obsDiabetes" id="obsDiabetes"><?=$s_obsDiabetes?></textarea></td>
                </tr>
                <!--
                <tr class="camposTabla">
                  <td>Discracias Sanguineas</td>
                  <td align="center"><input <?=$chkDiscrasias?> id="discrasiasSang" name="discrasiasSang" type="checkbox" value="S" /></td>
                  <td align="center"><textarea rows="2" cols="80" wrap="soft" name="obsDiscrasiasSang" id="obsDiscrasiasSang"><?=$s_obsDiscrasiasSang?></textarea></td>
                </tr>
                -->
                <tr class="camposTabla">
                  <td>Embarazo</td>
                  <td align="center"><input <?=$chkEmbarazo?> id="embarazo" name="embarazo" type="checkbox" value="S" /></td>
                  <td align="center"><textarea rows="2" cols="80" wrap="soft" name="obsEmbarazo" id="obsEmbarazo"><?=$s_obsEmbarazo?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Enfermedades Orales</td>
                  <td align="center"><input <?=$chkEnfOrales?> id="enfOrales" name="enfOrales" type="checkbox" value="S" /></td>
                  <td align="center"><textarea rows="2" cols="80" wrap="soft" name="obsEnfOrales" id="obsEnfOrales"><?=$s_obsEnfOrales?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Exodoncias</td>
                  <td align="center"><input <?=$chkExodoncias?> id="exodoncias" name="exodoncias" type="checkbox" value="S" /></td>
                  <td align="center"><textarea rows="2" cols="80" wrap="soft" name="obsExodoncias" id="obsExodoncias"><?=$s_obsExodoncias?></textarea></td>
                </tr>
                <!--
                <tr class="camposTabla">
                  <td>Fiebre Reumatica</td>
                  <td align="center"><input <?=$chkFiebreReum?> id="fiebreReum" name="fiebreReum" type="checkbox" value="S" /></td>
                  <td align="center"><textarea rows="2" cols="80" wrap="soft" name="obsFiebreReum" id="obsFiebreReum"><?=$s_obsFiebreReum?></textarea></td>
                </tr>
                -->
                <tr class="camposTabla">
                  <td>Hepatitis</td>
                  <td align="center"><input <?=$chkHepatitis?> id="hepatitis" name="hepatitis" type="checkbox" value="S" /></td>
                  <td align="center"><textarea rows="2" cols="80" wrap="soft" name="obsHepatitis" id="obsHepatitis"><?=$s_obsHepatitis?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Inmunosupresion</td>
                  <td align="center"><input <?=$chkInmuno?> id="inmunosupresion" name="inmunosupresion" type="checkbox" value="S" /></td>
                  <td align="center"><textarea rows="2" cols="80" wrap="soft" name="obsInmunosupresion" id="obsInmunosupresion"><?=$s_obsInmunosupresion?></textarea></td>
                </tr>
                <!--
                <tr class="camposTabla">
                  <td>Patologias Renales</td>
                  <td align="center"><input <?=$chkPatRenal?> id="patologiasRenales" name="patologiasRenales" type="checkbox" value="S" /></td>
                  <td align="center"><textarea rows="2" cols="80" wrap="soft" name="obsPatologiasRenales" id="obsPatologiasRenales"><?=$s_obsPatologiasRenales?></textarea></td>
                </tr> 
                <tr class="camposTabla">
                  <td>Patologias Respiratoria</td>
                  <td align="center"><input <?=$chkPatResp?> id="patRespiratoria" name="patRespiratoria" type="checkbox" value="S" /></td>
                  <td align="center"><textarea rows="2" cols="80" wrap="soft" name="obsPatRespiratoria" id="obsPatRespiratoria"><?=$s_obsPatRespiratoria?></textarea></td>
                </tr>
                -->
                <tr class="camposTabla">
                  <td>Sida</td>
                  <td align="center"><input <?=$chkSida?> id="sida" name="sida" type="checkbox" value="S" /></td>
                  <td align="center"><textarea rows="2" cols="80" wrap="soft" name="obsSida" id="obsSida"><?=$s_obsSida?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Sinusitis</td>
                  <td align="center"><input <?=$chkSinusitis?> id="sinusitis" name="sinusitis" type="checkbox" value="S" /></td>
                  <td align="center"><textarea rows="2" cols="80" wrap="soft" name="obsSinusitis" id="obsSinusitis"><?=$s_obsSinusitis?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Toma Medicamentos</td>
                  <td align="center"><input <?=$chkTomaMedicamentos?> id="tomaMedicamentos" name="tomaMedicamentos" type="checkbox" value="S" /></td>
                  <td align="center"><textarea rows="2" cols="80" wrap="soft" name="obsTomaMedicamentos" id="obsTomaMedicamentos"><?=$s_obsTomaMedicamentos?></textarea></td>
                </tr>
                <!--
                <tr class="camposTabla">
                  <td>Trastornos Emocionales</td>
                  <td align="center"><input <?=$chktTrasEmocional?> id="trasEmocional" name="trasEmocional" type="checkbox" value="S" /></td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsTrasEmocional" id="obsTrasEmocional"><?=$s_obsTrasEmocional?></textarea></td>
                </tr>
                -->
                <tr class="camposTabla">
                  <td>Trastornos Gastricos</td>
                  <td align="center"><input <?=$chkTrasGastricos?> id="trasGastricos" name="trasGastricos" type="checkbox" value="S" /></td>
                  <td align="center"><textarea rows="2" cols="80" wrap="soft" name="obsTrasGastricos" id="obsTrasGastricos"><?=$s_obsTrasGastricos?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Tratamiento Medico Actual</td>
                  <td align="center"><input <?=$chkTratMedActual?> id="tratMedActual" name="tratMedActual" type="checkbox" value="S" /></td>
                  <td align="center"><textarea rows="2" cols="80" wrap="soft" name="obsTratMedActual" id="obsTratMedActual"><?=$s_obsTratMedActual?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Uso de protesis o aparatologia oral</td>
                  <td align="center"><input <?=$chkUsoProtesis?> id="usoProtesis" name="usoProtesis" type="checkbox" value="S" /></td>
                  <td align="center"><textarea rows="2" cols="80" wrap="soft" name="obsUsoProtesis" id="obsUsoProtesis"><?=$s_obsUsoProtesis?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Habitos, otras patologias y antecedentes </td>
                  <td colspan="2" align="center"><textarea rows="2" cols="80" wrap="soft" name="habitos" id="habitos"><?=$s_habitos?></textarea></td>
                </tr>
                <!--<tr>
                  <td colspan="3" align="center">
                  <input type="submit" name="submit" value="Grabar Antecedentes" style="width:400px;height:40px;"><br>   
                  </td>
                </tr>--> 
              </table>  
          </div>
         </div> <!--FIN ANTECEDENTES ODONTOLOGICOS Y MEDICOS GENERALES-->
         
         <div id="CollapsiblePanel3" class="CollapsiblePanel">
          <div class="CollapsiblePanelTab" tabindex="0" align="left">[+]EXAMEN ESTOMATOLOGICO</div>
            <div class="CollapsiblePanelContent"> 
              <table width="960" border="1" align="center" cellpadding="0">
                <tr class="titulosTabla" align="center">
                  <td width="30%"><label>Estructura</label></td>
                  <td width="5%"><label>SI</label></td>
                  <td width="80%"><label>Observaciones</label></td>
                </tr>
                <tr class="camposTabla">
                  <td>Labio Inferior</td>
                  <td> 
                     <select name="labioInferior" id="labioInferior">
                         <option <?=$labioInferiorNormal?> value="Normal">Normal</option>
                         <option <?=$labioInferiorAnormal?> value="Anormal">Anormal</option>
                     </select>
                  </td>   
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsLabioInferior" id="obsLabioInferior"><?=$s_obsLabioInferior?></textarea></td>
                </tr>
                <tr class="camposTabla">
                   <td>Labio Superior</td>
                   <td align="center">
                      <select name="labioSuperior" id="labioSuperior">
                           <option <?=$labioSuperiorNormal?> value="Normal">Normal</option>
                           <option <?=$labioSuperiorAnormal?> value="Anormal">Anormal</option>
                       </select>
                    </td>
                    <td><textarea rows="2" cols="80" wrap="soft" name="obsLabioSuperior" id="obsLabioSuperior"><?=$s_obsLabioSuperior?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Comisuras</td>
                  <td align="center">
                       <select name="comisuras" id="comisuras">
                           <option <?=$comisurasNormal?> value="Normal">Normal</option>
                           <option <?=$comisurasAnormal?> value="Anormal">Anormal</option>
                       </select>
                  </td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsComisuras" id="obsComisuras"><?=$s_obsComisuras?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Mucosa Oral</td>
                  <td align="center">
                       <select name="mucosaOral" id="mucosaOral">
                           <option <?=$mucosaOralNormal?> value="Normal">Normal</option>
                           <option <?=$mucosaOralAnormal?> value="Anormal">Anormal</option>
                       </select>
                  </td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsMucosaOral" id="obsmucosaOral"><?=$s_obsMucosaOral?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Surcos Yugales</td>
                  <td align="center">
                       <select name="surcosYugales" id="surcosYugales">
                           <option <?=$surcosYugalesNormal?> value="Normal">Normal</option>
                           <option <?=$surcosYugalesAnormal?> value="Anormal">Anormal</option>
                       </select>
                  </td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsSurcosYugales" id="obsSurcosYugales"><?=$s_obsSurcosYugales?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Frenillos</td>
                  <td align="center">
                       <select name="frenillos" id="frenillos">
                           <option <?=$frenillosNormal?> value="Normal">Normal</option>
                           <option <?=$frenillosAnormal?> value="Anormal">Anormal</option>
                       </select>
                  </td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsFrenillos" id="obsFrenillos"><?=$s_obsFrenillos?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>OroFaringe</td>
                  <td align="center">
                       <select name="oroFaringe" id="oroFaringe">
                           <option <?=$oroFaringeNormal?> value="Normal">Normal</option>
                           <option <?=$oroFaringeAnormal?> value="Anormal">Anormal</option>
                       </select> 
                  </td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsOrofaringe" id="obsOrofaringe"><?=$s_obsOrofaringe?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Paladar</td>
                  <td align="center">
                       <select name="paladar" id="paladar">
                           <option <?=$paladarNormal?> value="Normal">Normal</option>
                           <option <?=$paladarAnormal?> value="Anormal">Anormal</option>
                       </select>
                  </td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsPaladar" id="obsPaladar"><?=$s_obsPaladar?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Glandulas Salivales</td>
                  <td align="center">
                        <select name="glandSalivales" id="glandSalivales">
                           <option <?=$glandSalivalesNormal?> value="Normal">Normal</option>
                           <option <?=$glandSalivalesAnormal?> value="Anormal">Anormal</option>
                       </select>
                  </td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsGlandSalivales" id="obsGlandSalivales"><?=$s_obsGlandSalivales?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Piso de Boca</td>
                  <td align="center">
                        <select name="pisoBoca" id="pisoBoca">
                           <option <?=$pisoBocaNormal?> value="Normal">Normal</option>
                           <option <?=$pisoBocaAnormal?> value="Anormal">Anormal</option>
                       </select>
                  </td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsPisoBoca" id="obsPisoBoca"><?=$s_obsPisoBoca?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Dorso de Lengua</td>
                  <td align="center">
                        <select name="dorsoLengua" id="dorsoLengua">
                           <option <?=$dorsoLenguaNormal?> value="Normal">Normal</option>
                           <option <?=$dorsoLenguaAnormal?> value="Anormal">Anormal</option>
                       </select>
                  </td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsDorsoLengua" id="obsDorsoLengua"><?=$s_obsDorsoLengua?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Vientre de Lengua</td>
                  <td align="center">
                        <select name="vientreLengua" id="vientreLengua">
                           <option <?=$vientreLenguaNormal?> value="Normal">Normal</option>
                           <option <?=$vientreLenguaAnormal?> value="Anormal">Anormal</option>
                       </select>
                  </td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsVientreLengua" id="obsVientreLengua"><?=$s_obsVientreLengua?></textarea></td>
                </tr>
                <!--<tr>
                  <td colspan="3" align="center">
                  <input type="submit" name="submit" value="Grabar Estomatologico" style="width:400px;height:40px;"><br>   
                  </td>
                </tr>--> 
              </table>  
          </div>
         </div> <!--EXAMEN ESTOMATOLOGICO-->
         
         <div id="CollapsiblePanel4" class="CollapsiblePanel">
          <div class="CollapsiblePanelTab" tabindex="0" align="left">[+]ARTICULACION TEMPORO MANDIBULAR</div>
            <div class="CollapsiblePanelContent"> 
              <table width="960" border="1" align="center" cellpadding="0">
                <tr class="titulosTabla" align="center">
                  <td width="30%"><label></label></td>
                  <td width="5%"><label>SI</label></td>
                  <td width="80%"><label>Observaciones</label></td>
                </tr>
                <tr class="camposTabla">
                  <td>Ruidos</td>
                  <td align="center">
                       <select name="ruidos" id="ruidos">
                            <option <?=$ruidosNormal?> value="Normal">Normal</option>
                            <option <?=$ruidosAnormal?> value="Anormal">Anormal</option>
                       </select>
                  </td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsRuidos" id="obsRuidos"><?=$s_obsRuidos?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Desviacion</td>
                  <td align="center">
                         <select name="desviacion" id="desviacion">
                            <option <?=$desviacionNormal?> value="Normal">Normal</option>
                            <option <?=$desviacionAnormal?> value="Anormal">Anormal</option>
                       </select>
                  </td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsDesviacion" id="obsDesviacion"><?=$s_obsDesviacion?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Cambio de Volumen</td>
                  <td align="center">
                        <select name="cambioVolumen" id="cambioVolumen">
                            <option <?=$cambioVolumenNormal?> value="Normal">Normal</option>
                            <option <?=$cambioVolumenAnormal?> value="Anormal">Anormal</option>
                       </select>
                  </td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsCambioVolumen" id="obsCambioVolumen"><?=$s_obsCambioVolumen?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Bloqueo Mandibular</td>
                  <td align="center">
                         <select name="bloqueoMand" id="bloqueoMand">
                            <option <?=$bloqueoMandNormal?> value="Normal">Normal</option>
                            <option <?=$bloqueoMandAnormal?> value="Anormal">Anormal</option>
                       </select>
                  </td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsBloqueMand" id="obsBloqueMand"><?=$s_obsBloqueMand?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Limite de Apertura</td>
                  <td align="center">
                         <select name="limitApertura" id="limitApertura">
                            <option <?=$limitAperturaNormal?> value="Normal">Normal</option>
                            <option <?=$limitAperturaAnormal?> value="Anormal">Anormal</option>
                       </select>
                  </td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsLimitApertura" id="obsLimitApertura"><?=$s_obsLimitApertura?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Dolor Articular</td>
                  <td align="center">
                        <select name="dolorArticular" id="dolorArticular">
                            <option <?=$dolorArticularNormal?> value="Normal">Normal</option>
                            <option <?=$dolorArticularAnormal?> value="Anormal">Anormal</option>
                       </select>
                  </td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsDolorArticular" id="obsDolorArticular"><?=$s_obsDolorArticular?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Dolor Muscular</td>
                  <td align="center">
                        <select name="dolorMuscular" id="dolorMuscular">
                            <option <?=$dolorMuscularNormal?> value="Normal">Normal</option>
                            <option <?=$dolorMuscularAnormal?> value="Anormal">Anormal</option>
                       </select>
                  </td>
                 <td><textarea rows="2" cols="80" wrap="soft" name="obsDolorMuscular" id="obsDolorMuscular"><?=$s_obsDolorMuscular?></textarea></td>
                </tr>
               <!-- <tr>
                  <td colspan="3" align="center">
                  <input type="submit" name="submit" value="Grabar Articuluacion" style="width:400px;height:40px;"><br>   
                  </td>
                </tr>--> 
              </table>  
          </div>
         </div> <!--ARTICULACION TEMPORO MANDIBULAR-->
         
         <div id="CollapsiblePanel5" class="CollapsiblePanel">
          <div class="CollapsiblePanelTab" tabindex="0" align="left">[+]PROTESIS</div>
            <div class="CollapsiblePanelContent"> 
              <table width="960" border="1" align="center" cellpadding="0">
                <tr class="titulosTabla" align="center">
                  <td width="30%"><label></label></td>
                  <td width="5%"><label>SI</label></td>
                  <td width="80%"><label>Observaciones</label></td>
                </tr>
                <tr class="camposTabla">
                  <td>Protesis</td>
                  <td align="center"><input <?=$chkProtesis?> id="protesis" name="protesis" type="checkbox" value="S" /></td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsProtesis" id="obsProtesis"><?=$s_obsProtesis?></textarea></td>
                </tr>
                <!--<tr>
                  <td colspan="3" align="center">
                     <input type="submit" name="submit" value="Grabar Protesis" style="width:400px;height:40px;"><br>   
                  </td>
                </tr>--> 
              </table>  
          </div>
         </div> <!--PROTESIS-->
         
         <div id="CollapsiblePanel6" class="CollapsiblePanel">
          <div class="CollapsiblePanelTab" tabindex="0" align="left">[+]HIGIENE ORAL</div>
            <div class="CollapsiblePanelContent"> 
              <table width="960" border="1" align="center" cellpadding="0">
                <tr class="titulosTabla" align="center">
                  <td width="40%"><label></label></td>
                  <td width="10%"><label>SI</label></td>
                  <td width="40%"><label></label></td>
                  <td width="10%"><label>SI</label></td>
                </tr>
                
                <tr class="camposTabla">
                  <td><label>Higiene</label></td>
                  <td align="center">
                    <select name="higiene" id="higiene">
                         <option <?=$hBuena?> value="Buena">Buena</option>
                         <option <?=$hRegular?> value="Regular">Regular</option>
                         <option <?=$hMala?> value="Mala">Mala</option>
                    </select>
                  </td>
                  <td><label>Frecuancia Cepillado</label></td>
                  <td align="center">
                    <select name="freCepillado" id="freCepillado">
                         <option <?=$fCtres?> value="Tres Veces">Tres Veces</option>
                         <option <?=$fCdos?> value="Dos Veces">Dos Veces</option>
                         <option <?=$fCuno?> value="Una Vez">Una Vez</option>
                    </select>
                  </td>
                </tr>
                <tr class="camposTabla">
                  <td><label>Seda Dental</label></td>
                  <td align="center"><input <?=$chkSedaDental?> id="sedaDental" name="sedaDental" type="checkbox" value="S" /></td>  
                  <td><label>Pigmentaciones</label></td>
                  <td align="center"><input <?=$chkPigmentacion?> id="pigmentacion" name="pigmentacion" type="checkbox" value="S" /></td>
                </tr>  
                <tr class="camposTabla">
                   <td><label>Grado de Riesgo</label></td>
                   <td align="center">
                     <select name="gradoRiesgo" id="gradoRiesgo">
                         <option <?=$grBajo?> value="Bajo">Bajo</option>
                         <option <?=$grMedio?> value="Medio">Medio</option>
                         <option <?=$grAlto?> value="Alto">Alto</option>
                     </select>
                   </td> 
                </tr>
                <tr class="negrita">
                   <td colspan="4"><label>Observaciones</label></td> 
                </tr>
                <tr class="camposTabla" align="center">
                   <td colspan="4"><textarea rows="4" cols="90" wrap="soft" name="obsHigiene" id="obsHigiene"><?=$s_obsHigiene?></textarea></td> 
                </tr>
               <!-- <tr>
                  <td colspan="3" align="center">
                     <input type="submit" name="submit" value="Grabar Higiene Oral" style="width:400px;height:40px;"><br>   
                  </td>
                </tr>--> 
              </table>  
          </div>
         </div> <!--HIGIENE ORAL-->
         
         <div id="CollapsiblePanel7" class="CollapsiblePanel">
          <div class="CollapsiblePanelTab" tabindex="0" align="left">[+]EXAMEN PULPAR</div>
            <div class="CollapsiblePanelContent"> 
              <table width="960" border="1" align="center" cellpadding="0">
                <tr class="titulosTabla" align="center">
                  <td width="30%"><label></label></td>
                  <td width="5%"><label>SI</label></td>
                  <td width="80%"><label>Observaciones</label></td>
                </tr>
                <tr class="camposTabla">
                  <td>Cuello Sencible</td>
                  <td align="center"><input <?=$chkCuelloSencible?> id="cuelloSencible" name="cuelloSencible" type="checkbox" value="S" /></td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsCuelloSencible" id="obsCuelloSencible"><?=$s_obsCuelloSencible?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Abscesos</td>
                  <td align="center"><input <?=$chkAbscesos?> id="abscesos" name="abscesos" type="checkbox" value="S" /></td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsAbscesos" id="obsAbscesos"><?=$s_obsAbscesos?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Exposicion Pulpar</td>
                  <td align="center"><input <?=$chkExposicionPulpar?> id="exposicionPulpar" name="exposicionPulpar" type="checkbox" value="S" /></td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsExposicionPulpar" id="obsExposicionPulpar"><?=$s_obsExposicionPulpar?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Cambio de Color</td>
                  <td align="center"><input <?=$chkCambioColor?> id="cambioColor" name="cambioColor" type="checkbox" value="S" /></td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsCambioColor" id="obsCambioColor"><?=$s_obsCambioColor?></textarea></td>
                </tr>
               <!-- <tr>
                  <td colspan="3" align="center">
                     <input type="submit" name="submit" value="Grabar Examen Pulpar" style="width:400px;height:40px;"><br>   
                  </td>
                </tr> --> 
              </table>  
          </div>
         </div> <!--EXMEN PULPAR-->
         
         <div id="CollapsiblePanel8" class="CollapsiblePanel">
          <div class="CollapsiblePanelTab" tabindex="0" align="left">[+]TEJIDOS DENTARIOS Y OCLUSION</div>
            <div class="CollapsiblePanelContent"> 
              <table width="960" border="1" align="center" cellpadding="0">
                <tr class="titulosTabla" align="center">
                  <td width="30%"><label></label></td>
                  <td width="5%"><label>SI</label></td>
                  <td width="80%"><label>Observaciones</label></td>
                </tr>
                <tr class="camposTabla">
                  <td>Supernumerarios</td>
                  <td align="center"><input <?=$chkSupernumerarios?> id="supernumerarios" name="supernumerarios" type="checkbox" value="S" /></td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsSupernumerarios" id="obsSupernumerarios"><?=$s_obsSupernumerarios?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Decoloracion</td>
                  <td align="center"><input <?=$chkDecoloracion?> id="decoloracion" name="decoloracion" type="checkbox" value="S" /></td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsDecoloracion" id="obsDecoloracion"><?=$s_obsDecoloracion?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Descalsificacion</td>
                  <td align="center"><input <?=$chkDescalsificacion?> id="descalsificacion" name="descalsificacion" type="checkbox" value="S" /></td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsDescalsificacion" id="obsDescalsificacion"><?=$s_obsDescalsificacion?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Facetas de Desgaste</td>
                  <td align="center"><input <?=$chkFacetaDesgaste?> id="facetaDesgaste" name="facetaDesgaste" type="checkbox" value="S" /></td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsFacetaDesgaste" id="obsFacetaDesgaste"><?=$s_obsFacetaDesgaste?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Abrasion</td>
                  <td align="center"><input <?=$chkAbrasion?> id="abrasion" name="abrasion" type="checkbox" value="S" /></td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsAbrasion" id="obsAbrasion"><?=$s_obsAbrasion?></textarea></td>
                </tr>
                <!--<tr>
                  <td colspan="3" align="center">
                     <input type="submit" name="submit" value="Grabar Tejidos Dentarios" style="width:400px;height:40px;"><br>   
                  </td>
                </tr> -->
              </table>  
              </table>  
          </div>
         </div> <!--TEJIDOS DENTARIOS Y OCLUSION-->
         
         <div id="CollapsiblePanel9" class="CollapsiblePanel">
          <div class="CollapsiblePanelTab" tabindex="0" align="left">[+]ALTERACIONES PERIODONTALES</div>
            <div class="CollapsiblePanelContent"> 
              <table width="960" border="1" align="center" cellpadding="0">
                <tr class="titulosTabla" align="center">
                  <td width="30%"><label></label></td>
                  <td width="5%"><label>SI</label></td>
                  <td width="80%"><label>Observaciones</label></td>
                </tr>
                <tr class="camposTabla">
                  <td>Sangrado </td>
                  <td align="center"><input <?=$chkSangrado?> id="sangrado" name="sangrado" type="checkbox" value="S" /></td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsSangrado" id="obsSangrado"><?=$s_obsSangrado?></textarea></td>
                </tr>
                 <tr class="camposTabla">
                  <td>Exudado </td>
                  <td align="center"><input <?=$chkExudado?> id="exudado" name="exudado" type="checkbox" value="S" /></td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsExudado" id="obsExudado"><?=$s_obsExudado?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Supuracion</td>
                  <td align="center"><input <?=$chkSupuracion?> id="supuracion" name="supuracion" type="checkbox" value="S" /></td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsSupuracion" id="obsSupuracion"><?=$s_obsSupuracion?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Calculos</td>
                  <td align="center"><input <?=$chkCalculos?> id="calculos" name="calculos" type="checkbox" value="S" /></td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsCalculos" id="obsCalculos"><?=$s_obsCalculos?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Inflamacion </td>
                  <td align="center"><input <?=$chkInflamacion?> id="inflamacion" name="inflamacion" type="checkbox" value="S" /></td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsInflamacion" id="obsInflamacion"><?=$s_obsInflamacion?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Retracciones </td>
                  <td align="center"><input <?=$chkRetracciones?> id="retracciones" name="retracciones" type="checkbox" value="S" /></td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsRetracciones" id="obsRetracciones"><?=$s_obsRetracciones?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Presencia Bolsas </td>
                  <td align="center"><input <?=$chkPresenciaBolsas?> id="presenciaBolsas" name="presenciaBolsas" type="checkbox" value="S" /></td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsPresenciaBolsas" id="obsPresenciaBolsas"><?=$s_obsPresenciaBolsas?></textarea></td>
                </tr>
                <tr class="camposTabla">
                  <td>Tipo Oclusion </td>
                  <td align="center"><input <?=$chkTipOclusion?> id="tipOclusion" name="tipOclusion" type="checkbox" value="S" /></td>
                  <td><textarea rows="2" cols="80" wrap="soft" name="obsTipOclusion" id="obsTipOclusion"><?=$s_obsTipOclusion?></textarea></td>
                </tr>
                <!--<tr>
                  <td colspan="3" align="center">
                     <input type="submit" name="submit" value="Grabar Alteraciones Periodontales" style="width:400px;height:40px;"><br>   
                  </td>
                </tr>-->
              </table>  
          </div>
         </div> <!--ALTERACIONES PERIODENTALES-->
         
         <table width="960" border="1" align="center" cellpadding="0">
           <tr>
            <td colspan="3" align="center">
             <input type="submit" name="submit" value="Grabar Historia General" style="width:400px;height:40px;"><br>   
            </td>
           </tr>                
         </table>  

         <table width="960" border="1" align="center" cellpadding="0">
         
         <tr>
         <?php
        // echo "active ". $activeBoton;
         if ($activeBoton != "S")
         {
          if ($viene =="PA")
          {
         ?>
          <td colspan="2" border="1">
              <a href=sioBarraOdo0.php?pc=<?=$prCn?>><img src="imagenes/btnVol.jpg">
          </td> 
           <?php
           }
           ?>
          <?php
          if ($viene=="ME")
          {
     
           //devuelve preconsulta
            $prCn = base64_encode($pc);
          ?> 
          <td colspan="2" border="1"> 
            <a href=sioBarraOdo0.php?pc=<?=$prCn?>><img src="imagenes/btnVol.jpg"></a>
          </td> 
        <?php
          }
        ?>  
          <?php
          }
           if ($activeBoton == "S")
           {
            //linea de envio a diagnosticos
            $ld  = $e_nvoNroCon."/".$s_tipoHistoria;
            $ldG = base64_encode($ld);
            ?>
               <td width "70%" align="center" class="negrita">Grabaci&oacute;n exitosa, para ingresar los ordenamientos y terminar la historia toque Seguir</td>

               <td width "70%" align="right" colspan="2" border="1"> 
                 <a href=sioSelCie10.php?lin=<?=$ldG?>><img src="imagenes/btnCont.jpg"></a>
              </td>
            
           <?php
           }
            ?> 
          </tr>
          
          <tr>
           <td class="titulosTabla" colspan="3" align="left"> <?=$mensaje?> </td>
          </tr>

         </table>
         
      
         <input style="visibility:hidden" name="e_usuario" id="e_usuario" value="<?=$s_usuarioUrlDecode?>"/> 
         <input style="visibility:hidden" name="e_empresa" id="e_empresa" value="<?=$s_empresaUrlDecode?>"/>
         <input style="visibility:hidden" name="e_cargo" id="e_cargo" value="<?=$s_cargoUrlDecode?>"/>
         <input style="visibility:hidden" name="s_tipoHistoria" id="s_tipoHistoria" value="<?=$s_tipoHistoria?>"/>
         <input style="visibility:hidden" name="yaGrabo" id="yaGrabo" value="<?=$s_yaGrabo?>"/>
         <input style="visibility:hidden" name="nroCta" id="nroCta" value="<?=$e_nvoNroCon?>"/>
         <input style="visibility:hidden" name="e_nitEmpresa" id="e_nitEmpresa" value="<?=$s_nitEmpresa?>"/>
         <input style="visibility:hidden" name="e_codSede" id="e_codSede" value="<?=$s_codSede?>"/>
         <input style="visibility:hidden" name="e_tipoId" id="e_tipoId" value="<?=$s_tipoId?>"/>
         <input style="visibility:hidden" name="e_identifica" id="e_identifica" value="<?=$s_identifica?>"/>
         <input style="visibility:hidden" name="e_idUsuario" id="e_idUsuario" value="<?=$s_idUsuario?>"/>
         <input style="visibility:hidden" name="s_codCausa" id="s_codCausa" value="<?=$s_codCausa?>"/>
         <input style="visibility:hidden" name="s_codEntidad" id="s_codEntidad" value="<?=$s_codEntidad?>"/>
         <input style="visibility:hidden" name="s_tipoCon" id="s_tipoCon" value="<?=$s_tipoCon?>"/>
         <input style="visibility:hidden" name="viD"       id="viD"       value="<?=$viene?>"/>
         <input style="visibility:hidden" name="pc"        id="pc"        value="<?=$pc?>"/>
         <input style="visibility:hidden" name="activeBoton" id="activeBoton" value="<?=$activeBoton?>"/>
       
      </form>
    </body>
    
    <script type="text/javascript">
      var CollapsiblePanel1 = new Spry.Widget.CollapsiblePanel("CollapsiblePanel1");
      var CollapsiblePanel2 = new Spry.Widget.CollapsiblePanel("CollapsiblePanel2",{contentIsOpen:false});
      var CollapsiblePanel3 = new Spry.Widget.CollapsiblePanel("CollapsiblePanel3",{contentIsOpen:false});
      var CollapsiblePanel4 = new Spry.Widget.CollapsiblePanel("CollapsiblePanel4",{contentIsOpen:false});
      var CollapsiblePanel5 = new Spry.Widget.CollapsiblePanel("CollapsiblePanel5",{contentIsOpen:false});
      var CollapsiblePanel6 = new Spry.Widget.CollapsiblePanel("CollapsiblePanel6",{contentIsOpen:false});
      var CollapsiblePanel7 = new Spry.Widget.CollapsiblePanel("CollapsiblePanel7",{contentIsOpen:false});
      var CollapsiblePanel8 = new Spry.Widget.CollapsiblePanel("CollapsiblePanel8",{contentIsOpen:false});
      var CollapsiblePanel9 = new Spry.Widget.CollapsiblePanel("CollapsiblePanel9",{contentIsOpen:false});
      var CollapsiblePanel0 = new Spry.Widget.CollapsiblePanel("CollapsiblePanel10",{contentIsOpen:false});
    </script>  
</html>  