if ($rModule == 'CampaignProspects') {
$rModule = 'Campaigns';
}
$_SESSION['MAILMERGE_MODULE'] = $rModule;
if (!empty($rModule) && $rModule != "MailMerge") {
$class_name = $beanList[$rModule];
$includedir = $beanFiles[$class_name];
require_once $includedir;
$seed = new $class_name();
$selected_objects = '';
foreach ($_SESSION['MAILMERGE_RECORD'] as $record_id) {
if ($rModule == 'Campaigns') {
$prospect = new Prospect();
$prospect_module_list = array('leads', 'contacts', 'prospects', 'users');
foreach ($prospect_module_list as $mname) {
$pList = $prospect->retrieveTargetList("campaigns.id = '{$record_id}' AND related_type = #{$mname}#", array('id', 'first_name', 'last_name'));
foreach ($pList['list'] as $bean) {
$selected_objects .= $bean->id . '=' . str_replace("&", "##", $bean->name) . '&';
}
}
} else {
$seed->retrieve($record_id);
$selected_objects .= $record_id . '=' . str_replace("&", "##", $seed->name) . '&';
}
}
if ($rModule != 'Contacts' && $rModule != 'Leads' && $rModule != 'Products' && $rModule != 'Campaigns' && $rModule != 'Projects') {
$_SESSION['MAILMERGE_SKIP_REL'] = false;
$xtpl->assign("STEP", "2");
$xtpl->assign("SELECTED_OBJECTS", $selected_objects);
$_SESSION['SELECTED_OBJECTS_DEF'] = $selected_objects;
} else {
public function testretrieveTargetList()
{
$prospect = new Prospect();
$result = $prospect->retrieveTargetList('', array('id', 'first_name'), 0, 1, 1, 0, 'Accounts');
$this->assertTrue(is_array($result));
}
