email маркетинг добавление пользователя в recipient list

<?php define("STOP_STATISTICS", true);
if (array_key_exists('site_id', $_REQUEST) && is_string($_REQUEST['site_id'])){
    $siteId = $_REQUEST['site_id'];
    if($siteId !== '' && preg_match('/^[a-z0-9_]{2}$/i', $siteId) === 1){
        define('SITE_ID', $siteId);
    }
}


require_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/main/include/prolog_before.php");
use \Bitrix\Main\Loader,
    \Bitrix\Sender\Entity,
    \Bitrix\Sender\Recipient;

Loader::includeModule('sender');
global $USER;
$result = false;
if (isset($_REQUEST['action'])&&($_REQUEST['action']=='add_betatester')){
    $contact = (new Entity\Contact())
        ->set('NAME', $USER->GetFirstName())
        ->set('CODE', $USER->GetLogin())
        ->set('TYPE_ID', Recipient\Type::EMAIL);

    if ( $contact->save() ){
        $contact->addToList(1);
    }
    $result = true;
}
$APPLICATION->RestartBuffer();
header('Content-Type: application/json; charset='.LANG_CHARSET);
echo CUtil::PhpToJSObject($result);
die();