<?xml version='1.0' encoding='UTF-8'?>
<!--
    20081208: Bent Bisballe Nyeng
    Feltnavnene ændret så de giver mening.
  -->
<!--
    20090107: Bent Bisballe Nyeng
    Fluorescens info felterne skjules nu istedet for kun at blive disabled.
  -->
<!--
    20090211: Bent Bisballe Nyeng
    Fluorescens info felterne bliver nu disabled igen, men har f[et fjernet den
    altcombo som omkransede dem. Desuden er et 'andet' felt tilføjet.
  -->
<macro name="fluorescens_konklusion" version="1.0">
  <resume language="lua">
    out = 'Konklusion:\n'

    if( getValue('fluorescens.konklusion.) == 'Klassisk subretinal neovaskulær membran.'
        or getValue('fluorescens.konklusion.) == 'Overvejende klassisk subretinal neovaskulær membran.' )
    then
      out = out .. getValue('fluorescens.konklusion.) .. '\n'
      out = out .. 'Membranen er beliggende:'
                .. getValue('fluorescens.membran.position') .. '\n'
      out = out .. 'Membranstørrelse:' 
                .. getValue('fluorescens.membran.stoerrelse') .. 'µm\n'
    else
      if( getValue('fluorescens.konklusion.) == 'andet' )
      then
        out = out .. getValue('fluorescens.konklusion.andet') .. '\n'
      else
        out = out .. getValue('fluorescens.konklusion.) .. '\n'
      end
    end

    return out
  </resume>
  <queries>
  </queries>
  <maps>
  </maps>
  <scripts>
    <script language="lua" name="angiografi_konklusion">
      -- This script sets the value of additional according to.konklusion.

      if( getValue('fluorescens.konklusion.) == 'Klassisk subretinal neovaskulær membran.'
          or getValue('fluorescens.konklusion.) == 'Overvejende klassisk subretinal neovaskulær membran.' )
      then
        enable('yderligere_info_frame')
      else
        disable('yderligere_info_frame')
      end

      if( getValue('fluorescens.konklusion.) == 'andet' )
      then
        enable('andet_frame')
      else
        disable('andet_frame')
      end

      return true
    </script>
  </scripts>
  <widgets caption="Konklusion (B.2.7.3)"
          layout="vbox">

    <frame layout="hbox">
      <label caption="Øje:" width="50"/>
      <radiobuttons name="fluorescens.konklusion.oeje" value="">
	<radiobutton caption="o.dxt" value="o.dxt"/>
	<radiobutton caption="o.sin" value="o.sin"/>
      </radiobuttons>
      <spacer/>
    </frame>

    <combobox name="fluorescens.konklusion"
	      value="Atrofiske foranderinger. Der findes ingen behandlingsindikation."
	      script="angiografi_konklusion">
      <item caption="Atrofiske foranderinger. Der findes ingen behandlingsindikation"
	    value="Atrofiske foranderinger. Der findes ingen behandlingsindikation." />
      <item caption="Pigmentepitelløsning. Der findes ingen behandlingsindikation"
	    value="Pigmentepitelløsning. Der findes ingen behandlingsindikation." />
      <item caption="Klassisk subretinal karnydannelse"
	    value="Klassisk subretinal neovaskulær membran." />
      <item caption="Overvejende klassisk subretinal neovaskulær membran"
	    value="Overvejende klassisk subretinal neovaskulær membran." />
      <item caption="Minimalt klassisk subretinal neovaskulær membran"
	    value="Minimalt klassisk subretinal neovaskulær membran." />
      <item caption="Okkult subretinal neovaskulær membran."
	    value="Okkult subretinal neovaskulær membran." />
      <item caption="Andet"
	    value="andet" />
    </combobox>

    <frame name="andet_frame" layout="hbox">
      <label caption="Andet:"/>
      <lineedit name="fluorescens.konklusion.andet" value=""/>
    </frame>

    <frame name="yderligere_info_frame" layout="vbox">
      <label caption="Yderligere information:"/>

      <frame layout="hbox">
	<label caption="Membran beliggenhed:" width="150"/>
	<combobox name="fluorescens.membran.position" value="">
	  <item caption="Subfovealt" value="Subfovealt" />
	  <item caption="Juxtafovealt" value="Juxtafovealt" />
	  <item caption="Extrafovealt" value="Extrafovealt" />
	</combobox>
	<spacer/>
      </frame>
      
      <frame layout="hbox">
	<label caption="Membranstørrelse:" width="150"/>
	<lineedit name="fluorescens.membran.stoerrelse" regexp="[0-9,.-]+" value=""/>
	<label caption="µm" />
	<spacer/>
      </frame>

    </frame>

    <!-- Knapper -->
    <frame layout="hbox">
      <spacer/>
      <button caption="Gem" action="commit"/>
    </frame>
  </widgets>
</macro>