From 6cf6dda3f8ff4e58398da37d75d9305b4068ada9 Mon Sep 17 00:00:00 2001 From: abijah Date: Tue, 28 Jul 2009 16:06:03 +0000 Subject: [PATCH] Fixed a bug that was causing multiple tender types to have a name like 'Check #' git-svn-id: file:///svn-source/pmgr/branches/yafr_20090716@400 97e9348a-65ac-dc4b-aefc-98561f571b83 --- scripts/sitelink2pmgr.pl | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/scripts/sitelink2pmgr.pl b/scripts/sitelink2pmgr.pl index d7dd30c..eac13d1 100644 --- a/scripts/sitelink2pmgr.pl +++ b/scripts/sitelink2pmgr.pl @@ -1204,7 +1204,7 @@ foreach $row (@{query($sdbh, $query)}) { $newdb{'lookup'}{'receipt'}{$row->{'ReceiptNum'}}{$row->{'PaymentType'}}{'credit_ledger_id'} = $newdb{'lookup'}{'account'}{'A/R'}{'ledger_id'}; - if ($SITELINK_ACCOUNT_TYPE{$row->{'PaymentType'}} == 'Check') { + 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'} @@ -1216,8 +1216,8 @@ foreach $row (@{query($sdbh, $query)}) { 'type' => 'RECEIPT', 'stamp' => $stamp, 'customer_id' => undef, # Must be set later - 'account_id' => $newdb{'lookup'}{'account'}{'A/R'}{'account_id'}, - 'ledger_id' => $newdb{'lookup'}{'account'}{'A/R'}{'ledger_id'}, + 'account_id' => $newdb{'lookup'}{'receipt'}{$row->{'ReceiptNum'}}{$row->{'PaymentType'}}{'credit_account_id'}, + 'ledger_id' => $newdb{'lookup'}{'receipt'}{$row->{'ReceiptNum'}}{$row->{'PaymentType'}}{'credit_ledger_id'}, 'crdr' => 'CREDIT', 'comment' => "Receipt: $row->{'ReceiptNum'}; Type: $row->{'PaymentType'}", }); @@ -1313,7 +1313,7 @@ foreach $row (@{query($sdbh, $query)}) 'customer_id' => $newdb{'lookup'}{'charge'}{$row->{'ChargeID'}}{'customer_id'}, 'amount' => $reconcile_amount, - 'account_id' => $newdb{'lookup'}{'receipt'}{$row->{'ReceiptNum'}}{$row->{'PaymentType'}}{'credit_account_id'}, + 'account_id' => $newdb{'lookup'}{'receipt'}{$row->{'ReceiptNum'}}{$row->{'PaymentType'}}{'debit_account_id'}, }; $row->{'ChargeID'} = undef