use C4::OAI::Sets;

use C4::OAI::Sets;

use C4::Debug;

use C4::Debug;

use Koha::Authority::Types;

use Koha::Authority::Types;

use Koha::Acquisition::Currencies;

use Koha::Acquisition::Currencies;

use Koha::SearchEngine;

use Koha::SearchEngine;

use Date::Calc qw( Date_to_Days Today);

use Date::Calc qw( Date_to_Days Today);

use C4::Context;

use C4::Context;

use constant ISO_DATE_FORMAT => "%04d-%02d-%02d";

use constant ISO_DATE_FORMAT => "%04d-%02d-%02d";

use Koha;

use Koha;

use JSON;

use JSON;

use HTTP::Request;

use HTTP::Request;

use HTTP::Request::Common;

use HTTP::Request::Common;

use LWP::Authen::Basic;

use LWP::Authen::Basic;

use C4::Context;

use C4::Context;

use C4::Branch; # Can be removed?

use C4::Branch; # Can be removed?

use Koha::DateUtils qw(dt_from_string);

use Koha::DateUtils qw(dt_from_string);

use Koha::Libraries;

use Koha::Libraries;

use DateTime::Format::MySQL;

use DateTime::Format::MySQL;

use YAML;

use YAML;

use C4::Context;

use C4::Context;

use Koha::Database;

use Koha::Database;

sub get_yaml {

sub get_yaml {

    my $yml_path = C4::Context->config('intranetdir') . '/admin/columns_settings.yml';

    my $yml_path = C4::Context->config('intranetdir') . '/admin/columns_settings.yml';

use DateTime::Set;

use DateTime::Set;

use DateTime::Duration;

use DateTime::Duration;

use C4::Context;

use C4::Context;

use Carp;

use Carp;

sub new {

sub new {

use Koha::Biblios;

use Koha::Biblios;

use Koha::BiblioFramework;

use Koha::BiblioFramework;

use Koha::BiblioFrameworks;

use Koha::BiblioFrameworks;

my $input         = new CGI;

my $input         = new CGI;

my $frameworkcode = $input->param('frameworkcode') || q||;

my $frameworkcode = $input->param('frameworkcode') || q||;

use C4::Output;

use C4::Output;

use C4::Context;

use C4::Context;

# retrieve parameters

# retrieve parameters

my $input = new CGI;

my $input = new CGI;

use JSON;

use JSON;

use CGI qw ( -utf8 );

use CGI qw ( -utf8 );

my $query       = CGI->new();

my $query       = CGI->new();

my $report_id   = $query->param('id');

my $report_id   = $query->param('id');

use JSON;

use JSON;

use CGI qw ( -utf8 );

use CGI qw ( -utf8 );

my $query  = CGI->new();

my $query  = CGI->new();

use DateTime;

use DateTime;

use DateTime::Duration;

use DateTime::Duration;

use Koha::DateUtils;

use Koha::DateUtils;

use Module::Load::Conditional qw/check_install/;

use Module::Load::Conditional qw/check_install/;

use MARC::Field;

use MARC::Field;

use C4::Context;

use C4::Context;

use C4::Biblio;

use C4::Biblio;

use Koha::Database;

use Koha::Database;

BEGIN {

BEGIN {

use C4::Auth;

use C4::Auth;

use C4::Output;

use C4::Output;

use C4::Calendar;

use C4::Calendar;

use DateTime;

use DateTime;