Revision b1c40d4d
Von Bernd Bleßmann vor fast 10 Jahren hinzugefügt
| bin/mozilla/ct.pl | ||
|---|---|---|
| 76 | 76 |
|
| 77 | 77 |
$form->{IS_CUSTOMER} = $form->{db} eq 'customer';
|
| 78 | 78 |
|
| 79 |
$form->get_lists("business_types" => "ALL_BUSINESS_TYPES");
|
|
| 79 |
$form->get_lists("business_types" => "ALL_BUSINESS_TYPES",
|
|
| 80 |
"salesmen" => "ALL_SALESMEN"); |
|
| 80 | 81 |
$form->{SHOW_BUSINESS_TYPES} = scalar @{ $form->{ALL_BUSINESS_TYPES} } > 0;
|
| 81 | 82 |
|
| 82 | 83 |
$form->{CUSTOM_VARIABLES} = CVar->get_configs('module' => 'CT');
|
| ... | ... | |
| 152 | 153 |
push @options, $label . " : " . $business->description; |
| 153 | 154 |
} |
| 154 | 155 |
} |
| 156 |
if ($form->{salesman_id}) {
|
|
| 157 |
my $salesman = SL::DB::Manager::Employee->find_by(id => $form->{salesman_id});
|
|
| 158 |
if ($salesman) {
|
|
| 159 |
push @options, $locale->text('Salesman') . " : " . $salesman->name;
|
|
| 160 |
} |
|
| 161 |
} |
|
| 155 | 162 |
|
| 156 | 163 |
my @columns = ( |
| 157 | 164 |
'id', 'name', "$form->{db}number", 'contact', 'phone', 'discount',
|
| ... | ... | |
| 194 | 201 |
|
| 195 | 202 |
my @hidden_variables = ( qw( |
| 196 | 203 |
db status obsolete name contact email cp_name addr_street addr_zipcode |
| 197 |
addr_city addr_country business_id |
|
| 204 |
addr_city addr_country business_id salesman_id
|
|
| 198 | 205 |
), "$form->{db}number",
|
| 199 | 206 |
map({ "cvar_$_->{name}" } @searchable_custom_variables),
|
| 200 | 207 |
map({'cvar_'. $_->{name} .'_qtyop'} grep({$_->{type} eq 'number'} @searchable_custom_variables)),
|
Auch abrufbar als: Unified diff
Stammdaten -> Berichte -> Kunden: Nach Standardverkäufer filtern können.