X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/6ebacae90e52d35ce729638490a015060f12fee3..b90ff6b18df92c98b1b875d14835d1fdf9ff339a:/bin/mozilla/fu.pl diff --git a/bin/mozilla/fu.pl b/bin/mozilla/fu.pl index 9b19ba8d7..b987d1fd7 100644 --- a/bin/mozilla/fu.pl +++ b/bin/mozilla/fu.pl @@ -42,6 +42,8 @@ sub add { $form->get_employee($form->get_standard_dbh(\%myconfig)); $form->{created_for_user} = $form->{employee_id}; + $form->{subject} = $form->{trans_subject_1} if $form->{trans_subject_1}; + my $link_details; if (0 < scalar @{ $form->{LINKS} }) { @@ -98,7 +100,10 @@ sub display_form { my %params; $params{not_id} = $form->{id} if ($form->{id}); $params{trans_id} = $form->{LINKS}->[0]->{trans_id} if (@{ $form->{LINKS} }); - $form->{FOLLOW_UPS} = FU->follow_ups(%params); + + $form->{sort} = 'follow_up_date'; + $form->{FOLLOW_UPS_DONE} = FU->follow_ups(%params, done => 1); + $form->{FOLLOW_UPS_PENDING} = FU->follow_ups(%params, not_done => 1); setup_fu_display_form_action_bar() unless $::form->{POPUP_MODE};