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

(-)a/Koha/REST/V1/Illrequests.pm (-7 / +15 lines)
Lines 21-26 use Mojo::Base 'Mojolicious::Controller'; Link Here
21
21
22
use Koha::Illrequests;
22
use Koha::Illrequests;
23
use Koha::Libraries;
23
use Koha::Libraries;
24
use Koha::DateUtils qw( format_sqldatetime );
24
25
25
=head1 NAME
26
=head1 NAME
26
27
Lines 40-45 sub list { Link Here
40
    my $args = $c->req->params->to_hash // {};
41
    my $args = $c->req->params->to_hash // {};
41
    my $filter;
42
    my $filter;
42
    my $output = [];
43
    my $output = [];
44
    my @format_dates = ( 'placed', 'updated' );
43
45
44
    # Create a hash where all keys are embedded values
46
    # Create a hash where all keys are embedded values
45
    # Enables easy checking
47
    # Enables easy checking
Lines 54-71 sub list { Link Here
54
        $filter->{$filter_param} = \@values;
56
        $filter->{$filter_param} = \@values;
55
    }
57
    }
56
58
57
    my $requests = Koha::Illrequests->search($filter);
59
    my @req_list = Koha::Illrequests->search($filter)->as_list;
58
60
59
    if ( scalar (keys %embed) )
61
    if ( scalar (keys %embed) )
60
    {
62
    {
61
        # Need to embed stuff
63
        # Need to embed stuff
62
        my @results = map { $_->TO_JSON(\%embed) } $requests->as_list;
64
        @req_list = map { $_->TO_JSON(\%embed) } @req_list;
63
        return $c->render( status => 200, openapi => \@results );
64
    }
65
    }
65
    else
66
66
    {
67
    # Format dates as required
67
        return $c->render( status => 200, openapi => $requests );
68
    foreach(@req_list) {
69
        foreach my $field(@format_dates) {
70
            if (defined $_->{$field}) {
71
                $_->{$field} = format_sqldatetime($_->{$field}, undef, undef, 1);
72
            }
73
        }
74
68
    }
75
    }
76
77
    return $c->render( status => 200, openapi => \@req_list );
69
}
78
}
70
79
71
1;
80
1;
72
- 

Return to bug 20600