Revision 4d20c181
Von Moritz Bunkus vor mehr als 17 Jahren hinzugefügt
| bin/mozilla/ap.pl | ||
|---|---|---|
| 672 | 672 |
? $locale->text('Tax Included')
|
| 673 | 673 |
: $locale->text('Tax');
|
| 674 | 674 |
|
| 675 |
$form->{invtotal_unformatted} = $form->{invtotal};
|
|
| 675 | 676 |
$form->{invtotal} = $form->format_amount(\%myconfig, $form->{invtotal}, 2);
|
| 676 | 677 |
|
| 677 | 678 |
$APselected = |
| ... | ... | |
| 741 | 742 |
</tr> |
| 742 | 743 |
"; |
| 743 | 744 |
|
| 744 |
my @triggers = (); |
|
| 745 |
my @triggers = (); |
|
| 746 |
my $totalpaid = 0; |
|
| 747 |
|
|
| 745 | 748 |
$form->{paidaccounts}++ if ($form->{"paid_$form->{paidaccounts}"});
|
| 746 | 749 |
for $i (1 .. $form->{paidaccounts}) {
|
| 747 | 750 |
print " |
| ... | ... | |
| 755 | 758 |
'-labels' => \%AP_paid_labels, |
| 756 | 759 |
'-default' => $form->{"AP_paid_$i"}));
|
| 757 | 760 |
|
| 761 |
$totalpaid += $form->{"paid_$i"};
|
|
| 762 |
|
|
| 758 | 763 |
# format amounts |
| 759 | 764 |
if ($form->{"paid_$i"}) {
|
| 760 | 765 |
$form->{"paid_$i"} =
|
| ... | ... | |
| 805 | 810 |
"; |
| 806 | 811 |
push(@triggers, "datepaid_$i", "BL", "trigger_datepaid_$i"); |
| 807 | 812 |
} |
| 808 |
print $form->write_trigger(\%myconfig, scalar(@triggers) / 3, @triggers) . |
|
| 813 |
|
|
| 814 |
my $paid_missing = $form->{invtotal_unformatted} - $totalpaid;
|
|
| 815 |
|
|
| 816 |
print qq| |
|
| 817 |
<tr> |
|
| 818 |
<td></td> |
|
| 819 |
<td></td> |
|
| 820 |
<td align="center">| . $locale->text('Total') . qq|</td>
|
|
| 821 |
<td align="center">| . H($form->format_amount(\%myconfig, $totalpaid, 2)) . qq|</td> |
|
| 822 |
</tr> |
|
| 823 |
<tr> |
|
| 824 |
<td></td> |
|
| 825 |
<td></td> |
|
| 826 |
<td align="center">| . $locale->text('Missing amount') . qq|</td>
|
|
| 827 |
<td align="center">| . H($form->format_amount(\%myconfig, $paid_missing, 2)) . qq|</td> |
|
| 828 |
</tr> |
|
| 829 |
| . $form->write_trigger(\%myconfig, scalar(@triggers) / 3, @triggers) . |
|
| 809 | 830 |
qq| |
| 810 | 831 |
<input type=hidden name=paidaccounts value=$form->{paidaccounts}>
|
| 811 | 832 |
|
| bin/mozilla/ar.pl | ||
|---|---|---|
| 685 | 685 |
$project = ""; |
| 686 | 686 |
} |
| 687 | 687 |
|
| 688 |
$form->{invtotal_unformatted} = $form->{invtotal};
|
|
| 688 | 689 |
$form->{invtotal} = $form->format_amount(\%myconfig, $form->{invtotal}, 2);
|
| 689 | 690 |
|
| 690 | 691 |
$ARselected = |
| ... | ... | |
| 756 | 757 |
</tr> |
| 757 | 758 |
"; |
| 758 | 759 |
|
| 759 |
my @triggers = (); |
|
| 760 |
my @triggers = (); |
|
| 761 |
my $totalpaid = 0; |
|
| 762 |
|
|
| 760 | 763 |
$form->{paidaccounts}++ if ($form->{"paid_$form->{paidaccounts}"});
|
| 761 | 764 |
for $i (1 .. $form->{paidaccounts}) {
|
| 762 | 765 |
print " |
| ... | ... | |
| 770 | 773 |
'-labels' => \%AR_paid_labels, |
| 771 | 774 |
'-default' => $form->{"AR_paid_$i"}));
|
| 772 | 775 |
|
| 776 |
$totalpaid += $form->{"paid_$i"};
|
|
| 777 |
|
|
| 773 | 778 |
# format amounts |
| 774 | 779 |
if ($form->{"paid_$i"}) {
|
| 775 | 780 |
$form->{"paid_$i"} =
|
| ... | ... | |
| 822 | 827 |
push(@triggers, "datepaid_$i", "BL", "trigger_datepaid_$i"); |
| 823 | 828 |
} |
| 824 | 829 |
|
| 825 |
print $form->write_trigger(\%myconfig, scalar(@triggers) / 3, @triggers) . |
|
| 830 |
my $paid_missing = $form->{invtotal_unformatted} - $totalpaid;
|
|
| 831 |
|
|
| 832 |
print qq| |
|
| 833 |
<tr> |
|
| 834 |
<td></td> |
|
| 835 |
<td></td> |
|
| 836 |
<td align="center">| . $locale->text('Total') . qq|</td>
|
|
| 837 |
<td align="center">| . H($form->format_amount(\%myconfig, $totalpaid, 2)) . qq|</td> |
|
| 838 |
</tr> |
|
| 839 |
<tr> |
|
| 840 |
<td></td> |
|
| 841 |
<td></td> |
|
| 842 |
<td align="center">| . $locale->text('Missing amount') . qq|</td>
|
|
| 843 |
<td align="center">| . H($form->format_amount(\%myconfig, $paid_missing, 2)) . qq|</td> |
|
| 844 |
</tr> |
|
| 845 |
| . $form->write_trigger(\%myconfig, scalar(@triggers) / 3, @triggers) . |
|
| 826 | 846 |
qq| |
| 827 | 847 |
<input type=hidden name=paidaccounts value=$form->{paidaccounts}>
|
| 828 | 848 |
|
| bin/mozilla/ir.pl | ||
|---|---|---|
| 730 | 730 |
</tr> |
| 731 | 731 |
|; |
| 732 | 732 |
|
| 733 |
my @triggers = (); |
|
| 733 |
my @triggers = (); |
|
| 734 |
my $totalpaid = 0; |
|
| 735 |
|
|
| 734 | 736 |
$form->{paidaccounts}++ if ($form->{"paid_$form->{paidaccounts}"});
|
| 735 | 737 |
for $i (1 .. $form->{paidaccounts}) {
|
| 736 | 738 |
|
| ... | ... | |
| 742 | 744 |
$form->{"selectAP_paid_$i"} =~
|
| 743 | 745 |
s/option>\Q$form->{"AP_paid_$i"}\E/option selected>$form->{"AP_paid_$i"}/;
|
| 744 | 746 |
|
| 747 |
$totalpaid += $form->{"paid_$i"};
|
|
| 748 |
|
|
| 745 | 749 |
# format amounts |
| 746 | 750 |
if ($form->{"paid_$i"}) {
|
| 747 | 751 |
$form->{"paid_$i"} =
|
| ... | ... | |
| 785 | 789 |
push(@triggers, "datepaid_$i", "BL", "trigger_datepaid_$i"); |
| 786 | 790 |
} |
| 787 | 791 |
|
| 792 |
my $paid_missing = $form->{oldinvtotal} - $totalpaid;
|
|
| 793 |
|
|
| 788 | 794 |
print qq| |
| 795 |
<tr> |
|
| 796 |
<td></td> |
|
| 797 |
<td></td> |
|
| 798 |
<td align="center">| . $locale->text('Total') . qq|</td>
|
|
| 799 |
<td align="center">| . H($form->format_amount(\%myconfig, $totalpaid, 2)) . qq|</td> |
|
| 800 |
</tr> |
|
| 801 |
<tr> |
|
| 802 |
<td></td> |
|
| 803 |
<td></td> |
|
| 804 |
<td align="center">| . $locale->text('Missing amount') . qq|</td>
|
|
| 805 |
<td align="center">| . H($form->format_amount(\%myconfig, $paid_missing, 2)) . qq|</td> |
|
| 806 |
</tr> |
|
| 807 |
|
|
| 789 | 808 |
<input type=hidden name=oldinvtotal value=$form->{oldinvtotal}>
|
| 790 | 809 |
<input type=hidden name=paidaccounts value=$form->{paidaccounts}>
|
| 791 | 810 |
<input type=hidden name=selectAP_paid value="$form->{selectAP_paid}">
|
| 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> |
| locale/de/all | ||
|---|---|---|
| 688 | 688 |
'Missing Method!' => 'Fehlender Voranmeldungszeitraum', |
| 689 | 689 |
'Missing Preferences: Outputroutine disabled' => 'Die Ausgabefunktionen sind wegen unzureichender Voreinstellungen deaktiviert!', |
| 690 | 690 |
'Missing Tax Authoritys Preferences' => 'Fehlende Angaben zum Finanzamt!', |
| 691 |
'Missing amount' => 'Fehlbetrag', |
|
| 691 | 692 |
'Mitarbeiter' => 'Mitarbeiter', |
| 692 | 693 |
'Mobile1' => 'Mobile 1', |
| 693 | 694 |
'Mobile2' => 'Mobile 2', |
| locale/de/ap | ||
|---|---|---|
| 85 | 85 |
'Memo' => 'Memo', |
| 86 | 86 |
'Missing \'description\' field.' => 'Fehlendes Feld \'description\'.', |
| 87 | 87 |
'Missing \'tag\' field.' => 'Fehlendes Feld \'tag\'.', |
| 88 |
'Missing amount' => 'Fehlbetrag', |
|
| 88 | 89 |
'More than one control file with the tag \'%s\' exist.' => 'Es gibt mehr als eine Kontrolldatei mit dem Tag \'%s\'.', |
| 89 | 90 |
'Name' => 'Name', |
| 90 | 91 |
'No Customer was found matching the search parameters.' => 'Zu dem Suchbegriff wurde kein Endkunde gefunden', |
| locale/de/ar | ||
|---|---|---|
| 90 | 90 |
'Memo' => 'Memo', |
| 91 | 91 |
'Missing \'description\' field.' => 'Fehlendes Feld \'description\'.', |
| 92 | 92 |
'Missing \'tag\' field.' => 'Fehlendes Feld \'tag\'.', |
| 93 |
'Missing amount' => 'Fehlbetrag', |
|
| 93 | 94 |
'More than one control file with the tag \'%s\' exist.' => 'Es gibt mehr als eine Kontrolldatei mit dem Tag \'%s\'.', |
| 94 | 95 |
'Name' => 'Name', |
| 95 | 96 |
'No Customer was found matching the search parameters.' => 'Zu dem Suchbegriff wurde kein Endkunde gefunden', |
| locale/de/ir | ||
|---|---|---|
| 101 | 101 |
'Memo' => 'Memo', |
| 102 | 102 |
'Missing \'description\' field.' => 'Fehlendes Feld \'description\'.', |
| 103 | 103 |
'Missing \'tag\' field.' => 'Fehlendes Feld \'tag\'.', |
| 104 |
'Missing amount' => 'Fehlbetrag', |
|
| 104 | 105 |
'More than one control file with the tag \'%s\' exist.' => 'Es gibt mehr als eine Kontrolldatei mit dem Tag \'%s\'.', |
| 105 | 106 |
'Name' => 'Name', |
| 106 | 107 |
'No Customer was found matching the search parameters.' => 'Zu dem Suchbegriff wurde kein Endkunde gefunden', |
| locale/de/is | ||
|---|---|---|
| 118 | 118 |
'Memo' => 'Memo', |
| 119 | 119 |
'Missing \'description\' field.' => 'Fehlendes Feld \'description\'.', |
| 120 | 120 |
'Missing \'tag\' field.' => 'Fehlendes Feld \'tag\'.', |
| 121 |
'Missing amount' => 'Fehlbetrag', |
|
| 121 | 122 |
'More than one control file with the tag \'%s\' exist.' => 'Es gibt mehr als eine Kontrolldatei mit dem Tag \'%s\'.', |
| 122 | 123 |
'Name' => 'Name', |
| 123 | 124 |
'No Customer was found matching the search parameters.' => 'Zu dem Suchbegriff wurde kein Endkunde gefunden', |
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.