Внешняя Обработка создание ЭСЧФ в 8.2 БУ 1.6(обычные формы). в форме надо добавить реквизит с возможностью отбора по ВидДокумента.
Внешняя Обработка создание ЭСЧФ в 8.2 БУ 1.6(обычные формы). В форме надо добавить реквизит с возможностью отбора по ВидДокумента.
Вид Документа - заполняется в ЖурналеДокументов.ДокументыКОформлениюЭСЧФ.
Создаю новый реквизит и не могу понять, не вижу ЖурналДокументов. Как сделать выбор и отбор по выбранному?
Вид Документа - заполняется в ЖурналеДокументов.ДокументыКОформлениюЭСЧФ.
Создаю новый реквизит и не могу понять, не вижу ЖурналДокументов. Как сделать выбор и отбор по выбранному?
Найденные решения
Сейчас попробую структурировать как сделал!
На форме обработке создал элемент формы "ВидДокумента"
Затем создал Реквизит формы, (создавать через новый или + если копированием то не видит путь когда в данные реквизита ставишь) "ВидДокумента" тип "ЖурналДокументовСписок.ДокументыКОформлениюЭСЧФ"
Затем в элемент формы "ВидДокумента" Свойства - Использование - КнопкаСпискаВыбора, КнопкаОчистки.
Затем в модуле формы - Процедура ПриОткрытии() - Добавляю код
В элемент формы "ВидДокумента" Свойства - ПриИзменении поставил ОбновитьТЧ()//это места где обновляется у меня Табличная Часть;
Затем в Процедуру ОбновитьТЧ() после выполнения запроса вставил часть кода:
Итог все работает!
Отдельное спасибо DenisVol за помощь.
На форме обработке создал элемент формы "ВидДокумента"
Затем создал Реквизит формы, (создавать через новый или + если копированием то не видит путь когда в данные реквизита ставишь) "ВидДокумента" тип "ЖурналДокументовСписок.ДокументыКОформлениюЭСЧФ"
Затем в элемент формы "ВидДокумента" Свойства - Использование - КнопкаСпискаВыбора, КнопкаОчистки.
Затем в модуле формы - Процедура ПриОткрытии() - Добавляю код
"
Для Каждого ОписаниеМетаданныхДокумента Из Метаданные.ЖурналыДокументов.ДокументыКОформлениюЭСЧФ .РегистрируемыеДокументы Цикл
ЭлементыФормы.ВидДокумента.СписокВыбора.Добавить(ОписаниеМетаданныхДокумента);
КонецЦикла;
В элемент формы "ВидДокумента" Свойства - ПриИзменении поставил ОбновитьТЧ()//это места где обновляется у меня Табличная Часть;
Затем в Процедуру ОбновитьТЧ() после выполнения запроса вставил часть кода:
Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
// +++Тут добавил поучение документов если пустая строка, и если стоит значение документа
ВидДок = СокрЛП(ВидДокумента.Отбор.ВидДокумента.Значение);
Если ПустаяСтрока(ВидДок) Тогда
// Вставить обработку выборки ВыборкаДетальныеЗаписи
НоваяСтрока = ТабличноеПоле1.Добавить();
ЗаполнитьЗначенияСвойств(НоваяСтрока, ВыборкаДетальныеЗаписи);
ИначеЕсли СокрЛП(ТипЗнч(ВыборкаДетальныеЗаписи.Ссылка))<>ВидДок тогда
Продолжить;
КонецЕсли;//---
// Вставить обработку выборки ВыборкаДетальныеЗаписи
НоваяСтрока = ТабличноеПоле1.Добавить();
ЗаполнитьЗначенияСвойств(НоваяСтрока, ВыборкаДетальныеЗаписи);
КонецЦикла;
;
ПоказатьИтог все работает!
Отдельное спасибо DenisVol за помощь.
Остальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(11) надо добавлять отборы:
что так. Чисто интересно правильно ли мыслю?
ЭтаФорма.ДокументСписок.Отбор.ВидДокумента.ВидСравнения = ВидСравнения.Равно;
ЭтаФорма.ДокументСписок.Отбор.ВидДокумента.Значение = ВидДокумента;
ЭтаФорма.ДокументСписок.Отбор.ВидДокумента.Использование = Истина;
что так. Чисто интересно правильно ли мыслю?
1. Добавляете реквизит "ВидДокумента" (поле ввода). В поле данные указываете "Отбор.ВидДокумента.Значение".
2. В модуле формы делаете такую процедуру
3.Указываете эту процедуру ПриИзменении реквизита "ВидДокумента"
2. В модуле формы делаете такую процедуру
Процедура ВидДокументаПриИзменении(Элемент)
Отбор.ВидДокумента.Использование = Элемент.Значение <> Неопределено;
КонецПроцедуры
3.Указываете эту процедуру ПриИзменении реквизита "ВидДокумента"
Потом пишим процедуру ПриОткрытии()
и ципляете эту процедуру на форму обработки ПриОткрытии
Процедура ПриОткрытии()
Для Каждого ОписаниеМетаданныхДокумента Из Метаданные.ЖурналыДокументов.ДокументыКОформлениюЭСЧФ .РегистрируемыеДокументы Цикл
ЭлементыФормы.ВидДокумента.СписокВыбора.Добавить(ОписаниеМетаданныхДокумента);
КонецЦикла;
КонецПроцедуры
и ципляете эту процедуру на форму обработки ПриОткрытии
Не понял только куда
ЭтаФорма.ДокументСписок.Отбор.ВидДокумента.ВидСравнения = ВидСравнения.Равно;
ЭтаФорма.ДокументСписок.Отбор.ВидДокумента.Значение = ВидДокумента;
ЭтаФорма.ДокументСписок.Отбор.ВидДокумента.Использование = Истина;
Сейчас попробую структурировать как сделал!
На форме обработке создал элемент формы "ВидДокумента"
Затем создал Реквизит формы, (создавать через новый или + если копированием то не видит путь когда в данные реквизита ставишь) "ВидДокумента" тип "ЖурналДокументовСписок.ДокументыКОформлениюЭСЧФ"
Затем в элемент формы "ВидДокумента" Свойства - Использование - КнопкаСпискаВыбора, КнопкаОчистки.
Затем в модуле формы - Процедура ПриОткрытии() - Добавляю код
В элемент формы "ВидДокумента" Свойства - ПриИзменении поставил ОбновитьТЧ()//это места где обновляется у меня Табличная Часть;
Затем в Процедуру ОбновитьТЧ() после выполнения запроса вставил часть кода:
Итог все работает!
Отдельное спасибо DenisVol за помощь.
На форме обработке создал элемент формы "ВидДокумента"
Затем создал Реквизит формы, (создавать через новый или + если копированием то не видит путь когда в данные реквизита ставишь) "ВидДокумента" тип "ЖурналДокументовСписок.ДокументыКОформлениюЭСЧФ"
Затем в элемент формы "ВидДокумента" Свойства - Использование - КнопкаСпискаВыбора, КнопкаОчистки.
Затем в модуле формы - Процедура ПриОткрытии() - Добавляю код
"
Для Каждого ОписаниеМетаданныхДокумента Из Метаданные.ЖурналыДокументов.ДокументыКОформлениюЭСЧФ .РегистрируемыеДокументы Цикл
ЭлементыФормы.ВидДокумента.СписокВыбора.Добавить(ОписаниеМетаданныхДокумента);
КонецЦикла;
В элемент формы "ВидДокумента" Свойства - ПриИзменении поставил ОбновитьТЧ()//это места где обновляется у меня Табличная Часть;
Затем в Процедуру ОбновитьТЧ() после выполнения запроса вставил часть кода:
Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
// +++Тут добавил поучение документов если пустая строка, и если стоит значение документа
ВидДок = СокрЛП(ВидДокумента.Отбор.ВидДокумента.Значение);
Если ПустаяСтрока(ВидДок) Тогда
// Вставить обработку выборки ВыборкаДетальныеЗаписи
НоваяСтрока = ТабличноеПоле1.Добавить();
ЗаполнитьЗначенияСвойств(НоваяСтрока, ВыборкаДетальныеЗаписи);
ИначеЕсли СокрЛП(ТипЗнч(ВыборкаДетальныеЗаписи.Ссылка))<>ВидДок тогда
Продолжить;
КонецЕсли;//---
// Вставить обработку выборки ВыборкаДетальныеЗаписи
НоваяСтрока = ТабличноеПоле1.Добавить();
ЗаполнитьЗначенияСвойств(НоваяСтрока, ВыборкаДетальныеЗаписи);
КонецЦикла;
;
ПоказатьИтог все работает!
Отдельное спасибо DenisVol за помощь.
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот