Lines 91-96
sub do_checkin {
Link Here
|
91 |
$self->destination_loc($iteminformation->{homebranch}); |
91 |
$self->destination_loc($iteminformation->{homebranch}); |
92 |
$self->alert_type('04'); # send to other branch |
92 |
$self->alert_type('04'); # send to other branch |
93 |
} |
93 |
} |
|
|
94 |
if ($messages->{WasTransfered}) { # set into transit so tell unit |
95 |
$self->destination_loc($iteminformation->{homebranch}); |
96 |
$self->alert_type('04'); # send to other branch |
97 |
} |
94 |
if ($messages->{ResFound}) { |
98 |
if ($messages->{ResFound}) { |
95 |
$self->hold($messages->{ResFound}); |
99 |
$self->hold($messages->{ResFound}); |
96 |
if ($branch eq $messages->{ResFound}->{branchcode}) { |
100 |
if ($branch eq $messages->{ResFound}->{branchcode}) { |
97 |
- |
|
|