Bug 11856: Add publication year and edition to German acq PDF template
Follow up to the patch for the English templates - repeat tests with OrderPDFFormat set to pdfformat::layout2pagesde. Signed-off-by: Owen Leonard <oleonard@myacpl.org> Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com> Signed-off-by: Galen Charlton <gmc@esilibrary.com>
This commit is contained in:
parent
43e4161260
commit
ce38ae1d21
1 changed files with 21 additions and 1 deletions
|
@ -88,12 +88,32 @@ sub printorders {
|
|||
}
|
||||
push(@$abaskets, $arrbasket);
|
||||
|
||||
my $titleinfo;
|
||||
for my $basket (@$baskets){
|
||||
for my $line (@{$orders->{$basket->{basketno}}}) {
|
||||
$arrbasket = undef;
|
||||
$titleinfo = "";
|
||||
if ( C4::Context->preference("marcflavour") eq 'UNIMARC' ) {
|
||||
$titleinfo = $line->{title} . " / " . $line->{author} .
|
||||
( $line->{isbn} ? " ISBN: " . $line->{isbn} : '' ) .
|
||||
( $line->{en} ? " EN: " . $line->{en} : '' ) .
|
||||
( $line->{itemtype} ? ", " . $line->{itemtype} : '' ) .
|
||||
( $line->{edition} ? ", " . $line->{edition} : '' ) .
|
||||
( $line->{publishercode} ? ' Verlag: '. $line->{publishercode} : '') .
|
||||
( $line->{publicationyear} ? ', '. $line->{publicationyear} : '');
|
||||
}
|
||||
else { # MARC21, NORMARC
|
||||
$titleinfo = $line->{title} . " " . $line->{author} .
|
||||
( $line->{isbn} ? " ISBN: " . $line->{isbn} : '' ) .
|
||||
( $line->{en} ? " EN: " . $line->{en} : '' ) .
|
||||
( $line->{itemtype} ? " " . $line->{itemtype} : '' ) .
|
||||
( $line->{edition} ? ", " . $line->{edition} : '' ) .
|
||||
( $line->{publishercode} ? ' Verlag: '. $line->{publishercode} : '') .
|
||||
( $line->{copyrightdate} ? ' '. $line->{copyrightdate} : '');
|
||||
}
|
||||
push( @$arrbasket,
|
||||
$basket->{basketno},
|
||||
$line->{title} . " / " . $line->{author} . ( $line->{isbn} ? " ISBN: " . $line->{isbn} : '' ) . ( $line->{en} ? " EN: " . $line->{en} : '' ) . ", " . $line->{itemtype} . ( $line->{publishercode} ? 'Verlag:'. $line->{publishercode} : ""),
|
||||
$titleinfo,
|
||||
$line->{quantity},
|
||||
$num->format_price($line->{rrpgsti}),
|
||||
$num->format_price($line->{discount}).'%',
|
||||
|
|
Loading…
Reference in a new issue