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

0. 6189 22.07.19 17:49 Сейчас в теме
Часто не хватает визуализации хронологии документов в структуре подчиненности и кнопок проведения. Это расширение конфигурации, с функционалом структуры подчиненности документов, отображающее хронологическую последовательность документов во времени и дающее доступ к проведению, отмене проведения, пометке на удаление документов непосредственно в форме подчиненности.

Перейти к публикации

Комментарии
В избранное Подписаться на ответы Сортировка: Древо развёрнутое
Свернуть все
1. insurgut 206 23.07.19 12:09 Сейчас в теме
Если эта штука ещё из журнала регистрации выводила бы когда документы изменялись/перепроводились - было бы вообще круто :)
sapervodichka; +1 Ответить
2. KazanKokos 9 23.07.19 12:43 Сейчас в теме
(1) анрил. ЖР тормоз и быстрая выборка в ней невозможна. Необходимо отдельный регистр заводить по операциям над документами, ну или где-то видел готовые механизмы типа нетипового ЖР на регистрах. Контроль версий опять таки можно включить то он вроде быстрый и его еще можно использовать.
sapervodichka; +1 Ответить
3. shard 271 24.07.19 15:36 Сейчас в теме
(1) ковырнул в этом направлении с применением данных регистра версий объектов (естественно, версионирование должно быть включено). Вот что получилось:

история версий ведется по заказам и реализациям, по счф не ведется. Заказ 19854 проводился в 10, 15-17 числах, реализация 10877 проводилась 15го числа, была распроведена 17го. счф 11123 от 15го числа висит непроведенной. Проверял на УТ 11.4.8.84.
По изменениям документов считаю нецелесообразным собирать инфу в структуре подчиненности.

