Имя: Пароль:
1C
1С v8
Формат окончаний.
0 Nykos
 
14.01.14
22:36
Не придумал как назвать грамотно тему, сорри.
Есть ли в 1С функция, аналогичная ЧислоПрописью, только чтобы число было НЕ прописью (1 рубль, 2 рубля, 5 рублей)? Спасибо.
1 sapphire
 
14.01.14
22:38
(0) Напиши сам.
2 konsta_st
 
15.01.14
00:43
(0) Если ниасилишь, делай так : 1 руб., 2 руб. 5 коп. и т.д.))
3 SeraFim
 
15.01.14
02:31
в типовых есть:
// Функция преобразует строку к множественному числу
//
// Параметры:
//  Слово1 - форма слова в ед числе      ("шкаф")
//  Слово2 - форма слова для числит 2-4  ("шкафа")
//  Слово3 - форма слова для числит 5-10 ("шкафов")
//  ЦелоеЧисло - целое число
//
// Возвращаемое значение:
//  строку - одну из строк в зависимости от параметра ЦелоеЧисло
//
// Описание:
//  Предназначена для формирования "правильной" подписи к числительным
//
Функция ФормаМножественногоЧисла(Слово1, Слово2, Слово3, Знач ЦелоеЧисло) Экспорт
4 Wobland
 
15.01.14
04:17
думаю, ЧислоПрописью тут будет в самый раз
5 catena
 
15.01.14
06:09
щаща... магия...)))

ЧислоЧислом = 2342;
ПарПредмета="доллар, доллара, долларов, м, ,,,,0";
ЧислоПрописью1 = ЧислоПрописью(ЧислоЧислом, "НД=Ложь" , ПарПредмета);
ЧислоПочтиПрописью = ЧислоПрописью(ЧислоЧислом, , ",,,,,,,,0");
ЧислоБезЧислаНоПрописью = ""+ЧислоЧислом+" "+СтрЗаменить(ЧислоПрописью1,ЧислоПочтиПрописью,"");
6 Wobland
 
15.01.14
06:19
(5) хочешь немного уличной магии? ;)
ЧислоЧислом = 2342;
ПарПредмета="тенге, тенге, тенге, м, ,,,,0";
ЧислоПрописью1 = ЧислоПрописью(ЧислоЧислом, "НД=Ложь" , ПарПредмета);
ЧислоПочтиПрописью = ЧислоПрописью(ЧислоЧислом, , ",,,,,,,,0");
ЧислоБезЧислаНоПрописью = ""+ЧислоЧислом+" "+СтрЗаменить(ЧислоПрописью1,ЧислоПочтиПрописью,"");
7 catena
 
15.01.14
06:28
(6)Вау!