@@ -, +, @@ claim page - create some serials in late. - go on serials/claims.pl. - choose a vendor. - verify that additional fields are displayed in new columns. - try filters on columns. - verify there is no regression on this page. --- C4/Serials.pm | 8 ++ .../prog/en/modules/serials/claims.tt | 105 +++++++------------- serials/claims.pl | 10 ++ 3 files changed, 53 insertions(+), 70 deletions(-) --- a/C4/Serials.pm +++ a/C4/Serials.pm @@ -2046,6 +2046,7 @@ sub GetLateOrMissingIssues { return unless ( $supplierid or $serialid ); my $dbh = C4::Context->dbh; + my $sth; my $byserial = ''; if ($serialid) { @@ -2102,6 +2103,13 @@ sub GetLateOrMissingIssues { $line->{claimdate} = format_date( $line->{claimdate} ); } $line->{"status".$line->{status}} = 1; + + my $additional_field_values = Koha::AdditionalField->fetch_all_values({ + record_id => $line->{subscriptionid}, + tablename => 'subscription' + }); + %$line = ( %$line, additional_fields => $additional_field_values->{$line->{subscriptionid}} ); + push @issuelist, $line; } return @issuelist; --- a/koha-tmpl/intranet-tmpl/prog/en/modules/serials/claims.tt +++ a/koha-tmpl/intranet-tmpl/prog/en/modules/serials/claims.tt @@ -1,6 +1,7 @@ [% USE Branches %] [% INCLUDE 'doc-head-open.inc' %] +[% USE KohaAuthorisedValues %] Koha › Serials › Claims [% INCLUDE 'doc-head-close.inc' %] [% INCLUDE 'calendar.inc' %] @@ -11,15 +12,17 @@