Перевод числа в строковое написание
☑
0
Aleksey1989
20.04.12
✎
14:43
Добрый день. Подскажите, пожалуйста, в 1С есть функция для перевода числа в текстовое написание (53 - пятьдесят три)?
1
Molinor
20.04.12
✎
14:45
Функция СформироватьСуммуПрописью(Сумма, Валюта) Экспорт
Если Валюта.ПараметрыПрописиНаРусском = "" Тогда
Возврат ФорматСумм(Сумма);
Иначе
Возврат ЧислоПрописью(Сумма, "L=ru_RU", Валюта.ПараметрыПрописиНаРусском);
КонецЕсли;
КонецФункции // СформироватьСуммуПрописью()
2
Aleksey1989
20.04.12
✎
14:46
(1) Спасибо!
3
Molinor
20.04.12
✎
14:46
Функция ФорматСумм(Сумма, Валюта = Неопределено, ЧН = "", ЧРГ = "") Экспорт
ФорматнаяСтрока = "ЧЦ=15;ЧДЦ=2" +
?(НЕ ЗначениеЗаполнено(ЧН), "", ";" + "ЧН=" + ЧН) +
?(НЕ ЗначениеЗаполнено(ЧРГ),"", ";" + "ЧРГ=" + ЧРГ);
РезультирующаяСтрока = СокрЛ(Формат(Сумма, ФорматнаяСтрока));
Если ЗначениеЗаполнено(Валюта) Тогда
РезультирующаяСтрока = РезультирующаяСтрока + " " + СокрП(Валюта);
КонецЕсли;
Возврат РезультирующаяСтрока;
КонецФункции // ФорматСумм()
Ошибка? Это не ошибка, это системная функция.