Альтернативная обработка "Выбор периода"

27.03.19

Альтернативная обработка ввода периода для 1С 7.7.

Файлы

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование	Скачано	Купить файл	По подписке PRO
Альтернативная обработка "Выбор периода": .ert 216,00Kb 5	5	2 500 руб. Купить	1 SM Скачать

Вы можете заказать платную доработку или адаптацию этой разработки под вашу конфигурацию на «Бирже заказов».

0% комиссии — оплата напрямую исполнителю;
Исполнители любого масштаба — от отдельных специалистов до команд под проект;
Прямой обмен контактами между заказчиком и исполнителем;
Безопасная сделка — при необходимости;
Рейтинги, кейсы и прозрачная система откликов.

Альтернативная обработка ввода периода.

Необходимые условия:

1. 1с 7.7

2. Внешняя компонента Formex

Внедрение:

1. Встроить в раздел "Обработки" скачанную обработку и настроить на нее права

2. В начале глобального модуля:

Перем глНачДатаПериода Экспорт;  
Перем глКонДатаПериода Экспорт;

3. В глобальном модуле:

Процедура глВвестиПериод(локНачДата,локКонДата) Экспорт 
	
	спПар = СоздатьОбъект("СписокЗначений");   
	спПар.ДобавитьЗначение(локНачДата);  
	спПар.ДобавитьЗначение(локКонДата);  
	
	ОткрытьФормуМодально("Обработка.ВыборПериода",спПар);
	
	Если (ПустоеЗначение(глНачДатаПериода)=0) и (ПустоеЗначение(глКонДатаПериода)=0) Тогда
		локНачДата = глНачДатаПериода; 
		локКонДата = глКонДатаПериода;
	КонецЕсли;
	глНачДатаПериода = "";
	глКонДатаПериода = "";
	
КонецПроцедуры //глВвестиПериод()

//**************************************************************************
Процедура глПроверкаДаты(ДатаНачала,ДатаКонца,локТА=1,локОДНО=1) Экспорт
	
	Если ПустоеЗначение(ДатаНачала)=1 Тогда
		ДатаНачала = ?(локТА=1,ПолучитьДатуТА(),ТекущаяДата());
	КонецЕсли;
	Если ПустоеЗначение(ДатаКонца)=1 Тогда
		ДатаКонца = ?(локТА=1,ПолучитьДатуТА(),ТекущаяДата());
	КонецЕсли; 
	
	Если (ДатаНачала>ПолучитьДатуТА()) и (локТА=1) Тогда
		ДатаНачала = ПолучитьДатуТА();	
	КонецЕсли;	
	Если (ДатаКонца>ПолучитьДатуТА()) и (локТА=1) Тогда
		ДатаКонца = ПолучитьДатуТА();	
	КонецЕсли;
	
	Если (ДатаНачала<=Константа.ДатаПоследнегоЗавершенияПериода) и (локОДНО=1) Тогда
		ДатаНачала = Константа.ОсновнаяДатаНачалаОтчета;
	КонецЕсли;  
	
	Если ДатаНачала>ДатаКонца Тогда 
		ДатаНачала = ДатаКонца; 
	КонецЕсли;
	
КонецПроцедуры //глПроверкаДаты()

Вызов:

глВвестиПериод(ДатаНачала,ДатаКонца);

где ДатаНачала и ДатаКонца - реквизиты формы типа "Дата" или переменные модуля формы для значений типа "Дата"

Особенности:

Используется Константа.ОсновнаяДатаНачалаОтчета, хранящая начальную дату действующего периода базы

Используется Константа.ДатаПоследнегоЗавершенияПериода

Шрифт на табло выбранных дат "wst_engl.fon"

Вступайте в нашу телеграмм-группу Инфостарт

обработка ввод периода

+2 –

См. также

1С7.7: потерялось окно сообщений, исправляем!

Работа с интерфейсом Пользователь 1С:Предприятие 7.7 1C77 Абонемент ($m)

Часто встречающаяся проблема: потерялось Окно сообщений. Обработка исправляет эту "проблему" одним нажатием кнопки. Для обычных пользователей. Не требует программирования. Достаточно запустить обработку и нажать кнопку "Выполнить".

