8 use C4::Circulation::Circ2;
11 use C4::Interface::CGI::Output;
14 my ($template, $borrowernumber, $cookie)
15 = get_template_and_user({template_name => "opac-readingrecord.tmpl",
19 flagsrequired => {borrow => 1},
23 # get borrower information ....
24 my ($borr, $flags) = getpatroninformation(undef, $borrowernumber);
27 $template->param($borr);
30 my $order=$query->param('order');
33 $order2="date_due desc";
35 my $limit=$query->param('limit');
36 if ($limit eq 'full'){
41 my ($count,$issues)=allissues($borrowernumber,$order2,$limit);
45 foreach my $row (@$issues) {
46 $row->{'even'} = 1 if $num % 2 == 0;
47 $row->{'odd'} = 1 if $num % 2 == 1;
51 $template->param(count => $count);
52 $template->param(READING_RECORD => $issues,
53 LibraryName => C4::Context->preference("LibraryName"),
57 output_html_with_http_headers $query, $cookie, $template->output;