diff options
author | John Wiegley <johnw@newartisans.com> | 2013-07-12 11:44:48 -0700 |
---|---|---|
committer | John Wiegley <johnw@newartisans.com> | 2013-07-12 11:44:48 -0700 |
commit | 71320180988866fa8084c6354d3efca64d90431c (patch) | |
tree | 9fc96cefea1c6c83697ddd0c5cc2b6272cce1eb9 /contrib | |
parent | 78e65ee4ab7f31eff707429c74b043819d016e1e (diff) | |
parent | 8908b032341eaa18c81c43a4792a84cdac05fe36 (diff) | |
download | fork-ledger-71320180988866fa8084c6354d3efca64d90431c.tar.gz fork-ledger-71320180988866fa8084c6354d3efca64d90431c.tar.bz2 fork-ledger-71320180988866fa8084c6354d3efca64d90431c.zip |
Merge pull request #201 from bkuhn/contrib-non-profit-audit-use-accounts
Use "ledger accounts" command rather than the '-F "%150A\n" reg' report solution
Diffstat (limited to 'contrib')
-rwxr-xr-x | contrib/non-profit-audit-reports/cash-receipts-and-disbursments-journals.plx | 3 | ||||
-rwxr-xr-x | contrib/non-profit-audit-reports/general-ledger-report.plx | 3 |
2 files changed, 2 insertions, 4 deletions
diff --git a/contrib/non-profit-audit-reports/cash-receipts-and-disbursments-journals.plx b/contrib/non-profit-audit-reports/cash-receipts-and-disbursments-journals.plx index 6234542c..937d2a45 100755 --- a/contrib/non-profit-audit-reports/cash-receipts-and-disbursments-journals.plx +++ b/contrib/non-profit-audit-reports/cash-receipts-and-disbursments-journals.plx @@ -67,8 +67,7 @@ if (@ARGV < 2) { my($beginDate, $endDate, @otherLedgerOpts) = @ARGV; -my(@chartOfAccountsOpts) = ('-V', '-F', "%150A\n", '-w', '-s', - '-b', $beginDate, '-e', $endDate, @otherLedgerOpts, 'reg'); +my(@chartOfAccountsOpts) = ('-b', $beginDate, '-e', $endDate, @otherLedgerOpts, 'accounts'); open(CHART_DATA, "-|", $LEDGER_CMD, @chartOfAccountsOpts) or die "Unable to run $LEDGER_CMD @chartOfAccountsOpts: $!"; diff --git a/contrib/non-profit-audit-reports/general-ledger-report.plx b/contrib/non-profit-audit-reports/general-ledger-report.plx index 0d6b28e6..4a4f89cc 100755 --- a/contrib/non-profit-audit-reports/general-ledger-report.plx +++ b/contrib/non-profit-audit-reports/general-ledger-report.plx @@ -62,8 +62,7 @@ die "badly formatted end date, $beginDate" if $formattedBeginDate->parse($beginD $formattedBeginDate = $formattedBeginDate->printf("%Y/%m/%d"); -my(@chartOfAccountsOpts) = ('-V', '-F', "%150A\n", '-w', '-s', - '-b', $beginDate, '-e', $endDate, @otherLedgerOpts, 'reg'); +my(@chartOfAccountsOpts) = ('-b', $beginDate, '-e', $endDate, @otherLedgerOpts, 'accounts'); open(CHART_DATA, "-|", $LEDGER_CMD, @chartOfAccountsOpts) or die "Unable to run $LEDGER_CMD @chartOfAccountsOpts: $!"; |