ViciDial/ViciDialSVN
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

AST_VDhopperMIX script working with list mix and EVEN_MIX, RANDOM, IN_ORDER mix methods.

Browse Source 
git-svn-id: svn://192.168.202.10@655 3d104415-ff17-0410-8863-d5cf3c621b8a
This commit is contained in:
mattf
2007-07-10 02:48:05 +00:00
parent 32ad12cf7c
commit f70da65a8b
2 changed files with 10 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files
agc_2-X/trunk/bin/AST_VDhopper_MIXtest.pl
+9 -7
View File
@@ -1254,7 +1254,7 @@ foreach(@campaign_id)
##### LIST MIX LEADS GRAB #####
else
{
$USX='_____';
$x=0;
$z=0;
@LM_results=@MT;
@@ -1264,7 +1264,8 @@ foreach(@campaign_id)
@list_mix_stepARY=@MT;
@list_mix_stepARY = split(/\|/,$list_mixARY[$x]);
$LM_step_goal[$x] = ( ($hopper_level[$i] * $list_mix_stepARY[2]) / 100);
$LM_step_goal[$x] = ( ($list_mix_stepARY[2] / 100) * $hopper_level[$i]);
$LM_step_even[$x] = ( (100 / $list_mix_stepARY[2]) * 100000);
$list_mix_stepARY[3] =~ s/ /','/gi;
$list_mix_stepARY[3] =~ s/^',|,'-//gi;
if ($DBX) {print " LM $x |$list_mix_stepARY[0]|$list_mix_stepARY[2]|$LM_step_goal[$x]|$list_mix_stepARY[3]|\n";}
@@ -1286,29 +1287,30 @@ foreach(@campaign_id)
{
if ($mix_method[$i] =~ /EVEN_MIX/)
{
$order = ( ($rec_count * 100) + $x);
$order = ( ($rec_count * $LM_step_even[$x]) + $x);
}
else
{
$order = ( ($x * 1000000) + $rec_count);
}
}
$LM_results[$z] = "$order|$aryA[0]|$aryA[1]|$aryA[2]|$aryA[3]|$aryA[4]";
if ($DBX) {print " $z|$LM_results[$z]\n";}
$LM_results[$z] = "$order$USX$aryA[0]$USX$aryA[1]$USX$aryA[2]$USX$aryA[3]$USX$aryA[4]";
# if ($DBX) {print " $z|$LM_results[$z]\n";}
$rec_count++;
$z++;
}
$sthA->finish();
$x++;
}
@LM_results_SORT = sort { $b <=> $a } @LM_results;
@LM_results_SORT = sort { $a <=> $b } @LM_results;
$w=0;
while ($z > $w)
{
@aryA = split(/\|/,$LM_results_SORT[$w]);
@aryA = split(/_____/,$LM_results_SORT[$w]);
if ($REC_rec_countLEADS > $REC_insert_count)
{
$leads_to_hopper[$rec_countLEADS] = "$REC_leads_to_hopper[$REC_insert_count]";
agc_2-X/trunk/docs/OUTBOUND_LIST_ORDERING.txt
+1
View File
@@ -36,6 +36,7 @@ campaign hopper_level must be at least 100 when in list-mix-mode
No more than 10 lists can be in a single list mix record
List orders with "2nd NEW, 3rd NEW and 4th NEW" are ignored, and only DOWN COUNT is used