Имя: Пароль:
1C
1С v8
Как из числа 8.550 получить строку "8.550 кг."
,
0 FREEEEs
 
28.04.12
04:32
Всем привет братья по цеху!

Вопрс думаю для вас не сложный, есть цифра 8.550, нужно получить строку типа "8.550 кг.". С помощью функции "формат" ? Не могу понять как (((

И ещё, как можно из полного ФИО получить короткое "Иванов И.В." ??
1 Cube
 
28.04.12
04:39
(0) Учебники читать надо или смотреть, как витовых реализовано...
МоеЧисло = 8.550;
МояСтрока = "" + МоеЧисло + " кг.";

А ФИО нужно разбить на слова, а потом склеить первое слово и первые буквы из оставшихся двух слов.
2 Cube
 
28.04.12
04:40
+(1) Что-то я не выспался что-ли)))
"витовых" читать как "типовых".
3 FREEEEs
 
28.04.12
04:42
(1) да причём тут +"кг.")))) речь идёт о формате ! а если там не кг. а тонны ? или граммы.
4 FREEEEs
 
28.04.12
04:43
Например
ЧислоПрописью (ИтогоКоличество,"ДП = Ложь" ,"тонна, тонны, тонн, ж, кг., кг., кг., м,3");

вернёт мне "Восемь тонн 550 кг.", а мне надо "8.550 кг."
5 Cube
 
28.04.12
04:45
(4) А причем здесь ЧислоПрописью()? У тебя есть вес, есть единица измерения. Компонуй строку сам, как написано в (1).
6 perec1982
 
28.04.12
04:59
Формат(ТвоеЧисло, "ЧЦ=15; ЧДЦ=3") + " кг."
7 perec1982
 
28.04.12
05:01
Процедура НаименованиеПриИзменении(Элемент)

   ФИО = Наименование;

   Если ПустаяСтрока(Фамилия) ИЛИ ЭтоНовый() Тогда
       Фамилия  = ВыделитьСлово(ФИО);
       Имя      = ВыделитьСлово(ФИО);
       Отчество = ВыделитьСлово(ФИО);
   КонецЕсли;

   ФИО = Фамилия + " " + Лев(Имя, 1) + ". " + Лев(Отчество,1) + ".";

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

Функция ВыделитьСлово(ИсходнаяСтрока)
   
   Буфер = СокрЛ(ИсходнаяСтрока);
   ПозицияПослПробела = Найти(Буфер, " ");

   Если ПозицияПослПробела = 0 Тогда
       ИсходнаяСтрока = "";
       Возврат Буфер;
   КонецЕсли;
   
   ВыделенноеСлово = СокрЛП(Лев(Буфер, ПозицияПослПробела));
   ИсходнаяСтрока = Сред(ИсходнаяСтрока, ПозицияПослПробела + 1);
   
   Возврат ВыделенноеСлово;
   
КонецФункции
8 FREEEEs
 
28.04.12
05:10
(5) у меня нет единицы измерения! Есть только число.
9 Cube
 
28.04.12
05:18
(8) Ну, если ты не знаешь единицу измерения, то что ты тогда от нас хочешь? Кашу из топора?
10 Zhuri
 
28.04.12
05:19
С такими вопросами

(0) не брат ты мне..... (с) :)
11 FREEEEs
 
28.04.12
05:26
О боже ты мой, я же привёл функцию :
ЧислоПрописью (ИтогоКоличество,"ДП = Ложь" ,"тонна, тонны, тонн, ж, кг., кг., кг., м,3");



Она же понимает единицу из числа?
12 FREEEEs
 
28.04.12
05:26
Ладно тему закрыть, ноль толку
13 VladZ
 
28.04.12
05:29
(0) Задача: как получить "8.550 кг." с помощью функции "формат".
По аналогии: как открыть бутылку вина, имея отвертку и плоскогубцы?

Ответ в обоих случаях одинаков: не выёживайся, используй нужные инструменты!
14 FREEEEs
 
28.04.12
05:32
Там была опечатка не функция Формат, а ЧислоПрописью.

ЧислоПрописью работет отлично, но мне не нужно ВСЁ число прописью а только массу
15 Cube
 
28.04.12
05:34
(12) Какие вопросы - такие ответы.
(11) "я же привёл функцию" "Она же понимает единицу из числа" - ничего не попутал? А это что: "тонна, тонны, тонн, ж, кг., кг., кг., м,3"??? Это, типа, не единица измерения, да?

Несешь какую-то ахинею, унижая помогающих. Молодец, далеко пойдешь.
16 nazi
 
28.04.12
05:42
(14) напиши свою функцию "ФорматЗначенияСКГ", будет возвращать с кг

