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

Заполнение ТЧ документа на БСП 3.0

Автор 3030, 14 ноя 2018, 12:59

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

3030

Добрый день!
Обновил ЗУП базовую, вместе с ней обновилась и БСП на 3.0. Была внешняя обработка по заполнению табличной части, она сбежала в менюшку "ещё". Через изменить внешний вид формы я её вытащил обратно, но у меня вопрос: как бы её пришпилить навечно, а то не дело, если при каждом обновлении кнопка будет бегать по всей форме.

Модуль дополнительной обработки:

Функция СведенияОВнешнейОбработке() Экспорт

    Назначения = Новый Массив;
    Назначения.Добавить("Документ.ТабельУчетаРабочегоВремени");

    ПараметрыРегистрации = Новый Структура;
    ПараметрыРегистрации.Вставить("Вид", "ЗаполнениеОбъекта");
    ПараметрыРегистрации.Вставить("Назначение", Назначения);
    ПараметрыРегистрации.Вставить("Наименование", "Пере пере пере Заполнить документ");
    ПараметрыРегистрации.Вставить("Версия", "1.0");
    ПараметрыРегистрации.Вставить("БезопасныйРежим", Истина);
    ПараметрыРегистрации.Вставить("Информация", "Дополнительная обработка табличной части к документу табеля");

    Команды = ПолучитьТаблицуКоманд();
ДобавитьКоманду(Команды, "Заполнить документ", "Заполнить документ", "ВызовКлиентскогоМетода", Ложь);

    ПараметрыРегистрации.Вставить("Команды", Команды);

    Возврат ПараметрыРегистрации;
КонецФункции

Функция ПолучитьТаблицуКоманд()

    Команды = Новый ТаблицаЗначений;
    Команды.Колонки.Добавить("Представление", Новый ОписаниеТипов("Строка"));
    Команды.Колонки.Добавить("Идентификатор", Новый ОписаниеТипов("Строка"));
    Команды.Колонки.Добавить("Использование", Новый ОписаниеТипов("Строка"));
    Команды.Колонки.Добавить("ПоказыватьОповещение", Новый ОписаниеТипов("Булево"));
    Команды.Колонки.Добавить("Модификатор", Новый ОписаниеТипов("Строка"));
    Возврат Команды;

КонецФункции

Процедура ДобавитьКоманду(ТаблицаКоманд, Представление, Идентификатор, Использование, ПоказыватьОповещение = Ложь, Модификатор = "")

    НоваяКоманда = ТаблицаКоманд.Добавить();
    НоваяКоманда.Представление = Представление;
    НоваяКоманда.Идентификатор = Идентификатор;
    НоваяКоманда.Использование = Использование;
    НоваяКоманда.ПоказыватьОповещение = ПоказыватьОповещение;
    НоваяКоманда.Модификатор = Модификатор;

КонецПроцедуры

Теги: ЗУП БСП 

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

Рейтинг@Mail.ru

Поиск