Revision 7748fe8e
Von Moritz Bunkus vor mehr als 17 Jahren hinzugefügt
| SL/IS.pm | ||
|---|---|---|
| 445 | 445 |
} |
| 446 | 446 |
|
| 447 | 447 |
# get rest for the customer |
| 448 |
my $query = qq|SELECT ct.*, cp.*, ct.notes as customernotes |
|
| 448 |
my $query = qq|SELECT ct.*, cp.*, ct.notes as customernotes, ct.phone AS customerphone, ct.fax AS customerfax, ct.email AS customeremail
|
|
| 449 | 449 |
FROM customer ct |
| 450 | 450 |
LEFT JOIN contacts cp on ct.id = cp.cp_cv_id |
| 451 | 451 |
WHERE ct.id = $form->{customer_id} $contact order by cp.cp_id limit 1|;
|
Auch abrufbar als: Unified diff
Die Variablen aus %myconfig beim Drucken nicht einfach so nach $form kopieren -- dafür gibt es später ja employee_* in Form::parse_template(). Zusätzlich einige weitere Kundenvariablen als customer* zur Verfügung stellen (analog zu den Lieferantenvariablen).