Функция ПроверитьКодыИФНС(Знач Значение) Экспорт
 
    КодыИФНС = СокрЛП(Значение);
 
    МассивКодов = РазложитьСтрокуВМассивПодстрок(КодыИФНС);
 
    Для Каждого КодСтрока Из МассивКодов Цикл
 
        КодСтрока = СокрЛП(КодСтрока);
        Если СтрДлина(КодСтрока) <> 4 Тогда
            Возврат Ложь;
        КонецЕсли;
 
        Если Не ПопыткаПеревестиВЧисло(КодСтрока) Тогда
            Возврат Ложь;
        КонецЕсли;
 
    КонецЦикла;
 
    Возврат Истина;
 
КонецФункции