Позор на мою седую голову - это я четыре года назад добавил в доверенность код:
Функция ПрописьДроби(Знач Ч)
Числ = СокрЛП(Строка(Ч));
Поз = Найти(Числ, ".");
// Анализ целой части
ЦелЧ = Лев(Числ, ?(Поз=0,СтрДлина(Числ),Поз-1));
ЦелЧ = Формат(ЦелЧ, "ЧП");
Если ПустоеЗначение(ЦелЧ) = 1 Тогда
ЦелЧ = "Ноль";
КонецЕсли;
// анализ дробной части
Дроб = "";
Если Поз > 0 Тогда
ЦелЧ = ЦелЧ + " целых ";
Дроб = Сред(Числ, Поз+1);
Длин = СтрДлина(Дроб);
Дроб = НРег(Формат(Число(Дроб), "ЧП"));
Если Длин = 1 Тогда
Дроб = Дроб+" десятых";
ИначеЕсли Длин = 2 Тогда
Дроб = Дроб+" сотых";
ИначеЕсли Длин = 3 Тогда
Дроб = Дроб+" тысячных";
ИначеЕсли Длин = 4 Тогда
Дроб = Дроб+" десятитысячных";
ИначеЕсли Длин = 5 Тогда
Дроб = Дроб+" стотысячных";
ИначеЕсли Длин = 6 Тогда
Дроб = Дроб+" миллионных";
Иначе
Дроб = Дроб+" неопределенных";
КонецЕсли;
КонецЕсли;
Числ = ЦелЧ + Дроб;
Возврат Числ;
КонецФункции
Счас буду думать как исправить...