blob: 857c88b2490b98aeecb617fae1f53b4bfdc638b2 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
|
<?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="B.2.7.3" version="1.0">
<resume language="lua">
out = 'Konklusion:\n'
if( getValue('fluorescens.conclusion') == 'Klassisk subretinal karnydannelse.'
or getValue('fluorescens.conclusion') == 'Overvejende klassisk subretinal neovaskulær membran.' )
then
out = out .. getValue('fluorescens.conclusion') .. '\n'
out = out .. 'Membran placering: ' .. getValue('fluorescens.membrane.position') .. '\n'
out = out .. 'Membranstørrelse: ' .. getValue('fluorescens.membrane.size') .. 'µm\n'
else
if( getValue('fluorescens.conclusion') == 'andet' )
then
out = out .. getValue('fluorescens.conclusion.other') .. '\n'
else
out = out .. getValue('fluorescens.conclusion') .. '\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 conclusion.
if( getValue('fluorescens.conclusion') == 'Klassisk subretinal karnydannelse.'
or getValue('fluorescens.conclusion') == 'Overvejende klassisk subretinal neovaskulær membran.' )
then
enable('yderligere_info_frame')
else
disable('yderligere_info_frame')
end
if( getValue('fluorescens.conclusion') == 'andet' )
then
enable('andet_frame')
else
disable('andet_frame')
end
return true
</script>
</scripts>
<window caption="Konklusion (B.2.7.3)"
layout="vbox">
<frame layout="hbox">
<label caption="Øje:" width="50"/>
<radiobuttons name="fluorescens.conclusion.eye" value="">
<radiobutton caption="o.dxt" value="o.dxt"/>
<radiobutton caption="o.sin" value="o.sin"/>
</radiobuttons>
<spacer/>
</frame>
<combobox name="fluorescens.conclusion"
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 karnydannelse." />
<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="Occutalt subretinal neovaskulær membran."
value="Occutalt subretinal neovaskulær membran." />
<item caption="Andet"
value="andet" />
</combobox>
<frame name="andet_frame" layout="hbox">
<label caption="Andet:"/>
<lineedit name="fluorescens.conclusion.other" 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.membrane.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.membrane.size" regexp="[0-9,.-]+" value=""/>
<label caption="µm" />
<spacer/>
</frame>
</frame>
<!-- Knapper -->
<frame layout="hbox">
<spacer/>
<button caption="Gem" action="commit"/>
</frame>
</window>
</macro>
|