# along with Confetti. If not, see <http://www.gnu.org/licenses/>.
declare -A tpy
+declare -A mpx
BR='
'
id="$_GET[id]"
tpyfile="$_DATA/therapies/$id"
+mpxfile="$_DATA/prescriptions/${id%.tpy}.mpx"
+client="$_DATA/vcard/${id%%.*}.vcf"
+
+identify "$_EXEC/templates/therapy_background.png" \
+| sed -r 's;^.* ([0-9]+x[0-9]+) .*$;\1;' \
+| read bg_dim
+
+card_N="$(sed -nr 's:^(N)(;[^"\:]+|;"[^"]+")*\:(.*)$:\3:gp' "$client")"
+card_FN="$(sed -nr 's:^(FN)(;[^"\:]+|;"[^"]+")*\:(.*)$:\3:gp' "$client")"
+card_NICK="$(sed -nr 's:^(NICKNAME)(;[^"\:]+|;"[^"]+")*\:(.*)$:\3:gp' "$client")"
+
+n=$(printf %s "$card_N" \
+ | sed -rn 's:^([^;]*)(\;[^;]*)(\;[^;]*)?(\;[^;]*)?(\;[^;]*)?$:\4 \2 \3 \1 \5:gp' \
+ | sed -r 's:,: :;s:\;: :g;s: +: :g;s:^ $::;'
+ )
+client_name="${n:-${card_FN:-${card_NICK}}}"
mpx=()
+cat "$mpxfile" |while read -r line; do
+ val="${line#*:}"
+ mpx[${line%%:*}]="${val//\\n/$BR}"
+done
+
+tpy=()
cat "$tpyfile" |while read -r line; do
val="${line#*:}"
tpy[${line%%:*}]="${val//\\n/$BR}"