Revision b65a230d
Von Sven Schöling vor fast 15 Jahren hinzugefügt
bin/mozilla/cp.pl | ||
---|---|---|
145 | 145 |
$form->format_amount(\%myconfig, $form->{exchangerate}); |
146 | 146 |
if ($form->{forex}) { |
147 | 147 |
$exchangerate = qq| |
148 |
<tr>
|
|
149 |
<th align=right nowrap>| . $locale->text('Exchangerate') . qq|</th>
|
|
150 |
<td colspan=3><input type=hidden name=exchangerate size=10 value=$form->{exchangerate}>$form->{exchangerate}</td>
|
|
151 |
</tr>
|
|
148 |
<tr>
|
|
149 |
<th align=right nowrap>| . $locale->text('Exchangerate') . qq|</th>
|
|
150 |
<td colspan=3><input type=hidden name=exchangerate size=10 value=$form->{exchangerate}>$form->{exchangerate}</td>
|
|
151 |
</tr>
|
|
152 | 152 |
|; |
153 | 153 |
} else { |
154 | 154 |
$exchangerate = qq| |
155 |
<tr>
|
|
156 |
<th align=right nowrap>| . $locale->text('Exchangerate') . qq|</th>
|
|
157 |
<td colspan=3><input name=exchangerate size=10 value=$form->{exchangerate}></td>
|
|
158 |
</tr>
|
|
155 |
<tr>
|
|
156 |
<th align=right nowrap>| . $locale->text('Exchangerate') . qq|</th>
|
|
157 |
<td colspan=3><input name=exchangerate size=10 value=$form->{exchangerate}></td>
|
|
158 |
</tr>
|
|
159 | 159 |
|; |
160 | 160 |
} |
161 | 161 |
} |
... | ... | |
340 | 340 |
<tr> |
341 | 341 |
<td> |
342 | 342 |
<table width=100%> |
343 |
<tr>
|
|
344 |
<th class=listheading colspan=$colspan>$invoice</th>
|
|
345 |
</tr>
|
|
343 |
<tr>
|
|
344 |
<th class=listheading colspan=$colspan>$invoice</th>
|
|
345 |
</tr>
|
|
346 | 346 |
|; |
347 | 347 |
|
348 | 348 |
$column_data{invnumber} = |
... | ... | |
405 | 405 |
$j++; |
406 | 406 |
$j %= 2; |
407 | 407 |
print qq| |
408 |
<tr class=listrow$j>
|
|
408 |
<tr class=listrow$j>
|
|
409 | 409 |
|; |
410 | 410 |
map { print "$column_data{$_}\n" } @column_index; |
411 | 411 |
print qq| |
... | ... | |
466 | 466 |
$format .= qq| |
467 | 467 |
<option value=postscript $form->{DF}{postscript}>| |
468 | 468 |
. $locale->text('Postscript') . qq| |
469 |
<option value=pdf $form->{DF}{pdf}>| . $locale->text('PDF');
|
|
469 |
<option value=pdf $form->{DF}{pdf}>| . $locale->text('PDF');
|
|
470 | 470 |
} |
471 | 471 |
|
472 | 472 |
print qq| |
Auch abrufbar als: Unified diff
Tabs aus *.pl Dateien entfernt.