Можно ли скрыть помеченные на удаление объекты номенклатуры?
По теме из базы знаний
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(2) shomo, Иногда поиск нужно вести по всему справочнику (по коду или наименованию) так как группы не помнишь.
В дополнение к отдельной папке еще добавляю "я_" к коду и/или наименованию спереди. Все падает на дно списка и не мешает нормальному выбору.
Извиняюсь, мой "велосипед" уже был предложен:)
В дополнение к отдельной папке еще добавляю "я_" к коду и/или наименованию спереди. Все падает на дно списка и не мешает нормальному выбору.
Извиняюсь, мой "велосипед" уже был предложен:)
(14) shomo, Немного геморройно так будет. Само формирование списка будет занимать достаточно много времени, а проблема еще в том что там у них тормозит все. Я бы это делал тогда через СохранитьЗначение() некой переменной, которая бы заполнялась при старте системы 1 раз и обновлялась(перезаписывалась) при удалении/добавлении элементов справочника. Тогда на формирование списка будет потрачено время только один раз и все в дальнейшем будет работать быстро через ВосстановитьЗначение() этого списка и установку его в форме.
Но (11) - это тоже достаточно быстро и не нужно писать процедуры заполнения и обновления списка. Так что пусть уж автор сабжа выбирает или поэксперементирует двумя способами.
Но (11) - это тоже достаточно быстро и не нужно писать процедуры заполнения и обновления списка. Так что пусть уж автор сабжа выбирает или поэксперементирует двумя способами.
Соглашусь с shomo, создать папку и переместить туда. Смысл поиска без группировки по группам, там весь список вывалится, и помеченные и с я. А остальное все разложить по группам. Можно "Быстрый поиск .." реализовать, на данном сайте вопрос уже решался.
В справочник добавь новый реквизит "Актуален", в свойствах установи флажок "Отбор по реквизиту"
Приоткрытии() добавь
Потом в помеченных на удаление поставь Перечисление НЕТ, а в не по меченых "ДА"
Приоткрытии() добавь
УстановитьОтбор("Актуален",Перечисление.ДаНет.Да);
Сортировка("Наименование",1);
Потом в помеченных на удаление поставь Перечисление НЕТ, а в не по меченых "ДА"
Как я понимаю, надо чтобы в поиске номенклатуры по подстроке наименования не выбирались элементы, помеченные на удаление? Смотрим обработку, которая занимается поиском. У меня это "Обработка.ВыборИзСправочникаПоПодстроке". Находим там процедурку "ПоискПоПодстроке", исправляем текст запроса таким вот образом:
Теперь помеченные на удаление не попадают в список выбора.
По-хорошему, надо бы сделать галочку "Включать помеченные на удаление" на форме поиска и текст запроса несколько подправить:
ТекстЗапроса ="
|ТекущийЭлемент = Справочник.*.ТекущийЭлемент;" +
РеквизитПоиска + " = Справочник.*." + РеквизитПоиска + ";
|Группировка ТекущийЭлемент Без Упорядочивания Без Групп;
|Условие(Найти(ВРег(" + РеквизитПоиска + "),ВРег(ПодСтрокаПоиска))>0);
|Условие(ТекущийЭлемент.ПометкаУдаления() = 0);
|Без итогов;";
Теперь помеченные на удаление не попадают в список выбора.
По-хорошему, надо бы сделать галочку "Включать помеченные на удаление" на форме поиска и текст запроса несколько подправить:
ТекстЗапроса ="
|ТекущийЭлемент = Справочник.*.ТекущийЭлемент;" +
РеквизитПоиска + " = Справочник.*." + РеквизитПоиска + ";
|Группировка ТекущийЭлемент Без Упорядочивания Без Групп;
|Условие(Найти(ВРег(" + РеквизитПоиска + "),ВРег(ПодСтрокаПоиска))>0); ";
Если ПустоеЗначение(ВключатьПомеченныеНаУдаление) = 1 Тогда
ТекстЗапроса = ТекстЗапроса + "
|Условие(ТекущийЭлемент.ПометкаУдаления() = 0);";
КонецЕсли;
ТекстЗапроса = ТекстЗапроса + "
|Без итогов;";
Показать
Самый красивый вариант = самый сложный.
Перенести все в новую базу.(Итоги, справочники, ...). Я переносил тмц по которым был оборот последние 6 месяев.
Сразу скажу задача не очень простая, но очень полезная.
Требует адекватного главного бухгалтера и вашего с гл.бухом времени.
Перенести все в новую базу.(Итоги, справочники, ...). Я переносил тмц по которым был оборот последние 6 месяев.
Сразу скажу задача не очень простая, но очень полезная.
Требует адекватного главного бухгалтера и вашего с гл.бухом времени.
Есть типовые обработки по загрузке-выгрузке справочников и документов.
После переноса метите на удаление все элементы справочника ТМЦ и вас удалится весь старый товар (по которому нет остатков и кот. не использовался в документах). Какой период документов переносить можете решить только Вы исходя из специфики предприятия (3мес, 6мес, год).
Самое забавное это сальдо. Поэтому его желательно брать на тот период который уже закрыт.
Вам придется потренироваться для начала, а потом потратить выходные на перенос.
Переносить или нет решать Вам. Решающую роль в этом вопросе играет размер базы и скорость ее работы.
При этом я бы воспользовался советом старый товар забрасывать в отдельную папку. (проще смотреть есть ли висяки на складе). Одним словом вариантов было предложено достаточно. Выбор за Вами! ))
После переноса метите на удаление все элементы справочника ТМЦ и вас удалится весь старый товар (по которому нет остатков и кот. не использовался в документах). Какой период документов переносить можете решить только Вы исходя из специфики предприятия (3мес, 6мес, год).
Самое забавное это сальдо. Поэтому его желательно брать на тот период который уже закрыт.
Вам придется потренироваться для начала, а потом потратить выходные на перенос.
Переносить или нет решать Вам. Решающую роль в этом вопросе играет размер базы и скорость ее работы.
При этом я бы воспользовался советом старый товар забрасывать в отдельную папку. (проще смотреть есть ли висяки на складе). Одним словом вариантов было предложено достаточно. Выбор за Вами! ))
можно в форме выбора/списка (где надо исключить помеченные на удаление) добавить в процедуру ПриОткрытии()
СправочникСписок.Отбор.ПометкаУдаления.Значение = Ложь;
СправочникСписок.Отбор.ПометкаУдаления.Использование = Истина;
ну и на форму вынести в таблицу колону - ПометкаУдаления
СправочникСписок.Отбор.ПометкаУдаления.Значение = Ложь;
СправочникСписок.Отбор.ПометкаУдаления.Использование = Истина;
ну и на форму вынести в таблицу колону - ПометкаУдаления
(34) Так развернуто прямо в статье, только парой абзацев выше:
Надеюсь, теперь понятно? Если нет, то совсем просто: вводим в справочник поле "Показ" и при необходимости устанавливаем по нему отбор. Значением поля управляем в предопределенной процедуре глобального модуля ПриУдаленииЭлемента().
Минусы такого решения очевидны, но не обязательно они будут вам мешать: если нужны другие отборы, то получаем фигвам.
Чтобы реализовать этот режим показа товаров в списке, в справочник номенклатуры мы добавим индексируемое поле "Показ", которое говорит системе 1С, показывать ли данный элемент в форме списка, или нет. Чтобы этот режим возымел действие, в форме списка справочника мы используем метод УстановитьОтбор() по реквизиту - и тогда скроются все ненужные пользователю элементы из списка. Пример реализации - см. там же.
Установку и сброс признака Показ мы будем производить в глобальном модуле, просто добавив пару строчек кода в обработчик, который проставляет в справочник остатки товара. Если остаток нулевой (или, хуже того, отрицательный), то многие пользователи пожелают это скрыть из показа. :-) На форме списка есть флажок, который позволяет включать и выключать показ скрываемых элементов номенклатуры.
Установку и сброс признака Показ мы будем производить в глобальном модуле, просто добавив пару строчек кода в обработчик, который проставляет в справочник остатки товара. Если остаток нулевой (или, хуже того, отрицательный), то многие пользователи пожелают это скрыть из показа. :-) На форме списка есть флажок, который позволяет включать и выключать показ скрываемых элементов номенклатуры.
Надеюсь, теперь понятно? Если нет, то совсем просто: вводим в справочник поле "Показ" и при необходимости устанавливаем по нему отбор. Значением поля управляем в предопределенной процедуре глобального модуля ПриУдаленииЭлемента().
Минусы такого решения очевидны, но не обязательно они будут вам мешать: если нужны другие отборы, то получаем фигвам.
Есть ещё вот такой вариант и даже работает, но как-то "криво". Во первых почему то пропала возможность добавлять новые элементы, и поиск при наборе на клавиатуре названия номенклатуры производится не по всему справочнику, и притормаживает.
ToySQL В помощь для SQL базы
Там есть функция ДобавитьЗамену (для замены запросов)
Там есть функция ДобавитьЗамену (для замены запросов)
...
лФильтр = "ISMARK = 0";
флАктивна = 1;
z1c = "Sel ect COUNT(*) fr om SC33(NOLOCK) where PARENTID=? and ((ISFOLDER=? and CODE=? and ROW_ID<=?) or (ISFOLDER=? and CODE<?) or (ISFOLDER<?))";
new = "Select COUNT(*) fr om SC33(NOLOCK) wh ere PARENTID=? and "+лФильтр+" and ((ISFOLDER=? and CODE=? and ROW_ID<=?) or (ISFOLDER=? and CODE<?) or (ISFOLDER<?))";
Компонента.ДобавитьЗамену(z1c, new, флАктивна);
...
Показать
у нас в базе просто время от времени делается свертка. Выделяется отдельная база по прошлому периоду а в актуальной остаются остатки на начало и справочники - тут уже можно удаление запускать - лишние помеченные уйдут.
и переносить ничего не надо и база меньше и старые данные можно найти (просто в отдельной базе)
и переносить ничего не надо и база меньше и старые данные можно найти (просто в отдельной базе)
Мы обычно вместо стандартного выбора из справочника используем подбор обработкой. Этот подбор вызывается вместо формы списка/выбора справочника. В обработке просто на форме таблица значений. При открытии ее заполняем как нам угодно и видим только то, что нужно. И никаких танцев с бубном вокруг справочника и ВК.
(43) Frogger1971, баз много, объемы и количество пользователей тоже разное. Размер ТЗ значения не имеет, т.к. она заполняется 1 раз и потом скролится быстро уже заполненная.
Главное чтобы работали именно через RDP.
В любом случае если в подборе, будь то форма списка справочника, или еще что-то нужно видеть остатки то без запросок к бух. итогам и/или регистрам не обойтись. И в этом случае заполнить ТЗ 1 раз при открытии и показать готовую получается более производительно, чем в форме списка справочнника делеть текстовую колонку для остатков с функцией возвращающей этот остаток при любом движении в форме.
Ну и плюс влякие плюшки с любыми отборами и фильтрами при заполнении ТЗ.
Главное чтобы работали именно через RDP.
В любом случае если в подборе, будь то форма списка справочника, или еще что-то нужно видеть остатки то без запросок к бух. итогам и/или регистрам не обойтись. И в этом случае заполнить ТЗ 1 раз при открытии и показать готовую получается более производительно, чем в форме списка справочнника делеть текстовую колонку для остатков с функцией возвращающей этот остаток при любом движении в форме.
Ну и плюс влякие плюшки с любыми отборами и фильтрами при заполнении ТЗ.
Можно не скрывать, а, завести в справочнике реквизит для сортировки. Назвать, например, ЗначениеСортировки. Заполнять его регламентной процедурой ночью, ну и при изменении пометки на удаление. Что бы все помеченные уползли в конец списка.
Если кому еще актуально, визуально скрыть элементы справочника помеченные на удаление для обычной формы:
Процедура ПриОткрытии()
ЭтаФорма.ЭлементыФормы.СправочникСписок.НастройкаОтбора.ПометкаУдаления.Доступность = Истина;
ЭтаФорма.Отбор.ПометкаУдаления.Использование = Истина;
КонецПроцедуры
Процедура ПриОткрытии()
ЭтаФорма.ЭлементыФормы.СправочникСписок.НастройкаОтбора.ПометкаУдаления.Доступность = Истина;
ЭтаФорма.Отбор.ПометкаУдаления.Использование = Истина;
КонецПроцедуры
Лучше самый простой способ - папка (которую тоже можно скрыть, да хоть тоже пометить на удаление), элементам добавить символ впереди типа: яя_. И все. Нафиг все навороты, обработчики, тем более внешние компоненты - это все лютые просадки по производительности! В форме выбора скрыть папку, как написал в комментарии выше (В условном оформлении: отображение и видимость - условие - Пом.Уд. = Истина, поля - пусто) - и все, и нечего ковыряться в одном месте
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот