abijah/pmgr
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Added the ability to edit a tender. I've locked this down to just editing the data1-4 fields at the moment, since there are accounting ramifications if we were to change the tender type.

Browse Source 
git-svn-id: file:///svn-source/pmgr/branches/yafr_20090716@519 97e9348a-65ac-dc4b-aefc-98561f571b83
This commit is contained in:
abijah
2009-08-10 22:23:47 +00:00
parent 1ce71a3936
commit e100c9a88f
6 changed files with 152 additions and 29 deletions
Download Patch File Download Diff File Expand all files Collapse all files

22
scripts/sitelink2pmgr.pl
View File

@@ -544,16 +544,19 @@ foreach my $tender_name ('Cash', 'Check', 'Money Order', 'ACH',
) {
my ($tillable, $fields) = (0, 0);
my ($name1, $name2, $name3, $name4);
my ($name_field) = ('id');
$tillable = 1
if ($tender_name =~ /^Cash|Check|Money Order$/);
($name1) = ('Check Number')
($name1, $name_field) = ('Check Number', 'data1')
if ($tender_name eq 'Check');
($name1) = ('Money Order Number')
($name1, $name_field) = ('Money Order Number', 'data1')
if ($tender_name eq 'Money Order');
# REVISIT <AP>: 20090810
# Make data3 be the confirmation number?
($name1, $name2) = ('Routing Number', 'Account Number')
if ($tender_name eq 'ACH');
@@ -571,6 +574,7 @@ foreach my $tender_name ('Cash', 'Check', 'Money Order', 'ACH',
'data2_name' => $name2,
'data3_name' => $name3,
'data4_name' => $name4,
'naming_field' => $name_field,
});
$newdb{'lookup'}{'tender_type'}{$tender_name}
@@ -1206,8 +1210,6 @@ foreach $row (@{query($sdbh, $query)}) {
= $newdb{'lookup'}{'account'}{'A/R'}{'ledger_id'};
if ($SITELINK_ACCOUNT_TYPE{$row->{'PaymentType'}} eq 'Check') {
$newdb{'lookup'}{'receipt'}{$row->{'ReceiptNum'}}{$row->{'PaymentType'}}{'name'}
= 'Check #' . $row->{'CheckNum'};
$newdb{'lookup'}{'receipt'}{$row->{'ReceiptNum'}}{$row->{'PaymentType'}}{'data1'}
= $row->{'CheckNum'};
}
@@ -1577,6 +1579,18 @@ $query = "UPDATE pmgr_transactions T, pmgr_ledger_entries E
query($db_handle, $query);
######################################################################
## Tender Names
print("Set Tender Names...\n");
$query = "UPDATE pmgr_tenders T, pmgr_tender_types TT
SET T.`name` = CONCAT(T.`name`, ' #',
IF(T.tender_type_id IN (2,3), T.data1, T.id))
WHERE T.tender_type_id IS NULL OR TT.id = T.tender_type_id";
query($db_handle, $query);
######################################################################
## Invoice date fixes