Выбор периода для управляемых форм

26.06.14

Разработка - Работа с интерфейсом

Форма выбора стандартного периода для управляемых форм

Скачать файлы

Наименование Файл Версия Размер
ВыборПериодаУпрФормы.cf
.cf 12,15Kb
70
.cf 12,15Kb 70 Скачать

Пример (8.3 интерфейс такси):

 

На любой форме добавляем кнопку.

в команде кнопки прописываем:

 

&НаКлиенте
Процедура ВыбратьПериод(Команда)

         ОписаниеОповещения = Новый ОписаниеОповещения("РезультатВыбораПериода",ЭтотОбъект);
         ОткрытьФорму("ОбщаяФорма.ФормаВыбораПериода",,,,,,ОписаниеОповещения);

КонецПроцедуры

 

&НаКлиенте
Процедура РезультатВыбораПериода(Результат, ДополнительныеПараметры) Экспорт

         Если Результат <> Неопределено Тогда
                  ЭтотОбъект.ДатаНачала = Результат.ДатаНачала;
                  ЭтотОбъект.ДатаОкончания = Результат.ДатаОкончания; 
         КонецЕсли;

КонецПроцедуры

Форма выбора стандартного периода

См. также

Богатый редактор картинок, хранимых в базе, с возможностью РИСОВАНИЯ. Редактор внешних файлов картинок. Объект, расширяющий возможности работы с картинками из встроенного языка (Три в одном) + Обработка «Стандартизация картинок»

Работа с интерфейсом Рабочее место Платформа 1С v8.3 Управляемые формы Конфигурации 1cv8 Платные (руб)

Обработка предназначена для редактирования картинок в режиме «Предприятие», с возможностью РИСОВАТЬ на них. Поддерживается работа как в обычных формах (толстый клиент) так и на управляемых формах (тонкий клиент). Обработка позволяет редактировать как картинки, хранимые в базе, так и графические файлы с диска на файловой системе. Помимо базовых функций (изменение размеров, преобразование формата, обрезание картинки, повороты и т.п.) – редактор имеет богатый набор инструментов для рисования. Доступна функция вставки изображения из буфера обмена. Также обработка может быть использована из встроенного языка как объект для редактирования картинок. Объект может быть использован: на стороне клиента, на стороне сервера, из внешнего соединения. Данная обработка будет особенно полезна тем, кто вносит картинки в базу (изображения номенклатуры, фотографии физических лиц и т.п.). Функционал реализуется с использованием JavaScript и бесплатного ПО ImageMagick (без использования внешних компонент).

6000 руб.

16.01.2015    61797    43    59    

80

[Расширения] Динамическое управление видимостью и доступностью элементов форм (УФ) (8.3.6+)

Работа с интерфейсом Платформа 1С v8.3 Управляемые формы Конфигурации 1cv8 Платные (руб)

Механизм «Динамическое управление доступом к элементам форм объектов 1С8» предназначен для обеспечения возможности оперативного управления видимостью и доступностью элементов форм документов и справочников продуктов фирмы «1С» «1С:Предприятие 8». Решение универсальное, встраивается в любую конфигурацию с минимальными доработками, что позволяет без проблем обновлять типовые решения.

5000 руб.

14.01.2016    54403    16    21    

42

Управление дашбордами

Работа с интерфейсом Платформа 1С v8.3 Конфигурации 1cv8 Платные (руб)

Обработка предназначена для создания и управления дашбордами.

2400 руб.

29.06.2020    16698    21    4    

35

Новогоднее оформление для 1С

Работа с интерфейсом Платформа 1С v8.3 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Зарплата и Управление Персоналом 3.x 1С:Управление нашей фирмой 3.0 Бесплатно (free)

Добавьте новогоднего настроения! Расширение создает декорацию в виде гирлянды на некоторых формах объектов.

27.12.2023    10738    750    elcoan    45    

106

Конструктор HTML, CSS и javascript

Инструментарий разработчика Работа с интерфейсом Платформа 1С v8.3 Конфигурации 1cv8 Абонемент ($m)

Подходит для создания web-страниц для замены управляемых форм 1С, красивых отчетов, интерфейса мобильного приложения на платформе 1С и для простых страниц веб-сайтов.

2 стартмани

10.04.2023    9615    151    acces969    31    

118

Модель состояния для MVC

Работа с интерфейсом Платформа 1С v8.3 Конфигурации 1cv8 Абонемент ($m)

"MVC плохо применима в 1С" - познакомьтесь с моделью состояния и, возможно, ваше мнение поменяется! Представленное решение является эволюционным развитием идеи реализации MVC для 1С. В новой версии добавлены DSL для описания модели состояния, а также параметризация свойств параметров и элементов формы.

1 стартмани

05.07.2022    3665    kalyaka    2    

27

Табло очереди заказов на экран телевизора

WEB-интеграция Работа с интерфейсом Платформа 1С v8.3 1С:Розница 2 Платные (руб)

