3 _EXEC="$(realpath "${0%/*}")"
4 . "$_EXEC/cgilite/cgilite.sh"
5 . "$_EXEC/cgilite/logging.sh"
6 . "$_EXEC/cgilite/storage.sh"
7 . "$_EXEC/cgilite/session.sh"
10 printf 'Content-Type: text/html; charset=utf-8\r\n\r\n'
11 "$_EXEC/cgilite/html-sh.sed" <<EOF
13 [meta name="viewport" content="width=device-width"]
14 [link rel="stylesheet" type="text/css" href="/invoices.css"]
18 [a "/invoices/" Invoices]
19 [a "/clients/" Clients]
20 [a "/senders/" Senders]
27 info="$(PATH "${PATH_INFO}")"
31 . "$_EXEC/cgilite/file.sh"
32 FILE "$_EXEC/invoices.css"
37 printf '[a .new href="/clients/%s" New]' "$(timeid)"
38 } | yield_page clients
42 edit_client "${info#/clients/}" |yield_page client
52 printf '[a .new href="/senders/%s" New]' "$(timeid)"
53 } | yield_page senders
57 edit_sender "${info#/senders/}" |yield_page sender
65 . "$_EXEC/invoices.sh"
67 printf '[a .new href="/invoice/%s" New]' "$(timeid)"
68 } | yield_page invoices
71 . "$_EXEC/invoices.sh"
72 edit_invoice "${info#/invoice/}" |yield_page invoice
75 . "$_EXEC/invoices.sh"
77 REDIRECT "/invoice/$id"