projects
/
koha_fer
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Bug 11169: (follow-up) add more unit tests
[koha_fer]
/
circ
/
transferstoreceive.pl
diff --git
a/circ/transferstoreceive.pl
b/circ/transferstoreceive.pl
index
f87799e
..
365f200
100755
(executable)
--- a/
circ/transferstoreceive.pl
+++ b/
circ/transferstoreceive.pl
@@
-89,14
+89,17
@@
foreach my $br ( keys %$branches ) {
my $gettitle = GetBiblioFromItemNumber( $num->{'itemnumber'} );
my $itemtypeinfo = getitemtypeinfo( (C4::Context->preference('item-level_itypes')) ? $gettitle->{'itype'} : $gettitle->{'itemtype'} );
my $gettitle = GetBiblioFromItemNumber( $num->{'itemnumber'} );
my $itemtypeinfo = getitemtypeinfo( (C4::Context->preference('item-level_itypes')) ? $gettitle->{'itype'} : $gettitle->{'itemtype'} );
- $getransf{'datetransfer'} =
format_date( $num->{'datesent'} )
;
+ $getransf{'datetransfer'} =
$num->{'datesent'}
;
$getransf{'itemtype'} = $itemtypeinfo ->{'description'};
$getransf{'itemtype'} = $itemtypeinfo ->{'description'};
- foreach (qw(title biblionumber itemnumber barcode homebranch holdingbranch itemcallnumber)) {
+ foreach (qw(title
author
biblionumber itemnumber barcode homebranch holdingbranch itemcallnumber)) {
$getransf{$_} = $gettitle->{$_};
}
$getransf{$_} = $gettitle->{$_};
}
+ my $record = GetMarcBiblio($gettitle->{'biblionumber'});
+ $getransf{'subtitle'} = GetRecordValue('subtitle', $record, GetFrameworkCode($gettitle->{'biblionumber'}));
+
# we check if we have a reserv for this transfer
# we check if we have a reserv for this transfer
- my @checkreserv = GetReservesFromItemnumber($num->{'itemnumber'}
);
+ my @checkreserv = GetReservesFromItemnumber($num->{'itemnumber'});
if ( $checkreserv[0] ) {
my $getborrower = GetMemberDetails( $checkreserv[1] );
$getransf{'borrowernum'} = $getborrower->{'borrowernumber'};
if ( $checkreserv[0] ) {
my $getborrower = GetMemberDetails( $checkreserv[1] );
$getransf{'borrowernum'} = $getborrower->{'borrowernumber'};
@@
-117,7
+120,6
@@
foreach my $br ( keys %$branches ) {
$template->param(
branchesloop => \@branchesloop,
show_date => format_date(C4::Dates->today('iso')),
$template->param(
branchesloop => \@branchesloop,
show_date => format_date(C4::Dates->today('iso')),
- 'dateformat_' . (C4::Context->preference("dateformat") || '') => 1,
TransfersMaxDaysWarning => C4::Context->preference('TransfersMaxDaysWarning'),
latetransfers => $latetransfers ? 1 : 0,
);
TransfersMaxDaysWarning => C4::Context->preference('TransfersMaxDaysWarning'),
latetransfers => $latetransfers ? 1 : 0,
);