#!/usr/bin/perl

#use utf8;
use strict;
use CGI;

use Opals::Context;
use Date::Calc::Object qw(
    :all
);
use Time::localtime;

use Opals::Template qw(
    tmpl_read
    tmpl_write
    tmpl_preference
    tmpl_redirect
);
use Opals::Locale qw(
    loc_getMsgFile
    loc_write
);

use Opals::Date qw(

);

################################################################################
my $dbh = Opals::Context->dbh();
END { $dbh->disconnect(); }

my $cgi = CGI->new;
my $input = $cgi->Vars();
my ($permission, $cookie, $template) = tmpl_read(
        {
            dbh             => $dbh,
            cgi             => $cgi,
            tmplFile        => 'txtbk/circ/loan.tmpl',
            reqPermission   => 'tb_circ_loan',
        }
);
my $syspref          = tmpl_preference($dbh);
my $circulationSound = $syspref->{'circulationSound'};
my $loginuid         = $template->param('curUserId');

my @cookieList = (@$cookie);
my $tm = localtime;
my $todayStr = sprintf("%04d-%02d-%02d", $tm->year+1900, ($tm->mon)+1, $tm->mday);
my $dFirst = Opals::Context->preference('dateFirst');
my $dLast  = Opals::Context->preference('dateLast');


if ($permission && $permission->{'tb_circ_loan'}) 
{   
    $template->param(
                 circulation => 1,
                 circulationSound => $circulationSound,
                 loan        => 1);

         
}#if ($permission && $permission->{'tb_circ_loan'})

my $qeMsgMap            =loc_getMsgFile('circ/quickItemAjaxFrm.msg');
my $userqeMsgMap        =loc_getMsgFile('circ/quickUserAjaxFrm.msg');
my $userSelPanMsgMap    =loc_getMsgFile('circ/userSelPan.msg');
my $finePanMsgMap       =loc_getMsgFile('circ/fine.msg');
my $confirmMsgMap       =loc_getMsgFile('circ/confirmDlg.msg');

loc_write($template,$qeMsgMap);
loc_write($template,$userqeMsgMap);
loc_write($template,$userSelPanMsgMap);
loc_write($template,$finePanMsgMap);
loc_write($template,$confirmMsgMap);

tmpl_write($dbh, $cgi, \@cookieList, $template);


################################################################################