$self->alert_type('99');
}
if ($messages->{Wrongbranch}) {
- $self->destination_loc($messages->{Wrongbranch}->{Rightbranch});
+ $self->{item}->destination_loc($messages->{Wrongbranch}->{Rightbranch});
$self->alert_type('04'); # send to other branch
}
if ($messages->{WrongTransfer}) {
- $self->destination_loc($messages->{WrongTransfer});
+ $self->{item}->destination_loc($messages->{WrongTransfer});
$self->alert_type('04'); # send to other branch
}
if ($messages->{NeedsTransfer}) {
- $self->destination_loc($iteminformation->{homebranch});
+ $self->{item}->destination_loc($messages->{NeedsTransfer});
$self->alert_type('04'); # send to other branch
}
if ($messages->{WasTransfered}) { # set into transit so tell unit
- $self->destination_loc($iteminformation->{homebranch});
+ $self->{item}->destination_loc($iteminformation->{homebranch});
$self->alert_type('04'); # send to other branch
}
if ($messages->{ResFound}) {
$resp .= 'U';
}
- # apparently we can't trust the returns from Checkin yet (because C4::Circulation::AddReturn is faulty)
- # So we reproduce the alert logic here.
- if ( not $status->alert ) {
- if ( $item->destination_loc and $item->destination_loc ne $my_branch ) {
- $status->alert(1);
- $status->alert_type('04'); # no hold, just send it
- }
- }
$resp .= $status->alert ? 'Y' : 'N';
$resp .= timestamp;
$resp .= add_field( FID_INST_ID, $inst_id );