$form->{callback} = "$form->{script}?action=add&type=$form->{type}" unless $form->{callback};
- &invoice_links;
+ invoice_links(is_new => 1);
&prepare_invoice;
&display_form;
# Delay access check to after the invoice's been loaded so that
# project-specific invoice rights can be evaluated.
+ my %params = @_;
my $form = $main::form;
my %myconfig = %main::myconfig;
IS->get_customer(\%myconfig, \%$form);
+ $form->{billing_address_id} = $form->{default_billing_address_id} if $params{is_new};
+
$form->restore_vars(qw(id));
IS->retrieve_invoice(\%myconfig, \%$form);
$::form->{salesman_id} = SL::DB::Manager::Employee->current->id if exists $::form->{salesman_id};
IS->get_customer(\%myconfig, $form);
+ $::form->{billing_address_id} = $::form->{default_billing_address_id};
}
$form->{taxincluded} ||= $taxincluded;