X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fgl.pl;h=faaad58280a10c687612e0da15401241730be696;hb=fec0904532e2136a1a769f568c351f4875257d56;hp=7c7fa843e1b36b495232a5651b5f46d2ad31633d;hpb=6aefd19def6a7d2f205e5401451e4c0bf3cebc46;p=kivitendo-erp.git diff --git a/bin/mozilla/gl.pl b/bin/mozilla/gl.pl index 7c7fa843e..faaad5828 100644 --- a/bin/mozilla/gl.pl +++ b/bin/mozilla/gl.pl @@ -34,7 +34,7 @@ use SL::GL; use SL::PE; -require "$form->{path}/arap.pl"; +require "bin/mozilla/arap.pl"; require "bin/mozilla/common.pl"; 1; @@ -75,7 +75,7 @@ sub add { $form->{title} = "Add"; $form->{callback} = - "$form->{script}?action=add&path=$form->{path}&login=$form->{login}&password=$form->{password}" + "$form->{script}?action=add&login=$form->{login}&password=$form->{password}" unless $form->{callback}; # we use this only to set a default date @@ -233,12 +233,12 @@ sub search { # with JavaScript Calendar $button1 = qq| - + text('button') . qq|> |; $button2 = qq| - + text('button') . qq|> |; @@ -251,15 +251,17 @@ sub search { # without JavaScript Calendar $button1 = - qq||; + qq||; $button2 = - qq||; + qq||; } - + $form->{javascript} .= qq||; $form->header; - + $onload = qq|focus()|; + $onload .= qq|;setupDateFormat('|. $myconfig{dateformat} .qq|', '|. $locale->text("Falsches Datumsformat!") .qq|')|; + $onload .= qq|;setupPoints('|. $myconfig{numberformat} .qq|', '|. $locale->text("wrongformat") .qq|')|; print qq| - +
{script}> @@ -339,8 +341,6 @@ sub search { | . $locale->text('Source') . qq| | . $locale->text('Account') . qq| - - | . $locale->text('GIFI') . qq| @@ -364,7 +364,6 @@ $jsscript -{path}> {login}> {password}> @@ -387,7 +386,7 @@ sub generate_report { GL->all_transactions(\%myconfig, \%$form); $callback = - "$form->{script}?action=generate_report&path=$form->{path}&login=$form->{login}&password=$form->{password}"; + "$form->{script}?action=generate_report&login=$form->{login}&password=$form->{password}"; $href = $callback; @@ -412,14 +411,6 @@ sub generate_report { $locale->text('Account') . " : $form->{accno} $form->{account_description}"; } - if ($form->{gifi_accno}) { - $href .= "&gifi_accno=" . $form->escape($form->{gifi_accno}); - $callback .= "&gifi_accno=" . $form->escape($form->{gifi_accno}, 1); - $option .= "\n
" if $option; - $option .= - $locale->text('GIFI') - . " : $form->{gifi_accno} $form->{gifi_account_description}"; - } if ($form->{source}) { $href .= "&source=" . $form->escape($form->{source}); $callback .= "&source=" . $form->escape($form->{source}, 1); @@ -482,13 +473,13 @@ sub generate_report { transdate id reference description notes source debit debit_accno credit credit_accno debit_tax debit_tax_accno - credit_tax credit_tax_accno accno gifi_accno + credit_tax credit_tax_accno accno projectnumbers ) ); - if ($form->{accno} || $form->{gifi_accno}) { - @columns = grep !/(accno|gifi_accno)/, @columns; + if ($form->{accno}) { + @columns = grep !/accno/, @columns; push @columns, "balance"; $form->{l_balance} = "Y"; @@ -569,10 +560,6 @@ sub generate_report { "" . $locale->text('Credit Tax Account') . ""; - $column_header{gifi_accno} = - "" - . $locale->text('GIFI') - . ""; $column_header{balance} = "" . $locale->text('Balance') . ""; $column_header{projectnumbers} = "" . $locale->text('Project Numbers') . ""; @@ -617,7 +604,7 @@ sub generate_report { $sameitem = $form->{GL}->[0]->{ $form->{sort} }; } - if (($form->{accno} || $form->{gifi_accno}) && $form->{balance}) { + if ($form->{accno} && $form->{balance}) { map { $column_data{$_} = " " } @column_index; $column_data{balance} = @@ -766,11 +753,11 @@ sub generate_report { } $transdate = ""; - foreach $key (sort keys(%{ $ref->{transdate} })) { + foreach $key (sort keys(%{ $ref->{ac_transdate} })) { if ($key == 0) { - $transdate = "$ref->{transdate}{$key}"; + $transdate = "$ref->{ac_transdate}{$key}"; } else { - $transdate .= "
$ref->{transdate}{$key}"; + $transdate .= "
$ref->{ac_transdate}{$key}"; } } @@ -780,7 +767,7 @@ sub generate_report { $column_data{id} = " $ref->{id} "; $column_data{transdate} = "$transdate"; $column_data{reference} = - "{module}.pl?action=edit&id=$ref->{id}&path=$form->{path}&login=$form->{login}&password=$form->{password}&callback=$callback>$ref->{reference}"; + "{module}.pl?action=edit&id=$ref->{id}&login=$form->{login}&password=$form->{password}&callback=$callback>$ref->{reference}"; $column_data{description} = "$ref->{description} "; $column_data{source} = "$ref->{source} "; $column_data{notes} = "$ref->{notes} "; @@ -793,15 +780,11 @@ sub generate_report { ? "$debittax" : ""; $column_data{debit_tax_accno} = "$debittaxaccno"; - $column_data{gifi_accno} = - "{gifi_accno}&callback=$callback>$ref->{gifi_accno} "; $column_data{credit_tax} = ($ref->{credit_tax_accno} ne "") ? "$credittax" : ""; $column_data{credit_tax_accno} = "$credittaxaccno"; - $column_data{gifi_accno} = - "{gifi_accno}&callback=$callback>$ref->{gifi_accno} "; $column_data{balance} = "" . $form->format_amount(\%myconfig, $form->{balance}, 2, 0) . ""; @@ -887,7 +870,6 @@ sub generate_report { -{path}> {login}> {password}> @@ -1111,11 +1093,9 @@ sub display_rows { for $i (1 .. $form->{rowcount}) { $source = qq| - |; + |; $memo = qq| - |; + |; my $selected_accno_full; my ($accno_row) = split(/--/, $form->{"accno_$i"}); @@ -1129,43 +1109,36 @@ sub display_rows { if ($previous_accno && ($previous_accno eq $selected_accno) && ($previous_tax_id ne $selected_tax_id)) { - $lxdebug->message(0, "yeah"); my $item = $taxcharts{$selected_tax_id}; $selected_taxchart = "$item->{id}--$item->{rate}"; } - if ($init) { - $selected_accno = ''; - $selected_taxchart = $taxchart_init; - } + $selected_accno = '' if ($init); + $selected_taxchart = $taxchart_init unless ($selected_taxchart ne ""); $accno = qq|| . - $cgi->popup_menu('-name' => "accno_$i", - '-id' => "accno_$i", - '-onChange' => "setTaxkey(this, $i)", - '-style' => 'width:200px', - '-tabindex' => ($i + 5 + (($i - 1) * 8)), - '-values' => \@chart_values, - '-labels' => \%chart_labels, - '-default' => $selected_accno_full) + NTI($cgi->popup_menu('-name' => "accno_$i", + '-id' => "accno_$i", + '-onChange' => "setTaxkey(this, $i)", + '-style' => 'width:200px', + '-values' => \@chart_values, + '-labels' => \%chart_labels, + '-default' => $selected_accno_full)) . $cgi->hidden('-name' => "previous_accno_$i", '-default' => $selected_accno_full) . qq||; $tax = qq|| . - $cgi->popup_menu('-name' => "taxchart_$i", - '-id' => "taxchart_$i", - '-style' => 'width:200px', - '-tabindex' => ($i + 10 + (($i - 1) * 8)), - '-values' => \@taxchart_values, - '-labels' => \%taxchart_labels, - '-default' => $selected_taxchart) + NTI($cgi->popup_menu('-name' => "taxchart_$i", + '-id' => "taxchart_$i", + '-style' => 'width:200px', + '-values' => \@taxchart_values, + '-labels' => \%taxchart_labels, + '-default' => $selected_taxchart)) . qq||; if ($init) { $korrektur = - qq||; + qq||; if ($form->{transfer}) { $fx_transaction = qq| @@ -1202,16 +1175,12 @@ sub display_rows { } $checked = ($form->{"korrektur_$i"}) ? "checked" : ""; $korrektur = - qq||; + qq||; $form->hide_form("accno_$i"); } else { $korrektur = - qq||; + qq||; if ($form->{transfer}) { $fx_transaction = qq| @@ -1238,12 +1207,9 @@ sub display_rows { print qq| $accno $fx_transaction - - - + + + $korrektur $tax $source @@ -1301,7 +1267,7 @@ sub form_header { qq||; } else { $description = - qq||; + qq||; } $taxincluded = ($form->{taxincluded}) ? "checked" : ""; @@ -1330,7 +1296,7 @@ sub form_header { # with JavaScript Calendar $button1 = qq| - + text('button') . qq|> |; @@ -1342,7 +1308,7 @@ sub form_header { # without JavaScript Calendar $button1 = - qq||; + qq||; } $form->header; @@ -1368,8 +1334,8 @@ sub form_header { - - + + @@ -1399,13 +1365,13 @@ sub form_header { if ($form->{id}) { print qq| - + @@ -1413,7 +1379,7 @@ sub form_header {
| . $locale->text('Reference') . qq|| . $locale->text('Reference') . qq| @@ -1388,7 +1354,7 @@ sub form_header {
- +
| . $locale->text('Buchungsdatum') . qq|{gldate} $readonly>{gldate} $readonly onBlur=\"check_right_date_format(this)\">
| . $locale->text('Description') . qq|| . $locale->text('Description') . qq| $description - +
| . $locale->text('MwSt. inkl.') . qq|
- +
| . $locale->text('Mitarbeiter') . qq|{employee} $readonly>
@@ -1427,7 +1393,7 @@ sub form_header { - +
| . $locale->text('MwSt. inkl.') . qq|
@@ -1487,7 +1453,6 @@ sub form_footer { -{path}> {login}> {password}> @@ -1576,6 +1541,7 @@ sub yes { if (GL->delete_transaction(\%myconfig, \%$form)){ # saving the history if(!exists $form->{addition} && $form->{id} ne "") { + $form->{snumbers} = qq|ordnumber_| . $form->{ordnumber}; $form->{addition} = "DELETED"; $form->save_history($form->dbconnect(\%myconfig)); } @@ -1769,6 +1735,7 @@ sub post { undef($form->{callback}); # saving the history if(!exists $form->{addition} && $form->{id} ne "") { + $form->{snumbers} = qq|ordnumber_| . $form->{ordnumber}; $form->{addition} = "SAVED"; $form->{what_done} = $locale->text("Buchungsnummer") . " = " . $form->{id}; $form->save_history($form->dbconnect(\%myconfig)); @@ -1795,6 +1762,7 @@ sub storno { $form->{storno} = 1; # saving the history if(!exists $form->{addition} && $form->{id} ne "") { + $form->{snumbers} = qq|ordnumber_| . $form->{ordnumber}; $form->{addition} = "STORNO"; $form->save_history($form->dbconnect(\%myconfig)); }