Revision 4e5c422e
Von Sven Schöling vor etwa 13 Jahren hinzugefügt
bin/mozilla/ir.pl | ||
---|---|---|
274 | 274 |
|
275 | 275 |
$form->{defaultcurrency} = $form->get_default_currency(\%myconfig); |
276 | 276 |
|
277 |
my $set_duedate_url = "$form->{script}?action=set_duedate"; |
|
278 |
|
|
279 |
push @ { $form->{AJAX} }, new CGI::Ajax( 'set_duedate' => $set_duedate_url ); |
|
280 |
|
|
281 | 277 |
my @old_project_ids = ($form->{"globalproject_id"}); |
282 | 278 |
map { push @old_project_ids, $form->{"project_id_$_"} if $form->{"project_id_$_"}; } 1..$form->{"rowcount"}; |
283 | 279 |
|
... | ... | |
820 | 816 |
$main::lxdebug->leave_sub(); |
821 | 817 |
} |
822 | 818 |
|
823 |
sub set_duedate_vendor { |
|
824 |
$main::lxdebug->enter_sub(); |
|
825 |
|
|
826 |
my $form = $main::form; |
|
819 |
sub get_duedate_vendor { |
|
820 |
$::lxdebug->enter_sub; |
|
827 | 821 |
|
828 |
print $form->ajax_response_header(), IR->get_duedate('vendor_id' => $form->{vendor_id}, |
|
829 |
'invdate' => $form->{invdate}, |
|
830 |
'default' => $form->{old_duedate}); |
|
822 |
my $result = IR->get_duedate( |
|
823 |
vendor_id => $::form->{vendor_id}, |
|
824 |
invdate => $::form->{invdate}, |
|
825 |
default => $::form->{old_duedate}, |
|
826 |
); |
|
831 | 827 |
|
832 |
$main::lxdebug->leave_sub(); |
|
828 |
print $::form->ajax_response_header, $result; |
|
829 |
$::lxdebug->leave_sub; |
|
833 | 830 |
} |
Auch abrufbar als: Unified diff
CGI::Ajax aus ir/form_header entfernt.
duedate auf jquery umgeschrieben. Die Funktion von (irreführend)
set_duedate_vendor auf get_duedate_vendor umbenannt.