<input class=submit type=submit name=action value="| . $locale->text('Delete') . qq|">
|;
}
-
# ToDO: - insert a global check for stornos, so that a storno is only possible a limited time after saving it
print qq| <input class=submit type=submit name=action value="| . $locale->text('Storno') . qq|"> |
- if ($form->{id} && !IS->has_storno(\%myconfig, $form, 'ap') && !IS->is_storno(\%myconfig, $form, 'ap', $form->{id}));
+ if ($form->{id} && !IS->has_storno(\%myconfig, $form, 'ap') && !IS->is_storno(\%myconfig, $form, 'ap', $form->{id}) && (($total_paid == 0) || ($total_paid eq "")));
print qq| <input class=submit type=submit name=action value="| . $locale->text('Post Payment') . qq|">
<input class=submit type=submit name=action value="| . $locale->text('Use As Template') . qq|">
$lxdebug->leave_sub();
}
-
-sub vendor_invoice {
- $lxdebug->enter_sub();
-
- $auth->assert('invoice_edit');
-
-
- $form->{script} = 'ir.pl';
- $script = "ir";
- $form->{type} = "invoice";
- $locale = new Locale "$myconfig{countrycode}", "$script";
-
- require "bin/mozilla/$form->{script}";
- &add;
-
- $lxdebug->leave_sub();
-}
-
-sub ap_transaction {
- $lxdebug->enter_sub();
-
- $auth->assert('general_ledger');
-
-
- $form->{script} = 'ap.pl';
- $script = "ap";
- $locale = new Locale "$myconfig{countrycode}", "$script";
-
- require "bin/mozilla/$form->{script}";
- &add;
-
- $lxdebug->leave_sub();
-}
-
sub storno {
$lxdebug->enter_sub();