Why does the script for changing the infoblock element property not work?

Question

1C-Bitrix

CModule::IncludeModule("iblock");

$arSelect = Array();
$arFilter = Array("IBLOCK_ID"=> 25);

$res = CIBlockElement::GetList(Array(),
 $arFilter, false, Array("nPageSize"=>50), $arSelect);

while($ob = $res->GetNextElement())
{
 $arFields = $ob->GetFields();
  if(empty($arFields["CODE"])){
        CIBlockElement::SetPropertyValues($arFields['ID'], $arFields['IBLOCK_ID'], array('CODE' => 'WORKS!'));
    }
}

Bitrix is ​​such a Bitrix, the simplest script for installing a symbolic code if it is not installed. Doesn't work, can you tell me what I'm doing wrong?

Answer 1

Character code changes via Update