diff --git a/UPGRADE b/UPGRADE
index a1e5b213..26b33134 100644
--- a/UPGRADE
+++ b/UPGRADE
@@ -12,6 +12,15 @@ NOTE: Upgrading from 1.1.12-3 to 2.0.1 is at the bottom
 	then make sure you back them up before running the install.pl script. 
 	This script will replace existing files in the astguiclient installation.
 
+2. upgrade the MySQL asterisk database:
+	mysql
+	use asterisk
+	\. /path/from/root/extras/upgrade_2.0.4.sql
+	quit
+
+3. add the "server_reports" directory to your Web Path:
+	mkdir $PATHweb/vicidial/server_reports/
+	chmod 0777 $PATHweb/vicidial/server_reports/
 
 
 
diff --git a/bin/AST_VDhopper.pl b/bin/AST_VDhopper.pl
index c43b4f57..c1fd6d84 100644
--- a/bin/AST_VDhopper.pl
+++ b/bin/AST_VDhopper.pl
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 #
-# AST_VDhopper.pl version 2.0.3   *DBI-version*
+# AST_VDhopper.pl version 2.0.4   *DBI-version*
 #
 # DESCRIPTION:
 # uses DBD::MySQL to update the VICIDIAL leads hopper for the streamlined 
@@ -129,6 +129,7 @@ if (length($ARGV[0])>1)
 		#	print "\n|$ARGS|\n\n";
 		@data_in = split(/--campaign=/,$args);
 			$CLIcampaign = $data_in[1];
+			$CLIcampaign =~ s/ .*$//gi;
 		}
 		else
 			{$CLIcampaign = '';}
