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

(-)a/C4/ILSDI/Services.pm (-3 / +5 lines)
Lines 115-121 sub GetAvailability { Link Here
115
    foreach my $id ( split( / /, $cgi->param('id') ) ) {
115
    foreach my $id ( split( / /, $cgi->param('id') ) ) {
116
        if ( $cgi->param('id_type') eq "item" ) {
116
        if ( $cgi->param('id_type') eq "item" ) {
117
            my ( $biblionumber, $status, $msg, $location ) = _availability($id);
117
            my ( $biblionumber, $status, $msg, $location ) = _availability($id);
118
119
            $out .= "  <dlf:record>\n";
118
            $out .= "  <dlf:record>\n";
120
            $out .= "    <dlf:bibliographic id=\"" . ( $biblionumber || $id ) . "\" />\n";
119
            $out .= "    <dlf:bibliographic id=\"" . ( $biblionumber || $id ) . "\" />\n";
121
            $out .= "    <dlf:items>\n";
120
            $out .= "    <dlf:items>\n";
Lines 125-130 sub GetAvailability { Link Here
125
            $out .= "          <dlf:availabilitystatus>" . $status . "</dlf:availabilitystatus>\n";
124
            $out .= "          <dlf:availabilitystatus>" . $status . "</dlf:availabilitystatus>\n";
126
            if ($msg)      { $out .= "          <dlf:availabilitymsg>" . $msg . "</dlf:availabilitymsg>\n"; }
125
            if ($msg)      { $out .= "          <dlf:availabilitymsg>" . $msg . "</dlf:availabilitymsg>\n"; }
127
            if ($location) { $out .= "          <dlf:location>" . $location . "</dlf:location>\n"; }
126
            if ($location) { $out .= "          <dlf:location>" . $location . "</dlf:location>\n"; }
127
            if ($duedate)  { $out .= "          <dlf:dateavailable>" . $duedate . "</dlf:dateavailable>\n"; }
128
            $out .= "        </dlf:simpleavailability>\n";
128
            $out .= "        </dlf:simpleavailability>\n";
129
            $out .= "      </dlf:item>\n";
129
            $out .= "      </dlf:item>\n";
130
            $out .= "    </dlf:items>\n";
130
            $out .= "    </dlf:items>\n";
Lines 782-788 sub _availability { Link Here
782
    if ( $item->{'notforloan'} ) {
782
    if ( $item->{'notforloan'} ) {
783
        return ( $biblionumber, 'not available', 'Not for loan', $location );
783
        return ( $biblionumber, 'not available', 'Not for loan', $location );
784
    } elsif ( $item->{'onloan'} ) {
784
    } elsif ( $item->{'onloan'} ) {
785
        return ( $biblionumber, 'not available', 'Checked out', $location );
785
        return (
786
            $biblionumber, 'not available', 'Checked out',
787
            $location,     $item->{'onloan'}
788
        );
786
    } elsif ( $item->{'itemlost'} ) {
789
    } elsif ( $item->{'itemlost'} ) {
787
        return ( $biblionumber, 'not available', 'Item lost', $location );
790
        return ( $biblionumber, 'not available', 'Item lost', $location );
788
    } elsif ( $item->{'wthdrawn'} ) {
791
    } elsif ( $item->{'wthdrawn'} ) {
789
- 

Return to bug 12469