diff options
author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-06-11 04:54:33 +0000 |
---|---|---|
committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-06-11 04:54:33 +0000 |
commit | fd63a4a63532aed40786de3f061796d17673eabe (patch) | |
tree | 146f2374b8fc71ed0d6ce6c78b2fc37a8cb07615 /LedgerSMB/CT.pm | |
parent | 19fe934f445c8f15b476f8cba1c3cbf449a59995 (diff) |
Fixing error searching by address
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1263 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB/CT.pm')
-rw-r--r-- | LedgerSMB/CT.pm | 15 |
1 files changed, 5 insertions, 10 deletions
diff --git a/LedgerSMB/CT.pm b/LedgerSMB/CT.pm index 7c1c3bf3..b64265ae 100644 --- a/LedgerSMB/CT.pm +++ b/LedgerSMB/CT.pm @@ -608,7 +608,7 @@ sub search { if ( $form->{address} ne "" ) { $var = $dbh->quote( $form->like( lc $form->{address} ) ); $where .= -" AND (lower(ct.address1) LIKE $var OR lower(ct.address2) LIKE '$var')"; +" AND (lower(ct.address1) ILIKE $var)"; } if ( $form->{startdatefrom} ) { @@ -634,17 +634,12 @@ sub search { FROM oe o, $form->{db} vc WHERE vc.id = o.$form->{db}_id)|; - if ( $form->{db} eq 'customer' ) { - $where .= qq| AND ct.id NOT IN (SELECT a.customer_id + if ( $form->{db} =~ /(^customer$|^vendor$)/ ) { + $where .= qq| AND ct.id NOT IN (SELECT a.entity_id FROM ar a, customer vc - WHERE vc.id = a.customer_id)|; + WHERE vc.entity_id = a.entity_id)|; } - if ( $form->{db} eq 'vendor' ) { - $where .= qq| AND ct.id NOT IN (SELECT a.vendor_id - FROM ap a, vendor vc - WHERE vc.id = a.vendor_id)|; - } $form->{l_invnumber} = $form->{l_ordnumber} = $form->{l_quonumber} = ""; } @@ -888,7 +883,7 @@ sub get_history { if ( $form->{address} ne "" ) { $var = $dbh->quote( $form->like( lc $form->{address} ) ); - $where .= " AND lower(ct.address1) LIKE $var"; + $where .= " AND lower(ct.address1) ILIKE $var"; } for (qw(name contact email phone notes city state zipcode country)) { |