Lines 38-45
It permit to write a new order as 'received'.
Link Here
|
38 |
|
38 |
|
39 |
to know on what supplier this script has to display receive order. |
39 |
to know on what supplier this script has to display receive order. |
40 |
|
40 |
|
41 |
=item receive |
|
|
42 |
|
43 |
=item invoice |
41 |
=item invoice |
44 |
|
42 |
|
45 |
the number of this invoice. |
43 |
the number of this invoice. |
Lines 84-90
my $input = new CGI;
Link Here
|
84 |
my $dbh = C4::Context->dbh; |
82 |
my $dbh = C4::Context->dbh; |
85 |
my $booksellerid = $input->param('booksellerid'); |
83 |
my $booksellerid = $input->param('booksellerid'); |
86 |
my $ordernumber = $input->param('ordernumber'); |
84 |
my $ordernumber = $input->param('ordernumber'); |
87 |
my $search = $input->param('receive'); |
|
|
88 |
my $invoice = $input->param('invoice'); |
85 |
my $invoice = $input->param('invoice'); |
89 |
my $freight = $input->param('freight'); |
86 |
my $freight = $input->param('freight'); |
90 |
my $datereceived = $input->param('datereceived'); |
87 |
my $datereceived = $input->param('datereceived'); |
Lines 95-101
$datereceived = $datereceived ? C4::Dates->new($datereceived, 'iso') : C4::Dates
Link Here
|
95 |
my $bookseller = GetBookSellerFromId($booksellerid); |
92 |
my $bookseller = GetBookSellerFromId($booksellerid); |
96 |
my $input_gst = ($input->param('gst') eq '' ? undef : $input->param('gst')); |
93 |
my $input_gst = ($input->param('gst') eq '' ? undef : $input->param('gst')); |
97 |
my $gst= $input_gst // $bookseller->{gstrate} // C4::Context->preference("gist") // 0; |
94 |
my $gst= $input_gst // $bookseller->{gstrate} // C4::Context->preference("gist") // 0; |
98 |
my $results = SearchOrder($ordernumber,$search); |
95 |
my $results; |
|
|
96 |
$results = SearchOrder($ordernumber) if $ordernumber; |
99 |
|
97 |
|
100 |
my ( $template, $loggedinuser, $cookie ) = get_template_and_user( |
98 |
my ( $template, $loggedinuser, $cookie ) = get_template_and_user( |
101 |
{ |
99 |
{ |
Lines 108-114
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
Link Here
|
108 |
} |
106 |
} |
109 |
); |
107 |
); |
110 |
|
108 |
|
111 |
unless ( @$results ) { |
109 |
unless ( $results and @$results) { |
112 |
output_html_with_http_headers $input, $cookie, $template->output; |
110 |
output_html_with_http_headers $input, $cookie, $template->output; |
113 |
exit; |
111 |
exit; |
114 |
} |
112 |
} |
115 |
- |
|
|