use C4::Members::Statistics;

use C4::Members::Statistics;

my $query = CGI->new;

my $query = CGI->new;

my ( $template, $loggedinuser, $cookie ) = get_template_and_user(

my ( $template, $loggedinuser, $cookie ) = get_template_and_user(

    {

    {

use Encode;

use Encode;

use List::MoreUtils qw(any);

use List::MoreUtils qw(any);

sub GetTab {

sub GetTab {

    my ( $input, $tab ) = @_;

    my ( $input, $tab ) = @_;

use C4::Output;

use C4::Output;

use C4::Context;

use C4::Context;

my $query = CGI->new;

my $query = CGI->new;

my ( $template, $loggedinuser, $cookie ) = get_template_and_user(

my ( $template, $loggedinuser, $cookie ) = get_template_and_user(

    {   template_name   => "labels/spinelabel-home.tt",

    {   template_name   => "labels/spinelabel-home.tt",

use C4::Koha;

use C4::Koha;

use Koha::DateUtils;

use Koha::DateUtils;

use vars qw($debug);

use vars qw($debug);

BEGIN {

BEGIN {

use Koha::Patron::Categories;

use Koha::Patron::Categories;

use Koha::Patrons;

use Koha::Patrons;

my $dbh   = C4::Context->dbh;

my $dbh   = C4::Context->dbh;

my $input = CGI->new;

my $input = CGI->new;

use Koha::Subscription::Frequency;

use Koha::Subscription::Frequency;

use Koha::SharedContent;

use Koha::SharedContent;

our $query = CGI->new;

our $query = CGI->new;

my $op = $query->param('op') || '';

my $op = $query->param('op') || '';

my $dbh = C4::Context->dbh;

my $dbh = C4::Context->dbh;