+
+
+
+
+ $(n=1; while [ -n "${tpy[${sid}_note${n}]+x}" ]; do
+ t_session_note $session_n $n
+ n=$(($n+1))
+ done
+ printf '' "$sid" "$n"
+ )
+
+
+
+
+EOF
+}
+
+therapy_sessions(){
+ n=1; while [ -n "${tpy[session${n}]}" ]; do
+ t_session $n
+ n=$(($n+1))
+ done
+
+ sid=session$n
+
+cat <
+
+
+
+EOF
+}
+
+unset c0 c1 c2 c3 c4 c5 c6 c7
+case "$tpy[color]" in
+ \#00A) c1="checked";;
+ \#0A0) c2="checked";;
+ \#0AA) c3="checked";;
+ \#A00) c4="checked";;
+ \#A0A) c5="checked";;
+ \#AA0) c6="checked";;
+ \#FFF) c7="checked";;
+ *) c0="checked";;
+esac
+
cat <
Behandlungen
-
Verordnung
-
+
$(l10n therapy_prescription)
+
${mpx[insurance]}
+
${mpx[date]}
+
- - 6x MT
- - 6x Fango
+ ${mpx[remidy]:+ - ${mpx[quantity]} ${mpx[remidy]}
}
+ ${mpx[remidy1]:+- ${mpx[quantity1]} ${mpx[remidy1]}
}
- ???
-
-
-
-
-
-
-
+
EOF