Процедура ТабличныйДокумент_ПроставитьГлобальнуюПеремнную(ТабДок,ИмяПерем,ЗнчПерем)
ОблНачало = Неопределено;
Найдено = Истина;
ОблНайдено = Неопределено;
Пока Найдено Цикл
ОблНайдено = ТабДок.НайтиТекст("$"+ИмяПерем+"$", ОблНачало,,,,, Истина);
Найдено = НЕ (ОблНайдено=Неопределено);
Если Найдено Тогда
ОблНачало=ОблНайдено;
ОблНайдено.Текст = СтрЗаменить(ОблНайдено.Текст,"$"+ИмяПерем+"$",Строка(ЗнчПерем));
КонецЕсли;
КонецЦикла;
КонецПроцедуры
В шаблонах текстульки вида $Переменная$
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший