[Astpp-commit] SF.net SVN: astpp: [2176] trunk/astpp-common.pl

[<dar...@us...>]

Revision: 2176
          http://astpp.svn.sourceforge.net/astpp/?rev=2176&view=rev
Author:   darrenkw
Date:     2008-05-03 15:07:56 -0700 (Sat, 03 May 2008)

Log Message:
-----------
Resolved Bug [ 1956259 ] Incorrect uniqueid shown in output

Modified Paths:
--------------
    trunk/astpp-common.pl

Modified: trunk/astpp-common.pl
===================================================================
--- trunk/astpp-common.pl	2008-05-03 22:03:34 UTC (rev 2175)
+++ trunk/astpp-common.pl	2008-05-03 22:07:56 UTC (rev 2176)
@@ -3899,7 +3899,7 @@
 	my ( $status, $cdrinfo);
 	foreach (@$chargelist) {
 		my $uniqueid = $_;
-		print STDERR gettext("Processing Uniqueid: ") . @$chargelist;
+		print STDERR gettext("Processing Uniqueid: ") . $uniqueid . "\n";
 		$cdrinfo  = ($vars) ? $vars : &get_cdr( $config, $cdr_db, $uniqueid );
 		my $savedcdrinfo = $cdrinfo;
 		if(!$vars) {
@@ -3926,7 +3926,7 @@
 					print STDERR "\n----------------------\n";
 					print STDERR "CDR Written - No Billable Seconds\n";
 					print STDERR
-						"uniqueid $uniqueid, cardno $cdrinfo->{accountcode}, phoneno $cdrinfo->{dst}\n";
+						"uniqueid $cdrinfo->{uniqueid}, cardno $cdrinfo->{accountcode}, phoneno $cdrinfo->{dst}\n";
 					print STDERR "disposition $cdrinfo->{disposition}\n";
 					print STDERR "----------------------\n";
 				}
@@ -3988,7 +3988,7 @@
 			print STDERR "ERROR - ERROR - ERROR - ERROR - ERROR \n";
 			print STDERR "NO ACCOUNTCODE IN DATABASE\n";
 			print STDERR
-				"uniqueid: $uniqueid, cardno: $cdrinfo->{accountcode}, phoneno: $cdrinfo->{dst}\n";
+				"uniqueid: $cdrinfo->{uniqueid}, cardno: $cdrinfo->{accountcode}, phoneno: $cdrinfo->{dst}\n";
 			print STDERR "disposition: $cdrinfo->{disposition}\n";
 			print STDERR "----------------------\n";
 			if(!$vars) {


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.