According to Andi, this part also needs to be excluded for unrated CDRs

1.3
Richard Fuchs 15 years ago
parent e54f1886b7
commit 2b03d1a4a0

@ -132,12 +132,15 @@ my @CDR_BODY_FIELDS = qw(id update_time source_user_id source_provider_id source
my @F;
while (my $r = $s->fetchrow_hashref()) {
# finish export to give rate-o-mat time to catch up
last if $r->{rating_status} eq 'unrated' && $EXPORT_UNRATED !~ /y|1|true/i;
unless(defined $r->{carrier_zone}) { # platform internal, no peering cost calculated
$r->{carrier_cost} = '0.00';
$r->{carrier_zone} = 'onnet';
$r->{carrier_destination} = 'platform internal';
if ($r->{rating_status} eq 'unrated') {
last if $EXPORT_UNRATED !~ /y|1|true/i;
}
else {
unless(defined $r->{carrier_zone}) { # platform internal, no peering cost calculated
$r->{carrier_cost} = '0.00';
$r->{carrier_zone} = 'onnet';
$r->{carrier_destination} = 'platform internal';
}
}
$MARKS{lastid} = $r->{id};

Loading…
Cancel
Save