use CGI;
use C4::Output;
use C4::Print;
-use C4::Auth;
+use C4::Auth qw/:DEFAULT get_session/;
use C4::Date;
use C4::Branch; # GetBranches
use C4::Koha; # GetPrinter
# update our session so the userenv is updated
my $dbh=C4::Context->dbh;
my $sessionID = $query->cookie("CGISESSID") ;
- my $session = new CGI::Session("driver:MySQL", $sessionID, {Handle=>$dbh});
+ my $session = get_session($sessionID);
$session->param('branch',$branch);
my $branchname = GetBranchName($branch);
$session->param('branchname',$branchname);
# update our session so the userenv is updated
my $dbh=C4::Context->dbh;
my $sessionID = $query->cookie("CGISESSID") ;
- my $session = new CGI::Session("driver:MySQL", $sessionID, {Handle=>$dbh});
+ my $session = get_session($sessionID);
$session->param('branchprinter',$printer);
}
$amountold = $temp[1];
+my $borrowercategory = GetBorrowercategory( $borrower->{'categorycode'} );
+my $category_type = $borrowercategory->{'category_type'};
+( $template->param( adultborrower => 1 ) ) if ( $category_type eq 'A' );
+
$template->param(
issued_itemtypes_count_loop => $issued_itemtypes_loop,
findborrower => $findborrower,
inprocess => $inprocess,
memberofinstution => $member_of_institution,
CGIorganisations => $CGIorganisations,
+ circview => 1,
+
);
# set return date if stickyduedate