X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fam.pl;h=7549bc1610a2d0cf4efc35e51d39a5c677e195fb;hb=5104dee447f25733832ed4e4a58c4847b2c2ea66;hp=10ab28005516b843d6012ece3da6dde65ad3d6e5;hpb=99e420aa730ca1d640804e8ce4074d8abb62e927;p=kivitendo-erp.git diff --git a/bin/mozilla/am.pl b/bin/mozilla/am.pl index 10ab28005..7549bc161 100644 --- a/bin/mozilla/am.pl +++ b/bin/mozilla/am.pl @@ -830,330 +830,56 @@ sub edit_buchungsgruppe { } sub list_buchungsgruppe { - $main::lxdebug->enter_sub(); - - my $form = $main::form; - my %myconfig = %main::myconfig; - my $locale = $main::locale; - - $main::auth->assert('config'); - - AM->buchungsgruppe(\%myconfig, \%$form); - - $form->{callback} = "am.pl?action=list_buchungsgruppe"; - - my $callback = $form->escape($form->{callback}); - - $form->{title} = $locale->text('Buchungsgruppen'); - - my @column_index = qw(up down description inventory_accno - income_accno_0 expense_accno_0 - income_accno_1 expense_accno_1 - income_accno_2 expense_accno_2 - income_accno_3 expense_accno_3 ); - my %column_header; - $column_header{up} = - qq|
$form->{title} | -||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
-
|
- ||||||||||||||