sub set_hshAgg {
    my $self;
    my %hshToAgg;

    (
     $self, 
     %hshToAgg
    ) = @_;

    $self->{hshAgg} = \%hshToAgg;
}