5 стартмани

17.01.2025 3276 2 CheBurator 13

Индикатор в 1С 7.7

Работа с интерфейсом Разработчик 1С:Предприятие 7.7 1C77 Абонемент ($m)

Создание и использование на формах в среде 1С 7.7 прогрессбара, индикатора, как в 1С 8.Х для контроля над длительными процессами. Реализовано средствами языка программирования 1С 7.7.

1 стартмани

06.06.2024 3310 3 user1416274 17

1С:Фото номенклатуры 7.7 - решение для работы с фотографиями номенклатуры в 1С:7.7 (включая формат PNG)

Работа с интерфейсом Логистика, склад и ТМЦ Системный администратор Разработчик Пользователь 1С:Предприятие 7.7 1С:Торговля и склад 7.7 Оптовая торговля, дистрибуция, логистика Управленческий учет Платные (руб)

Решение для разработчика и конечного пользователя для работы с фотографиями номенклатуры: систематизация, хранение, отображение, а также выгрузка на Яндекс-Диск и FTP (кроме версии лайт). Поддерживаются графические форматы: bmp, jpg, gif, tiff, а также png - не поддерживаемый штатными средствами 1С. Выполнено без использования внешних компонент (кроме функции выгрузки на FTP). Поставляется как в виде пустой конфигурации с набором объектов и модулей для работы с фото, так и в виде обновления к 1С:Торговля и склад 7.7. Выполнено в двух версиях: "полная" и "лайт".

2541 руб.

18.10.2022 8945 4 45

WebЦвета для 1с77 FormEx

Инструментарий разработчика Работа с интерфейсом Разработчик 1С:Предприятие 7.7 Абонемент ($m)

Обработка с фрагментами кода для программного использования набора цветов из коллекции WebЦвета 1с версии 8+ в 1с версии 77. Требуется предварительное подключение сторонней библиотеки FormEх. Будет полезно программистам 1с 77, 1с 8. Да и вообще при программировании на любом языке при потребности использовать коллекцию цветов WebЦвета.

1 стартмани

30.03.2022 7323 2 igor7777 4

К привязкам элементов форм (1С 7.7, FormEx)

Работа с интерфейсом Разработчик 1С:Предприятие 7.7 1C77 Бесплатно (free)

Публикация имеет цель обратить внимание на возможность улучшения интерфейса.

15.12.2021 7965 120 Cерый 15

[ПОЛЕЗНЯШКА 7.7] Как запретить максимизацию формы

Работа с интерфейсом Разработчик 1С:Предприятие 7.7 1C77 Бесплатно (free)

Программный прием запрета максимизации формы

18.04.2021 4540 CheBurator 10

Выбор цвета для 1С 7.7

Работа с интерфейсом Разработчик 1С:Предприятие 7.7 1C77 Абонемент ($m)

Простая и удобная внешняя обработка для выбора цвета без применения внешних компонент.

1 стартмани

09.06.2020 9606 4 vap_pig 5

Производственный календарь для 1С 7.7

Учет рабочего времени Работа с интерфейсом Разработчик Бухгалтер Пользователь 1С:Предприятие 7.7 1C77 Россия Абонемент ($m)

Обработка производственного календаря с возможностью импорта и экспорта xls для 1С 7.7 (7.70.027) без изменения конфигурации.

1 стартмани

18.09.2019 15552 8 Jill 8

Комментарии

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

Свернуть все

1. wer_alex 28.03.19 16:25 Сейчас в теме

Не заработало . Дополнительно объявил пременные Перем глКрасный,глСиний,глТемноСерый,глЧерный,глБелый;
Обработка на них ругается. Нет функции глПадежП. При запуске обработка зациклилась и и ответ системы " Не хватает оперативной памяти." Автору просьба сделать обработку работоспособной

2. v.a.n- 2 28.03.19 20:52 Сейчас в теме

Прошу прощения.
Не все связи со своей базой увидел.
Высылаю исправленную обработку. Глобальные переменные цветов не нужны. Я их в обработку поместил.
И напоминаю, без Formex работать не будет (у меня версия 2.0.5.109 beta).
Если что не так, пишите.

Прикрепленные файлы:

Выбор периода.ert

