Имя: Пароль:
1C
1С v8
Сумма договора прописью УНФ
,
0 DonJon
 
28.09.14
09:56
Всем привет!
В конфе УНФ (1.4.9), есть возможность печати договора
с контрагентом, где параметрах договора указываются реквизиты сторон, в том числе сумма договора, но только числом(сумма подставляется  из Заказ-наряда). Подскажите кто-нибудь как сделать, чтобы прописывалась еще и ПРОПИСЬЮ.

&НаКлиенте
Процедура ВставитьСуммуДокумента(Команда)
    ВставитьПараметр("{Сумма}");          
КонецПроцедуры
1 Ерепень
 
28.09.14
10:00
поиск "прописью" искал?
2 DonJon
 
28.09.14
10:19
Да нету!
3 Ерепень
 
28.09.14
10:25
(2) скрин покажь
4 DonJon
 
28.09.14
10:36
Чего именно?
5 Ерепень
 
28.09.14
10:37
чего-то такого: http://i.imgur.com/I5RQk1H.png
6 DonJon
 
28.09.14
11:15
7 zak555
 
28.09.14
11:16
СформироватьСуммуПроспиью(Сумма, Валюта)
8 Ерепень
 
28.09.14
11:16
не за что
9 Dmitry1c
 
28.09.14
11:18
(6) стандартная функция "ЧислоПрописью"
10 zak555
 
28.09.14
11:19
(9) кому она нужна ?
11 Dmitry1c
 
28.09.14
11:19
(10) ну а вдруг ТС разберется и это ему поможет
12 DonJon
 
28.09.14
11:22
(7) А можно по подробнее?
13 Ерепень
 
28.09.14
11:23
(12) ты хорошо изучил (6)?
14 Ерепень
 
28.09.14
11:23
+(13) что за адова табличка по-твоему?
15 DonJon
 
28.09.14
11:33
(14) Простите Господа, я с кодом не очень силен, то есть как мне привязать к этому общему модулю?. Всем заранее спасибо!!!
16 zak555
 
28.09.14
11:34
(15) РаботаСКурсамиВалют.СформироватьСуммуПроспиью(Сумма, Валюта)
17 Ерепень
 
28.09.14
11:37
(16) держу пари, это ещё не конец
18 DonJon
 
28.09.14
11:41
(17) Да, мне почему-то тоже так кажется ;)).
19 hhhh
 
28.09.14
14:59
(16) реально что неудобно в унф, нет склонений
20 Ерепень
 
28.09.14
15:07
(19) к слову, не знаешь чего-нибудь такого, что бы "генерального директора" правильно склонило? в КА компонента не умеет, в ЗУПе вроде тоже
21 yavasya
 
28.09.14
19:51
(20) число прописью это разве не функция платформы?
22 Ерепень
 
28.09.14
21:49
(21) ага
23 hhhh
 
28.09.14
22:07
(16) не получилось, сделал типовым, но для прилагательных сделал вручную, типа
            
Если Найти(ОбластьМакета.Параметры.ДолжностьКонтрагентаРод, "ныя ") > 0 Тогда
                ОбластьМакета.Параметры.ДолжностьКонтрагентаРод = СтрЗаменить(ОбластьМакета.Параметры.ДолжностьКонтрагентаРод, "ныя ", "ного ");
            КонецЕсли;
            Если Найти(ОбластьМакета.Параметры.ДолжностьОрганизацииРод, "кия ") > 0 Тогда
                ОбластьМакета.Параметры.ДолжностьКонтрагентаРод = СтрЗаменить(ОбластьМакета.Параметры.ДолжностьКонтрагентаРод, "кия ", "кого ");
            КонецЕсли;