Для этого необходимо изменить процедуру Расш1_ДобавитьДокументВТаблицу на
&НаСервере
Процедура Расш1_ДобавитьДокументВТаблицу(_Документ, _ТаблицаДокументов)
	
	запрос=новый запрос("ВЫБРАТЬ
		|	НАЧАЛОПЕРИОДА(ВерсииОбъектов.ДатаВерсии, ДЕНЬ) КАК ДеньВерсии,
		|	ВерсииОбъектов.ДатаВерсии КАК ДатаВерсии,
		|	ВерсииОбъектов.НомерВерсии КАК НомерВерсии
		|ПОМЕСТИТЬ ВТ
		|ИЗ
		|	РегистрСведений.ВерсииОбъектов КАК ВерсииОбъектов
		|ГДЕ
		|	ВерсииОбъектов.Объект = &Объект
		|;
		|
		|////////////////////////////////////////////////////////////­////////////////////
		|ВЫБРАТЬ
		|	ВТ.ДеньВерсии КАК ДеньВерсии,
		|	МАКСИМУМ(ВТ.ДатаВерсии) КАК ДатаВерсии
		|ПОМЕСТИТЬ ВТ1
		|ИЗ
		|	ВТ КАК ВТ
		|
		|СГРУППИРОВАТЬ ПО
		|	ВТ.ДеньВерсии
		|;
		|
		|////////////////////////////////////////////////////////////­////////////////////
		|ВЫБРАТЬ
		|	ВТ1.ДеньВерсии КАК ДеньВерсии,
		|	ВТ1.ДатаВерсии КАК ДатаВерсии,
		|	МАКСИМУМ(ВТ1.НомерВерсии) КАК НомерВерсии
		|ИЗ
		|	ВТ1 КАК ВТ
		|		ЛЕВОЕ СОЕДИНЕНИЕ ВТ КАК ВТ1
		|		ПО ВТ.ДатаВерсии = ВТ1.ДатаВерсии
		|
		|СГРУППИРОВАТЬ ПО
		|	ВТ1.ДеньВерсии,
		|	ВТ1.ДатаВерсии
		|");
	запрос.УстановитьПараметр("Объект",_Документ);
	выборкаСостояний=запрос.Выполнить().выбрать();
	пока выборкаСостояний.Следующий() цикл
		тзРеквизитов=ВерсионированиеОбъектов.РазборВерсии(_Документ, выборкаСостояний.НомерВерсии).Реквизиты;
		НовСтр_ТаблицаДокументов = _ТаблицаДокументов.Добавить();
		НовСтр_ТаблицаДокументов.Документ = _Документ;
		НовСтр_ТаблицаДокументов.Дата = выборкаСостояний.ДеньВерсии;
		
		строчка=тзРеквизитов.найти("DeletionMark","НаименованиеРеквизита");
		если строчка<>Неопределено тогда
			НовСтр_ТаблицаДокументов.ПометкаУдаления=строчка.ЗначениеРеквизита;
		КонецЕсли;		
		строчка=тзРеквизитов.найти("Posted","НаименованиеРеквизита");
		если строчка<>Неопределено тогда
			НовСтр_ТаблицаДокументов.Проведен=строчка.ЗначениеРеквизита;
		КонецЕсли;		
	КонецЦикла;
	
	Попытка 
		_Реквизиты = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(_Документ, "Дата, Проведен, ПометкаУдаления");
	Исключение
		Возврат;
	КонецПопытки;
	
	Если _ТаблицаДокументов.Найти(_Документ, "Документ") = Неопределено Тогда
		НовСтр_ТаблицаДокументов = _ТаблицаДокументов.Добавить();
		ЗаполнитьЗначенияСвойств(НовСтр_ТаблицаДокументов, _Реквизиты);
		НовСтр_ТаблицаДокументов.Документ = _Документ;
	КонецЕсли;
	
КонецПроцедуры
Показать
aleksey2; molodoi1sneg; +2 Ответить
4. blindcat2006 76 28.07.19 18:09 Сейчас в теме
Шикарная штука, "+" поставил.
Из маленьких "придеризмов" - а можно в диаграме выделить как-то документ по которому построилось дерево? (жирным шрифтом например , как и в самом отчете)
5. gull22 88 30.07.19 14:29 Сейчас в теме
Программа ЕРП. В настройках расширения поставил единицу времени ЧАС. Рассчитывал увидеть начало диаграммы для документа в момент его создания (поле = Дата). Увы, прорисовывается на весь день. Можно учитывать на диаграмме время создания документа при выборе единицы времени меньше дня. Логично, что конец диаграммы для документа - это конец дня создания.
6. sapervodichka 6189 30.07.19 14:54 Сейчас в теме
(5) с практической точки зрения зачем это нужно?
7. gull22 88 31.07.19 09:34 Сейчас в теме
Пока простое любопытство.
Но возникает встречный вопрос: зачем в настройках нужны единицы времени менее дня, если в диаграмме все равно прорисовывается день целиком?
8. sapervodichka 6189 31.07.19 09:46 Сейчас в теме
(7) это штатная опция диаграммы ганта, её здесь можно не использовать, т.к. у меня минимальный интервал день заложен в коде. Сделано из-за масштаба, когда документы разбегаются на длительные промежутки, чтобы были видны интервалы в диаграмме
9. gull22 88 31.07.19 09:55 Сейчас в теме
(8)
Тогда чисто теоретический вопрос: а можно выводить в диаграмме начало документа, учитывая час создания?
10. sapervodichka 6189 31.07.19 09:56 Сейчас в теме
(9) да, вместо интервала в коде нач и кон дня, можно сделать нач и кон часа от даты документа.
11. 7OH 67 31.07.19 11:18 Сейчас в теме
А зачем вызов методов через Выполнить сделали ?
12. sapervodichka 6189 31.07.19 11:30 Сейчас в теме
(11) часть вызовов сделана с вилками вариантов через Выполнить("...") для адаптации к конфигурациям, в том числе к Бухгалтерии предприятия, где форма структуры подчиненности с другими реквизитами.
Прикрепленные файлы:
13. 7OH 67 31.07.19 11:31 Сейчас в теме
(12) а попытка исключения с обычным кодом не сработает разве также ?
14. ivan_luzinov 37 05.08.19 15:02 Сейчас в теме
Офигенская штука! Спасибо!
15. tsatsur 36 12.08.19 08:41 Сейчас в теме
Отличное расширение. Забрал и немного переделал (сделал программное добавление на форму команд и кнопок, чтобы смело переживало обновления формы:). Спасибо.
16. user1166203 07.11.19 10:45 Сейчас в теме
А нет расширения с возможностью сворачивать структуру подчиненности по группировкам?
17. Award 27.12.19 16:16 Сейчас в теме
Добрый день,

Платформа: 1С:Предприятие 8.3 (8.3.16.1063)
Конфигурация: Бухгалтерия предприятия, редакция 3.0 (3.0.75.37)

Расширение не функционирует, т.к. из списка общих форм разработчики 1С убрали форму СтруктураПодчиненности. Теперь она называется СвязанныеДокументы. Если есть возможность, исправьте пожалуйста.
Natalia29; sapervodichka; +2 Ответить
18. sapervodichka 6189 28.12.19 19:27 Сейчас в теме
(17) спасибо, добавил отдельную ссылку с изменениями для новой Бухгалтерии. Если лично вам нужна новая версия для Бухгалтерии, напишите в личку.
19. Award 29.12.19 17:40 Сейчас в теме
(18) Спасибо. Мне не нужно, сам поправил. Расширение достойное, используем.
20. toybox 22.09.20 20:33 Сейчас в теме
Добрый день! Не устанавливается расширение с ошибкой: Значение контролируемого свойства РежимСовместимости у объекта не совпадает со значением в расширяемой конфигурации. Используем УТ 11.4
21. sapervodichka 6189 22.09.20 21:04 Сейчас в теме
(20) посмотрите в публикации снизу инструкция в ПРИЛОЖЕНИЕ 2
22. RC900 08.04.21 08:57 Сейчас в теме
Не работает на Управление торговлей, редакция 11 (11.4.13.123) Можете поправить?
Прикрепленные файлы:
23. tri77 28.04.21 16:47 Сейчас в теме
Добрый день для
Бухгалтерия предприятия, редакция 3.0 (3.0.90.45) подойдет ваша обработка или в ней дописывать нужно?

Ювелирный торговый дом, редакция 10.7 (10.7.1.12) для такой 1С подойдет?
24. sapervodichka 6189 28.04.21 20:42 Сейчас в теме
(23) Для БП 3.0 подойдет, с ЮвДом не знаком не могу ответить.
25. tri77 28.04.21 22:51 Сейчас в теме
По БП понял, спасибо

Ювелирный торговый дом, редакция 10.7 (10.7.1.12) - это УТ 11 на управляемых формах по структуре где-то 2011 г.
26. sapervodichka 6189 29.04.21 07:59 Сейчас в теме
27. tri77 29.04.21 09:26 Сейчас в теме
Добрый день,
Уточните если документ был введен 01-02-2021 г.
проведен 03-02-2021 г.
изменен 05-02-2021 г.
проведен 07-20-2021 г.
изменен 15-02-2021г.
перепроведен 20-02-2021 г.
Ваша обработка покажет все эту историю хронологии?
Будет видно по учетной записи кто это делал?
28. sapervodichka 6189 29.04.21 10:02 Сейчас в теме
(27) это показывается в Истории версий объекта, для этого используется механизм Версионирования (погуглите как включить), но не Структуры подчиненности с хронологией - это связанные документы, расположенные по хронологии, а не история изменения документа.
29. tri77 29.04.21 11:29 Сейчас в теме
Спасибо понял. я про разные измерения спрашивал Хронология и Версионирование.
30. Natalia29 13.04.22 15:12 Сейчас в теме
Добрый день!
Не работает на 1С:ERP Управление предприятием 2 (2.5.7.255), даже не дает сохранить расширение
Не найден объект ОбщаяФорма.СтруктураПодчиненности
31. sapervodichka 6189 13.04.22 15:31 Сейчас в теме
(30) И не будет работать без переделки, т.к. ЕРП 2.5.7 значительно от ЕРП 2.4.8 отличается, а доработка выполнялась для ЕРП 2.4.8.
О чем в статье написано в блоке проверки:

====================================
Проверялось расширение на демо базах 1С:

1С:ERP Управление предприятием 2 (2.4.8.84)
1С:Комплексная автоматизация 2 (2.4.6.189)
1С:Управление торговлей, редакция 11 (11.4.8.84)
1C:Бухгалтерия предприятия, редакция 3.0 (3.0.38.35)
=====================================
32. Natalia29 13.04.22 15:33 Сейчас в теме
Понятно, проверила и в Бухгалтерии 3.0.110.24 - тоже не работает
33. Natalia29 13.04.22 16:10 Сейчас в теме
Переделала, благодаря комментаторам выше, теперь все работает, спасибо за хорошую идею
17. Award 27.12.19 16:16

Расширение не функционирует, т.к. из списка общих форм разработчики 1С убрали форму СтруктураПодчиненности. Теперь она называется СвязанныеДокументы.
sapervodichka; +1 Ответить
34. sapervodichka 6189 13.04.22 16:26 Сейчас в теме
(33) вы молодец (надо бы и мне перевыложить актуальную)
35. Natalia29 13.04.22 16:53 Сейчас в теме
Спасибо Вам, а я только учусь
36. user1673353 14.12.22 13:20 Сейчас в теме
Добрый день! Подскажите, пожалуйста, в 1с УТ 11.4/11.5 будут ли отображаться задания и задачи привязанные к Заказу и/или реализации?
37. sapervodichka 6189 14.12.22 13:30 Сейчас в теме
(36) будут, если они используются в критерии отбора СвязанныеДокументы (сама обработка скорее всего устарела и придется адаптировать под релиз)
Оставьте свое сообщение
Вакансии
Архитектор 1С
Новосибирск
зарплата от 300 000 руб. до 300 000 руб.
Полный день

Ведущий программист 1С/удаленно
Красноярск
зарплата от 160 000 руб. до 180 000 руб.
Полный день

Программист 1С
Иркутск
зарплата от 120 000 руб. до 160 000 руб.
Полный день

Аналитик 1С
Москва
зарплата от 110 000 руб. до 130 000 руб.
Полный день

1С разработчик
Москва
зарплата от 150 000 руб. до 200 000 руб.
Полный день