<?php
# admin_modify_lead.php   version 2.14
# 
# ViciDial database administration modify lead in vicidial_list
# admin_modify_lead.php
#
# this is the administration lead information modifier screen, the administrator 
# just needs to enter the leadID and then they can view and modify the 
# information in the record for that lead
#
# Copyright (C) 2024  Matt Florell <vicidial@gmail.com>    LICENSE: AGPLv2
#
# CHANGES
#
# 60419-1705 - Added ability to change lead callback record from USERONLY to ANYONE or USERONLY-user
# 60421-1459 - check GET/POST vars lines with isset to not trigger PHP NOTICES
# 60609-1112 - Added DNC list addition if status changed to DNC
# 60619-1539 - Added variable filtering to eliminate SQL injection attack threat
# 61130-1639 - Added recording_log lookup and list for this lead_id
# 61201-1136 - Added recording_log user(TSR) display and link
# 70305-1133 - Changed to default CHECKED modify logs upon status change
# 70424-1128 - Added campaign-specific statuses, reformatted recordings list
# 70702-1259 - Added recording location link and truncation
# 70906-2132 - Added closer_log records display
# 80428-0144 - UTF8 cleanup
# 80501-0454 - Added Hangup Reason to logs display
# 80516-0936 - Cleanup of logging changes, added vicidial_agent_log display
# 80701-0832 - Changed to allow for altering of main phone number
# 80805-2106 - Changed comments to TEXTAREA
# 81210-1529 - Added server recording display options
# 90309-1829 - Added admin_log logging
# 90508-0644 - Changed to PHP long tags
# 90708-1549 - Added phone number dialed to outbound log
# 90721-1246 - Added rank and owner as vicidial_list fields
# 90917-2355 - Added extended alt phone entries
# 100405-1333 - Changed to show logs of non-found leads
# 100618-0148 - Added Middle name modify and fixes statuses list
# 100622-0945 - Added field labels
# 100703-1122 - Added custom fields display/edit
# 100712-1416 - Added entry_list_id field to vicidial_list to preserve link to custom fields if any
# 100924-1431 - Added Called Count display
# 101127-1610 - Added ability to set a scheduled callback date and time
# 110212-2041 - Added compatibility with definable scheduled callback statuses
# 110215-1411 - Added display of call notes to log records
# 110215-1717 - Changed empty lead_id behavior to be add-a-lead functionality
# 110525-1827 - Added ivr log records display
# 111103-1533 - Added admin_hide_phone_data and admin_hide_lead_data options
# 120223-2249 - Removed logging of good login passwords if webroot writable is enabled
# 120518-1004 - Fix for multi-line comments
# 120529-1635 - Added User Group Campaign-Lists validation
# 121116-1411 - Added QC functionality
# 121130-1033 - Changed scheduled callback user ID field to be 20 characters, issue #467
# 121222-2145 - Added email log
# 130123-1940 - Added options.php option to allow display of non-selectable statuses
# 130610-1049 - Finalized changing of all ereg instances to preg
# 130621-1731 - Added filtering of input to prevent SQL injection attacks and new user auth
# 130705-1726 - Minor change for encrypted password compatibility
# 130901-0816 - Changed to mysqli PHP functions
# 130926-2053 - Added option for viewing/modifying vicidial_list_archive leads
# 140125-1100 - Fixed issue with Callback records having no campaign_id
# 140304-2034 - Fixed issue with special characters in standard data fields
# 140706-0827 - Incorporated QC includes into code
# 140817-0937 - Added Archive Log search option
# 141001-2200 - Finalized adding QXZ translation to all admin files
# 141128-0859 - Code cleanup for QXZ functions
# 141229-1745 - Added code for on-the-fly language translations display
# 150107-1729 - Added ignore_group_on_search user option
# 150114-2321 - Added date_of_birth as editable field
# 150312-1506 - Fixed minor Iframe form bug related to custom fields
# 150514-1522 - Added $gmt_offset lookup for adding a new lead
# 150603-1527 - Allow non-digit characters in alt_phone field
# 150808-1437 - Added compatibility for custom fields data options
# 150908-1531 - Fixed input lengths for several standard fields to match DB
# 150917-1301 - Added dynamic default field maxlengths based on DB schema
# 150923-0700 - Fixed security issues with user access, issue #894
# 160102-1238 - Fixed issues with special characters, added $htmlconvert option
# 160112-2344 - Added link to direct to recording logging page, access log display
# 160122-1337 - Added display of gmt-offset, last-local-call and called-since-last-reset
# 160407-2023 - Design changes, added more variable scrubbing, added more admin logging
# 160926-1052 - Fix for inbound call notes display
# 170224-1639 - Added ability to display archived recordings
# 170409-1554 - Added IP List validation code
# 170527-2253 - Fix for rare inbound logging issue #1017
# 170710-2039 - Added Audit Comments display
# 170807-2255 - Added park log
# 170826-0858 - Added link to turn on/off archived logs display
# 171001-1109 - Added in-browser audio control, if recording access control is disabled
# 171216-2058 - Added ability to modify all active scheduled callbacks, and view callbacks log
# 180212-2340 - Added basic GDPR compliance features
# 180302-1605 - Added complete GDPR compliance features
# 180310-2300 - Added optional source_id display
# 180311-0008 - Added CIDdisplay
# 180410-1720 - Added switch lead log entry display
# 180506-1813 - Added switch_list log entry display
# 180807-0957 - Added new diff logging code
# 190310-2223 - Added indication of muted recordings by agent
# 190329-1917 - Added display of AMD log info when CIDdisplay=Yes is set
# 190609-0927 - Added sip_event_logging support
# 191113-2204 - Added support for per-User additional status groups
# 200815-0017 - Added support for additional modify_leads setting
# 200916-2321 - Added options to allow users to modify any call or agent log status
# 201113-0841 - Added server_ip information to extended log view
# 201117-0807 - Changes for better compatibility with non-latin data input
# 201109-1725 - Fix for blank page after certain updates submitted
# 201123-1704 - Added today called count display
# 210304-1509 - Added option '5' for modify_lead for this page to work as read-only
# 210421-2120 - Added more screen labels
# 210629-1545 - Added KHOMP stats display
# 210630-0838 - Added display of vicidial_vmm_counts data, if $CIDdisplay=="Yes"
# 220222-1454 - Added allow_web_debug system setting
# 220312-0953 - Added vicidial_dial_cid_log data
# 220427-1132 - Fixes for lead not found, Issue #1358
# 220520-1319 - Fix for admin hide phone data issue #1359
# 230204-0011 - Fix for inbound Call ID display
# 230205-2135 - Small fix for ignore_group_on_search issue
# 230307-1326 - Small fix for closer calls DID display, Issue #1447
# 230309-1444 - Added Inbound Call Menu Log display as part of IVR Log section
# 231117-1920 - Added vicidial_3way_press_log display
# 231126-2218 - Added vicidial_hci_log display
# 240704-2329 - Added coldstorage log view option
# 241002-0936 - Fix for displaying CID info on outbound calls that were blind transferred
#

require("dbconnect_mysqli.php");
require("functions.php");

$PHP_AUTH_USER=$_SERVER['PHP_AUTH_USER'];
$PHP_AUTH_PW=$_SERVER['PHP_AUTH_PW'];
$PHP_SELF=$_SERVER['PHP_SELF'];
$PHP_SELF = preg_replace('/\.php.*/i','.php',$PHP_SELF);
if (isset($_GET["vendor_id"]))				{$vendor_id=$_GET["vendor_id"];}
	elseif (isset($_POST["vendor_id"]))		{$vendor_id=$_POST["vendor_id"];}
if (isset($_GET["source_id"]))				{$source_id=$_GET["source_id"];}
	elseif (isset($_POST["source_id"]))		{$source_id=$_POST["source_id"];}
if (isset($_GET["old_phone"]))				{$old_phone=$_GET["old_phone"];}
	elseif (isset($_POST["old_phone"]))		{$old_phone=$_POST["old_phone"];}
if (isset($_GET["lead_id"]))				{$lead_id=$_GET["lead_id"];}
	elseif (isset($_POST["lead_id"]))		{$lead_id=$_POST["lead_id"];}
if (isset($_GET["title"]))				{$title=$_GET["title"];}
	elseif (isset($_POST["title"]))		{$title=$_POST["title"];}
if (isset($_GET["first_name"]))				{$first_name=$_GET["first_name"];}
	elseif (isset($_POST["first_name"]))	{$first_name=$_POST["first_name"];}
if (isset($_GET["middle_initial"]))				{$middle_initial=$_GET["middle_initial"];}
	elseif (isset($_POST["middle_initial"]))	{$middle_initial=$_POST["middle_initial"];}
if (isset($_GET["last_name"]))				{$last_name=$_GET["last_name"];}
	elseif (isset($_POST["last_name"]))		{$last_name=$_POST["last_name"];}
if (isset($_GET["phone_number"]))			{$phone_number=$_GET["phone_number"];}
	elseif (isset($_POST["phone_number"]))	{$phone_number=$_POST["phone_number"];}
if (isset($_GET["end_call"]))				{$end_call=$_GET["end_call"];}
	elseif (isset($_POST["end_call"]))		{$end_call=$_POST["end_call"];}
if (isset($_GET["DB"]))					{$DB=$_GET["DB"];}
	elseif (isset($_POST["DB"]))		{$DB=$_POST["DB"];}
if (isset($_GET["dispo"]))				{$dispo=$_GET["dispo"];}
	elseif (isset($_POST["dispo"]))		{$dispo=$_POST["dispo"];}
if (isset($_GET["list_id"]))				{$list_id=$_GET["list_id"];}
	elseif (isset($_POST["list_id"]))		{$list_id=$_POST["list_id"];}
if (isset($_GET["campaign_id"]))			{$campaign_id=$_GET["campaign_id"];}
	elseif (isset($_POST["campaign_id"]))	{$campaign_id=$_POST["campaign_id"];}
if (isset($_GET["phone_code"]))				{$phone_code=$_GET["phone_code"];}
	elseif (isset($_POST["phone_code"]))	{$phone_code=$_POST["phone_code"];}
if (isset($_GET["server_ip"]))				{$server_ip=$_GET["server_ip"];}
	elseif (isset($_POST["server_ip"]))		{$server_ip=$_POST["server_ip"];}
if (isset($_GET["extension"]))				{$extension=$_GET["extension"];}
	elseif (isset($_POST["extension"]))		{$extension=$_POST["extension"];}
if (isset($_GET["channel"]))				{$channel=$_GET["channel"];}
	elseif (isset($_POST["channel"]))		{$channel=$_POST["channel"];}
if (isset($_GET["call_began"]))				{$call_began=$_GET["call_began"];}
	elseif (isset($_POST["call_began"]))	{$call_began=$_POST["call_began"];}
if (isset($_GET["parked_time"]))			{$parked_time=$_GET["parked_time"];}
	elseif (isset($_POST["parked_time"]))	{$parked_time=$_POST["parked_time"];}
if (isset($_GET["tsr"]))				{$tsr=$_GET["tsr"];}
	elseif (isset($_POST["tsr"]))		{$tsr=$_POST["tsr"];}
if (isset($_GET["address1"]))				{$address1=$_GET["address1"];}
	elseif (isset($_POST["address1"]))		{$address1=$_POST["address1"];}
if (isset($_GET["address2"]))				{$address2=$_GET["address2"];}
	elseif (isset($_POST["address2"]))		{$address2=$_POST["address2"];}
if (isset($_GET["address3"]))				{$address3=$_GET["address3"];}
	elseif (isset($_POST["address3"]))		{$address3=$_POST["address3"];}
if (isset($_GET["city"]))				{$city=$_GET["city"];}
	elseif (isset($_POST["city"]))		{$city=$_POST["city"];}
if (isset($_GET["state"]))				{$state=$_GET["state"];}
	elseif (isset($_POST["state"]))		{$state=$_POST["state"];}
if (isset($_GET["postal_code"]))			{$postal_code=$_GET["postal_code"];}
	elseif (isset($_POST["postal_code"]))	{$postal_code=$_POST["postal_code"];}
if (isset($_GET["province"]))				{$province=$_GET["province"];}
	elseif (isset($_POST["province"]))		{$province=$_POST["province"];}
if (isset($_GET["country_code"]))			{$country_code=$_GET["country_code"];}
	elseif (isset($_POST["country_code"]))	{$country_code=$_POST["country_code"];}
if (isset($_GET["alt_phone"]))				{$alt_phone=$_GET["alt_phone"];}
	elseif (isset($_POST["alt_phone"]))		{$alt_phone=$_POST["alt_phone"];}
if (isset($_GET["email"]))				{$email=$_GET["email"];}
	elseif (isset($_POST["email"]))		{$email=$_POST["email"];}
if (isset($_GET["security"]))				{$security=$_GET["security"];}
	elseif (isset($_POST["security"]))		{$security=$_POST["security"];}
if (isset($_GET["comments"]))				{$comments=$_GET["comments"];}
	elseif (isset($_POST["comments"]))		{$comments=$_POST["comments"];}
if (isset($_GET["status"]))				{$status=$_GET["status"];}
	elseif (isset($_POST["status"]))	{$status=$_POST["status"];}
if (isset($_GET["rank"]))				{$rank=$_GET["rank"];}
	elseif (isset($_POST["rank"]))		{$rank=$_POST["rank"];}
if (isset($_GET["owner"]))				{$owner=$_GET["owner"];}
	elseif (isset($_POST["owner"]))		{$owner=$_POST["owner"];}
if (isset($_GET["submit"]))				{$submit=$_GET["submit"];}
	elseif (isset($_POST["submit"]))	{$submit=$_POST["submit"];}
if (isset($_GET["SUBMIT"]))				{$SUBMIT=$_GET["SUBMIT"];}
	elseif (isset($_POST["SUBMIT"]))	{$SUBMIT=$_POST["SUBMIT"];}
if (isset($_GET["CBchangeUSERtoANY"]))				{$CBchangeUSERtoANY=$_GET["CBchangeUSERtoANY"];}
	elseif (isset($_POST["CBchangeUSERtoANY"]))		{$CBchangeUSERtoANY=$_POST["CBchangeUSERtoANY"];}
if (isset($_GET["CBchangeANYtoUSER"]))				{$CBchangeANYtoUSER=$_GET["CBchangeANYtoUSER"];}
	elseif (isset($_POST["CBchangeANYtoUSER"]))		{$CBchangeANYtoUSER=$_POST["CBchangeANYtoUSER"];}
if (isset($_GET["CBchangeDATE"]))				{$CBchangeDATE=$_GET["CBchangeDATE"];}
	elseif (isset($_POST["CBchangeDATE"]))		{$CBchangeDATE=$_POST["CBchangeDATE"];}
if (isset($_GET["callback_id"]))				{$callback_id=$_GET["callback_id"];}
	elseif (isset($_POST["callback_id"]))		{$callback_id=$_POST["callback_id"];}
if (isset($_GET["CBuser"]))				{$CBuser=$_GET["CBuser"];}
	elseif (isset($_POST["CBuser"]))	{$CBuser=$_POST["CBuser"];}
if (isset($_GET["modify_logs"]))			{$modify_logs=$_GET["modify_logs"];}
	elseif (isset($_POST["modify_logs"]))	{$modify_logs=$_POST["modify_logs"];}
if (isset($_GET["modify_closer_logs"]))				{$modify_closer_logs=$_GET["modify_closer_logs"];}
	elseif (isset($_POST["modify_closer_logs"]))	{$modify_closer_logs=$_POST["modify_closer_logs"];}
if (isset($_GET["modify_agent_logs"]))			{$modify_agent_logs=$_GET["modify_agent_logs"];}
	elseif (isset($_POST["modify_agent_logs"]))	{$modify_agent_logs=$_POST["modify_agent_logs"];}
if (isset($_GET["add_closer_record"]))			{$add_closer_record=$_GET["add_closer_record"];}
	elseif (isset($_POST["add_closer_record"]))	{$add_closer_record=$_POST["add_closer_record"];}
if (isset($_POST["appointment_date"]))			{$appointment_date=$_POST["appointment_date"];}
	elseif (isset($_GET["appointment_date"]))	{$appointment_date=$_GET["appointment_date"];}
if (isset($_POST["appointment_time"]))			{$appointment_time=$_POST["appointment_time"];}
	elseif (isset($_GET["appointment_time"]))	{$appointment_time=$_GET["appointment_time"];}
if (isset($_GET["CBstatus"]))				{$CBstatus=$_GET["CBstatus"];}
	elseif (isset($_POST["CBstatus"]))		{$CBstatus=$_POST["CBstatus"];}
if (isset($_GET["archive_search"]))				{$archive_search=$_GET["archive_search"];}
	elseif (isset($_POST["archive_search"]))	{$archive_search=$_POST["archive_search"];}
if (isset($_GET["archive_log"]))			{$archive_log=$_GET["archive_log"];}
	elseif (isset($_POST["archive_log"]))	{$archive_log=$_POST["archive_log"];}
if (isset($_GET["date_of_birth"]))			{$date_of_birth=$_GET["date_of_birth"];}
	elseif (isset($_POST["date_of_birth"]))	{$date_of_birth=$_POST["date_of_birth"];}
if (isset($_GET["gdpr_action"]))			{$gdpr_action=$_GET["gdpr_action"];}
	elseif (isset($_POST["gdpr_action"]))	{$gdpr_action=$_POST["gdpr_action"];}
if (isset($_GET["CIDdisplay"]))				{$CIDdisplay=$_GET["CIDdisplay"];}
	elseif (isset($_POST["CIDdisplay"]))	{$CIDdisplay=$_POST["CIDdisplay"];}
if (isset($_GET["modify_log_submit"]))			{$modify_log_submit=$_GET["modify_log_submit"];}
	elseif (isset($_POST["modify_log_submit"]))	{$modify_log_submit=$_POST["modify_log_submit"];}
if (isset($_GET["modify_log_table"]))			{$modify_log_table=$_GET["modify_log_table"];}
	elseif (isset($_POST["modify_log_table"]))	{$modify_log_table=$_POST["modify_log_table"];}
if (isset($_GET["modify_log_status"]))			{$modify_log_status=$_GET["modify_log_status"];}
	elseif (isset($_POST["modify_log_status"]))	{$modify_log_status=$_POST["modify_log_status"];}
if (isset($_GET["modify_old_status"]))			{$modify_old_status=$_GET["modify_old_status"];}
	elseif (isset($_POST["modify_old_status"]))	{$modify_old_status=$_POST["modify_old_status"];}
if (isset($_GET["vicidial_id"]))			{$vicidial_id=$_GET["vicidial_id"];}
	elseif (isset($_POST["vicidial_id"]))	{$vicidial_id=$_POST["vicidial_id"];}
if (isset($_GET["log_date"]))			{$log_date=$_GET["log_date"];}
	elseif (isset($_POST["log_date"]))	{$log_date=$_POST["log_date"];}


if ($archive_search=="Yes") {$vl_table="vicidial_list_archive";} 
else {$vl_table="vicidial_list"; $archive_search="No";}
$altCIDdisplay="Yes";
if ($CIDdisplay=="Yes") {$altCIDdisplay="No";} 
$DB=preg_replace("/[^0-9a-zA-Z]/","",$DB);

$STARTtime = date("U");
$TODAY = date("Y-m-d");
$NOW_TIME = date("Y-m-d H:i:s");
$date = date("r");
$ip = getenv("REMOTE_ADDR");
$browser = getenv("HTTP_USER_AGENT");
$AMDcount=0;
$uniqueidLIST="'XYZ'";

$htmlconvert=1;
$nonselectable_statuses=0;
if (file_exists('options.php'))
	{
	require('options.php');
	}
$selectableSQL = "where selectable='Y'";
$selectableSQLand = "and selectable='Y'";
if ($nonselectable_statuses > 0) 
	{$selectableSQL='';   $selectableSQLand='';}

#############################################
##### START SYSTEM_SETTINGS LOOKUP #####
$stmt = "SELECT use_non_latin,custom_fields_enabled,webroot_writable,allow_emails,enable_languages,language_method,active_modules,log_recording_access,admin_screen_colors,enable_gdpr_download_deletion,source_id_display,mute_recordings,sip_event_logging,allow_web_debug,hopper_hold_inserts,coldstorage_server_ip,coldstorage_dbname,coldstorage_login,coldstorage_pass,coldstorage_port FROM system_settings;";
$rslt=mysql_to_mysqli($stmt, $link);
#if ($DB) {echo "$stmt\n";}
$qm_conf_ct = mysqli_num_rows($rslt);
if ($qm_conf_ct > 0)
	{
	$row=mysqli_fetch_row($rslt);
	$non_latin =				$row[0];
	$custom_fields_enabled =	$row[1];
	$webroot_writable =			$row[2];
	$allow_emails =				$row[3];
	$SSenable_languages =		$row[4];
	$SSlanguage_method =		$row[5];
	$active_modules =			$row[6];
	$log_recording_access =		$row[7];
	$SSadmin_screen_colors =	$row[8];
	$enable_gdpr_download_deletion = $row[9];
	$SSsource_id_display =		$row[10];
	$SSmute_recordings =		$row[11];
	$SSsip_event_logging =		$row[12];
	$SSallow_web_debug =		$row[13];
	$SShopper_hold_inserts =	$row[14];
	$SScoldstorage_server_ip =	$row[15];
	$SScoldstorage_dbname =		$row[16];
	$SScoldstorage_login =		$row[17];
	$SScoldstorage_pass =		$row[18];
	$SScoldstorage_port =		$row[19];
	}
if ($SSallow_web_debug < 1) {$DB=0;}
##### END SETTINGS LOOKUP #####
### See if KHOMP is set up
$stmt = "SELECT container_id FROM vicidial_settings_containers where container_id IN('KHOMPSETTINGS','KHOMPSTATUSMAP');";
$rslt=mysql_to_mysqli($stmt, $link);
if ($DB) {echo "$stmt\n";}
$kh_conf_ct = mysqli_num_rows($rslt);
###########################################

$DB=preg_replace('/[^0-9]/','',$DB);
$list_id = preg_replace('/[^0-9]/','',$list_id);
$lead_id = preg_replace('/[^0-9a-zA-Z]/','',$lead_id);
$entry_list_id = preg_replace('/[^0-9]/','',$entry_list_id);
$phone_code = preg_replace('/[^0-9]/','',$phone_code);
$update_phone_number=preg_replace('/[^A-Z]/','',$update_phone_number);
$phone_number = preg_replace('/[^0-9]/','',$phone_number);
$old_phone = preg_replace('/[^0-9]/','',$old_phone);
$vendor_lead_code = preg_replace('/;|#/','',$vendor_lead_code);
	$vendor_lead_code = preg_replace('/\+/',' ',$vendor_lead_code);
$source_id = preg_replace('/;|#/','',$source_id);
	$source_id = preg_replace('/\+/',' ',$source_id);
$gmt_offset_now = preg_replace('/[^-\_\.0-9]/','',$gmt_offset_now);
$country_code = preg_replace('/[^A-Z]/','',$country_code);
$gender = preg_replace('/[^A-Z]/','',$gender);
$date_of_birth = preg_replace('/[^-0-9]/','',$date_of_birth);
$comments = preg_replace('/;|#/','',$comments);
	$comments = preg_replace('/\+/',' ',$comments);
$rank = preg_replace('/[^0-9]/','',$rank);
$no_update = preg_replace('/[^A-Z]/','',$no_update);
$called_count=preg_replace('/[^0-9]/','',$called_count);
$local_gmt=preg_replace('/[^-\.0-9]/','',$local_gmt);
$callback = preg_replace('/[^A-Z]/','',$callback);
$callback_type = preg_replace('/[^A-Z]/','',$callback_type);
$end_call=preg_replace('/[^0-9]/','',$end_call);
$server_ip = preg_replace('/[^-\.\:\_0-9a-zA-Z]/','',$server_ip);
$extension = preg_replace("/\<|\>|\'|\"|\\\\|;/",'',$extension);
$channel = preg_replace("/\<|\>|\'|\"|\\\\|;/",'',$channel);
$submit = preg_replace('/[^- \.\_0-9a-zA-Z]/','',$submit);
$SUBMIT = preg_replace('/[^- \.\_0-9a-zA-Z]/','',$SUBMIT);
$modify_logs=preg_replace('/[^0-9]/','',$modify_logs);
$modify_closer_logs=preg_replace('/[^0-9]/','',$modify_closer_logs);
$modify_agent_logs=preg_replace('/[^0-9]/','',$modify_agent_logs);
$add_closer_record=preg_replace('/[^0-9]/','',$add_closer_record);
$call_began = preg_replace('/[^- \:\_0-9a-zA-Z]/','',$call_began);
$parked_time = preg_replace('/[^- \:\_0-9a-zA-Z]/','',$parked_time);
$callback_id = preg_replace('/[^-_0-9a-zA-Z]/','',$callback_id);
$CBchangeUSERtoANY = preg_replace('/[^-_0-9a-zA-Z]/','',$CBchangeUSERtoANY);
$CBchangeANYtoUSER = preg_replace('/[^-_0-9a-zA-Z]/','',$CBchangeANYtoUSER);
$CBchangeDATE = preg_replace('/[^-_0-9a-zA-Z]/','',$CBchangeDATE);
$archive_search = preg_replace('/[^-_0-9a-zA-Z]/','',$archive_search);
$archive_log = preg_replace('/[^-_0-9a-zA-Z]/','',$archive_log);
$gdpr_action = preg_replace('/[^-_0-9a-zA-Z]/','',$gdpr_action);
$CIDdisplay = preg_replace('/[^-_0-9a-zA-Z]/','',$CIDdisplay);
$appointment_date = preg_replace('/[^- \:\_0-9a-zA-Z]/','',$appointment_date);
$appointment_time = preg_replace('/[^- \:\_0-9a-zA-Z]/','',$appointment_time);

# Variables filtered further down in the code
# $vendor_id

if ($non_latin < 1)
	{
	$PHP_AUTH_USER = preg_replace('/[^-_0-9a-zA-Z]/','',$PHP_AUTH_USER);
	$PHP_AUTH_PW = preg_replace('/[^-_0-9a-zA-Z]/','',$PHP_AUTH_PW);
	$user=preg_replace('/[^-_0-9a-zA-Z]/','',$user);
	$pass=preg_replace('/[^-_0-9a-zA-Z]/','',$pass);
	$function = preg_replace('/[^-\_0-9a-zA-Z]/', '',$function);
	$format = preg_replace('/[^0-9a-zA-Z]/','',$format);
	$title = preg_replace('/[^- \'\_\.0-9a-zA-Z]/','',$title);
	$first_name = preg_replace('/[^- \'\+\_\.0-9a-zA-Z]/','',$first_name);
	$middle_initial = preg_replace('/[^0-9a-zA-Z]/','',$middle_initial);
	$last_name = preg_replace('/[^- \'\+\_\.0-9a-zA-Z]/','',$last_name);
	$address1 = preg_replace('/[^- \'\+\.\:\/\@\_0-9a-zA-Z]/','',$address1);
	$address2 = preg_replace('/[^- \'\+\.\:\/\@\_0-9a-zA-Z]/','',$address2);
	$address3 = preg_replace('/[^- \'\+\.\:\/\@\_0-9a-zA-Z]/','',$address3);
	$city = preg_replace('/[^- \'\+\.\:\/\@\_0-9a-zA-Z]/','',$city);
	$state = preg_replace('/[^- 0-9a-zA-Z]/','',$state);
	$province = preg_replace('/[^- \'\+\.\_0-9a-zA-Z]/','',$province);
	$postal_code = preg_replace('/[^- \'\+0-9a-zA-Z]/','',$postal_code);
	$alt_phone = preg_replace('/[^- \'\+\_\.0-9a-zA-Z]/','',$alt_phone);
	$email = preg_replace('/[^- \'\+\.\:\/\@\%\_0-9a-zA-Z]/','',$email);
	$security_phrase = preg_replace('/[^- \'\+\.\:\/\@\_0-9a-zA-Z]/','',$security_phrase);
	$security = preg_replace('/[^- \'\+\.\:\/\@\_0-9a-zA-Z]/','',$security);
	$campaign_id = preg_replace('/[^-\_0-9a-zA-Z]/', '',$campaign_id);
	$multi_alt_phones = preg_replace('/[^- \+\!\:\_0-9a-zA-Z]/','',$multi_alt_phones);
	$source = preg_replace('/[^0-9a-zA-Z]/','',$source);
	$stage = preg_replace('/[^a-zA-Z]/','',$stage);
	$owner = preg_replace('/[^- \'\+\.\:\/\@\_0-9a-zA-Z]/','',$owner);
	$custom_fields = preg_replace('/[^0-9a-zA-Z]/','',$custom_fields);
	$callback_status = preg_replace('/[^-\_0-9a-zA-Z]/', '',$callback_status);
	$callback_datetime = preg_replace('/[^- \+\.\:\/\@\_0-9a-zA-Z]/','',$callback_datetime);
	$callback_user = preg_replace('/[^-\_0-9a-zA-Z]/', '',$callback_user);
	$callback_comments = preg_replace('/[^- \+\.\:\/\@\_0-9a-zA-Z]/','',$callback_comments);
	$modify_log_status = preg_replace('/[^-\_0-9a-zA-Z]/', '',$modify_log_status);
	$modify_old_status = preg_replace('/[^-\_0-9a-zA-Z]/', '',$modify_old_status);
	$log_date = preg_replace('/[^- \+\.\:\/\@\_0-9a-zA-Z]/','',$log_date);
	$modify_log_submit = preg_replace('/[^-_0-9a-zA-Z]/','',$modify_log_submit);
	$modify_log_table = preg_replace('/[^-_0-9a-zA-Z]/','',$modify_log_table);
	$vicidial_id = preg_replace('/[^-\+\.\:\_0-9a-zA-Z]/','',$vicidial_id);
	$dispo = preg_replace('/[^-_0-9a-zA-Z]/','',$dispo);
	$status = preg_replace('/[^-_0-9a-zA-Z]/','',$status);
	$CBstatus = preg_replace('/[^-_0-9a-zA-Z]/','',$CBstatus);
	$tsr = preg_replace('/[^-_0-9a-zA-Z]/','',$tsr);
	$CBuser = preg_replace('/[^-_0-9a-zA-Z]/','',$CBuser);
	}
