|
Lines 455-461
sub printpdf {
Link Here
|
| 455 |
# open the default PDF that will be used for base (1st page already filled) |
455 |
# open the default PDF that will be used for base (1st page already filled) |
| 456 |
my $pdf_template = |
456 |
my $pdf_template = |
| 457 |
C4::Context->config('intrahtdocs') . '/' . C4::Context->preference('template') . '/pdf/layout3pages.pdf'; |
457 |
C4::Context->config('intrahtdocs') . '/' . C4::Context->preference('template') . '/pdf/layout3pages.pdf'; |
| 458 |
my $pdf = PDF::API2->open($pdf_template); |
458 |
my $pdf_template_obj = PDF::API2->open($pdf_template); |
|
|
459 |
my $pdf_template_str = $pdf_template_obj->to_string(); |
| 460 |
my $pdf = PDF::API2->from_string($pdf_template_str); |
| 459 |
$pdf->pageLabel( |
461 |
$pdf->pageLabel( |
| 460 |
0, |
462 |
0, |
| 461 |
{ |
463 |
{ |
| 462 |
- |
|
|