Сумма прописью на английском 1c

Как перевести сумму в строку на английском

Для перевода суммы из числа в строку прописью воспользуемся стандартной функцией ЧислоПрописью(). Синтаксис функции выглядит так: ЧислоПрописью(<Число>, <ФорматнаяСтрока>, <ПараметрыПредметаИсчисления>)

	Результат = "";
	СуммаКПрописи = Объект.Число;
	
	//На кириллице
	ФормСтрока = "Л = ru_RU; ДП = Истина";
	ПарПредмета = "рубль,рубля,рублей,м,копейка, копейки, копеек, ж,2";
	Результат = Результат + " " +ЧислоПрописью(СуммаКПрописи,  ФормСтрока, ПарПредмета) + Символы.ПС;
	
	ПарПредмета="доллар,доллара,долларов,м,цент,цента,центов,м,2";
	Результат = Результат + " " +ЧислоПрописью(СуммаКПрописи,  ФормСтрока, ПарПредмета) + Символы.ПС;
	
	ПарПредмета="евро,евро,евро,м,евроцент,евроцента,евроцентов,м,2";
	Результат = Результат + " " +ЧислоПрописью(СуммаКПрописи,  ФормСтрока, ПарПредмета) + Символы.ПС;
	
	//На английском
	Результат = Результат + " " + ЧислоПрописью(СуммаКПрописи, "L=en_US","rouble, roubles, kopeck,kopecks,  2") + Символы.ПС;
	
	Результат = Результат + " " + ЧислоПрописью(СуммаКПрописи, "L=en_US", "dollar, dollars,m, cent, cents,m, 2") + Символы.ПС;
	
	Результат = Результат + " " + ЧислоПрописью(СуммаКПрописи, "L=en_US","euro, euros,m, cent, cents,m, 2") + Символы.ПС;
	
	Объект.Резульат = Результат;

Результат выглядит вот так:

Понадобиться такое преобразование числа может например для печатной формы «Акта об оказании услуг» для иностранных контрагентов. По ссылке находиться небольшая обработка для получения расширенного представления об этой функции:  ЧислоПрописью.epf.

Спасибо!

Теперь редакторы в курсе.