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

23.08.10

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

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

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

 

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

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

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

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

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

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

Вступайте в нашу телеграмм-группу Инфостарт

+32 –1

Вы можете заказать платную адаптацию этой статьи под ваши задачи на «Бирже заказов».

  • 0% комиссии — оплата напрямую исполнителю;
  • Исполнители любого масштаба — от отдельных специалистов до команд под проект;
  • Прямой обмен контактами между заказчиком и исполнителем;
  • Безопасная сделка — при необходимости;
  • Рейтинги, кейсы и прозрачная система откликов.

См. также

Заполнение формул в файлах Excel (кроссплатформенное решение)

Загрузка и выгрузка в Excel Универсальные функции Программист 1С:Предприятие 8 Россия Бесплатно (free)

Описанный ниже подход позволяет в три шага заполнять формулы в Excel файлы, вне зависимости от ОС сервера (MS Windows Server или Linux). Подход подразумевает отказ от работы с COM-объектом в пользу работы через "объектную модель документа" (DOM).

30.10.2025    4981    Abysswalker    11    

47
Отключение уведомления "Расширение конфигурации неактивно"

Универсальные функции Работа с интерфейсом Программист 1С:Предприятие 8 Бесплатно (free)

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

14.05.2025    9309    DeerCven    15    

63
В помощь разработчику: преобразование табличного документа в запрос

Инструментарий разработчика Универсальные функции Запросы Программист 1С:Предприятие 8 1C:Бухгалтерия 1С:Бухгалтерия 3.0 1С:Зарплата и Управление Персоналом 3.x Бесплатно (free)

Внешняя обработка для создания запроса на основании табличных данных.

22.07.2024    10757    261    ixijixi    10    

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

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

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

21.05.2024    58965    dimanich70    85    

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

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

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

1 стартмани

18.03.2024    8229    7    John_d    13    

59
GUID в 1С 8.3

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

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

12.02.2024    73982    atdonya    31    

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

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

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

30.11.2023    10225    ke.92@mail.ru    17    

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

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

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

15.09.2023    47393    YA_418728146    16    

131
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. cool.clo 23.08.10 18:12 Сейчас в теме
Может я ошибаюсь...но...у меня была чем-то похожая задача (надо было несколько колонок сразу менять) и незначительно доработал в типовой ИзменениеСтрокиПрограммное
А затем просто вызывал процедуру
+ – Ответить
2. vers139 53 23.08.10 18:16 Сейчас в теме
(1) но для этого надо изменять конфигурацию. Хотя бы просто для того, чтобы экспортировать процедуру ПриИзменении. Данный способ позволяет этого не делать.
+ – Ответить
3. tormozit 7377 23.08.10 23:44 Сейчас в теме
Я уже писал здесь, но мой пост куда то делся (удалили?)
Попробую снова.
Более универсальным решением для имитации интерактивного изменения значения в поле ввода является мой способ http://infostart.ru/public/16985/
+ – Ответить
4. Abadonna 3977 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 551 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 551 24.08.10 11:37 Сейчас в теме
1. отмаза про перестраховку не катит: ФормаДокПоступления.Закрыть();
ФормаДокПоступления = Неопределено;
2. почему нельзя просто вызвать "ПриАктивизацииСтроки"? не экспорт? но наверняка в ней самой ничего такого нет, она (наверняк) просто вызывает что-то экспортное
+ – Ответить
10. vers139 53 24.08.10 11:56 Сейчас в теме
(9) 1. программер до строк "ФормаДокПоступления.Закрыть(); ФормаДокПоступления = Неопределено;" может ещё выполнять какие-то действия с формой.
2. Не понял суть вопроса. Как просто вызов процедуры ПриАктивизацииСтроки табличного поля может вызвать выполнение процедуры ПриИзменении элемента управления в ячейке
+ – Ответить
11. tango 551 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 1638 26.08.10 11:14 Сейчас в теме
странно. поставил плюс - никакой реакции. обновил страницу - нет моего плюса. Давлю снова на плюс - вы уже голосовали :(
+ – Ответить
17. rbw 19.08.15 06:26 Сейчас в теме
Спасибо большое. Мне помогло данное решение.
+ – Ответить
Для отправки сообщения требуется регистрация/авторизация