|
Lines 67-81
sub do_checkin {
Link Here
|
| 67 |
$self->alert_type('99'); |
67 |
$self->alert_type('99'); |
| 68 |
} |
68 |
} |
| 69 |
if ($messages->{Wrongbranch}) { |
69 |
if ($messages->{Wrongbranch}) { |
| 70 |
$self->destination_loc($messages->{Wrongbranch}->{Rightbranch}); |
70 |
$self->{item}->destination_loc($messages->{Wrongbranch}->{Rightbranch}); |
| 71 |
$self->alert_type('04'); # send to other branch |
71 |
$self->alert_type('04'); # send to other branch |
| 72 |
} |
72 |
} |
| 73 |
if ($messages->{WrongTransfer}) { |
73 |
if ($messages->{WrongTransfer}) { |
| 74 |
$self->destination_loc($messages->{WrongTransfer}); |
74 |
$self->{item}->destination_loc($messages->{WrongTransfer}); |
| 75 |
$self->alert_type('04'); # send to other branch |
75 |
$self->alert_type('04'); # send to other branch |
| 76 |
} |
76 |
} |
| 77 |
if ($messages->{NeedsTransfer}) { |
77 |
if ($messages->{NeedsTransfer}) { |
| 78 |
$self->destination_loc($iteminformation->{homebranch}); |
78 |
$self->{item}->destination_loc($messages->{NeedsTransfer}); |
| 79 |
$self->alert_type('04'); # send to other branch |
79 |
$self->alert_type('04'); # send to other branch |
| 80 |
} |
80 |
} |
| 81 |
if ($messages->{ResFound}) { |
81 |
if ($messages->{ResFound}) { |