diff options
Diffstat (limited to 'server/xml/macros/ref_90d_linse-1.0.xml')
| -rw-r--r-- | server/xml/macros/ref_90d_linse-1.0.xml | 359 | 
1 files changed, 0 insertions, 359 deletions
| diff --git a/server/xml/macros/ref_90d_linse-1.0.xml b/server/xml/macros/ref_90d_linse-1.0.xml deleted file mode 100644 index 059958b..0000000 --- a/server/xml/macros/ref_90d_linse-1.0.xml +++ /dev/null @@ -1,359 +0,0 @@ -<?xml version='1.0' encoding='UTF-8'?> -<macro name="ref_90d_linse" version="1.0"> -  <resume language="lua"> -    out = '' -    if ( getValue('90d_linse.mangler.odxt') == '' ) -    then -      out = out .. 'Oftalmoskopi, o.dxt:\n' -      out = out .. getValue('90d_linse.indblik.odxt') .. ' indblik.\n' -      out = out .. 'Papil: ' .. getValue('90d_linse.papil.odxt') .. '\n' -      out = out .. 'Makula: ' .. getValue('90d_linse.makula.odxt') .. '\n' -      out = out .. 'Periferi: ' .. getValue('90d_linse.periferi.odxt') -      if ( getValue('90d_linse.periferi.odxt') == 'Hul eller rift kl' ) -      then -        out = out .. ' ' .. getValue('90d_linse.hul_eller_rift_kl.odxt') .. '\n' -      else -        out = out .. '\n' -      end -      if ( getValue('90d_linse.supplerende.odxt') ~= '' ) -      then -        out = out .. getValue('90d_linse.supplerende.odxt') .. '\n' -      end -    end -    if ( getValue('90d_linse.mangler.osin') == '' ) -    then -      if ( getValue('90d_linse.mangler.odxt') == '' ) -      then -        out = out .. '\n' -      end -      out = out .. 'Oftalmoskopi, o.sin:\n' -      out = out .. getValue('90d_linse.indblik.osin') .. ' indblik.\n' -      out = out .. 'Papil: ' .. getValue('90d_linse.papil.osin') .. '\n' -      out = out .. 'Makula: ' .. getValue('90d_linse.makula.osin') .. '\n' -      out = out .. 'Periferi: ' .. getValue('90d_linse.periferi.osin') -      if ( getValue('90d_linse.periferi.osin') == 'Hul eller rift kl' ) -      then -        out = out .. ' ' .. getValue('90d_linse.hul_eller_rift_kl.osin') .. '\n' -      else -        out = out .. '\n' -      end -      if ( getValue('90d_linse.supplerende.osin') ~= '' ) -      then -        out = out .. getValue('90d_linse.supplerende.osin') .. '\n' -      end -    end -    return out -  </resume> -  <queries> -    <query service="pracro" class="missing_eye_odxt" ttl="1000000"/> -    <query service="pracro" class="missing_eye_osin" ttl="1000000"/> -  </queries> -  <maps> -    <map name="missing_eye_odxt_map"> -      value = 0 -      timestamp = 0 -      source = '' - -      if( missing_eye_odxt ) -      then -        if( missing_eye_odxt.value and missing_eye_odxt.value == '' ) -        then -          value = '' -          timestamp = missing_eye_odxt.timestamp -          source = missing_eye_odxt.source -        else -          value = 'mangler' -          timestamp = missing_eye_odxt.timestamp -          source = missing_eye_odxt.source -        end -      end -      return value, timestamp, source -    </map> -    <map name="missing_eye_osin_map"> -      value = 0 -      timestamp = 0 -      source = '' -       -      if( missing_eye_osin ) -      then -        if( missing_eye_osin.value and missing_eye_osin.value == '' ) -        then -          value = '' -          timestamp = missing_eye_osin.timestamp -          source = missing_eye_osin.source -        else -          value = 'mangler' -          timestamp = missing_eye_osin.timestamp -          source = missing_eye_osin.source -        end -      end -      return value, timestamp, source -    </map> -  </maps> -  <scripts> -    <script language="lua" name="right_eye"> -      if ( value == 'mangler' ) -      then -        disable('right_eye_frame') -      else -        enable('right_eye_frame') -      end -      return true -    </script> -    <script language="lua" name="left_eye"> -      if ( value == 'mangler' ) -      then -        disable('left_eye_frame') -      else -        enable('left_eye_frame') -      end -      return true -    </script> -    <script language="lua" name="hul_eller_rift_odxt"> -      if ( getValue('90d_linse.periferi.odxt') == 'Hul eller rift kl' ) -      then -        enable('hul_eller_rift.frame.odxt') -      else -        disable('hul_eller_rift.frame.odxt') -      end -      return true -    </script> -    <script language="lua" name="hul_eller_rift_osin"> -      if ( getValue('90d_linse.periferi.osin') == 'Hul eller rift kl' ) -      then -        enable('hul_eller_rift.frame.osin') -      else -        disable('hul_eller_rift.frame.osin') -      end -      return true -    </script> -  </scripts> -  <widgets caption="90D-linse" -          layout="vbox"> -     -    <frame layout="hbox"> - -      <!-- o.dxt --> -      <frame layout="vbox"> -	<checkbox caption="Der er ikke målt på o.dxt" -		  name="90d_linse.mangler.odxt" script="right_eye" -		  map="missing_eye_odxt_map" -		  truevalue="mangler" falsevalue="" value=""/> -	<frame name="right_eye_frame" caption="o.dxt" layout="vbox"> - -	  <frame layout="hbox"> -	    <frame layout="vbox"> -	      <label caption="Indblik: "/> -	      <label/> -	    </frame> -	    <frame layout="vbox"> -	      <altcombobox name="90d_linse.indblik.odxt" layout="vbox" value="Klart"> -		<item caption="Klart" value="Klart"/> -		<item caption="Let sløret" value="Let sløret"/> -		<item caption="Meget sløret" value="Meget sløret"/> -		<altitem caption="Andet" value="andet" layout="hbox" innerwidget="90d_linse.indblik.andet.odxt"> -		  <label caption="Andet:"/> -		  <lineedit name="90d_linse.indblik.andet.odxt"/> -		</altitem> - 	      </altcombobox> -	    </frame> -	  </frame> - -	  <frame layout="hbox"> -	    <frame layout="vbox"> -	      <label caption="Papil: "/> -	      <label/> -	    </frame> -	    <frame layout="vbox"> -	      <altcombobox name="90d_linse.papil.odxt" layout="vbox" value="Normal, ikke ekskaveret"> -		<item caption="Myop" value="Myop"/> -		<item caption="Normal, ikke ekskaveret" value="Normal, ikke ekskaveret"/> -		<item caption="Koncentrisk ekskavation" value="Koncentrisk ekskavation"/> -		<item caption="Glaukomsuspekt" value="Glaukomsuspekt"/> -		<item caption="Glaukomatøs ekskavation" value="Glaukomatøs ekskavation"/> -		<altitem caption="Andet" value="andet" layout="hbox" innerwidget="90d_linse.papil.andet.odxt"> -		  <label caption="Andet:"/> -		  <lineedit name="90d_linse.papil.andet.odxt"/> -		</altitem> - 	      </altcombobox> -	    </frame> -	  </frame> -	  <frame layout="hbox"> -	    <frame layout="vbox"> -	      <label caption="Makula: "/> -	      <label/> -	    </frame> -	    <frame layout="vbox"> -	      <altcombobox name="90d_linse.makula.odxt" layout="vbox" value="Normal"> -		<item caption="Normal" value="Normal"/> -		<item caption="Atrofiske forandringer" value="Atrofiske forandringer"/> -		<item caption="Diabetiske non-proliferative forandringer" value="Diabetiske non-proliferative forandringer"/> -		<item caption="Diabetiske proliferative forandringer" value="Diabetiske proliferative forandringer"/> -		<altitem caption="Andet" value="andet" layout="hbox" innerwidget="90d_linse.makula.andet.odxt"> -		  <label caption="Andet:"/> -		  <lineedit name="90d_linse.makula.andet.odxt"/> -		</altitem> - 	      </altcombobox> -	    </frame> -	  </frame> -	  <frame layout="hbox"> -	    <frame layout="vbox"> -	      <label caption="Periferi: "/> -	      <label/> -	      <label/> -	    </frame> -	    <frame layout="vbox"> -	      <altcombobox name="90d_linse.periferi.odxt" layout="vbox" value="Ingen degenerative forandringer" script="hul_eller_rift_odxt"> -		<item caption="Ingen degenerative forandringer" value="Ingen degenerative forandringer"/> -		<item caption="Perifere degenerationer" value="Perifere degenerationer"/> -		<item caption="Lattice" value="Lattice"/> -		<item caption="Hul eller rift kl (anfør herunder)" value="Hul eller rift kl"/> -		<altitem caption="Andet" value="andet" layout="hbox" innerwidget="90d_linse.periferi.andet.odxt"> -		  <label caption="Andet:"/> -		  <lineedit name="90d_linse.periferi.andet.odxt"/> -		</altitem> - 	      </altcombobox> -	      <frame name="hul_eller_rift.frame.odxt" layout="hbox"> -		<label caption="Hul eller rift kl.:"/> -		<combobox name="90_dlinse.hul_eller_rift_kl.odxt"> -		  <item caption="1" value="1"/> -		  <item caption="2" value="2"/> -		  <item caption="3" value="3"/> -		  <item caption="4" value="4"/> -		  <item caption="5" value="5"/> -		  <item caption="6" value="6"/> -		  <item caption="7" value="7"/> -		  <item caption="8" value="8"/> -		  <item caption="9" value="9"/> -		  <item caption="10" value="10"/> -		  <item caption="11" value="11"/> -		  <item caption="12" value="12"/> -		</combobox> -		<spacer/> -	      </frame> -	    </frame> -	  </frame> - -	  <label caption="Supplerende:"/> -	  <lineedit name="90d_linse.supplerende.odxt"/> - -	</frame> -      </frame> - -      <!-- o.sin --> -      <frame layout="vbox"> -	<checkbox caption="Der er ikke målt på o.sin" -		  name="90d_linse.mangler.osin" script="left_eye" -		  map="missing_eye_osin_map" -		  truevalue="mangler" falsevalue="" value=""/> -	<frame name="left_eye_frame" caption="o.dxt" layout="vbox"> - -	  <frame layout="hbox"> -	    <frame layout="vbox"> -	      <label caption="Indblik: "/> -	      <label/> -	    </frame> -	    <frame layout="vbox"> -	      <altcombobox name="90d_linse.indblik.osin" layout="vbox" value="Klart"> -		<item caption="Klart" value="Klart"/> -		<item caption="Let sløret" value="Let sløret"/> -		<item caption="Meget sløret" value="Meget sløret"/> -		<altitem caption="Andet" value="andet" layout="hbox" innerwidget="90d_linse.indblik.andet.osin"> -		  <label caption="Andet:"/> -		  <lineedit name="90d_linse.indblik.andet.osin"/> -		</altitem> - 	      </altcombobox> -	    </frame> -	  </frame> - -	  <frame layout="hbox"> -	    <frame layout="vbox"> -	      <label caption="Papil: "/> -	      <label/> -	    </frame> -	    <frame layout="vbox"> -	      <altcombobox name="90d_linse.papil.osin" layout="vbox" value="Normal, ikke ekskaveret"> -		<item caption="Myop" value="Myop"/> -		<item caption="Normal, ikke ekskaveret" value="Normal, ikke ekskaveret"/> -		<item caption="Koncentrisk ekskavation" value="Koncentrisk ekskavation"/> -		<item caption="Glaukomsuspekt" value="Glaukomsuspekt"/> -		<item caption="Glaukomatøs ekskavation" value="Glaukomatøs ekskavation"/> -		<altitem caption="Andet" value="andet" layout="hbox" innerwidget="90d_linse.papil.andet.osin"> -		  <label caption="Andet:"/> -		  <lineedit name="90d_linse.papil.andet.osin"/> -		</altitem> - 	      </altcombobox> -	    </frame> -	  </frame> -	  <frame layout="hbox"> -	    <frame layout="vbox"> -	      <label caption="Makula: "/> -	      <label/> -	    </frame> -	    <frame layout="vbox"> -	      <altcombobox name="90d_linse.makula.osin" layout="vbox" value="Normal"> -		<item caption="Normal" value="Normal"/> -		<item caption="Atrofiske forandringer" value="Atrofiske forandringer"/> -		<item caption="Diabetiske non-proliferative forandringer" value="Diabetiske non-proliferative forandringer"/> -		<item caption="Diabetiske proliferative forandringer" value="Diabetiske proliferative forandringer"/> -		<altitem caption="Andet" value="andet" layout="hbox" innerwidget="90d_linse.makula.andet.osin"> -		  <label caption="Andet:"/> -		  <lineedit name="90d_linse.makula.andet.osin"/> -		</altitem> - 	      </altcombobox> -	    </frame> -	  </frame> -	  <frame layout="hbox"> -	    <frame layout="vbox"> -	      <label caption="Periferi: "/> -	      <label/> -	      <label/> -	    </frame> -	    <frame layout="vbox"> -	      <altcombobox name="90d_linse.periferi.osin" layout="vbox" value="Ingen degenerative forandringer" script="hul_eller_rift_osin"> -		<item caption="Ingen degenerative forandringer" value="Ingen degenerative forandringer"/> -		<item caption="Perifere degenerationer" value="Perifere degenerationer"/> -		<item caption="Lattice" value="Lattice"/> -		<item caption="Hul eller rift kl (anfør herunder)" value="Hul eller rift kl"/> -		<altitem caption="Andet" value="andet" layout="hbox" innerwidget="90d_linse.periferi.andet.osin"> -		  <label caption="Andet:"/> -		  <lineedit name="90d_linse.periferi.andet.osin"/> -		</altitem> - 	      </altcombobox> -	      <frame name="hul_eller_rift.frame.osin" layout="hbox"> -		<label caption="Hul eller rift kl.:"/> -		<combobox name="90d_linse.hul_eller_rift_kl.osin"> -		  <item caption="1" value="1"/> -		  <item caption="2" value="2"/> -		  <item caption="3" value="3"/> -		  <item caption="4" value="4"/> -		  <item caption="5" value="5"/> -		  <item caption="6" value="6"/> -		  <item caption="7" value="7"/> -		  <item caption="8" value="8"/> -		  <item caption="9" value="9"/> -		  <item caption="10" value="10"/> -		  <item caption="11" value="11"/> -		  <item caption="12" value="12"/> -		</combobox> -		<spacer/> -	      </frame> -	    </frame> -	  </frame> - -	  <label caption="Supplerende:"/> -	  <lineedit name="90d_linse.supplerende.osin"/> - -	</frame> -      </frame> - -    </frame> - - -    <!-- Knapper --> -    <frame layout="hbox"> -      <spacer/> -      <button caption="Gem" action="commit"/> -    </frame> -  </widgets> -</macro> | 