diff --git a/bin/AST_VDsales_export.pl b/bin/AST_VDsales_export.pl
new file mode 100644
index 00000000..a041223c
--- /dev/null
+++ b/bin/AST_VDsales_export.pl
@@ -0,0 +1,440 @@
+#!/usr/bin/perl
+
+# AST_VDsales_export.pl                version: 2.0.4
+#
+# This script is designed to gather sales for a VICIDIAL Outbound-only campaign and
+# post them to a directory
+#
+# Copyright (C) 2007  Matt Florell <vicidial@gmail.com>    LICENSE: GPLv2
+#
+# CHANGES
+# 61219-1118 - First version
+# 70503-2137 - Added upsell
+# 70611-1154 - Added CLI options
+#
+
+$txt = '.txt';
+$US = '_';
+$MT[0] = '';
+
+# default CLI values
+$campaign = 'TESTCAMP';
+$sale_statuses = 'SALE-UPSELL';
+$output_format = 'pipe-standard';
+
+### begin parsing run-time options ###
+if (length($ARGV[0])>1)
+{
+	$i=0;
+	while ($#ARGV >= $i)
+	{
+	$args = "$args $ARGV[$i]";
+	$i++;
+	}
+
+	if ($args =~ /--help/i)
+	{
+	print "allowed run time options:\n";
+	print "  [--campaign=XXX] = Campaign that sales will be pulled from\n";
+	print "  [--sale-statuses=XXX-XXY] = Statuses that are deemed to be \"Sales\". Default SALE\n";
+	print "  [--output-format=XXX] = Format of file. Default \"pipe-standard\"\n";
+	print "  [--with-inbound=XXX-XXY] = include the following inbound groups\n";
+	print "  [-q] = quiet\n";
+	print "  [-t] = test\n";
+	print "  [--debug] = debugging messages\n";
+	print "  [--debugX] = Super debugging messages\n";
+	print "\n";
+
+	exit;
+	}
+	else
+	{
+		if ($args =~ /--campaign=/i)
+		{
+		#	print "\n|$ARGS|\n\n";
+		@data_in = split(/--campaign=/,$args);
+			$campaign = $data_in[1];
+			$campaign =~ s/ .*$//gi;
+		}
+		if ($args =~ /--sale-statuses=/i)
+		{
+		@data_in = split(/--sale-statuses=/,$args);
+			$sale_statuses = $data_in[1];
+			$sale_statuses =~ s/ .*$//gi;
+		}
+		if ($args =~ /--output-format=/i)
+		{
+		@data_in = split(/--output-format=/,$args);
+			$output_format = $data_in[1];
+			$output_format =~ s/ .*$//gi;
+		}
+		if ($args =~ /--with-inbound=/i)
+		{
+		@data_in = split(/--with-inbound=/,$args);
+			$with_inbound = $data_in[1];
+			$with_inbound =~ s/ .*$//gi;
+		}
+		if ($args =~ /--debug/i)
+		{
+		$DB=1;
+		print "\n----- DEBUG MODE -----\n\n";
+		}
+		if ($args =~ /--debugX/i)
+		{
+		$DBX=1;
+		print "\n----- SUPER DEBUG MODE -----\n\n";
+		}
+		if ($args =~ /-q/i)
+		{
+		$q=1;   $Q=1;
+		}
+		if ($args =~ /-t/i)
+		{
+		$T=1;   $TEST=1;
+		print "\n----- TESTING -----\n\n";
+		}
+	}
+}
+else
+{
+print "no command line options set, using defaults.\n";
+}
+### end parsing run-time options ###
+
+
+$secX = time();
+	($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
+	$year = ($year + 1900);
+	$mon++;
+
+#	# rerun override - Use this to override the day manually
+#	$year='2007';
+#	$mon='5';
+#	$mday='18';
+
+	if ($mon < 10) {$mon = "0$mon";}
+	if ($mday < 10) {$mday = "0$mday";}
+	if ($hour < 10) {$hour = "0$hour";}
+	if ($min < 10) {$min = "0$min";}
+	if ($sec < 10) {$sec = "0$sec";}
+	$timestamp = "$year-$mon-$mday $hour:$min:$sec";
+	$filedate = "$year$mon$mday";
+	$ABIfiledate = "$mon-$mday-$year$us$hour$min$sec";
+	$shipdate = "$year-$mon-$mday";
+	$datestamp = "$year/$mon/$mday $hour:$min";
+
+# default path to astguiclient configuration file:
+$PATHconf =		'/etc/astguiclient.conf';
+
+open(conf, "$PATHconf") || die "can't open $PATHconf: $!\n";
+@conf = <conf>;
+close(conf);
+$i=0;
+foreach(@conf)
+	{
+	$line = $conf[$i];
+	$line =~ s/ |>|\n|\r|\t|\#.*|;.*//gi;
+	if ( ($line =~ /^PATHhome/) && ($CLIhome < 1) )
+		{$PATHhome = $line;   $PATHhome =~ s/.*=//gi;}
+	if ( ($line =~ /^PATHlogs/) && ($CLIlogs < 1) )
+		{$PATHlogs = $line;   $PATHlogs =~ s/.*=//gi;}
+	if ( ($line =~ /^PATHagi/) && ($CLIagi < 1) )
+		{$PATHagi = $line;   $PATHagi =~ s/.*=//gi;}
+	if ( ($line =~ /^PATHweb/) && ($CLIweb < 1) )
+		{$PATHweb = $line;   $PATHweb =~ s/.*=//gi;}
+	if ( ($line =~ /^PATHsounds/) && ($CLIsounds < 1) )
+		{$PATHsounds = $line;   $PATHsounds =~ s/.*=//gi;}
+	if ( ($line =~ /^PATHmonitor/) && ($CLImonitor < 1) )
+		{$PATHmonitor = $line;   $PATHmonitor =~ s/.*=//gi;}
+	if ( ($line =~ /^VARserver_ip/) && ($CLIserver_ip < 1) )
+		{$VARserver_ip = $line;   $VARserver_ip =~ s/.*=//gi;}
+	if ( ($line =~ /^VARDB_server/) && ($CLIDB_server < 1) )
+		{$VARDB_server = $line;   $VARDB_server =~ s/.*=//gi;}
+	if ( ($line =~ /^VARDB_database/) && ($CLIDB_database < 1) )
+		{$VARDB_database = $line;   $VARDB_database =~ s/.*=//gi;}
+	if ( ($line =~ /^VARDB_user/) && ($CLIDB_user < 1) )
+		{$VARDB_user = $line;   $VARDB_user =~ s/.*=//gi;}
+	if ( ($line =~ /^VARDB_pass/) && ($CLIDB_pass < 1) )
+		{$VARDB_pass = $line;   $VARDB_pass =~ s/.*=//gi;}
+	if ( ($line =~ /^VARDB_port/) && ($CLIDB_port < 1) )
+		{$VARDB_port = $line;   $VARDB_port =~ s/.*=//gi;}
+	$i++;
+	}
+
+# Customized Variables
+$server_ip = $VARserver_ip;		# Asterisk server IP
+
+if ($output_format =~ /^pipe-standard$/) 
+	{$DLT = '|';   $txt='.txt';}
+if ($output_format =~ /^csv-standard$/) 
+	{$DLT = "','";   $txt='.csv';}
+if ($output_format =~ /^tab-standard$/) 
+	{$DLT = "\t";   $txt='.txt';}
+if ($output_format =~ /^pipe-triplep$/) 
+	{$DLT = '';   $txt='.txt';}
+if ($output_format =~ /^pipe-vici$/) 
+	{$DLT = '|';   $txt='.txt';}
+
+	$sale_statusesSQL = $sale_statuses;
+	$sale_statusesSQL =~ s/-/','/gi;
+	$sale_statusesSQL = "'$sale_statusesSQL'";
+
+	$with_inboundSQL = $with_inbound;
+	$with_inboundSQL =~ s/-/','/gi;
+	$with_inboundSQL = "'$with_inboundSQL'";
+
+if (!$Q)
+	{
+	print "\n\n\n\n\n\n\n\n\n\n\n\n-- AST_VDsales_export.pl --\n\n";
+	print "This program is designed to gather sales from a VICIDIAL outbound-only campaign and post them to a file. \n";
+	print "\n";
+	print "Campaign:      $campaign\n";
+	print "Sale Statuses: $sale_statuses     $sale_statusesSQL\n";
+	print "Output Format: $output_format\n";
+	print "With Inbound:  $with_inbound     $with_inboundSQL\n";
+	print "\n";
+	}
+
+$outfile = "$campaign$US$filedate$US$sale_statuses$txt";
+
+### open the X out file for writing ###
+open(out, ">$PATHweb/vicidial/server_reports/$outfile")
+		|| die "Can't open $outfile: $!\n";
+
+if (!$VARDB_port) {$VARDB_port='3306';}
+
+
+use DBI;
+
+$dbhA = DBI->connect("DBI:mysql:$VARDB_database:$VARDB_server:$VARDB_port", "$VARDB_user", "$VARDB_pass")
+ or die "Couldn't connect to database: " . DBI->errstr;
+
+$dbhB = DBI->connect("DBI:mysql:$VARDB_database:$VARDB_server:$VARDB_port", "$VARDB_user", "$VARDB_pass")
+ or die "Couldn't connect to database: " . DBI->errstr;
+
+$TOTAL_SALES=0;
+
+
+###########################################################################
+########### CURRENT DAY SALES GATHERING outbound-only: vicidial_log  ######
+###########################################################################
+$stmtA = "select vicidial_log.user,first_name,last_name,address1,address2,city,state,postal_code,vicidial_list.phone_number,email,security_phrase,vicidial_list.comments,call_date,vicidial_list.lead_id,vicidial_users.full_name,vicidial_log.status,vicidial_list.vendor_lead_code,vicidial_list.source_id,vicidial_log.list_id from vicidial_list,vicidial_log,vicidial_users where campaign_id='$campaign' and vicidial_log.status IN($sale_statusesSQL) and call_date > '$shipdate 00:00:01' and call_date < '$shipdate 23:59:59' and vicidial_log.lead_id=vicidial_list.lead_id and vicidial_users.user=vicidial_log.user;";
+if ($DB) {print "|$stmtA|\n";}
+$sthA = $dbhA->prepare($stmtA) or die "preparing: ",$dbhA->errstr;
+$sthA->execute or die "executing: $stmtA ", $dbhA->errstr;
+$sthArows=$sthA->rows;
+$rec_count=0;
+while ($sthArows > $rec_count)
+	{
+	@aryA = $sthA->fetchrow_array;
+	$user =			$aryA[0];
+	$first_name =	$aryA[1];
+	$last_name =	$aryA[2];
+	$address1 =		$aryA[3];
+	$address2 =		$aryA[4];
+	$city =			$aryA[5];
+	$state =		$aryA[6];
+	$postal_code =	$aryA[7];
+	$phone_number =	$aryA[8];
+	$email =		$aryA[9];
+	$security =		$aryA[10];
+	$comments =		$aryA[11];
+	$call_date =	$aryA[12];
+	$lead_id =		$aryA[13];
+	$agent_name =	$aryA[14];
+	$status =		$aryA[15];
+	$vendor_id =	$aryA[16];
+	$source_id =	$aryA[17];
+	$list_id =		$aryA[18];
+
+	&select_format_loop;
+
+	$TOTAL_SALES++;
+	}
+$sthA->finish();
+
+if (length($with_inboundSQL)>3)
+	{
+	###########################################################################
+	########### CURRENT DAY SALES GATHERING inbound-only: vicidial_closer_log  ######
+	###########################################################################
+	$stmtA = "select vicidial_closer_log.user,first_name,last_name,address1,address2,city,state,postal_code,vicidial_list.phone_number,email,security_phrase,vicidial_list.comments,call_date,vicidial_list.lead_id,vicidial_users.full_name,vicidial_closer_log.status,vicidial_list.vendor_lead_code,vicidial_list.source_id,vicidial_closer_log.list_id,campaign_id from vicidial_list,vicidial_closer_log,vicidial_users where campaign_id IN($with_inboundSQL) and vicidial_closer_log.status IN($sale_statusesSQL) and call_date > '$shipdate 00:00:01' and call_date < '$shipdate 23:59:59' and vicidial_closer_log.lead_id=vicidial_list.lead_id and vicidial_users.user=vicidial_closer_log.user;";
+	if ($DB) {print "|$stmtA|\n";}
+	$sthA = $dbhA->prepare($stmtA) or die "preparing: ",$dbhA->errstr;
+	$sthA->execute or die "executing: $stmtA ", $dbhA->errstr;
+	$sthArows=$sthA->rows;
+	$rec_count=0;
+	while ($sthArows > $rec_count)
+		{
+		@aryA = $sthA->fetchrow_array;
+		$closer =		$aryA[0];
+		$first_name =	$aryA[1];
+		$last_name =	$aryA[2];
+		$address1 =		$aryA[3];
+		$address2 =		$aryA[4];
+		$city =			$aryA[5];
+		$state =		$aryA[6];
+		$postal_code =	$aryA[7];
+		$phone_number =	$aryA[8];
+		$email =		$aryA[9];
+		$security =		$aryA[10];
+		$comments =		$aryA[11];
+		$call_date =	$aryA[12];
+		$lead_id =		$aryA[13];
+		$closer_name =	$aryA[14];
+		$status =		$aryA[15];
+		$vendor_id =	$aryA[16];
+		$source_id =	$aryA[17];
+		$list_id =		$aryA[18];
+		$campaign_id =	$aryA[19];
+
+		$user = '';
+		$agent_name='';
+
+		$stmtB = "select vicidial_xfer_log.user,full_name from vicidial_xfer_log,vicidial_users where lead_id='$lead_id' and closer='$closer' and call_date > '$shipdate 00:00:01' and call_date < '$shipdate 23:59:59' and vicidial_users.user=vicidial_xfer_log.user order by call_date desc limit 1;";
+		$sthB = $dbhB->prepare($stmtB) or die "preparing: ",$dbhB->errstr;
+		$sthB->execute or die "executing: $stmtB ", $dbhB->errstr;
+		$sthBrows=$sthB->rows;
+		$rec_countB=0;
+		while ($sthBrows > $rec_countB)
+			{
+			@aryB = $sthB->fetchrow_array;
+			$user = $aryB[0];
+			$agent_name = $aryB[1];
+			$rec_countB++;
+			}
+		$sthB->finish();
+
+		&select_format_loop;
+
+		$TOTAL_SALES++;
+		}
+	$sthA->finish();
+	}
+
+
+
+close(out);
+
+### calculate time to run script ###
+$secY = time();
+$secZ = ($secY - $secX);
+$secZm = ($secZ /60);
+
+if (!$Q) {print "SALES EXPORT FOR $timestamp: $outfile\n";}
+if (!$Q) {print "TOTAL SALES: $TOTAL_SALES\n";}
+if (!$Q) {print "script execution time in seconds: $secZ     minutes: $secZm\n";}
+
+exit;
+
+
+
+
+
+### Subroutine for formatting of the output ###
+sub select_format_loop
+{
+
+if ($T)
+	{
+#	$user =			'1234';
+	$agent_name =	'Joe Agent';
+#	$closer =		'4321';
+	$closer_name =	'Jane Closer';
+	$security =		'4111111111111111';
+	$comments =		'VISA';
+	$phone_number =~ s/^\d\d\d\d\d/23456/gi;
+	$address1 =~ s/^..../1234 /gi
+	}
+$ivr_id = '0';
+$ivr_filename = '';
+
+
+$stmtB = "select recording_id,filename from recording_log where lead_id='$lead_id' and start_time > '$shipdate 00:00:01' and start_time < '$shipdate 23:59:59' order by length_in_sec desc limit 1;";
+$sthB = $dbhB->prepare($stmtB) or die "preparing: ",$dbhB->errstr;
+$sthB->execute or die "executing: $stmtB ", $dbhB->errstr;
+$sthBrows=$sthB->rows;
+$rec_countB=0;
+while ($sthBrows > $rec_countB)
+	{
+	@aryB = $sthB->fetchrow_array;
+	$ivr_id = $aryB[0];
+	$ivr_filename = $aryB[1];
+	$rec_countB++;
+	}
+$sthB->finish();
+
+if (length($ivr_id)<3) 
+	{
+	$stmtB = "select recording_id,filename from recording_log where lead_id='$lead_id' order by length_in_sec desc limit 1;";
+	$sthB = $dbhB->prepare($stmtB) or die "preparing: ",$dbhB->errstr;
+	$sthB->execute or die "executing: $stmtB ", $dbhB->errstr;
+	$sthBrows=$sthB->rows;
+	$rec_countB=0;
+	while ($sthBrows > $rec_countB)
+		{
+		@aryB = $sthB->fetchrow_array;
+		$ivr_id = $aryB[0];
+		$ivr_filename = $aryB[1];
+		$rec_countB++;
+		}
+	$sthB->finish();
+
+	if (length($ivr_id)<3) 
+		{
+		$stmtB = "select recording_id,filename from recording_log where filename LIKE \"%$phone_number%\" order by length_in_sec desc limit 1;";
+		$sthB = $dbhB->prepare($stmtB) or die "preparing: ",$dbhB->errstr;
+		$sthB->execute or die "executing: $stmtB ", $dbhB->errstr;
+		$sthBrows=$sthB->rows;
+		$rec_countB=0;
+		while ($sthBrows > $rec_countB)
+			{
+			@aryB = $sthB->fetchrow_array;
+			$ivr_id = $aryB[0];
+			$ivr_filename = $aryB[1];
+			$rec_countB++;
+			}
+		$sthB->finish();
+		}
+	}
+if ($status =~ /UPSELL/) {$UPSELL='L5';}
+else {$UPSELL='N';}
+
+if ($output_format =~ /^pipe-standard$/) 
+	{
+	$str = "$first_name|$last_name|$address1|$address2|$city|$state|$postal_code|$phone_number|$email|$security|$comments|$call_date|$lead_id|$list_id|$user|$agent_name|$status|$vendor_id|$source_id|$campaign|$campaign_id|$ivr_id|$closer|$closer_name|\n";
+	}
+
+if ($output_format =~ /^csv-standard$/) 
+	{
+	$str = "\"$first_name\",\"$last_name\",\"$address1\",\"$address2\",\"$city\",\"$state\",\"$postal_code\",\"$phone_number\",\"$email\",\"$security\",\"$comments\",\"$call_date\",\"$lead_id\",\"$list_id\",\"$user\",\"$agent_name\",\"$status\",\"$vendor_id\",\"$source_id\",\"$campaign\",\"$campaign_id\",\"$ivr_id\",\"$closer\",\"$closer_name\"\r\n";
+	}
+
+if ($output_format =~ /^tab-standard$/) 
+	{
+	$str = "$first_name\t$last_name\t$address1\t$address2\t$city\t$state\t$postal_code\t$phone_number\t$email\t$security\t$comments\t$call_date\t$lead_id\t$list_id\t$user\t$agent_name\t$status\t$vendor_id\t$source_id\t$campaign\t$campaign_id\t$ivr_id\t$closer\t$closer_name\t\n";
+	}
+
+if ($output_format =~ /^pipe-triplep$/) 
+	{
+	$str = "$user|$agent_name|$closer|$closer_name|$call_date|$status|$first_name|$last_name|$phone_number|$address1|$address2|$city|$state|$postal_code|$comments|$security|$email|$vendor_id|$source_id|$lead_id|$list_id|$campaign|$campaign_id|$ivr_id|\n";
+	}
+
+if ($output_format =~ /^pipe-vici$/) 
+	{
+	$str = "VDAD|$agent_name|$first_name|$last_name|$address1|$address2|$city|$state|$postal_code|$phone_number|$ivr_id|DU|$UPSELL|N|||$security|$comments||||||$call_date|CBDISC|$email\r\n";
+	}
+
+
+
+print out "$str"; 
+if ($DBX) {print "$str\n";}
+
+$rec_count++;
+
+}
+
+
+
+
+
diff --git a/extras/upgrade_2.0.4.sql b/extras/upgrade_2.0.4.sql
index d36974d1..757360a5 100644
--- a/extras/upgrade_2.0.4.sql
+++ b/extras/upgrade_2.0.4.sql
@@ -4,6 +4,7 @@ ALTER TABLE vicidial_campaign_statuses ADD human_answered ENUM('Y','N') default
 UPDATE vicidial_statuses SET human_answered='Y' where status IN('DROP','DNC','DEC','SALE','XFER','CALLBK','NP','NI','N');
 
 ALTER TABLE vicidial_campaigns ADD list_order_mix VARCHAR(20) default 'DISABLED';
+UPDATE vicidial_campaigns SET list_order_mix='DISABLED';
 
  CREATE TABLE vicidial_campaigns_list_mix (
 vcl_id VARCHAR(20) PRIMARY KEY NOT NULL,
diff --git a/install.pl b/install.pl
index 450d9200..f4e631fc 100644
--- a/install.pl
+++ b/install.pl
@@ -1318,6 +1318,7 @@ if ($NOWEB < 1)
 	`mkdir $PATHweb/vicidial/`;
 	`mkdir $PATHweb/vicidial/ploticus/`;
 	`mkdir $PATHweb/vicidial/agent_reports/`;
+	`mkdir $PATHweb/vicidial/server_reports/`;
 
 	print "Copying web files...\n";
 	`cp -f -R ./www/* $PATHweb/`;
@@ -1331,6 +1332,7 @@ if ($NOWEB < 1)
 	`chmod 0777 $PATHweb/vicidial/`;
 	`chmod 0777 $PATHweb/vicidial/ploticus/`;
 	`chmod 0777 $PATHweb/vicidial/agent_reports/`;
+	`chmod 0777 $PATHweb/vicidial/server_reports/`;
 	}
 
 if ($PROMPTcopy_conf_files =~ /y/i)