else
	{
	$PHP_AUTH_USER = preg_replace('/[^-_0-9\p{L}]/u', '', $PHP_AUTH_USER);
	$PHP_AUTH_PW = preg_replace('/[^-_0-9\p{L}]/u', '', $PHP_AUTH_PW);
	$user=preg_replace('/[^-_0-9\p{L}]/u','',$user);
	$pass=preg_replace('/[^-_0-9\p{L}]/u','',$pass);
	$function = preg_replace('/[^-\_0-9\p{L}]/u', '',$function);
	$format = preg_replace('/[^0-9\p{L}]/u','',$format);
	$title = preg_replace('/[^- \'\_\.0-9\p{L}]/u','',$title);
	$first_name = preg_replace('/[^- \'\+\_\.0-9\p{L}]/u','',$first_name);
	$middle_initial = preg_replace('/[^0-9\p{L}]/u','',$middle_initial);
	$last_name = preg_replace('/[^- \'\+\_\.0-9\p{L}]/u','',$last_name);
	$address1 = preg_replace('/[^- \'\+\.\:\/\@\_0-9\p{L}]/u','',$address1);
	$address2 = preg_replace('/[^- \'\+\.\:\/\@\_0-9\p{L}]/u','',$address2);
	$address3 = preg_replace('/[^- \'\+\.\:\/\@\_0-9\p{L}]/u','',$address3);
	$city = preg_replace('/[^- \'\+\.\:\/\@\_0-9\p{L}]/u','',$city);
	$state = preg_replace('/[^- 0-9\p{L}]/u','',$state);
	$province = preg_replace('/[^- \'\+\.\_0-9\p{L}]/u','',$province);
	$postal_code = preg_replace('/[^- \'\+0-9\p{L}]/u','',$postal_code);
	$alt_phone = preg_replace('/[^- \'\+\_\.0-9\p{L}]/u','',$alt_phone);
	$email = preg_replace('/[^- \'\+\.\:\/\@\%\_0-9\p{L}]/u','',$email);
	$security_phrase = preg_replace('/[^- \'\+\.\:\/\@\_0-9\p{L}]/u','',$security_phrase);
	$security = preg_replace('/[^- \'\+\.\:\/\@\_0-9\p{L}]/u','',$security);
	$campaign_id = preg_replace('/[^-\_0-9\p{L}]/u', '',$campaign_id);
	$multi_alt_phones = preg_replace('/[^- \+\!\:\_0-9\p{L}]/u','',$multi_alt_phones);
	$source = preg_replace('/[^0-9\p{L}]/u','',$source);
	$stage = preg_replace('/[^\p{L}]/u','',$stage);
	$owner = preg_replace('/[^- \'\+\.\:\/\@\_0-9\p{L}]/u','',$owner);
	$custom_fields = preg_replace('/[^0-9\p{L}]/u','',$custom_fields);
	$callback_status = preg_replace('/[^-\_0-9\p{L}]/u', '',$callback_status);
	$callback_datetime = preg_replace('/[^- \+\.\:\/\@\_0-9\p{L}]/u','',$callback_datetime);
	$callback_user = preg_replace('/[^-\_0-9\p{L}]/u', '',$callback_user);
	$callback_comments = preg_replace('/[^- \+\.\:\/\@\_0-9\p{L}]/u','',$callback_comments);
	$modify_log_status = preg_replace('/[^-\_0-9\p{L}]/u', '',$modify_log_status);
	$modify_old_status = preg_replace('/[^-\_0-9\p{L}]/u', '',$modify_old_status);
	$log_date = preg_replace('/[^- \+\.\:\/\@\_0-9\p{L}]/u','',$log_date);
	$modify_log_submit = preg_replace('/[^-_0-9\p{L}]/u','',$modify_log_submit);
	$modify_log_table = preg_replace('/[^-_0-9\p{L}]/u','',$modify_log_table);
	$vicidial_id = preg_replace('/[^-\+\.\:\_0-9\p{L}]/u','',$vicidial_id);
	$dispo = preg_replace('/[^-_0-9\p{L}]/u','',$dispo);
	$status = preg_replace('/[^-_0-9\p{L}]/u','',$status);
	$CBstatus = preg_replace('/[^-_0-9\p{L}]/u','',$CBstatus);
	$tsr = preg_replace('/[^-_0-9\p{L}]/u','',$tsr);
	$CBuser = preg_replace('/[^-_0-9\p{L}]/u','',$CBuser);
	}

$first_name = preg_replace('/\+/',' ',$first_name);
$last_name = preg_replace('/\+/',' ',$last_name);
$address1 = preg_replace('/\+/',' ',$address1);
$address2 = preg_replace('/\+/',' ',$address2);
$address3 = preg_replace('/\+/',' ',$address3);
$city = preg_replace('/\+/',' ',$city);
$province = preg_replace('/\+/',' ',$province);
$postal_code = preg_replace('/\+/',' ',$postal_code);
$alt_phone = preg_replace('/\+/',' ',$alt_phone);
$email = preg_replace('/\+/',' ',$email);
$security_phrase = preg_replace('/\+/',' ',$security_phrase);
$multi_alt_phones = preg_replace('/\+/',' ',$multi_alt_phones);
$owner = preg_replace('/\+/',' ',$owner);

if (strlen($phone_number)<6) {$phone_number=$old_phone;}

$auth=0;
$auth_message = user_authorization($PHP_AUTH_USER,$PHP_AUTH_PW,'',1,0);
if ( ($auth_message == 'GOOD') or ($auth_message == '2FA') )
	{
	$auth=1;
	if ($auth_message == '2FA')
		{
		header ("Content-type: text/html; charset=utf-8");
		echo _QXZ("Your session is expired").". <a href=\"admin.php\">"._QXZ("Click here to log in")."</a>.\n";
		exit;
		}
	}

if ($auth < 1)
	{
	$VDdisplayMESSAGE = _QXZ("Login incorrect, please try again");
	if ($auth_message == 'LOCK')
		{
		$VDdisplayMESSAGE = _QXZ("Too many login attempts, try again in 15 minutes");
		Header ("Content-type: text/html; charset=utf-8");
		echo "$VDdisplayMESSAGE: |$PHP_AUTH_USER|$auth_message|\n";
		exit;
		}
	if ($auth_message == 'IPBLOCK')
		{
		$VDdisplayMESSAGE = _QXZ("Your IP Address is not allowed") . ": $ip";
		Header ("Content-type: text/html; charset=utf-8");
		echo "$VDdisplayMESSAGE: |$PHP_AUTH_USER|$auth_message|\n";
		exit;
		}
	Header("WWW-Authenticate: Basic realm=\"CONTACT-CENTER-ADMIN\"");
	Header("HTTP/1.0 401 Unauthorized");
	echo "$VDdisplayMESSAGE: |$PHP_AUTH_USER|$PHP_AUTH_PW|$auth_message|\n";
	exit;
	}

if ($non_latin > 0) {$rslt=mysql_to_mysqli("SET NAMES 'UTF8'", $link);}
$rights_stmt = "SELECT modify_leads,selected_language,status_group_id from vicidial_users where user='$PHP_AUTH_USER';";
if ($DB) {echo "|$stmt|\n";}
$rights_rslt=mysql_to_mysqli($rights_stmt, $link);
$rights_row=mysqli_fetch_row($rights_rslt);
$modify_leads =			$rights_row[0];
$VUselected_language =	$rights_row[1];
$VU_status_group_id =	$rights_row[2];

# check their permissions
if ($modify_leads < 1)
	{
	header ("Content-type: text/html; charset=utf-8");
	echo _QXZ("You do not have permissions to modify leads")."\n";
	exit;
	}

$stmt="SELECT full_name,modify_leads,admin_hide_lead_data,admin_hide_phone_data,user_group,user_level,ignore_group_on_search from vicidial_users where user='$PHP_AUTH_USER';";
$rslt=mysql_to_mysqli($stmt, $link);
$row=mysqli_fetch_row($rslt);
$LOGfullname =					$row[0];
$LOGmodify_leads =				$row[1];
$LOGadmin_hide_lead_data =		$row[2];
$LOGadmin_hide_phone_data =		$row[3];
$LOGuser_group =				$row[4];
$LOGuser_level =				$row[5];
$LOGignore_group_on_search =	$row[6];

$LOGallowed_listsSQL='';
$stmt="SELECT allowed_campaigns from vicidial_user_groups where user_group='$LOGuser_group';";
if ($DB) {$HTML_text.="|$stmt|\n";}
$rslt=mysql_to_mysqli($stmt, $link);
$row=mysqli_fetch_row($rslt);
$LOGallowed_campaigns =			$row[0];

if ( (!preg_match('/\-ALL/i', $LOGallowed_campaigns)) and ($LOGignore_group_on_search != '1') )
	{
	$rawLOGallowed_campaignsSQL = preg_replace("/ -/",'',$LOGallowed_campaigns);
	$rawLOGallowed_campaignsSQL = preg_replace("/ /","','",$rawLOGallowed_campaignsSQL);
	$LOGallowed_campaignsSQL = "and campaign_id IN('$rawLOGallowed_campaignsSQL')";
	$whereLOGallowed_campaignsSQL = "where campaign_id IN('$rawLOGallowed_campaignsSQL')";

	$stmt="SELECT list_id from vicidial_lists $whereLOGallowed_campaignsSQL;";
	$rslt=mysql_to_mysqli($stmt, $link);
	$lists_to_print = mysqli_num_rows($rslt);
	$o=0;
	while ($lists_to_print > $o) 
		{
		$rowx=mysqli_fetch_row($rslt);
		$camp_lists .= "'$rowx[0]',";
		$o++;
		}
	$camp_lists = preg_replace('/.$/i','',$camp_lists);;
	if (strlen($camp_lists)<2) {$camp_lists="''";}
	$LOGallowed_listsSQL = "and list_id IN($camp_lists)";
	$whereLOGallowed_listsSQL = "where list_id IN($camp_lists)";
	}


$SSmenu_background='015B91';
$SSframe_background='D9E6FE';
$SSstd_row1_background='9BB9FB';
$SSstd_row2_background='B9CBFD';
$SSstd_row3_background='8EBCFD';
$SSstd_row4_background='B6D3FC';
$SSstd_row5_background='A3C3D6';
$SSalt_row1_background='BDFFBD';
$SSalt_row2_background='99FF99';
$SSalt_row3_background='CCFFCC';
$SSweb_logo='default_old';
$SSbutton_color='EFEFEF';

if ($SSadmin_screen_colors != 'default')
	{
	$stmt = "SELECT menu_background,frame_background,std_row1_background,std_row2_background,std_row3_background,std_row4_background,std_row5_background,alt_row1_background,alt_row2_background,alt_row3_background,web_logo,button_color FROM vicidial_screen_colors where colors_id='$SSadmin_screen_colors';";
	$rslt=mysql_to_mysqli($stmt, $link);
	if ($DB) {echo "$stmt\n";}
	$colors_ct = mysqli_num_rows($rslt);
	if ($colors_ct > 0)
		{
		$row=mysqli_fetch_row($rslt);
		$SSmenu_background =		$row[0];
		$SSframe_background =		$row[1];
		$SSstd_row1_background =	$row[2];
		$SSstd_row2_background =	$row[3];
		$SSstd_row3_background =	$row[4];
		$SSstd_row4_background =	$row[5];
		$SSstd_row5_background =	$row[6];
		$SSalt_row1_background =	$row[7];
		$SSalt_row2_background =	$row[8];
		$SSalt_row3_background =	$row[9];
		$SSweb_logo =				$row[10];
		$SSbutton_color =			$row[11];
		}
	}


#############################################
##### BEGIN modify log status functions #####
#############################################
if ($modify_log_submit>0)
	{
	if ( ($LOGmodify_leads == '3') or ($LOGmodify_leads == '4') )
		{
		if (strlen($modify_log_status)>0)
			{
			if ( (strlen($lead_id)>0) and (strlen($modify_log_table)>3) and (strlen($modify_log_status)>0) and (strlen($modify_old_status)>0) and (strlen($vicidial_id) > 0) and (strlen($log_date) > 10) )
				{
				$stmt='';
				if ($modify_log_table == 'vicidial_log')
					{
					$stmt="UPDATE vicidial_log set status='$modify_log_status' where lead_id='$lead_id' and uniqueid='$vicidial_id' and call_date='$log_date';";
					}
				if ($modify_log_table == 'vicidial_log_archive')
					{
					$stmt="UPDATE vicidial_log_archive set status='$modify_log_status' where lead_id='$lead_id' and uniqueid='$vicidial_id' and call_date='$log_date';";
					}
				if ($modify_log_table == 'vicidial_closer_log')
					{
					$stmt="UPDATE vicidial_closer_log set status='$modify_log_status' where lead_id='$lead_id' and closecallid='$vicidial_id' and call_date='$log_date';";
					}
				if ($modify_log_table == 'vicidial_closer_log_archive')
					{
					$stmt="UPDATE vicidial_closer_log_archive set status='$modify_log_status' where lead_id='$lead_id' and closecallid='$vicidial_id' and call_date='$log_date';";
					}
				if ($modify_log_table == 'vicidial_agent_log')
					{
					$stmt="UPDATE vicidial_agent_log set status='$modify_log_status' where lead_id='$lead_id' and agent_log_id='$vicidial_id' and event_time='$log_date';";
					}
				if ($modify_log_table == 'vicidial_agent_log_archive')
					{
					$stmt="UPDATE vicidial_agent_log_archive set status='$modify_log_status' where lead_id='$lead_id' and agent_log_id='$vicidial_id' and event_time='$log_date';";
					}

				if (strlen($stmt)>20)
					{
					if ($DB) {echo "$stmt\n";}
					$rslt=mysql_to_mysqli($stmt, $link);
					$affected_rows = mysqli_affected_rows($link);

					$SQL_log = addslashes($stmt);
					$stmt="INSERT INTO vicidial_admin_log set event_date='$NOW_TIME', user='$PHP_AUTH_USER', ip_address='$ip', event_section='LEADS', event_type='MODIFY', record_id='$lead_id', event_code='MODIFY LEAD LOG STATUS', event_sql=\"$SQL_log\", event_notes='$lead_id|$modify_log_table|$modify_log_status|$modify_old_status|$vicidial_id|$log_date|$affected_rows';";
					if ($DB) {echo "|$stmt|\n";}
					$rslt=mysql_to_mysqli($stmt, $link);

					echo "SUCCESS: "._QXZ("Log Status Modified").": $modify_log_status \n";
					exit;
					}
				else
					{
					echo "ERROR: "._QXZ("Modification could not be completed").": $stmt|$lead_id|$modify_log_table|$modify_log_status|$modify_old_status|$vicidial_id|$log_date \n";
					exit;
					}
				}
			else
				{
				echo "ERROR: "._QXZ("Missing required fields").": $lead_id|$modify_log_table|$modify_log_status|$modify_old_status|$vicidial_id|$log_date \n";
				exit;
				}
			}
		else
			{
			echo "ERROR: "._QXZ("Log status not changed, new status is blank or the same as the old status").": $modify_log_status \n";
			exit;
			}
		}
	else
		{
		echo "ERROR: "._QXZ("You do not have permission to modify log statuses").": $LOGmodify_leads \n";
		exit;
		}
	}
############################################
##### END modify log status functions #####
#############################################


################################
##### BEGIN GDPR functions #####
################################
if ($enable_gdpr_download_deletion>0) 
	{
	$stmt="SELECT export_gdpr_leads from vicidial_users where user='$PHP_AUTH_USER' and export_gdpr_leads >= 1;";
	$rslt=mysql_to_mysqli($stmt, $link);
	$row=mysqli_fetch_row($rslt);
	$gdpr_display=$row[0];

	if ($gdpr_display>=1 && $gdpr_action && $lead_id)
		{
		$table_array=array("vicidial_list", "recording_log", "vicidial_log", "vicidial_xfer_log", "vicidial_closer_log", "vicidial_carrier_log", "vicidial_agent_log");
		$date_field_array=array("entry_date", "start_time", "call_date", "call_date", "call_date", "call_date", "event_time");
		$purge_field_array=array(
			"vicidial_list" => array("phone_code", "phone_number", "title", "first_name", "middle_initial", "last_name", "address1", "address2", "address3", "city", "state", "province", "postal_code", "country_code", "gender", "date_of_birth", "alt_phone", "email", "security_phrase", "comments"),
			"vicidial_log" => array(),
			"vicidial_xfer_log" => array(),
			"vicidial_closer_log" => array(),
			"vicidial_carrier_log" => array(),
			"vicidial_agent_log" => array(),
			"recording_log" => array("filename", "location")
		);
		$table_count=count($table_array);

		$CSV_text="";
		$HTML_text="";
		$SQL_log = "";

		if ($gdpr_action=="confirm_purge")
			{
			$archive_table_name=use_archive_table("vicidial_list");
			$mysql_stmt="(select list_id from vicidial_list where lead_id='$lead_id')";
			if ($archive_table_name!="vicidial_list") {$mysql_stmt.=" UNION (select list_id from ".$archive_table_name." where lead_id='$lead_id')";}
			$mysql_rslt=mysql_to_mysqli($mysql_stmt, $link);
			if(mysqli_num_rows($mysql_rslt)>0)
				{
				$mysql_row=mysqli_fetch_row($mysql_rslt);
				$list_id=$mysql_row[0];
				}

			for ($t=0; $t<$table_count; $t++) 
				{
				$table_name=$table_array[$t];
				$archive_table_name=use_archive_table($table_name);

				if ($list_id && $table_name=="vicidial_list" && table_exists("custom_$list_id")) 
					{
					array_splice($table_array, 1, 0, "custom_$list_id");
					array_splice($date_field_array, 1, 0, "lead_id");
					$custom_table_array=array("custom_$list_id" => array());
					$purge_field_array=array_merge($purge_field_array, $custom_table_array);
					$table_count++;

					$custom_stmt="SHOW COLUMNS FROM custom_".$list_id."";
					$custom_rslt=mysql_to_mysqli($custom_stmt, $link);
					while($custom_row=mysqli_fetch_row($custom_rslt)) 
						{
						if ($custom_row[0]!="lead_id")
							{
							array_push($purge_field_array["custom_$list_id"], $custom_row[0]);
							}
						}
					}

				if(count($purge_field_array["$table_name"])>0) 
					{
					if ($table_name=="recording_log") 
						{
						$ins_stmt="insert ignore into recording_log_deletion_queue(recording_id,lead_id, filename, location, date_queued) (select recording_id,lead_id, filename, location, now() from recording_log where lead_id='$lead_id') UNION (select recording_id,lead_id, filename, location, now() from recording_log_archive where lead_id='$lead_id')";
						$ins_rslt=mysql_to_mysqli($ins_stmt, $link);
						}
					
					$upd_clause=implode("=null, ", $purge_field_array["$table_name"])."=null ";
					$upd_stmt="update $table_name set $upd_clause where lead_id='$lead_id'";
					$upd_rslt=mysql_to_mysqli($upd_stmt, $link);
					$SQL_log.="$upd_stmt|";
					if ($archive_table_name!=$table_name) 
						{
						$upd_stmt="update $archive_table_name set $upd_clause where lead_id='$lead_id'";
						$upd_rslt=mysql_to_mysqli($upd_stmt, $link);
						$SQL_log.="$upd_stmt|";
						}
					}
				}

			$SQL_log = addslashes($SQL_log);
			$stmt="INSERT INTO vicidial_admin_log set event_date='$NOW_TIME', user='$PHP_AUTH_USER', ip_address='$ip', event_section='LEADS', event_type='DELETE', record_id='$lead_id', event_code='GDPR PURGE LEAD DATA', event_sql=\"$SQL_log\", event_notes='';";
			if ($DB) {echo "|$stmt|\n";}
			$rslt=mysql_to_mysqli($stmt, $link);
			}

		$HTML_text.="<BR><BR>";
		$HTML_text.="<TABLE width=1000 cellspacing=1 cellpadding=5>\n";
		$HTML_text.="<tr>\n";
		$HTML_text.="\t<td align='left'><B>"._QXZ("GDPR DATA PURGE PREVIEW")."</B> <I>("._QXZ("greyed fields will be emptied").")</I>:</td>";
		$HTML_text.="\t<th><a href=\"admin_modify_lead.php?lead_id=$lead_id&gdpr_action=download\">"._QXZ("DOWNLOAD")."</a></th>";
		$HTML_text.="\t<th><a href=\"admin_modify_lead.php?lead_id=$lead_id&gdpr_action=confirm_purge\">"._QXZ("CONFIRM PURGE")."</a></th>";
		$HTML_text.="</tr>";
		$HTML_text.="</table><BR><BR>";

		for ($t=0; $t<$table_count; $t++) 
			{
			$table_name=$table_array[$t];
			$archive_table_name=use_archive_table($table_name);
			$mysql_stmt="(select * from ".$table_name." where lead_id='$lead_id')";
			if ($archive_table_name!=$table_name) {$mysql_stmt.=" UNION (select * from ".$archive_table_name." where lead_id='$lead_id')";}
			$list_id=""; $HTML_header=""; $CSV_header=""; $HTML_body=""; $CSV_body="";
			
			$mysql_stmt.=" order by ".$date_field_array[$t]." desc";
			$mysql_rslt=mysql_to_mysqli($mysql_stmt, $link);
			if ($DB) {echo "|$mysql_stmt|\n";}
			if (mysqli_num_rows($mysql_rslt)>0)
				{
				$CSV_text.="\""._QXZ("TABLE NAME").":\",\"$table_name\"\n";
				$HTML_text.="<B>"._QXZ("TABLE NAME").": $table_name</B><BR>\n";
				$HTML_text.="<TABLE width=1000 cellspacing=1 cellpadding=5>\n";

				$j=0;
				while($row=mysqli_fetch_array($mysql_rslt,MYSQLI_ASSOC)) 
					{
					if ($j%2==0) 
						{
						$bgcolor=$SSstd_row2_background;
						} 
					else 
						{
						$bgcolor=$SSstd_row3_background;
						}

					if ($j==0)
						{
						$HTML_header.="<tr>\n";
						}
					$HTML_body.="<tr>\n";
#					while (list($key, $val)=each($row)) 
					foreach ($row as $key => $val)
						{
						if ($key=="entry_list_id") {$list_id=$val;}
						if (in_array($key, $purge_field_array["$table_name"]) || (preg_match("/^custom_/", $table_name) && $key!="lead_id")) 
							{
							$bgcolor="bgcolor='#999999'";
							$sb="<B>";
							$eb="</B>";
							} 
						else 
							{
							$bgcolor="bgcolor='#$SSstd_row1_background'";
							$sb="";
							$eb="";
							}
						if ($j==0)
							{ 
							$CSV_header.="\"".$key."\",";
							$HTML_header.="\t<td $bgcolor>$sb<font size='2'>".$key."</font>$eb</td>\n";
							}
						$CSV_body.="\"$val\",";
						$HTML_body.="\t<td $bgcolor>$sb<font size='2'>".$val."</font>$eb</td>\n";
						}
					if ($j==0)
						{
						$CSV_header=substr($CSV_header, 0, -1)."\n";
						$HTML_header.="</tr>\n";
						}
					$CSV_body=substr($CSV_body, 0, -1)."\n";
					$HTML_body.="</tr>\n";
					$j++;
					}

					$CSV_text.=$CSV_header.$CSV_body;
					$HTML_text.=$HTML_header.$HTML_body;
					
					$CSV_text.="\n";
					$HTML_text.="</table><BR><BR>";

				}

				if ($list_id && $table_name=="vicidial_list" && table_exists("custom_$list_id") && !in_array("custom_$list_id", $table_array)) 
				{
					array_splice($table_array, 1, 0, "custom_$list_id");
					array_splice($date_field_array, 1, 0, "lead_id");
					$custom_table_array=array("custom_$list_id" => array());
					$purge_field_array=array_merge($purge_field_array, $custom_table_array);
					$table_count++;
				}
			}

		if (strlen($CSV_text)>0 && $gdpr_action=="download") 
			{
			$rec_stmt="select start_time, location, filename from recording_log where lead_id='$lead_id' order by start_time asc";
			$rec_rslt=mysql_to_mysqli($rec_stmt, $link);
			$files_to_zip=array();
			while ($rec_row=mysqli_fetch_row($rec_rslt)) {
				$start_time=$rec_row[0];
				$start_date=substr($start_time, 1, 10);
				$location=$rec_row[1];
				$filename=$rec_row[2];
				preg_match("/$filename.*$/", $location, $matches);
				
				$destination_filename=$matches[0];

				set_time_limit(0);

				$fp = fopen("/tmp/$destination_filename", 'w+');
				$ch = curl_init(str_replace(" ","%20",$location));
				curl_setopt($ch, CURLOPT_TIMEOUT, 50);
				curl_setopt($ch, CURLOPT_FILE, $fp);
				curl_setopt($ch, CURLOPT_FOLLOWLOCATION, true);
				curl_exec($ch);
				curl_close($ch);
				fclose($fp);

				array_push($files_to_zip, "$destination_filename");
			}

			$stmt="INSERT INTO vicidial_admin_log set event_date='$NOW_TIME', user='$PHP_AUTH_USER', ip_address='$ip', event_section='LEADS', event_type='EXPORT', record_id='$lead_id', event_code='GDPR EXPORT LEAD DATA', event_sql=\"$SQL_log\", event_notes='';";
			if ($DB) {echo "|$stmt|\n";}
			$rslt=mysql_to_mysqli($stmt, $link);

			
			$FILE_TIME = date("Ymd-His");
			$CSVfilename = "GDPR_export_$US$FILE_TIME.csv";
			$CSV_text=preg_replace('/^\s+/', '', $CSV_text);
			$CSV_text=preg_replace('/ +\"/', '"', $CSV_text);
			$CSV_text=preg_replace('/\" +/', '"', $CSV_text);

			array_push($files_to_zip, "$CSVfilename");
			$fp = fopen("/tmp/$CSVfilename", 'w+');
			fwrite($fp, $CSV_text);
			fclose($fp);

			$zipname = "$lead_id.zip";
			$zip = new ZipArchive;
			$zip->open($zipname, ZipArchive::CREATE);
			foreach ($files_to_zip as $file) {
				$tempfile="/tmp/$file";
				$zip->addFile($tempfile);
			}
			$zip->close();

			header('Content-Type: application/zip');
			header('Content-disposition: attachment; filename='.$zipname);
			header('Content-Length: ' . filesize($zipname));
			readfile($zipname);

			/*
			// We'll be outputting a TXT file
			header('Content-type: application/octet-stream');

			// It will be called LIST_101_20090209-121212.txt
			header("Content-Disposition: attachment; filename=\"$CSVfilename\"");
			header('Expires: 0');
			header('Cache-Control: must-revalidate, post-check=0, pre-check=0');
			header('Pragma: public');
			ob_clean();
			flush();

			echo "$CSV_text";
			*/

			exit;
			}
		}


	}
################################
##### END GDPR functions #####
################################


$label_title =				_QXZ("Title");
$label_first_name =			_QXZ("First");
$label_middle_initial =		_QXZ("MI");
$label_last_name =			_QXZ("Last");
$label_address1 =			_QXZ("Address1");
$label_address2 =			_QXZ("Address2");
$label_address3 =			_QXZ("Address3");
$label_city =				_QXZ("City");
$label_state =				_QXZ("State");
$label_province =			_QXZ("Province");
$label_postal_code =		_QXZ("Postal Code");
$label_vendor_lead_code =	_QXZ("Vendor ID");
$label_source_id =			_QXZ("Source ID");
$label_gender =				_QXZ("Gender");
$label_phone_number =		_QXZ("Phone");
$label_phone_code =			_QXZ("DialCode");
$label_alt_phone =			_QXZ("Alt. Phone");
$label_security_phrase =	_QXZ("Show");
$label_email =				_QXZ("Email");
$label_comments =			_QXZ("Comments");
$label_lead_id =			_QXZ("Lead ID");
$label_list_id =			_QXZ("List ID");
$label_entry_date =			_QXZ("Entry Date");
$label_gmt_offset_now =		_QXZ("Timezone");
$label_source_id =			_QXZ("Source ID");
$label_called_since_last_reset = _QXZ("Reset Code");
$label_status =				_QXZ("Status");
$label_user =				_QXZ("User");
$label_date_of_birth =		_QXZ("Date of Birth");
$label_country_code =		_QXZ("Country");
$label_last_local_call_time =	_QXZ("Last Call");
$label_called_count =		_QXZ("Called Count");
$label_rank =				_QXZ("Rank");
$label_owner =				_QXZ("Owner");
$label_entry_list_id =		_QXZ("Entry List ID");

### find any custom field labels
$stmt="SELECT label_title,label_first_name,label_middle_initial,label_last_name,label_address1,label_address2,label_address3,label_city,label_state,label_province,label_postal_code,label_vendor_lead_code,label_gender,label_phone_number,label_phone_code,label_alt_phone,label_security_phrase,label_email,label_comments,label_lead_id,label_list_id,label_entry_date,label_gmt_offset_now,label_source_id,label_called_since_last_reset,label_status,label_user,label_date_of_birth,label_country_code,label_last_local_call_time,label_called_count,label_rank,label_owner,label_entry_list_id from system_settings;";
$rslt=mysql_to_mysqli($stmt, $link);
$row=mysqli_fetch_row($rslt);
if (strlen($row[0])>0)	{$label_title =				$row[0];}
if (strlen($row[1])>0)	{$label_first_name =		$row[1];}
if (strlen($row[2])>0)	{$label_middle_initial =	$row[2];}
if (strlen($row[3])>0)	{$label_last_name =			$row[3];}
if (strlen($row[4])>0)	{$label_address1 =			$row[4];}
if (strlen($row[5])>0)	{$label_address2 =			$row[5];}
if (strlen($row[6])>0)	{$label_address3 =			$row[6];}
if (strlen($row[7])>0)	{$label_city =				$row[7];}
if (strlen($row[8])>0)	{$label_state =				$row[8];}
if (strlen($row[9])>0)	{$label_province =			$row[9];}
if (strlen($row[10])>0) {$label_postal_code =		$row[10];}
if (strlen($row[11])>0) {$label_vendor_lead_code =	$row[11];}
if (strlen($row[12])>0) {$label_gender =			$row[12];}
if (strlen($row[13])>0) {$label_phone_number =		$row[13];}
if (strlen($row[14])>0) {$label_phone_code =		$row[14];}
if (strlen($row[15])>0) {$label_alt_phone =			$row[15];}
if (strlen($row[16])>0) {$label_security_phrase =	$row[16];}
if (strlen($row[17])>0) {$label_email =				$row[17];}
if (strlen($row[18])>0) {$label_comments =			$row[18];}
if (strlen($row[19])>0) {$label_lead_id =			$row[19];}
if (strlen($row[20])>0) {$label_list_id =			$row[20];}
if (strlen($row[21])>0) {$label_entry_date =		$row[21];}
if (strlen($row[22])>0) {$label_gmt_offset_now =	$row[22];}
if (strlen($row[23])>0) {$label_source_id =			$row[23];}
if (strlen($row[24])>0) {$label_called_since_last_reset = $row[24];}
if (strlen($row[25])>0) {$label_status =			$row[25];}
if (strlen($row[26])>0) {$label_user =				$row[26];}
if (strlen($row[27])>0) {$label_date_of_birth =		$row[27];}
if (strlen($row[28])>0) {$label_country_code =		$row[28];}
if (strlen($row[29])>0) {$label_last_local_call_time =	$row[29];}
if (strlen($row[30])>0) {$label_called_count =		$row[30];}
if (strlen($row[31])>0) {$label_rank =				$row[31];}
if (strlen($row[32])>0) {$label_owner =				$row[32];}
if (strlen($row[33])>0) {$label_entry_list_id =		$row[33];}


##### BEGIN vicidial_list FIELD LENGTH LOOKUP #####
$MAXvendor_lead_code =		'20';
$MAXsource_id =				'50';
$MAXphone_code =			'10';
$MAXphone_number =			'18';
$MAXtitle =					'4';
$MAXfirst_name =			'30';
$MAXmiddle_initial =		'1';
$MAXlast_name =				'30';
$MAXaddress1 =				'100';
$MAXaddress2 =				'100';
$MAXaddress3 =				'100';
$MAXcity =					'50';
$MAXstate =					'2';
$MAXprovince =				'50';
$MAXpostal_code =			'10';
$MAXalt_phone =				'12';
$MAXemail =					'70';
$MAXsecurity_phrase =		'100';
$MAXcountry_code =			'3';
$MAXowner =					'20';

