Revision d2482a05
Von Hans Peter Schlaepfer vor mehr als 5 Jahren hinzugefügt
| bin/mozilla/gl.pl | ||
|---|---|---|
| 806 | 806 |
for my $i (1 .. $form->{rowcount}) {
|
| 807 | 807 |
if ($form->{show_details}) {
|
| 808 | 808 |
$source = qq| |
| 809 |
<td><input name="source_$i" value="$form->{"source_$i"}" size="16"></td>|;
|
|
| 809 |
<td><input name="source_$i" value="$form->{"source_$i"}" class="wi-verysmall" type="text"></td>|;
|
|
| 810 | 810 |
$memo = qq| |
| 811 |
<td><input name="memo_$i" value="$form->{"memo_$i"}" size="16"></td>|;
|
|
| 811 |
<td><input name="memo_$i" value="$form->{"memo_$i"}" class="wi-small" type="text"></td>|;
|
|
| 812 | 812 |
} else {
|
| 813 | 813 |
$source_hidden = qq| |
| 814 |
<input type="hidden" name="source_$i" value="$form->{"source_$i"}" size="16">|;
|
|
| 814 |
<input type="hidden" name="source_$i" value="$form->{"source_$i"}">|;
|
|
| 815 | 815 |
$memo_hidden = qq| |
| 816 |
<input type="hidden" name="memo_$i" value="$form->{"memo_$i"}" size="16">|;
|
|
| 816 |
<input type="hidden" name="memo_$i" value="$form->{"memo_$i"}">|;
|
|
| 817 | 817 |
} |
| 818 | 818 |
|
| 819 | 819 |
my %taxchart_labels = (); |
| ... | ... | |
| 854 | 854 |
if ($init) {
|
| 855 | 855 |
if ($form->{transfer}) {
|
| 856 | 856 |
$fx_transaction = qq| |
| 857 |
<td><input name="fx_transaction_$i" class=checkbox type=checkbox value=1></td>
|
|
| 857 |
<td><input name="fx_transaction_$i" type="checkbox" value="1"></td>
|
|
| 858 | 858 |
|; |
| 859 | 859 |
} |
| 860 | 860 |
|
| ... | ... | |
| 883 | 883 |
$checked = ($form->{"fx_transaction_$i"}) ? "1" : "";
|
| 884 | 884 |
my $x = ($checked) ? "x" : ""; |
| 885 | 885 |
$fx_transaction = qq| |
| 886 |
<td><input type=hidden name="fx_transaction_$i" value="$checked">$x</td>
|
|
| 886 |
<td><input type="hidden" name="fx_transaction_$i" value="$checked">$x</td>
|
|
| 887 | 887 |
|; |
| 888 | 888 |
} |
| 889 | 889 |
$form->hide_form("accno_$i");
|
| ... | ... | |
| 891 | 891 |
} else {
|
| 892 | 892 |
if ($form->{transfer}) {
|
| 893 | 893 |
$fx_transaction = qq| |
| 894 |
<td><input name="fx_transaction_$i" class=checkbox type=checkbox value=1></td>
|
|
| 894 |
<td><input name="fx_transaction_$i" type="checkbox" value="1"></td>
|
|
| 895 | 895 |
|; |
| 896 | 896 |
} |
| 897 | 897 |
} |
| ... | ... | |
| 925 | 925 |
|
| 926 | 926 |
print qq|<tr valign=top> |
| 927 | 927 |
$accno |
| 928 |
<td id="chart_balance_$i" align="right">${balance}</td>
|
|
| 928 |
<td id="chart_balance_$i" class="right">${balance}</td>
|
|
| 929 | 929 |
$fx_transaction |
| 930 |
<td><input name="debit_$i" size="8" value="$form->{"debit_$i"}" accesskey=$i $copy2credit $debitreadonly></td>
|
|
| 931 |
<td><input name="credit_$i" size=8 value="$form->{"credit_$i"}" $creditreadonly></td>
|
|
| 932 |
<td><input type="hidden" name="tax_$i" value="$form->{"tax_$i"}">$form->{"tax_$i"}</td>
|
|
| 930 |
<td class="right"><input name="debit_$i" type="text" class="wi-small numeric" value="$form->{"debit_$i"}" accesskey=$i $copy2credit $debitreadonly></td>
|
|
| 931 |
<td class="right"><input name="credit_$i" type="text" class="wi-small numeric" value="$form->{"credit_$i"}" $creditreadonly></td>
|
|
| 932 |
<td class="right"><input name="tax_$i" type="hidden" value="$form->{"tax_$i"}">$form->{"tax_$i"}</td>
|
|
| 933 | 933 |
$tax_ddbox|; |
| 934 | 934 |
|
| 935 | 935 |
if ($form->{show_details}) {
|
Auch abrufbar als: Unified diff
Neues kivitendo Design Aenderungen in bin/mozilla/..