Revision 4d20c181
Von Moritz Bunkus vor mehr als 17 Jahren hinzugefügt
| bin/mozilla/is.pl | ||
|---|---|---|
| 1011 | 1011 |
</tr> |
| 1012 | 1012 |
"; |
| 1013 | 1013 |
|
| 1014 |
my @triggers = (); |
|
| 1014 |
my @triggers = (); |
|
| 1015 |
my $totalpaid = 0; |
|
| 1015 | 1016 |
|
| 1016 | 1017 |
$form->{paidaccounts}++ if ($form->{"paid_$form->{paidaccounts}"});
|
| 1017 | 1018 |
for $i (1 .. $form->{paidaccounts}) {
|
| ... | ... | |
| 1062 | 1063 |
push(@triggers, "datepaid_$i", "BL", "trigger_datepaid_$i"); |
| 1063 | 1064 |
} |
| 1064 | 1065 |
|
| 1066 |
my $paid_missing = $form->{oldinvtotal} - $totalpaid;
|
|
| 1067 |
|
|
| 1068 |
print qq| |
|
| 1069 |
<tr> |
|
| 1070 |
<td></td> |
|
| 1071 |
<td></td> |
|
| 1072 |
<td align="center">| . $locale->text('Total') . qq|</td>
|
|
| 1073 |
<td align="center">| . H($form->format_amount(\%myconfig, $totalpaid, 2)) . qq|</td> |
|
| 1074 |
</tr> |
|
| 1075 |
<tr> |
|
| 1076 |
<td></td> |
|
| 1077 |
<td></td> |
|
| 1078 |
<td align="center">| . $locale->text('Missing amount') . qq|</td>
|
|
| 1079 |
<td align="center">| . H($form->format_amount(\%myconfig, $paid_missing, 2)) . qq|</td> |
|
| 1080 |
</tr> |
|
| 1081 |
|; |
|
| 1082 |
|
|
| 1065 | 1083 |
map({ print($cgi->hidden("-name" => $_, "-value" => $form->{$_})); } qw(paidaccounts selectAR_paid oldinvtotal));
|
| 1066 | 1084 |
print qq|<input type="hidden" name="oldtotalpaid" value="$totalpaid"> |
| 1067 | 1085 |
</table> |
Auch abrufbar als: Unified diff
Bei Eingangs-, Ausgangs-, Kreditoren- und Debitorenrechnungen unterhalb der Zahlungsein- bzw. -ausgänge die bisher gebuchte Summe und den noch offenen Betrag anzeigen.