Lines 4263-4269
sub ProcessOfflineOperation {
Link Here
|
4263 |
if ( $operation->{action} eq 'return' ) { |
4263 |
if ( $operation->{action} eq 'return' ) { |
4264 |
$report = ProcessOfflineReturn( $operation ); |
4264 |
$report = ProcessOfflineReturn( $operation ); |
4265 |
} elsif ( $operation->{action} eq 'issue' ) { |
4265 |
} elsif ( $operation->{action} eq 'issue' ) { |
4266 |
$report = ProcessOfflineIssue( $operation ); |
4266 |
( $report ) = ProcessOfflineIssue( $operation ); |
4267 |
} elsif ( $operation->{action} eq 'payment' ) { |
4267 |
} elsif ( $operation->{action} eq 'payment' ) { |
4268 |
$report = ProcessOfflinePayment( $operation ); |
4268 |
$report = ProcessOfflinePayment( $operation ); |
4269 |
} |
4269 |
} |
Lines 4321-4335
sub ProcessOfflineIssue {
Link Here
|
4321 |
$operation->{timestamp}, |
4321 |
$operation->{timestamp}, |
4322 |
); |
4322 |
); |
4323 |
} |
4323 |
} |
4324 |
AddIssue( |
4324 |
my $checkout = AddIssue( |
4325 |
$patron, |
4325 |
$patron, |
4326 |
$operation->{'barcode'}, |
4326 |
$operation->{barcode}, |
4327 |
undef, |
4327 |
$operation->{due_date}, |
4328 |
undef, |
4328 |
undef, |
4329 |
$operation->{timestamp}, |
4329 |
$operation->{timestamp}, |
4330 |
undef, |
4330 |
undef, |
4331 |
); |
4331 |
); |
4332 |
return "Success."; |
4332 |
return ( "Success.", $checkout ); |
4333 |
} else { |
4333 |
} else { |
4334 |
return "Borrower not found."; |
4334 |
return "Borrower not found."; |
4335 |
} |
4335 |
} |