Attachment #26725 for bug #12021

View | Details | Raw Unified | Return to bug 12021
Collapse All | Expand All




        $self->alert_type('99');
    }
    if ($messages->{Wrongbranch}) {
        $self->{item}->destination_loc($messages->{Wrongbranch}->{Rightbranch});
        $self->alert_type('04');            # send to other branch
    }
    if ($messages->{WrongTransfer}) {
        $self->{item}->destination_loc($messages->{WrongTransfer});
        $self->alert_type('04');            # send to other branch
    }
    if ($messages->{NeedsTransfer}) {
        $self->{item}->destination_loc($messages->{NeedsTransfer});
        $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 .= Sip::timestamp;
    $resp .= add_field(FID_INST_ID, $inst_id);
- 

Return to bug 12021

Lines 67-81 sub do_checkin { Link Here

(-)a/C4/SIP/ILS/Transaction/Checkin.pm (-3 / +3 lines)
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}) {

Lines 654-667 sub handle_checkin { Link Here

(-)a/C4/SIP/Sip/MsgType.pm (-9 lines)
654	$resp .= 'U';	654	$resp .= 'U';
655	}	655	}
656		656
657	# apparently we can't trust the returns from Checkin yet (because C4::Circulation::AddReturn is faulty)
658	# So we reproduce the alert logic here.
659	if (not $status->alert) {
660	if ($item->destination_loc and $item->destination_loc ne $my_branch) {
661	$status->alert(1);
662	$status->alert_type('04'); # no hold, just send it
663	}
664	}
665	$resp .= $status->alert ? 'Y' : 'N';	657	$resp .= $status->alert ? 'Y' : 'N';
666	$resp .= Sip::timestamp;	658	$resp .= Sip::timestamp;
667	$resp .= add_field(FID_INST_ID, $inst_id);	659	$resp .= add_field(FID_INST_ID, $inst_id);
668	-