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

(-)a/acqui/basketheader.pl (-20 / +19 lines)
Lines 69-79 my ( $template, $loggedinuser, $cookie ) = get_template_and_user( Link Here
69
);
69
);
70
70
71
#parameters:
71
#parameters:
72
my $booksellerid = $input->param('booksellerid');
72
my $booksellerid = scalar $input->param('booksellerid');
73
my $basketno = $input->param('basketno');
73
my $basketno = scalar $input->param('basketno');
74
my $basket;
74
my $basket;
75
my $op = $input ->param('op');
75
my $op = scalar $input->param('op');
76
my $is_an_edit= $input ->param('is_an_edit');
76
my $is_an_edit = scalar $input->param('is_an_edit');
77
77
78
if ( $op eq 'add_form' ) {
78
if ( $op eq 'add_form' ) {
79
    my @contractloop;
79
    my @contractloop;
Lines 137-162 if ( $op eq 'add_form' ) { Link Here
137
    if ( $is_an_edit ) {
137
    if ( $is_an_edit ) {
138
        ModBasketHeader(
138
        ModBasketHeader(
139
            $basketno,
139
            $basketno,
140
            $input->param('basketname'),
140
            scalar $input->param('basketname'),
141
            $input->param('basketnote'),
141
            scalar $input->param('basketnote'),
142
            $input->param('basketbooksellernote'),
142
            scalar $input->param('basketbooksellernote'),
143
            $input->param('basketcontractnumber') || undef,
143
            scalar $input->param('basketcontractnumber') || undef,
144
            $input->param('basketbooksellerid'),
144
            scalar $input->param('basketbooksellerid'),
145
            $input->param('deliveryplace'),
145
            scalar $input->param('deliveryplace'),
146
            $input->param('billingplace'),
146
            scalar $input->param('billingplace'),
147
            $input->param('is_standing') ? 1 : undef,
147
            scalar $input->param('is_standing') ? 1 : undef,
148
        );
148
        );
149
    } else { #New basket
149
    } else { #New basket
150
        $basketno = NewBasket(
150
        $basketno = NewBasket(
151
            $booksellerid,
151
            $booksellerid,
152
            $loggedinuser,
152
            $loggedinuser,
153
            $input->param('basketname'),
153
            scalar $input->param('basketname'),
154
            $input->param('basketnote'),
154
            scalar $input->param('basketnote'),
155
            $input->param('basketbooksellernote'),
155
            scalar $input->param('basketbooksellernote'),
156
            $input->param('basketcontractnumber') || undef,
156
            scalar $input->param('basketcontractnumber') || undef,
157
            $input->param('deliveryplace'),
157
            scalar $input->param('deliveryplace'),
158
            $input->param('billingplace'),
158
            scalar $input->param('billingplace'),
159
            $input->param('is_standing') ? 1 : undef,
159
            scalar $input->param('is_standing') ? 1 : undef,
160
        );
160
        );
161
    }
161
    }
162
    print $input->redirect('basket.pl?basketno='.$basketno);
162
    print $input->redirect('basket.pl?basketno='.$basketno);
163
- 

Return to bug 19195