Lines 261-267
sub GetPendingHoldRequestsForBib {
Link Here
|
261 |
|
261 |
|
262 |
my $dbh = C4::Context->dbh; |
262 |
my $dbh = C4::Context->dbh; |
263 |
|
263 |
|
264 |
my $request_query = "SELECT biblionumber, borrowernumber, itemnumber, priority, reserve_id, reserves.branchcode, |
264 |
my $request_query = "SELECT reserve_id, biblionumber, borrowernumber, itemnumber, priority, reserve_id, reserves.branchcode, |
265 |
reservedate, reservenotes, borrowers.branchcode AS borrowerbranch, itemtype, item_level_hold, item_group_id |
265 |
reservedate, reservenotes, borrowers.branchcode AS borrowerbranch, itemtype, item_level_hold, item_group_id |
266 |
FROM reserves |
266 |
FROM reserves |
267 |
JOIN borrowers USING (borrowernumber) |
267 |
JOIN borrowers USING (borrowernumber) |
Lines 731-740
sub CreatePicklistFromItemMap {
Link Here
|
731 |
my $dbh = C4::Context->dbh; |
731 |
my $dbh = C4::Context->dbh; |
732 |
|
732 |
|
733 |
my $sth_load=$dbh->prepare(" |
733 |
my $sth_load=$dbh->prepare(" |
734 |
INSERT INTO tmp_holdsqueue (biblionumber,itemnumber,barcode,surname,firstname,phone,borrowernumber, |
734 |
INSERT INTO tmp_holdsqueue (reserve_id,biblionumber,itemnumber,barcode,surname,firstname,phone,borrowernumber, |
735 |
cardnumber,reservedate,title, itemcallnumber, |
735 |
cardnumber,reservedate,title, itemcallnumber, |
736 |
holdingbranch,pickbranch,notes, item_level_request) |
736 |
holdingbranch,pickbranch,notes, item_level_request) |
737 |
VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?) |
737 |
VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?) |
738 |
"); |
738 |
"); |
739 |
|
739 |
|
740 |
foreach my $itemnumber (sort keys %$item_map) { |
740 |
foreach my $itemnumber (sort keys %$item_map) { |
Lines 746-751
sub CreatePicklistFromItemMap {
Link Here
|
746 |
my $reservedate = $mapped_item->{reservedate}; |
746 |
my $reservedate = $mapped_item->{reservedate}; |
747 |
my $reservenotes = $mapped_item->{reservenotes}; |
747 |
my $reservenotes = $mapped_item->{reservenotes}; |
748 |
my $item_level = $mapped_item->{item_level}; |
748 |
my $item_level = $mapped_item->{item_level}; |
|
|
749 |
my $reserve_id = $mapped_item->{reserve_id}; |
749 |
|
750 |
|
750 |
my $item = Koha::Items->find($itemnumber); |
751 |
my $item = Koha::Items->find($itemnumber); |
751 |
my $barcode = $item->barcode; |
752 |
my $barcode = $item->barcode; |
Lines 760-766
sub CreatePicklistFromItemMap {
Link Here
|
760 |
my $biblio = Koha::Biblios->find( $biblionumber ); |
761 |
my $biblio = Koha::Biblios->find( $biblionumber ); |
761 |
my $title = $biblio->title; |
762 |
my $title = $biblio->title; |
762 |
|
763 |
|
763 |
$sth_load->execute($biblionumber, $itemnumber, $barcode, $surname, $firstname, $phone, $borrowernumber, |
764 |
$sth_load->execute($reserve_id, $biblionumber, $itemnumber, $barcode, $surname, $firstname, $phone, $borrowernumber, |
764 |
$cardnumber, $reservedate, $title, $itemcallnumber, |
765 |
$cardnumber, $reservedate, $title, $itemcallnumber, |
765 |
$holdingbranch, $pickbranch, $reservenotes, $item_level); |
766 |
$holdingbranch, $pickbranch, $reservenotes, $item_level); |
766 |
} |
767 |
} |
767 |
- |
|
|