Revision 03d3d025
Von Bernd Bleßmann vor fast 11 Jahren hinzugefügt
| bin/mozilla/do.pl | ||
|---|---|---|
| 172 | 172 |
DO->retrieve('vc' => $form->{vc},
|
| 173 | 173 |
'ids' => $form->{id});
|
| 174 | 174 |
|
| 175 |
$form->backup_vars(qw(payment_id language_id taxzone_id salesman_id taxincluded cp_id intnotes currency)); |
|
| 175 |
$form->backup_vars(qw(payment_id language_id taxzone_id salesman_id taxincluded cp_id intnotes delivery_term_id currency));
|
|
| 176 | 176 |
$form->{shipto} = 1 if $form->{id} || $form->{convert_from_oe_ids};
|
| 177 | 177 |
|
| 178 | 178 |
# get customer / vendor |
| ... | ... | |
| 184 | 184 |
$form->{discount} = $form->{customer_discount};
|
| 185 | 185 |
} |
| 186 | 186 |
|
| 187 |
$form->restore_vars(qw(payment_id language_id taxzone_id intnotes cp_id)); |
|
| 187 |
$form->restore_vars(qw(payment_id language_id taxzone_id intnotes cp_id delivery_term_id));
|
|
| 188 | 188 |
$form->restore_vars(qw(currency)) if ($form->{id} || $form->{convert_from_oe_ids});
|
| 189 | 189 |
$form->restore_vars(qw(taxincluded)) if $form->{id};
|
| 190 | 190 |
$form->restore_vars(qw(salesman_id)) if $editing; |
| ... | ... | |
| 335 | 335 |
my $form = $main::form; |
| 336 | 336 |
|
| 337 | 337 |
$form->{PRINT_OPTIONS} = print_options('inline' => 1);
|
| 338 |
$form->{ALL_DELIVERY_TERMS} = SL::DB::Manager::DeliveryTerm->get_all_sorted();
|
|
| 338 | 339 |
|
| 339 | 340 |
print $form->parse_html_template('do/form_footer',
|
| 340 | 341 |
{transfer_default => ($::instance_conf->get_transfer_default)});
|
Auch abrufbar als: Unified diff
Lieferbedingungen analog zu Zahlungsbedingungen eingeführt.
Sie können angelegt werden, beim Benutzer voreingestellt werden
und in allen Ein- und Verkaufsmasken gesetzt werden.