Lines 623-628
sub ModItemTransfer {
Link Here
|
623 |
# Remove the 'shelving cart' location status if it is being used. |
623 |
# Remove the 'shelving cart' location status if it is being used. |
624 |
CartToShelf( $itemnumber ) if ( C4::Context->preference("ReturnToShelvingCart") ); |
624 |
CartToShelf( $itemnumber ) if ( C4::Context->preference("ReturnToShelvingCart") ); |
625 |
|
625 |
|
|
|
626 |
$dbh->do("UPDATE branchtransfers SET datearrived = NOW(), comments = ? WHERE itemnumber = ?", undef, "Canceled, new transfer from $frombranch to $tobranch created", $itemnumber); |
627 |
|
626 |
#new entry in branchtransfers.... |
628 |
#new entry in branchtransfers.... |
627 |
my $sth = $dbh->prepare( |
629 |
my $sth = $dbh->prepare( |
628 |
"INSERT INTO branchtransfers (itemnumber, frombranch, datesent, tobranch) |
630 |
"INSERT INTO branchtransfers (itemnumber, frombranch, datesent, tobranch) |