Формат - типовая функция платформы 1с
ЧислоПрописью - функция конфигураций
17 FREEEEs
 
28.04.12
05:46
(15)
Вот заняло 1 минуту, ты можешь удалить 1С

Функция ПолучитьМассу(Кол)
   Стр = ЧислоПрописью(Кол,"НП = ЛОЖЬ; ДП = Ложь" ,"*тонна, *тонны, *тонн, *ж, *кг., *кг., *кг., *м,3");
   Н = Найти(Стр, "*");
   Возврат Строка(Кол)+" "+Прав(Стр, СтрДлина(Стр) - Н);
КонецФункции
18 vasilii85
 
28.04.12
05:48
(0)Ты хамло, туповатое.
19 Cube
 
28.04.12
05:54
(17) Оооооо, да ты, видать, тут http://govnokod.ru/1c завсегдатый... :)
20 AleksAnt
 
28.04.12
06:07
(17) жесть...
Давай еще))
21 Wobland
 
28.04.12
06:11
кто может стелепатировать сакральный смысл астериска?
22 Infsams654
 
28.04.12
08:27
так сегодня же суперпятница
23 ДенисЧ
 
28.04.12
08:30
мда... Это не трава и не водка...
24 Dimasik2007
 
28.04.12
08:54
жжжжОЛУДЬ!
25 KUBIK
 
28.04.12
09:05
И ещё, как можно из полного ФИО получить короткое "Иванов И.В." ??

Юзай общие модули в бухии 2.0:

Функция ФамилияИнициалыФизЛица(Объект = "", Фамилия = " ", Имя = " ", Отчество = " ") Экспорт
26 Ненавижу 1С
 
гуру
28.04.12
09:12
(25) ща он там еще звездочек наставит!
27 Один С
 
28.04.12
09:13
так ну с первым вопросом разобрались. теперь по ФИО.
смотрите как я могу.

Функция ПолучитьФИО(ПолноеФИО)
   Стр = СтрЗаменить(ПолноеФИО," ","*");
   Массив = РазложитьСтрокуВМассивПодстрок(ПолноеФИО, "*");
   Фамилия = Массив[0];
   Имя = Массив[1];
   Отчество = Массив[2];

   Возврат Фамилия+" "+Имя+". "Отчество". ";
КонецФункции
28 Ненавижу 1С
 
гуру
28.04.12
09:17
(27) красавец, умеешь правильно использовать *
29 Gesperid
 
28.04.12
09:37
(16) ошибаешься, они обе функции платформы
30 asady
 
28.04.12
09:42
(0)
вот так это делается

тВес = 8.550;


Сообщить(Формат(тВес,"ЧРД=.")+Формат(тВес=тВес,"БЛ=; БИ=' кг'"));
31 smaharbA
 
28.04.12
09:47
а почему не грамм ?
32 GenAcid
 
28.04.12
09:58
(30) Удали 1С, ты звездочку не использовал
33 Wobland
 
28.04.12
09:58
(31) для граммов умножать надо, а звезда уже используется
34 Wobland
 
28.04.12
09:59
(32) Формат(тВес,"ЧРД=.")+Формат(2*тВес<>тВес,"БЛ=; БИ=' кг'")
35 Cube
 
28.04.12
13:44
О, парни, я смотрю, вы тут жгете!!!))
А ведь это новый мем!) Теперь, если у кого-то что-то не будет получаться, можно смело ему заявлять: "Так ты не использовал звездочку (или использовал неверно). Удали 1С!" =))
36 0xFFFFFF
 
28.04.12
13:49
(35) Да и вы в курсе про то что теперь так делать некрасиво
КоличествоУп = КоличествоШТ / К;
Нужно вот так:
КоличествоУп = КоличествоШТ * (1/К);

Хочешь быть в "1С:СовМИСТимо" - используй звездочку!
37 Infsams654
 
29.04.12
10:06
Сдается мне, что (0) так и не впёр о чем речь. Кто как думает - он осознал?
38 andrewks
 
29.04.12
10:08
(23) грибы-ковёр?
39 CepeLLlka
 
29.04.12
10:43
Я не понял зачем удалили сообщения? Это что такое, а? Кому это мешало?
40 andrewks
 
29.04.12
10:44
(39) с похмелюги?
41 CepeLLlka
 
29.04.12
10:58
(40) Нуу нее, я не пью :)
42 CepeLLlka
 
29.04.12
10:59
Просто весело же было.. и т.д.. да и парню этому урок.. чтобы пересмотрел взгляды свои.. а вы раз! И всё перечеркнули.. :(
43 Wobland
 
29.04.12
11:08
(42) это миста, сынок ©