Связка из веб-приложения и расширения для 1С: Розница 2.3.

3600 руб.

29.04.2022    12080    1    5    

10
Комментарии
В избранное Подписаться на ответы Сортировка: Древо развёрнутое
Свернуть все
1. Adeptus 225 27.06.14 10:11 Сейчас в теме
Не плохо но вот это получше выглядит и поудобнее!
http://infostart.ru/public/90540/
2. w-divin 27.06.14 14:53 Сейчас в теме
(0) я просто в шоке от таких публикаций. А сделайте еще публикации с "ПоказатьВопрос" и "ПоказатьПредупреждение". А еще можно вообще весь СП выложить...

(1) Adeptus, лучше, но не канает в УФ )))
chemezov; Diks_Soft; Vil1983; sg12; s0u1; MonteCriZto; HystriX; +7 1 Ответить
3. w-divin 27.06.14 14:54 Сейчас в теме
А еще и обработку скачивать с 2мя реквизитами и 12ю строками текста - вообще превосходно...
4. MaxxiMiliSan 251 27.06.14 15:34 Сейчас в теме
стандратная удобней)
Vil1983; romanagatiy; +2 1 Ответить
5. Nuuq 76 09.02.15 18:18 Сейчас в теме
Я вот так сделал:
- в обработке определено 2 реквизита Дата1 и Дата2
- в УФ форме добавлена кнопка и команда формы

&НаКлиенте
Процедура КомандаВыбратьПериод(Команда)
	
	Диалог = Новый ДиалогРедактированияСтандартногоПериода();								 
	Диалог.Период = Новый СтандартныйПериод(Объект.Дата1, Объект.Дата2);	    
	Если (Диалог.Редактировать()) Тогда
		Объект.Дата1 = Диалог.Период.ДатаНачала;
		Объект.Дата2 = Диалог.Период.ДатаОкончания;
	КонецЕсли;

КонецПроцедуры
Показать


... по-моему просто и удобно
chemezov; kat888; fineosun; DrVitaly; chrnv; smit1c; user908373; user1675272; Anna_arbuz; AlisultanovZakir; YA_420766153; Vil1983; BotMan4; Acort; criptid; SadrA; user706520_bichkov; buy_sale; link_l; sapervodichka; transt; N1LL; sanfoto; igormiro; DrAku1a; as-lubava; MenZurKa; wowik; user623969_dusa; cheburashka; Nigelist; AlMedvedev; ekomova; MRAK; nikivr; AlkB; ehcore; unichkin; free-lancer-2018; dj_serega; mnemchinov; RSConsulting; nick_krsk; +43 Ответить
6. Katano 28.03.15 03:41 Сейчас в теме
(5) Nuuq, А как же модальность ))
buy_sale; sapervodichka; +2 Ответить
8. ehcore 22.06.16 10:45 Сейчас в теме
(5) Nuuq, спасибо! Изменил немного код для использования в режиме модальности:
&НаКлиенте
Процедура ВыбратьПериод(Команда)
    Диалог = Новый ДиалогРедактированияСтандартногоПериода();                                 
    Диалог.Период = Новый СтандартныйПериод(Объект.Дата1, Объект.Дата2);        
	ОписаниеОповещенияОЗакрытии = Новый ОписаниеОповещения("ВыполнитьПослеВыбораПериода",ЭтотОбъект);
	Диалог.Показать(ОписаниеОповещенияОЗакрытии); 
КонецПроцедуры

&НаКлиенте
Процедура ВыполнитьПослеВыбораПериода(Результат, Параметры) Экспорт
	Если Результат <> Неопределено Тогда
		Объект.Дата1 = Результат.ДатаНачала;
		Объект.Дата2 = Результат.ДатаОкончания;
	КонецЕсли;	
КонецПроцедуры	
Показать


Написав сообщение увидел, что код почти повторяет код автора темы, за исключением использования выбора периода через стандартные периоды.
Sintson; kat888; Darax; Alex_mar; tetraren; Bronickan; chrnv; Anna_arbuz; Egovigor; AlisultanovZakir; nissti; tolyan_ekb; assa; Marka_; hydra88; buy_sale; SadrA; link_l; sapervodichka; as-lubava; Sonnya1909; ncd.art; KotBegemot77; matashin; m_aster; user620387_niols; testnv0; wowik; DimaShustov; user1090556; vre; Vida; klinval; cheburashka; Xershi; nekitsazon; &rew; dour-dead; MRAK; zemochka; Craig; irvin12345; +42 Ответить
9. irvin12345 93 24.10.16 03:44 Сейчас в теме
(8) ehcore, Сначала сделал то же самое, а потом увидел ваш комментарий.
Ваш вариант все равно лучше, тк не везде есть общая форма выбора периода, а в моём случае - выбирает дату а не период (ЗУП ГУ)
13. nissti 6 27.08.21 17:13 Сейчас в теме
Спасибо большое! Как раз нужна обработка, используемая в БУХ и ЗУП. Так вот общей формы "ВыборСтандартногоПериода", которая есть в БУХ, в ЗУПе нет, а "ВыборПериода" - что-то не осилила, как его прикрутить...Он в ЗУП для ПФР только, так-то везде месяц и все..
В обычных формах я всегда вот так использую

