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

(-)a/Koha/ILL/Backend/Standard.pm (-3 / +14 lines)
Lines 977-988 sub add_request { Link Here
977
977
978
    my ( $self, $params ) = @_;
978
    my ( $self, $params ) = @_;
979
979
980
    my $unauthenticated_request =
981
        C4::Context->preference("ILLOpacUnauthenticatedRequest") && !$params->{other}->{'cardnumber'};
982
980
    # ...Populate Illrequestattributes
983
    # ...Populate Illrequestattributes
981
    # generate $request_details
984
    # generate $request_details
982
    my $request_details = _get_request_details( $params, $params->{other} );
985
    my $request_details = _get_request_details( $params, $params->{other} );
983
986
984
    my ( $brw_count, $brw ) =
987
    my ( $brw_count, $brw ) =
985
        _validate_borrower( $params->{other}->{'cardnumber'} );
988
        _validate_borrower( $params->{other}->{'cardnumber'} ) unless $unauthenticated_request;
986
989
987
    ## Create request
990
    ## Create request
988
991
Lines 992-998 sub add_request { Link Here
992
    # ...Populate Illrequest
995
    # ...Populate Illrequest
993
    my $request = $params->{request};
996
    my $request = $params->{request};
994
    $request->biblio_id($biblionumber) unless $biblionumber == 0;
997
    $request->biblio_id($biblionumber) unless $biblionumber == 0;
995
    $request->borrowernumber( $brw->borrowernumber );
998
    $request->borrowernumber( $brw ? $brw->borrowernumber : undef );
996
    $request->branchcode( $params->{other}->{branchcode} );
999
    $request->branchcode( $params->{other}->{branchcode} );
997
    $request->status( $unauthenticated_request ? 'UNAUTH' : 'NEW');
1000
    $request->status( $unauthenticated_request ? 'UNAUTH' : 'NEW');
998
    $request->backend( $params->{other}->{backend} );
1001
    $request->backend( $params->{other}->{backend} );
Lines 1017-1022 sub add_request { Link Here
1017
        }
1020
        }
1018
    }
1021
    }
1019
1022
1023
    if ($unauthenticated_request) {
1024
        my $unauthenticated_notes_text =
1025
              "Unauthenticated request.\nFirst name: $params->{other}->{'unauthenticated_first_name'}"
1026
            . ".\nLast name: $params->{other}->{'unauthenticated_last_name'}."
1027
            . "\nEmail: $params->{other}->{'unauthenticated_email'}.";
1028
        $request->append_to_note($unauthenticated_notes_text);
1029
        $request->notesopac($unauthenticated_notes_text)->store;
1030
    }
1031
1020
    return $request;
1032
    return $request;
1021
}
1033
}
1022
1034
1023
- 

Return to bug 36197