Группа: Пользователи
Сообщений: 205
Спасибо сказали: 3 раз
Рейтинг: 0
Цитата(Petre @ 15.07.15, 10:15)
Добавить реквизит документа и создать соответствующий элемент формы.
Код идеально выводиться в н.н. создал колонку УКТВЭД в реализации, создал реквизиты табличной части уктвэд и гтд, но при выборе номенклатуры ошибка
{Документ.РеализацияТоваровУслуг.Форма.ФормаДокумента.Форма(1192)}: Метод обьекта не найдено (ЗаполнитьУКТВЭДВСтрокеТоваров) ОбработкаТабличныхЧастей.ЗаполнитьУКТВЭДВСтрокеТоваров(СтрокаТабличнойЧасти);
Если ТипЗнч(ВыбранноеЗначение) = Тип("СправочникСсылка.НоменклатураГТД") Тогда
ТекущаяСтрокаТоваров = ЭлементыФормы.Товары.ТекущиеДанные; Если НЕ ТекущаяСтрокаТоваров = Неопределено Тогда ТекущаяСтрокаТоваров.НомерГТД = ВыбранноеЗначение.НомерГТД; КонецЕсли;
Если ТипЗнч(ВыбранноеЗначение) = Тип("СправочникСсылка.НоменклатураГТД") Тогда
ТекущаяСтрокаТоваров = ЭлементыФормы.Товары.ТекущиеДанные; Если НЕ ТекущаяСтрокаТоваров = Неопределено Тогда ТекущаяСтрокаТоваров.КодУКТВЭД = ВыбранноеЗначение.КодУКТВЭД; КонецЕсли;
ВыбранноеЗначение = ВыбранноеЗначение.НомерГТД;
КонецЕсли;
КонецПроцедуры
// Процедура дает возможность выбора Кода УКТ ВЭД и НОмера ГТД как из всех возможных вариантов // так и из подчиненного к номенклатуре справочника, содержащие возможные значения по-умолчанию // для номенклатуры // Процедура НачалоВыбораНоменклатурыГТД(Элемент, СтандартнаяОбработка)
СтандартнаяОбработка = Ложь;
ТекущаяСтрокаТоваров = ЭлементыФормы.Товары.ТекущиеДанные; Если ТекущаяСтрокаТоваров = Неопределено Тогда Возврат; КонецЕсли;
ВариантыВыбора = Новый СписокЗначений(); ВариантыВыбора.Добавить(Ложь, "Выбрать по данным номенклатуры"); ВариантыВыбора.Добавить(Истина, "Произвольный выбор");
Запрос = Новый Запрос(); Запрос.УстановитьПараметр("КодУКТВЭД", ТекущаяСтрокаТоваров.КодУКТВЭД); Запрос.УстановитьПараметр("НомерГТД", ТекущаяСтрокаТоваров.НомерГТД); Запрос.УстановитьПараметр("Владелец", ФормаВыбора.ПараметрВыборПоВладельцу);
Запрос.Текст = "ВЫБРАТЬ РАЗРЕШЕННЫЕ ПЕРВЫЕ 1 | НоменклатураГТД.Ссылка |ИЗ | Справочник.НоменклатураГТД КАК НоменклатураГТД |ГДЕ | НоменклатураГТД.КодУКТВЭД = &КодУКТВЭД | И НоменклатураГТД.НомерГТД = &НомерГТД | И НоменклатураГТД.Владелец = &Владелец";
Выборка = Запрос.Выполнить().Выбрать();
Если Выборка.Следующий() Тогда ФормаВыбора.ПараметрТекущаяСтрока = Выборка.Ссылка; КонецЕсли;
ФормаВыбора.Открыть();
КонецПроцедуры
Мне реквизит артикул не нужен, может как то вместо артикула выводить уктвэд?
Начал заново колупать, добавлена колонка УКТВЭД, реквизит УКТВЭД на справочник Номенклатура ГТД, при добавлении номенклатуры можно открыть справочник номенклатуры ГТД, что бы при добавлении номенклатуры подставлялось то значение которое присвое этой номенклатуре?
Группа: Местный
Сообщений: 2908
Из: Київ, Україна
Спасибо сказали: 1159 раз
Рейтинг: 1244.5
1. Это не управляемый интерфейс. 2. Если речь идет о какой-то типовой, расскажите. 3. В украинских типовых "Номенклатура ГТД" - подчинен "Номенклатуре". Кроме того, в элементе номенклатуры есть номенклатура ГТД по-умолчанию. "Код УКТЗЕД" - реквизит элемента номенклатуры ГТД. Вот в обработчике события "ПриИзменении" и присваивайте элементу формы значение номенклатуры ГТД (или код УКТЗЕД из нее) из реквизита номенклатуры по умолчанию.
Допрацьовую: - "Бухгалтерія для України 2.1"; - "Альфа-Авто: Автосалон+Автосервіс+Автозапчастини, українська версія".
Группа: Пользователи
Сообщений: 205
Спасибо сказали: 3 раз
Рейтинг: 0
Цитата(Petre @ 15.07.15, 11:55)
1. Это не управляемый интерфейс. 2. Если речь идет о какой-то типовой, расскажите. 3. В украинских типовых "Номенклатура ГТД" - подчинен "Номенклатуре". Кроме того, в элементе номенклатуры есть номенклатура ГТД по-умолчанию. "Код УКТЗЕД" - реквизит элемента номенклатуры ГТД. Вот в обработчике события "ПриИзменении" и присваивайте элементу формы значение номенклатуры ГТД (или код УКТЗЕД из нее) из реквизита номенклатуры по умолчанию.
Затупил, это обычный интерфейс, УТП Для Украины 1.2.30.
Пытаюсь код вывода кода выдереть с налоговой накладной так там Процедура ТоварыНоменклатураПриИзменении про уктвэд вообще пусто
// Заполняем реквизиты табличной части. ЗаполнитьСтавкуНДС(СтрокаТабличнойЧасти); ЗаполнитьУКТВЭДВСтрокеТоваров(СтрокаТабличнойЧасти);
// Заполнение цены зависит от розничности операции. ОбработкаТабличныхЧастей.ЗаполнитьЕдиницуЦенуПродажиТабЧасти(СтрокаТабличнойЧасти, ЭтотОбъект, мВалютаРегламентированногоУчета);
// Заполняем реквизиты табличной части. ОбработкаТабличныхЧастей.ЗаполнитьСтавкуНДСТабЧасти(СтрокаТабличнойЧасти, ЭтотОбъект, "Реализация"); ОбработкаТабличныхЧастей.ЗаполнитьСпособСписанияОстаткаТоваровТабЧасти(СтрокаТабличнойЧасти, ЭтотОбъект);
// Заполнение цены зависит от розничности операции. ОбработкаТабличныхЧастей.ЗаполнитьЕдиницуЦенуПродажиТабЧасти(СтрокаТабличнойЧасти, ЭтотОбъект, мВалютаРегламентированногоУчета);
// Заполнение цены зависит от розничности операции. ОбработкаТабличныхЧастей.ЗаполнитьЕдиницуЦенуПродажиТабЧасти(СтрокаТабличнойЧасти, ЭтотОбъект, мВалютаРегламентированногоУчета);
то получаем {Документ.РеализацияТоваровУслуг.Форма.ФормаДокумента.Форма(1192,2)}: Процедура або функція з вказаним ім`ям не визначена (ЗаполнитьУКТВЭДВСтрокеТоваров) <<?>>ЗаполнитьУКТВЭДВСтрокеТоваров(СтрокаТабличнойЧасти); (Перевірка: Товстий клієнт (звичайна прикладна програма))
// Заполняем реквизиты табличной части. ЗаполнитьСтавкуНДС(СтрокаТабличнойЧасти); ЗаполнитьУКТВЭДВСтрокеТоваров(СтрокаТабличнойЧасти);
// Заполнение цены зависит от розничности операции. ОбработкаТабличныхЧастей.ЗаполнитьЕдиницуЦенуПродажиТабЧасти(СтрокаТабличнойЧасти, ЭтотОбъект, мВалютаРегламентированногоУчета);
// Выполнить общие действия для всех документов при изменении номенклатуры. ОбработкаТабличныхЧастей.ПриИзмененииНоменклатурыТабЧасти(СтрокаТабличнойЧасти, ЭтотОбъект);
// Заполняем реквизиты табличной части. ОбработкаТабличныхЧастей.ЗаполнитьСтавкуНДСТабЧасти(СтрокаТабличнойЧасти, ЭтотОбъект,"Приобретение");
Прочитал тему, сделал вывод код УКТВЭД для документа (Поступление товаров и услуг) УТП для Украины, в ручном вводе работает (выводится код УКТВЭД), при вводе на основании из документа (Заказ поставщику) автоматом "код УКТВЭД" не подтягивает, может кто подскажет в чем проблема.
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!