View | Details | Raw Unified | Return to bug 24190
Collapse All | Expand All

(-)a/acqui/cancelorder.pl (-5 / +5 lines)
Lines 60-74 if($action and $action eq "confirmcancel") { Link Here
60
    my $reason = $input->param('reason');
60
    my $reason = $input->param('reason');
61
    my $error = DelOrder($biblionumber, $ordernumber, $del_biblio, $reason);
61
    my $error = DelOrder($biblionumber, $ordernumber, $del_biblio, $reason);
62
62
63
    # Log the cancellation of the order
64
    if (C4::Context->preference("AcqLog")) {
65
        logaction('ACQUISITIONS', 'CANCEL_ORDER', $ordernumber);
66
    }
67
63
    if($error) {
68
    if($error) {
64
        $template->param(error_delitem => 1) if $error->{'delitem'};
69
        $template->param(error_delitem => 1) if $error->{'delitem'};
65
        $template->param(error_delbiblio => 1) if $error->{'delbiblio'};
70
        $template->param(error_delbiblio => 1) if $error->{'delbiblio'};
66
    } else {
71
    } else {
67
        $template->param(success_cancelorder => 1);
72
        $template->param(success_cancelorder => 1);
68
        # Log the cancellation of the order
69
        if (C4::Context->preference("AcqLog")) {
70
            logaction('ACQUISITIONS', 'CANCEL_ORDER', $ordernumber);
71
        }
72
    }
73
    }
73
    $template->param(confirmcancel => 1);
74
    $template->param(confirmcancel => 1);
74
}
75
}
75
- 

Return to bug 24190