$stmt = "SHOW COLUMNS FROM vicidial_list;";
$rslt=mysql_to_mysqli($stmt, $link);
if ($DB) {echo "$stmt\n";}
$scvl_ct = mysqli_num_rows($rslt);
$s=0;
while ($scvl_ct > $s)
	{
	$row=mysqli_fetch_row($rslt);
	$vl_field =	$row[0];
	$vl_type = preg_replace("/[^0-9]/",'',$row[1]);
	if (strlen($vl_type) > 0)
		{
		if ( ($vl_field == 'vendor_lead_code') and ($MAXvendor_lead_code != $vl_type) )
			{$MAXvendor_lead_code = $vl_type;}
		if ( ($vl_field == 'source_id') and ($MAXsource_id != $vl_type) )
			{$MAXsource_id = $vl_type;}
		if ( ($vl_field == 'phone_code') and ($MAXphone_code != $vl_type) )
			{$MAXphone_code = $vl_type;}
		if ( ($vl_field == 'phone_number') and ($MAXphone_number != $vl_type) )
			{$MAXphone_number = $vl_type;}
		if ( ($vl_field == 'title') and ($MAXtitle != $vl_type) )
			{$MAXtitle = $vl_type;}
		if ( ($vl_field == 'first_name') and ($MAXfirst_name != $vl_type) )
			{$MAXfirst_name = $vl_type;}
		if ( ($vl_field == 'middle_initial') and ($MAXmiddle_initial != $vl_type) )
			{$MAXmiddle_initial = $vl_type;}
		if ( ($vl_field == 'last_name') and ($MAXlast_name != $vl_type) )
			{$MAXlast_name = $vl_type;}
		if ( ($vl_field == 'address1') and ($MAXaddress1 != $vl_type) )
			{$MAXaddress1 = $vl_type;}
		if ( ($vl_field == 'address2') and ($MAXaddress2 != $vl_type) )
			{$MAXaddress2 = $vl_type;}
		if ( ($vl_field == 'address3') and ($MAXaddress3 != $vl_type) )
			{$MAXaddress3 = $vl_type;}
		if ( ($vl_field == 'city') and ($MAXcity != $vl_type) )
			{$MAXcity = $vl_type;}
		if ( ($vl_field == 'state') and ($MAXstate != $vl_type) )
			{$MAXstate = $vl_type;}
		if ( ($vl_field == 'province') and ($MAXprovince != $vl_type) )
			{$MAXprovince = $vl_type;}
		if ( ($vl_field == 'postal_code') and ($MAXpostal_code != $vl_type) )
			{$MAXpostal_code = $vl_type;}
		if ( ($vl_field == 'alt_phone') and ($MAXalt_phone != $vl_type) )
			{$MAXalt_phone = $vl_type;}
		if ( ($vl_field == 'email') and ($MAXemail != $vl_type) )
			{$MAXemail = $vl_type;}
		if ( ($vl_field == 'security_phrase') and ($MAXsecurity_phrase != $vl_type) )
			{$MAXsecurity_phrase = $vl_type;}
		if ( ($vl_field == 'country_code') and ($MAXcountry_code != $vl_type) )
			{$MAXcountry_code = $vl_type;}
		if ( ($vl_field == 'owner') and ($MAXowner != $vl_type) )
			{$MAXowner = $vl_type;}
		}
	$s++;
	}
##### END vicidial_list FIELD LENGTH LOOKUP #####

### find out if status(dispo) is a scheduled callback status
$scheduled_callback='';
$stmt="SELECT scheduled_callback from vicidial_statuses where status='$dispo';";
$rslt=mysql_to_mysqli($stmt, $link);
$scb_count_to_print = mysqli_num_rows($rslt);
if ($scb_count_to_print > 0) 
	{
	$row=mysqli_fetch_row($rslt);
	if (strlen($row[0])>0)	{$scheduled_callback =	$row[0];}
	}
$stmt="SELECT scheduled_callback from vicidial_campaign_statuses where status='$dispo';";
$rslt=mysql_to_mysqli($stmt, $link);
$scb_count_to_print = mysqli_num_rows($rslt);
if ($scb_count_to_print > 0) 
	{
	$row=mysqli_fetch_row($rslt);
	if (strlen($row[0])>0)	{$scheduled_callback =	$row[0];}
	}

$search_archived_data='';
if ($archive_log == 'Yes') {$search_archived_data='checked';}

$vdc_form_display = 'vdc_form_display.php';
if (preg_match("/cf_encrypt/",$active_modules))
	{$vdc_form_display = 'vdc_form_display_encrypt.php';}

header ("Content-type: text/html; charset=utf-8");

echo "<html>\n";
echo "<head>\n";
echo "<META HTTP-EQUIV=\"Content-Type\" CONTENT=\"text/html; charset=utf-8\">\n";
echo "<TITLE>"._QXZ("Modify Lead")."</TITLE>\n";
?>
<STYLE type="text/css">
<!--
body 
	{
    font-family: HELVETICA;
	}

.form_field 
	{
	font-family: Helvetica;
	font-size: 10px;
	margin-bottom: 3px;
	padding: 2px;
	border: solid 1px;
	}

-->
</STYLE>
<script language="JavaScript">
function UpdateCallback(callback_id) {
	var apt_date_field="appointment_date_"+callback_id;
	var apt_hour_field="appointment_hour_"+callback_id;
	var apt_min_field="appointment_min_"+callback_id;
	var cbstatus_field="CBstatus_"+callback_id;
	var cbuser_field="CBuser_"+callback_id;
	var comments_field="comments_"+callback_id;
	var recipient_field="CBchangeRecipient_"+callback_id;

	var appointment_date=document.getElementById(apt_date_field).value;
	var e = document.getElementById(apt_hour_field);
	var appointment_hour = e.options[e.selectedIndex].text;
	var e = document.getElementById(apt_min_field);
	var appointment_min = e.options[e.selectedIndex].text;
	var CBstatus=document.getElementById(cbstatus_field).value;
	var CBuser=document.getElementById(cbuser_field).value;
	var recipientField=document.getElementsByName(recipient_field);


    for (var i = 0; i < recipientField.length; i++) {
        var button = recipientField[i];
        if (button.checked) {
            var recipient=button.value;
        }
    }
	
	if(recipient=="A") {
		var CBchangeUSERtoANY="YES";
		var CBchangeANYtoUSER="";
	} else if(recipient=="U") {
		var CBchangeUSERtoANY="";
		var CBchangeANYtoUSER="YES";
	}

	var appointment_time = appointment_hour + ":" + appointment_min + ":00";

	var comments=encodeURIComponent(document.getElementById(comments_field).value);

	document.getElementById('vsn').action="<?php echo $PHP_SELF; ?>?appointment_date="+appointment_date+"&appointment_time="+appointment_time+"&CBstatus="+CBstatus+"&CBchangeUSERtoANY="+CBchangeUSERtoANY+"&CBchangeANYtoUSER="+CBchangeANYtoUSER+"&CBuser="+CBuser+"&comments="+comments+"&callback_id="+callback_id;
	document.vsn.submit();
}

var mouseY=0;
function getMousePos(event) {mouseY=event.pageY;}
document.addEventListener("click", getMousePos);
// Detect if the browser is IE or not.
// If it is not IE, we assume that the browser is NS.
var IE = document.all?true:false
// If NS -- that is, !IE -- then set up for mouse capture
if (!IE) document.captureEvents(Event.MOUSEMOVE);

<?php

##############################################
##### BEGIN Log Status Modify javascript #####
##############################################
if ( ($LOGmodify_leads == '3') or ($LOGmodify_leads == '4') )
	{
	echo "vicidial_log_mod = new Array('');\n";
	echo "vicidial_closer_log_mod = new Array('');\n";
	echo "vicidial_agent_log_mod = new Array('');\n";
	echo "vicidial_log_archive_mod = new Array('');\n";
	echo "vicidial_closer_log_archive_mod = new Array('');\n";
	echo "vicidial_agent_log_archive_mod = new Array('');\n";
	echo "var LogMod_ct = '';\n";
	echo "var LogMod_log_table = '';\n";
	echo "var LogMod_uniqueid = '';\n";
	echo "var LogMod_lead_id = '';\n";
	echo "var LogMod_call_date = '';\n";
	echo "var LogMod_status = '';\n";
	echo "var LogMod_new_status = '';\n";
	echo "\n";
	echo "function ClearAndHideLogModDiv() {\n";
	echo "	document.getElementById(\"LogModDisplayDiv\").innerHTML=\"\";\n";
	echo "	document.getElementById(\"LogModDisplayDiv\").style.display=\"none\";\n";
	echo "	document.getElementById(\"LogModDisplayDiv\").style.backgroundColor=\"transparent\";\n";
	echo "	document.getElementById(\"LogModDisplayDiv\").style.padding=\"0px\";\n";
	echo "  LogMod_ct = '';\n";
	echo "  LogMod_log_table = '';\n";
	echo "  LogMod_uniqueid = '';\n";
	echo "  LogMod_lead_id = '';\n";
	echo "  LogMod_call_date = '';\n";
	echo "  LogMod_status = '';\n";
	echo "  LogMod_new_status = '';\n";
	echo "}\n";
	echo "function ModifyLogDisplayShow(e, ct, log_table, uniqueid, lead_id, call_date, status, user) \n";
	echo "	{\n";
	echo "	document.getElementById(\"LogModDisplayDiv\").innerHTML=\"\";\n";
	echo "	if (IE) { // grab the x-y pos.s if browser is IE\n";
	echo "		tempX = event.clientX + document.body.scrollLeft+10\n";
	echo "		tempY = event.clientY + document.body.scrollTop\n";
	echo "	} else {  // grab the x-y pos.s if browser is NS\n";
	echo "		tempX = e.pageX\n";
	echo "		tempY = e.pageY\n";
	echo "	}  \n";
	echo "	// catch possible negative values in NS4\n";
	echo "	if (tempX < 0){tempX = 0}\n";
	echo "	if (tempY < 0){tempY = 0}  \n";
	echo "	// show the position values in the form named Show\n";
	echo "	// in the text fields named MouseX and MouseY\n";
	echo "	tempX-=40;\n";
	echo "	tempY+=10;\n";
	echo "	document.getElementById(\"LogModDisplayDiv\").style.display=\"block\";\n";
	echo "	document.getElementById(\"LogModDisplayDiv\").style.left = tempX + \"px\";\n";
	echo "	document.getElementById(\"LogModDisplayDiv\").style.top = tempY + \"px\";\n";
	echo "	document.getElementById(\"LogModDisplayDiv\").style.backgroundColor=\"#$SSframe_background\";\n";
	echo "	document.getElementById(\"LogModDisplayDiv\").style.padding=\"15px\";\n";
	#echo "  alert(tempX + '|' + tempY);\n";
	echo "	var ModifyVerbiage = null;\n";
	echo "  if (log_table == 'vicidial_log') {ModifyVerbiage = vicidial_log_mod[ct];}\n";
	echo "  if (log_table == 'vicidial_closer_log') {ModifyVerbiage = vicidial_closer_log_mod[ct];}\n";
	echo "  if (log_table == 'vicidial_agent_log') {ModifyVerbiage = vicidial_agent_log_mod[ct];}\n";
	echo "  if (log_table == 'vicidial_log_archive') {ModifyVerbiage = vicidial_log_archive_mod[ct];}\n";
	echo "  if (log_table == 'vicidial_closer_log_archive') {ModifyVerbiage = vicidial_closer_log_archive_mod[ct];}\n";
	echo "  if (log_table == 'vicidial_agent_log_archive') {ModifyVerbiage = vicidial_agent_log_archive_mod[ct];}\n";
	echo "	\n";
	echo "  LogMod_ct = ct;\n";
	echo "  LogMod_log_table = log_table;\n";
	echo "  LogMod_uniqueid = uniqueid;\n";
	echo "  LogMod_lead_id = lead_id;\n";
	echo "  LogMod_call_date = call_date;\n";
	echo "  LogMod_status = status;\n";
	echo "  \n";
	echo "	var temp_status_list = document.getElementById(\"statuses_listMODLOG\").innerHTML;\n";
	echo "	ModifyVerbiage = \"<b>"._QXZ("Log Entry Status Change").":</b><br>\" + ModifyVerbiage + \""._QXZ("New Status").": <br><select class='form_field' size=1 name='LogNewStatus' id='LogNewStatus'>\" + temp_status_list + \"<option SELECTED value=''>\" + status + \"</option></select><br><span id='LogNewSubmit' onClick='ModifyLogStatus()'><u><font color='blue'>SUBMIT</font></u></span> &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; <span id='LogNewClose' onClick='ClearAndHideLogModDiv()'><u><font color='blue'>close</font></u></span>\";";
	echo "	\n";
	echo "	document.getElementById(\"LogModDisplayDiv\").innerHTML=ModifyVerbiage;\n";
	echo "	}\n";

	echo "function ModifyLogStatus() \n";
	echo "	{\n";
	echo "  LogMod_new_status = '';\n";
	echo "  var temp_LogMod_new_statusIndex = document.getElementById('LogNewStatus').selectedIndex;\n";
	echo "  LogMod_new_status =  document.getElementById('LogNewStatus').options[temp_LogMod_new_statusIndex].value;\n";
	echo "	var ModifyVerbiage = null;\n";
	echo "	var xmlhttp=false;\n";
	echo "	/*@cc_on @*/\n";
	echo "	/*@if (@_jscript_version >= 5)\n";
	echo "	// JScript gives us Conditional compilation, we can cope with old IE versions.\n";
	echo "	// and security blocked creation of the objects.\n";
	echo "	 try {\n";
	echo "	  xmlhttp = new ActiveXObject(\"Msxml2.XMLHTTP\");\n";
	echo "	 } catch (e) {\n";
	echo "	  try {\n";
	echo "	   xmlhttp = new ActiveXObject(\"Microsoft.XMLHTTP\");\n";
	echo "	  } catch (E) {\n";
	echo "	   xmlhttp = false;\n";
	echo "	  }\n";
	echo "	 }\n";
	echo "	@end @*/\n";
	echo "	if (!xmlhttp && typeof XMLHttpRequest!='undefined')\n";
	echo "		{\n";
	echo "		xmlhttp = new XMLHttpRequest();\n";
	echo "		}\n";
	echo "	if (xmlhttp) \n";
	echo "		{ \n";
	echo "		modify_query = \"&modify_log_submit=1&lead_id=\"  + LogMod_lead_id + \"&modify_log_table=\"  + LogMod_log_table + \"&modify_old_status=\"  + LogMod_status + \"&vicidial_id=\"  + LogMod_uniqueid + \"&log_date=\"  + LogMod_call_date + \"&modify_log_status=\" + LogMod_new_status;\n";
	echo "		xmlhttp.open('POST', 'admin_modify_lead.php');\n";
	echo "		xmlhttp.setRequestHeader('Content-Type','application/x-www-form-urlencoded; charset=UTF-8');\n";
	echo "		xmlhttp.send(modify_query); \n";
	echo "		xmlhttp.onreadystatechange = function() \n";
	echo "			{ \n";
	echo "			if (xmlhttp.readyState == 4 && xmlhttp.status == 200) \n";
	echo "				{\n";
	echo "				ModifyVerbiage = xmlhttp.responseText;\n";
	echo "				var regLMerror = new RegExp(\"ERROR\",\"ig\");\n";
	echo "				if (ModifyVerbiage.match(regLMerror))\n";
	echo "				    {\n";
	echo "				 // alert('ERROR');\n";
	echo "				    }\n";
	echo "				else\n";
	echo "				    {\n";
	echo "                  var temp_ct_status = LogMod_log_table + '_status_' + LogMod_ct;\n";
	echo "                  document.getElementById(temp_ct_status).innerHTML = \"<font color=purple><b>\" + LogMod_new_status + \"</b></font>\";\n";
	echo "				    }\n";
	echo "	            ModifyVerbiage = ModifyVerbiage + \"<br><br><span id='LogNewClose' onClick='ClearAndHideLogModDiv()'><u><font color='blue'>close</font></u></span>\";";
	echo "				document.getElementById(\"LogModDisplayDiv\").innerHTML=ModifyVerbiage;\n";
	echo "				}\n";
	echo "			}\n";
	echo "		delete xmlhttp;\n";
	echo "		}\n";
	echo "	}\n";
	}
##############################################
##### END Log Status Modify javascript #####
##############################################


#######################################
##### BEGIN CID display javascript #####
#######################################
if ( ($CIDdisplay == "Yes") and ($SSsip_event_logging > 0) )
	{
	echo "function ClearAndHideDetailDiv() {\n";
	echo "	document.getElementById(\"DetailDisplayDiv\").innerHTML=\"\";\n";
	echo "	document.getElementById(\"DetailDisplayDiv\").style.display=\"none\";\n";
	echo "}\n";
	echo "function ShowCallDetail(e, call_id, color) \n";
	echo "	{\n";
	echo "	document.getElementById(\"DetailDisplayDiv\").innerHTML=\"\";\n";
	echo "	if (IE) { // grab the x-y pos.s if browser is IE\n";
	echo "		tempX = event.clientX + document.body.scrollLeft+250\n";
	echo "		tempY = event.clientY + document.body.scrollTop\n";
	echo "	} else {  // grab the x-y pos.s if browser is NS\n";
	echo "		tempX = e.pageX\n";
	echo "		tempY = e.pageY\n";
	echo "	}  \n";
	echo "	// catch possible negative values in NS4\n";
	echo "	if (tempX < 0){tempX = 0}\n";
	echo "	if (tempY < 0){tempY = 0}  \n";
	echo "	// show the position values in the form named Show\n";
	echo "	// in the text fields named MouseX and MouseY\n";
	echo "	tempX-=400;\n";
	echo "	tempY+=10;\n";
	echo "	document.getElementById(\"DetailDisplayDiv\").style.display=\"block\";\n";
	echo "	document.getElementById(\"DetailDisplayDiv\").style.left = tempX + \"px\";\n";
	echo "	document.getElementById(\"DetailDisplayDiv\").style.top = tempY + \"px\";\n";
	#echo "  alert(tempX + '|' + tempY);\n";
	echo "	var DetailVerbiage = null;\n";
	echo "	var xmlhttp=false;\n";
	echo "	/*@cc_on @*/\n";
	echo "	/*@if (@_jscript_version >= 5)\n";
	echo "	// JScript gives us Conditional compilation, we can cope with old IE versions.\n";
	echo "	// and security blocked creation of the objects.\n";
	echo "	 try {\n";
	echo "	  xmlhttp = new ActiveXObject(\"Msxml2.XMLHTTP\");\n";
	echo "	 } catch (e) {\n";
	echo "	  try {\n";
	echo "	   xmlhttp = new ActiveXObject(\"Microsoft.XMLHTTP\");\n";
	echo "	  } catch (E) {\n";
	echo "	   xmlhttp = false;\n";
	echo "	  }\n";
	echo "	 }\n";
	echo "	@end @*/\n";
	echo "	if (!xmlhttp && typeof XMLHttpRequest!='undefined')\n";
	echo "		{\n";
	echo "		xmlhttp = new XMLHttpRequest();\n";
	echo "		}\n";
	echo "	if (xmlhttp) \n";
	echo "		{ \n";
	echo "		detail_query = \"&search_archived_data=$search_archived_data&stage=\" + call_id + \"&color=\" + color;\n";
	echo "		xmlhttp.open('POST', 'AST_SIP_event_report.php');\n";
	echo "		xmlhttp.setRequestHeader('Content-Type','application/x-www-form-urlencoded; charset=UTF-8');\n";
	echo "		xmlhttp.send(detail_query); \n";
	echo "		xmlhttp.onreadystatechange = function() \n";
	echo "			{ \n";
	echo "			if (xmlhttp.readyState == 4 && xmlhttp.status == 200) \n";
	echo "				{\n";
	echo "				DetailVerbiage = xmlhttp.responseText;\n";
	echo "				document.getElementById(\"DetailDisplayDiv\").innerHTML=DetailVerbiage;\n";
	echo "				}\n";
	echo "			}\n";
	echo "		delete xmlhttp;\n";
	echo "		}\n";
	echo "	}\n";
	}
#######################################
##### END CID display javascript #####
#######################################

if ($gdpr_display==2 && preg_match("/purge$/", $gdpr_action))
	{
	echo "</script>\n";
	echo "<link rel=\"stylesheet\" href=\"calendar.css\">\n";
	echo "</head><BODY BGCOLOR=white marginheight=0 marginwidth=0 leftmargin=0 topmargin=0>\n";
	echo "<span style=\"position:absolute;left:0px;top:0px;z-index:20;\" id=admin_header>";

	$short_header=1;

	require("admin_header.php");

	echo "</span>\n";
	echo $HTML_text;
	echo "</body></html>";
	exit;
	}

$messagesHTML='';
$messagesHTML .= "<span style=\"position:absolute;left:3px;top:30px;z-index:19;\" id=agent_status_stats>\n";

### BEGIN - Add a new lead in the system ###
if ($lead_id == 'NEW')
	{
	$secX = date("U");
	$hour = date("H");
	$min = date("i");
	$sec = date("s");
	$mon = date("m");
	$mday = date("d");
	$year = date("Y");
	$isdst = date("I");
	$Shour = date("H");
	$Smin = date("i");
	$Ssec = date("s");
	$Smon = date("m");
	$Smday = date("d");
	$Syear = date("Y");

	### Grab Server GMT value from the database
	$stmt="SELECT local_gmt FROM servers where active='Y' limit 1;";
	$rslt=mysql_to_mysqli($stmt, $link);
	$gmt_recs = mysqli_num_rows($rslt);
	if ($gmt_recs > 0)
		{
		$row=mysqli_fetch_row($rslt);
		$DBSERVER_GMT		=		$row[0];
		if (strlen($DBSERVER_GMT)>0)	{$SERVER_GMT = $DBSERVER_GMT;}
		if ($isdst) {$SERVER_GMT++;} 
		}
	else
		{
		$SERVER_GMT = date("O");
		$SERVER_GMT = preg_replace("/\+/i","",$SERVER_GMT);
		$SERVER_GMT = ($SERVER_GMT + 0);
		$SERVER_GMT = ($SERVER_GMT / 100);
		}

	$LOCAL_GMT_OFF = $SERVER_GMT;
	$LOCAL_GMT_OFF_STD = $SERVER_GMT;

	$USarea = substr($phone_number, 0, 3);
	$USprefix = 	substr($phone_number, 3, 1);
	$postalgmt='';

	$gmt_offset = lookup_gmt($phone_code,$USarea,$state,$LOCAL_GMT_OFF_STD,$Shour,$Smin,$Ssec,$Smon,$Smday,$Syear,$postalgmt,$postal_code,$owner,$USprefix);
	$comments = preg_replace("/\n/",'!N',$comments);
	$comments = preg_replace("/\r/",'',$comments);

	$list_valid=0;
	$stmt="SELECT count(*) from vicidial_lists where list_id='" . mysqli_real_escape_string($link, $list_id) . "' $LOGallowed_campaignsSQL;";
	$rslt=mysql_to_mysqli($stmt, $link);
	$list_to_print = mysqli_num_rows($rslt);
	if ($list_to_print > 0) 
		{
		$rowx=mysqli_fetch_row($rslt);
		$list_valid = $rowx[0];
		}

	if ( ( ($list_valid > 0) or (preg_match('/\-ALL/i', $LOGallowed_campaigns)) ) and ($LOGmodify_leads != '5') )
		{
		$source_idSQL='';
		if ($SSsource_id_display > 0)
			{$source_idSQL = ",source_id='" . mysqli_real_escape_string($link, $source_id) . "'";}
		$stmt="INSERT INTO vicidial_list set status='" . mysqli_real_escape_string($link, $status) . "',title='" . mysqli_real_escape_string($link, $title) . "',first_name='" . mysqli_real_escape_string($link, $first_name) . "',middle_initial='" . mysqli_real_escape_string($link, $middle_initial) . "',last_name='" . mysqli_real_escape_string($link, $last_name) . "',address1='" . mysqli_real_escape_string($link, $address1) . "',address2='" . mysqli_real_escape_string($link, $address2) . "',address3='" . mysqli_real_escape_string($link, $address3) . "',city='" . mysqli_real_escape_string($link, $city) . "',state='" . mysqli_real_escape_string($link, $state) . "',province='" . mysqli_real_escape_string($link, $province) . "',postal_code='" . mysqli_real_escape_string($link, $postal_code) . "',country_code='" . mysqli_real_escape_string($link, $country_code) . "',alt_phone='" . mysqli_real_escape_string($link, $alt_phone) . "',phone_number='$phone_number',phone_code='$phone_code',email='" . mysqli_real_escape_string($link, $email) . "',security_phrase='" . mysqli_real_escape_string($link, $security) . "',comments='" . mysqli_real_escape_string($link, $comments) . "',rank='" . mysqli_real_escape_string($link, $rank) . "',owner='" . mysqli_real_escape_string($link, $owner) . "',vendor_lead_code='" . mysqli_real_escape_string($link, $vendor_id) . "'$source_idSQL, list_id='" . mysqli_real_escape_string($link, $list_id) . "',date_of_birth='" . mysqli_real_escape_string($link, $date_of_birth) . "',gmt_offset_now='$gmt_offset',entry_date=NOW();";
		if ($DB) {echo "$stmt\n";}
		$rslt=mysql_to_mysqli($stmt, $link);
		$affected_rows = mysqli_affected_rows($link);
		if ($affected_rows > 0)
			{
			$lead_id = mysqli_insert_id($link);
			$messagesHTML .= _QXZ("Lead has been added").": $lead_id ($gmt_offset)<BR><BR>\n";
			$end_call=0;
			}
		else
			{$messagesHTML .= _QXZ("ERROR: Lead not added, please go back and look at what you entered")."<BR><BR>\n";}
		}
	else
		{
		$messagesHTML .= _QXZ("you do not have permission to add this lead")." $list_id &nbsp; &nbsp; &nbsp; $NOW_TIME\n<BR><BR>\n";
		}
	### END - Add a new lead in the system ###
	}
else
	{
	$stmt="SELECT count(*) from $vl_table where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "'";
	$rslt=mysql_to_mysqli($stmt, $link);
	if ($DB) {echo "$stmt\n";}
	$row=mysqli_fetch_row($rslt);
	$lead_exists =	$row[0];

	$stmt="SELECT count(*) from $vl_table where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' $LOGallowed_listsSQL";
	$rslt=mysql_to_mysqli($stmt, $link);
	if ($DB) {echo "$stmt\n";}
	$row=mysqli_fetch_row($rslt);
	$lead_count =	$row[0];
	if ( ($lead_exists > 0) and ($lead_count < 1) )
		{
		echo "</script>\n";
		echo "<link rel=\"stylesheet\" href=\"calendar.css\">\n";
		echo "</head><BODY BGCOLOR=white marginheight=0 marginwidth=0 leftmargin=0 topmargin=0>\n";
		echo "<span style=\"position:absolute;left:0px;top:0px;z-index:20;\" id=admin_header>";

		$short_header=1;

		require("admin_header.php");

		echo "</span>\n";
		echo "<BR><BR><b>"._QXZ("lead does not exist").": $lead_id</b><BR><BR>\n";
		echo "</BODY>\n";
		echo "</html>\n";
		exit;
		}
	}

if (strlen($lead_id) < 1)
	{$lead_id = 'NEW';}

