ref: 00e5cf965166c614977ac549d9361d63d5edba02
dir: /bin/mkinvoice/
#!/bin/rc
rfork en
parts=`{
cd invoice
walk -d -n1 | awk -F '-' '
NF == 2 {
if ($1 > year)
year = $1
if ($2 > nr)
nr = $2
}
END {
printf "%d\t%d\n", year, nr+1
}
'}
id=`{echo $parts(1)^-^$parts(2)}
mkdir invoice/$id
touch invoice/$id/^(data.tsv client date msg template)
cat <<EOF >invoice/$id/msg
Invoice number \*(iv
.LP
Hi, here's the invoice:
.LP
.IV
.LP
Have a nice day!
EOF
cat <<EOF >invoice/$id/data.tsv
# Amount Price (1) VAT Name
EOF
echo 'default' >invoice/$id/template
date -n >invoice/$id/date
echo $id