Свой способ заполнения табличной части документа с срабатыванием процедуры ПриИзменении

23.08.10

Разработка - Универсальные функции

+32 –1
Задача состояла в программном заполнении табличной части документа. При этом чтобы срабатывала процедура ПриИзменении при внесении значения в колонку Номенклатура.

После неудачного применения различных методик появилась собственная идея реализации данной задачи.  Вот пример:

 

    ДокПоступления = Документы.ПоступлениеТоваровУслуг.СоздатьДокумент();
    ФормаДокПоступления = ДокПоступления.ПолучитьФорму();
    ФормаДокПоступления.Открыть();

    ПервоначальноПриАктивизацииСтроки = ФормаДокПоступления.ЭлементыФормы.Товары.ПолучитьДействие("ПриАктивизацииСтроки");
    ПолеВводаПриИзменении = ФормаДокПоступления.ЭлементыФормы.Товары.Колонки.Номенклатура.ЭлементУправления.ПолучитьДействие("ПриИзменении");
    ФормаДокПоступления.ЭлементыФормы.Товары.УстановитьДействие("ПриАктивизацииСтроки", ПолеВводаПриИзменении);

    Для каждого СтрокаТЗ Из ТЗКЗаполнению Цикл
        НоваяСтрокаТовары = ДокПоступления.Товары.Добавить();
        НоваяСтрокаТовары.Номенклатура = СтрокаТЗ.Номенклатура;
        НоваяСтрокаТовары.Количество = СтрокаТЗ.Количество;
        НоваяСтрокаТовары.Цена = СтрокаТЗ.Цена;
        ФормаДокПоступления.ЭлементыФормы.Товары.ТекущаяСтрока = НоваяСтрокаТовары;
    КонецЦикла;

    ФормаДокПоступления.ЭлементыФормы.Товары.УстановитьДействие("ПриАктивизацииСтроки", ПервоначальноПриАктивизацииСтроки);

    ДокПоступления.Записать(РежимЗаписиДокумента.Проведение);
    ФормаДокПоступления.Закрыть();
    ФормаДокПоступления = Неопределено;

Суть заключается в подмене действия, происходящего при активизации строки, на действие, происходящее при изменении Номенклатуры. Потом действие возвращается назад.

+32 –1

См. также

Загрузка табличного документа в таблицу значений. Пять строк кода, которые изменили мир

Универсальные функции Программист Платформа 1С v8.3 1C:Бухгалтерия Бесплатно (free)

Благодаря этим пяти строчкам можно больше не заморачиваться с загрузкой из внешних файлов. Пользуюсь везде, всегда и постоянно.

21.05.2024    26346    dimanich70    82    

149
Вставляем картинку из буфера обмена (платформа 1С 8.3.24)

Универсальные функции Программист Платформа 1С v8.3 1C:Бухгалтерия Абонемент ($m)

Задача: вставить картинку из буфера обмена на форму средствами платформы 1С.

1 стартмани

18.03.2024    4592    4    John_d    11    

57
GUID в 1С 8.3

Универсальные функции Программист Стажер Платформа 1С v8.3 1C:Бухгалтерия Бесплатно (free)

Пришлось помучиться с GUID-ами немного, решил поделиться опытом, мало ли кому пригодится.

12.02.2024    27454    atdonya    25    

58
Переоткрытие внешних обработок

Универсальные функции Программист Платформа 1С v8.3 Бесплатно (free)

На заключительных этапах, когда идет отладка или доработка интерфейса, необходимо много раз переоткрыть внешний объект. Вот один из способов автоматизации этого.

30.11.2023    6183    ke.92@mail.ru    17    

65
Генерация штрихкода и QR, разбор настроек и примеры

БСП (Библиотека стандартных подсистем) Сканер штрих-кода Универсальные функции Этикетки, ценники Программист Бизнес-аналитик 1C:Бухгалтерия Бесплатно (free)

