sub xlsxcreator_delete_previous_xlsx {

my ($path) = @_ ;

opendir(DIR, "$path") or die "cant open Directory $path: $!\n";

while(defined($folder = readdir(DIR))) {
    if (length $folder > 2) {
        my ($file,$type) = split(/\./,$folder) ;
		
		# if ($match) { unless ($file =~ /$match/gi) { next ; } }
		
		# my ($j1,$j2,$accid,$date) = split(/\-/,$file) ;
		# if ($match) { unless ($accid eq $match) { next ; } }
		
        if (-e "$path/$file.xlsx"){
            unlink ("$path/$file.xlsx") or print "unable to unlink - $path/$file.xlsx : $!";
            }
        }
    }

closedir(DIR) ;

} #------------------------------------------------------------------------------------

sub xlsxcreator_create_xlsx {

my ($file) =  @_;

our $workbook  = Excel::Writer::XLSX->new($file) or die "ERROR : $file : $!";

} #------------------------------------------------------------------------------------------

sub xlsxcreator_close_xlsx {

$workbook->close();

} #------------------------------------------------------------------------------------------

sub xlsxcreator_hide_gridlines_xlsx {

($worksheet_name) =  @_;

$worksheet{$worksheet_name}->hide_gridlines(1);

} #------------------------------------------------------------------------------------------

sub xlsxcreator_set_margins_xlsx {

($worksheet_name,$margin_width) =  @_;

$worksheet{$worksheet_name}->set_margins($margin_width); # Set all margins to the same value in inches

} #------------------------------------------------------------------------------------------

sub xlsxcreator_add_worksheet {

my ($worksheet_name) =  @_;

$worksheet{$worksheet_name} = $workbook->add_worksheet($worksheet_name);

#$worksheet{$worksheet_name}->add_write_handler(qr[\w], \&xlsxcreator_store_string_widths);

} #------------------------------------------------------------------------------------------

sub xlsxcreator_add_pie_chart {

my ($worksheet_name) =  @_;

$chart{$worksheet_name} = $workbook->add_chart( type => 'pie', embedded => 1 );

} #------------------------------------------------------------------------------------------

sub xlsxcreator_merge_xlsx {

my ($worksheet_name,$merge_range,$token,$format) = @_ ;

$worksheet{$worksheet_name}->merge_range($merge_range,$token,$format) ;

} #------------------------------------------------------------------------------------------

sub xlsxcreator_write_xlsx {

my ($worksheet_name,$row,$col,$token,$cellformat) = @_;

$token =~ s/\,//g;

$worksheet{$worksheet_name}->write($row,$col,$token,$cellformat);

#&xlsxcreator_autofit_columns($worksheet{$worksheet_name});

} #------------------------------------------------------------------------------------------

sub xlsxcreator_write_formula {

my ($worksheet_name,$row,$col,$formula,$cellformat) = @_;

$worksheet{$worksheet_name}->write_formula($row,$col,$formula,$cellformat);

} #------------------------------------------------------------------------------------------

sub xlsxcreator_freeze_panes {

my ($worksheet_name,$rows,$cols) = @_;

$worksheet{$worksheet_name}->freeze_panes($rows,$cols); # Freeze the first 5 rows

} #------------------------------------------------------------------------------------------

sub xlsxcreator_insert_image {

my ($worksheet_name,$row,$col,$file,$margin_right,$margin_bottom,$width_scale,$height_scale) = @_;

$height_scale = $width_scale if $width_scale & !$height_scale ;

$worksheet{$worksheet_name}->insert_image($row,$col,$file,$margin_right,$margin_bottom,$width_scale,$height_scale) ;

} #------------------------------------------------------------------------------------------

sub xlsxcreator_write_url {

	my ($worksheet_name,$row,$col,$url,$name) = @_;

	$worksheet{$worksheet_name}->write_url($row, $col, $url,$name, undef, 'URL') ; 

} #------------------------------------------------------------------------------------------