3. v.a.n- 2 28.03.19 21:09 Сейчас в теме

Снял небольшое видео, как это работает

Прикрепленные файлы:

Пример использования.mp4

4. CheBurator 3235 30.03.19 01:30 Сейчас в теме

а что мешало автору описание этой обработки поместить в само описание обработки? (дада! есть такая закладочка в форме обработки) - здоровый похренизм?

5. v.a.n- 2 30.03.19 10:49 Сейчас в теме

Ничего не мешало. И про закладочку знаю. Привык описание делать для пользователей, т.е. объяснять, как пользоваться обработкой. А что здесь то описывать? Как в переключатели тыкать или кнопки "вверх"/"вниз" нажимать? А вкладывать в описание процесс внедрения в конфигурацию? Не знаю. Вообще у меня это первый опыт выкладывания 1с обработок, хотя понаписано очень много интересного. Может я и не прав. Строго не судите, лучше подскажите :)

6. CheBurator 3235 30.03.19 13:19 Сейчас в теме

"А вкладывать в описание процесс внедрения в конфигурацию? "
именно. как минимум.
а то ты видать исходишь что кроме твоей обработки никаких других в информационном пространстве - нет...
.
в итоге сдернул твою обработку сеюе.
скопипастил описание в описание.
скопипастил УРЛ ЭТОЙ СТРАНИЦЫ В ОПИСАНИЕ
.
потом пришлось это все повторить для повторно сгруженной исправленной из коментов.

7. v.a.n- 2 30.03.19 16:56 Сейчас в теме

Понятно. Буду знать. Спасибо за разъяснение. Жалко, что нельзя обновлять обработку изначальную. Приходится выкладывать дополнительно. Неудобно.

8. obmanOZ 33 10.04.19 14:52 Сейчас в теме

Добрый день! А ваша разработка подходит только для отчетов? или в журналах также можно пользоваться?

9. v.a.n- 2 10.04.19 21:23 Сейчас в теме

Конечно можно. И в журналах, и в документах, и в отчетах.

10. v.a.n- 2 10.04.19 21:37 Сейчас в теме

Хотя в журналах я поторопился. В журналах своя тачанка. Сам использую в документах, отчетах и обработках

11. v.a.n- 2 11.04.19 11:17 Сейчас в теме

В журналах обработку можно использовать только по отдельной кнопке.
Формула кнопки: ВыборИнтервала()
В модуле формы журнала:

Процедура ВыборИнтервала() 
	
	ДатаН = НачалоИнтервала();
	ДатаК = КонецИнтервала();
	глВвестиПериод(ДатаН,ДатаК);
        УстановитьИнтервал(ДатаН,ДатаК,1);                          
	
КонецПроцедуры //ВыборИнтервала()

12. CheBurator 3235 16.05.25 01:30 Сейчас в теме

(11) по идее для подмены СРАЗУ во всех журналах в ГМ прописать перехват штатного выбора периода в журнале:
1. Предопределенная ГМ, ПриПолученииКомандыГлавнымОкном: команда = 32881
2. Формексом перехватить форму активного журнала (в котором нажали кнопку)
3. Вызываем свой выбор, через контекст п.2 устанавливаем в журнал
...
сейчас проверим...

13. CheBurator 3235 16.05.25 01:56 Сейчас в теме

Ломается на .Загрузить("ЦФ");

14. CheBurator 3235 16.05.25 02:12 Сейчас в теме

Подход в (12) работает.
.
//***************************************************************************************************
Процедура ПриПолученииКомандыГлавнымОкном(Команда, НулевойПараметр, ФСО)

Если Команда = 32881 Тогда
КонтекстЖурнала = ""; глСервис.АктивныйКонтекст(КонтекстЖурнала);
ДатаН = КонтекстЖурнала.НачалоИнтервала();
ДатаК = КонтекстЖурнала.КонецИнтервала();
глВвестиПериод(ДатаН,ДатаК); // здесь вызываем модально СВОЮ обработку выбора периода
КонтекстЖурнала.УстановитьИнтервал(ДатаН,ДатаК);
ФСО = 0;
Возврат;
КонецЕсли;

КонецПроцедуры // ПриПолученииКомандыГлавнымОкном()