|
Lines 449-455
sub printpdf {
Link Here
|
| 449 |
# open the default PDF that will be used for base (1st page already filled) |
449 |
# open the default PDF that will be used for base (1st page already filled) |
| 450 |
my $pdf_template = |
450 |
my $pdf_template = |
| 451 |
C4::Context->config('intrahtdocs') . '/' . C4::Context->preference('template') . '/pdf/layout3pagesfr.pdf'; |
451 |
C4::Context->config('intrahtdocs') . '/' . C4::Context->preference('template') . '/pdf/layout3pagesfr.pdf'; |
| 452 |
my $pdf = PDF::API2->open($pdf_template); |
452 |
my $pdf_template_obj = PDF::API2->open($pdf_template); |
|
|
453 |
my $pdf_template_str = $pdf_template_obj->to_string(); |
| 454 |
my $pdf = PDF::API2->from_string($pdf_template_str); |
| 453 |
$pdf->pageLabel( |
455 |
$pdf->pageLabel( |
| 454 |
0, |
456 |
0, |
| 455 |
{ |
457 |
{ |
| 456 |
- |
|
|