# printrun.awk
#
# calculate cost of a fanzine printrun
#
# usage:
#
# awk -f printrun.awk verteiler
#
# verteiler:
#
# csv file with info on subscriptions. 
#
# format:
# best, beleg, gezahlt, verschickt, anschrift
#
# with best: zines ordered
# beleg: free zines because of submission
# gezahlt: this much has been payed
# verschickt: 0 = nothing sent yet, n = this many zines have been sent
# anschrift: postal address of subscriber
#
BEGIN {
  FS=", "
  bestell=0
  beleg=0
  zahlungen=0
  belegvers=2.00
  druck=131.45
}
!/#.*/{
  bestell=bestell+$1
  beleg=beleg+$2
  zahlungen=zahlungen+$3
  if ( $1 != 0 || $2 != 0) {
    print $1+$2 "	" $1 "	" $2 "	" $5 "	" $6 "	" $7 "	" $8
  }
}
END {
  preis=(druck+beleg*belegvers)/bestell
  printf "%i Bestellungen\n", bestell
  printf "%i Belegexemplare\n", beleg
  printf "-------------------\n"
  printf "Auflage: %i\n", beleg+bestell
  printf "Druckkosten: %2.2f €\n", druck
  printf "Belegversand: %2.2f €\n", beleg*belegvers
  printf "Bestellpreis: %2.2f €\n", preis
  printf "-------------------\n"
  printf "Ergebnis: %2.2f €\n", zahlungen
}