|
Lines 72-81
while ( my $hold = $holds->next() ) {
Link Here
|
| 72 |
my $borrower = Koha::Borrowers->find( $hold->borrowernumber ); |
72 |
my $borrower = Koha::Borrowers->find( $hold->borrowernumber ); |
| 73 |
|
73 |
|
| 74 |
my $letter = GetPreparedLetter( |
74 |
my $letter = GetPreparedLetter( |
| 75 |
module => 'reserves', |
75 |
module => 'reserves', |
| 76 |
letter_code => 'HOLD_PLACED_PRINT', |
76 |
letter_code => 'HOLDPLACED', |
| 77 |
branchcode => $hold->branchcode, |
77 |
branchcode => $hold->branchcode, |
| 78 |
tables => { |
78 |
message_transport_type => 'print', |
|
|
79 |
tables => { |
| 79 |
branches => $hold->branchcode, |
80 |
branches => $hold->branchcode, |
| 80 |
biblio => $hold->biblionumber, |
81 |
biblio => $hold->biblionumber, |
| 81 |
biblioitems => $hold->biblionumber, |
82 |
biblioitems => $hold->biblionumber, |
|
Lines 83-89
while ( my $hold = $holds->next() ) {
Link Here
|
| 83 |
borrowers => $borrower->unblessed, |
84 |
borrowers => $borrower->unblessed, |
| 84 |
reserves => $hold->unblessed, |
85 |
reserves => $hold->unblessed, |
| 85 |
|
86 |
|
| 86 |
} |
87 |
}, |
| 87 |
); |
88 |
); |
| 88 |
|
89 |
|
| 89 |
if ( defined( $printers{ $hold->branchcode } ) ) { |
90 |
if ( defined( $printers{ $hold->branchcode } ) ) { |
|
Lines 143-148
e.g. print_holds.pl --printer MPL:1 --printer CPL:2
Link Here
|
| 143 |
would add printers for branchcodes MPL and CPL. If a printer is not defined for a given branch, notices for |
144 |
would add printers for branchcodes MPL and CPL. If a printer is not defined for a given branch, notices for |
| 144 |
that branch will not be printed. |
145 |
that branch will not be printed. |
| 145 |
|
146 |
|
|
|
147 |
=item B<--test> |
| 148 |
|
| 149 |
Run in test mode. Holds will not actually be printed. |
| 150 |
|
| 151 |
=item B<--confirm> |
| 152 |
|
| 153 |
Run in production mode. Holds will be printed to printers. |
| 154 |
|
| 155 |
=back |
| 156 |
|
| 146 |
=head1 DESCRIPTION |
157 |
=head1 DESCRIPTION |
| 147 |
|
158 |
|
| 148 |
B<This program> will print on-demand notices for items in the holds queue as they appear. |
159 |
B<This program> will print on-demand notices for items in the holds queue as they appear. |