sub xlsxcreator_xlsx_format {

$format1 = $workbook->add_format();
$format1->set_font('Verdana');
$format1->set_size(8);

$format2 = $workbook->add_format();
$format2->copy($format1);
$format2->set_bold();  # Turns bold on
$format2->set_num_format('#,##0.00'); # 1,234.56

$format3 = $workbook->add_format();
$format3->copy($format1);
$format3->set_num_format('#,##0.00'); # 1,234.56

$format4 = $workbook->add_format();
$format4->copy($format1);
$format4->set_bold();  # Turns bold on
$format4->set_num_format('#,##0.00'); # 1,234.56
$format4->set_top('6');
$format4->set_bottom('6');

$format5 = $workbook->add_format();
$format5->copy($format1);
$format5->set_underline();   # Single underline

$format6 = $workbook->add_format();
$format6->copy($format1);
$format6->set_underline();   # Single underline
$format6->set_align('right');

$format7 = $workbook->add_format();
$format7->copy($format1);
$format7->set_align('right');
$format7->set_num_format('#,##0.00'); # 1,234.56

$format8 = $workbook->add_format();
$format8->copy($format1);
$format8->set_bold();  # Turns bold on
$format8->set_align('left');
$format8->set_num_format('#,##0.00'); # 1,234.56

$format9 = $workbook->add_format();
$format9->copy($format1);
$format9->set_bold();  # Turns bold on
$format9->set_align('right');
$format9->set_num_format('#,##0.00'); # 1,234.56

$format10 = $workbook->add_format();
$format10->copy($format1);
$format10->set_align('left');

$format11 = $workbook->add_format();
$format11->copy($format1);
$format11->set_align('center');
$format11->set_bg_color(0x16); #0x08 = 'black' ; #0x0C = 'blue' ; #0x10 = 'brown' ; #0x0F = 'cyan' ; #0x17 = 'gray' ; #0x11 = 'green' ; #0x0B = 'lime' ; #0x0E = 'magenta' ; #0x12 = 'navy' ; #0x35 = 'orange' ; #0x21 = 'pink' ; #0x14 = 'purple' ; #0x0A = 'red' ; #0x16 = 'silver' ; #0x09 = 'white' ; #0x0D = 'yellow' ;
$format11->set_top('1');
$format11->set_bottom('1');
$format11->set_left('1');
$format11->set_right('1');

$format12 = $workbook->add_format();
$format12->set_bg_color(0x16);
$format12->set_top('1');
$format12->set_bottom('1');
$format12->set_left('1');
$format12->set_right('1');

$format13 = $workbook->add_format();
$format13->copy($format1);
$format13->set_bg_color(0x16);
$format13->set_num_format('#,##0.00'); # 1,234.56
$format13->set_top('1');
$format13->set_bottom('1');
$format13->set_left('1');
$format13->set_right('1');

$format14 = $workbook->add_format();
$format14->copy($format1);
$format14->set_bold();  # Turns bold on
$format14->set_bg_color(0x16);
$format14->set_top('1');
$format14->set_bottom('1');
$format14->set_left('1');
$format14->set_right('1');

$format15 = $workbook->add_format();
$format15->copy($format1);
$format15->set_align('right');
$format15->set_num_format('#,##0.00'); # 1,234.56
$format15->set_top('1');
$format15->set_bottom('1');
$format15->set_left('1');
$format15->set_right('1');

$format16 = $workbook->add_format();
$format16->copy($format1);
$format16->set_bg_color(0x16);
$format16->set_num_format('#,##0.0000'); # 1,234.56
$format16->set_top('1');
$format16->set_bottom('1');
$format16->set_left('1');
$format16->set_right('1');

$format17 = $workbook->add_format();
$format17->copy($format1);
$format17->set_align('right');
$format17->set_bg_color(0x16);
$format17->set_num_format('#,##0.00'); # 1,234.56
$format17->set_top('1');
$format17->set_bottom('1');
$format17->set_left('1');
$format17->set_right('1');

$format18 = $workbook->add_format();
$format18->copy($format1);
$format18->set_bold();
$format18->set_align('center');

$format19 = $workbook->add_format();
$format19->copy($format1);
$format19->set_num_format('#,##0.00'); # 1,234.56
$format19->set_top('1');
$format19->set_bottom('6');

$format20 = $workbook->add_format();
$format20->copy($format1);
$format20->set_align('center');
$format20->set_num_format(0x0a); #0.00% (0x09 = 0%)

$format21 = $workbook->add_format();
$format21->copy($format1);
$format21->set_align('right');

$format22 = $workbook->add_format();
$format22->copy($format1);
$format22->set_bold();  # Turns bold on
$format22->set_align('right');
$format22->set_bg_color(0x16);
$format22->set_num_format('#,##0.00'); # 1,234.56

$format23 = $workbook->add_format();
$format23->copy($format1);
$format23->set_bold();  # Turns bold on
$format23->set_color(0x0A); # red

$format24 = $workbook->add_format();
$format24->copy($format1);
$format24->set_top('2');

$format25 = $workbook->add_format();
$format25->copy($format1);
$format25->set_bottom('3');

$format26 = $workbook->add_format();
$format26->copy($format1);
$format26->set_bold();  # Turns bold on
$format26->set_align('left');

$format27 = $workbook->add_format();
$format27->copy($format1);
$format27->set_bold();  # Turns bold on
$format27->set_align('right');

$format28 = $workbook->add_format();
$format28->set_underline(2);   # Single underline

$format29 = $workbook->add_format();
$format29->set_font('Verdana');
$format29->set_size(5);

$format30 = $workbook->add_format();
$format30->set_font('Verdana');
$format30->set_size(7);

$format31 = $workbook->add_format();
$format31->set_font('Verdana');
$format31->set_size(4);
$format31->set_align('right');

$format32 = $workbook->add_format();
$format32->set_font('Verdana');
$format32->set_size(6);

$format33 = $workbook->add_format();
$format33->copy($format10);

$format34 = $workbook->add_format();
$format34->copy($format1);
$format34->set_border(1);

$format35 = $workbook->add_format();
$format35->copy($format10);
$format35->set_text_wrap();
$format35->set_border(1);

my $light_blue   = $workbook->set_custom_color(40,'#D5FFFF');

$format36 = $workbook->add_format();
$format36->copy($format8);
$format36->set_bg_color($light_blue);

$format37 = $workbook->add_format();
$format37->copy($format10);
$format37->set_bg_color($light_blue);

$format38 = $workbook->add_format();
$format38->copy($format1);
$format38->set_align('center');
$format38->set_bg_color($light_blue);

$format39 = $workbook->add_format();
$format39->copy($format1);
$format39->set_bg_color($light_blue);

my $light_grey  = $workbook->set_custom_color(41,'#c6c6c6');

$format40 = $workbook->add_format();
$format40->copy($format1);
$format40->set_align('center');
$format40->set_bg_color($light_grey); 
$format40->set_border(1);

my $very_light_grey  = $workbook->set_custom_color(42,'#EEEEEE');

$format41 = $workbook->add_format();
$format41->copy($format10);
$format41->set_bg_color($very_light_grey); 
$format41->set_border(1);
$format41->set_italic();

# merged
$format42 = $workbook->add_format();
$format42->copy($format40);

$format43 = $workbook->add_format();
$format43->copy($format38);
$format43->set_border(1);

$format44 = $workbook->add_format();
$format44->copy($format41);
$format44->set_bg_color(0x09); 

$format45 = $workbook->add_format();
$format45->set_font('Verdana');
$format45->set_size(10);

my $green  = $workbook->set_custom_color(43,'#00b050');

$format46 = $workbook->add_format();
$format46->set_align('center');
$format46->copy($format45);
$format46->set_bg_color($green); 

my $light_blue_1  = $workbook->set_custom_color(44,'#b8cce4');

$format47 = $workbook->add_format();
$format47->copy($format45);
$format47->set_bg_color($light_blue_1); 
$format47->set_border(1);
$format47->set_border_color(0x09);

my $very_light_blue  = $workbook->set_custom_color(45,'#dce6f1');

$format48 = $workbook->add_format();
$format48->copy($format47);
$format48->set_bg_color($very_light_blue); 

$format49 = $workbook->add_format();
$format49->set_font('Arial');
$format49->set_size(12);
$format49->set_bold(); 

$format50 = $workbook->add_format();
$format50->set_font('Arial');
$format50->set_size(10);
$format50->set_bold(); 

$format51 = $workbook->add_format();
$format51->set_font('Arial');
$format51->set_size(9);

#-------------------------------------------------------- red highlighting

my $hred  = $workbook->set_custom_color(46,'#ff0000');

#40
$format52 = $workbook->add_format();
$format52->copy($format1);
$format52->set_align('center');
$format52->set_bg_color($light_grey); 
$format52->set_border(1);
$format52->set_color($hred); # red

#42
$format53 = $workbook->add_format();
$format53->copy($format52);
$format53->set_color($hred); # red

#35
$format54 = $workbook->add_format();
$format54->copy($format10);
$format54->set_text_wrap();
$format54->set_border(1);
$format54->set_color($hred); # red

#41
$format55 = $workbook->add_format();
$format55->copy($format10);
$format55->set_bg_color($very_light_grey); 
$format55->set_border(1);
$format55->set_italic();
$format55->set_color($hred); # red

#34
$format56 = $workbook->add_format();
$format56->copy($format1);
$format56->set_border(1);
$format56->set_color($hred); # red

#---------------------------------------------------

$format57 = $workbook->add_format();
$format57->copy($format1);
$format57->set_top('1');
$format57->set_bottom('6');
 
$format58 = $workbook->add_format();
$format58->copy($format1);
$format58->set_top('1');
$format58->set_bottom('6');
$format58->set_bold();
$format58->set_align('center');

my $ttl_light_blue  = $workbook->set_custom_color(47,'#DAEEF3');

$format59 = $workbook->add_format();
$format59->copy($format40);
$format59->set_bg_color($ttl_light_blue); 
$format59->set_bold();

$format60 = $workbook->add_format();
$format60->copy($format18);
$format60->set_bg_color($ttl_light_blue); 
$format60->set_border(1);

my $ttl_light_green  = $workbook->set_custom_color(48,'#EBF1DE');

$format61 = $workbook->add_format();
$format61->copy($format40);
$format61->set_bg_color($ttl_light_green); 
$format61->set_bold();

$format62 = $workbook->add_format();
$format62->copy($format18);
$format62->set_bg_color($ttl_light_green); 
$format62->set_border(1);

my $ttl_light_orange  = $workbook->set_custom_color(49,'#FDE9D9');

$format63 = $workbook->add_format();
$format63->copy($format40);
$format63->set_bg_color($ttl_light_orange); 
$format63->set_bold();

$format64 = $workbook->add_format();
$format64->copy($format18);
$format64->set_bg_color($ttl_light_orange); 
$format64->set_border(1);

$format65 = $workbook->add_format();
$format65->copy($format40);
$format65->set_align('vcenter');

$format66 = $workbook->add_format();
$format66->copy($format42);
$format66->set_align('vcenter');

$format67 = $workbook->add_format();
$format67->copy($format19);
$format67->set_bold();

$format68 = $workbook->add_format();
$format68->copy($format49);
$format68->set_bold();
$format68->set_text_wrap() ;
$format68->set_align('vcenter');
$format68->set_align('center');

my $ttl_light_yellow  = $workbook->set_custom_color(50,'#FFFFB7');

$format69 = $workbook->add_format();
$format69->copy($format40);
$format69->set_bg_color($ttl_light_yellow); 
$format69->set_bold();

$format70 = $workbook->add_format();
$format70->copy($format18);
$format70->set_bg_color($ttl_light_yellow); 
$format70->set_border(1);

$format71 = $workbook->add_format();
$format71->copy($format23);
$format71->set_bg_color($ttl_light_yellow); 

$format72 = $workbook->add_format();
$format72->copy($format3);
$format72->set_bg_color($ttl_light_yellow); 

$format73 = $workbook->add_format();
$format73->copy($format1);
$format73->set_bg_color($ttl_light_yellow); 

$format74 = $workbook->add_format();
$format74->copy($format69);
$format74->set_bold();
$format74->set_text_wrap() ;
$format74->set_align('vcenter');
$format74->set_align('center');

$format75 = $workbook->add_format();
$format75->copy($format40);
$format75->set_bold();
$format75->set_text_wrap() ;
$format75->set_align('vcenter');
$format75->set_align('center');

$format76 = $workbook->add_format();
$format76->copy($format1);
$format76->set_text_wrap() ;
# $format76->set_bold();
$format76->set_align('right');

our $format_event_heading  = $workbook -> add_format() ; 
$format_event_heading -> set_size(20) ;
$format_event_heading -> set_align('center') ;
$format_event_heading -> set_valign('vcenter') ; 
$format_event_heading -> set_bottom('2') ;
$format_event_heading -> set_bold()  ;

our $format_event_heading_2 = $workbook -> add_format() ; 
$format_event_heading_2 -> set_size(12) ;
$format_event_heading_2 -> set_align('center') ;
$format_event_heading_2 -> set_valign('vcenter') ; 
$format_event_heading_2 -> set_bottom('2') ;
$format_event_heading_2 -> set_underline() ;
$format_event_heading_2 -> set_bold() ;

our $format_event_data  = $workbook -> add_format() ; 
$format_event_data -> set_size(11) ;
$format_event_data -> set_align('center') ;
$format_event_data -> set_valign('vcenter') ; 

our $format_event_data_2  = $workbook -> add_format() ; 
$format_event_data_2 -> copy($format_event_data) ;
$format_event_data_2 -> set_bottom('1') ;

our $format_empty_row  = $workbook -> add_format() ; 
$format_empty_row -> set_bottom('1') ;

our $format_management_report_totals = $workbook -> add_format() ; 
$format_management_report_totals -> set_size(11) ;
$format_management_report_totals -> set_align('center') ; 
$format_management_report_totals -> set_valign('vcenter') ;
$format_management_report_totals -> set_top(6) ;
$format_management_report_totals -> set_num_format('#,##0.00');
$format_management_report_totals -> set_bold() ;

our $format_management_report_totals_2 = $workbook -> add_format() ; 
$format_management_report_totals_2 -> copy($format_management_report_totals);
$format_management_report_totals_2 -> set_num_format('#,##0');

our $format_management_report_total = $workbook -> add_format() ; 
$format_management_report_total -> set_size(11) ;
$format_management_report_total -> set_bold() ;
$format_management_report_total -> set_align('right') ;
$format_management_report_total -> set_valign('vcenter') ;

our $format_management_report_data = $workbook -> add_format() ; 
$format_management_report_data -> set_size(10) ; 
$format_management_report_data -> set_num_format('#,##0.00');
$format_management_report_data -> set_align('center') ; 
$format_management_report_data -> set_valign('vcenter') ; 

our $format_management_report_data_ref_nr = $workbook -> add_format() ; 
$format_management_report_data_ref_nr -> set_size(10) ; 
$format_management_report_data_ref_nr -> set_align('center') ; 
$format_management_report_data_ref_nr -> set_valign('vcenter') ;

our $format_management_report_months= $workbook -> add_format() ; 
$format_management_report_months -> set_size(10) ; 
$format_management_report_months -> set_align('right') ; 
$format_management_report_months -> set_valign('vcenter') ; 

our $format_management_report_months_2 = $workbook -> add_format() ; 
$format_management_report_months_2 -> set_size(10) ; 
$format_management_report_months_2 -> set_align('left') ; 
$format_management_report_months_2 -> set_valign('vcenter') ;



our $format_management_report_headings = $workbook -> add_format() ; 
$format_management_report_headings -> set_size(11) ;
$format_management_report_headings -> set_align('center') ; 
$format_management_report_headings ->  set_valign('vcenter') ;
$format_management_report_headings -> set_bold() ; 
$format_management_report_headings -> set_border(1) ;  
$format_management_report_headings -> set_bg_color('#B6D7A8') ;  
$format_management_report_headings -> set_text_wrap() ;   

our $format_management_report_title = $workbook -> add_format() ; 
$format_management_report_title -> set_bold() ; 
$format_management_report_title -> set_size(16) ;
$format_management_report_title -> set_align('left') ; 
$format_management_report_title ->  set_valign('vcenter') ;

my $light_blue_bg				= $workbook	-> set_custom_color(51,'#51CBF2');
$format77					= $workbook -> add_format() ; 
$format77 						-> copy($format_event_data) ;
$format77 						-> set_bottom('1') ;
$format77 						-> set_left('1') ;
$format77 						-> set_right('1') ;
$format77 						-> set_bg_color($light_blue_bg) ;

my $yellow_bg					= $workbook	-> set_custom_color(52,'#F6E305');		
$format78 					= $workbook -> add_format() ; 	
$format78						-> copy($format77) ;
$format78						-> set_bg_color($yellow_bg) ;

my $green_bg					= $workbook	-> set_custom_color(53,'#51B529');
$format80					= $workbook -> add_format() ; 
$format80						-> copy($format77) ;	
$format80						-> set_bg_color($green_bg) ;

my $orange_bg					= $workbook	-> set_custom_color(54,'#F4BC14');
$format79					= $workbook -> add_format() ; 
$format79						-> copy($format77) ;
$format79						-> set_bg_color($orange_bg) ;

my $red_bg						= $workbook	-> set_custom_color(55,'#F90D0D');
$format81					= $workbook -> add_format() ; 
$format81						-> copy($format77) ;	
$format81						-> set_bg_color($red_bg) ;

$format82 = $workbook -> add_format() ; 
$format82 -> copy($format_event_data) ;
$format82 -> set_align('left') ;

my $slight_green = $workbook	-> set_custom_color(56,'#E4EDD8');

# $format_management_report_headings -> set_bg_color($slight_green) ; 

$format83 = $workbook -> add_format() ; 
$format83 -> set_bg_color($slight_green) ;
$format83 -> set_bottom('1') ;
$format83 -> set_right('1') ;
$format83 -> set_bold() ; 
$format83 -> set_size(12) ;
$format83 -> set_align('left') ; 
$format83 -> set_valign('vcenter') ;

$format84 = $workbook -> add_format() ; 
$format84 -> set_bottom('1') ;
$format84 -> set_right('1') ;
$format84 -> set_size(10) ;
$format84 -> set_align('left') ; 
$format84 -> set_valign('vcenter') ;

$format85 = $workbook -> add_format() ; 
$format85 -> copy($format84) ;
$format85 -> set_align('right') ; 

$format86 = $workbook -> add_format() ; 
$format86 -> copy($format85) ;

$format87 = $workbook -> add_format() ; 
$format87 -> copy($format85) ;

my $dark_green_font = $workbook -> set_custom_color(57,'#2D6F4B');
# my $light_green_bg = $workbook -> set_custom_color(58,'#D5EDBB');
my $light_green_bg = $workbook -> set_custom_color(58,'#51B529');

my $dark_blue_font = $workbook -> set_custom_color(59,'#1D4D7E');
# my $light_blue_bg = $workbook -> set_custom_color(60,'#C0E0F5');
my $light_blue_bg = $workbook -> set_custom_color(60,'#FFA500');


# my $dark_reb_bg = $workbook -> set_custom_color(61,'#AD0502');
my $dark_reb_bg = $workbook -> set_custom_color(61,'#F90D0D');
my $light_red_font = $workbook -> set_custom_color(62,'#E1B5B4'); 

my $light_grey_bg = $workbook -> set_custom_color(63,'#E9EAEC'); 

# my $pubple_border_color = $workbook -> set_custom_color(64,'#8B1D5F');


# my $dark_green_font = $workbook -> set_custom_color(57,'#2D6F4B');
# my $light_green_bg = $workbook -> set_custom_color(58,'#D5EDBB');
# my $dark_blue_font = $workbook -> set_custom_color(59,'#1D4D7E');
# my $light_blue_bg = $workbook -> set_custom_color(60,'#C0E0F5');
# my $dark_reb_bg = $workbook -> set_custom_color(61,'#AD0502');
# my $light_red_font = $workbook -> set_custom_color(62,'#E1B5B4'); 
# my $light_grey_bg = $workbook -> set_custom_color(63,'#E9EAEC'); 
# my $pubple_border_color = $workbook -> set_custom_color(64,'#8B1D5F');



$format88 = $workbook -> add_format() ; 
$format88 -> copy($format84) ;
$format88 -> set_bg_color($light_green_bg) ; 
# $format88 -> set_custom_color('#2D6F4B') ;

$format89 = $workbook -> add_format() ; 
$format89 -> copy($format84) ;
$format89 -> set_bg_color($light_blue_bg) ; 

$format90 = $workbook -> add_format() ; 
$format90 -> copy($format84) ;
$format90 -> set_bg_color($dark_reb_bg) ; 

$format91 = $workbook -> add_format() ; 
$format91 -> copy($format84) ;
$format91 -> set_bg_color($light_grey_bg) ;

$format92 = $workbook -> add_format() ; 
$format92 -> copy($format84) ;
$format92 -> set_border(1);

my $lgreen_heading_bg = $workbook -> set_custom_color(64,'#E2EEDA'); 

$format93 = $workbook -> add_format() ; 
$format93 -> copy($format84) ;
$format93 -> set_top('1') ;
$format93 -> set_bold() ;
$format93 -> set_size(12) ;
$format93 -> set_bg_color($light_green_bg) ;
 
# my $green_bg	= $workbook -> set_custom_color(65,'#009624'); 
# my $yellow_bg 	= $workbook -> set_custom_color(66,'#FFF000'); 
# my $red_bg 		= $workbook -> set_custom_color(67,'#AD0502'); 

$format94 = $workbook -> add_format() ; 
$format94 -> copy($format84) ;
$format94 -> set_bg_color($green_bg) ;

$format95 = $workbook -> add_format() ; 
$format95 -> copy($format84) ;
$format95 -> set_bg_color($yellow_bg) ;

$format96 = $workbook -> add_format() ; 
$format96 -> copy($format84) ;
$format96 -> set_bg_color($red_bg) ;

$format97 = $workbook -> add_format() ; 
$format97 -> copy($format84) ;
$format97 -> set_top(6) ;
$format97 -> set_bottom(6) ;
$format97 -> set_italic() ;

$format98 = $workbook->add_format() ;
$format98 -> copy($format8) ;
$format98 -> set_align('vcenter') ;
 
$format99 = $workbook->add_format();
$format99 -> copy($format7);
$format99 -> set_num_format('#,##0'); # 1,234.56

$format100 = $workbook->add_format();
$format100 -> copy($format_management_report_headings);
$format100 -> set_bg_color('#FFFF00') ;  

$format101 = $workbook -> add_format();
$format101 -> copy($format_management_report_headings);
$format101 -> set_bg_color('#F9CB9C') ;  

# my $purple_bg	= $workbook	-> set_custom_color(66,'#CA0AD3');
$format102	= $workbook -> add_format() ; 
$format102	-> copy($format77) ;	
$format102	-> set_bg_color('#CA0AD3') ;

$format103	= $workbook -> add_format() ; 
$format103	-> copy($format77) ;	
$format103	-> set_bg_color('#164473') ;

$format104	= $workbook -> add_format() ; 
$format104	-> copy($format77) ;	
$format104	-> set_bg_color('#A349A4') ;

$format105	= $workbook -> add_format() ; 
$format105	-> copy($format77) ;	
$format105	-> set_bg_color('#5D09D3') ;

$format106	= $workbook -> add_format() ; 
$format106	-> copy($format77) ;	
$format106	-> set_bg_color('#5D092C') ;

$format107	= $workbook -> add_format() ; #ANALYTICS EVENT
$format107	-> copy($format77) ;	
$format107	-> set_bg_color('#A05000') ;

$format108	= $workbook -> add_format() ; #DEMO EVENT
$format108	-> copy($format77) ;	
$format108	-> set_bg_color('#FF40FF') ;

$format109 = $workbook->add_format() ;
$format109 -> copy($format1) ;
$format109 -> set_bold() ;
$format109 -> set_size(12) ; 

$format110 = $workbook->add_format() ;
$format110 -> copy($format1) ;
$format110 -> set_bold() ;
$format110 -> set_size(10) ; 
$format110 -> set_bg_color('#DEECFF') ; #blue
$format110 -> set_color('#037AFE') ; #blue

$format111 = $workbook->add_format() ;
$format111 -> copy($format110) ;
$format111 -> set_bg_color('#FFE1E6') ; #red 
$format111 -> set_color('#FE2D55') ; #red 

$format112 = $workbook->add_format() ;
$format112 -> copy($format110) ;
$format112 -> set_bg_color('#E3F8F6') ; #lightbluie
$format112 -> set_color('#00C8BE') ; #lightbluie

$format113 = $workbook->add_format() ;
$format113 -> copy($format110) ;
$format113 -> set_bg_color('#FFF0E0') ; #orange
$format113 -> set_color('#FF9502') ; #orange
$format113 -> set_size(8) ;

$format114 = $workbook->add_format() ;
$format114 -> copy($format113) ;
$format114 -> set_bold('0') ;

$format115 = $workbook->add_format() ;
$format115 -> copy($format1) ;
$format115 -> set_bold() ;
# FF9502
$format116 = $workbook->add_format() ;
$format116 -> copy($format113) ;
$format116 -> set_bold() ;
$format116 -> set_size(10) ;

$format117 = $workbook->add_format() ;
$format117 -> copy($format1) ;
$format117 -> set_bold() ;
$format117 -> set_size(12) ;

$format118 = $workbook->add_format() ;
$format118 -> copy($format117) ; 
$format118 -> set_size(10) ;

$format119 = $workbook->add_format() ;
$format119 -> copy($format1) ; 
$format119 -> set_size(10) ;
$format119 -> set_top(1) ;
$format119 -> set_bottom(6) ;
$format119 -> set_num_format('#,##0.00');

$format120 = $workbook->add_format() ;
$format120 -> copy($format1) ; 
$format120 -> set_size(8) ;
$format120 -> set_num_format('#,##0.00');

$format121 = $workbook->add_format() ;
$format121 -> copy($format1) ; 
$format121 -> set_bottom(1) ; 

$format122 = $workbook->add_format() ;
$format122 -> copy($format1) ; 
$format122 -> set_left(1) ; 

# my $other_green = $workbook	-> set_custom_color(100,'#B6D7A8');

# $format_management_report_headings -> set_bg_color($lgreen_heading_bg) ; 


# $format92 -> set_border_color(0x0A) ;
# $format92 -> set_border_color($pubple_border_color) ;

# set_font_strikethrough
# $format86 -> strikeout('1');

# $format87 = $workbook -> add_format() ; 
# $format87 -> set_bottom('1') ;
# $format87 -> set_right('1') ;
# $format87 -> set_size(10) ;
# $format87 -> set_align('right') ; 
# $format87 -> set_valign('vcenter') ;
# $format87 -> set_font_strikethrough('1');

} #------------------------------------------------------------------------------------------

