summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--server/xml/macros/B.1.4.xml4
-rw-r--r--server/xml/macros/B.2.1.3.xml12
-rw-r--r--server/xml/macros/B.2.10.4.xml23
-rw-r--r--server/xml/macros/B.2.2.4.1.xml3
-rw-r--r--server/xml/macros/B.2.2.4.2.xml27
-rw-r--r--server/xml/macros/B.2.2.7.xml194
-rw-r--r--server/xml/macros/B.2.2.8.xml4
-rw-r--r--server/xml/macros/B.2.5.xml46
-rw-r--r--server/xml/macros/B.3.1.2.xml12
-rw-r--r--server/xml/macros/B.3.1.3.xml7
10 files changed, 209 insertions, 123 deletions
diff --git a/server/xml/macros/B.1.4.xml b/server/xml/macros/B.1.4.xml
index 114e1c4..dab7b8d 100644
--- a/server/xml/macros/B.1.4.xml
+++ b/server/xml/macros/B.1.4.xml
@@ -1,13 +1,13 @@
<?xml version='1.0' encoding='UTF-8'?>
<macro name="B.1.4" version="1.0">
- <resume>Subjektivt er symptomerne ${amd.subjective_evaluation}</resume>
+ <resume>Subjektivt er symptomerne ${amd.subjective_evaluation}.</resume>
<queries>
</queries>
<maps>
</maps>
<scripts>
</scripts>
- <window caption="Anamnese (B.1.4)"
+ <window caption="Subjektiv evaluering (B.1.4)"
layout="vbox">
<label caption="Subjektivt er symptomerne:"/>
diff --git a/server/xml/macros/B.2.1.3.xml b/server/xml/macros/B.2.1.3.xml
index 86ce8fb..746d4c9 100644
--- a/server/xml/macros/B.2.1.3.xml
+++ b/server/xml/macros/B.2.1.3.xml
@@ -72,10 +72,11 @@
<window caption="Aktuelle (B.2.1.3)"
layout="vbox">
- <frame caption="Symptomliste" layout="hbox">
+ <frame layout="vbox">
+ <label caption="Symptomlister:"/>
- <frame layout="vbox">
- <label caption="Højre"/>
+ <frame layout="hbox">
+ <frame caption="Højre" layout="vbox">
<multilist name="current.symptoms.right" value=""
innerwidget="aktuelle_entry_right" script="evolution_enable">
@@ -160,9 +161,7 @@
</multilist>
</frame>
- <frame layout="vbox">
- <label caption="Venstre"/>
-
+ <frame caption="Venstre" layout="vbox">
<multilist name="current.symptoms.left" value=""
innerwidget="aktuelle_entry_left" script="evolution_enable">
@@ -246,6 +245,7 @@
</multilist>
</frame>
+ </frame>
</frame>
<frame name="evolution" layout="hbox">
diff --git a/server/xml/macros/B.2.10.4.xml b/server/xml/macros/B.2.10.4.xml
index c9cd1fa..38b6709 100644
--- a/server/xml/macros/B.2.10.4.xml
+++ b/server/xml/macros/B.2.10.4.xml
@@ -10,11 +10,24 @@
<window caption="Behandlingsindikation (B.2.10.4)"
layout="vbox">
-<!--
-Drop down menu med to muligheder, nemlig:
-”Der findes indikation for at gentage behandlingen”
-”Der holdes pause med behandlingen”
--->
+ <frame layout="hbox">
+ <label caption="Øje:" width="50"/>
+ <radiobuttons name="amd.indication.eye" value="">
+ <radiobutton caption="o.dxt" value="o.dxt"/>
+ <radiobutton caption="o.sin" value="o.sin"/>
+ </radiobuttons>
+ <spacer/>
+ </frame>
+
+ <frame layout="vbox">
+ <label caption="Der findes indikation for:"/>
+ <combobox name="amd.indication">
+ <item caption="Der findes indikation for at gentage behandlingen."
+ value="Der findes indikation for at gentage behandlingen."/>
+ <item caption="Der holdes pause med behandlingen."
+ value="Der holdes pause med behandlingen."/>
+ </combobox>
+ </frame>
<!-- Knapper -->
<frame layout="hbox">
diff --git a/server/xml/macros/B.2.2.4.1.xml b/server/xml/macros/B.2.2.4.1.xml
index 740d6d0..1147739 100644
--- a/server/xml/macros/B.2.2.4.1.xml
+++ b/server/xml/macros/B.2.2.4.1.xml
@@ -28,7 +28,6 @@
out = out .. 'OCT o.sin ' .. getValue('oct.left.thickness') .. ' µm\n'
end
- out = out .. 'Anamnese som anført'
end
return out
@@ -104,7 +103,7 @@
return true
</script>
</scripts>
- <window caption="OCT, u. konklusion (B.2.2.4.1)"
+ <window caption="OCT måling (B.2.2.4.1)"
layout="vbox">
<frame layout="hbox">
diff --git a/server/xml/macros/B.2.2.4.2.xml b/server/xml/macros/B.2.2.4.2.xml
index 4118b78..aaa3866 100644
--- a/server/xml/macros/B.2.2.4.2.xml
+++ b/server/xml/macros/B.2.2.4.2.xml
@@ -15,21 +15,19 @@
<resume language="lua">
out = ''
if ( getValue('oct.right.missing') == '' or getValue('oct.left.missing') == '' )
- then
- out = out .. 'Central nethindetykkelse:\n'
+ then
+ out = out .. 'Central nethinde konklusion:\n'
if ( getValue('oct.right.missing') == '' )
then
- out = out .. 'OCT o.dxt ' .. getValue('oct.right.thickness') .. ' µm '
- .. getValue('oct.right.description') .. '.\n'
+ out = out .. 'OCT o.dxt ' .. getValue('oct.right.description') .. '.\n'
end
if ( getValue('oct.left.missing') == '' )
then
- out = out .. 'OCT o.sin ' .. getValue('oct.left.thickness') .. ' µm '
- .. getValue('oct.left.description') .. '.\n'
+ out = out .. 'OCT o.sin ' .. getValue('oct.left.description') .. '.\n'
end
- end
+ end
if ( getValue('oct.comments') ~= '' )
then
@@ -81,15 +79,6 @@
</map>
</maps>
<scripts>
- <script language="lua" name="lt10000gt0">
- value = string.gsub(value, ',', '.')
- if(tonumber(value) &gt;= 0 and tonumber(value) &lt;= 10000)
- then
- return true
- else
- return false
- end
- </script>
<script language="lua" name="right_eye">
if ( value == 'mangler' )
then
@@ -109,7 +98,7 @@
return true
</script>
</scripts>
- <window caption="OCT, m. konklusion (B.2.2.4.2)"
+ <window caption="OCT konklusion (B.2.2.4.2)"
layout="vbox">
<frame layout="hbox">
@@ -123,7 +112,7 @@
<frame name="right_eye_frame" caption="Højre øje" layout="hbox">
<label caption="Tykkelse:"/>
- <lineedit name="oct.right.thickness" regexp="\d{1,5}" script="lt10000gt0" value=""/>
+ <lineedit name="oct.right.thickness" value="" readonly="true"/>
<label caption="µm"/>
<combobox name="oct.right.description" type="select" value="">
<item caption="Pigmentepitelløsning" value="pigmentepitelløsning"/>
@@ -144,7 +133,7 @@
truevalue="mangler" falsevalue="" value=""/>
<frame name="left_eye_frame" caption="Venstre øje" layout="hbox">
<label caption="Tykkelse:"/>
- <lineedit name="oct.left.thickness" regexp="\d{1,5}" script="lt10000gt0" value=""/>
+ <lineedit name="oct.left.thickness" value="" readonly="true"/>
<label caption="µm"/>
<combobox name="oct.left.description" type="select" value="">
<item caption="Pigmentepitelløsning" value="pigmentepitelløsning"/>
diff --git a/server/xml/macros/B.2.2.7.xml b/server/xml/macros/B.2.2.7.xml
index d253d0d..0eeacca 100644
--- a/server/xml/macros/B.2.2.7.xml
+++ b/server/xml/macros/B.2.2.7.xml
@@ -7,83 +7,165 @@
20090108: Bent Bisballe Nyeng
Højre/venstre byttet om.
-->
+<!--
+ 20090320: Bent Bisballe Nyeng
+ Total omskrivning
+ -->
<macro name="B.2.2.7" version="1.0">
<resume>Inblikket til fundusbaggrunden er ${90D_lens.right.fundus_visibility} på højre øje og ${90D_lens.left.fundus_visibility} på venstre.
-${90D_lens.implications}</resume>
+${90D_lens.implications}
+${90D_lens.additional}</resume>
<queries>
</queries>
<maps>
+ <map name="missing_eye_right_map">
+ value = 0
+ timestamp = 0
+ source = 'pracro'
+
+ if( missing_eye_right )
+ then
+ if( missing_eye_right.value and missing_eye_right.value == '' )
+ then
+ value = ''
+ timestamp = missing_eye_right.timestamp
+ else
+ value = 'mangler'
+ timestamp = missing_eye_right.timestamp
+ end
+ end
+ return value, timestamp, source
+ </map>
+ <map name="missing_eye_left_map">
+ value = 0
+ timestamp = 0
+ source = 'pracro'
+
+ if( missing_eye_left )
+ then
+ if( missing_eye_left.value and missing_eye_left.value == '' )
+ then
+ value = ''
+ timestamp = missing_eye_left.timestamp
+ else
+ value = 'mangler'
+ timestamp = missing_eye_left.timestamp
+ 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="retinal_haevelse_right">
+ if ( value == 'retinal hævelse' )
+ then
+ enable('retinal_haevelse_right')
+ else
+ disable('retinal_haevelse_right')
+ end
+ return true
+ </script>
+ <script language="lua" name="retinal_haevelse_left">
+ if ( value == 'retinal hævelse' )
+ then
+ enable('retinal_haevelse_left')
+ else
+ disable('retinal_haevelse_left')
+ end
+ return true
+ </script>
</scripts>
<window caption="90-D linse (B.2.2.7)"
layout="vbox">
- <!-- Indblik -->
- <frame layout="vbox">
- <label caption="Indblik til fundusbaggrunden:"/>
- <frame layout="hbox">
-
- <label caption="Højre:"/>
- <combobox name="90D_lens.right.fundus_visibility" 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"/>
- <item caption="Intet" value="intet"/>
- </combobox>
- <spacer/>
-
- <label caption="Venstre:"/>
- <combobox name="90D_lens.left.fundus_visibility" 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"/>
- <item caption="Intet" value="intet"/>
- </combobox>
- <spacer/>
+ <frame layout="hbox">
- </frame>
- </frame>
+ <!-- Højre øje -->
+ <frame layout="vbox">
+ <checkbox caption="Der er ikke målt på højre øje"
+ name="90D_lens.right.missing" script="right_eye"
+ map="missing_eye_right_map"
+ truevalue="mangler" falsevalue="" value=""/>
+ <frame name="right_eye_frame" caption="Højre øje" layout="vbox">
+
+ <!-- Indblik -->
+ <combobox name="90D_lens.right.fundus_visibility" value="">
+ <item caption="Klart" value="klart"/>
+ <item caption="Let sløret" value="let sløret"/>
+ <item caption="Meget sløret" value="meget sløret"/>
+ <item caption="Intet" value="intet"/>
+ </combobox>
- <!-- Observationer -->
- <frame caption="Observeret" layout="hbox">
- <multilist name="90D_lens.implications" value="" layout="hbox" innerwidget="90dmeta">
- <metawidget name="90dmeta" format="På ${eye} øje findes ${implikation}." layout="hbox">
+ <!-- Observationer -->
+ <radiobuttons name="90D_lens..right.implikation" value="" script="retinal_haevelse_right">
+ <radiobutton caption="Retinal hævelse" value="retinal hævelse"/>
+ <radiobutton caption="Atrofi" value="atrofi"/>
+ </radiobuttons>
- <frame layout="vbox">
- <label caption=" "/>
- <label caption="På"/>
+ <frame name="retinal_haevelse_right" layout="vbox">
+ <checkbox name="90D_lens.right.randbl" caption="Randblødning"
+ truevalue="randblødning" falsevalue="" value=""/>
+ <checkbox name="90D_lens.right.exsudater" caption="Exsudater"
+ truevalue="exsudater" falsevalue="" value=""/>
</frame>
- <frame layout="vbox">
- <label caption="Øje:"/>
- <combobox name="eye" value="højre">
- <item caption="Højre" value="højre"/>
- <item caption="Venstre" value="venstre"/>
- </combobox>
- </frame>
+ </frame>
+ </frame>
+
+ <!-- Venstre øje -->
+ <frame layout="vbox">
+ <checkbox caption="Der er ikke målt på venstre øje"
+ name="90D_lens.left.missing" script="left_eye"
+ map="missing_eye_left_map"
+ truevalue="mangler" falsevalue="" value=""/>
+ <frame name="left_eye_frame" caption="Venstre øje" layout="vbox">
+
+ <!-- Indblik -->
+ <combobox name="90D_lens.left.fundus_visibility" value="">
+ <item caption="Klart" value="klart"/>
+ <item caption="Let sløret" value="let sløret"/>
+ <item caption="Meget sløret" value="meget sløret"/>
+ <item caption="Intet" value="intet"/>
+ </combobox>
+
+ <!-- Observationer -->
+ <radiobuttons name="90D_lens.left.implikation" value="" script="retinal_haevelse_left">
+ <radiobutton caption="Retinal hævelse" value="retinal hævelse"/>
+ <radiobutton caption="Atrofi" value="atrofi"/>
+ </radiobuttons>
- <frame layout="vbox">
- <label caption=""/>
- <label caption="øje findes"/>
+ <frame name="retinal_haevelse_left" layout="vbox">
+ <checkbox name="90D_lens.left.randbl" caption="Randblødning"
+ truevalue="randblødning" falsevalue="" value=""/>
+ <checkbox name="90D_lens.left.exsudater" caption="Exsudater"
+ truevalue="exsudater" falsevalue="" value=""/>
</frame>
- <frame layout="vbox">
- <label caption="Implikation:"/>
- <combobox name="implikation" value="atrofi">
- <item caption="Atrofi" value="atrofi"/>
- <item caption="Central hævelse" value="central hævelse"/>
- <item caption="Randblødning" value="randblødning"/>
- <item caption="Exsudater" value="exsudater"/>
- </combobox>
- </frame>
+ </frame>
+ </frame>
+ </frame>
- <spacer/>
+ <label caption="Supplerende:"/>
+ <textedit name="90D_lens.additional" value=""/>
- </metawidget>
- </multilist>
- </frame>
-
<!-- Knapper -->
<frame layout="hbox">
<spacer/>
diff --git a/server/xml/macros/B.2.2.8.xml b/server/xml/macros/B.2.2.8.xml
index 82ea22f..04c5f06 100644
--- a/server/xml/macros/B.2.2.8.xml
+++ b/server/xml/macros/B.2.2.8.xml
@@ -27,8 +27,8 @@ ${amd_preop.conclusion_additional}${amd_preop.conclusion_terminated}.</resume>
<combobox name="amd_preop.conclusion"
value=""
script="afsluttes">
- <item caption="Ingen indikation for yderligere udredning."
- value="Der findes ingen indikation for yderligere udredning."/>
+ <item caption="Ingen indikation for yderligere udredning af AMD."
+ value="Der findes ingen indikation for yderligere udredning af AMD."/>
<item caption="Der findes indikation for fluorescens angiografi"
value="Der findes indikation for fluorescens angiografi."/>
</combobox>
diff --git a/server/xml/macros/B.2.5.xml b/server/xml/macros/B.2.5.xml
index 8509dfe..fbbdef7 100644
--- a/server/xml/macros/B.2.5.xml
+++ b/server/xml/macros/B.2.5.xml
@@ -1,7 +1,28 @@
<?xml version='1.0' encoding='UTF-8'?>
<macro name="B.2.5" version="1.0">
- <resume>90-D undersøgelse:
-Der findes ingen randhæmorrhagier eller exsudater.</resume>
+ <resume language="lua">
+ out = '90-D undersøgelse:\nDer findes '
+ if(getValue('fundus.randh') == '' and getValue('fundus.exsud') == '')
+ then
+ out = out .. 'ingen randhæmorrhagier eller exsudater'
+ else
+ if(getValue('fundus.randh') ~= '' and getValue('fundus.exsud') ~= '')
+ then
+ out = out .. 'randhæmorrhagier og exsudater'
+ else
+ if(getValue('fundus.randh') ~= '')
+ then
+ out = out .. 'randhæmorrhagier'
+ end
+ if(getValue('fundus.exsud') ~= '')
+ then
+ out = out .. 'exsudater'
+ end
+ end
+ end
+ out = out .. '.\n'
+ return out
+ </resume>
<queries>
</queries>
<maps>
@@ -11,28 +32,17 @@ Der findes ingen randhæmorrhagier eller exsudater.</resume>
<window caption="Vurdering af fundus (B.2.5)"
layout="vbox">
- <combobox>
+ <combobox name="fundus.source" value="">
<item caption="Fundus foto" value="Fundus foto"/>
<item caption="90-D linse undersøgelse" value="90-D linse undersøgelse"/>
</combobox>
<label caption="viser"/>
- <checkbox caption="Randhæmorrhagier" truevalue="Randhæmorrhagier" falsevalue="" value=""/>
- <checkbox caption="Exsudater" truevalue="Exsudater" falsevalue="" value=""/>
-
-<!--
-To felter
-I en drop down menu vælges mellem to alternativer:
-”Fundus foto viser” (default) << source
-”90-D linse undersøgelse viser”
-
-I en anden drop down menu vælges mellem fire alternativer:
-”Ingen randhæmorrhagier eller exsudater” << result
-”Randhæmorrhagier”
-”Exsudater”
-”Randhæmorrhagier og exsudater”
--->
+ <checkbox name="fundus.randh" caption="Randhæmorrhagier"
+ truevalue="Randhæmorrhagier" falsevalue="" value=""/>
+ <checkbox name="fundus.exsud" caption="Exsudater"
+ truevalue="Exsudater" falsevalue="" value=""/>
<!-- Knapper -->
<frame layout="hbox">
diff --git a/server/xml/macros/B.3.1.2.xml b/server/xml/macros/B.3.1.2.xml
index bf4058f..b714f55 100644
--- a/server/xml/macros/B.3.1.2.xml
+++ b/server/xml/macros/B.3.1.2.xml
@@ -16,16 +16,8 @@
</scripts>
<window caption="Gennemgang af de 5 trin (B.3.1.2)" layout="vbox">
<frame layout="vbox">
- <frame layout="hbox">
- <label caption="De 5 trin til forebyggelse af forveksling af øjnene er gennemgået:"/>
- </frame>
- <frame layout="hbox">
- <radiobuttons name="five_steps" script="yes_only">
- <radiobutton value="ja" caption="Ja"/>
- <radiobutton value="nej" caption="Nej"/>
- </radiobuttons>
- <spacer />
- </frame>
+ <checkbox name="five_steps" script="yes_only" truevalue="ja" falsevalue="nej"
+ caption="De 5 trin til forebyggelse af forveksling af øjnene er gennemgået:"/>
</frame>
<frame layout="hbox">
<spacer/>
diff --git a/server/xml/macros/B.3.1.3.xml b/server/xml/macros/B.3.1.3.xml
index 2ea7743..10658f5 100644
--- a/server/xml/macros/B.3.1.3.xml
+++ b/server/xml/macros/B.3.1.3.xml
@@ -11,8 +11,9 @@ Lucentis ${lucentis_treatment.eye}
Der dryppes med oculoguttae Tobrex over injektionsstedet.
Herefter medgives oculoguttae Tobrex til drypning x 2 i 2 døgn i det
behandlede øje.
-Der gives tid til kontrol og fornyet behandling om 1 måned.
-Møder til kontrol 1 måned efter behandling med Lucentis.</resume>
+Der gives tid til kontrol om 1 måned og stillingtagen til evt fornyet
+behandling.
+</resume>
<queries>
</queries>
<maps>
@@ -33,7 +34,7 @@ Injektionsstedet nedadtil temporalt i konjunktiva afmærkes med passer 3,5 mm fr
</frame>
<label caption="Der dryppes med oculoguttae Tobrex over injektionsstedet.
Herefter medgives oculoguttae Tobrex til drypning x 2 i 2 døgn i det behandlede øje.
-Der gives tid til kontrol og stillingtagen til evt fornyet behandling."/>
+Der gives tid til kontrol om 1 måned og stillingtagen til evt fornyet behandling."/>
</frame>
<frame layout="hbox">
<spacer/>