Revision 9e228847
Von Thomas Heck vor mehr als 11 Jahren hinzugefügt
| SL/Controller/CustomerVendor.pm | ||
|---|---|---|
| 19 | 19 |
use SL::DB::Contact; |
| 20 | 20 |
use SL::DB::FollowUp; |
| 21 | 21 |
use SL::DB::History; |
| 22 |
use SL::DB::Currency; |
|
| 22 | 23 |
|
| 23 | 24 |
# safety |
| 24 | 25 |
__PACKAGE__->run_before( |
| ... | ... | |
| 727 | 728 |
) |
| 728 | 729 |
]; |
| 729 | 730 |
|
| 730 |
$query = |
|
| 731 |
'SELECT curr |
|
| 732 |
FROM defaults'; |
|
| 733 |
my $curr = selectall_hashref_query($::form, $dbh, $query)->[0]->{curr};
|
|
| 734 |
my @currencies = grep( |
|
| 735 |
{ $_; }
|
|
| 736 |
map( |
|
| 737 |
{ s/\s//g; $_; }
|
|
| 738 |
split(m/:/, $curr) |
|
| 739 |
) |
|
| 740 |
); |
|
| 741 |
$self->{all_currencies} = \@currencies;
|
|
| 731 |
$self->{all_currencies} = SL::DB::Manager::Currency->get_all();
|
|
| 742 | 732 |
|
| 743 | 733 |
$self->{all_languages} = SL::DB::Manager::Language->get_all();
|
| 744 | 734 |
|
Auch abrufbar als: Unified diff
Auf CustomerVendor auf currency_id umgestellt