[Astpp-commit] SF.net SVN: astpp:[2215] trunk/astpp-common.pl
Brought to you by:
darrenkw
From: <dar...@us...> - 2008-12-03 06:15:00
|
Revision: 2215 http://astpp.svn.sourceforge.net/astpp/?rev=2215&view=rev Author: darrenkw Date: 2008-12-03 06:14:49 +0000 (Wed, 03 Dec 2008) Log Message: ----------- Fixed Thirdlane DID billing code. Modified Paths: -------------- trunk/astpp-common.pl Modified: trunk/astpp-common.pl =================================================================== --- trunk/astpp-common.pl 2008-12-02 03:35:36 UTC (rev 2214) +++ trunk/astpp-common.pl 2008-12-03 06:14:49 UTC (rev 2215) @@ -4128,6 +4128,17 @@ # $cdrinfo->{'cost'} = 'rating'; # } if ( $cdrinfo->{accountcode} ) { + if ($config->{thirdlane_mods} == 1 && $cdrinfo->{accountcode} =~ m/.\d\d\d-IN/) { + print STDERR "Call belongs to a Thirdlane(tm) DID.\n"; + my ($did,$record); + ($did = $cdrinfo->{accountcode}) =~ s/-IN//g; + print STDERR "DID: $did \n"; + $record = &get_did($astpp_db,$did); + $cdrinfo->{userfield} = $cdrinfo->{accountcode}; + $cdrinfo->{accountcode} = $record->{account}; + $cdrinfo->{dst} = $did; + } + my $carddata = &get_account( $astpp_db, $cdrinfo->{accountcode} ); if ($carddata->{number}) { if ( $cdrinfo->{lastapp} eq "MeetMe" ) { # There is an issue with calls that come out of meetmee This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. |