X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDB%2FHelper%2FMappings.pm;h=f0b8be9af65aff9b1bf17f5e7110c0847ab863ed;hb=937e37ad007405c6a3a389ee18006379ffecc073;hp=7f7c475fd8dca363642c64908628c4e13ce499db;hpb=7ade1b958af3fdd2b7532973da0e7825d23eda96;p=kivitendo-erp.git diff --git a/SL/DB/Helper/Mappings.pm b/SL/DB/Helper/Mappings.pm index 7f7c475fd..f0b8be9af 100644 --- a/SL/DB/Helper/Mappings.pm +++ b/SL/DB/Helper/Mappings.pm @@ -3,6 +3,8 @@ package SL::DB::Helper::Mappings; use utf8; use strict; +use SL::Util qw(camelify); + require Exporter; our @ISA = qw(Exporter); our @EXPORT_OK = qw(get_table_for_package get_package_for_table get_package_names); @@ -18,7 +20,16 @@ my @lxoffice_blacklist_permanent = qw( my @lxoffice_blacklist_temp = qw( ); -my @lxoffice_blacklist = (@lxoffice_blacklist_permanent, @lxoffice_blacklist_temp); +# tables created by crm module +my @crm_blacklist = qw( +); + +# tables created by cash register +my @cash_register_blacklist = qw( +ekartikel ekbon ekkunde ektext erptasten +); + +my @lxoffice_blacklist = (@lxoffice_blacklist_permanent, @lxoffice_blacklist_temp, @crm_blacklist, @cash_register_blacklist); # map table names to their models. # unlike rails we have no singular<->plural magic. @@ -39,10 +50,15 @@ my %lxoffice_package_names = ( bank_accounts => 'bank_account', buchungsgruppen => 'buchungsgruppe', contacts => 'contact', + csv_import_profiles => 'csv_import_profile', + csv_import_profile_settings => 'csv_import_profile_setting', + csv_import_reports => 'csv_import_report', + csv_import_report_rows => 'csv_import_report_row', + csv_import_report_status => 'csv_import_report_status', + currencies => 'currency', custom_variable_configs => 'custom_variable_config', custom_variables => 'custom_variable', custom_variables_validity => 'custom_variable_validity', - customertax => 'customer_tax', datev => 'datev', defaults => 'default', delivery_orders => 'delivery_order', @@ -59,21 +75,17 @@ my %lxoffice_package_names = ( follow_up_links => 'follow_up_link', follow_ups => 'follow_up', generic_translations => 'generic_translation', - gifi => 'gifi', gl => 'GLTransaction', history_erp => 'history', inventory => 'inventory', invoice => 'invoice_item', language => 'language', - license => 'license', - licenseinvoice => 'license_invoice', makemodel => 'make_model', notes => 'note', orderitems => 'order_item', oe => 'order', parts => 'part', partsgroup => 'parts_group', - partstax => 'parts_tax', payment_terms => 'payment_term', periodic_invoices => 'periodic_invoice', periodic_invoices_configs => 'periodic_invoices_config', @@ -82,8 +94,6 @@ my %lxoffice_package_names = ( pricegroup => 'pricegroup', printers => 'Printer', record_links => 'record_link', - rma => 'RMA', - rmaitems => 'RMA_item', sepa_export => 'sepa_export', sepa_export_items => 'sepa_export_item', schema_info => 'schema_info', @@ -96,7 +106,7 @@ my %lxoffice_package_names = ( translation_payment_terms => 'translation_payment_term', units => 'unit', units_language => 'units_language', - vendortax => 'vendor_tax', + vendor => 'vendor', ); my (%lxoffice_tables_to_packages, %lxoffice_tables_to_manager_packages, %lxoffice_packages_to_tables); @@ -150,18 +160,6 @@ sub db { die "Can't resolve '$string' as a database model, sorry. Did you perhaps forgot to load it?"; } -sub camelify { - my ($str) = @_; - $str =~ s/_+(.)/uc($1)/ge; - ucfirst $str; -} - -sub snakify { - my ($str) = @_; - $str =~ s/(? Returns the manager package name for a table name: - SL::DB::Helpers::Mappings::get_manager_package_for_table('oe') + SL::DB::Helper::Mappings::get_manager_package_for_table('oe') # SL::DB::Manager::Order =item C Returns the table name for a package name: - SL::DB::Helpers::Mappings::get_table_for_package('SL::DB::Order') + SL::DB::Helper::Mappings::get_table_for_package('SL::DB::Order') # oe - SL::DB::Helpers::Mappings::get_table_for_package('Order') + SL::DB::Helper::Mappings::get_table_for_package('Order') # oe =back