@@ -, +, @@ - Apply the patch - Install FreeForm backend (https://github.com/PTFS-Europe/koha-ill-freeform) - Create a request - On the resulting "Manage ILL request" note the display is normal - Create a new file in the FreeForm backend directory: /intra-includes/illview.inc with the following content: [% BLOCK backend_jsinclude %] [% END %] - Restart Plack if enabled - Reload the page --- Koha/Illrequest.pm | 17 +++++++++++++++++ ill/ill-requests.pl | 6 ++++++ .../prog/en/modules/ill/ill-requests.tt | 1 + t/db_dependent/Illrequests.t | 7 ++++++- 4 files changed, 30 insertions(+), 1 deletion(-) --- a/Koha/Illrequest.pm +++ a/Koha/Illrequest.pm @@ -710,6 +710,23 @@ sub mark_completed { }; } +=head2 backend_illview + +View and manage an ILL request + +=cut + +sub backend_illview { + my ( $self, $params ) = @_; + + my $response = $self->_backend_capability('illview',{ + request => $self, + other => $params, + }); + return $self->expandTemplate($response) if $response; + return $response; +} + =head2 backend_migrate Migrate a request from one backend to another. --- a/ill/ill-requests.pl +++ a/ill/ill-requests.pl @@ -97,6 +97,12 @@ if ( $backends_available ) { ( tran_success => $params->{tran_success} ) : () ), ); + my $backend_result = $request->backend_illview($params); + $template->param( + whole => $backend_result, + ) if $backend_result; + + } elsif ( $op eq 'create' ) { # We're in the process of creating a request my $request = Koha::Illrequest->new->load_backend( $params->{backend} ); --- a/koha-tmpl/intranet-tmpl/prog/en/modules/ill/ill-requests.tt +++ a/koha-tmpl/intranet-tmpl/prog/en/modules/ill/ill-requests.tt @@ -484,6 +484,7 @@ [% ELSIF query_type == 'illview' %] + [% PROCESS $whole.template %] [% req_status = request.status %] [% IF error %] --- a/t/db_dependent/Illrequests.t +++ a/t/db_dependent/Illrequests.t @@ -517,7 +517,7 @@ subtest 'Backend testing (mocks)' => sub { subtest 'Backend core methods' => sub { - plan tests => 18; + plan tests => 19; $schema->storage->txn_begin; @@ -655,6 +655,11 @@ subtest 'Backend core methods' => sub { }, "Backend cancel: arbitrary stage."); + # backend_illview + $backend->set_series('illview', { stage => '', method => 'illview' }); + is_deeply($illrq->backend_illview({test => 1}), 0, + "Backend illview optional method."); + # backend_update_status $backend->set_series('update_status', { stage => 'bar', method => 'update_status' }); is_deeply($illrq->backend_update_status({test => 1}), --