Revision 030cf0d5
Von Bernd Bleßmann vor fast 9 Jahren hinzugefügt
| SL/CT.pm | ||
|---|---|---|
| 75 | 75 |
"zipcode" => "ct.zipcode", |
| 76 | 76 |
"city" => "ct.city", |
| 77 | 77 |
"country" => "ct.country", |
| 78 |
"gln" => "ct.gln", |
|
| 78 | 79 |
"discount" => "ct.discount", |
| 79 | 80 |
"insertdate" => "ct.itime", |
| 80 | 81 |
"salesman" => "e.name", |
| ... | ... | |
| 143 | 144 |
push @values, ('%' . $form->{addr_country} . '%') x 2;
|
| 144 | 145 |
} |
| 145 | 146 |
|
| 147 |
if ($form->{addr_gln}) {
|
|
| 148 |
$where .= " AND ((lower(ct.gln) LIKE lower(?)) |
|
| 149 |
OR |
|
| 150 |
(ct.id IN ( |
|
| 151 |
SELECT so.trans_id |
|
| 152 |
FROM shipto so |
|
| 153 |
WHERE (so.module = 'CT') |
|
| 154 |
AND (lower(so.shiptogln) LIKE lower(?)) |
|
| 155 |
)) |
|
| 156 |
)"; |
|
| 157 |
push @values, ('%' . $form->{addr_gln} . '%') x 2;
|
|
| 158 |
} |
|
| 159 |
|
|
| 146 | 160 |
if ( $form->{status} eq 'orphaned' ) {
|
| 147 | 161 |
$where .= |
| 148 | 162 |
qq| AND ct.id NOT IN | . |
Auch abrufbar als: Unified diff
GLN: In Bericht Kunden/Lieferanten anzeigen und danach suchen können.