|
Lines 30-36
use Koha::Patrons;
Link Here
|
| 30 |
|
30 |
|
| 31 |
my $cgi = CGI->new; |
31 |
my $cgi = CGI->new; |
| 32 |
|
32 |
|
| 33 |
my $id = $cgi->param('id'); |
33 |
my @ids = split( ',', $cgi->param('id') ); |
| 34 |
|
34 |
|
| 35 |
my ( $template, $loggedinuser, $cookie ) = get_template_and_user( |
35 |
my ( $template, $loggedinuser, $cookie ) = get_template_and_user( |
| 36 |
{ |
36 |
{ |
|
Lines 41-70
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
Link Here
|
| 41 |
} |
41 |
} |
| 42 |
); |
42 |
); |
| 43 |
|
43 |
|
| 44 |
my $ar = Koha::ArticleRequests->find($id); |
44 |
my $ars = Koha::ArticleRequests->search( { id => { '-in' => \@ids } } ); |
|
|
45 |
my $slipContent = ''; |
| 46 |
my $first = 1; |
| 47 |
while ( my $ar = $ars->next ) { |
| 48 |
if ( !$first ) { |
| 49 |
$slipContent .= "<hr/>"; |
| 50 |
} |
| 51 |
$first = 0; |
| 52 |
$template->param( article_request => $ar ); |
| 53 |
my $patron = Koha::Patrons->find( $ar->borrowernumber ); |
| 45 |
|
54 |
|
| 46 |
$template->param( article_request => $ar ); |
55 |
my $slip = C4::Letters::GetPreparedLetter( |
| 47 |
my $patron = Koha::Patrons->find( $ar->borrowernumber ); |
56 |
module => 'circulation', |
|
|
57 |
letter_code => 'AR_SLIP', |
| 58 |
message_transport_type => 'print', |
| 59 |
lang => $patron->lang, |
| 60 |
tables => { |
| 61 |
article_requests => $ar->id, |
| 62 |
borrowers => $ar->borrowernumber, |
| 63 |
biblio => $ar->biblionumber, |
| 64 |
biblioitems => $ar->biblionumber, |
| 65 |
items => $ar->itemnumber, |
| 66 |
branches => $ar->branchcode, |
| 67 |
}, |
| 68 |
); |
| 48 |
|
69 |
|
| 49 |
my $slip = C4::Letters::GetPreparedLetter( |
70 |
$slipContent .= |
| 50 |
module => 'circulation', |
71 |
$slip->{is_html} |
| 51 |
letter_code => 'AR_SLIP', |
72 |
? $slip->{content} |
| 52 |
message_transport_type => 'print', |
73 |
: '<pre>' . $slip->{content} . '</pre>'; |
| 53 |
lang => $patron->lang, |
74 |
} |
| 54 |
tables => { |
|
|
| 55 |
article_requests => $ar->id, |
| 56 |
borrowers => $ar->borrowernumber, |
| 57 |
biblio => $ar->biblionumber, |
| 58 |
biblioitems => $ar->biblionumber, |
| 59 |
items => $ar->itemnumber, |
| 60 |
branches => $ar->branchcode, |
| 61 |
}, |
| 62 |
); |
| 63 |
|
75 |
|
| 64 |
$template->param( |
76 |
$template->param( |
| 65 |
slip => $slip->{content}, |
77 |
slip => $slipContent, |
| 66 |
caller => 'article-request', |
78 |
caller => 'article-request', |
| 67 |
plain => !$slip->{is_html}, |
79 |
plain => 0, |
| 68 |
); |
80 |
); |
| 69 |
|
81 |
|
| 70 |
output_html_with_http_headers $cgi, $cookie, $template->output; |
82 |
output_html_with_http_headers $cgi, $cookie, $template->output; |