Разберем на примерах использование компоненты из БСП для генерации штрихкода и матричных кодов.

15.09.2023    23010    YA_418728146    9    

120
Валидация JSON через XDTO (включая массивы)

WEB-интеграция Универсальные функции Механизмы платформы 1С Программист Платформа 1С v8.3 1C:Бухгалтерия Бесплатно (free)

При работе с интеграциями рано или поздно придется столкнуться с получением JSON файлов. И, конечно же, жизнь заставит проверять файлы перед тем, как записывать данные в БД.

28.08.2023    16943    YA_418728146    8    

170
Печать непроведенных документов для УТ, КА, ERP. Настройка печати по пользователям, документам и печатным формам

Пакетная печать Печатные формы Адаптация типовых решений Универсальные функции Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Абонемент ($m)

Расширение для программ 1С:Управление торговлей, 1С:Комплексная автоматизация, 1С:ERP, которое позволяет распечатывать печатные формы для непроведенных документов. Можно настроить, каким пользователям, какие конкретные формы документов разрешено печатать без проведения документа.

2 стартмани

22.08.2023    4389    75    progmaster    11    

4
Расширение: Быстрые отборы через буфер [Alt+C] Копировать список, [Alt+V] Вставить список, [Ctrl+C] Копировать из файлов

Инструментарий разработчика Универсальные функции Платформа 1С v8.3 1C:Бухгалтерия 1С:Розница 2 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Зарплата и Управление Персоналом 3.x Абонемент ($m)

Копирует в буфер значения из списков, из ячеек отчетов, таблиц, настроек списков, других отборов и вставляет в выбранную настройку отбора. Работает с Объект не найден. Работает как в одной так и между разными базами 1С. Использует комбинации [Alt+C] Копировать список, [Alt+V] Вставить список. Также для копирования данных используется стандартная [Ctrl+C] (например из открытого xls, mxl, doc и т.п. файла скопировать список наименований)

1 стартмани

13.10.2022    19321    183    sapervodichka    112    

137
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. cool.clo 23.08.10 18:12 Сейчас в теме
Может я ошибаюсь...но...у меня была чем-то похожая задача (надо было несколько колонок сразу менять) и незначительно доработал в типовой ИзменениеСтрокиПрограммное
А затем просто вызывал процедуру
+ – Ответить
2. vers139 53 23.08.10 18:16 Сейчас в теме
(1) но для этого надо изменять конфигурацию. Хотя бы просто для того, чтобы экспортировать процедуру ПриИзменении. Данный способ позволяет этого не делать.
+ – Ответить
3. tormozit 7260 23.08.10 23:44 Сейчас в теме
Я уже писал здесь, но мой пост куда то делся (удалили?)
Попробую снова.
Более универсальным решением для имитации интерактивного изменения значения в поле ввода является мой способ http://infostart.ru/public/16985/
+ – Ответить
4. Abadonna 3970 24.08.10 07:05 Сейчас в теме
(3)
куда то делся (удалили?)

Скорее всего какой-то глюк. Модератор (и автор разработки ) не могут комментарий удалить, только скрыть. Если бы он был скрыт, я бы его все равно видел. А тут не вижу совсем ничего
+ –1 Ответить
5. Арчибальд 2709 24.08.10 08:34 Сейчас в теме
(4) Я тоже с таким глюком сталкивался.
+ – Ответить
7. vers139 53 24.08.10 11:26 Сейчас в теме
(3) я ничего не удалял. Кстати, пропавший комментарий приходил мне на почту, поэтому в систему он точно записывался. Дальнейшая судьба мне не известна.

По поводу Вашего решения: я не настаиваю на уникальности и единственной верности данного способа. Я поделился своим опытом, а остальные могут его использовать, а могут и не использовать.

