Revision 5d7a7cb5
Von Bernd Bleßmann vor etwa 1 Jahr hinzugefügt
SL/Controller/ClientConfig.pm | ||
---|---|---|
17 | 17 |
use SL::Locale::String qw(t8); |
18 | 18 |
use SL::PriceSource::ALL; |
19 | 19 |
use SL::Template; |
20 |
use SL::Controller::DeliveryOrder; |
|
21 |
use SL::Controller::Order; |
|
22 |
use SL::Controller::Reclamation; |
|
20 | 23 |
use SL::Controller::TopQuickSearch; |
21 | 24 |
use SL::DB::Helper::AccountingPeriod qw(get_balance_startdate_method_options); |
22 | 25 |
use SL::VATIDNr; |
... | ... | |
28 | 31 |
'scalar --get_set_init' => [ qw(defaults all_warehouses all_weightunits all_languages all_currencies all_templates all_price_sources h_unit_name available_quick_search_modules |
29 | 32 |
all_project_statuses all_project_types zugferd_settings |
30 | 33 |
posting_options payment_options accounting_options inventory_options profit_options balance_startdate_method_options |
31 |
displayable_name_specs_by_module) ], |
|
34 |
displayable_name_specs_by_module available_documents_with_no_positions) ],
|
|
32 | 35 |
); |
33 | 36 |
|
34 | 37 |
sub action_edit { |
... | ... | |
232 | 235 |
}; |
233 | 236 |
} |
234 | 237 |
|
238 |
sub init_available_documents_with_no_positions { |
|
239 |
return [] if !$::instance_conf->get_feature_experimental_order; |
|
240 |
|
|
241 |
my @docs = ( @{SL::Controller::Order ->new->valid_types}, |
|
242 |
@{SL::Controller::DeliveryOrder->new->valid_types}, |
|
243 |
@{SL::Controller::Reclamation ->new->valid_types} ); |
|
244 |
|
|
245 |
# normal delivery orders are not yet handeld by new controller code |
|
246 |
@docs = grep { $_ ne 'sales_delivery_order' && $_ ne 'purchase_delivery_order' } @docs; |
|
247 |
|
|
248 |
# $::form->get_formname_translation does not distinguish between sales and purchase |
|
249 |
@docs = grep { $_ ne 'sales_reclamation' && $_ ne 'purchase_reclamation' } @docs; |
|
250 |
|
|
251 |
my @available_docs = map { {name => $_, description => $::form->get_formname_translation($_)} } @docs; |
|
252 |
|
|
253 |
push @available_docs, {name => 'sales_reclamation', description => t8('Sales Reclamation')}; |
|
254 |
push @available_docs, {name => 'purchase_reclamation', description => t8('Purchase Reclamation')}; |
|
255 |
|
|
256 |
return \@available_docs; |
|
257 |
} |
|
258 |
|
|
235 | 259 |
# |
236 | 260 |
# filters |
237 | 261 |
# |
Auch abrufbar als: Unified diff
"Beleg ohne Positionen speichern erlauben" in Mandantenkonfig einstellbar