Lines 93-98
sub printorders {
Link Here
|
93 |
$text->translate(20/mm, ($height-15)/mm); |
93 |
$text->translate(20/mm, ($height-15)/mm); |
94 |
$text->text("Order N°".$basketgroup->{'id'}.". Basket N° ".$basket->{basketno}.". ".$basket->{booksellernote}); |
94 |
$text->text("Order N°".$basketgroup->{'id'}.". Basket N° ".$basket->{basketno}.". ".$basket->{booksellernote}); |
95 |
$text->translate(20/mm, ($height-20)/mm); |
95 |
$text->translate(20/mm, ($height-20)/mm); |
|
|
96 |
$text->font( $pdf->corefont("Times", -encoding => "utf8"), 4/mm ); |
96 |
$text->text( ( $basket->{billingplace} ? "Billing at " . C4::Branch::GetBranchName( $basket->{billingplace} ) : "" ) |
97 |
$text->text( ( $basket->{billingplace} ? "Billing at " . C4::Branch::GetBranchName( $basket->{billingplace} ) : "" ) |
97 |
. ( $basket->{billingplace} and $basket->{deliveryplace} ? " and " : "" ) |
98 |
. ( $basket->{billingplace} and $basket->{deliveryplace} ? " and " : "" ) |
98 |
. ( $basket->{deliveryplace} ? "delivery at " . C4::Branch::GetBranchName( $basket->{deliveryplace}) : "" ) |
99 |
. ( $basket->{deliveryplace} ? "delivery at " . C4::Branch::GetBranchName( $basket->{deliveryplace}) : "" ) |
99 |
- |
|
|