Fixed small issues with outbound AGI script and send url perl script

git-svn-id: svn://192.168.202.10@2223 3d104415-ff17-0410-8863-d5cf3c621b8a
This commit is contained in:
mattf
2014-12-21 13:49:41 +00:00
parent e312774f2d
commit a8d68f78a6
2 changed files with 7 additions and 5 deletions
+2 -1
View File
@@ -17,6 +17,7 @@
# 121120-0925 - Added QM socket-send functionality
# 130402-2307 - Added user_group variable
# 141211-1742 - Added list override for no-agent url
# 141219-1218 - url logging fix for some inputs
#
$|++;
@@ -638,7 +639,7 @@ if (length($lead_id) > 0)
### insert a new url log entry
$SQL_log = "$parse_url";
$SQL_log =~ s/;|\|//gi;
$SQL_log =~ s/;|\||\\//gi;
$stmtA = "INSERT INTO vicidial_url_log SET uniqueid='$uniqueid',url_date='$now_date',url_type='$url_function',url='$SQL_log',url_response='';";
$affected_rows = $dbhA->do($stmtA);
$stmtB = "SELECT LAST_INSERT_ID() LIMIT 1;";