X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Frp.pl;h=7e931d46803b508869ae835776b7eec1eef0fe0f;hb=62f99e30c191d86af9249b6ec61f410dbe46466d;hp=32ec6efb0073ab1bce035eff4fa29404bf93c067;hpb=8d19aa002666b22761822ba2fdc8be4ee204c5f1;p=kivitendo-erp.git diff --git a/bin/mozilla/rp.pl b/bin/mozilla/rp.pl index 32ec6efb0..7e931d468 100644 --- a/bin/mozilla/rp.pl +++ b/bin/mozilla/rp.pl @@ -269,8 +269,7 @@ sub report {  | . $locale->text('Heading') . qq|  | - . $locale->text('Subtotal') - . qq| + . $locale->text('Subtotal') . qq| $jsscript @@ -288,14 +287,12 @@ $jsscript + . $locale->text('Customized Report') . qq| + . $locale->text('YYYY') . qq|" value="$year"> |; @@ -310,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| @@ -381,8 +362,7 @@ $jsscript + . $locale->text('Free report period') . qq| + . $locale->text('EUR') . qq| $jsscript @@ -418,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  @@ -399,8 +379,7 @@ $jsscript | . $locale->text('Accrual') . qq|  | - . $locale->text('EUR') - . qq|
+ . $locale->text('Customized Report') . qq| + . $locale->text('YYYY') . qq|" value="$year"> |; @@ -440,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| @@ -511,8 +472,7 @@ $checked> + . $locale->text('Free report period') . qq| + . $locale->text('EUR') . qq| - - + + $jsscript @@ -551,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  @@ -529,12 +489,13 @@ $checked> | . $locale->text('Accrual') . qq|  | - . $locale->text('EUR') - . qq|
| . $locale->text('Decimalplaces') . qq|| + . $locale->text('Decimalplaces') + . qq|
+ . $locale->text('Zeitraum') . qq| + . $locale->text('YYYY') . qq|" value="$year"> |; @@ -573,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| @@ -647,8 +590,7 @@ $checked> + . $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|
|; @@ -678,7 +620,7 @@ $checked>
| . $locale->text('Decimalplaces') . qq|
@@ -691,8 +633,7 @@ $checked> | . $locale->text('Accrual') . qq|  | - . $locale->text('EUR') - . qq| + . $locale->text('EUR') . qq| @@ -702,8 +643,7 @@ $checked>  | . $locale->text('Subtotal') . qq|  | - . $locale->text('Account Number') - . qq| + . $locale->text('Account Number') . qq| $jsscript @@ -739,8 +679,7 @@ $jsscript  | . $locale->text('Subtotal') . qq|  | - . $locale->text('All Accounts') - . qq| + . $locale->text('All Accounts') . qq| $jsscript @@ -817,8 +756,7 @@ $jsscript | . $locale->text('Accrual') . qq|  | - . $locale->text('EUR') - . qq| + . $locale->text('EUR') . qq| @@ -891,8 +829,7 @@ $jsscript | . $locale->text('Accrual') . qq|  | - . $locale->text('EUR') - . qq| + . $locale->text('EUR') . qq| | . $locale->text('Include in Report') . qq| @@ -1034,8 +971,7 @@ $jsscript | - . $locale->text('Include Exchangerate Difference') - . qq| + . $locale->text('Include Exchangerate Difference') . qq| $jsscript @@ -1252,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|; } @@ -1269,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|; } @@ -1279,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}; @@ -1318,9 +1253,9 @@ sub generate_balance_sheet { $form->{IN} = "balance_sheet.html"; # setup company variables for the form - map { $form->{$_} = $myconfig{$_} } + map { $form->{$_} = $myconfig{$_}; + $form->{$_} =~ s/\\n/\n/g; } (qw(company address businessnumber nativecurr)); - $form->{address} =~ s/\\n/
/g; $form->{templates} = $myconfig{templates}; @@ -1458,8 +1393,8 @@ sub list_accounts { $ml = ($ref->{category} =~ /(A|C|E)/) ? -1 : 1; - $debit = $form->format_amount(\%myconfig, $ref->{debit}, 2, " "); - $credit = $form->format_amount(\%myconfig, $ref->{credit}, 2, " "); + $debit = ($ref->{debit} != 0) ? $form->format_amount(\%myconfig, $ref->{debit}, 2, " ") : " "; + $credit = ($ref->{credit} != 0) ? $form->format_amount(\%myconfig, $ref->{credit}, 2, " ") : " "; $begbalance = $form->format_amount(\%myconfig, $ref->{balance} * $ml, 2, " "); $endbalance = @@ -1738,14 +1673,14 @@ sub aging { $i++; if ($subtotal) { - $c0subtotal = - $form->format_amount(\%myconfig, $c0subtotal, 2, " "); - $c30subtotal = - $form->format_amount(\%myconfig, $c30subtotal, 2, " "); - $c60subtotal = - $form->format_amount(\%myconfig, $c60subtotal, 2, " "); - $c90subtotal = - $form->format_amount(\%myconfig, $c90subtotal, 2, " "); + $c0subtotal = ($c0subtotal != 0) ? + $form->format_amount(\%myconfig, $c0subtotal, 2, " ") : ""; + $c30subtotal = ($c30subtotal != 0) ? + $form->format_amount(\%myconfig, $c30subtotal, 2, " ") : ""; + $c60subtotal = ($c60subtotal != 0) ? + $form->format_amount(\%myconfig, $c60subtotal, 2, " ") : ""; + $c90subtotal = ($c90subtotal != 0) ? + $form->format_amount(\%myconfig, $c90subtotal, 2, " ") : ""; } $column_data{ct} = qq| |; @@ -1801,10 +1736,10 @@ sub aging { $c60total += $ref->{c60}; $c90total += $ref->{c90}; - $ref->{c0} = $form->format_amount(\%myconfig, $ref->{c0}, 2, " "); - $ref->{c30} = $form->format_amount(\%myconfig, $ref->{c30}, 2, " "); - $ref->{c60} = $form->format_amount(\%myconfig, $ref->{c60}, 2, " "); - $ref->{c90} = $form->format_amount(\%myconfig, $ref->{c90}, 2, " "); + $ref->{c0} = ($ref->{c0} != 0) ? $form->format_amount(\%myconfig, $ref->{c0}, 2, " ") : ""; + $ref->{c30} = ($ref->{c30} != 0) ? $form->format_amount(\%myconfig, $ref->{c30}, 2, " ") : ""; + $ref->{c60} = ($ref->{c60} != 0) ? $form->format_amount(\%myconfig, $ref->{c60}, 2, " ") : ""; + $ref->{c90} = ($ref->{c90} != 0) ? $form->format_amount(\%myconfig, $ref->{c90}, 2, " ") : ""; $href = qq|$ref->{module}.pl?path=$form->{path}&action=edit&id=$ref->{id}&login=$form->{login}&password=$form->{password}&callback=| @@ -1947,66 +1882,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| -