Выгрузить шаблоны сообщений в файлы

function exportAllActiveNCEmailTemplates(){
    $arFilter = [
        'ACTIVE'=>'Y', //активные
        'SITE_ID' => 'nc' //для определенного сайта
    ];
    $rsMess = CEventMessage::GetList($by="site_id", $order="desc", $arFilter);
    while($arMess = $rsMess->GetNext()){
        $file = fopen($_SERVER['DOCUMENT_ROOT'] . '/upload/email_templates/'.$arMess['ID'].'_'.$arMess['EVENT_NAME'].'.txt', 'w+');
        if(!empty($file)) {
            fputs($file, htmlspecialchars_decode($arMess['MESSAGE']));
            fclose($file);
        }
    }
}