sub xlsxcreator_set_column_width {

my ($worksheet_name,$from,$to,$width) = @_;

$worksheet{$worksheet_name}->set_column("$from".":"."$to", $width);

} #------------------------------------------------------------------------------------------

sub xlsxcreator_autofit_columns {

my $worksheet = shift;
my $col       = 0;

for my $width (@{$worksheet->{__col_widths}}) {

	$worksheet->set_column($col, $col, $width) if $width;
	$col++;
	}

} #------------------------------------------------------------------------------------------

# The following function is a callback that was added via add_write_handler()
# above. It modifies the write() function so that it stores the maximum
# unwrapped width of a string in a column.

sub xlsxcreator_store_string_widths {

    my $worksheet = shift;
    my $col       = $_[1];
    my $token     = $_[2];

    # Ignore some tokens that we aren't interested in.
    return if not defined $token;       # Ignore undefs.
    return if $token eq '';             # Ignore blank cells.
    return if ref $token eq 'ARRAY';    # Ignore array refs.
    return if $token =~ /^=/;           # Ignore formula

    # Ignore numbers
    #return if $token =~ /^([+-]?)(?=\d|\.\d)\d*(\.\d*)?([Ee]([+-]?\d+))?$/;

    # Ignore various internal and external hyperlinks. In a real scenario
    # you may wish to track the length of the optional strings used with
    # urls.
    return if $token =~ m{^[fh]tt?ps?://};
    return if $token =~ m{^mailto:};
    return if $token =~ m{^(?:in|ex)ternal:};

    # We store the string width as data in the Worksheet object. We use
    # a double underscore key name to avoid conflicts with future names.
    #
    my $old_width    = $worksheet->{__col_widths}->[$col];
    my $string_width = xlsxcreator_string_width($token);

    if (not defined $old_width or $string_width > $old_width) {
        # You may wish to set a minimum column width as follows.
        #return undef if $string_width < 10;

        $worksheet->{__col_widths}->[$col] = $string_width;
    }


    # Return control to write();
    return undef;
} #------------------------------------------------------------------------------------------

# Very simple conversion between string length and string width for Arial 10.
# See below for a more sophisticated method.

sub xlsxcreator_string_width {

return 1.2 * length $_[0];

} #------------------------------------------------------------------------------------------

1;