if ($end_call > 0)
	{
	$comments = preg_replace("/\n/",'!N',$comments);
	$comments = preg_replace("/\r/",'',$comments);

	$list_valid=0;
	$stmt="SELECT count(*) from vicidial_lists where list_id='" . mysqli_real_escape_string($link, $list_id) . "' $LOGallowed_campaignsSQL;";
	$rslt=mysql_to_mysqli($stmt, $link);
	$list_to_print = mysqli_num_rows($rslt);
	if ($list_to_print > 0) 
		{
		$rowx=mysqli_fetch_row($rslt);
		$list_valid = $rowx[0];
		}

	if ( ( ($list_valid > 0) or (preg_match('/\-ALL/i', $LOGallowed_campaigns)) ) and ($LOGmodify_leads != '5') )
		{
		$diff_orig=''; $diff_new='';
		# gather existing lead data to store for admin log diff
		$stmt="SELECT lead_id,entry_date,modify_date,status,user,vendor_lead_code,source_id,list_id,gmt_offset_now,called_since_last_reset,phone_code,phone_number,title,first_name,middle_initial,last_name,address1,address2,address3,city,state,province,postal_code,country_code,gender,date_of_birth,alt_phone,email,security_phrase,comments,called_count,last_local_call_time,rank,owner,entry_list_id from $vl_table where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' $LOGallowed_listsSQL";
		$rslt=mysql_to_mysqli($stmt, $link);
		$diff_to_print = mysqli_num_rows($rslt);
		if ($DB) {echo "$diff_to_print|$stmt\n";}
		if ($diff_to_print > 0)
			{
			$row=mysqli_fetch_row($rslt);
			$diff_orig = "lead_id=$row[0]|entry_date=$row[1]|modify_date=$row[2]|status=$row[3]|user=$row[4]|vendor_lead_code=$row[5]|source_id=$row[6]|list_id=$row[7]|gmt_offset_now=$row[8]|called_since_last_reset=$row[9]|phone_code=$row[10]|phone_number=$row[11]|title=$row[12]|first_name=$row[13]|middle_initial=$row[14]|last_name=$row[15]|address1=$row[16]|address2=$row[17]|address3=$row[18]|city=$row[19]|state=$row[20]|province=$row[21]|postal_code=$row[22]|country_code=$row[23]|gender=$row[24]|date_of_birth=$row[25]|alt_phone=$row[26]|email=$row[27]|security_phrase=$row[28]|comments=$row[29]|called_count=$row[30]|last_local_call_time=$row[31]|rank=$row[32]|owner=$row[33]|entry_list_id=$row[34]|";
			}

		$source_idSQL='';
		if ($SSsource_id_display > 0)
			{$source_idSQL = ",source_id='" . mysqli_real_escape_string($link, $source_id) . "'";}
		$phone_numberSQL=",phone_number='$phone_number'";
		if ($LOGadmin_hide_phone_data != '0') {$phone_numberSQL='';}
		### update the lead record in the vicidial_list table 
		$stmtA="UPDATE $vl_table set status='" . mysqli_real_escape_string($link, $status) . "',title='" . mysqli_real_escape_string($link, $title) . "',first_name='" . mysqli_real_escape_string($link, $first_name) . "',middle_initial='" . mysqli_real_escape_string($link, $middle_initial) . "',last_name='" . mysqli_real_escape_string($link, $last_name) . "',address1='" . mysqli_real_escape_string($link, $address1) . "',address2='" . mysqli_real_escape_string($link, $address2) . "',address3='" . mysqli_real_escape_string($link, $address3) . "',city='" . mysqli_real_escape_string($link, $city) . "',state='" . mysqli_real_escape_string($link, $state) . "',province='" . mysqli_real_escape_string($link, $province) . "',postal_code='" . mysqli_real_escape_string($link, $postal_code) . "',country_code='" . mysqli_real_escape_string($link, $country_code) . "',alt_phone='" . mysqli_real_escape_string($link, $alt_phone) . "',phone_code='$phone_code',email='" . mysqli_real_escape_string($link, $email) . "',security_phrase='" . mysqli_real_escape_string($link, $security) . "',comments='" . mysqli_real_escape_string($link, $comments) . "',rank='" . mysqli_real_escape_string($link, $rank) . "',owner='" . mysqli_real_escape_string($link, $owner) . "',vendor_lead_code='" . mysqli_real_escape_string($link, $vendor_id) . "'$phone_numberSQL$source_idSQL,date_of_birth='" . mysqli_real_escape_string($link, $date_of_birth) . "' where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "'";
		if ($DB) {echo "|$stmt|\n";}
		$rslt=mysql_to_mysqli($stmtA, $link);

		# gather new lead data to store for admin log diff
		$stmt="SELECT lead_id,entry_date,modify_date,status,user,vendor_lead_code,source_id,list_id,gmt_offset_now,called_since_last_reset,phone_code,phone_number,title,first_name,middle_initial,last_name,address1,address2,address3,city,state,province,postal_code,country_code,gender,date_of_birth,alt_phone,email,security_phrase,comments,called_count,last_local_call_time,rank,owner,entry_list_id from $vl_table where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' $LOGallowed_listsSQL";
		$rslt=mysql_to_mysqli($stmt, $link);
		$diff_to_print = mysqli_num_rows($rslt);
		if ($DB) {echo "$diff_to_print|$stmt\n";}
		if ($diff_to_print > 0)
			{
			$row=mysqli_fetch_row($rslt);
			$diff_new = "lead_id=$row[0]|entry_date=$row[1]|modify_date=$row[2]|status=$row[3]|user=$row[4]|vendor_lead_code=$row[5]|source_id=$row[6]|list_id=$row[7]|gmt_offset_now=$row[8]|called_since_last_reset=$row[9]|phone_code=$row[10]|phone_number=$row[11]|title=$row[12]|first_name=$row[13]|middle_initial=$row[14]|last_name=$row[15]|address1=$row[16]|address2=$row[17]|address3=$row[18]|city=$row[19]|state=$row[20]|province=$row[21]|postal_code=$row[22]|country_code=$row[23]|gender=$row[24]|date_of_birth=$row[25]|alt_phone=$row[26]|email=$row[27]|security_phrase=$row[28]|comments=$row[29]|called_count=$row[30]|last_local_call_time=$row[31]|rank=$row[32]|owner=$row[33]|entry_list_id=$row[34]|";
			}

		$messagesHTML .= _QXZ("information modified")."<BR><BR>\n";
		$messagesHTML .= "<a href=\"$PHP_SELF?lead_id=$lead_id&DB=$DB&archive_search=$archive_search&archive_log=$archive_log\">"._QXZ("Go back to the lead modification page")."</a><BR><BR>\n";
		$messagesHTML .= "<form><input type=button value=\""._QXZ("Close This Window")."\" onClick=\"javascript:window.close();\"></form>\n";
		
		if ( ($dispo != $status) and ($dispo == 'CBHOLD') )
			{
			### inactivate vicidial_callbacks record for this lead 
			$stmtB="UPDATE vicidial_callbacks set status='INACTIVE' where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' and status='ACTIVE';";
			if ($DB) {echo "|$stmtB|\n";}
			$rslt=mysql_to_mysqli($stmtB, $link);

			$messagesHTML .= "<BR>"._QXZ("vicidial_callback record inactivated").": $lead_id<BR>\n";
			}
		if ( ($dispo != $status) and ( ($dispo == 'CALLBK') or ($scheduled_callback == 'Y') ) )
			{
			### inactivate vicidial_callbacks record for this lead 
			$stmtC="UPDATE vicidial_callbacks set status='INACTIVE' where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' and status IN('ACTIVE','LIVE');";
			if ($DB) {echo "|$stmtC|\n";}
			$rslt=mysql_to_mysqli($stmtC, $link);

			$messagesHTML .= "<BR>"._QXZ("vicidial_callback record inactivated").": $lead_id<BR>\n";
			}

		if ( ($dispo != $status) and ($status == 'CBHOLD') )
			{
			### find any vicidial_callback records for this lead 
			$stmtD="SELECT callback_id from vicidial_callbacks where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' and status IN('ACTIVE','LIVE') order by callback_id desc LIMIT 1;";
			if ($DB) {echo "|$stmtD|\n";}
			$rslt=mysql_to_mysqli($stmtD, $link);
			$CBM_to_print = mysqli_num_rows($rslt);
			if ($CBM_to_print > 0)
				{
				$rowx=mysqli_fetch_row($rslt);
				$callback_id = $rowx[0];
				}
			else
				{
				$tomorrow = date("Y-m-d", mktime(date("H"),date("i"),date("s"),date("m"),date("d")+1,date("Y")));
				$CLEAN_campaign_id = mysqli_real_escape_string($link, $campaign_id);
				$CLEAN_campaign_id = preg_replace("/'|\"|\\\\|;/","",$CLEAN_campaign_id);
				if ($non_latin < 1)
					{
					$CLEAN_campaign_id = preg_replace('/[^-_0-9a-zA-Z]/','',$CLEAN_campaign_id);
					}
				else
					{
					$CLEAN_campaign_id = preg_replace('/[^-_0-9\p{L}]/u','',$CLEAN_campaign_id);
					}

				if (strlen($CLEAN_campaign_id)<1)
					{
					$stmt="SELECT campaign_id from vicidial_lists where list_id='" . mysqli_real_escape_string($link, $list_id) . "';";
					$rslt=mysql_to_mysqli($stmt, $link);
					$cidvl_count_to_print = mysqli_num_rows($rslt);
					if ($cidvl_count_to_print > 0) 
						{
						$row=mysqli_fetch_row($rslt);
						if (strlen($row[0])>0)	{$CLEAN_campaign_id =	$row[0];}
						}
					}

				$stmtE="INSERT INTO vicidial_callbacks SET lead_id='" . mysqli_real_escape_string($link, $lead_id) . "',recipient='ANYONE',status='ACTIVE',user='$PHP_AUTH_USER',user_group='ADMIN',list_id='" . mysqli_real_escape_string($link, $list_id) . "',callback_time='$tomorrow 12:00:00',entry_time='$NOW_TIME',comments='',campaign_id='$CLEAN_campaign_id';";
				if ($DB) {echo "|$stmtE|\n";}
				$rslt=mysql_to_mysqli($stmtE, $link);

				$messagesHTML .= "<BR>"._QXZ("Scheduled Callback added").": $lead_id - $phone_number<BR>\n";
				}
			}


		if ( ($dispo != $status) and ($status == 'DNC') )
			{
			### add lead to the internal DNC list 
			$stmtF="INSERT INTO vicidial_dnc (phone_number) values('" . mysqli_real_escape_string($link, $phone_number) . "');";
			if ($DB) {echo "|$stmtF|\n";}
			$rslt=mysql_to_mysqli($stmtF, $link);

			$messagesHTML .= "<BR>"._QXZ("Lead added to DNC List").": $lead_id - $phone_number<BR>\n";
			}
		### update last record in vicidial_log table
		   if (($dispo != $status) and ($modify_logs > 0)) 
			{
			$stmtG="UPDATE vicidial_log set status='" . mysqli_real_escape_string($link, $status) . "' where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' order by call_date desc limit 1";
			if ($DB) {echo "|$stmtG|\n";}
			$rslt=mysql_to_mysqli($stmtG, $link);
			}

		### update last record in vicidial_closer_log table
		   if (($dispo != $status) and ($modify_closer_logs > 0)) 
			{
			$stmtH="UPDATE vicidial_closer_log set status='" . mysqli_real_escape_string($link, $status) . "' where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' order by closecallid desc limit 1";
			if ($DB) {echo "|$stmtH|\n";}
			$rslt=mysql_to_mysqli($stmtH, $link);
			}

		### update last record in vicidial_agent_log table
		   if (($dispo != $status) and ($modify_agent_logs > 0)) 
			{
			$stmtI="UPDATE vicidial_agent_log set status='" . mysqli_real_escape_string($link, $status) . "' where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' order by agent_log_id desc limit 1";
			if ($DB) {echo "|$stmtI|\n";}
			$rslt=mysql_to_mysqli($stmtI, $link);
			}

		if ($add_closer_record > 0)
			{
			$comments = preg_replace("/\n/",'!N',$comments);
			$comments = preg_replace("/\r/",'',$comments);
			### insert a NEW record to the vicidial_closer_log table 
			$stmtJ="INSERT INTO vicidial_closer_log (lead_id,list_id,campaign_id,call_date,start_epoch,end_epoch,length_in_sec,status,phone_code,phone_number,user,comments,processed) values('" . mysqli_real_escape_string($link, $lead_id) . "','" . mysqli_real_escape_string($link, $list_id) . "','" . mysqli_real_escape_string($link, $campaign_id) . "','" . mysqli_real_escape_string($link, $parked_time) . "','$NOW_TIME','$STARTtime','1','" . mysqli_real_escape_string($link, $status) . "','" . mysqli_real_escape_string($link, $phone_code) . "','" . mysqli_real_escape_string($link, $phone_number) . "','$PHP_AUTH_USER','" . mysqli_real_escape_string($link, $comments) . "','Y')";
			if ($DB) {echo "|$stmtJ|\n";}
			$rslt=mysql_to_mysqli($stmtJ, $link);
			}

		### LOG INSERTION Admin Log Table ###
		$SQL_log = "$stmtA|$stmtB|$stmtC|$stmtE|$stmtF|$stmtG|$stmtH|$stmtI|$stmtJ|";
		$SQL_log = preg_replace('/;/', '', $SQL_log);
		$SQL_log = addslashes($SQL_log);
		$stmt="INSERT INTO vicidial_admin_log set event_date='$NOW_TIME', user='$PHP_AUTH_USER', ip_address='$ip', event_section='LEADS', event_type='MODIFY', record_id='$lead_id', event_code='ADMIN MODIFY LEAD', event_sql=\"$SQL_log\", event_notes=\"".$diff_orig."---ORIG---NEW---".$diff_new."\";";
		if ($DB) {echo "|$stmt|\n";}
		$rslt=mysql_to_mysqli($stmt, $link);
		}
	else
		{
		$messagesHTML .= _QXZ("you do not have permission to modify this lead")." $lead_id &nbsp; &nbsp; &nbsp; $list_id &nbsp; &nbsp; &nbsp; $NOW_TIME\n<BR><BR>\n";
		}
	echo "</script>\n";
	echo "<link rel=\"stylesheet\" href=\"calendar.css\">\n";
	echo "</head><BODY BGCOLOR=white marginheight=0 marginwidth=0 leftmargin=0 topmargin=0>\n";
	echo "<span style=\"position:absolute;left:0px;top:0px;z-index:20;\" id=admin_header>";

	$short_header=1;

	require("admin_header.php");

	echo "</span>\n";
	echo "$messagesHTML\n";
	}
