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

10.10.23

В табличных частях с большим количеством позиций, для того чтобы новую строку поместить в конкретное место таблицы, приходится долго нажимать штатную кнопку сдвига строки (вверх или вниз). Следующий код позволит конкретно указать номер строки, в который необходимо поместить выделенную строку табличной части. Выполнил асинхронным методом. Работает во всех конфигурациях на управляемых формах. В данном примере выполнял в конфигурации УТ 11.4

На форме любого документа в управляемых формах создаем команду и помещаем ее на форму. В моем случае я сделал в расширении.

Команда у меня называется "ПереместитьСтроку". Она ссылается на клиентскую процедуру Расш1_ПереместитьСтрокуПосле()

В модуле формы будет всего три процедуры:

Асинхронно задаем вопрос, на какую позицию переместить выделенную строку и выполняем команду

&НаКлиенте
Процедура Расш1_ПереместитьСтрокуПосле(Команда)
    
    ТекущаяСтрока = Элементы.Товары.ТекущиеДанные;
    
    НовыйНомерСтроки = ТекущаяСтрока.НомерСтроки;
    
    Оповещение = Новый ОписаниеОповещения("ПереместитьСтрокуЗавершение", ЭтотОбъект);
    ПоказатьВводЧисла(Оповещение, НовыйНомерСтроки,"Укажите новый номер строки:", 15);
    
КонецПроцедуры    

&НаКлиенте
Процедура ПереместитьСтрокуЗавершение(НовыйНомерСтроки, ДополнительныеПараметры) Экспорт

    Если НовыйНомерСтроки = Неопределено Тогда
         Возврат;
    КонецЕсли;  
    
    ТекущаяСтрока = Элементы.Товары.ТекущиеДанные;
    ТекНомерСтроки = ТекущаяСтрока.НомерСтроки;
    ПереместитьСтрокуНаСервере(ТекНомерСтроки, НовыйНомерСтроки);

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

&НаСервере
Процедура ПереместитьСтрокуНаСервере(ТекНомерСтроки, НовыйНомер)  
    
    
    Если НовыйНомер > ТекНомерСтроки Тогда
        Дельта = НовыйНомер - ТекНомерСтроки;
        Объект.Товары.Сдвинуть(ТекНомерСтроки-1, Дельта);
    ИначеЕсли ТекНомерСтроки > НовыйНомер Тогда   
        Дельта = ТекНомерСтроки - НовыйНомер;
        Объект.Товары.Сдвинуть(ТекНомерСтроки-1, -Дельта);
    КонецЕсли;

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

Конфигурация сдвиг строки

+4 –

См. также

Богатый редактор картинок 1С, хранимых в базе, с возможностью РИСОВАНИЯ. Редактор внешних файлов картинок. Объект, расширяющий возможности работы с картинками из встроенного языка (Три в одном) + Обработка «Стандартизация картинок»

Работа с интерфейсом Рабочее место Платформа 1С v8.3 Управляемые формы Конфигурации 1cv8 Платные (руб)

Богатый редактор картинок 1С предназначен для обработки изображений в режиме «Предприятие», с возможностью РИСОВАТЬ на них. Поддерживается работа как в обычных формах (толстый клиент) так и на управляемых формах (тонкий клиент). Обработка позволяет редактировать как картинки, хранимые в базе, так и графические файлы с диска на файловой системе. Помимо базовых функций (изменение размеров, преобразование формата, обрезание картинки, повороты и т.п.) – редактор имеет богатый набор инструментов для рисования. Доступна функция вставки изображения из буфера обмена. Объект может быть использован: на стороне клиента, на стороне сервера, из внешнего соединения. Обработка будет особенно полезна тем, кто вносит картинки в базу (изображения номенклатуры, фотографии физических лиц и т.п.). Функционал реализуется с использованием JavaScript и бесплатного ПО ImageMagick (без использования внешних компонент).

6000 руб.

16.01.2015 62983 44 59

Управление дашбордами

Работа с интерфейсом Программист Платформа 1С v8.3 Конфигурации 1cv8 1С:ERP Управление предприятием 2 Платные (руб)

Обработка предназначена для создания и управления дашбордами.

2400 руб.

29.06.2020 18847 26 6

Настройки управляемых форм (списков, объектов), заполнение реквизитов по условиям, контроль заполнения, доступ [Расширение]

Работа с интерфейсом Платформа 1С v8.3 Управляемые формы 1С:Управление торговлей 11 Россия Платные (руб)

Настройки упр.форм (списков, объектов), заполнение реквизитов по условиям, контроль заполнения, условное оформление, доступ.

2000 руб.

20.02.2018 20583 24 21

Редактор графов в 1С

Работа с интерфейсом Программист Платформа 1С v8.3 Управляемые формы Конфигурации 1cv8 Россия Платные (руб)

Редактор графов в 1С - внешний отчет, который формирует графы на основе таблицы значений, используя рисунки табличного документа. Есть возможность добавления, редактирования объектов графа и выгрузки результата в таблицу значений.

1500 руб.

06.10.2020 10220 7 7

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

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

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

28.08.2023 14722 YA_418728146 7

166

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

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

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

2 стартмани

22.08.2023 3571 56 progmaster 8

Модель состояния для MVC

Работа с интерфейсом Программист Платформа 1С v8.3 Конфигурации 1cv8 Абонемент ($m)

"MVC плохо применима в 1С" - познакомьтесь с моделью состояния и, возможно, ваше мнение поменяется! Представленное решение является эволюционным развитием идеи реализации MVC для 1С. В новой версии добавлены DSL для описания модели состояния, а также параметризация свойств параметров и элементов формы.

1 стартмани

05.07.2022 5739 kalyaka 6

Табло очереди заказов на экран телевизора

WEB-интеграция Работа с интерфейсом Пользователь Платформа 1С v8.3 1С:Розница 2 Платные (руб)

Связка из веб-приложения и расширения для 1С: Розница 2.3.

3600 руб.

29.04.2022 13949 2 10

Комментарии

Подписаться на ответы Инфостарт бот

Свернуть все

1. dhurricane 10.10.23 14:13 Сейчас в теме

1. Зачем для сдвига вызывать сервер? Метод сдвига доступен и на клиенте.
2. Код метода "ПереместитьСтрокуНаСервере" можно упростить:

    Если НовыйНомер <> ТекНомерСтроки Тогда
        Дельта = НовыйНомер - ТекНомерСтроки;
        Объект.Товары.Сдвинуть(ТекНомерСтроки-1, Дельта);
    КонецЕсли;

2. Sashares 35 12.10.23 11:33 Сейчас в теме

Асинхронно задаем вопрос

Может тогда и использовать новые фишки Асинх?
Тогда все в одной процедуре можно сделать.
Конечно не для УТ 11.4, но для остальных конфигураций, где подняли режим совместимости вполне пойдет.

&НаКлиенте
Асинх Процедура Расш1_ПереместитьСтрокуПосле(Команда)
    
    ТекущаяСтрока = Элементы.Товары.ТекущиеДанные;
    
    НовыйНомерСтроки = ТекущаяСтрока.НомерСтроки;
    
    НовыйНомерСтроки = Ждать ВвестиЧислоАсинх( НовыйНомерСтроки,"Укажите новый номер строки:", 15)
    
    //и далее стандартный код
    
КонецПроцедуры

Показать