Added ability to toggle between one big closing ledger entry, and one per house
git-svn-id: file:///svn-source/pmgr/branches/yafr_20090716@390 97e9348a-65ac-dc4b-aefc-98561f571b83
This commit is contained in:
@@ -4,8 +4,7 @@ use DBI;
|
||||
use Data::Dumper;
|
||||
use File::Copy;
|
||||
|
||||
my $use_invoice = 0;
|
||||
my $use_receipt = 1;
|
||||
my $closing_one_transaction = 0;
|
||||
|
||||
# Internally adjust all numbers coming from the database to
|
||||
# be in inches. Not necessary to go to this detail, but the
|
||||
@@ -1266,7 +1265,7 @@ foreach $row (@{query($sdbh, $query)}) {
|
||||
|
||||
|
||||
# Special case for closing
|
||||
if ($stamp eq $newdb{'lookup'}{'_closing'}{'stamp'}) {
|
||||
if ($closing_one_transaction && $stamp eq $newdb{'lookup'}{'_closing'}{'stamp'}) {
|
||||
$newdb{'lookup'}{'_closing'}{'transaction_id'} =
|
||||
$newdb{'lookup'}{'receipt'}{$row->{'ReceiptNum'}}{$row->{'PaymentType'}}{'receipt_id'};
|
||||
$newdb{'lookup'}{'_closing'}{'debit_entry_id'} =
|
||||
@@ -1342,12 +1341,16 @@ foreach $row (@{query($sdbh, $query)})
|
||||
######################################################################
|
||||
## Special case - Fix the entries for our closing transaction
|
||||
|
||||
$newdb{'tables'}{'ledger_entries'}{'rows'}[
|
||||
$newdb{'lookup'}{'_closing'}{'debit_entry_id'}
|
||||
]{'amount'} = $newdb{'lookup'}{'_closing'}{'amount'};
|
||||
$newdb{'tables'}{'ledger_entries'}{'rows'}[
|
||||
$newdb{'lookup'}{'_closing'}{'credit_entry_id'}
|
||||
]{'amount'} = $newdb{'lookup'}{'_closing'}{'amount'};
|
||||
if ($newdb{'lookup'}{'_closing'}{'debit_entry_id'}) {
|
||||
$newdb{'tables'}{'ledger_entries'}{'rows'}[
|
||||
$newdb{'lookup'}{'_closing'}{'debit_entry_id'}
|
||||
]{'amount'} = $newdb{'lookup'}{'_closing'}{'amount'};
|
||||
}
|
||||
if ($newdb{'lookup'}{'_closing'}{'credit_entry_id'}) {
|
||||
$newdb{'tables'}{'ledger_entries'}{'rows'}[
|
||||
$newdb{'lookup'}{'_closing'}{'credit_entry_id'}
|
||||
]{'amount'} = $newdb{'lookup'}{'_closing'}{'amount'};
|
||||
}
|
||||
|
||||
|
||||
######################################################################
|
||||
|
||||
@@ -356,7 +356,16 @@ class Customer extends AppModel {
|
||||
'conditions' => array('StatementEntry.customer_id' => $id),
|
||||
));
|
||||
|
||||
//pr(compact('stats'));
|
||||
pr(compact('stats'));
|
||||
|
||||
$stat2 =
|
||||
$this->Transaction->stats(null,
|
||||
array('conditions' =>
|
||||
array('Transaction.customer_id' => $id),
|
||||
));
|
||||
|
||||
pr(compact('stat2'));
|
||||
|
||||
return $stats[0];
|
||||
}
|
||||
|
||||
|
||||
Reference in New Issue
Block a user