Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
22 ноя 2024, 17:04

автоматическое заполнение из справочника

Автор RATlius, 20 мая 2014, 23:48

0 Пользователей и 1 гость просматривают эту тему.

cska-fanat-kz

при выборе товара обрабатываете событие ПриИзменении() (Вы между прочим так делаете в одном документе, только присваиваете странное значение...) и заполняете единицу измерения в ТЧ
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

RATlius

Я очень слабо разбираюсь в 1С, не могли бы вы мне помочь с кодом события?
Желательно на примере документаСчетФактураПродажа

cska-fanat-kz


&НаСервереБезКонтекста
Функция ПолучитьЕдиницуИзмеренияНаСервере(Номенклатура)

Возврат Номенклатура.УсловноеОбозначение;

КонецФункции // ПолучитьЕдиницуИзмеренияНаСервере()

&НаКлиенте
Процедура ТоварыНаименованиеТовараПриИзменении (Элемент)
СтрокаТЧ = Элементы.Товары.ТекущиеДанные;
СтрокаТЧ.ЕдИзмерен = ПолучитьЕдиницуИзмеренияНаСервере(СтрокаТЧ.Номенклатура);
КонецПроцедуры
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

RATlius

А что подразумевается под номенклатурой?

cska-fanat-kz

Колонка вашей ТЧ Товары типа СправочникСсылка.Номенклатура
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

RATlius

Но у меня нету справочника Номенклатуры

cska-fanat-kz

Сорри, привык уже к "Номенклатура"...
У вас - "НаименованиеТовара"

А вам задание - самому исправить мой код ))
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

RATlius

Большое Вам спасибо, я исправил код на

&НаСервереБезКонтекста
Функция ПолучитьЕдиницуИзмеренияНаСервере(НаименованиеТовара)

   Возврат НаименованиеТовара.УсловноеОбозначение;

КонецФункции // ПолучитьЕдиницуИзмеренияНаСервере()

&НаКлиенте
Процедура ТоварыНаименованиеТовараПриИзменении (Элемент)
   СтрокаТЧ = Элементы.Товары.ТекущиеДанные;
   СтрокаТЧ.ЕдИзмерен = ПолучитьЕдиницуИзмеренияНаСервере(СтрокаТЧ.НаименованиеТовара);
КонецПроцедуры


Но как мне теперь это организовать и для кода единиц измерения (и других полей), мне в эту же процедуру дописать или новую?

cska-fanat-kz

Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

RATlius

&НаСервереБезКонтекста
Функция ПолучитьЕдиницуИзмеренияНаСервере(НаименованиеТовара)
   Возврат НаименованиеТовара.УсловноеОбозначение;
   Возврат НаименованиеТовара.Код;    //----------------------
КонецФункции // ПолучитьЕдиницуИзмеренияНаСервере()

&НаКлиенте
Процедура ТоварыНаименованиеТовараПриИзменении (Элемент)
   СтрокаТЧ = Элементы.Товары.ТекущиеДанные;
   СтрокаТЧ.ЕдИзмерен = ПолучитьЕдиницуИзмеренияНаСервере(СтрокаТЧ.НаименованиеТовара);
   СтрокаТЧ.Код = ПолучитьЕдиницуИзмеренияНаСервере(СтрокаТЧ.НаименованиеТовара);   //----------------------
   КонецПроцедуры

Я добавил эти две строки. В результате у меня вписывается наименование в Ед измерен и в код.
как сделать чтобы в код он вписывал именно код единиц измерения?

Теги: 8.2 

Похожие темы (5)

Рейтинг@Mail.ru

Поиск