]> git.plutz.net Git - confetti/blob - therapy.html.sh
eb93553fae7d3ca3163d4165b913f47aefdbc017
[confetti] / therapy.html.sh
1 # Copyright 2016 Paul Hänsch
2 #
3 # This file is part of Confetti.
4
5 # Confetti is free software: you can redistribute it and/or modify
6 # it under the terms of the GNU Affero General Public License as published by
7 # the Free Software Foundation, either version 3 of the License, or
8 # (at your option) any later version.
9
10 # Confetti is distributed in the hope that it will be useful,
11 # but WITHOUT ANY WARRANTY; without even the implied warranty of
12 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13 # GNU Affero General Public License for more details.
14
15 # You should have received a copy of the GNU Affero General Public License
16 # along with Confetti.  If not, see <http://www.gnu.org/licenses/>. 
17
18 t_session_note(){
19   session_n="$1"
20   note_n="$2"
21   
22   color=session${session_n}_note${note_n}_color
23   unset c0 c1 c2 c3 c4 c5 c6 c7
24   
25   case "$tpy[$color]" in
26     \#888) c0=checked;;
27     \#00A) c1=checked;;
28     \#0A0) c2=checked;;
29     \#0AA) c3=checked;;
30     \#A00) c4=checked;;
31     \#A0A) c5=checked;;
32     \#AA0) c6=checked;;
33     *)    c7=checked;;
34   esac
35
36 cat <<EOF
37   <fieldset class=note>
38     <input class=color type=radio name="$color" value="#888" id=${color}_000 $c0><label for=${color}_000></label>
39     <input class=color type=radio name="$color" value="#00A" id=${color}_001 $c1><label for=${color}_001></label>
40     <input class=color type=radio name="$color" value="#0A0" id=${color}_010 $c2><label for=${color}_010></label>
41     <input class=color type=radio name="$color" value="#0AA" id=${color}_011 $c3><label for=${color}_011></label>
42     <input class=color type=radio name="$color" value="#A00" id=${color}_100 $c4><label for=${color}_100></label>
43     <input class=color type=radio name="$color" value="#A0A" id=${color}_101 $c5><label for=${color}_101></label>
44     <input class=color type=radio name="$color" value="#AA0" id=${color}_110 $c6><label for=${color}_110></label>
45     <input class=color type=radio name="$color" value="#FFF" id=${color}_111 $c7><label for=${color}_111></label>
46     <textarea name="session${session_n}_note${note_n}">${tpy[session${session_n}_note${note_n}]}</textarea>
47   </fieldset>
48 EOF
49 }
50
51 t_session(){
52   session_n="$1"
53
54   sid=session${session_n}
55
56   if [ "$tpy[${sid}_sigset]" = pos ]; then
57     sig=neg
58     sigcheck=checked
59   elif [ "$tpy[${sid}_sigset]" = neg ]; then
60     sig=pos
61     unset sigcheck
62   elif [ "$tpy[${sid}_signature]" = pos ]; then
63     sig=neg
64     sigcheck=checked
65   else
66     sig=pos
67     unset sigcheck
68   fi
69
70 cat <<EOF
71   <input type=hidden name=$sid value=exists>
72   <input class="tab" type="checkbox" id=${sid}_open name="${sid}_open" value="checked" ${tpy[${sid}_open]}>
73   <label class="tab" for="${sid}_open">
74     <span class=no>${session_n}.</span><!--
75  --><span class=date>${tpy[${sid}_date]}</span><!--
76  --><input class="date" name="${sid}_date" value="${tpy[${sid}_date]}" placeholder="$(l10n date)"><!--
77  --><span class=therapist>${tpy[${sid}_therapist]}</span><!--
78  --><input class="therapist" name="${sid}_therapist" value="${tpy[${sid}_therapist]}" placeholder="$(l10n therapist)"><!--
79  --><span class=signature><input type=checkbox name="${sid}_signature" value=pos $sigcheck><button type=submit name=${sid}_sigset value=$sig></button></span>
80   </label>
81   <div class=tab>
82     <img class="dotmark ov" src="/therapies/${id%.tpy}_${sid}.png" alt="">
83     $(n=1; while [ -n "${tpy[${sid}_note${n}]+x}" ]; do
84       t_session_note $session_n $n
85       n=$(($n+1))
86     done
87     printf '<button type=submit name=%s_note%s value="">+</button>' "$sid" "$n"
88     )
89
90     <button class=delete type=submit name=delete_session value=${session_n}>$(l10n delete_session)</button>
91     <button type=submit>$(l10n save)</button>
92   </div>
93 EOF
94 }
95
96 therapy_sessions(){
97   n=1; while [ -n "${tpy[session${n}]}" ]; do
98     t_session $n
99     n=$(($n+1))
100   done
101
102   sid=session$n
103
104 cat <<EOF
105   <fieldset class="tab">
106     <button class=no type=submit name=new_session value=$sid>+</button><!--
107  --><input class=date name=${sid}_date value="" placeholder="$(l10n date)" /><!--
108  --><input class=therapist name=${sid}_therapist value="" placeholder="$(l10n therapist)" /><!--
109  --><span class=signature><span></span>
110     <input type=hidden name="${sid}_note1" value="">
111   </fieldset>
112 EOF
113 }
114
115 unset c0 c1 c2 c3 c4 c5 c6 c7
116 case "$tpy[color]" in
117   \#00A) c1="checked";;
118   \#0A0) c2="checked";;
119   \#0AA) c3="checked";;
120   \#A00) c4="checked";;
121   \#A0A) c5="checked";;
122   \#AA0) c6="checked";;
123   \#FFF) c7="checked";;
124       *) c0="checked";;
125 esac
126
127 cat <<EOF
128   <h1>$(l10n therapy)</h1>
129
130   <div class="patient">
131     <h2>$client_name</h2>
132     <a href="?p=prescriptions&amp;client=${id%%.*}.vcf">&lt; $(l10n prescriptionlist)</a>
133   </div>
134
135   <div class="prescription">
136     <h2>$(l10n therapy_prescription)</h2>
137     <span class="insurance">${mpx[insurance]}</span>
138     <span class="date"><label>$(l10n date):</label>${mpx[date]}</span>
139
140     <label class="checkbox ${mpx[prescreviewed]:+checked}" for="prescreviewed">
141       $([ -n "${mpx[prescreviewed]}" ] && printf %s "$(l10n prescreviewed)" \
142                                        || printf %s "$(l10n prescreview)" )
143     </label>
144
145          ${mpx[prescno]:+<span class="prescno">$(l10n presc${mpx[prescno]})</span>}
146     ${mpx[grouptherapy]:+<span class="catalogue">$(l10n grouptherapy)</span>}
147        ${mpx[housecall]:+<span class="catalogue">$(l10n housecall)</span>}
148           ${mpx[report]:+<span class="catalogue">$(l10n report)</span>}
149
150     <ul>
151       ${mpx[remidy]:+ <li>${mpx[quantity]}  ${mpx[remidy]}  ${mpx[quantity_weekly]:+($mpx[quantity_weekly] $(l10n weekly))}</li>}
152       ${mpx[remidy1]:+<li>${mpx[quantity1]} ${mpx[remidy1]} ${mpx[quantity_weekly1]:+($mpx[quantity_weekly1] $(l10n weekly))}</li>}
153     </ul>
154
155     ${mpx[indicator]:+<span class="indicator"><label>$(l10n indicator):</label>${mpx[indicator]}</span>}
156         ${mpx[icd10]:+<span class="icd10">    <label>$(l10n icd10):</label>${mpx[icd10]}</span>}
157
158     ${mpx[addcontrib]:+
159     <label class='checkbox ${mpx[contribconfirm]:+checked}' for="addcontrib">
160       $([ -n "${mpx[contribconfirm]}" ] && printf %s "$(l10n contribconfirm)" ${mpx[contribconfirm]} \
161                                         || printf %s "$(l10n addcontrib)" )
162     </label>
163     }
164   </div>
165
166 <form method="POST" action="?action=update_therapy">
167   <input type="hidden" name="id" value="${id}">
168
169   <label class="tab heading">
170     <span class=no>$(l10n number)</span><!--
171  --><span class=date>$(l10n date)</span><!--
172  --><span class=therapist>$(l10n therapist)</span><!--
173  --><span class=signature>$(l10n signature)</span>
174   </label>
175
176   $(therapy_sessions)
177
178   <fieldset class=color>
179     <input class=color type=radio name=color onclick="javascript:setcol('#000')" value="#000" id=c000 $c0><label for=c000></label>
180     <input class=color type=radio name=color onclick="javascript:setcol('#00A')" value="#00A" id=c001 $c1><label for=c001></label>
181     <input class=color type=radio name=color onclick="javascript:setcol('#0A0')" value="#0A0" id=c010 $c2><label for=c010></label>
182     <input class=color type=radio name=color onclick="javascript:setcol('#0AA')" value="#0AA" id=c011 $c3><label for=c011></label>
183     <input class=color type=radio name=color onclick="javascript:setcol('#A00')" value="#A00" id=c100 $c4><label for=c100></label>
184     <input class=color type=radio name=color onclick="javascript:setcol('#A0A')" value="#A0A" id=c101 $c5><label for=c101></label>
185     <input class=color type=radio name=color onclick="javascript:setcol('#AA0')" value="#AA0" id=c110 $c6><label for=c110></label>
186     <input class=color type=radio name=color onclick="javascript:setcol('#FFF')" value="#FFF" id=c111 $c7><label for=c111></label>
187   </fieldset>
188   <img class="dotmark bg" src="?static=therapy_background.png" alt="WARNING: Background Image not available!">
189   <canvas id="canvas" class="dotmark ov" width="${bg_dim%x*}" height="${bg_dim#*x}"></canvas>
190
191   <input type=hidden id=image_serialize name=imagedata value="">
192   <span id="jsdebug" style="display: none; position: fixed; right:0; bottom:0">Debug</span>
193
194   <script><!--
195   body = document.body
196   canvas = document.getElementById("canvas")
197   dbg = document.getElementById("jsdebug")
198   image = canvas.getContext("2d")
199   mouse = 0
200   image_serialize=""
201   data=document.getElementById("image_serialize")
202
203   function setcol(c) {
204     image.strokeStyle = c
205     if ( c == "#FFF" ) image.lineWidth = 32
206     else image.lineWidth = 4
207     image_serialize += " stroke " + c + " stroke-width " + image.lineWidth
208   }
209
210   setcol("$tpy[color]")
211
212   function draw(x, y) {
213     if ( mouse == 1){
214       if ( body.clientWidth >= 800 ){
215         sx=Math.floor(cscaleW * (x - canvas.offsetLeft))
216         sy=Math.floor(cscaleH * (y - canvas.offsetTop))
217       } else { 
218         sx=Math.floor(cscaleW * (x - canvas.offsetLeft + window.pageXOffset))
219         sy=Math.floor(cscaleH * (y - canvas.offsetTop + window.pageYOffset))
220       }
221       image.lineTo( sx, sy )
222       image.stroke()
223
224       image_serialize += " " + sx + "," + sy
225     }
226   }
227
228   function drawstart(x, y) {
229     mouse = 1
230
231     cscaleW = canvas.width / canvas.clientWidth
232     cscaleH = canvas.height / canvas.clientHeight
233
234     image_serialize += " polyline"
235     image.beginPath()
236     draw(x, y)
237   }
238   function drawstop() {
239    mouse = 0
240    image.closePath()
241    dbg.innerHTML = image_serialize
242    data.value = image_serialize
243   }
244
245   window.addEventListener( 'mouseup',   function()   { drawstop() } )
246   canvas.addEventListener( 'mousedown', function(e)  { drawstart(e.clientX, e.clientY) } )
247   canvas.addEventListener( 'mousemove', function(e)  {      draw(e.clientX, e.clientY) } )
248
249   window.addEventListener( 'touchend',   function()  { drawstop() } )
250   canvas.addEventListener( 'touchstart', function(e) { drawstart(e.touches[0].clientX, e.touches[0].clientY) } )
251   canvas.addEventListener( 'touchmove',  function(e) { e.preventDefault(); draw(e.touches[0].clientX, e.touches[0].clientY) } )
252
253   --></script>
254 </form>
255
256 EOF
257 # vi:set filetype=html: