Revision 08e820fa
Von Moritz Bunkus vor mehr als 7 Jahren hinzugefügt
| bin/mozilla/do.pl | ||
|---|---|---|
| 401 | 401 |
my $class = "SL::DB::" . ($form->{vc} eq 'customer' ? 'Customer' : 'Vendor');
|
| 402 | 402 |
$form->{VC_OBJ} = $class->load_cached($form->{ $form->{vc} . '_id' });
|
| 403 | 403 |
|
| 404 |
$form->{employee_id} = $form->{old_employee_id} if $form->{old_employee_id};
|
|
| 405 |
$form->{salesman_id} = $form->{old_salesman_id} if $form->{old_salesman_id};
|
|
| 404 |
my $current_employee = SL::DB::Manager::Employee->current; |
|
| 405 |
$form->{employee_id} = $form->{old_employee_id} if $form->{old_employee_id};
|
|
| 406 |
$form->{salesman_id} = $form->{old_salesman_id} if $form->{old_salesman_id};
|
|
| 407 |
$form->{employee_id} ||= $current_employee->id;
|
|
| 408 |
$form->{salesman_id} ||= $current_employee->id;
|
|
| 406 | 409 |
|
| 407 | 410 |
my $vc = $form->{vc} eq "customer" ? "customers" : "vendors";
|
| 408 | 411 |
$form->get_lists("price_factors" => "ALL_PRICE_FACTORS",
|
| bin/mozilla/is.pl | ||
|---|---|---|
| 391 | 391 |
$TMPL_VAR{customer_obj} = SL::DB::Customer->load_cached($form->{customer_id}) if $form->{customer_id};
|
| 392 | 392 |
$TMPL_VAR{invoice_obj} = SL::DB::Invoice->load_cached($form->{id}) if $form->{id};
|
| 393 | 393 |
|
| 394 |
$form->{employee_id} = $form->{old_employee_id} if $form->{old_employee_id};
|
|
| 395 |
$form->{salesman_id} = $form->{old_salesman_id} if $form->{old_salesman_id};
|
|
| 394 |
my $current_employee = SL::DB::Manager::Employee->current; |
|
| 395 |
$form->{employee_id} = $form->{old_employee_id} if $form->{old_employee_id};
|
|
| 396 |
$form->{salesman_id} = $form->{old_salesman_id} if $form->{old_salesman_id};
|
|
| 397 |
$form->{employee_id} ||= $current_employee->id;
|
|
| 398 |
$form->{salesman_id} ||= $current_employee->id;
|
|
| 396 | 399 |
|
| 397 | 400 |
$form->{defaultcurrency} = $form->get_default_currency(\%myconfig);
|
| 398 | 401 |
|
| bin/mozilla/oe.pl | ||
|---|---|---|
| 486 | 486 |
|
| 487 | 487 |
$form->{defaultcurrency} = $form->get_default_currency(\%myconfig);
|
| 488 | 488 |
|
| 489 |
$form->{employee_id} = $form->{old_employee_id} if $form->{old_employee_id};
|
|
| 490 |
$form->{salesman_id} = $form->{old_salesman_id} if $form->{old_salesman_id};
|
|
| 489 |
my $current_employee = SL::DB::Manager::Employee->current; |
|
| 490 |
$form->{employee_id} = $form->{old_employee_id} if $form->{old_employee_id};
|
|
| 491 |
$form->{salesman_id} = $form->{old_salesman_id} if $form->{old_salesman_id};
|
|
| 492 |
$form->{employee_id} ||= $current_employee->id;
|
|
| 493 |
$form->{salesman_id} ||= $current_employee->id;
|
|
| 491 | 494 |
|
| 492 | 495 |
# openclosed checkboxes |
| 493 | 496 |
my @tmp; |
Auch abrufbar als: Unified diff
Einkaufs- & Verkaufsbelege: Bearbeiter*in & Verkäufer*in mit aktueller Benutzer*in vorbelegen
Dies ist nur ein Fallback, wenn bis zur Ausgabe des Form-Headers noch
nichts für die beiden Felder festgelegt wurde. Damit wird also
weiterhin eine Verkäufer*in aus den Kunden-/Lieferantenstammdaten
genommen, sofern dort eine hinterlegt ist.
Behebt #258.