Lines 397-402
my $fa_duedatespec = $input->param('duedatespec');
Link Here
|
397 |
|
397 |
|
398 |
my $frameworkcode = &GetFrameworkCode($biblionumber); |
398 |
my $frameworkcode = &GetFrameworkCode($biblionumber); |
399 |
|
399 |
|
|
|
400 |
# counter for multiple added items to put into template |
401 |
my $num_items_added = 0; |
402 |
|
400 |
# Defining which userflag is needing according to the framework currently used |
403 |
# Defining which userflag is needing according to the framework currently used |
401 |
my $userflags; |
404 |
my $userflags; |
402 |
if (defined $input->param('frameworkcode')) { |
405 |
if (defined $input->param('frameworkcode')) { |
Lines 517-522
if ($op eq "additem") {
Link Here
|
517 |
$cookie = [ $cookie, $itemcookie ]; |
520 |
$cookie = [ $cookie, $itemcookie ]; |
518 |
} |
521 |
} |
519 |
|
522 |
|
|
|
523 |
$num_items_added++; |
520 |
} |
524 |
} |
521 |
$nextop = "additem"; |
525 |
$nextop = "additem"; |
522 |
if ($exist_itemnumber) { |
526 |
if ($exist_itemnumber) { |
Lines 609-614
if ($op eq "additem") {
Link Here
|
609 |
$i++; |
613 |
$i++; |
610 |
# Only increment copynumber if item was really added |
614 |
# Only increment copynumber if item was really added |
611 |
$copynumber++ if ( $copynumber && $copynumber =~ m/^\d+$/ ); |
615 |
$copynumber++ if ( $copynumber && $copynumber =~ m/^\d+$/ ); |
|
|
616 |
|
617 |
$num_items_added++; |
612 |
} |
618 |
} |
613 |
|
619 |
|
614 |
# Preparing the next iteration |
620 |
# Preparing the next iteration |
Lines 857-874
my ($holdingbrtagf,$holdingbrtagsubf) = &GetMarcFromKohaField( "items.holdingbra
Link Here
|
857 |
# First, the existing items for display |
863 |
# First, the existing items for display |
858 |
my @item_value_loop; |
864 |
my @item_value_loop; |
859 |
my @header_value_loop; |
865 |
my @header_value_loop; |
860 |
for my $row ( @big_array ) { |
866 |
|
861 |
my %row_data; |
867 |
if( ! $num_items_added ) { |
862 |
my @item_fields = map +{ field => $_ || '' }, @$row{ sort keys(%witness) }; |
868 |
# do this only if we didn't just added number of items |
863 |
$row_data{item_value} = [ @item_fields ]; |
869 |
# (to make added items POST page for not to load long): |
864 |
$row_data{itemnumber} = $row->{itemnumber}; |
870 |
|
865 |
#reporting this_row values |
871 |
for my $row (@big_array) { |
866 |
$row_data{'nomod'} = $row->{'nomod'}; |
872 |
my %row_data; |
867 |
$row_data{'hostitemflag'} = $row->{'hostitemflag'}; |
873 |
my @item_fields = map +{ field => $_ || '' }, @$row{ sort keys(%witness) }; |
868 |
$row_data{'hostbiblionumber'} = $row->{'hostbiblionumber'}; |
874 |
$row_data{item_value} = [@item_fields]; |
869 |
# $row_data{'countanalytics'} = $row->{'countanalytics'}; |
875 |
$row_data{itemnumber} = $row->{itemnumber}; |
870 |
push(@item_value_loop,\%row_data); |
876 |
#reporting this_row values |
|
|
877 |
$row_data{'nomod'} = $row->{'nomod'}; |
878 |
$row_data{'hostitemflag'} = $row->{'hostitemflag'}; |
879 |
$row_data{'hostbiblionumber'} = $row->{'hostbiblionumber'}; |
880 |
# $row_data{'countanalytics'} = $row->{'countanalytics'}; |
881 |
push( @item_value_loop, \%row_data ); |
882 |
} |
871 |
} |
883 |
} |
|
|
884 |
|
872 |
foreach my $subfield_code (sort keys(%witness)) { |
885 |
foreach my $subfield_code (sort keys(%witness)) { |
873 |
my %header_value; |
886 |
my %header_value; |
874 |
$header_value{header_value} = $witness{$subfield_code}; |
887 |
$header_value{header_value} = $witness{$subfield_code}; |
Lines 946-951
$template->param(
Link Here
|
946 |
biblionumber => $biblionumber, |
959 |
biblionumber => $biblionumber, |
947 |
title => $oldrecord->{title}, |
960 |
title => $oldrecord->{title}, |
948 |
author => $oldrecord->{author}, |
961 |
author => $oldrecord->{author}, |
|
|
962 |
num_items_added => $num_items_added, |
949 |
item_loop => \@item_value_loop, |
963 |
item_loop => \@item_value_loop, |
950 |
item_header_loop => \@header_value_loop, |
964 |
item_header_loop => \@header_value_loop, |
951 |
item => \@loop_data, |
965 |
item => \@loop_data, |