# 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, 'ar') && !IS->is_storno(\%myconfig, $form, 'ar'));
+ if ($form->{id} && !IS->has_storno(\%myconfig, $form, 'ar') && !IS->is_storno(\%myconfig, $form, 'ar') && (($total_paid == 0) || ($total_paid eq "")));
if ($form->{id}) {
if ($form->{radier}) {
$report->set_columns(%column_defs);
$report->set_column_order(@columns);
- $report->set_export_options('ar_transactions', @hidden_variables);
+ $report->set_export_options('ar_transactions', @hidden_variables, qw(sort sortdir));
$report->set_sort_indicator($form->{sort}, $form->{sortdir});
$lxdebug->leave_sub();
}
-sub sales_invoice {
- $lxdebug->enter_sub();
-
- $auth->assert('invoice_edit');
-
-
- $form->{script} = 'is.pl';
- $script = "is";
- $form->{type} = "invoice";
- $locale = new Locale "$myconfig{countrycode}", "$script";
-
- require "bin/mozilla/$form->{script}";
- &add;
-
- $lxdebug->leave_sub();
-}
-
-sub ar_transaction {
- $lxdebug->enter_sub();
-
- $auth->assert('general_ledger');
-
-
- $form->{script} = 'ar.pl';
- $script = "ar";
- $locale = new Locale "$myconfig{countrycode}", "$script";
-
- require "bin/mozilla/$form->{script}";
- &add;
-
- $lxdebug->leave_sub();
-}
-
-
-
sub storno {
$lxdebug->enter_sub();