Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 94802c79

Von Bernd Blessmann vor fast 13 Jahren hinzugefügt

Fix für Bug 1759: (Verbesserung) Währung bei Kunden / Lieferanten vorbelegen

Für Kunden und Lieferanten kann jetzt in den Stammdaten eine Währung
eingestellt werden, die als Voreinstellung in den Ver- und Einkaufs-
Masken dient.

Unterschiede anzeigen:

bin/mozilla/ct.pl
313 313
  my %myconfig = %main::myconfig;
314 314
  my $locale   = $main::locale;
315 315

  
316
  $form->get_lists(employees => "ALL_EMPLOYEES",
317
                   taxzones  => "ALL_TAXZONES");
316
  $form->get_lists(employees  => "ALL_EMPLOYEES",
317
                   taxzones   => "ALL_TAXZONES",
318
                   currencies => "ALL_CURRENCIES");
318 319
  $form->get_pricegroup(\%myconfig, { all => 1 });
319 320

  
320 321
  $form->get_lists(customers => { key => "ALL_SALESMAN_CUSTOMERS", business_is_salesman => 1 }) if $::lx_office_conf{features}->{vertreter};
......
345 346
    }
346 347
  }
347 348

  
349
  if (!$form->{'id'}) {
350
    $form->{'currency'} = $form->get_default_currency(\%myconfig);
351
  } else {
352
    $form->{currency} = $form->{curr};
353
  }
354

  
348 355
  $form->{CUSTOM_VARIABLES} = CVar->get_custom_variables('module' => 'CT', 'trans_id' => $form->{id});
349 356

  
350 357
  CVar->render_inputs('variables' => $form->{CUSTOM_VARIABLES}) if (scalar @{ $form->{CUSTOM_VARIABLES} });

Auch abrufbar als: Unified diff