Процедура КнопкаВыбораПериодаНажатие(Элемент)
	НастройкаПериода = Новый НастройкаПериода;
	НастройкаПериода.РедактироватьКакИнтервал = Ложь;
	НастройкаПериода.РедактироватьКакПериод = Истина;
	НастройкаПериода.ВариантНастройки = ВариантНастройкиПериода.Период;
	Если НастройкаПериода.Редактировать() Тогда
		НастройкаПериода.УстановитьПериод(НастройкаПериода.ДатаНачала, НастройкаПериода.ДатаОкончания);
		ДатаНачала = НастройкаПериода.ПолучитьДатуНачала();
		ДатаОкончания = НастройкаПериода.ПолучитьДатуОкончания();
	КонецЕсли;
Показать


а в управляемых впервые делаю. Спасибо!
7. chmv 03.04.15 13:25 Сейчас в теме
а как её вызвать из СКД?
10. Xershi 1474 01.03.18 14:43 Сейчас в теме
(7) в СКД проще использовать общую форму!
11. yuraskas 176 27.05.21 11:29 Сейчас в теме
Использовал код (8). И обнаружил странное поведение формы. Если открыть форму, не выбирать период, закрыть форму - все ок. А вот если выбрать период, и закрыть форму - то при закрытии программа заходить в "Процедура ВыполнитьПослеВыбораПериода(Результат, Параметры) Экспорт", почему???
12. nnnnnndfge 11.06.21 12:36 Сейчас в теме
Отличие хорошая разработка! Удобно пример кода, очень благодарить!
14. YA_420766153 19.10.21 13:23 Сейчас в теме
(2)Немного разжую

&НаСервере
Функция ПолучитьДаты()
	Период = Новый Структура;
	Период.Вставить("НачалоМесяца",НачалоМесяца(ТекущаяДата()));
	Период.Вставить("КонецМесяца",ТекущаяДата());
	Возврат Период
КонецФункции

&НаКлиенте
Процедура ДиалогПериод(Команда)
	Диалог = Новый ДиалогРедактированияСтандартногоПериода();
	ПериодОтбора = Новый Структура;
	Даты = ПолучитьДаты(); 
    Диалог.Период = Новый СтандартныйПериод(Даты.НачалоМесяца, Даты.КонецМесяца);        
    Если (Диалог.Редактировать()) Тогда
        ПериодОтбора.Вставить("ДатаНачала", Диалог.Период.ДатаНачала);
        ПериодОтбора.Вставить("ДатаОкончания", Диалог.Период.ДатаОкончания);
    КонецЕсли;
КонецПроцедуры
Показать
15. mihco 2 16.12.21 20:39 Сейчас в теме
Вот так правильно, без модальных окон:

&НаКлиенте
Процедура ВыбратьПериод(Команда)
	
	Диалог = Новый ДиалогРедактированияСтандартногоПериода();
	Диалог.Период.ДатаНачала    = НачалоПериода;
	Диалог.Период.ДатаОкончания = КонецПериода;
	
	ДополнительныеПараметры = Новый Структура("Диалог", Диалог);
	ОписаниеОповещения = Новый ОписаниеОповещения("ВыбратьПроизвольныйПериодЗавершение",
		ЭтотОбъект, ДополнительныеПараметры);
	Диалог.Показать(ОписаниеОповещения);
	
КонецПроцедуры 

&НаКлиенте
Процедура ВыбратьПроизвольныйПериодЗавершение(Период, ДополнительныеПараметры) Экспорт
	
	Диалог = ДополнительныеПараметры.Диалог;
	
	Если Период <> Неопределено Тогда
		
		НачалоПериода= Диалог.Период.ДатаНачала;
		КонецПериода= Диалог.Период.ДатаОкончания;
		
	КонецЕсли;
	
КонецПроцедуры
Показать
16. e.a.afanasyev 17 28.01.22 19:02 Сейчас в теме
&НаКлиенте
Асинх Процедура КомандаВыбратьПериодДатаЗаказа(Команда)
	Диалог = Новый ДиалогРедактированияСтандартногоПериода();                                 
    Диалог.Период = Новый СтандартныйПериод(ДатаЗаказаНачалоПериода, ДатаЗаказаКонецПериода);        
    Обещание = Диалог.РедактироватьАсинх(); 
	Результат = Ждать Обещание; 
	Если Не Результат = Неопределено Тогда
		ДатаЗаказаНачалоПериода = Результат.ДатаНачала;
		ДатаЗаказаКонецПериода = Результат.ДатаОкончания;	
	КонецЕсли;
КонецПроцедуры
Показать
Serg2000mr; Alex_mar; +2 Ответить
Оставьте свое сообщение