@@ -38,13 +38,13 @@ account Accrued:Accounts Receivable:Main Org
; Organizational Expense Accounts
; NOTE: the payee =~ test is *not* included herein and must be cut-and-pasted
; to the assert in ever Expense account because of the following bug:
; http://bugs.ledger-cli.org/show_bug.cgi?id=953
define expenseChecker() = (tag("Receipt") !~ /^\s*$/ or tag("Invoice") !~ /^\s*$/ or tag("Statement") !~ /^\s*$/)
define expenseChecker() = (tag("Receipt") !~ /^\s*$/ or tag("Invoice") !~ /^\s*$/ or tag("Statement") !~ /^\s*$/) and tag("Program") !~ /^\s*$/
; or payee =~ /NEVER CHARGED/
account Expense:Main Org:Office Supplies
assert expenseChecker() or payee =~ /NEVER CHARGED/
note Main Organization's Office Supplies and Sundries