ViciDial/agc_2-X
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Added vdc_script_dispo_example.php script which can be customized to require specific fields be filled in before submitting

Browse Source 
Some docs updates
Some vicidial.php agent screen formatting changes

git-svn-id: svn://192.168.202.10@1598 3d104415-ff17-0410-8863-d5cf3c621b8a
This commit is contained in:
mattf
2011-02-09 02:40:38 +00:00
parent c980a8ec3c
commit 1a1d5ca558
7 changed files with 863 additions and 17 deletions
Download Patch File Download Diff File Expand all files Collapse all files
bin/AST_call_log_export.pl
+20 -1
View File
@@ -13,6 +13,7 @@
#
# CHANGES
# 100310-0112 - First version
# 110202-2214 - Added ncad14csv format
#
$txt = '.txt';
@@ -103,9 +104,10 @@ if (length($ARGV[0])>1)
print " call_date phone_number vendor_id status user first_name last_name lead_id list_id campaign_id length_in_sec source_id\n";
print " pipe-basic:\n";
print " call_date|phone_number|vendor_id|status|user|first_name|last_name|lead_id|list_id|campaign_id|length_in_sec|source_id|\n";
print " ncad14csv:\n";
print " vendor_lead_code,\"source_id\",\"last_name, first_name\",\"phone_number\",\"address2\",\"alt_phone\",\"postal_code\",\"address1\",\"address3\",\"\security_phrase\",\"status\",\"call_date\",\"email\",\"city\"\n";
print "\n";
exit;
}
else
@@ -315,6 +317,8 @@ if ($output_format =~ /^tab-basic$/)
{$DLT = "\t"; $txt='.txt'; if (!$Q) {print "---- tab-basic ----\n";}}
if ($output_format =~ /^pipe-basic$/)
{$DLT = "|"; $txt='.txt'; if (!$Q) {print "---- pipe-basic ----\n";}}
if ($output_format =~ /^ncad14csv$/)
{$DLT = ","; $txt='.csv'; if (!$Q) {print "---- ncad14csv ----\n";}}
if (length($campaignSQL) < 2)
{
@@ -563,6 +567,7 @@ if ($ftp_transfer > 0)
if (!$Q) {print "Sending File Over FTP: $outfile\n";}
$ftp = Net::FTP->new("$VARREPORT_host", Port => $VARREPORT_port, Debug => $DB);
$ftp->login("$VARREPORT_user","$VARREPORT_pass");
# $ftp->cwd("CALL_LOG");
$ftp->cwd("CALL_LOG");
$ftp->put("$PATHweb/vicidial/server_reports/$outfile", "$outfile");
$ftp->quit;
@@ -597,6 +602,20 @@ sub select_format_loop
$str = "$call_date\t$phone_number\t$vendor_id\t$status\t$user\t$first_name\t$last_name\t$lead_id\t$list_id\t$campaign_id\t$length_in_sec\t$source_id\t\n";
}
if ($output_format =~ /^ncad14csv$/)
{
if ($status =~ /^PU$/) {$status='HU';}
if ($status =~ /^PM$/) {$status='BM';}
if ($status =~ /^AL$/) {$status='BM';}
if ($status =~ /^A$/) {$status='AH';}
if ($status =~ /^AA$/) {$status='AH';}
if ($status =~ /^B$/) {$status='BS';}
if ($status =~ /^AB$/) {$status='BS';}
if ($status =~ /^DC$/) {$status='IP';}
$str = "$vendor_lead_code,\"$source_id\",\"$last_name, $first_name\",\"$phone_number\",\"$address2\",\"$alt_phone\",\"$postal_code\",\"$address1\",\"$address3\",\"$security_phrase\",\"$status\",\"$call_date\",\"$email\",\"$city\"\n";
}
$Ealert .= "$str";