По такой же логике я "заставил" выполниться процедуру ПередЗаписью Формы (путём переназначения действия при закрытии Формы на процедуру ПередЗаписью). Таким образом можно вызывать выполнение "интерактивных" процедур программно путём подсовывания этих процедур под действия, которые можно вызвать программно (например, установить текущую строку, вызвав тем самым действие ПриАктивизацииСтроки, или закрыть форму, вызвав тем самым действие ПриЗакрытии).
+ – Ответить
6. tango 546 24.08.10 10:16 Сейчас в теме
1. надо ли открывать форму?
2. надо ли откатывать действие назад?
+ – Ответить
8. vers139 53 24.08.10 11:29 Сейчас в теме
(6) 1. Без открытия формы нельзя ничего делать с элементами формы. Поэтому открывать форму обязательно
2. Действие откатывается назад для перестраховки. Если данный код использовать внутри большой процедуры, но через надцать страниц код можно забыть, что у этой формы произведена замена процедур по действию и тогда форма будет работать "неадекватно".
+ – Ответить
15. Dr.ZIG 27 30.08.10 14:25 Сейчас в теме
(8) 1. Как это нельзя? Реализовывал недавно эмуляцию нажатий на кнопки при заходе определённого пользователя в систему:
В глобальном модуле:
Ф=Обработки.ПроведениеПоПартиям.Создать();
Форма=Ф.ПолучитьФорму();
При получении выполняются действия из нижней части модуля формы, не из процедур:
Если глТекущийПользователь.Наименование = "ПроведениеПоПартиям" Тогда
ПередОткрытием(Ложь,Истина);
КнопкаВыполнитьНажатие(ЭтаФорма.ЭлементыФормы.ОсновныеДействияФормы.Кнопки.Действие);
КонецЕсли;
В документах думаю что-то подобное можно по аналогии сворганить ;)
+ – Ответить
16. vers139 53 31.08.10 10:07 Сейчас в теме
(15) но, опять же, для этого надо редактировать конфигурацию :)

По поводу элементов формы. С ними ничего нельзя сделать без открытия формы. Другой вопрос, что Вы предлагаете запускать процедуры из модуля, не привязываясь к элементам формы.
+ – Ответить
9. tango 546 24.08.10 11:37 Сейчас в теме
1. отмаза про перестраховку не катит: ФормаДокПоступления.Закрыть();
ФормаДокПоступления = Неопределено;
2. почему нельзя просто вызвать "ПриАктивизацииСтроки"? не экспорт? но наверняка в ней самой ничего такого нет, она (наверняк) просто вызывает что-то экспортное
+ – Ответить
10. vers139 53 24.08.10 11:56 Сейчас в теме
(9) 1. программер до строк "ФормаДокПоступления.Закрыть(); ФормаДокПоступления = Неопределено;" может ещё выполнять какие-то действия с формой.
2. Не понял суть вопроса. Как просто вызов процедуры ПриАктивизацииСтроки табличного поля может вызвать выполнение процедуры ПриИзменении элемента управления в ячейке
+ – Ответить
11. tango 546 24.08.10 12:07 Сейчас в теме
ну, что там внутри ПриИзменении вызвать..
+ – Ответить
12. vers139 53 24.08.10 12:46 Сейчас в теме
(11) ПриИзменении в табличную часть заносится единица измерения номенклатуры, пересчитываются всего и итого по таблице. Это из того, что я точно знаю.
+ – Ответить
14. PRoman 73 30.08.10 11:38 Сейчас в теме
(11) Этот алгоритм какое-то извращение.
Правильно делать как написал tango
+ –1 Ответить
13. Valerich 1637 26.08.10 11:14 Сейчас в теме
странно. поставил плюс - никакой реакции. обновил страницу - нет моего плюса. Давлю снова на плюс - вы уже голосовали :(
+ – Ответить
17. rbw 19.08.15 06:26 Сейчас в теме
Спасибо большое. Мне помогло данное решение.
+ – Ответить
Оставьте свое сообщение