else
	{
	if ( ($LOGmodify_leads == '5') and ( ($CBchangeUSERtoANY == 'YES') or ($CBchangeANYtoUSER == 'YES') or ($CBchangeDATE == 'YES') ) )
		{
		echo "ERROR: "._QXZ("You do not have permission to modify leads").": $LOGmodify_leads \n";
		exit;
		}
	if ($CBchangeUSERtoANY == 'YES')
		{
		### set vicidial_callbacks record to an ANYONE callback for this lead 
		$stmtK="UPDATE vicidial_callbacks set recipient='ANYONE' where callback_id='" . mysqli_real_escape_string($link, $callback_id) . "';";
		if ($DB) {echo "|$stmtK|\n";}
		$rslt=mysql_to_mysqli($stmtK, $link);

		$messagesHTML .= "<BR>"._QXZ("vicidial_callback record changed to ANYONE")."<BR>\n";
		}
	if ($CBchangeANYtoUSER == 'YES')
		{
		### set vicidial_callbacks record to an USERONLY callback for this lead 
		$stmtM="UPDATE vicidial_callbacks set user='" . mysqli_real_escape_string($link, $CBuser) . "',recipient='USERONLY' where callback_id='" . mysqli_real_escape_string($link, $callback_id) . "';";
		if ($DB) {echo "|$stmtM|\n";}
		$rslt=mysql_to_mysqli($stmtM, $link);

		$messagesHTML .= "<BR>"._QXZ("vicidial_callback record changed to USERONLY, user").": $CBuser<BR>\n";
		}	
	
	if ($CBchangeDATE == 'YES')
		{
		$comments = preg_replace("/\n/",' ',$comments);
		$comments = preg_replace("/\r/",'',$comments);
		### change date/time of vicidial_callbacks record for this lead 
		$stmtN="UPDATE vicidial_callbacks set callback_time='" . mysqli_real_escape_string($link, $appointment_date) . " " . mysqli_real_escape_string($link, $appointment_time) . "',comments='" . mysqli_real_escape_string($link, $comments) . "',lead_status='" . mysqli_real_escape_string($link, $CBstatus) . "' where callback_id='" . mysqli_real_escape_string($link, $callback_id) . "';";
		if ($DB) {echo "|$stmtN|\n";}
		$rslt=mysql_to_mysqli($stmtN, $link);

		$messagesHTML .= "<BR>"._QXZ("vicidial_callback record changed to")." $appointment_date $appointment_time $CBstatus<BR>\n";
		}	

	if ( (strlen($stmtK)>10) or (strlen($stmtL)>10) or (strlen($stmtM)>10) or (strlen($stmtN)>10) )
		{
		### LOG INSERTION Admin Log Table ###
		$SQL_log = "$stmtK|$stmtL|$stmtM|$stmtN|";
		$SQL_log = preg_replace('/;/', '', $SQL_log);
		$SQL_log = addslashes($SQL_log);
		$stmt="INSERT INTO vicidial_admin_log set event_date='$NOW_TIME', user='$PHP_AUTH_USER', ip_address='$ip', event_section='LEADS', event_type='MODIFY', record_id='$lead_id', event_code='ADMIN MODIFY LEAD CALLBACK', event_sql=\"$SQL_log\", event_notes='';";
		if ($DB) {echo "|$stmt|\n";}
		$rslt=mysql_to_mysqli($stmt, $link);
		}

	$stmt="SELECT count(*) from $vl_table where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' $LOGallowed_listsSQL";
	$rslt=mysql_to_mysqli($stmt, $link);
	if ($DB) {echo "$stmt\n";}
	$row=mysqli_fetch_row($rslt);
	$lead_count = $row[0];

	if ($lead_count > 0)
		{
		##### grab vicidial_list_alt_phones records #####
		$stmt="SELECT phone_code,phone_number,alt_phone_note,alt_phone_count,active from vicidial_list_alt_phones where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' order by alt_phone_count limit 500;";
		$rslt=mysql_to_mysqli($stmt, $link);
		if ($DB) {echo "$stmt\n";}
		$alts_to_print = mysqli_num_rows($rslt);

		$c=0;
		$alts_output = '';
		while ($alts_to_print > $c) 
			{
			$row=mysqli_fetch_row($rslt);
			if (preg_match("/1$|3$|5$|7$|9$/i", $c))
				{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
			else
				{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}

			$c++;
			$alts_output .= "<tr $bgcolor>";
			$alts_output .= "<td><font size=1>$c</td>";
			$alts_output .= "<td><font size=2>$row[0] $row[1]</td>";
			$alts_output .= "<td align=left><font size=2> $row[2]</td>\n";
			$alts_output .= "<td align=left><font size=2> $row[3]</td>\n";
			$alts_output .= "<td align=left><font size=2> $row[4] </td></tr>\n";
			}

		}
	else
		{
		if ($lead_id != 'NEW')
			{
			echo "</script>\n";
			echo "<link rel=\"stylesheet\" href=\"calendar.css\">\n";
			echo "</head><BODY BGCOLOR=white marginheight=0 marginwidth=0 leftmargin=0 topmargin=0>\n";
			echo "<span style=\"position:absolute;left:0px;top:0px;z-index:20;\" id=admin_header>";

			$short_header=1;

			require("admin_header.php");

			echo "</span>\n";
			echo "<BR><BR><b>"._QXZ("lead does not exist").": $lead_id</b><BR><BR>\n";
			if ( (!preg_match('/\-ALL/i', $LOGallowed_campaigns)) and ($LOGignore_group_on_search != '1') )
				{
				echo "</BODY>\n";
				echo "</html>\n";
				exit;
				}
			}
#		echo "<a href=\"$PHP_SELF\">Close this window</a>\n<BR><BR>\n";
		}

	##### grab vicidial_log records #####
	$stmt="SELECT uniqueid,lead_id,list_id,campaign_id,call_date,start_epoch,end_epoch,length_in_sec,status,phone_code,phone_number,user,comments,processed,user_group,term_reason,alt_dial from vicidial_log where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' order by uniqueid desc limit 500;";
	$rslt=mysql_to_mysqli($stmt, $link);
	$logs_to_print = mysqli_num_rows($rslt);
	if ($DB) {echo "$logs_to_print|$stmt\n";}

	$u=0;
	$call_log = '';
	$log_campaign = '';
	$HTML_inline_script = '';
	while ($logs_to_print > $u) 
		{
		$row=mysqli_fetch_row($rslt);
		$uniqueid =		$row[0];

		if (strlen($log_campaign)<1) {$log_campaign = $row[3];}
		if (preg_match("/1$|3$|5$|7$|9$/i", $u))
			{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";}
		else
			{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}

		$u++;
		$call_log .= "<tr $bgcolor>";
		$call_log .= "<td><font size=1>$u</td>";
		$call_log .= "<td><font size=2>$row[4]</td>";
		$call_log .= "<td align=left><font size=2> $row[7]</td>\n";
		if ( ($LOGmodify_leads == '3') or ($LOGmodify_leads == '4') )
			{
			$call_log .= "<td align=left><font size=2><font color=blue><u><span id=\"vicidial_log_status_$u\" onClick=\"ModifyLogDisplayShow(event, $u,'vicidial_log','$uniqueid','$row[1]','$row[4]','$row[8]','$row[11]')\">$row[8]</span></u></font></td>\n";
			$HTML_inline_script .= "vicidial_log_mod[$u] = \"Call Date: $row[4]<br>$label_lead_id: $row[1]<br>Current Status: $row[8]<br>\";\n";
			}
		else
			{$call_log .= "<td align=left><font size=2> $row[8]</td>\n";}
		$call_log .= "<td align=left><font size=2> <A HREF=\"user_stats.php?user=$row[11]\" target=\"_blank\">$row[11]</A> </td>\n";
		$call_log .= "<td align=right><font size=2> $row[3] </td>\n";
		$call_log .= "<td align=right><font size=2> $row[2] </td>\n";
		$call_log .= "<td align=right><font size=2> $row[1] </td>\n";
		$call_log .= "<td align=center><font size=2> $row[15] </td>\n";
		$call_log .= "<td align=left><font size=2>&nbsp; $row[10] </font><font size=1>$row[16] </td>\n";

		if ($CIDdisplay=="Yes")
			{
			$caller_code='';
			$stmtA="SELECT caller_code,server_ip FROM vicidial_log_extended WHERE lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' and uniqueid='$uniqueid' limit 1;";
			$rsltA=mysql_to_mysqli($stmtA, $link);
			$cc_to_print = mysqli_num_rows($rsltA);
			if ($DB) {echo "$cc_to_print|$stmtA|\n";}
			if ($cc_to_print > 0)
				{
				$rowA=mysqli_fetch_row($rsltA);
				$caller_code =	$rowA[0];
				$VLEserver_ip = $rowA[1];
				}
			$outbound_cid='';   $VDLcall_date='0';
			$stmtA="SELECT outbound_cid,server_ip,call_date,uniqueid,caller_code FROM vicidial_dial_log WHERE lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' and caller_code='$caller_code' order by call_date limit 1;";
			if (!preg_match("/^M|^V/",$caller_code))
				{
				$temp_uniqueid = explode('.',$uniqueid);
				$temp_uniqueid_epoch =	$temp_uniqueid[0];
				$temp_uniqueid_before =	($temp_uniqueid[1] - 1);
				$temp_uniqueid_after =	($temp_uniqueid[1] + 1);
				$temp_uniqueidSQL = "'$temp_uniqueid_epoch.$temp_uniqueid_before','$uniqueid','$temp_uniqueid_epoch.$temp_uniqueid_after'";

				$stmtA="SELECT outbound_cid,server_ip,call_date,uniqueid,caller_code FROM vicidial_dial_log WHERE lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' and uniqueid IN($temp_uniqueidSQL) order by call_date limit 1;";
				}
			$rsltA=mysql_to_mysqli($stmtA, $link);
			$cid_to_print = mysqli_num_rows($rsltA);
			if ($DB) {echo "$cid_to_print|$stmtA|\n";}
			if ($cid_to_print > 0)
				{
				$rowA=mysqli_fetch_row($rsltA);
				$outbound_cid = $rowA[0];
				$outbound_cid = preg_replace("/\".*\" /",'',$outbound_cid);
				$VDLserver_ip = $rowA[1];
				$VDLcall_date = $rowA[2];
				if (strlen($rowA[3]) > 0) {$uniqueid =		$rowA[3];}
				$caller_code =	$rowA[4];
				}
			$outbound_cid_num='';   $outbound_cid_type='';
			$stmtA="SELECT outbound_cid,outbound_cid_type FROM vicidial_dial_cid_log WHERE call_date='$VDLcall_date' and caller_code='$caller_code' limit 1;";
			$rsltA=mysql_to_mysqli($stmtA, $link);
			$vdl_to_print = mysqli_num_rows($rsltA);
			if ($vdl_to_print > 0)
				{
				$rowA=mysqli_fetch_row($rsltA);
				$outbound_cid_num = $rowA[0];
				$outbound_cid_num = preg_replace("/\".*\" /",'',$outbound_cid_num);
				$outbound_cid_type = $rowA[1];
				}

			if ($SSsip_event_logging > 0)
				{
				$call_log .= "<td align=left nowrap><font size=2>&nbsp; $outbound_cid  <span onClick=\"ShowCallDetail(event,'$caller_code','$SSframe_background')\"><font color=blue><u>$caller_code</u></font></span> <font size=1>$outbound_cid_type</td><td align=right><font size=2>&nbsp; $uniqueid</td><td align=right><font size=2>&nbsp; $VDLserver_ip</td>\n";
				}
			else
				{
				$call_log .= "<td align=left nowrap><font size=2>&nbsp; $outbound_cid $caller_code </font><font size=1>$outbound_cid_type</td><td align=right><font size=2>&nbsp; $uniqueid</td><td align=right><font size=2>&nbsp; $VDLserver_ip</td>\n";
				}
			$AMDSTATUS='';	$AMDRESPONSE='';
			$stmtA="SELECT AMDSTATUS,AMDRESPONSE FROM vicidial_amd_log WHERE lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' and caller_code='$caller_code';";
			$rsltA=mysql_to_mysqli($stmtA, $link);
			$amd_to_print = mysqli_num_rows($rslt);
			if ($amd_to_print > 0)
				{
				$rowA=mysqli_fetch_row($rsltA);
				$AMDSTATUS =	$rowA[0];
				$AMDRESPONSE =	$rowA[1];
				$call_log .= "<td align=right nowrap><font size=2>&nbsp; $AMDSTATUS</td><td align=right><font size=2>&nbsp; $AMDRESPONSE</td>\n";
				if (strlen($AMDSTATUS) > 0) {$AMDcount++;}
				}
			}
		$call_log .= "</tr>\n";

		if ( ($CIDdisplay=="Yes") and ($kh_conf_ct >= 2) )
			{
			$stmtA="SELECT start_date,conclusion,pattern,UNIX_TIMESTAMP(answer_date),UNIX_TIMESTAMP(analyzer_date),hangup_auth_time,hangup_query_time,route_auth_time,route_query_time FROM vicidial_khomp_log WHERE lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' and caller_code='$caller_code';";
			$rsltA=mysql_to_mysqli($stmtA, $link);
			$kh_to_print = mysqli_num_rows($rslt);
			if ($kh_to_print > 0)
				{
				$rowA=mysqli_fetch_row($rsltA);
				$KHstart_date =	$rowA[0];
				$KHconclusion =	$rowA[1];
				$KHpattern =	$rowA[2];
				$KHanswer =		$rowA[3];
				$KHanalyzer =	$rowA[4];
				$KHproctime =	($KHanalyzer - $KHanswer);
				$KHproctime =	sprintf("%.3f", $KHproctime);
				if (strlen($rowA[0]) > 0)
					{
					$call_log .= "<TR>";
					$call_log .= "<td></td>";
					$call_log .= "<TD $bgcolor COLSPAN=12><font style=\"font-size:11px;font-family:sans-serif;\"> "._QXZ("KHOMP Start Date").": $KHstart_date &nbsp; &nbsp;  "._QXZ("Conclusion").": $KHconclusion &nbsp; &nbsp; "._QXZ("Pattern").": $KHpattern &nbsp; &nbsp; "._QXZ("Processing Time").": $KHproctime "._QXZ("sec")." &nbsp; &nbsp; "._QXZ("API Times").": $rowA[5] / $rowA[6] / $rowA[7] / $rowA[8] &nbsp; </font></TD>";
					$call_log .= "</TR>";
					$KHcount++;
					}
				}
			}

		$stmtA="SELECT call_notes FROM vicidial_call_notes WHERE lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' and vicidial_id='$row[0]';";
		$rsltA=mysql_to_mysqli($stmtA, $link);
		$out_notes_to_print = mysqli_num_rows($rslt);
		if ($out_notes_to_print > 0)
			{
			$rowA=mysqli_fetch_row($rsltA);
			if (strlen($rowA[0]) > 0)
				{
				$call_log .= "<TR>";
				$call_log .= "<td></td>";
				$call_log .= "<TD $bgcolor COLSPAN=9><font style=\"font-size:11px;font-family:sans-serif;\"> "._QXZ("NOTES").": &nbsp; $rowA[0] </font></TD>";
				$call_log .= "</TR>";
				}
			}

		$campaign_id = $row[3];
		$uniqueidLIST .= ",'$row[0]'";
		}

	##### grab vicidial_agent_log records #####
	$stmt="SELECT agent_log_id,user,server_ip,event_time,lead_id,campaign_id,pause_epoch,pause_sec,wait_epoch,wait_sec,talk_epoch,talk_sec,dispo_epoch,dispo_sec,status,user_group,comments,sub_status from vicidial_agent_log where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' order by agent_log_id desc limit 500;";
	$rslt=mysql_to_mysqli($stmt, $link);
	$Alogs_to_print = mysqli_num_rows($rslt);
	if ($DB) {echo "$Alogs_to_print|$stmt\n";}

	$y=0;
	$agent_log = '';
	$Alog_campaign = '';
	while ($Alogs_to_print > $y) 
		{
		$row=mysqli_fetch_row($rslt);
		if (strlen($Alog_campaign)<1) {$Alog_campaign = $row[5];}
		if (preg_match("/1$|3$|5$|7$|9$/i", $y))
			{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
		else
			{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}

		$y++;
		$agent_log .= "<tr $bgcolor>";
		$agent_log .= "<td><font size=1>$y</td>";
		$agent_log .= "<td><font size=2>$row[3]</td>";
		$agent_log .= "<td align=left><font size=2> $row[5]</td>\n";
		$agent_log .= "<td align=left><font size=2> <A HREF=\"user_stats.php?user=$row[1]\" target=\"_blank\">$row[1]</A> </td>\n";
		$agent_log .= "<td align=right><font size=2> $row[7]</td>\n";
		$agent_log .= "<td align=right><font size=2> $row[9] </td>\n";
		$agent_log .= "<td align=right><font size=2> $row[11] </td>\n";
		$agent_log .= "<td align=right><font size=2> $row[13] </td>\n";
		if ( ($LOGmodify_leads == '3') or ($LOGmodify_leads == '4') )
			{
			$agent_log .= "<td align=left><font size=2> &nbsp; <font color=blue><u><span id=\"vicidial_agent_log_status_$y\" onClick=\"ModifyLogDisplayShow(event, $y,'vicidial_agent_log','$row[0]','$row[4]','$row[3]','$row[14]','$row[1]')\">$row[14]</span></u></font></td>\n";
			$HTML_inline_script .= "vicidial_agent_log_mod[$y] = \"Event Date: $row[3]<br>$label_lead_id: $row[4]<br>Current Status: $row[14]<br>\";\n";
			}
		else
			{$agent_log .= "<td align=left><font size=2> $row[14]</td>\n";}
		$agent_log .= "<td align=right><font size=2> &nbsp; $row[15] </td>\n";
		$agent_log .= "<td align=right><font size=2> &nbsp; $row[17] </td></tr>\n";

		$campaign_id = $row[5];
		}

	##### grab vicidial_closer_log records #####
	$stmt="SELECT closecallid,lead_id,list_id,campaign_id,call_date,start_epoch,end_epoch,length_in_sec,status,phone_code,phone_number,user,comments,processed,queue_seconds,user_group,xfercallid,term_reason,uniqueid,agent_only from vicidial_closer_log where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' order by closecallid desc limit 500;";
	$rslt=mysql_to_mysqli($stmt, $link);
	$Clogs_to_print = mysqli_num_rows($rslt);
	if ($DB) {echo "$Clogs_to_print|$stmt\n";}

	$y=0;
	$closer_log = '';
	$Clog_campaign = '';
	while ($Clogs_to_print > $y) 
		{
		$row=mysqli_fetch_row($rslt);
		if (strlen($Clog_campaign)<1) {$Clog_campaign = $row[3];}
		if (preg_match("/1$|3$|5$|7$|9$/i", $y))
			{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
		else
			{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}

		$y++;
		$closer_log .= "<tr $bgcolor>";
		$closer_log .= "<td><font size=1>$y</td>";
		$closer_log .= "<td><font size=2>$row[4]</td>";
		$closer_log .= "<td align=left><font size=2> $row[7]</td>\n";
		if ( ($LOGmodify_leads == '3') or ($LOGmodify_leads == '4') )
			{
			$closer_log .= "<td align=left><font size=2><font color=blue><u><span id=\"vicidial_closer_log_status_$y\" onClick=\"ModifyLogDisplayShow(event, $y,'vicidial_closer_log','$row[0]','$row[1]','$row[4]','$row[8]','$row[11]')\">$row[8]</span></u></font></td>\n";
			$HTML_inline_script .= "vicidial_closer_log_mod[$y] = \"Call Date: $row[4]<br>$label_lead_id: $row[1]<br>Current Status: $row[8]<br>\";\n";
			}
		else
			{$closer_log .= "<td align=left><font size=2> $row[8]</td>\n";}
		$closer_log .= "<td align=left><font size=2> <A HREF=\"user_stats.php?user=$row[11]\" target=\"_blank\">$row[11]</A> </td>\n";
		$closer_log .= "<td align=right><font size=2> $row[3] </td>\n";
		$closer_log .= "<td align=right><font size=2> $row[2] </td>\n";
		$closer_log .= "<td align=right><font size=2> $row[1] </td>\n";
		$closer_log .= "<td align=right><font size=2> &nbsp; $row[14] </td>\n";
		$closer_log .= "<td align=right><font size=2> &nbsp; $row[17] </td>\n";

		if ($CIDdisplay=="Yes")
			{
			$extension='';
			$stmtA="SELECT extension,server_ip FROM vicidial_did_log WHERE uniqueid='$row[18]' and call_date <= \"$row[4]\" order by call_date desc;";
			$rsltA=mysql_to_mysqli($stmtA, $link);
			$cid_to_print = mysqli_num_rows($rsltA);
			if ($cid_to_print > 0)
				{
				$rowA=mysqli_fetch_row($rsltA);
				$extension = $rowA[0];
				$VDLserver_ip = $rowA[1];
				}
			$caller_code='';
			$stmtA="SELECT caller_code,server_ip FROM vicidial_inbound_caller_codes WHERE lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' and uniqueid='$row[18]' and group_id='$row[3]';";
			$rsltA=mysql_to_mysqli($stmtA, $link);
			$cc_to_print = mysqli_num_rows($rsltA);
			if ($cc_to_print > 0)
				{
				$rowA=mysqli_fetch_row($rsltA);
				$caller_code =	$rowA[0];
				$VLEserver_ip = $rowA[1];
				}
			$closer_log .= "<td align=right nowrap><font size=2>&nbsp; $caller_code</td><td align=right nowrap><font size=2>&nbsp; <a href=\"admin.php?ADD=3311&did_pattern=$extension\">$extension</a></td><td align=right><font size=2>&nbsp; $row[18]</td><td align=right><font size=2>&nbsp; $rowA[1]</td>\n";
			}
		$closer_log .= "</tr>\n";

		$stmtA="SELECT call_notes FROM vicidial_call_notes WHERE lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' and vicidial_id IN('$row[0]','$row[18]');";
		$rsltA=mysql_to_mysqli($stmtA, $link);
		$in_notes_to_print = mysqli_num_rows($rslt);
		if ($in_notes_to_print > 0)
			{
			$rowA=mysqli_fetch_row($rsltA);
			if (strlen($rowA[0]) > 0)
				{
				$closer_log .= "<TR>";
				$closer_log .= "<td></td>";
				$closer_log .= "<TD $bgcolor COLSPAN=9><font style=\"font-size:11px;font-family:sans-serif;\"> "._QXZ("NOTES").": &nbsp; $rowA[0] </font></TD>";
				$closer_log .= "</TR>";
				}
			}

		$campaign_id = $row[3];
		$uniqueidLIST .= ",'$row[18]'";
		}


	########## BEGIN ARCHIVE LOG SEARCH ##########
	if ($archive_log == 'Yes')
		{
		##### grab vicidial_log_archive records #####
		$stmt="SELECT uniqueid,lead_id,list_id,campaign_id,call_date,start_epoch,end_epoch,length_in_sec,status,phone_code,phone_number,user,comments,processed,user_group,term_reason,alt_dial from vicidial_log_archive where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' order by uniqueid desc limit 500;";
		$rslt=mysql_to_mysqli($stmt, $link);
		$logs_to_print = mysqli_num_rows($rslt);
		if ($DB) {echo "$logs_to_print|$stmt\n";}

		$u=0;
	#	$call_log = '';
	#	$log_campaign = '';
		while ($logs_to_print > $u) 
			{
			$row=mysqli_fetch_row($rslt);
			$uniqueid =		$row[0];
			if (strlen($log_campaign)<1) {$log_campaign = $row[3];}
			if (preg_match("/1$|3$|5$|7$|9$/i", $u))
				{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
			else
				{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}

			$u++;
			$call_log .= "<tr $bgcolor>";
			$call_log .= "<td><font size=1>$u</td>";
			$call_log .= "<td><font size=2><font color='#FF0000'>$row[4]</font></td>";
			$call_log .= "<td align=left><font size=2> $row[7]</td>\n";
			if ( ($LOGmodify_leads == '3') or ($LOGmodify_leads == '4') )
				{
				$call_log .= "<td align=left><font size=2><font color=blue><u><span id=\"vicidial_log_archive_status_$u\" onClick=\"ModifyLogDisplayShow(event, $u,'vicidial_log_archive','$uniqueid','$row[1]','$row[4]','$row[8]','$row[11]')\">$row[8]</span></u></font></td>\n";
				$HTML_inline_script .= "vicidial_log_archive_mod[$u] = \"Call Date: $row[4]<br>$label_lead_id: $row[1]<br>Current Status: $row[8]<br>\";\n";
				}
			else
				{$call_log .= "<td align=left><font size=2> $row[8]</td>\n";}
			$call_log .= "<td align=left><font size=2> <A HREF=\"user_stats.php?user=$row[11]\" target=\"_blank\">$row[11]</A> </td>\n";
			$call_log .= "<td align=right><font size=2> $row[3] </td>\n";
			$call_log .= "<td align=right><font size=2> $row[2] </td>\n";
			$call_log .= "<td align=right><font size=2> $row[1] </td>\n";
			$call_log .= "<td align=center><font size=2> $row[15] </td>\n";
			$call_log .= "<td align=right><font size=2>&nbsp; $row[10] </font><font size=1>$row[16] </td>\n";

			if ($CIDdisplay=="Yes")
				{
				$caller_code='';
				$stmtA="SELECT caller_code,server_ip FROM vicidial_log_extended_archive WHERE lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' and uniqueid='$uniqueid';";
				$rsltA=mysql_to_mysqli($stmtA, $link);
				$cc_to_print = mysqli_num_rows($rsltA);
				if ($DB) {echo "$cc_to_print|$stmtA|\n";}
				if ($cc_to_print > 0)
					{
					$rowA=mysqli_fetch_row($rsltA);
					$caller_code = $rowA[0];
					$VLEserver_ip = $rowA[1];
					}
				$outbound_cid='';   $VDLcall_date='0';
				$stmtA="SELECT outbound_cid,server_ip,call_date,uniqueid,caller_code FROM vicidial_dial_log_archive WHERE lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' and caller_code='$caller_code' order by call_date limit 1;";
				if (!preg_match("/^M|^V/",$caller_code))
					{
					$temp_uniqueid = explode('.',$uniqueid);
					$temp_uniqueid_epoch =	$temp_uniqueid[0];
					$temp_uniqueid_before =	($temp_uniqueid[1] - 1);
					$temp_uniqueid_after =	($temp_uniqueid[1] + 1);
					$temp_uniqueidSQL = "'$temp_uniqueid_epoch.$temp_uniqueid_before','$uniqueid','$temp_uniqueid_epoch.$temp_uniqueid_after'";

					$stmtA="SELECT outbound_cid,server_ip,call_date,uniqueid,caller_code FROM vicidial_dial_log WHERE lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' and uniqueid IN($temp_uniqueidSQL) order by call_date limit 1;";
					}
				$rsltA=mysql_to_mysqli($stmtA, $link);
				$cid_to_print = mysqli_num_rows($rsltA);
				if ($DB) {echo "$cid_to_print|$stmtA|\n";}
				if ($cid_to_print > 0)
					{
					$rowA=mysqli_fetch_row($rsltA);
					$outbound_cid = $rowA[0];
					$outbound_cid = preg_replace("/\".*\" /",'',$outbound_cid);
					$VDLserver_ip = $rowA[1];
					$VDLcall_date = $rowA[2];
					if (strlen($rowA[3]) > 0) {$uniqueid =		$rowA[3];}
					$caller_code =	$rowA[4];
					}
				$outbound_cid_num='';   $outbound_cid_type='';
				$stmtA="SELECT outbound_cid,outbound_cid_type FROM vicidial_dial_cid_log_archive WHERE call_date='$VDLcall_date' and caller_code='$caller_code' limit 1;";
				$rsltA=mysql_to_mysqli($stmtA, $link);
				$vdl_to_print = mysqli_num_rows($rsltA);
				if ($vdl_to_print > 0)
					{
					$rowA=mysqli_fetch_row($rsltA);
					$outbound_cid_num = $rowA[0];
					$outbound_cid_num = preg_replace("/\".*\" /",'',$outbound_cid_num);
					$outbound_cid_type = $rowA[1];
					}

				if ($SSsip_event_logging > 0)
					{
					$call_log .= "<td align=right nowrap><font size=2>&nbsp; $outbound_cid  <span onClick=\"ShowCallDetail(event,'$caller_code','$SSframe_background')\"><font color=blue><u>$caller_code</u></font></span> <font size=1>$outbound_cid_type</td><td align=right><font size=2>&nbsp; $uniqueid</td><td align=right><font size=2>&nbsp; $VDLserver_ip</td>\n";
					}
				else
					{
					$call_log .= "<td align=right nowrap><font size=2>&nbsp; $outbound_cid $caller_code </font><font size=1>$outbound_cid_type</td><td align=right><font size=2>&nbsp; $uniqueid</td><td align=right><font size=2>&nbsp; $VDLserver_ip</td>\n";
					}
				}
			$call_log .= "</tr>\n";

			$stmtA="SELECT call_notes FROM vicidial_call_notes WHERE lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' and vicidial_id='$row[0]';";
			$rsltA=mysql_to_mysqli($stmtA, $link);
			$out_notes_to_print = mysqli_num_rows($rslt);
			if ($out_notes_to_print > 0)
				{
				$rowA=mysqli_fetch_row($rsltA);
				if (strlen($rowA[0]) > 0)
					{
					$call_log .= "<TR>";
					$call_log .= "<td></td>";
					$call_log .= "<TD $bgcolor COLSPAN=9><font style=\"font-size:11px;font-family:sans-serif;\"> "._QXZ("NOTES").": &nbsp; $rowA[0] </font></TD>";
					$call_log .= "</TR>";
					}
				}

			$campaign_id = $row[3];
			$uniqueidLIST .= ",'$row[0]'";
			}

		##### grab vicidial_agent_log_archive records #####
		$stmt="SELECT agent_log_id,user,server_ip,event_time,lead_id,campaign_id,pause_epoch,pause_sec,wait_epoch,wait_sec,talk_epoch,talk_sec,dispo_epoch,dispo_sec,status,user_group,comments,sub_status from vicidial_agent_log_archive where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' order by agent_log_id desc limit 500;";
		$rslt=mysql_to_mysqli($stmt, $link);
		$Alogs_to_print = mysqli_num_rows($rslt);
		if ($DB) {echo "$Alogs_to_print|$stmt\n";}

		$y=0;
	#	$agent_log = '';
	#	$Alog_campaign = '';
		while ($Alogs_to_print > $y) 
			{
			$row=mysqli_fetch_row($rslt);
			if (strlen($Alog_campaign)<1) {$Alog_campaign = $row[5];}
			if (preg_match("/1$|3$|5$|7$|9$/i", $y))
				{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
			else
				{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}

			$y++;
			$agent_log .= "<tr $bgcolor>";
			$agent_log .= "<td><font size=1>$y</td>";
			$agent_log .= "<td><font size=2><font color='#FF0000'>$row[3]</font></td>";
			$agent_log .= "<td align=left><font size=2> $row[5]</td>\n";
			$agent_log .= "<td align=left><font size=2> <A HREF=\"user_stats.php?user=$row[1]\" target=\"_blank\">$row[1]</A> </td>\n";
			$agent_log .= "<td align=right><font size=2> $row[7]</td>\n";
			$agent_log .= "<td align=right><font size=2> $row[9] </td>\n";
			$agent_log .= "<td align=right><font size=2> $row[11] </td>\n";
			$agent_log .= "<td align=right><font size=2> $row[13] </td>\n";
			if ( ($LOGmodify_leads == '3') or ($LOGmodify_leads == '4') )
				{
				$agent_log .= "<td align=left><font size=2> &nbsp; <font color=blue><u><span id=\"vicidial_agent_log_archive_status_$y\" onClick=\"ModifyLogDisplayShow(event, $y,'vicidial_agent_log_archive','$row[0]','$row[4]','$row[3]','$row[14]','$row[1]')\">$row[14]</span></u></font></td>\n";
				$HTML_inline_script .= "vicidial_agent_log_archive_mod[$y] = \"Event Date: $row[3]<br>$label_lead_id: $row[4]<br>Current Status: $row[14]<br>\";\n";
				}
			else
				{$agent_log .= "<td align=left><font size=2> $row[14]</td>\n";}
			$agent_log .= "<td align=right><font size=2> &nbsp; $row[15] </td>\n";
			$agent_log .= "<td align=right><font size=2> &nbsp; $row[17] </td></tr>\n";

			$campaign_id = $row[5];
			}

		##### grab vicidial_closer_log_archive records #####
		$stmt="SELECT closecallid,lead_id,list_id,campaign_id,call_date,start_epoch,end_epoch,length_in_sec,status,phone_code,phone_number,user,comments,processed,queue_seconds,user_group,xfercallid,term_reason,uniqueid,agent_only from vicidial_closer_log_archive where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' order by closecallid desc limit 500;";
		$rslt=mysql_to_mysqli($stmt, $link);
		$Clogs_to_print = mysqli_num_rows($rslt);
		if ($DB) {echo "$Clogs_to_print|$stmt\n";}

		$y=0;
	#	$closer_log = '';
	#	$Clog_campaign = '';
		while ($Clogs_to_print > $y) 
			{
			$row=mysqli_fetch_row($rslt);
			if (strlen($Clog_campaign)<1) {$Clog_campaign = $row[3];}
			if (preg_match("/1$|3$|5$|7$|9$/i", $y))
				{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
			else
				{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}

			$y++;
			$closer_log .= "<tr $bgcolor>";
			$closer_log .= "<td><font size=1>$y</td>";
			$closer_log .= "<td><font size=2><font color='#FF0000'>$row[4]</font></td>";
			$closer_log .= "<td align=left><font size=2> $row[7]</td>\n";
			if ( ($LOGmodify_leads == '3') or ($LOGmodify_leads == '4') )
				{
				$closer_log .= "<td align=left><font size=2><font color=blue><u><span id=\"vicidial_closer_log_archive_status_$y\" onClick=\"ModifyLogDisplayShow(event, $y,'vicidial_closer_log_archive','$row[0]','$row[1]','$row[4]','$row[8]','$row[11]')\">$row[8]</span></u></font></td>\n";
				$HTML_inline_script .= "vicidial_closer_log_archive_mod[$y] = \"Call Date: $row[4]<br>$label_lead_id: $row[1]<br>Current Status: $row[8]<br>\";\n";
				}
			else
				{$closer_log .= "<td align=left><font size=2> $row[8]</td>\n";}
			$closer_log .= "<td align=left><font size=2> <A HREF=\"user_stats.php?user=$row[11]\" target=\"_blank\">$row[11]</A> </td>\n";
			$closer_log .= "<td align=right><font size=2> $row[3] </td>\n";
			$closer_log .= "<td align=right><font size=2> $row[2] </td>\n";
			$closer_log .= "<td align=right><font size=2> $row[1] </td>\n";
			$closer_log .= "<td align=right><font size=2> &nbsp; $row[14] </td>\n";
			$closer_log .= "<td align=right><font size=2> &nbsp; $row[17] </td>\n";

			if ($CIDdisplay=="Yes")
				{
				$extension='';
				$stmtA="SELECT extension,server_ip FROM vicidial_did_log_archive WHERE uniqueid='$row[18]' and call_date <= \"$row[4]\" order by call_date desc;";
				$rsltA=mysql_to_mysqli($stmtA, $link);
				$cid_to_print = mysqli_num_rows($rsltA);
				if ($cid_to_print > 0)
					{
					$rowA=mysqli_fetch_row($rsltA);
					$extension = $rowA[0];
					$VDLserver_ip = $rowA[1];
					}
				$caller_code='';
				$stmtA="SELECT caller_code,server_ip FROM vicidial_inbound_caller_codes_archive WHERE lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' and uniqueid='$row[18]' and group_id='$row[3]';";
				$rsltA=mysql_to_mysqli($stmtA, $link);
				$cc_to_print = mysqli_num_rows($rsltA);
				if ($cc_to_print > 0)
					{
					$rowA=mysqli_fetch_row($rsltA);
					$caller_code =	$rowA[0];
					$VLEserver_ip = $rowA[1];
					}
				$closer_log .= "<td align=right nowrap><font size=2>&nbsp; $caller_code</td><td align=right nowrap><font size=2>&nbsp; <a href=\"admin.php?ADD=3311&did_pattern=$extension\">$extension</a></td><td align=right><font size=2>&nbsp; $row[18]</td><td align=right><font size=2>&nbsp; $rowA[1]</td>\n";
				}
			$closer_log .= "</tr>\n";

			$stmtA="SELECT call_notes FROM vicidial_call_notes WHERE lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' and vicidial_id IN('$row[0]','$row[18]');";
			$rsltA=mysql_to_mysqli($stmtA, $link);
			$in_notes_to_print = mysqli_num_rows($rslt);
			if ($in_notes_to_print > 0)
				{
				$rowA=mysqli_fetch_row($rsltA);
				if (strlen($rowA[0]) > 0)
					{
					$closer_log .= "<TR>";
					$closer_log .= "<td></td>";
					$closer_log .= "<TD $bgcolor COLSPAN=9><font style=\"font-size:11px;font-family:sans-serif;\"> "._QXZ("NOTES").": &nbsp; $rowA[0] </font></TD>";
					$closer_log .= "</TR>";
					}
				}

			$campaign_id = $row[3];
			$uniqueidLIST .= ",'$row[18]'";
			}

		// BEGIN cold-storage log queries
		if ( (strlen($SScoldstorage_server_ip) > 1) and (strlen($SScoldstorage_login) > 0) and (strlen($SScoldstorage_pass) > 0) )
			{
			$linkCS = mysqli_connect("$SScoldstorage_server_ip", "$SScoldstorage_login", "$SScoldstorage_pass", "$SScoldstorage_dbname", $SScoldstorage_port);
			if (!$linkCS) {echo "MySQL Cold-Storage connect ERROR:  " . mysqli_connect_error();}

			##### grab vicidial_log_archive records #####
			$stmt="SELECT uniqueid,lead_id,list_id,campaign_id,call_date,start_epoch,end_epoch,length_in_sec,status,phone_code,phone_number,user,comments,processed,user_group,term_reason,alt_dial from vicidial_log_archive where lead_id='" . mysqli_real_escape_string($linkCS, $lead_id) . "' order by uniqueid desc limit 500;";
			$rslt=mysql_to_mysqli($stmt, $linkCS);
			$logs_to_print = mysqli_num_rows($rslt);
			if ($DB) {echo "$logs_to_print|$stmt\n";}

			$u=0;
		#	$call_log = '';
		#	$log_campaign = '';
			while ($logs_to_print > $u) 
				{
				$row=mysqli_fetch_row($rslt);		$uniqueid =		$row[0];
				if (strlen($log_campaign)<1) {$log_campaign = $row[3];}
				if (preg_match("/1$|3$|5$|7$|9$/i", $u))
					{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
				else
					{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}

				$u++;
				$call_log .= "<tr $bgcolor>";
				$call_log .= "<td><font size=1>$u</td>";
				$call_log .= "<td><font size=2><font color='#FF0000'>$row[4]</font></td>";
				$call_log .= "<td align=left><font size=2> $row[7]</td>\n";
				if ( ($LOGmodify_leads == '3') or ($LOGmodify_leads == '4') )
					{
					$call_log .= "<td align=left><font size=2><font color=blue><u><span id=\"vicidial_log_archive_status_$u\" onClick=\"ModifyLogDisplayShow(event, $u,'vicidial_log_archive','$uniqueid','$row[1]','$row[4]','$row[8]','$row[11]')\">$row[8]</span></u></font></td>\n";
					$HTML_inline_script .= "vicidial_log_archive_mod[$u] = \"Call Date: $row[4]<br>$label_lead_id: $row[1]<br>Current Status: $row[8]<br>\";\n";
					}
				else
					{$call_log .= "<td align=left><font size=2> $row[8]</td>\n";}
				$call_log .= "<td align=left><font size=2> <A HREF=\"user_stats.php?user=$row[11]\" target=\"_blank\">$row[11]</A> </td>\n";
				$call_log .= "<td align=right><font size=2> $row[3] </td>\n";
				$call_log .= "<td align=right><font size=2> $row[2] </td>\n";
				$call_log .= "<td align=right><font size=2> $row[1] </td>\n";
				$call_log .= "<td align=center><font size=2> $row[15] </td>\n";
				$call_log .= "<td align=right><font size=2>&nbsp; $row[10] </font><font size=1>$row[16] </td>\n";

				if ($CIDdisplay=="Yes")
					{
					$caller_code='';
					$stmtA="SELECT caller_code,server_ip FROM vicidial_log_extended_archive WHERE lead_id='" . mysqli_real_escape_string($linkCS, $lead_id) . "' and uniqueid='$uniqueid';";
					$rsltA=mysql_to_mysqli($stmtA, $linkCS);
					$cc_to_print = mysqli_num_rows($rsltA);
					if ($DB) {echo "$cc_to_print|$stmtA|\n";}
					if ($cc_to_print > 0)
						{
						$rowA=mysqli_fetch_row($rsltA);
						$caller_code = $rowA[0];
						$VLEserver_ip = $rowA[1];
						}
					$outbound_cid='';   $VDLcall_date='0';
					$stmtA="SELECT outbound_cid,server_ip,call_date,uniqueid,caller_code FROM vicidial_dial_log_archive WHERE lead_id='" . mysqli_real_escape_string($linkCS, $lead_id) . "' and caller_code='$caller_code' order by call_date limit 1;";
					if (!preg_match("/^M|^V/",$caller_code))
						{
						$temp_uniqueid = explode('.',$uniqueid);
						$temp_uniqueid_epoch =	$temp_uniqueid[0];
						$temp_uniqueid_before =	($temp_uniqueid[1] - 1);
						$temp_uniqueid_after =	($temp_uniqueid[1] + 1);
						$temp_uniqueidSQL = "'$temp_uniqueid_epoch.$temp_uniqueid_before','$uniqueid','$temp_uniqueid_epoch.$temp_uniqueid_after'";

						$stmtA="SELECT outbound_cid,server_ip,call_date,uniqueid,caller_code FROM vicidial_dial_log WHERE lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' and uniqueid IN($temp_uniqueidSQL) order by call_date limit 1;";
						}
					$rsltA=mysql_to_mysqli($stmtA, $linkCS);
					$cid_to_print = mysqli_num_rows($rsltA);
					if ($DB) {echo "$cid_to_print|$stmtA|\n";}
					if ($cid_to_print > 0)
						{
						$rowA=mysqli_fetch_row($rsltA);
						$outbound_cid = $rowA[0];
						$outbound_cid = preg_replace("/\".*\" /",'',$outbound_cid);
						$VDLserver_ip = $rowA[1];
						$VDLcall_date = $rowA[2];
						if (strlen($rowA[3]) > 0) {$uniqueid =		$rowA[3];}
						$caller_code =	$rowA[4];
						}
					$outbound_cid_num='';   $outbound_cid_type='';
					$stmtA="SELECT outbound_cid,outbound_cid_type FROM vicidial_dial_cid_log_archive WHERE call_date='$VDLcall_date' and caller_code='$caller_code' limit 1;";
					$rsltA=mysql_to_mysqli($stmtA, $linkCS);
					$vdl_to_print = mysqli_num_rows($rsltA);
					if ($vdl_to_print > 0)
						{
						$rowA=mysqli_fetch_row($rsltA);
						$outbound_cid_num = $rowA[0];
						$outbound_cid_num = preg_replace("/\".*\" /",'',$outbound_cid_num);
						$outbound_cid_type = $rowA[1];
						}

					if ($SSsip_event_logging > 0)
						{
						$call_log .= "<td align=right nowrap><font size=2>&nbsp; $outbound_cid  <span onClick=\"ShowCallDetail(event,'$caller_code','$SSframe_background')\"><font color=blue><u>$caller_code</u></font></span> <font size=1>$outbound_cid_type</td><td align=right><font size=2>&nbsp; $uniqueid</td><td align=right><font size=2>&nbsp; $VDLserver_ip</td>\n";
						}
					else
						{
						$call_log .= "<td align=right nowrap><font size=2>&nbsp; $outbound_cid $caller_code </font><font size=1>$outbound_cid_type</td><td align=right><font size=2>&nbsp; $uniqueid</td><td align=right><font size=2>&nbsp; $VDLserver_ip</td>\n";
						}
					}
				$call_log .= "</tr>\n";

				$stmtA="SELECT call_notes FROM vicidial_call_notes WHERE lead_id='" . mysqli_real_escape_string($linkCS, $lead_id) . "' and vicidial_id='$row[0]';";
				$rsltA=mysql_to_mysqli($stmtA, $link);
				$out_notes_to_print = mysqli_num_rows($rslt);
				if ($out_notes_to_print > 0)
					{
					$rowA=mysqli_fetch_row($rsltA);
					if (strlen($rowA[0]) > 0)
						{
						$call_log .= "<TR>";
						$call_log .= "<td></td>";
						$call_log .= "<TD $bgcolor COLSPAN=9><font style=\"font-size:11px;font-family:sans-serif;\"> "._QXZ("NOTES").": &nbsp; $rowA[0] </font></TD>";
						$call_log .= "</TR>";
						}
					}

				$campaign_id = $row[3];
				$uniqueidLIST .= ",'$row[0]'";
				}

			##### grab vicidial_agent_log_archive records #####
			$stmt="SELECT agent_log_id,user,server_ip,event_time,lead_id,campaign_id,pause_epoch,pause_sec,wait_epoch,wait_sec,talk_epoch,talk_sec,dispo_epoch,dispo_sec,status,user_group,comments,sub_status from vicidial_agent_log_archive where lead_id='" . mysqli_real_escape_string($linkCS, $lead_id) . "' order by agent_log_id desc limit 500;";
			$rslt=mysql_to_mysqli($stmt, $linkCS);
			$Alogs_to_print = mysqli_num_rows($rslt);
			if ($DB) {echo "$Alogs_to_print|$stmt\n";}

			$y=0;
		#	$agent_log = '';
		#	$Alog_campaign = '';
			while ($Alogs_to_print > $y) 
				{
				$row=mysqli_fetch_row($rslt);
				if (strlen($Alog_campaign)<1) {$Alog_campaign = $row[5];}
				if (preg_match("/1$|3$|5$|7$|9$/i", $y))
					{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
				else
					{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}

				$y++;
				$agent_log .= "<tr $bgcolor>";
				$agent_log .= "<td><font size=1>$y</td>";
				$agent_log .= "<td><font size=2><font color='#FF0000'>$row[3]</font></td>";
				$agent_log .= "<td align=left><font size=2> $row[5]</td>\n";
				$agent_log .= "<td align=left><font size=2> <A HREF=\"user_stats.php?user=$row[1]\" target=\"_blank\">$row[1]</A> </td>\n";
				$agent_log .= "<td align=right><font size=2> $row[7]</td>\n";
				$agent_log .= "<td align=right><font size=2> $row[9] </td>\n";
				$agent_log .= "<td align=right><font size=2> $row[11] </td>\n";
				$agent_log .= "<td align=right><font size=2> $row[13] </td>\n";
				if ( ($LOGmodify_leads == '3') or ($LOGmodify_leads == '4') )
					{
					$agent_log .= "<td align=left><font size=2> &nbsp; <font color=blue><u><span id=\"vicidial_agent_log_archive_status_$y\" onClick=\"ModifyLogDisplayShow(event, $y,'vicidial_agent_log_archive','$row[0]','$row[4]','$row[3]','$row[14]','$row[1]')\">$row[14]</span></u></font></td>\n";
					$HTML_inline_script .= "vicidial_agent_log_archive_mod[$y] = \"Event Date: $row[3]<br>$label_lead_id: $row[4]<br>Current Status: $row[14]<br>\";\n";
					}
				else
					{$agent_log .= "<td align=left><font size=2> $row[14]</td>\n";}
				$agent_log .= "<td align=right><font size=2> &nbsp; $row[15] </td>\n";
				$agent_log .= "<td align=right><font size=2> &nbsp; $row[17] </td></tr>\n";

				$campaign_id = $row[5];
				}

			##### grab vicidial_closer_log_archive records #####
			$stmt="SELECT closecallid,lead_id,list_id,campaign_id,call_date,start_epoch,end_epoch,length_in_sec,status,phone_code,phone_number,user,comments,processed,queue_seconds,user_group,xfercallid,term_reason,uniqueid,agent_only from vicidial_closer_log_archive where lead_id='" . mysqli_real_escape_string($linkCS, $lead_id) . "' order by closecallid desc limit 500;";
			$rslt=mysql_to_mysqli($stmt, $linkCS);
			$Clogs_to_print = mysqli_num_rows($rslt);
			if ($DB) {echo "$Clogs_to_print|$stmt\n";}

			$y=0;
		#	$closer_log = '';
		#	$Clog_campaign = '';
			while ($Clogs_to_print > $y) 
				{
				$row=mysqli_fetch_row($rslt);
				if (strlen($Clog_campaign)<1) {$Clog_campaign = $row[3];}
				if (preg_match("/1$|3$|5$|7$|9$/i", $y))
					{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
				else
					{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}

				$y++;
				$closer_log .= "<tr $bgcolor>";
				$closer_log .= "<td><font size=1>$y</td>";
				$closer_log .= "<td><font size=2><font color='#FF0000'>$row[4]</font></td>";
				$closer_log .= "<td align=left><font size=2> $row[7]</td>\n";
				if ( ($LOGmodify_leads == '3') or ($LOGmodify_leads == '4') )
					{
					$closer_log .= "<td align=left><font size=2><font color=blue><u><span id=\"vicidial_closer_log_archive_status_$y\" onClick=\"ModifyLogDisplayShow(event, $y,'vicidial_closer_log_archive','$row[0]','$row[1]','$row[4]','$row[8]','$row[11]')\">$row[8]</span></u></font></td>\n";
					$HTML_inline_script .= "vicidial_closer_log_archive_mod[$y] = \"Call Date: $row[4]<br>$label_lead_id: $row[1]<br>Current Status: $row[8]<br>\";\n";
					}
				else
					{$closer_log .= "<td align=left><font size=2> $row[8]</td>\n";}
				$closer_log .= "<td align=left><font size=2> <A HREF=\"user_stats.php?user=$row[11]\" target=\"_blank\">$row[11]</A> </td>\n";
				$closer_log .= "<td align=right><font size=2> $row[3] </td>\n";
				$closer_log .= "<td align=right><font size=2> $row[2] </td>\n";
				$closer_log .= "<td align=right><font size=2> $row[1] </td>\n";
				$closer_log .= "<td align=right><font size=2> &nbsp; $row[14] </td>\n";
				$closer_log .= "<td align=right><font size=2> &nbsp; $row[17] </td>\n";

				if ($CIDdisplay=="Yes")
					{
					$extension='';
					$stmtA="SELECT extension,server_ip FROM vicidial_did_log_archive WHERE uniqueid='$row[18]' and call_date <= \"$row[4]\" order by call_date desc;";
					$rsltA=mysql_to_mysqli($stmtA, $linkCS);
					$cid_to_print = mysqli_num_rows($rsltA);
					if ($cid_to_print > 0)
						{
						$rowA=mysqli_fetch_row($rsltA);
						$extension = $rowA[0];
						$VDLserver_ip = $rowA[1];
						}
					$caller_code='';
					$stmtA="SELECT caller_code,server_ip FROM vicidial_inbound_caller_codes_archive WHERE lead_id='" . mysqli_real_escape_string($linkCS, $lead_id) . "' and uniqueid='$row[18]' and group_id='$row[3]';";
					$rsltA=mysql_to_mysqli($stmtA, $linkCS);
					$cc_to_print = mysqli_num_rows($rsltA);
					if ($cc_to_print > 0)
						{
						$rowA=mysqli_fetch_row($rsltA);
						$caller_code =	$rowA[0];
						$VLEserver_ip = $rowA[1];
						}
					$closer_log .= "<td align=right nowrap><font size=2>&nbsp; $caller_code</td><td align=right nowrap><font size=2>&nbsp; <a href=\"admin.php?ADD=3311&did_pattern=$extension\">$extension</a></td><td align=right><font size=2>&nbsp; $row[18]</td><td align=right><font size=2>&nbsp; $rowA[1]</td>\n";
					}
				$closer_log .= "</tr>\n";

				$stmtA="SELECT call_notes FROM vicidial_call_notes WHERE lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' and vicidial_id IN('$row[0]','$row[18]');";
				$rsltA=mysql_to_mysqli($stmtA, $link);
				$in_notes_to_print = mysqli_num_rows($rslt);
				if ($in_notes_to_print > 0)
					{
					$rowA=mysqli_fetch_row($rsltA);
					if (strlen($rowA[0]) > 0)
						{
						$closer_log .= "<TR>";
						$closer_log .= "<td></td>";
						$closer_log .= "<TD $bgcolor COLSPAN=9><font style=\"font-size:11px;font-family:sans-serif;\"> "._QXZ("NOTES").": &nbsp; $rowA[0] </font></TD>";
						$closer_log .= "</TR>";
						}
					}

				$campaign_id = $row[3];
				$uniqueidLIST .= ",'$row[18]'";
				}
			}
		// END cold-storage log queries

		}
	########## END ARCHIVE LOG SEARCH ##########

	if ($lead_count > 0)
		{
		##### grab vicidial_list data for lead #####
		$stmt="SELECT lead_id,entry_date,modify_date,status,user,vendor_lead_code,source_id,list_id,gmt_offset_now,called_since_last_reset,phone_code,phone_number,title,first_name,middle_initial,last_name,address1,address2,address3,city,state,province,postal_code,country_code,gender,date_of_birth,alt_phone,email,security_phrase,comments,called_count,last_local_call_time,rank,owner,entry_list_id from $vl_table where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' $LOGallowed_listsSQL";
		$rslt=mysql_to_mysqli($stmt, $link);
		if ($DB) {echo "$stmt\n";}
		$row=mysqli_fetch_row($rslt);

		if ($LOGadmin_hide_phone_data != '0')
			{
			if ($DB > 0) {echo "HIDEPHONEDATA|$row[11]|$LOGadmin_hide_phone_data|\n";}
			$phone_temp = $row[11];
			if (strlen($phone_temp) > 0)
				{
				if ($LOGadmin_hide_phone_data == '4_DIGITS')
					{$row[11] = str_repeat("X", (strlen($phone_temp) - 4)) . substr($phone_temp,-4,4);}
				elseif ($LOGadmin_hide_phone_data == '3_DIGITS')
					{$row[11] = str_repeat("X", (strlen($phone_temp) - 3)) . substr($phone_temp,-3,3);}
				elseif ($LOGadmin_hide_phone_data == '2_DIGITS')
					{$row[11] = str_repeat("X", (strlen($phone_temp) - 2)) . substr($phone_temp,-2,2);}
				else
					{$row[11] = preg_replace("/./",'X',$phone_temp);}
				}
			}
		if ($LOGadmin_hide_lead_data != '0')
			{
			if ($DB > 0) {echo "HIDELEADDATA|$row[5]|$row[6]|$row[12]|$row[13]|$row[14]|$row[15]|$row[16]|$row[17]|$row[18]|$row[19]|$row[20]|$row[21]|$row[22]|$row[26]|$row[27]|$row[28]|$LOGadmin_hide_lead_data|\n";}
			if (strlen($row[5]) > 0)
				{$data_temp = $row[5];   $row[5] = preg_replace("/./",'X',$data_temp);}
			if (strlen($row[6]) > 0)
				{$data_temp = $row[6];   $row[6] = preg_replace("/./",'X',$data_temp);}
			if (strlen($row[12]) > 0)
				{$data_temp = $row[12];   $row[12] = preg_replace("/./",'X',$data_temp);}
			if (strlen($row[13]) > 0)
				{$data_temp = $row[13];   $row[13] = preg_replace("/./",'X',$data_temp);}
			if (strlen($row[14]) > 0)
				{$data_temp = $row[14];   $row[14] = preg_replace("/./",'X',$data_temp);}
			if (strlen($row[15]) > 0)
				{$data_temp = $row[15];   $row[15] = preg_replace("/./",'X',$data_temp);}
			if (strlen($row[16]) > 0)
				{$data_temp = $row[16];   $row[16] = preg_replace("/./",'X',$data_temp);}
			if (strlen($row[17]) > 0)
				{$data_temp = $row[17];   $row[17] = preg_replace("/./",'X',$data_temp);}
			if (strlen($row[18]) > 0)
				{$data_temp = $row[18];   $row[18] = preg_replace("/./",'X',$data_temp);}
			if (strlen($row[19]) > 0)
				{$data_temp = $row[19];   $row[19] = preg_replace("/./",'X',$data_temp);}
			if (strlen($row[20]) > 0)
				{$data_temp = $row[20];   $row[20] = preg_replace("/./",'X',$data_temp);}
			if (strlen($row[21]) > 0)
				{$data_temp = $row[21];   $row[21] = preg_replace("/./",'X',$data_temp);}
			if (strlen($row[22]) > 0)
				{$data_temp = $row[22];   $row[22] = preg_replace("/./",'X',$data_temp);}
			if (strlen($row[26]) > 0)
				{$data_temp = $row[26];   $row[26] = preg_replace("/./",'X',$data_temp);}
			if (strlen($row[27]) > 0)
				{$data_temp = $row[27];   $row[27] = preg_replace("/./",'X',$data_temp);}
			if (strlen($row[28]) > 0)
				{$data_temp = $row[28];   $row[28] = preg_replace("/./",'X',$data_temp);}
			}

		if (strlen($row[0]) > 0)
			{$lead_id		= $row[0];}
		$dispo				= $row[3];
		$tsr				= $row[4];
		$vendor_id			= $row[5];
		$source_id			= $row[6];
		$list_id			= $row[7];
		$gmt_offset_now		= $row[8];
		$called_since_last_reset = $row[9];
		$phone_code			= $row[10];
		$phone_number		= $row[11];
		$title				= $row[12];
		$first_name			= $row[13];
		$middle_initial		= $row[14];
		$last_name			= $row[15];
		$address1			= $row[16];
		$address2			= $row[17];
		$address3			= $row[18];
		$city				= $row[19];
		$state				= $row[20];
		$province			= $row[21];
		$postal_code		= $row[22];
		$country_code		= $row[23];
		$gender				= $row[24];
		$date_of_birth		= $row[25];
		$alt_phone			= $row[26];
		$email				= $row[27];
		$security			= $row[28];
		$comments			= $row[29];
		$called_count		= $row[30];
		$last_local_call_time = $row[31];
		$rank				= $row[32];
		$owner				= $row[33];
		$entry_list_id		= $row[34];

		$comments = preg_replace("/!N/","\n",$comments);
		}

	##### grab today call count for lead #####
	$call_count_today=0;
	$stmt="SELECT called_count_total from vicidial_lead_call_daily_counts where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' $LOGallowed_listsSQL";
	$rslt=mysql_to_mysqli($stmt, $link);
	if ($DB) {echo "$stmt\n";}
	$counts_to_print = mysqli_num_rows($rslt);
	if ($counts_to_print > 0)
		{
		$row=mysqli_fetch_row($rslt);
		$call_count_today		= $row[0];
		}


	if ($lead_id == 'NEW')
		{
		##### create a select list of lists if a NEW lead_id #####
		$stmt="SELECT list_id,campaign_id,list_name from vicidial_lists $whereLOGallowed_campaignsSQL order by list_id limit 5000;";
		if ($DB) {echo "$stmt\n";}
		$rslt=mysql_to_mysqli($stmt, $link);
		$lists_to_print = mysqli_num_rows($rslt);

		$Lc=0;
		$select_list = '<select size=1 name=list_id>';
		while ($lists_to_print > $Lc)
			{
			$row=mysqli_fetch_row($rslt);
			$select_list .= "<option value='$row[0]'>$row[0] - $row[1] - $row[2]</option>";

			$Lc++;
			}
		$select_list .= "</select>";

		$list_id=$select_list;
		}

	if (strlen($HTML_inline_script) > 0)
		{
		echo "$HTML_inline_script\n";
		}

	echo "</script>\n";
	echo "<link rel=\"stylesheet\" href=\"calendar.css\">\n";
	echo "</head><BODY BGCOLOR=white marginheight=0 marginwidth=0 leftmargin=0 topmargin=0>\n";
	echo "<script language=\"JavaScript\" src=\"calendar_db.js\"></script>\n";
	echo "<span style=\"position:absolute;left:0px;top:0px;z-index:20;\" id=admin_header>";
	echo "<div id='LogModDisplayDiv' style='position:absolute; top:0; left:0; z-index:21; background-color:white display:none;'></div>\n";
	echo "<div id='DetailDisplayDiv' style='position:absolute; top:0; left:0; z-index:20; background-color:white display:none;'></div>\n";

	$short_header=1;

	require("admin_header.php");

	echo "</span>\n";
	echo "$messagesHTML\n";


	if ($lead_id == 'NEW')
		{
		if ($LOGmodify_leads == '5')
			{
			echo "ERROR: "._QXZ("You do not have permission to add new leads").": $LOGmodify_leads \n";
			exit;
			}
		echo "<br><b>"._QXZ("Add A New Lead")."</B>\n";
		}
	else
		{
		if ($lead_count > 0)
			{echo "<br>"._QXZ("Lead information").": $first_name $last_name - $phone_number\n";}
		}

	if ( ($lead_count > 0) or ($lead_id == 'NEW') )
		{
		if ($campaign_id=='---NONE') {$campaign_id='';}
		echo "<br><br><form action=$PHP_SELF method=POST>\n";
		echo "<input type=hidden name=end_call value=1>\n";
		echo "<input type=hidden name=DB value=\"$DB\">\n";
		echo "<input type=hidden name=lead_id value=\"$lead_id\">\n";
		echo "<input type=hidden name=dispo value=\"$dispo\">\n";
		echo "<input type=hidden name=list_id value=\"$list_id\">\n";
		echo "<input type=hidden name=campaign_id value=\"$campaign_id\">\n";
		echo "<input type=hidden name=old_phone value=\"$phone_number\">\n";
		echo "<input type=hidden name=server_ip value=\"$server_ip\">\n";
		echo "<input type=hidden name=extension value=\"$extension\">\n";
		echo "<input type=hidden name=channel value=\"$channel\">\n";
		echo "<input type=hidden name=call_began value=\"$call_began\">\n";
		echo "<input type=hidden name=parked_time value=\"$parked_time\">\n";
		echo "<input type=hidden name=FORM_LOADED id=FORM_LOADED value=\"0\" />\n";
		echo "<table cellpadding=1 cellspacing=0>\n";
		echo "<tr><td colspan=2>$label_lead_id: $lead_id &nbsp; &nbsp; $label_list_id:  $list_id &nbsp; &nbsp; <font size=2>$label_gmt_offset_now: $gmt_offset_now &nbsp; &nbsp; $label_called_since_last_reset: $called_since_last_reset</td></tr>\n";
		echo "<tr><td colspan=2>$label_user: <A HREF=\"user_stats.php?user=$tsr\">$tsr</A> &nbsp; &nbsp; $label_called_count: $called_count <font size=2>("._QXZ("today").": $call_count_today)</font> &nbsp; &nbsp; $label_last_local_call_time: $last_local_call_time</td></tr>\n";
		if ($archive_search=="Yes") 
			{
			echo "<tr><td colspan=2 align='center'>";
			echo "<B><font color='#FF0000'>*** "._QXZ("ARCHIVED LEAD")." ***</font></B>";
			echo "<input type='hidden' name='archive_search' value='Yes'>";
			echo "</td></tr>\n";
			}
		if ($archive_log=="Yes") 
			{
			echo "<tr><td colspan=2 align='center'>";
			echo "<B><font color='#FF0000'>*** "._QXZ("ARCHIVED LOG SEARCH ENABLED")." ***</font></B> <a href=\"$PHP_SELF?lead_id=$lead_id&archive_search=$archive_search&archive_log=No&CIDdisplay=$CIDdisplay\">"._QXZ("Turn off archived logs display")."</a><BR>";
			echo "<B><font color='#FF0000'>*** "._QXZ("ARCHIVED LOGS SHOWN IN RED, THERE MAY BE DUPLICATES WITH NON-ARCHIVED LOG ENTRIES")." ***</font></B>";
			echo "<input type='hidden' name='archive_log' value='Yes'>";
			echo "</td></tr>\n";
			}
		else
			{
			echo "<tr><td colspan=2 align='center'>";
			echo "<a href=\"$PHP_SELF?lead_id=$lead_id&archive_search=$archive_search&archive_log=Yes&CIDdisplay=$CIDdisplay\">"._QXZ("Turn on archived logs display")."</a>";
			echo "</td></tr>\n";
			}

		if ($lead_id == 'NEW') {$list_id='';}

		if ($LOGadmin_hide_lead_data != '0')
			{
			echo "<tr><td align=right>$label_title: </td><td align=left>$title &nbsp; \n";
			echo "$label_first_name: $first_name </td></tr>\n";
			echo "<tr><td align=right>$label_middle_initial:  </td><td align=left>$middle_initial &nbsp; \n";
			echo " $label_last_name: $last_name </td></tr>\n";
			echo "<tr><td align=right>$label_address1 : </td><td align=left>$address1</td></tr>\n";
			echo "<tr><td align=right>$label_address2 : </td><td align=left>$address2</td></tr>\n";
			echo "<tr><td align=right>$label_address3 : </td><td align=left>$address3</td></tr>\n";
			echo "<tr><td align=right>$label_city : </td><td align=left>$city</td></tr>\n";
			echo "<tr><td align=right>$label_state: </td><td align=left>$state &nbsp; \n";
			echo " $label_postal_code: $postal_code </td></tr>\n";

			echo "<tr><td align=right>$label_province : </td><td align=left>$province</td></tr>\n";
			echo "<tr><td align=right>$label_country_code : </td><td align=left>$country_code &nbsp; \n";
			echo " $label_date_of_birth: $date_of_birth </td></tr>\n";
			echo "<tr><td align=right>$label_phone_number : </td><td align=left>$phone_number</td></tr>\n";
			echo "<tr><td align=right>$label_phone_code : </td><td align=left>$phone_code</td></tr>\n";
			echo "<tr><td align=right>$label_alt_phone : </td><td align=left>$alt_phone</td></tr>\n";
			echo "<tr><td align=right>$label_email : </td><td align=left>$email</td></tr>\n";
			echo "<tr><td align=right>$label_security_phrase : </td><td align=left>$security</td></tr>\n";
			echo "<tr><td align=right>$label_vendor_lead_code : </td><td align=left>$vendor_id></td></tr>\n";
			if ($SSsource_id_display > 0)
				{echo "<tr><td align=right>$label_source_id : </td><td align=left>$source_id></td></tr>\n";}
			echo "<tr><td align=right>$label_rank : </td><td align=left>$rank</td></tr>\n";
			echo "<tr><td align=right>$label_owner : </td><td align=left>$owner</td></tr>\n";
			echo "<tr><td align=right>$label_comments : </td><td align=left>$comments</td></tr>\n";
			}
		else
			{
			echo "<tr><td align=right>$label_title: </td><td align=left><input type=text name=title id=title size=4 maxlength=$MAXtitle value=\"$title\"> &nbsp; \n";
			echo "$label_first_name: <input type=text name=first_name id=first_name size=15 maxlength=$MAXfirst_name value=\"".htmlparse($first_name)."\"> </td></tr>\n";
			echo "<tr><td align=right>$label_middle_initial:  </td><td align=left><input type=text name=middle_initial id=middle_initial size=4 maxlength=$MAXmiddle_initial value=\"".htmlparse($middle_initial)."\"> &nbsp; \n";
			echo " $label_last_name: <input type=text name=last_name id=last_name size=15 maxlength=$MAXlast_name value=\"".htmlparse($last_name)."\"> </td></tr>\n";
			echo "<tr><td align=right>$label_address1 : </td><td align=left><input type=text name=address1 id=address1 size=40 maxlength=$MAXaddress1 value=\"".htmlparse($address1)."\"></td></tr>\n";
			echo "<tr><td align=right>$label_address2 : </td><td align=left><input type=text name=address2 id=address2 size=40 maxlength=$MAXaddress2 value=\"".htmlparse($address2)."\"></td></tr>\n";
			echo "<tr><td align=right>$label_address3 : </td><td align=left><input type=text name=address3 id=address3 size=40 maxlength=$MAXaddress3 value=\"".htmlparse($address3)."\"></td></tr>\n";
			echo "<tr><td align=right>$label_city : </td><td align=left><input type=text name=city id=city size=40 maxlength=$MAXcity value=\"".htmlparse($city)."\"></td></tr>\n";
			echo "<tr><td align=right>$label_state: </td><td align=left><input type=text name=state id=state size=2 maxlength=$MAXstate value=\"".htmlparse($state)."\"> &nbsp; \n";
			echo " $label_postal_code: <input type=text name=postal_code id=postal_code size=10 maxlength=$MAXpostal_code value=\"".htmlparse($postal_code)."\"> </td></tr>\n";

			echo "<tr><td align=right>$label_province : </td><td align=left><input type=text name=province id=province size=40 maxlength=$MAXprovince value=\"".htmlparse($province)."\"></td></tr>\n";
			echo "<tr><td align=right>$label_country_code : </td><td align=left><input type=text name=country_code id=country_code size=3 maxlength=$MAXcountry_code value=\"".htmlparse($country_code)."\"> &nbsp; \n";
			echo " $label_date_of_birth: <input type=text name=date_of_birth id=date_of_birth size=12 maxlength=10 value=\"".htmlparse($date_of_birth)."\"></td></tr>\n";

			if ( ($LOGmodify_leads == '1') or ($LOGmodify_leads == '3') or ($lead_id == 'NEW') )
				{
				echo "<tr><td align=right>$label_phone_number : </td><td align=left><input type=text name=phone_number id=phone_number size=18 maxlength=$MAXphone_number value=\"".htmlparse($phone_number)."\"></td></tr>\n";
				echo "<tr><td align=right>$label_phone_code : </td><td align=left><input type=text name=phone_code id=phone_code size=10 maxlength=$MAXphone_code value=\"".htmlparse($phone_code)."\"></td></tr>\n";
				echo "<tr><td align=right>$label_alt_phone : </td><td align=left><input type=text name=alt_phone id=alt_phone size=12 maxlength=$MAXalt_phone value=\"".htmlparse($alt_phone)."\"></td></tr>\n";
				}
			else
				{
				echo "<tr><td align=right>$label_phone_number : </td><td align=left><input type=hidden name=phone_number value=\"".htmlparse($phone_number)."\">".htmlparse($phone_number)."</td></tr>\n";
				echo "<tr><td align=right>$label_phone_code : </td><td align=left><input type=hidden name=phone_code value=\"".htmlparse($phone_code)."\">".htmlparse($phone_code)."</td></tr>\n";
				echo "<tr><td align=right>$label_alt_phone : </td><td align=left><input type=hidden name=alt_phone value=\"".htmlparse($alt_phone)."\">".htmlparse($alt_phone)."</td></tr>\n";
				}

			echo "<tr><td align=right>$label_email : </td><td align=left><input type=text name=email size=40 maxlength=$MAXemail value=\"".htmlparse($email)."\"></td></tr>\n";
			echo "<tr><td align=right>$label_security_phrase : </td><td align=left><input type=text name=security id=security_phrase size=30 maxlength=$MAXsecurity_phrase value=\"".htmlparse($security)."\"></td></tr>\n";
			echo "<tr><td align=right>$label_vendor_lead_code : </td><td align=left><input type=text name=vendor_id id=vendor_lead_code size=30 maxlength=$MAXvendor_lead_code value=\"".htmlparse($vendor_id)."\"></td></tr>\n";
			if ($SSsource_id_display > 0)
				{echo "<tr><td align=right>$label_source_id : </td><td align=left><input type=text name=source_id id=source_id size=30 maxlength=$MAXsource_id value=\"".htmlparse($source_id)."\"></td></tr>\n";}
			echo "<tr><td align=right>$label_rank : </td><td align=left><input type=text name=rank id=rank size=7 maxlength=5 value=\"".htmlparse($rank)."\"></td></tr>\n";
			echo "<tr><td align=right>$label_owner : </td><td align=left><input type=text name=owner id=owner size=22 maxlength=$MAXowner value=\"".htmlparse($owner)."\"></td></tr>\n";
			echo "<tr><td align=right>$label_comments : </td><td align=left><TEXTAREA name=comments id=comments ROWS=3 COLS=65>".htmlparse($comments)."</TEXTAREA></td></tr>\n";
			}
		}
	else
		{
		echo "<!-- "._QXZ("no lead fields form display lead does not exist")." -->\n";
		echo "<br><br><form action=$PHP_SELF method=POST>\n";
		echo "<input type=hidden name=end_call value=1>\n";
		echo "<input type=hidden name=DB value=\"$DB\">\n";
		echo "<input type=hidden name=lead_id value=\"$lead_id\">\n";
		echo "<input type=hidden name=dispo value=\"$dispo\">\n";
		echo "<input type=hidden name=list_id value=\"$list_id\">\n";
		echo "<input type=hidden name=campaign_id value=\"$campaign_id\">\n";
		echo "<input type=hidden name=old_phone value=\"$phone_number\">\n";
		echo "<input type=hidden name=server_ip value=\"$server_ip\">\n";
		echo "<input type=hidden name=extension value=\"$extension\">\n";
		echo "<input type=hidden name=channel value=\"$channel\">\n";
		echo "<input type=hidden name=call_began value=\"$call_began\">\n";
		echo "<input type=hidden name=parked_time value=\"$parked_time\">\n";
		echo "<input type=hidden name=FORM_LOADED id=FORM_LOADED value=\"0\" />\n";
		echo "<table cellpadding=1 cellspacing=0>\n";
		}

	if ($lead_id != 'NEW') 
		{
		$stmt="SELECT user_id, timestamp, list_id, campaign_id, comment from vicidial_comments where lead_id='$lead_id' order by timestamp;";
		$rslt=mysql_to_mysqli($stmt, $link);
		$row_count = mysqli_num_rows($rslt);
		$audit_comments=false;
		$o=0;
		while ($row_count > $o)
			{
			if (!$audit_comments) 
				{
				echo "<tr><td colspan='2' align=center><b>"._QXZ("Comment History")."</b></td></tr>\n";
				$audit_comments=true;
				}
			$rowx=mysqli_fetch_row($rslt);
			$Auser[$o] =		$rowx[0];
			$Atimestamp[$o] =	$rowx[1];
			$Acomment[$o] =		$rowx[4];
			$o++;
			}
		$o=0;
		while ($row_count > $o)
			{
			$Afull_name='';
			$stmt="SELECT full_name from vicidial_users where user='$Auser[$o]';";
			$rslt=mysql_to_mysqli($stmt, $link);
			$FNrow_count = mysqli_num_rows($rslt);
			if ($FNrow_count > 0)
				{
				$rowx=mysqli_fetch_row($rslt);
				$Afull_name = $rowx[0];
				}
			echo "<tr><td align=right><font size=2>$Atimestamp[$o]: </td><td align=left><font size=2><hr> &nbsp; $Acomment[$o]<br> &nbsp; </font><font size=1><i>by user: $Auser[$o] - $Afull_name</i></td></tr>\n";
			$o++;
			}

		if ($audit_comments) 
			{
			echo "<tr><td align=center></td><td><hr></td></tr>\n";
			}

		echo "<tr bgcolor=#".$SSstd_row4_background."><td align=right>"._QXZ("Disposition").": </td><td align=left><select size=1 name=status>\n";

		### find out if status(dispo) is a scheduled callback status
		$scheduled_callback='';
		$stmt="SELECT scheduled_callback from vicidial_statuses where status='$dispo';";
		$rslt=mysql_to_mysqli($stmt, $link);
		$scb_count_to_print = mysqli_num_rows($rslt);
		if ($scb_count_to_print > 0) 
			{
			$row=mysqli_fetch_row($rslt);
			if (strlen($row[0])>0)	{$scheduled_callback =	$row[0];}
			}
		$stmt="SELECT scheduled_callback from vicidial_campaign_statuses where status='$dispo';";
		$rslt=mysql_to_mysqli($stmt, $link);
		$scb_count_to_print = mysqli_num_rows($rslt);
		if ($scb_count_to_print > 0) 
			{
			$row=mysqli_fetch_row($rslt);
			if (strlen($row[0])>0)	{$scheduled_callback =	$row[0];}
			}

		$list_campaign='';
		$stmt="SELECT campaign_id from vicidial_lists where list_id='$list_id'";
		$rslt=mysql_to_mysqli($stmt, $link);
		if ($DB) {echo "$stmt\n";}
		$Cstatuses_to_print = mysqli_num_rows($rslt);
		if ($Cstatuses_to_print > 0)
			{
			$row=mysqli_fetch_row($rslt);
			$list_campaign = $row[0];
			}

		$stmt="SELECT status,status_name,selectable,human_answered,category,sale,dnc,customer_contact,not_interested,unworkable from vicidial_statuses $selectableSQL order by status";
		$rslt=mysql_to_mysqli($stmt, $link);
		$statuses_to_print = mysqli_num_rows($rslt);
		$statuses_listMODLOG='';
		$statuses_list='';

		$o=0;
		$DS=0;
		while ($statuses_to_print > $o) 
			{
			$rowx=mysqli_fetch_row($rslt);
			if ( (strlen($dispo) ==  strlen($rowx[0])) and (preg_match("/$dispo/i",$rowx[0])) )
				{$statuses_list .= "<option SELECTED value=\"$rowx[0]\">$rowx[0] - $rowx[1]</option>\n"; $DS++;}
			else
				{$statuses_list .= "<option value=\"$rowx[0]\">$rowx[0] - $rowx[1]</option>\n";}
			$statuses_listMODLOG .= "<option value=\"$rowx[0]\">$rowx[0] - $rowx[1]</option>";
			$o++;
			}

		$stmt="SELECT status,status_name,selectable,campaign_id,human_answered,category,sale,dnc,customer_contact,not_interested,unworkable from vicidial_campaign_statuses where campaign_id='$list_campaign' $selectableSQLand order by status";
		$rslt=mysql_to_mysqli($stmt, $link);
		$CAMPstatuses_to_print = mysqli_num_rows($rslt);

		$o=0;
		$CBhold_set=0;
		while ($CAMPstatuses_to_print > $o) 
			{
			$rowx=mysqli_fetch_row($rslt);
			if ( (strlen($dispo) ==  strlen($rowx[0])) and (preg_match("/$dispo/i",$rowx[0])) )
				{$statuses_list .= "<option SELECTED value=\"$rowx[0]\">$rowx[0] - $rowx[1]</option>\n"; $DS++;}
			else
				{$statuses_list .= "<option value=\"$rowx[0]\">$rowx[0] - $rowx[1]</option>\n";}
			$statuses_listMODLOG .= "<option value=\"$rowx[0]\">$rowx[0] - $rowx[1]</option>";
			if ($rowx[0] == 'CBHOLD') {$CBhold_set++;}
			$o++;
			}

		if (strlen($VU_status_group_id) > 0)
			{
			$stmt="SELECT status,status_name,selectable,campaign_id,human_answered,category,sale,dnc,customer_contact,not_interested,unworkable from vicidial_campaign_statuses where campaign_id='$VU_status_group_id' $selectableSQLand order by status";
			$rslt=mysql_to_mysqli($stmt, $link);
			$USERstatuses_to_print = mysqli_num_rows($rslt);

			$o=0;
			$CBhold_set=0;
			while ($USERstatuses_to_print > $o) 
				{
				$rowx=mysqli_fetch_row($rslt);
				if ( (strlen($dispo) ==  strlen($rowx[0])) and (preg_match("/$dispo/i",$rowx[0])) )
					{$statuses_list .= "<option SELECTED value=\"$rowx[0]\">$rowx[0] - $rowx[1]</option>\n"; $DS++;}
				else
					{$statuses_list .= "<option value=\"$rowx[0]\">$rowx[0] - $rowx[1]</option>\n";}
				$statuses_listMODLOG .= "<option value=\"$rowx[0]\">$rowx[0] - $rowx[1]</option>";
				if ($rowx[0] == 'CBHOLD') {$CBhold_set++;}
				$o++;
				}
			}	

		if ($dispo == 'CBHOLD') {$CBhold_set++;}

		if ($DS < 1) 
			{$statuses_list .= "<option SELECTED value=\"$dispo\">$dispo</option>\n";}
		if ($CBhold_set < 1)
			{$statuses_list .= "<option value=\"CBHOLD\">CBHOLD - "._QXZ("Scheduled Callback")."</option>\n";}
		echo "$statuses_list";
		echo "</select> <i>("._QXZ("with")." $list_campaign "._QXZ("statuses").")</i></td></tr>\n";


		echo "<tr bgcolor=#".$SSstd_row4_background."><td align=left>"._QXZ("Modify vicidial log")." </td><td align=left><input type=checkbox name=modify_logs value=\"1\" CHECKED></td></tr>\n";
		echo "<tr bgcolor=#".$SSstd_row4_background."><td align=left>"._QXZ("Modify agent log")." </td><td align=left><input type=checkbox name=modify_agent_logs value=\"1\" CHECKED></td></tr>\n";
		echo "<tr bgcolor=#".$SSstd_row4_background."><td align=left>"._QXZ("Modify closer log")." </td><td align=left><input type=checkbox name=modify_closer_logs value=\"1\"></td></tr>\n";
		echo "<tr bgcolor=#".$SSstd_row4_background."><td align=left>"._QXZ("Add closer log record")." </td><td align=left><input type=checkbox name=add_closer_record value=\"1\"></td></tr>\n";
		}
	else
		{
		echo "<input type=hidden name=status value=\"NEW\">\n";
		}

	if ( ($LOGadmin_hide_lead_data == '0') or ($lead_id == 'NEW') )
		{
		echo "<tr><td colspan=2 align=center><input style='background-color:#$SSbutton_color' type=submit name=submit value=\""._QXZ("SUBMIT")."\"></td></tr>\n";
		}

	if ( ($LOGmodify_leads == '3') or ($LOGmodify_leads == '4') )
		{echo "<span id='statuses_listMODLOG' style=\"display:none\">$statuses_listMODLOG</span>\n";}

	echo "</table></form>\n";
	echo "<BR><BR><BR>\n";

	if ($lead_id != 'NEW') 
		{
		echo "<TABLE BGCOLOR=#".$SSstd_row4_background." WIDTH=750><TR><TD>\n";
		echo _QXZ("Callback Details").":<BR>\n";
		if ( ($dispo == 'CALLBK') or ($dispo == 'CBHOLD') or ($scheduled_callback == 'Y') )
			{
			### find any vicidial_callback records for this lead 
			$cb_stmt="SELECT callback_id,lead_id,list_id,campaign_id,status,entry_time,callback_time,modify_date,user,recipient,comments,user_group,lead_status from vicidial_callbacks where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' and status IN('ACTIVE','LIVE') order by callback_id desc limit 1000;";
			if ($DB) {echo "|$stmt|\n";}
			$cb_rslt=mysql_to_mysqli($cb_stmt, $link);
			$CB_to_print = mysqli_num_rows($cb_rslt);

			if ($CB_to_print>0)
				{
				echo "<form action='$PHP_SELF' method='POST' name='vsn' id='vsn'>";
				echo "<TABLE BGCOLOR=#".$SSstd_row4_background." WIDTH=800>";
				echo "<tr>";
				echo "<td><font size=2>"._QXZ("CallBack Date/Time").":</font></td>";
				echo "<td><font size=2>"._QXZ("CallBack Disposition").":</font></td>";
				echo "<td><font size=2>"._QXZ("Owner").":</font></td>";
				echo "<td><font size=2>"._QXZ("Comments").":</font></td>";
				echo "<td>&nbsp;</td>";
				echo "</tr>";

				$u=0;
				while ($cb_row=mysqli_fetch_row($cb_rslt)) {
					$callback_id = $cb_row[0];
					$CBcomments = $cb_row[10];
					$lead_status = $cb_row[12];
					$appointment_datetimeARRAY = explode(" ",$cb_row[6]);
					$appointment_date = $appointment_datetimeARRAY[0];
					$appointment_timeARRAY = explode(":",$appointment_datetimeARRAY[1]);
					$appointment_hour = $appointment_timeARRAY[0];
					$appointment_min = $appointment_timeARRAY[1];

					$stmt="SELECT status,status_name from vicidial_statuses where scheduled_callback='Y' $selectableSQLand and status NOT IN('CBHOLD') order by status";
					$rslt=mysql_to_mysqli($stmt, $link);
					$statuses_to_print = mysqli_num_rows($rslt);
					$statuses_list='';

					$o=0;
					$DS=0;
					while ($statuses_to_print > $o) 
						{
						$rowx=mysqli_fetch_row($rslt);
						if ( (strlen($lead_status) == strlen($rowx[0])) and (preg_match("/$lead_status/i",$rowx[0])) )
							{$statuses_list .= "<option SELECTED value=\"$rowx[0]\">$rowx[0] - $rowx[1]</option>\n"; $DS++;}
						else
							{$statuses_list .= "<option value=\"$rowx[0]\">$rowx[0] - $rowx[1]</option>\n";}
						$o++;
						}

					$stmt="SELECT status,status_name from vicidial_campaign_statuses where scheduled_callback='Y' $selectableSQLand and status NOT IN('CBHOLD') and campaign_id='$list_campaign' order by status";
					$rslt=mysql_to_mysqli($stmt, $link);
					$CAMPstatuses_to_print = mysqli_num_rows($rslt);

					$o=0;
					$CBhold_set=0;
					while ($CAMPstatuses_to_print > $o) 
						{
						$rowx=mysqli_fetch_row($rslt);
						if ( (strlen($lead_status) ==  strlen($rowx[0])) and (preg_match("/$lead_status/i",$rowx[0])) )
							{$statuses_list .= "<option SELECTED value=\"$rowx[0]\">$rowx[0] - $rowx[1]</option>\n"; $DS++;}
						else
							{$statuses_list .= "<option value=\"$rowx[0]\">$rowx[0] - $rowx[1]</option>\n";}
						$o++;
						}


					if (strlen($VU_status_group_id) > 0)
						{
						$stmt="SELECT status,status_name,selectable,campaign_id,human_answered,category,sale,dnc,customer_contact,not_interested,unworkable from vicidial_campaign_statuses where campaign_id='$VU_status_group_id' and scheduled_callback='Y' $selectableSQLand order by status";
						$rslt=mysql_to_mysqli($stmt, $link);
						$USERstatuses_to_print = mysqli_num_rows($rslt);

						$o=0;
						$CBhold_set=0;
						while ($USERstatuses_to_print > $o) 
							{
							$rowx=mysqli_fetch_row($rslt);
							if ( (strlen($lead_status) ==  strlen($rowx[0])) and (preg_match("/$lead_status/i",$rowx[0])) )
								{$statuses_list .= "<option SELECTED value=\"$rowx[0]\">$rowx[0] - $rowx[1]</option>\n"; $DS++;}
							else
								{$statuses_list .= "<option value=\"$rowx[0]\">$rowx[0] - $rowx[1]</option>\n";}
							$o++;
							}
						}	

					if ($DS < 1) 
						{$statuses_list .= "<option SELECTED value=\"$lead_status\">$lead_status</option>\n";}

					if ($u%2==0)
						{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
					else
						{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}
					$u++;

					echo "<tr $bgcolor>";
					echo "<td><input class='form_field' name='appointment_date_".$callback_id."' id='appointment_date_".$callback_id."' size=10 maxlength=10 value='$appointment_date'>";
					echo "					<script language=\"JavaScript\">
					var o_cal = new tcal ({
						// form name
						'formname': 'vsn',
						// input name
						'controlname': 'appointment_date_".$callback_id."'
					});
					o_cal.a_tpl.yearscroll = false;
					// o_cal.a_tpl.weekstart = 1; // Monday week start
					</script>";
					echo "<BR>";
					echo "<SELECT class='form_field' name='appointment_hour_".$callback_id."' id='appointment_hour_".$callback_id."'>\n";
					for ($i=0; $i<=23; $i++) {
						$hr=substr("0$i", -2);
						echo "<OPTION value='$hr'>$hr</option>\n";
					}
					echo "<OPTION value='$appointment_hour' selected>$appointment_hour</OPTION>";
					echo "</SELECT>:";
					echo "<SELECT class='form_field' name='appointment_min_".$callback_id."' id='appointment_min_".$callback_id."'>";
					for ($i=0; $i<=55; $i+=5) {
						$min=substr("0$i", -2);
						echo "<OPTION value='$min'>$min</option>\n";
					}
					echo "<OPTION value='$appointment_min' selected>$appointment_min</OPTION>";
					echo "</SELECT>";
					echo "</td>";
					echo "<td><FONT FACE='ARIAL,HELVETICA'><select class='form_field' size=1 name='CBstatus_".$callback_id."' id='CBstatus_".$callback_id."'>\n";
					echo "$statuses_list";
					echo "</td>";
					echo "<td><font size='2'>";
					if ($cb_row[9] == 'USERONLY') {$ucheck="checked"; $acheck="";} else {$acheck="checked"; $ucheck="";}

					echo "<input type='radio' name='CBchangeRecipient_".$callback_id."' id='CBchangeRecipient_".$callback_id."A' value=\"A\" $acheck>Anyone<BR>";
					echo "<input type='radio' name='CBchangeRecipient_".$callback_id."' id='CBchangeRecipient_".$callback_id."U' value=\"U\" $ucheck>Useronly<BR><BR>";
					echo _QXZ("New CB Owner UserID").":<BR><input type=text class='form_field' name='CBuser_".$callback_id."' id='CBuser_".$callback_id."' size=6 maxlength=20 value=\"$cb_row[8]\"> \n";
					echo "<input type=hidden id='recipient_".$callback_id."' name='recipient_".$callback_id."' value=\"YES\">";
					echo "</font></td>";
					echo "<td><TEXTAREA class='form_field' name='comments_".$callback_id."' id='comments_".$callback_id."' ROWS=6 COLS=50>$CBcomments</TEXTAREA></td>";
					echo "<td><input type='button' value='UPDATE' onClick='UpdateCallback($callback_id)'></td>";
					echo "</tr>";

					}
				}
			else
				{
				echo "<BR>"._QXZ("No Callback records found")."<BR>\n";
				}
			echo "</TABLE>";
			echo "<input type=hidden name=DB value=\"$DB\">\n";
			echo "<input type=hidden id=lead_id name=lead_id value=\"$lead_id\">\n";
			echo "<input type=hidden id=CBchangeDATE name=CBchangeDATE value=\"YES\">";
			echo "</form>\n";

			echo "</TD></TR></table>\n";

			### find any vicidial_callback records for this lead 
			$cb_stmt="SELECT entry_time,callback_time,user,recipient,lead_status,status,list_id,campaign_id,comments,user_group,lead_status from vicidial_callbacks where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' and status NOT IN('ACTIVE','LIVE') order by callback_id desc limit 1000;";
			if ($DB) {echo "|$stmt|\n";}
			$cb_rslt=mysql_to_mysqli($cb_stmt, $link);
			$CB_to_print = mysqli_num_rows($cb_rslt);

			$cb=0;
			$callbacks_log='';
			while ($CB_to_print > $cb)
				{
				if (preg_match("/1$|3$|5$|7$|9$/i", $cb))
					{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
				else
					{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}
				$rowx=mysqli_fetch_row($cb_rslt);
				$cb++;
				$callbacks_log .= "<tr $bgcolor>";
				$callbacks_log .= "<td><font size=1>$cb &nbsp; </td>";
				$callbacks_log .= "<td><font size=2>$rowx[0]</font></td>";
				$callbacks_log .= "<td><font size=2>$rowx[1]</font></td>";
				$callbacks_log .= "<td><font size=2>$rowx[2]</font></td>";
				$callbacks_log .= "<td><font size=2>$rowx[3]</font></td>";
				$callbacks_log .= "<td><font size=2>$rowx[4]</font></td>";
				$callbacks_log .= "<td><font size=2>$rowx[5]</font></td>";
				$callbacks_log .= "<td><font size=2>$rowx[6]</font></td>";
				$callbacks_log .= "<td><font size=2>$rowx[7]</font></td>";
				$callbacks_log .= "</tr><tr>";
				$callbacks_log .= "<td><font size=1> &nbsp; </td>";
				$callbacks_log .= "<td colspan=8 align=left $bgcolor><font size=1>"._QXZ("comments").": </font><font size=2>$rowx[8]</font></td>";
				$callbacks_log .= "</tr>\n";
				}

			if ($archive_log=="Yes") 
				{
				### find any vicidial_callbacks_archive records for this lead 
				$cb_stmt="SELECT entry_time,callback_time,user,recipient,lead_status,status,list_id,campaign_id,comments,user_group,lead_status from vicidial_callbacks_archive where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' and status NOT IN('ACTIVE','LIVE') order by callback_id desc limit 1000;";
				if ($DB) {echo "|$stmt|\n";}
				$cb_rslt=mysql_to_mysqli($cb_stmt, $link);
				$CBA_to_print = mysqli_num_rows($cb_rslt);

				$cba=0;
				while ($CBA_to_print > $cba)
					{
					if (preg_match("/1$|3$|5$|7$|9$/i", $cb))
						{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
					else
						{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}
					$rowx=mysqli_fetch_row($cb_rslt);
					$cb++;
					$cba++;
					$callbacks_log .= "<tr $bgcolor>";
					$callbacks_log .= "<td><font size=1>$cb &nbsp; </td>";
					$callbacks_log .= "<td><font size=2 color='#FF0000'>$rowx[0]</font></td>";
					$callbacks_log .= "<td><font size=2>$rowx[1]</font></td>";
					$callbacks_log .= "<td><font size=2>$rowx[2]</font></td>";
					$callbacks_log .= "<td><font size=2>$rowx[3]</font></td>";
					$callbacks_log .= "<td><font size=2>$rowx[4]</font></td>";
					$callbacks_log .= "<td><font size=2>$rowx[5]</font></td>";
					$callbacks_log .= "<td><font size=2>$rowx[6]</font></td>";
					$callbacks_log .= "<td><font size=2>$rowx[7]</font></td>";
					$callbacks_log .= "</tr><tr>";
					$callbacks_log .= "<td><font size=1> &nbsp; </td>";
					$callbacks_log .= "<td colspan=8 align=left $bgcolor><font size=1>"._QXZ("comments").": </font><font size=2>$rowx[8]</font></td>";
					$callbacks_log .= "</tr>\n";
					}
				}

			if ($cb > 0)
				{
				echo "<B>"._QXZ("CALLBACKS LOG").":</B>\n";
				echo "<TABLE width=750 cellspacing=0 cellpadding=1>\n";
				echo "<tr><td><font size=1># </td><td><font size=2>"._QXZ("ENTRY TIME")." </td><td><font size=2>"._QXZ("CALLBACK TIME")." </td><td align=left><font size=2>"._QXZ("USER")."</td><td align=left><font size=2> "._QXZ("RECIPIENT")."</td><td align=left><font size=2> "._QXZ("LEAD STATUS")."</td><td align=left><font size=2> "._QXZ("STATUS")."</td><td align=left><font size=2> "._QXZ("LIST")."</td><td align=left><font size=2> "._QXZ("CAMPAIGN")."</td></tr>\n";

				echo "$callbacks_log";

				echo "</TABLE>\n";
				}
			echo "<BR><BR>\n";
			}
		else
			{
			echo "<BR>"._QXZ("If you want to change this lead to a scheduled callback, first change the Disposition to CBHOLD, then submit and you will be able to set the callback date and time").".<BR>\n";
			echo "</TD></TR></table>\n";

			echo "<br><br>\n";

			### find any vicidial_callback records for this lead 
			$cb_stmt="SELECT entry_time,callback_time,user,recipient,lead_status,status,list_id,campaign_id,comments,user_group,lead_status from vicidial_callbacks where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' order by callback_id desc limit 1000;";
			if ($DB) {echo "|$stmt|\n";}
			$cb_rslt=mysql_to_mysqli($cb_stmt, $link);
			$CB_to_print = mysqli_num_rows($cb_rslt);

			$cb=0;
			$callbacks_log='';
			while ($CB_to_print > $cb)
				{
				if (preg_match("/1$|3$|5$|7$|9$/i", $cb))
					{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
				else
					{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}
				$rowx=mysqli_fetch_row($cb_rslt);
				$cb++;
				$callbacks_log .= "<tr $bgcolor>";
				$callbacks_log .= "<td><font size=1>$cb &nbsp; </td>";
				$callbacks_log .= "<td><font size=2>$rowx[0]</font></td>";
				$callbacks_log .= "<td><font size=2>$rowx[1]</font></td>";
				$callbacks_log .= "<td><font size=2>$rowx[2]</font></td>";
				$callbacks_log .= "<td><font size=2>$rowx[3]</font></td>";
				$callbacks_log .= "<td><font size=2>$rowx[4]</font></td>";
				$callbacks_log .= "<td><font size=2>$rowx[5]</font></td>";
				$callbacks_log .= "<td><font size=2>$rowx[6]</font></td>";
				$callbacks_log .= "<td><font size=2>$rowx[7]</font></td>";
				$callbacks_log .= "</tr><tr>";
				$callbacks_log .= "<td><font size=1> &nbsp; </td>";
				$callbacks_log .= "<td colspan=8 align=left $bgcolor><font size=1>"._QXZ("comments").": </font><font size=2>$rowx[8]</font></td>";
				$callbacks_log .= "</tr>\n";
				}
			
			if ($archive_log=="Yes") 
				{
				### find any vicidial_callbacks_archive records for this lead 
				$cb_stmt="SELECT entry_time,callback_time,user,recipient,lead_status,status,list_id,campaign_id,comments,user_group,lead_status from vicidial_callbacks_archive where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' order by callback_id desc limit 1000;";
				if ($DB) {echo "|$stmt|\n";}
				$cb_rslt=mysql_to_mysqli($cb_stmt, $link);
				$CBA_to_print = mysqli_num_rows($cb_rslt);

				$cba=0;
				while ($CBA_to_print > $cba)
					{
					if (preg_match("/1$|3$|5$|7$|9$/i", $cb))
						{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
					else
						{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}
					$rowx=mysqli_fetch_row($cb_rslt);
					$cb++;
					$cba++;
					$callbacks_log .= "<tr $bgcolor>";
					$callbacks_log .= "<td><font size=1>$cb &nbsp; </td>";
					$callbacks_log .= "<td><font size=2 color='#FF0000'>$rowx[0]</font></td>";
					$callbacks_log .= "<td><font size=2>$rowx[1]</font></td>";
					$callbacks_log .= "<td><font size=2>$rowx[2]</font></td>";
					$callbacks_log .= "<td><font size=2>$rowx[3]</font></td>";
					$callbacks_log .= "<td><font size=2>$rowx[4]</font></td>";
					$callbacks_log .= "<td><font size=2>$rowx[5]</font></td>";
					$callbacks_log .= "<td><font size=2>$rowx[6]</font></td>";
					$callbacks_log .= "<td><font size=2>$rowx[7]</font></td>";
					$callbacks_log .= "</tr><tr>";
					$callbacks_log .= "<td><font size=1> &nbsp; </td>";
					$callbacks_log .= "<td colspan=8 align=left $bgcolor><font size=1>"._QXZ("comments").": </font><font size=2>$rowx[8]</font></td>";
					$callbacks_log .= "</tr>\n";
					}
				}

			if ($cb > 0)
				{
				echo "<B>"._QXZ("CALLBACKS LOG").":</B>\n";
				echo "<TABLE width=750 cellspacing=0 cellpadding=1>\n";
				echo "<tr><td><font size=1># </td><td><font size=2>"._QXZ("ENTRY TIME")." </td><td><font size=2>"._QXZ("CALLBACK TIME")." </td><td align=left><font size=2>"._QXZ("USER")."</td><td align=left><font size=2> "._QXZ("RECIPIENT")."</td><td align=left><font size=2> "._QXZ("LEAD STATUS")."</td><td align=left><font size=2> "._QXZ("STATUS")."</td><td align=left><font size=2> "._QXZ("LIST")."</td><td align=left><font size=2> "._QXZ("CAMPAIGN")."</td></tr>\n";

				echo "$callbacks_log";

				echo "</TABLE>\n";
				}
			echo "<BR><BR>\n";
			}


		if ($c > 0)
			{
			echo "<B>"._QXZ("EXTENDED ALTERNATE PHONE NUMBERS FOR THIS LEAD").":</B>\n";
			echo "<TABLE width=550 cellspacing=0 cellpadding=1>\n";
			echo "<tr><td><font size=1># </td><td><font size=2>"._QXZ("ALT PHONE")." </td><td align=left><font size=2>"._QXZ("ALT NOTE")."</td><td align=left><font size=2> "._QXZ("ALT COUNT")."</td><td align=left><font size=2> "._QXZ("ACTIVE")."</td></tr>\n";

			echo "$alts_output\n";

			echo "</TABLE>\n";
			echo "<BR><BR>\n";
			}


		### iframe for custom fields display/editing
		if ($custom_fields_enabled > 0)
			{
			$CLlist_id = $list_id;
			if (strlen($entry_list_id) > 2)
				{$CLlist_id = $entry_list_id;}
			$stmt="SHOW TABLES LIKE \"custom_$CLlist_id\";";
			if ($DB>0) {echo "$stmt";}
			$rslt=mysql_to_mysqli($stmt, $link);
			$tablecount_to_print = mysqli_num_rows($rslt);
			if ($tablecount_to_print > 0) 
				{
				$stmt="SELECT count(*) from custom_$CLlist_id where lead_id='$lead_id';";
				if ($DB>0) {echo "$stmt";}
				$rslt=mysql_to_mysqli($stmt, $link);
				$fieldscount_to_print = mysqli_num_rows($rslt);
				if ($fieldscount_to_print > 0) 
					{
					$rowx=mysqli_fetch_row($rslt);
					$custom_records_count =	$rowx[0];
					$submit_buttonURL = '&submit_button=YES';
					if ($LOGmodify_leads == '5') {$submit_buttonURL = '&submit_button=READONLY';}

					echo "<B>"._QXZ("CUSTOM FIELDS FOR THIS LEAD").":</B><BR>\n";
					echo "<iframe src=\"../agc/$vdc_form_display?lead_id=$lead_id&list_id=$CLlist_id&stage=DISPLAY$submit_buttonURL&user=$PHP_AUTH_USER&pass=$PHP_AUTH_PW&bcrypt=OFF&bgcolor=E6E6E6\" style=\"background-color:transparent;\" scrolling=\"auto\" frameborder=\"2\" allowtransparency=\"true\" id=\"vcFormIFrame\" name=\"vcFormIFrame\" width=\"740\" height=\"300\" STYLE=\"z-index:18\"> </iframe>\n";
					echo "<BR><BR>";
					}
				}
			}


		echo "<B>"._QXZ("CALLS TO THIS LEAD").":</B>\n";
		if ($CIDdisplay=="Yes")
			{
			$out_log_width=1300;
			if ($AMDcount > 0) {$out_log_width=1500;}
			echo "<TABLE width=$out_log_width cellspacing=0 cellpadding=1>\n";
			echo "<tr><td><font size=1># </td><td><font size=2>"._QXZ("DATE/TIME")." </td><td align=left><font size=2>"._QXZ("LENGTH")."</td><td align=left><font size=2> "._QXZ("STATUS")."</td><td align=left><font size=2> "._QXZ("TSR")."</td><td align=right><font size=2> "._QXZ("CAMPAIGN")."</td><td align=right><font size=2> "._QXZ("LIST")."</td><td align=right><font size=2> "._QXZ("LEAD")."</td><td align=right><font size=2> "._QXZ("HANGUP REASON")."</td><td align=center><font size=2> "._QXZ("PHONE")."</td><td align=center><font size=2> <a href=\"$PHP_SELF?lead_id=$lead_id&archive_search=$archive_search&archive_log=$archive_log&CIDdisplay=$altCIDdisplay\">"._QXZ("CALLER ID")."</a></td><td align=right><font size=2> <a href=\"$PHP_SELF?lead_id=$lead_id&archive_search=$archive_search&archive_log=$archive_log&CIDdisplay=$altCIDdisplay\">"._QXZ("UNIQUEID")."</a></td><td align=right><font size=2> <a href=\"$PHP_SELF?lead_id=$lead_id&archive_search=$archive_search&archive_log=$archive_log&CIDdisplay=$altCIDdisplay\">"._QXZ("SERVER IP")."</a></td>";
			if ($AMDcount > 0)
				{echo "<td align=right><font size=2> "._QXZ("AMD STATUS")."</td><td align=right><font size=2> "._QXZ("AMD RESPONSE")."</td>";}
			echo "</tr>\n";
			}
		else
			{
			echo "<TABLE width=850 cellspacing=0 cellpadding=1>\n";
			echo "<tr><td><font size=1># </td><td><font size=2>"._QXZ("DATE/TIME")." </td><td align=left><font size=2>"._QXZ("LENGTH")."</td><td align=left><font size=2> "._QXZ("STATUS")."</td><td align=left><font size=2> "._QXZ("TSR")."</td><td align=right><font size=2> "._QXZ("CAMPAIGN")."</td><td align=right><font size=2> "._QXZ("LIST")."</td><td align=right><font size=2> "._QXZ("LEAD")."</td><td align=right><font size=2> "._QXZ("HANGUP REASON")."</td><td align=center><font size=2> "._QXZ("PHONE")."</td><td align=right><font size=2> <a href=\"$PHP_SELF?lead_id=$lead_id&archive_search=$archive_search&archive_log=$archive_log&CIDdisplay=$altCIDdisplay\">"._QXZ("CALLER ID")."</a></td></tr>\n";
			}

		echo "$call_log\n";

		echo "</TABLE>\n";
		echo "<BR><BR>\n";

		echo "<B>"._QXZ("CLOSER RECORDS FOR THIS LEAD").":</B>\n";
		if ($CIDdisplay=="Yes")
			{
			echo "<TABLE width=1150 cellspacing=0 cellpadding=1>\n";
			echo "<tr><td><font size=1># </td><td><font size=2>"._QXZ("DATE/TIME")." </td><td align=left><font size=2>"._QXZ("LENGTH")."</td><td align=left><font size=2> "._QXZ("STATUS")."</td><td align=left><font size=2> "._QXZ("TSR")."</td><td align=right><font size=2> "._QXZ("CAMPAIGN")."</td><td align=right><font size=2> "._QXZ("LIST")."</td><td align=right><font size=2> "._QXZ("LEAD")."</td><td align=right><font size=2> "._QXZ("WAIT")."</td><td align=right><font size=2> "._QXZ("HANGUP REASON")."</td><td align=center><font size=2> <a href=\"$PHP_SELF?lead_id=$lead_id&archive_search=$archive_search&archive_log=$archive_log&CIDdisplay=$altCIDdisplay\">"._QXZ("CALL ID")."</a></td><td align=center><font size=2> <a href=\"$PHP_SELF?lead_id=$lead_id&archive_search=$archive_search&archive_log=$archive_log&CIDdisplay=$altCIDdisplay\">"._QXZ("DID")."</a></td><td align=right><font size=2> <a href=\"$PHP_SELF?lead_id=$lead_id&archive_search=$archive_search&archive_log=$archive_log&CIDdisplay=$altCIDdisplay\">"._QXZ("UNIQUEID")."</a></td><td align=right><font size=2> <a href=\"$PHP_SELF?lead_id=$lead_id&archive_search=$archive_search&archive_log=$archive_log&CIDdisplay=$altCIDdisplay\">"._QXZ("SERVER IP")."</a></td></tr>\n";
			}
		else
			{
			echo "<TABLE width=850 cellspacing=0 cellpadding=1>\n";
			echo "<tr><td><font size=1># </td><td><font size=2>"._QXZ("DATE/TIME")." </td><td align=left><font size=2>"._QXZ("LENGTH")."</td><td align=left><font size=2> "._QXZ("STATUS")."</td><td align=left><font size=2> "._QXZ("TSR")."</td><td align=right><font size=2> "._QXZ("CAMPAIGN")."</td><td align=right><font size=2> "._QXZ("LIST")."</td><td align=right><font size=2> "._QXZ("LEAD")."</td><td align=right><font size=2> "._QXZ("WAIT")."</td><td align=right><font size=2> "._QXZ("HANGUP REASON")."</td><td align=right><font size=2> <a href=\"$PHP_SELF?lead_id=$lead_id&archive_search=$archive_search&archive_log=$archive_log&CIDdisplay=$altCIDdisplay\">"._QXZ("CALL ID")."</a></td></tr>\n";
			}

		echo "$closer_log\n";

		echo "</TABLE>\n";
		echo "<BR><BR>\n";


		echo "<B>"._QXZ("AGENT LOG RECORDS FOR THIS LEAD").":</B>\n";
		echo "<TABLE width=750 cellspacing=0 cellpadding=1>\n";
		echo "<tr><td><font size=1># </td><td><font size=2>"._QXZ("DATE/TIME")." </td><td align=left><font size=2>"._QXZ("CAMPAIGN")."</td><td align=left><font size=2> "._QXZ("TSR")."</td><td align=left><font size=2> "._QXZ("PAUSE")."</td><td align=right><font size=2> "._QXZ("WAIT")."</td><td align=right><font size=2> "._QXZ("TALK")."</td><td align=right><font size=2> "._QXZ("DISPO")."</td><td align=right><font size=2> "._QXZ("STATUS")."</td><td align=right><font size=2> "._QXZ("GROUP")."</td><td align=right><font size=2> "._QXZ("SUB")."</td></tr>\n";

			echo "$agent_log\n";

		echo "</TABLE>\n";
		echo "<BR><BR>\n";


		echo "<B>"._QXZ("PARK LOGS FOR THIS LEAD").":</B>\n";
		echo "<TABLE width=750 cellspacing=1 cellpadding=1>\n";
		echo "<tr><td><font size=1># </td><td align=left><font size=2> "._QXZ("PARK TIME")."</td><td><font size=2>"._QXZ("CHANNEL GROUP")." </td><td align=left><font size=2>"._QXZ("TSR")." </td><td align=left><font size=2> &nbsp; "._QXZ("STATUS")."</td><td align=left><font size=2> "._QXZ("GRAB TIME")."</td><td align=left><font size=2> "._QXZ("HANGUP TIME")."</td><td align=left><font size=2> "._QXZ("PARK SEC")."</td><td align=left><font size=2> "._QXZ("TALK SEC")."</td><td align=left><font size=2> "._QXZ("EXTENSION")."</td></tr>\n";

		$stmt="SELECT * from park_log where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' order by parked_time, grab_time, hangup_time desc limit 500;";
		$rslt=mysql_to_mysqli($stmt, $link);
		$logs_to_print = mysqli_num_rows($rslt);
		if ($DB) {echo "$logs_to_print|$stmt|\n";}

		$u=0;
		while ($logs_to_print > $u) 
			{
			$row=mysqli_fetch_array($rslt);
			if (preg_match("/1$|3$|5$|7$|9$/i", $u))
				{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
			else
				{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}

			$u++;
			echo "<tr $bgcolor>";
			echo "<td><font size=1>$u</td>";
			echo "<td align=left><font size=1> $row[parked_time] </td>";
			echo "<td align=left><font size=1> $row[channel_group] </td>\n";
			echo "<td align=left><font size=2> $row[user] </td>\n";
			echo "<td align=left><font size=2> $row[status] </td>\n";
			echo "<td align=left><font size=1> $row[grab_time] </td>\n";
			echo "<td align=left><font size=1> $row[hangup_time] </td>\n";
			echo "<td align=left><font size=2> $row[parked_sec] </td>\n";
			echo "<td align=left><font size=2> $row[talked_sec] </td>\n";
			echo "<td align=left><font size=1> $row[extension] </td>\n";
			echo "</tr>\n";
			}

		echo "</TABLE><BR><BR>\n";


		echo "<B>"._QXZ("IVR LOGS FOR THIS LEAD").":</B>\n";
		echo "<TABLE width=750 cellspacing=1 cellpadding=1>\n";
		echo "<tr><td><font size=1># </td><td align=left><font size=2> "._QXZ("CAMPAIGN")."</td><td><font size=2>"._QXZ("DATE/TIME")." </td><td align=left><font size=2>"._QXZ("CALL MENU")." </td><td align=left><font size=2> &nbsp; "._QXZ("ACTION")."</td></tr>\n";

		$stmt="SELECT campaign_id,event_date,menu_id,menu_action from vicidial_outbound_ivr_log where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' order by uniqueid,event_date,menu_action desc limit 500;";
		$rslt=mysql_to_mysqli($stmt, $link);
		$logs_to_print = mysqli_num_rows($rslt);
		if ($DB) {echo "$logs_to_print|$stmt|\n";}

		$u=0;
		while ($logs_to_print > $u) 
			{
			$row=mysqli_fetch_row($rslt);
			if (preg_match("/1$|3$|5$|7$|9$/i", $u))
				{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
			else
				{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}

			$u++;
			echo "<tr $bgcolor>";
			echo "<td><font size=1>$u</td>";
			echo "<td align=left><font size=2> $row[0] </td>";
			echo "<td align=left><font size=1> $row[1] </td>\n";
			echo "<td align=left><font size=2> $row[2] </td>\n";
			echo "<td align=left><font size=2> $row[3] &nbsp;</td>\n";
			echo "</tr>\n";
			}

		if ($CIDdisplay=="Yes")
			{
			$stmt="SELECT start_time,caller_id,channel,server_ip,comment_d,uniqueid from live_inbound_log where uniqueid IN($uniqueidLIST) order by start_time desc limit 500;";
			$rslt=mysql_to_mysqli($stmt, $link);
			$logs_to_print = mysqli_num_rows($rslt);
			if ($DB) {echo "$logs_to_print|$stmt|\n";}

			if ($logs_to_print > 0)
				{echo "<tr bgcolor=white><td align=left colspan=5><font size=2> "._QXZ("Inbound Call IVR entries").": </td></tr>";}

			$u=0;
			while ($logs_to_print > $u) 
				{
				$row=mysqli_fetch_row($rslt);
				if (preg_match("/1$|3$|5$|7$|9$/i", $u))
					{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
				else
					{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}

				$u++;
				echo "<tr $bgcolor>";
				echo "<td><font size=1>$u</td>";
				echo "<td align=left><font size=2> $row[5] </td>";
				echo "<td align=left><font size=2> $row[0] </td>\n";
				echo "<td align=left><font size=2> $row[4] </td>\n";
				echo "<td align=left><font size=2> $row[1] &nbsp;</td>\n";
				echo "</tr>\n";
				}
			}
		echo "</TABLE><BR><BR>\n";


		if ($CIDdisplay=="Yes")
			{
			echo "<B>"._QXZ("VOICEMAIL MESSAGE DAILY COUNT LOGS FOR THIS LEAD").":</B>\n";
			echo "<TABLE width=750 cellspacing=1 cellpadding=1>\n";
			echo "<tr><td><font size=1># </td><td align=left><font size=2>"._QXZ("DATE")." </td><td align=left><font size=2>"._QXZ("MESSAGE STARTED COUNT")." </td><td align=left><font size=2> &nbsp; "._QXZ("MESSAGE COMPLETED COUNT")."</td></tr>\n";

			$stmt="SELECT call_date,vmm_count,vmm_played from vicidial_vmm_counts where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' order by call_date desc limit 500;";
			$rslt=mysql_to_mysqli($stmt, $link);
			$logs_to_print = mysqli_num_rows($rslt);
			if ($DB) {echo "$logs_to_print|$stmt|\n";}

			$u=0;
			while ($logs_to_print > $u) 
				{
				$row=mysqli_fetch_row($rslt);
				if (preg_match("/1$|3$|5$|7$|9$/i", $u))
					{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
				else
					{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}

				$u++;
				echo "<tr $bgcolor>";
				echo "<td><font size=1>$u</td>";
				echo "<td align=left><font size=2> $row[0] </td>";
				echo "<td align=left><font size=2> $row[1] </td>\n";
				echo "<td align=left><font size=2> $row[2] &nbsp; </td>\n";
				echo "</tr>\n";
				}

			if ($archive_log=="Yes") 
				{
				$stmt="SELECT call_date,vmm_count,vmm_played from vicidial_vmm_counts_archive where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' order by call_date desc limit 500;";
				$rslt=mysql_to_mysqli($stmt, $link);
				$logs_to_print = mysqli_num_rows($rslt);
				if ($DB) {echo "$logs_to_print|$stmt|\n";}

				$u=0;
				while ($logs_to_print > $u) 
					{
					$row=mysqli_fetch_row($rslt);
					if (preg_match("/1$|3$|5$|7$|9$/i", $u))
						{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
					else
						{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}

					$u++;
					echo "<tr $bgcolor>";
					echo "<td><font size=1>$u</td>";
					echo "<td align=left><font size=2 color='#FF0000'> $row[0] </td>";
					echo "<td align=left><font size=2> $row[1] </td>\n";
					echo "<td align=left><font size=2> $row[2] &nbsp; </td>\n";
					echo "</tr>\n";
					}
				}

			echo "</TABLE><BR><BR>\n";
			}


		if ($CIDdisplay=="Yes")
			{
			echo "<B>"._QXZ("3-WAY PRESS LOGS FOR THIS LEAD").":</B>\n";
			echo "<TABLE width=1400 cellspacing=1 cellpadding=1>\n";
			echo "<tr><td><font size=1># </td><td align=left><font size=2> "._QXZ("PHONE")."</td><td><font size=2>"._QXZ("DATE/TIME")." </td><td><font size=2>"._QXZ("USER")." </td><td align=left><font size=2>"._QXZ("RESULT")." </td></tr>\n";

			$stmt="SELECT phone_number,call_date,user,result from vicidial_3way_press_log where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' order by call_date desc limit 500;";
			$rslt=mysql_to_mysqli($stmt, $link);
			$logs_to_print = mysqli_num_rows($rslt);
			if ($DB) {echo "$logs_to_print|$stmt|\n";}

			$u=0;
			while ($logs_to_print > $u) 
				{
				$row=mysqli_fetch_row($rslt);
				if (preg_match("/1$|3$|5$|7$|9$/i", $u))
					{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
				else
					{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}

				$u++;
				echo "<tr $bgcolor>";
				echo "<td><font size=1>$u</td>";
				echo "<td align=left><font size=2> $row[0] </td>";
				echo "<td align=left><font size=1> $row[1] </td>\n";
				echo "<td align=left><font size=2> $row[2] </td>\n";
				echo "<td align=left><font size=2> $row[3] &nbsp;</td>\n";
				echo "</tr>\n";
				}

			if ($archive_log=="Yes") 
				{
				$stmt="SELECT phone_number,call_date,user,result from vicidial_3way_press_log_archive where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' order by call_date desc limit 500;";
				$rslt=mysql_to_mysqli($stmt, $link);
				$logs_to_print = mysqli_num_rows($rslt);
				if ($DB) {echo "$logs_to_print|$stmt|\n";}

				$u=0;
				while ($logs_to_print > $u) 
					{
					$row=mysqli_fetch_row($rslt);
					if (preg_match("/1$|3$|5$|7$|9$/i", $u))
						{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
					else
						{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}

					$u++;
					echo "<tr $bgcolor>";
					echo "<td><font size=1>$u</td>";
					echo "<td align=left><font size=2 color='#FF0000'> $row[0] </td>";
					echo "<td align=left><font size=1> $row[1] </td>\n";
					echo "<td align=left><font size=2> $row[2] </td>\n";
					echo "<td align=left><font size=2> $row[3] &nbsp;</td>\n";
					echo "</tr>\n";
					}
				}
			echo "</TABLE><BR><BR>\n";


			if ($SShopper_hold_inserts > 0)
				{
				echo "<B>"._QXZ("HCI AGENT LOGS FOR THIS LEAD").":</B>\n";
				echo "<TABLE width=800 cellspacing=1 cellpadding=1>\n";
				echo "<tr><td><font size=1># </td><td align=left><font size=2> "._QXZ("PHONE")."</td><td><font size=2>"._QXZ("DATE/TIME")." </td><td><font size=2>"._QXZ("USER")." </td><td><font size=2>"._QXZ("IP")." </td><td align=left><font size=2>"._QXZ("CAMPAIGN")." </td></tr>\n";

				$stmt="SELECT phone_number,call_date,user,user_ip,campaign_id from vicidial_hci_log where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' order by call_date desc limit 500;";
				$rslt=mysql_to_mysqli($stmt, $link);
				$logs_to_print = mysqli_num_rows($rslt);
				if ($DB) {echo "$logs_to_print|$stmt|\n";}

				$u=0;
				while ($logs_to_print > $u) 
					{
					$row=mysqli_fetch_row($rslt);
					if (preg_match("/1$|3$|5$|7$|9$/i", $u))
						{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
					else
						{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}

					$u++;
					echo "<tr $bgcolor>";
					echo "<td><font size=1>$u</td>";
					echo "<td align=left><font size=2> $row[0] </td>";
					echo "<td align=left><font size=1> $row[1] </td>\n";
					echo "<td align=left><font size=2> <A HREF=\"user_stats.php?user=$row[2]\" target=\"_blank\">$row[2]</A> </td>\n";
					echo "<td align=left><font size=2> $row[3] </td>\n";
					echo "<td align=left><font size=2> $row[4] &nbsp;</td>\n";
					echo "</tr>\n";
					}

				if ($archive_log=="Yes") 
					{
					$stmt="SELECT phone_number,call_date,user,user_ip,campaign_id from vicidial_hci_log_archive where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' order by call_date desc limit 500;";
					$rslt=mysql_to_mysqli($stmt, $link);
					$logs_to_print = mysqli_num_rows($rslt);
					if ($DB) {echo "$logs_to_print|$stmt|\n";}

					$u=0;
					while ($logs_to_print > $u) 
						{
						$row=mysqli_fetch_row($rslt);
						if (preg_match("/1$|3$|5$|7$|9$/i", $u))
							{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
						else
							{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}

						$u++;
						echo "<tr $bgcolor>";
						echo "<td><font size=1>$u</td>";
						echo "<td align=left><font size=2> $row[0] </td>";
						echo "<td align=left><font size=1> $row[1] </td>\n";
						echo "<td align=left><font size=2> $row[2] </td>\n";
						echo "<td align=left><font size=2> $row[3] </td>\n";
						echo "<td align=left><font size=2> $row[4] &nbsp;</td>\n";
						echo "</tr>\n";
						}
					}
				echo "</TABLE><BR><BR>\n";
				}
			}


	##### BEGIN switch lead log entries #####
		$stmt="SELECT * from vicidial_agent_function_log where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' and function='switch_lead' order by event_time desc limit 500;";
		$rslt=mysql_to_mysqli($stmt, $link);
		$logs_to_print = mysqli_num_rows($rslt);
		if ($DB) {echo "$logs_to_print|$stmt|\n";}

		if ($logs_to_print > 0)
			{
			echo "<B>"._QXZ("AGENT FROM SWITCH-LEADS FOR THIS LEAD").":</B>\n";
			echo "<TABLE width=750 cellspacing=1 cellpadding=1>\n";
			echo "<tr><td><font size=1># </td><td align=left><font size=2> "._QXZ("SWITCH TIME")."</td><td><font size=2>"._QXZ("CAMPAIGN")." </td><td align=left><font size=2>"._QXZ("TSR")." </td><td align=left><font size=2> &nbsp; "._QXZ("TO LEAD ID")."</td><td align=left><font size=2> "._QXZ("CALL ID")."</td><td align=left><font size=2> "._QXZ("UNIQUEID")."</td><td align=left><font size=2> "._QXZ("PHONE NUMBER")."</td></tr>\n";


			$u=0;
			while ($logs_to_print > $u) 
				{
				$row=mysqli_fetch_array($rslt);
				if (preg_match("/1$|3$|5$|7$|9$/i", $u))
					{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
				else
					{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}

				$u++;
				echo "<tr $bgcolor>";
				echo "<td><font size=1>$u</td>";
				echo "<td align=left><font size=1> $row[event_time] </td>";
				echo "<td align=left><font size=1> $row[campaign_id] </td>\n";
				echo "<td align=left><font size=2> $row[user] </td>\n";
				echo "<td align=left><font size=2> <a href=\"$PHP_SELF?lead_id=$row[stage]\">$row[stage]</a> </td>\n";
				echo "<td align=left><font size=1> $row[caller_code] </td>\n";
				echo "<td align=left><font size=1> $row[uniqueid] </td>\n";
				echo "<td align=left><font size=2> $row[comments] </td>\n";
				echo "</tr>\n";
				}

			echo "</TABLE><BR><BR>\n";
			}

		$stmt="SELECT * from vicidial_agent_function_log where stage='" . mysqli_real_escape_string($link, $lead_id) . "' and function='switch_lead' order by event_time desc limit 500;";
		$rslt=mysql_to_mysqli($stmt, $link);
		$logs_to_print = mysqli_num_rows($rslt);
		if ($DB) {echo "$logs_to_print|$stmt|\n";}

		if ($logs_to_print > 0)
			{
			echo "<B>"._QXZ("AGENT TO SWITCH-LEADS FOR THIS LEAD").":</B>\n";
			echo "<TABLE width=750 cellspacing=1 cellpadding=1>\n";
			echo "<tr><td><font size=1># </td><td align=left><font size=2> "._QXZ("SWITCH TIME")."</td><td><font size=2>"._QXZ("CAMPAIGN")." </td><td align=left><font size=2>"._QXZ("TSR")." </td><td align=left><font size=2> &nbsp; "._QXZ("FROM LEAD ID")."</td><td align=left><font size=2> "._QXZ("CALL ID")."</td><td align=left><font size=2> "._QXZ("UNIQUEID")."</td><td align=left><font size=2> "._QXZ("PHONE NUMBER")."</td></tr>\n";


			$u=0;
			while ($logs_to_print > $u) 
				{
				$row=mysqli_fetch_array($rslt);
				if (preg_match("/1$|3$|5$|7$|9$/i", $u))
					{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
				else
					{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}

				$u++;
				echo "<tr $bgcolor>";
				echo "<td><font size=1>$u</td>";
				echo "<td align=left><font size=1> $row[event_time] </td>";
				echo "<td align=left><font size=1> $row[campaign_id] </td>\n";
				echo "<td align=left><font size=2> $row[user] </td>\n";
				echo "<td align=left><font size=2> <a href=\"$PHP_SELF?lead_id=$row[lead_id]\">$row[lead_id]</a> </td>\n";
				echo "<td align=left><font size=1> $row[caller_code] </td>\n";
				echo "<td align=left><font size=1> $row[uniqueid] </td>\n";
				echo "<td align=left><font size=2> $row[comments] </td>\n";
				echo "</tr>\n";
				}

			echo "</TABLE><BR><BR>\n";
			}
	##### END switch lead log entries #####


	##### BEGIN switch list(for custom fields) log entries #####
		$stmt="SELECT * from vicidial_agent_function_log where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' and function='switch_list' order by event_time desc limit 500;";
		$rslt=mysql_to_mysqli($stmt, $link);
		$logs_to_print = mysqli_num_rows($rslt);
		if ($DB) {echo "$logs_to_print|$stmt|\n";}

		if ($logs_to_print > 0)
			{
			echo "<B>"._QXZ("AGENT CUSTOM FIELDS SWITCH-LISTS FOR THIS LEAD").":</B>\n";
			echo "<TABLE width=750 cellspacing=1 cellpadding=1>\n";
			echo "<tr><td><font size=1># </td><td align=left><font size=2> "._QXZ("SWITCH TIME")."</td><td><font size=2>"._QXZ("CAMPAIGN")." </td><td align=left><font size=2>"._QXZ("TSR")." </td><td align=left><font size=2> &nbsp; "._QXZ("TO LIST ID")."</td><td align=left><font size=2> "._QXZ("FROM LIST ID")."</td><td align=left><font size=2> "._QXZ("CALL ID")."</td></tr>\n";


			$u=0;
			while ($logs_to_print > $u) 
				{
				$row=mysqli_fetch_array($rslt);
				if (preg_match("/1$|3$|5$|7$|9$/i", $u))
					{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
				else
					{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}

				$u++;
				echo "<tr $bgcolor>";
				echo "<td><font size=1>$u</td>";
				echo "<td align=left><font size=1> $row[event_time] </td>";
				echo "<td align=left><font size=1> $row[campaign_id] </td>\n";
				echo "<td align=left><font size=2> $row[user] </td>\n";
				echo "<td align=left><font size=2> <a href=\"$PHP_SELF?ADD=311&list_id=$row[stage]\">$row[stage]</a> </td>\n";
				echo "<td align=left><font size=2> <a href=\"$PHP_SELF?ADD=311&list_id=$row[stage]\">$row[comments]</a> </td>\n";
				echo "<td align=left><font size=1> $row[caller_code] </td>\n";
				echo "</tr>\n";
				}

			echo "</TABLE><BR><BR>\n";
			}
	##### END switch list log entries #####


	##### vicidial agent outbound calls for this time period #####
		if ($allow_emails>0) 
			{
			echo "<B>"._QXZ("OUTBOUND EMAILS FOR THIS LEAD").":</B>\n";
			echo "<TABLE width=750 cellspacing=1 cellpadding=1>\n";
			echo "<tr><td><font size=1># </td><td><font size=2>"._QXZ("DATE/TIME")." </td><td align=right><font size=2> "._QXZ("USER")."</td><td align=right><font size=2> "._QXZ("CAMPAIGN")."</td><td align=left><font size=2>"._QXZ("EMAIL TO")."</td><td align=left><font size=2> "._QXZ("MESSAGE")."</td><td align=right><font size=2> "._QXZ("ATTACHMENTS")."</td></tr>\n";

			$stmt="SELECT * from vicidial_email_log where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' order by email_date desc limit 500;";
			$rslt=mysql_to_mysqli($stmt, $link);
			$logs_to_print = mysqli_num_rows($rslt);

			$u=0;
			while ($logs_to_print > $u) 
				{
				$row=mysqli_fetch_row($rslt);
				if (preg_match("/1$|3$|5$|7$|9$/i", $u))
					{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
				else
					{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}
				if (mb_strlen($row[6],'utf-8')>100) {$row[6]=mb_substr($row[6],0,100,'utf-8')."...";}
				$row[8]=preg_replace('/\|/', ', ', $row[8]);
				$row[8]=preg_replace('/,\s+$/', '', $row[8]);
				$u++;

				echo "<tr $bgcolor>";
				echo "<td><font size=1>$u</td>";
				echo "<td><font size=1>$row[3]</td>";
				echo "<td align=right><font size=2> <A HREF=\"user_stats.php?user=$row[4]\" target=\"_blank\">$row[4]</A> </td>\n";
				echo "<td align=left><font size=2> $row[7]</td>\n";
				echo "<td align=left><font size=1> $row[5]</td>\n";
				echo "<td align=left><font size=1> $row[6] </td>\n";
				echo "<td align=right><font size=1> $row[8] </td></tr>\n";
				}


			echo "</TABLE><BR><BR>\n";
			}


		$mute_column='';
		if ($SSmute_recordings > 0)
			{
			$mute_column = "<td align=left><font size=2>"._QXZ("MUTE")."</td>";
			}

		echo "<B>"._QXZ("RECORDINGS FOR THIS LEAD").":</B>\n";
		echo "<TABLE width=800 cellspacing=1 cellpadding=1>\n";
		echo "<tr><td><font size=1># </td><td align=left><font size=2> "._QXZ("LEAD")."</td><td><font size=2>"._QXZ("DATE/TIME")." </td><td align=left><font size=2>"._QXZ("SECONDS")." </td><td align=left><font size=2> &nbsp; "._QXZ("RECID")."</td><td align=center><font size=2>"._QXZ("FILENAME")."</td><td align=left><font size=2>"._QXZ("LOCATION")."</td><td align=left><font size=2>"._QXZ("TSR")."</td>$mute_column<td align=left><font size=2> </td></tr>\n";

		$stmt="SELECT recording_id,channel,server_ip,extension,start_time,start_epoch,end_time,end_epoch,length_in_sec,length_in_min,filename,location,lead_id,user,vicidial_id from recording_log where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' order by recording_id desc limit 500;";
		$rslt=mysql_to_mysqli($stmt, $link);
		$logs_to_print = mysqli_num_rows($rslt);
		if ($DB) {echo "$logs_to_print|$stmt|\n";}

		$u=0;   $rec_ids="''";
		while ($logs_to_print > $u) 
			{
			$row=mysqli_fetch_row($rslt);
			if (preg_match("/1$|3$|5$|7$|9$/i", $u))
				{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
			else
				{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}

			$location = $row[11];

			if (strlen($location)>2)
				{
				$URLserver_ip = $location;
				$URLserver_ip = preg_replace('/http:\/\//i', '',$URLserver_ip);
				$URLserver_ip = preg_replace('/https:\/\//i', '',$URLserver_ip);
				$URLserver_ip = preg_replace('/\/.*/i', '',$URLserver_ip);
				$stmt="SELECT count(*) from servers where server_ip='$URLserver_ip';";
				$rsltx=mysql_to_mysqli($stmt, $link);
				$rowx=mysqli_fetch_row($rsltx);
				
				if ($rowx[0] > 0)
					{
					$stmt="SELECT recording_web_link,alt_server_ip,external_server_ip from servers where server_ip='$URLserver_ip';";
					$rsltx=mysql_to_mysqli($stmt, $link);
					$rowx=mysqli_fetch_row($rsltx);
					
					if (preg_match("/ALT_IP/i",$rowx[0]))
						{
						$location = preg_replace("/$URLserver_ip/i", "$rowx[1]", $location);
						}
					if (preg_match("/EXTERNAL_IP/i",$rowx[0]))
						{
						$location = preg_replace("/$URLserver_ip/i", "$rowx[2]", $location);
						}
					}
				}

			if ($SSmute_recordings > 0)
				{
				$mute_events=0;
				$stmt="SELECT count(*) from vicidial_agent_function_log where user='$row[13]' and event_time >= '$row[4]'  and event_time <= '$row[6]' and function='mute_rec' and lead_id='$row[12]' and stage='on';";
				$rsltx=mysql_to_mysqli($stmt, $link);
				$flogs_to_print = mysqli_num_rows($rsltx);
				if ($flogs_to_print > 0) 
					{
					$rowx=mysqli_fetch_row($rsltx);
					$mute_events = $rowx[0];
					}
				}

			if (mb_strlen($location,'utf-8')>30)
				{$locat = mb_substr($location,0,27,'utf-8');  $locat = "$locat...";}
			else
				{$locat = $location;}
			$play_audio='<td align=left><font size=2> </font></td>';
			if ( (preg_match('/ftp/i',$location)) or (preg_match('/http/i',$location)) )
				{
				if ($log_recording_access<1) 
					{
					$play_audio = "<td align=left><font size=2> <audio controls preload=\"none\"> <source src ='$location' type='audio/wav' > <source src ='$location' type='audio/mpeg' >"._QXZ("No browser audio playback support")."</audio> </td>\n";
					$location = "<a href=\"$location\">$locat</a>";
					}
				else
					{
					$location = "<a href=\"recording_log_redirect.php?recording_id=$row[0]&lead_id=$row[12]&search_archived_data=0\">$locat</a>";
					}
				}
			else
				{$location = $locat;}
			$u++;
			echo "<tr $bgcolor>";
			echo "<td><font size=1>$u</td>";
			echo "<td align=left><font size=2> $row[12] </td>";
			echo "<td align=left><font size=1> $row[4] </td>\n";
			echo "<td align=left><font size=2> $row[8] </td>\n";
			echo "<td align=left><font size=2> $row[0] &nbsp;</td>\n";
			echo "<td align=center><font size=1> $row[10] </td>\n";
			echo "<td align=left><font size=2> $location </td>\n";
			echo "<td align=left><font size=2> <A HREF=\"user_stats.php?user=$row[13]\" target=\"_blank\">$row[13]</A> </td>";
			if ($SSmute_recordings > 0)
				{
				if ($mute_events < 1) {$mute_events='';}
				echo "<td align=center><font size=2> $mute_events &nbsp; </td>\n";
				}
			echo "$play_audio";
			echo "</tr>\n";
			$rec_ids .= ",'$row[0]'";
			}

		$stmt="SELECT recording_id,channel,server_ip,extension,start_time,start_epoch,end_time,end_epoch,length_in_sec,length_in_min,filename,location,lead_id,user,vicidial_id from recording_log_archive where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' and recording_id NOT IN($rec_ids) order by recording_id desc limit 500;";
		$rslt=mysql_to_mysqli($stmt, $link);
		$logs_to_print = mysqli_num_rows($rslt);
		if ($DB) {echo "$logs_to_print|$stmt|\n";}

		$v=0;
		while ($logs_to_print > $v) 
			{
			$row=mysqli_fetch_row($rslt);
			if (preg_match("/1$|3$|5$|7$|9$/i", $u))
				{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
			else
				{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}

			$location = $row[11];

			if (strlen($location)>2)
				{
				$URLserver_ip = $location;
				$URLserver_ip = preg_replace('/http:\/\//i', '',$URLserver_ip);
				$URLserver_ip = preg_replace('/https:\/\//i', '',$URLserver_ip);
				$URLserver_ip = preg_replace('/\/.*/i', '',$URLserver_ip);
				$stmt="SELECT count(*) from servers where server_ip='$URLserver_ip';";
				$rsltx=mysql_to_mysqli($stmt, $link);
				$rowx=mysqli_fetch_row($rsltx);
				
				if ($rowx[0] > 0)
					{
					$stmt="SELECT recording_web_link,alt_server_ip,external_server_ip from servers where server_ip='$URLserver_ip';";
					$rsltx=mysql_to_mysqli($stmt, $link);
					$rowx=mysqli_fetch_row($rsltx);
					
					if (preg_match("/ALT_IP/i",$rowx[0]))
						{
						$location = preg_replace("/$URLserver_ip/i", "$rowx[1]", $location);
						}
					if (preg_match("/EXTERNAL_IP/i",$rowx[0]))
						{
						$location = preg_replace("/$URLserver_ip/i", "$rowx[2]", $location);
						}
					}
				}

			if ($SSmute_recordings > 0)
				{
				$mute_events=0;
				$stmt="SELECT count(*) from vicidial_agent_function_log where user='$row[13]' and event_time >= '$row[4]'  and event_time <= '$row[6]' and function='mute_rec' and lead_id='$row[12]' and stage='on';";
				$rsltx=mysql_to_mysqli($stmt, $link);
				$flogs_to_print = mysqli_num_rows($rsltx);
				if ($flogs_to_print > 0) 
					{
					$rowx=mysqli_fetch_row($rsltx);
					$mute_events = $rowx[0];
					}
				}

			if (mb_strlen($location,'utf-8')>30)
				{$locat = mb_substr($location,0,27,'utf-8');  $locat = "$locat...";}
			else
				{$locat = $location;}
			$play_audio='<td align=left><font size=2> </font></td>';
			if ( (preg_match('/ftp/i',$location)) or (preg_match('/http/i',$location)) )
				{
				if ($log_recording_access<1) 
					{
					$play_audio = "<td align=left><font size=2> <audio controls preload=\"none\"> <source src ='$location' type='audio/wav' > <source src ='$location' type='audio/mpeg' >"._QXZ("No browser audio playback support")."</audio> </td>\n";
					$location = "<a href=\"$location\">$locat</a>";
					}
				else
					{
					$location = "<a href=\"recording_log_redirect.php?recording_id=$row[0]&lead_id=$row[12]&search_archived_data=1\">$locat</a>";
					}
				}
			else
				{$location = $locat;}
			$u++;
			$v++;
			echo "<tr $bgcolor>";
			echo "<td><font size=1>$u</td>";
			echo "<td align=left><font size=2> $row[12] </td>";
			echo "<td align=left><font size=1> $row[4] </td>\n";
			echo "<td align=left><font size=2> $row[8] </td>\n";
			echo "<td align=left><font size=2> $row[0] &nbsp;</td>\n";
			echo "<td align=center><font size=1> $row[10] </td>\n";
			echo "<td align=left><font size=2> $location *</td>\n";
			echo "<td align=left><font size=2> <A HREF=\"user_stats.php?user=$row[13]\" target=\"_blank\">$row[13]</A> </td>";
			if ($SSmute_recordings > 0)
				{
				if ($mute_events < 1) {$mute_events='';}
				echo "<td align=center><font size=2> $mute_events &nbsp; </td>\n";
				}
			echo "$play_audio";
			echo "</tr>\n";
			}


		echo "</TABLE><BR><BR>\n";


	if ($log_recording_access > 0) 
		{
		echo "<B>"._QXZ("RECORDING ACCESS LOG FOR THIS LEAD").":</B>\n";
		echo "<TABLE width=750 cellspacing=1 cellpadding=1>\n";
		echo "<tr><td><font size=1># </td><td align=left><font size=2> "._QXZ("LEAD")."</td><td><font size=2>"._QXZ("DATE/TIME")." </td><td align=left><font size=2>"._QXZ("RECORDING ID")."</td><td align=left><font size=2>"._QXZ("USER")."</td><td align=left><font size=2>"._QXZ("RESULT")." </td><td align=left><font size=2>"._QXZ("IP")." </td></tr>\n";

		$stmt="SELECT recording_id,lead_id,user,access_datetime,access_result,ip from vicidial_recording_access_log where lead_id='" . mysqli_real_escape_string($link, $lead_id) . "' order by recording_access_log_id desc limit 500;";
		$rslt=mysql_to_mysqli($stmt, $link);
		$logs_to_print = mysqli_num_rows($rslt);
		if ($DB) {echo "$logs_to_print|$stmt|\n";}

		$u=0;
		while ($logs_to_print > $u) 
			{
			$row=mysqli_fetch_row($rslt);
			if (preg_match("/1$|3$|5$|7$|9$/i", $u))
				{$bgcolor="bgcolor=\"#$SSstd_row2_background\"";} 
			else
				{$bgcolor="bgcolor=\"#$SSstd_row1_background\"";}

			$u++;
			echo "<tr $bgcolor>";
			echo "<td><font size=1>$u</td>";
			echo "<td align=left><font size=2> $row[1] </td>";
			echo "<td align=left><font size=2> $row[3] </td>\n";
			echo "<td align=left><font size=2> $row[0] </td>\n";
			echo "<td align=left><font size=2> $row[2] </td>\n";
			echo "<td align=left><font size=2> $row[4] </td>\n";
			echo "<td align=left><font size=2> $row[5] </td>\n";
			echo "</tr>\n";
			}

		echo "</TABLE><BR><BR>\n";
		}

		$stmt="SELECT count(*) from vicidial_users where user='$PHP_AUTH_USER' and user_level >= 9 and modify_leads IN('1','2','3','4','5','6');";
		if ($DB) {echo "|$stmt|\n";}
		$rslt=mysql_to_mysqli($stmt, $link);
		$row=mysqli_fetch_row($rslt);
		$admin_display=$row[0];
		if ($admin_display > 0)
			{
			echo "<a href=\"./admin.php?ADD=720000000000000&stage=$lead_id&category=LEADS\">"._QXZ("Click here to see Lead Modify changes to this lead")."</a>\n";
			}
		//Display link to QC if user has QC permissions
		//Get QC User permissions
		$stmt="SELECT qc_enabled,qc_user_level,qc_pass,qc_finish,qc_commit from vicidial_users where user='$PHP_AUTH_USER' and user_level > 1 and active='Y' and qc_enabled='1';";
		if ($DB) {echo "|$stmt|\n";}
		$rslt=mysql_to_mysqli($stmt, $link);
		$row=mysqli_fetch_row($rslt);
		$qc_auth=$row[0];
		//Not "qc_" as it will interfere with ADD=4A storage of modified user.
		if ($qc_auth=='1') 
			{
			$qcuser_level=$row[1];
			$qcpass=$row[2];
			$qcfinish=$row[3];
			$qccommit=$row[4];
			}
		//Modify menuing to allow qc users into the system (if they have no permission otherwise)
		//Copied Reports-Only user setup for QC-Only user (Poundteam QC setup)
		$qc_only_user=0;
		if ( ($qc_auth > 0) and ($auth < 1) )
			{
			if ($ADD != '881')
				{
				$ADD=100000000000000;
				}
			$qc_only_user=1;
			}

		if ($qcuser_level > 0)
			{
			echo "<br><br><a href=\"qc_modify_lead.php?lead_id=$lead_id\">"._QXZ("Click here to QC Modify this lead")."</a>\n";
			}
		echo "\n";
		}

	if ($enable_gdpr_download_deletion > 0)
		{
		if ($gdpr_display>=1) 
			{
			echo "<br><br><br>";
			echo "<B>"._QXZ("GDPR compliance").":</B>\n";
			echo "<TABLE width=750 cellspacing=2 cellpadding=5>\n";
			echo "<tr bgcolor='#$SSstd_row2_background'>";
			echo "<td><font size=2>";
			echo "<a href=\"admin_modify_lead.php?lead_id=$lead_id&gdpr_action=download\">"._QXZ("Click here to download GDPR-formatted data for this lead")."</a><BR>\n";
			echo "</font></td>";
			echo "<tr bgcolor='#$SSstd_row1_background'>";
			echo "<td><font size=2>";
			if ($gdpr_display>=2) 
				{
				echo "<a href=\"admin_modify_lead.php?lead_id=$lead_id&gdpr_action=purge\">"._QXZ("Click here to review and purge customer data on lead")."</a>\n";
				}
			echo "</font></td>";
			echo "</tr>";
			echo "</table>";
			}
		}
	echo "\n";
	}


$ENDtime = date("U");

$RUNtime = ($ENDtime - $STARTtime);

echo "\n\n\n<br><br><br>\n\n";


echo "<font size=0>\n\n\n<br><br><br>\n"._QXZ("script runtime").": $RUNtime "._QXZ("seconds")."</font>";
echo "</span>\n";

echo "<br><span id=debugbottomspan></span>\n";

?>


</body>
</html>

<?php
	
exit; 

function htmlparse($text) 
	{
	global $htmlconvert;
	if ($htmlconvert > 0)
		{
		return htmlentities($text);
		}
	else
		{
		return $text;
		}
	}


?>