Функция преобразует переданную сумму, число в строку вида

 

Функция глРубКоп(ПарСумма) Экспорт

	Если Число(ПарСумма)=0 Тогда

		Возврат "руб.      коп."

	КонецЕсли;

	Возврат ""+Цел(ПарСумма)+" руб. "+Формат((ПарСумма-Цел(ПарСумма))* 100,"ЧЦ=2; ЧВН=")+" коп."

КонецФункции



//Пример обращения

Процедура КнопкаВыполнитьНажатие(Кнопка)

	Сообщить(глРубКоп(ИтогоСумм)); //К примеру ИтогоСумм=875.05; - Результат 875 руб. 05 коп.

КонецПроцедуры

   

 

Функция глРубКоп(ПарСумма) Экспорт

	Если Число(ПарСумма)=0 Тогда

		Возврат "руб.      коп."

	КонецЕсли;

	Возврат ""+Цел(ПарСумма)+" руб. "+Формат((ПарСумма-Цел(ПарСумма))* 100,"Ч(0)2")+" коп."

КонецФункции



//Пример обращения

ИтогоСумм=875.05;

Сообщить(глРубКоп(ИтогоСумм)); // 875 руб. 05 коп.