X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Frp.pl;h=9e3bc9fc9a670d9f9da524a562a7724b48bf1e67;hb=aacd5750af1d2371dff2abd2db5f6f5f0cca02e6;hp=7989d863505acdc61fcafc338c6b4b5fff4ca117;hpb=ee072e4f077213bf6f8792ca8f0a1afebbb6282f;p=kivitendo-erp.git diff --git a/bin/mozilla/rp.pl b/bin/mozilla/rp.pl index 7989d8635..9e3bc9fc9 100644 --- a/bin/mozilla/rp.pl +++ b/bin/mozilla/rp.pl @@ -137,13 +137,13 @@ sub report { $department = ""; } else { if ($form->{report} eq "balance_sheet") { - $name_1 = "compareasofdate"; - $id_1 = "compareasofdate"; - $value_1 = ""; + $name_1 = "asofdate"; + $id_1 = "asofdate"; + $value_1 = "$form->{asofdate}"; $trigger_1 = "trigger1"; - $name_2 = "asofdate"; - $id_2 = "asofdate"; - $value_2 = "$form->{asofdate}"; + $name_2 = "compareasofdate"; + $id_2 = "compareasofdate"; + $value_2 = "$form->{compareasofdate}"; $trigger_2 = "trigger2"; } elsif ($form->{report} =~ /(receipts|payments)$/) { $name_1 = "fromdate"; @@ -190,8 +190,7 @@ sub report { #write Trigger $jsscript = - Form->write_trigger(\%myconfig, "1", "$name_2", "BR", "$trigger_2", "", - "", ""); + Form->write_trigger(\%myconfig, "1", "$name_2", "BR", "$trigger_2"); } else { $button1 = qq| |; @@ -270,8 +269,7 @@ sub report {  | . $locale->text('Heading') . qq|  | - . $locale->text('Subtotal') - . qq| + . $locale->text('Subtotal') . qq| $jsscript @@ -289,14 +287,12 @@ $jsscript + . $locale->text('Customized Report') . qq| + . $locale->text('YYYY') . qq|" value="$year"> |; @@ -311,70 +307,54 @@ $jsscript + . $locale->text('Quarter') . qq| |; $checked = ""; print qq| + . $locale->text('January') . qq| |; $checked = ""; print qq| + . $locale->text('May') . qq| + . $locale->text('September') . qq| + . $locale->text('Quarter') . qq| + . $locale->text('February') . qq| + . $locale->text('June') . qq| + . $locale->text('October') . qq| + . $locale->text('Quarter') . qq| + . $locale->text('March') . qq| + . $locale->text('July') . qq| + . $locale->text('November') . qq| + . $locale->text('Quarter') . qq|  + . $locale->text('April') . qq| + . $locale->text('August') . qq| + . $locale->text('December') . qq| @@ -382,8 +362,7 @@ $jsscript + . $locale->text('Free report period') . qq| + . $locale->text('EUR') . qq| $jsscript @@ -419,14 +397,12 @@ $jsscript
| - . $locale->text('Customized Report') - . qq|
| . $locale->text('Year') . qq|
   1. | - . $locale->text('Quarter') - . qq| | - . $locale->text('January') - . qq| | - . $locale->text('May') - . qq|  | - . $locale->text('September') - . qq|
   2. | - . $locale->text('Quarter') - . qq|  | - . $locale->text('February') - . qq|  | - . $locale->text('June') - . qq|  | - . $locale->text('October') - . qq|
   3. | - . $locale->text('Quarter') - . qq|  | - . $locale->text('March') - . qq|  | - . $locale->text('July') - . qq|  | - . $locale->text('November') - . qq|
   4. | - . $locale->text('Quarter') - . qq|   | - . $locale->text('April') - . qq|  | - . $locale->text('August') - . qq|  | - . $locale->text('December') - . qq|
| - . $locale->text('Free report period') - . qq| | . $locale->text('From') . qq|  $button1 $button1_2  @@ -400,8 +379,7 @@ $jsscript | . $locale->text('Accrual') . qq|  | - . $locale->text('EUR') - . qq|
+ . $locale->text('Customized Report') . qq| + . $locale->text('YYYY') . qq|" value="$year"> |; @@ -441,70 +417,54 @@ $jsscript + . $locale->text('Quarter') . qq| |; $checked = "checked"; print qq| + . $locale->text('January') . qq| |; $checked = ""; print qq| + . $locale->text('May') . qq| + . $locale->text('September') . qq| + . $locale->text('Quarter') . qq| + . $locale->text('February') . qq| + . $locale->text('June') . qq| + . $locale->text('October') . qq| + . $locale->text('Quarter') . qq| + . $locale->text('March') . qq| + . $locale->text('July') . qq| + . $locale->text('November') . qq| + . $locale->text('Quarter') . qq|  + . $locale->text('April') . qq| + . $locale->text('August') . qq| + . $locale->text('December') . qq| @@ -512,8 +472,7 @@ $checked> + . $locale->text('Free report period') . qq| + . $locale->text('EUR') . qq| - + + + + + $jsscript |; } @@ -548,14 +512,12 @@ $jsscript
| - . $locale->text('Customized Report') - . qq|
| . $locale->text('Year') . qq|
   1. | - . $locale->text('Quarter') - . qq| | - . $locale->text('January') - . qq| | - . $locale->text('May') - . qq|  | - . $locale->text('September') - . qq|
   2. | - . $locale->text('Quarter') - . qq|  | - . $locale->text('February') - . qq|  | - . $locale->text('June') - . qq|  | - . $locale->text('October') - . qq|
   3. | - . $locale->text('Quarter') - . qq|  | - . $locale->text('March') - . qq|  | - . $locale->text('July') - . qq|  | - . $locale->text('November') - . qq|
   4. | - . $locale->text('Quarter') - . qq|   | - . $locale->text('April') - . qq|  | - . $locale->text('August') - . qq|  | - . $locale->text('December') - . qq|
| - . $locale->text('Free report period') - . qq| | . $locale->text('From') . qq|  $button1 $button1_2  @@ -530,10 +489,15 @@ $checked> | . $locale->text('Accrual') . qq|  | - . $locale->text('EUR') - . qq|
| + . $locale->text('Decimalplaces') + . qq|
+ . $locale->text('Zeitraum') . qq| + . $locale->text('YYYY') . qq|" value="$year"> |; @@ -570,70 +532,54 @@ $jsscript + . $locale->text('Quarter') . qq| |; $checked = "checked"; print qq| + . $locale->text('January') . qq| |; $checked = ""; print qq| + . $locale->text('May') . qq| + . $locale->text('September') . qq| + . $locale->text('Quarter') . qq| + . $locale->text('February') . qq| + . $locale->text('June') . qq| + . $locale->text('October') . qq| + . $locale->text('Quarter') . qq| + . $locale->text('March') . qq| + . $locale->text('July') . qq| + . $locale->text('November') . qq| + . $locale->text('Quarter') . qq|  + . $locale->text('April') . qq| + . $locale->text('August') . qq| + . $locale->text('December') . qq| @@ -644,8 +590,7 @@ $checked> + . $locale->text('EUR') . qq| + . $locale->text('EUR') . qq| @@ -699,8 +643,7 @@ $checked> | . $locale->text('Subtotal') . qq|  | - . $locale->text('Account Number') - . qq| + . $locale->text('Account Number') . qq| $jsscript @@ -736,8 +679,7 @@ $jsscript  | . $locale->text('Subtotal') . qq|  | - . $locale->text('All Accounts') - . qq| + . $locale->text('All Accounts') . qq| $jsscript @@ -814,8 +756,7 @@ $jsscript + . $locale->text('EUR') . qq|
| - . $locale->text('Zeitraum') - . qq|
| . $locale->text('Year') . qq|
   1. | - . $locale->text('Quarter') - . qq| | - . $locale->text('January') - . qq| | - . $locale->text('May') - . qq|  | - . $locale->text('September') - . qq|
   2. | - . $locale->text('Quarter') - . qq|  | - . $locale->text('February') - . qq|  | - . $locale->text('June') - . qq|  | - . $locale->text('October') - . qq|
   3. | - . $locale->text('Quarter') - . qq|  | - . $locale->text('March') - . qq|  | - . $locale->text('July') - . qq|  | - . $locale->text('November') - . qq|
   4. | - . $locale->text('Quarter') - . qq|   | - . $locale->text('April') - . qq|  | - . $locale->text('August') - . qq|  | - . $locale->text('December') - . qq|
| . $locale->text('Accrual') . qq|  | - . $locale->text('EUR') - . qq|
|; @@ -688,8 +633,7 @@ $checked> | . $locale->text('Accrual') . qq|  | - . $locale->text('EUR') - . qq|
| . $locale->text('Accrual') . qq|  | - . $locale->text('EUR') - . qq|
@@ -888,8 +829,7 @@ $jsscript | . $locale->text('Accrual') . qq|  | - . $locale->text('EUR') - . qq| + . $locale->text('EUR') . qq| | . $locale->text('Include in Report') . qq| @@ -1031,8 +971,7 @@ $jsscript | - . $locale->text('Include Exchangerate Difference') - . qq| + . $locale->text('Include Exchangerate Difference') . qq| $jsscript @@ -1249,10 +1188,10 @@ sub generate_income_statement { $longfromdate = $locale->date(\%myconfig, $form->{fromdate}, 1); $shortfromdate = $locale->date(\%myconfig, $form->{fromdate}, 0); - $form->{this_period} = "$shortfromdate
\n$shorttodate"; + $form->{this_period} = "$shortfromdate\n$shorttodate"; $form->{period} = $locale->text('for Period') - . qq|
\n$longfromdate | + . qq|\n$longfromdate | . $locale->text('Bis') . qq| $longtodate|; } @@ -1266,9 +1205,9 @@ sub generate_income_statement { $longcomparetodate = $locale->date(\%myconfig, $form->{comparetodate}, 1); $shortcomparetodate = $locale->date(\%myconfig, $form->{comparetodate}, 0); - $form->{last_period} = "$shortcomparefromdate
\n$shortcomparetodate"; + $form->{last_period} = "$shortcomparefromdate\n$shortcomparetodate"; $form->{period} .= - "
\n$longcomparefromdate " + "\n$longcomparefromdate " . $locale->text('Bis') . qq| $longcomparetodate|; } @@ -1276,7 +1215,6 @@ sub generate_income_statement { # setup variables for the form @a = qw(company address businessnumber); map { $form->{$_} = $myconfig{$_} } @a; - $form->{address} =~ s/\\n/
/g; $form->{templates} = $myconfig{templates}; @@ -1317,7 +1255,6 @@ sub generate_balance_sheet { # setup company variables for the form map { $form->{$_} = $myconfig{$_} } (qw(company address businessnumber nativecurr)); - $form->{address} =~ s/\\n/
/g; $form->{templates} = $myconfig{templates}; @@ -1944,66 +1881,6 @@ sub select_all { $lxdebug->leave_sub(); } -sub print_options { - $lxdebug->enter_sub(); - - $form->{sendmode} = "attachment"; - $form->{copies} = 2 unless $form->{copies}; - - $form->{PD}{ $form->{type} } = "selected"; - $form->{DF}{ $form->{format} } = "selected"; - $form->{OP}{ $form->{media} } = "selected"; - $form->{SM}{ $form->{sendmode} } = "selected"; - - $type = qq| -