Каталог решений - Быстрый отбор в журнале на конкретную дату

Быстрый отбор в журнале на конкретную дату

Быстрый отбор в журнале на конкретную дату

В наличии

Лень — двигатель прогресса. Полезная фича для быстрого отбора документов в любом журнале на конкретную дату.

Категория:

Описание

Лень — двигатель прогресса. Полезная фича для быстрого отбора документов в любом журнале на конкретную дату.

Можно вставить в любой журнал на базе 7.7

Для этого в начало модуля любого журнала (после переменных) вставляем такие строки:

//При выборе даты
Процедура ПриУстановкеИнтервала()
УстановитьИнтервал(ДатаОтбора,ДатаОтбора)

КонецПроцедуры //ПриВыбореДаты()

В Форму Журнала вставить соответствующие кнопки, как на картинках.

Пользователь Andr12 предложить добавить еще процедуру:

Процедура ПриУстановкеИнтервала2() 
Если НачалоСтандартногоИнтервала() = "День" Тогда 
дата1 = РабочаяДата(); 
ИначеЕсли НачалоСтандартногоИнтервала() = "Квартал" Тогда 
дата1 = НачКвартала(РабочаяДата()); 
ИначеЕсли НачалоСтандартногоИнтервала() = "Месяц" Тогда 
дата1 = НачМесяца(РабочаяДата()); 
ИначеЕсли НачалоСтандартногоИнтервала() = "Год" Тогда 
дата1 = НачГода(РабочаяДата()); 
Иначе 
дата1 = НачалоСтандартногоИнтервала();
КонецЕсли; 
Если КонецСтандартногоИнтервала() = "День" Тогда 
дата2 = РабочаяДата(); 
ИначеЕсли КонецСтандартногоИнтервала() = "Квартал" Тогда 
дата2 = КонКвартала(РабочаяДата()); 
ИначеЕсли КонецСтандартногоИнтервала() = "Месяц" Тогда 
дата2 = КонМесяца(РабочаяДата()); 
ИначеЕсли КонецСтандартногоИнтервала() = "Год" Тогда 
дата2 = КонГода(РабочаяДата()); 
Иначе 
дата2 = КонецСтандартногоИнтервала();
КонецЕсли; 
УстановитьИнтервал(дата1,дата2); 

КонецПроцедуры //ПриУстановкеИнтервала2()

А в форме журнала у кнопкив формуле нужно записать:

В результате перестал пропадать ранее предустановленный интервал отбора

has been added to your cart:
Оформление заказа