mmmh...

Good point - I see, I won't get around some comments* :-(

update:
*comments to where the data comes from, because I think that part is secondary. Now I also know the why :-)

update2:

sub make_lookup {
    my %hash = map { my $hash = $_;
                    join(':', map { $hash->{$_} || "" 
                                } sort(keys(%{$_})) ) => $_ 
                } @_;

    return \%hash;
}

my $lookup = make_lookup(@{GetQueryTable('all_records_for_report', 138
+)});
[download]