@@ -1205,6 +1214,16 @@ sub form_footer {
$auth->assert('general_ledger');
+ my $follow_ups_block;
+ if ($form->{id}) {
+ my $follow_ups = FU->follow_ups('trans_id' => $form->{id});
+
+ if (@{ $follow_ups} ) {
+ my $num_due = sum map { $_->{due} * 1 } @{ $follow_ups };
+ $follow_ups_block = qq|| . $locale->text("There are #1 unfinished follow-ups of which #2 are due.", scalar @{ $follow_ups }, $num_due) . qq|
|;
+ }
+ }
+
($dec) = ($form->{totaldebit} =~ /\.(\d+)/);
$dec = length $dec;
$decimalplaces = ($dec > 2) ? $dec : 2;
@@ -1228,6 +1247,8 @@ sub form_footer {
+$follow_ups_block
+
|;
@@ -1247,6 +1268,11 @@ sub form_footer {
|;
}
+ print qq|
+ |;
+
} else {
if ($transdate > $closedto) {
print qq|