1С 7.7 Редактирование реквизита документа из строки журнала документов
Здравствуйте! Стоит задача упростить работу пользователей и чтобы им не заходить в документ, а менять реквизит нажатием мыши в ячейке журнала документов. Не могу найти возможно ли вообще такое сделать. Можно сделать через всякие кнопочки дополнительные, но может есть вариант просто щелчком мыши. НЕ хочется загромождать журнал кучей кнопок.
По теме из базы знаний
- Rocket Launcher 7.7. Свертка базы 1С 7.7. Перенос справочников и документов 7.7
- Книга доходов и расходов и кассовая книга для 1С 7.7 любой конфигурации для предприятий на УСН, ПСН, ЕСХН
- Журнал универсальный 7.7 для специалиста 1С
- Загрузка банковской выписки для 1С 7.7 любой конфигурации
- Переход с 1С:УПП на 1C:ERP: Задача переноса печатных форм в сжатые сроки. Конструктор печати
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(1) Добрый день. Нет, без дополнительных ухищрений такое нельзя сделать (в 7-ке). Если только делать через табличный документ. Но появится проблема с обновлением формы. А так - если уж очень хочется, то можно через внешний API коннектиться к базе и визуализировать журнал во внешней программе (не 1С) и там уже реализовать все что Вашей душе угодно.
Процедура ПриВыбореСтроки()
Если Форма.ТекущаяКолонка() = "ИмяКолонкиРеквизита" Тогда
зн = ТекущийДокумент.ИмяРеквизита;
Если ВвестиЗначение(зн,,"Справочник.ТипРеквизита") = 1 Тогда
об = СоздатьОбъект("Документ.ВидДокумента");
об.НайтиДокумент(ТекущийДокумент);
об.ИмяРеквизита = зн.ТекущийЭлемент();
об.Записать();
КонецЕсли;
Иначе
ОткрытьФорму(ТекущийДокумент);
КонецЕсли;
КонецПроцедуры
Форма.ОбработкаВыбораСтроки(1);
Показать
(6)Процедура ПриВыбореСтроки()
Если Форма.ТекущаяКолонка() = "Название колонки в журнале" Тогда
об = СоздатьОбъект("Документ.НеобходимыйДокумент");
об.НайтиДокумент(ТекущийДокумент);
Если об.НеобходимыйРеквизитДокумента=1 Тогда
об.НеобходимыйРеквизитДокумента=0;
иначе об.НеобходимыйРеквизитДокумента=1;
КонецЕсли;
об.Записать();
Иначе
ОткрытьФорму(ТекущийДокумент);
КонецЕсли;
КонецПроцедуры
Форма.ОбработкаВыбораСтроки(1);
Если Форма.ТекущаяКолонка() = "Название колонки в журнале" Тогда
об = СоздатьОбъект("Документ.НеобходимыйДокумент");
об.НайтиДокумент(ТекущийДокумент);
Если об.НеобходимыйРеквизитДокумента=1 Тогда
об.НеобходимыйРеквизитДокумента=0;
иначе об.НеобходимыйРеквизитДокумента=1;
КонецЕсли;
об.Записать();
Иначе
ОткрытьФорму(ТекущийДокумент);
КонецЕсли;
КонецПроцедуры
Форма.ОбработкаВыбораСтроки(1);
Если вам достаточно такого редактирования, может вы зря используете документы?
1. Может переделать все на справочник?
2. Может тут будет уместен не журнал, а некий интерфейс пользователя на обнове таблицы значений, табличного поля, таблицы в ражиме ввода данных итд.
3. Для редактирования реквизитов можно использовать отдельную облегченную обработку, открываемую модально по кнопке
4. Можно перехватить правую кнопку мыша и навесить своё меню
1. Может переделать все на справочник?
2. Может тут будет уместен не журнал, а некий интерфейс пользователя на обнове таблицы значений, табличного поля, таблицы в ражиме ввода данных итд.
3. Для редактирования реквизитов можно использовать отдельную облегченную обработку, открываемую модально по кнопке
4. Можно перехватить правую кнопку мыша и навесить своё меню
Внимание! Тема сдана в архив
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот