projects
/
koha_gimpoz
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Merge remote branch 'kc/master' into new/enh/bug_5917
[koha_gimpoz]
/
circ
/
transferstoreceive.pl
diff --git
a/circ/transferstoreceive.pl
b/circ/transferstoreceive.pl
index
f87799e
..
86f7992
100755
(executable)
--- a/
circ/transferstoreceive.pl
+++ b/
circ/transferstoreceive.pl
@@
-91,10
+91,13
@@
foreach my $br ( keys %$branches ) {
$getransf{'datetransfer'} = format_date( $num->{'datesent'} );
$getransf{'itemtype'} = $itemtypeinfo ->{'description'};
$getransf{'datetransfer'} = format_date( $num->{'datesent'} );
$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
my @checkreserv = GetReservesFromItemnumber($num->{'itemnumber'} );
if ( $checkreserv[0] ) {
# we check if we have a reserv for this transfer
my @checkreserv = GetReservesFromItemnumber($num->{'itemnumber'} );
if ( $checkreserv[0] ) {