Revision 3123d6f8
Von Bernd Bleßmann vor mehr als 11 Jahren hinzugefügt
| SL/DB/Helper/FlattenToForm.pm | ||
|---|---|---|
| 29 | 29 |
|
| 30 | 30 |
$form->{vc} = $vc if ref($self) =~ /^SL::DB::.*Invoice/;
|
| 31 | 31 |
|
| 32 |
my @vc_fields = (qw(account_number bank bank_code bic business city contact country creditlimit discount |
|
| 33 |
email fax homepage iban language name payment_terms phone street taxnumber zipcode), |
|
| 32 |
my @vc_fields = (qw(account_number bank bank_code bic business city contact country creditlimit |
|
| 33 |
department_1 department_2 discount email fax homepage iban language name |
|
| 34 |
payment_terms phone street taxnumber ustid zipcode), |
|
| 34 | 35 |
"${vc}number",
|
| 35 | 36 |
($vc eq 'customer')? 'c_vendor_id': 'v_customer_id'); |
| 36 | 37 |
my @vc_prefixed_fields = qw(email fax notes number phone); |
Auch abrufbar als: Unified diff
flatten_to_form: auch department_1, department_2 und ustid berücksichtigen.