|
Число прописью
| ☑ |
0
safrusraf
07.07.17
✎
12:57
|
Здравствуйте.
Есть Функция ЧислоПрописью которая число 1,1 выведет как "один рубль 1 копейка". А как по простому вывести "1 рубль 1 копейка"?
|
|
1
polosov
07.07.17
✎
12:59
|
(0) СтрЗаменить (ТвояСтрока, "один", "1");
|
|
2
Ц_У
07.07.17
✎
13:00
|
(1) сильно!
|
|
3
Naf2017
07.07.17
✎
13:05
|
1,1 это "один рубль десять копеек"
|
|
4
safrusraf
07.07.17
✎
13:09
|
(3) Ну, я образно. Пусть 1,01 не в этом суть
|
|
5
Naf2017
07.07.17
✎
13:10
|
напиши свою в общем
|
|
6
Naf2017
07.07.17
✎
13:12
|
+(5) вот у меня уже есть склонение
Функция СклонениеКоличества(Количество,ЕдинственноеЧисло,ДвойственноеЧисло,МножественноеЧисло) Экспорт
Остаток10 = Количество % 10;
Остаток100 = ((Количество-Остаток10)/10)%10;
Результат=МножественноеЧисло;
Если Остаток100<>1 Тогда
Если Остаток10=1 Тогда
Результат=ЕдинственноеЧисло;
ИначеЕсли Остаток10=2 или Остаток10=3 или Остаток10=4 Тогда
Результат=ДвойственноеЧисло;
КонецЕсли;
КонецЕсли;
Возврат Результат;
КонецФункции
|
|
7
Chum
07.07.17
✎
13:14
|
Цел(Сумма)+" рубль " + (Сумма-Цел(Сумма))*100 + " копеек"
|
|
8
Zmich
07.07.17
✎
13:15
|
В сформированной прописью строке заменить то, что идет до строки "рубл" (т.к. может быть рубль, рублей, рубля - поэтому поиск нужно делать по "рубл"), на целую часть числа.
СтрЗаменить(ТвояСтрока, Лев(ТвояСтрока, Найти(ТвояСтрока, "рубл") - 1), Строка(Цел(ТвоеЧисло)))
|
|
9
safrusraf
07.07.17
✎
13:18
|
(8) Наверно, так придется. Спасибо. Просто не совсем понятно для копеек сделали возможность выводить циферками, а для рублей нет.
|
|
10
Zmich
07.07.17
✎
13:20
|
(9). Для платежных документов такой формат прописи числа -
это общепринятая практика.
|
|
11
safrusraf
07.07.17
✎
13:25
|
(10) Понятно. Спасибо
|
|