Консоль запросов со встроенным Конструктором запросов для 1с8.3 (8.2) своими руками

Публикация № 719293

Программирование - Практика программирования

Обработка Консоль запрос управляемые обычные конструктор кодинг

10
Мы можем сами создать свою консоль запросов - именно такую, которая подходит для наших нужд. Кроме того, создав собственную Консоль запросов, Вы не только получаете удобный для себя инструмент, а также получаете навык программирования в среде 1с8, что очень полезно будет начинающим программистам 1С.

Итак, начинаем с простого: в конфигураторе создайте Новую обработку,назовите КонсольЗапросов или КонструкторЗапросов,как Вам больше нравится.

Далее на вкладке обработки "Данные" - добавляем новые реквизиты:1)ТекстЗапроса, тип=строка неограниченной величины; 2)ТаблицаЗапроса, тип ТабличныйДокумент. см.рис.

 

Сразу можем добавить в "Данных" табличку для будущих Параметров, которые нам необходимы, чтобы в своей Консоли у нас выполнялся не самый примитивный запрос, а с параметрами и ссылками,например, мы для своей работы будем создавать запрос к периодическим регистрам, а здесь без указания Параметра=&Дата никуда.

Чтобы создать нашу табличку Параметров, на вкладке "Данные" в ее "Табличной части" добавим новую таблицу,назовем ее ПараметрыЗапроса, здесь же добавим колонки этой таблицы:1)ИмяПараметра,тип строка=25символов; ЗначениеПараметра, здесь составной тип данных см.рис:

Поэтому как показано на картинке - выбираем составной тип для колонки ЗначениеПараметра:в открывшемся меню типов ставим галочку "Составной тип", выбираем число,строка (20символов укажите),дата,булево, и самую нижнюю галочку ставим - ЛюбаяСсылка - она означает что далее, при указании Параметров нашего запроса, мы можем ссылаться на любой объект нашей конфигурации,например,справочники или документы.

Теперь нужно создать форму нашей будущей Консоли запросов. В обработке перейдем на вкладку "Формы" и добавим новую.Входим в эту форму и здесь уже неограниченное поле для творчества - Вы можете расположить созданных только что два реквизита и табличку с параметрами как Вам больше нравится! Для этого Вы можете использовать стандартные элементы формы как Группа или Страница со страницами (если Вам больше нравится переворачивающиеся страницы.

Главное здесь одно: перетащив реквизит "ТекстЗначения" в левое поле редактирования формы - обязательно в его свойствах установите "Вид"=Поле текстового документа.см.рис:

 

В свойствах реквизита "ТаблицаЗапроса" по желанию можете указать - "ОтображатьСетку"и"ОтображатьЗаголовки".

Далее в правом окне редактирования формы переходим на вкладку "Команды" и добавляем новую кнопку,при нажатии на которую наша Консоль выполнить определенное действие. Создадим Кнопку "КонструкторЗапросов", по собственному желанию Вы можете на кнопку добавить пиктограммку, главное - это вынесите саму кнопку в левое окно редактирования формы - чтобы мы смогли ее увидеть.Потом в правом окне редактирования формы нажимаем правый клик мыши на нашу кнопку и выбираем свойства - в свойствах нажимаем на пункт "Действие",появится модальное окно с вопросом - где именно будет исполняться наш программный код, который мы назначим кнопке - выбирайте "На клиенте".

Откроется МодульФормы с уже готовой пустой процедурой "Процедура КонструкторЗапроса(Команда)". Внутри данной процедуры мы и опишем вызов стандартного Конструктора запросов 1с8. Это очень легко: Конструктор=Новый КонструкторЗапроса; Но здесь есть подводные камни - встроенный в платформу КонстукторЗапросов работает в пользовательском режиме ТОЛЬКО под толстым клиентом! Поэтому мы вставим условие инструкции препроцессора #Если, а вот здесь Вы сами решайте, исходя из Вашей платформы, или у Вас обычные формы,тогда выбирайте "ТолстыйКлиентОбычноеПриложение" или у Вас платформа на управляемых формах, тогда "ТолстыйКлиентУправляемоеПриложение".см.рис.

 

Теперь осталось добавить в данную процедуру условие на запись текста запроса, который сформирует нам Конструктор запросов в наш реквизит формы "ТектЗапроса":

 		Если Конструктор.ОткрытьМодально()=Истина Тогда
			Объект.ТекстЗапроса=Конструктор.Текст;
		КонецЕсли; 

 

Но мы можем что-то вручную поменять в тексте запроса (в пользовательском режиме - в окне реквизита "ТекстЗапроса"), чтобы наши изменения попали в КонструкторЗапросов при его новом вызове - добавим простое условие здесь же:

        Если не ПустаяСтрока(Объект.ТекстЗапроса) Тогда
            Конструктор.Текст=Объект.ТекстЗапроса;
        КонецЕсли;


Все, мы подключили встроенный в платформу 1с8 КонструкторЗапросов, давайте посмотрим на свои труды. Для этого запустите 1С:Предприятие в режиме толстого клиента одним из указанных способов:1)гл.меню Конфигуратора - Отладка - НачалоОтладки - ТолстыйКлиент; 2) или если у Вас вынесены данные клавиши на панель управления в конфигураторе - просто нажмите кнопку с желтым кружком с толстой точкой см.рис.:

Запускается пользовательский режим 1сПредприятие8, находим нашу обработку, запускаем ее, жмем на нашу кнопку "КонструкторЗапросов" и видим, как открывается встроенный в платформу конструктор. см рис.

 

Итак, КонструкторЗапросов у нас запускается, можно уже в нем начинать складывать наш будущий запрос, но нам же интересно увидеть, как отработается созданный нами запрос! А для этого нам нужно создать в конфигураторе в редактировании формы нашей консоли еще одну кнопку, назовем ее "ВыполнитьЗапрос". Нажимаем в свойствах кнопки "ВыполнитьЗапрос" на "Действие", вновь выпадает меню, в котором нас спрашивают - где будет отрабатываться наш программный код, в данном случае выбираем "И на клиенте и на сервере", вновь попадаем в МодульФормы.

В процедуре ВыполнитьЗапрос(), которая у нас на клиенте, запишим условие если пользователь не ввел текст запроса,а просит его выполнить:

    Если ПустаяСтрока(Объект.ТекстЗапроса) Тогда
        сообщить("Введите текст запроса!");
    КонецЕсли; 


Система нам уже автоматически сформировала ссылку на процедуру ВыполнитьЗапросНаСервере(); - вот и хорошо, переходим в эту процедуру, которая исполняется на сервере и напишем здесь код исполнения нашего введенного запроса.

Здесь есть варианты: Вы можете самостоятельно писать все выражения, связанные с построением запросов,т.е. вручную, но есть еще проще вариант - внутри процедуры нажмите правую клавишу мыши и в выпадающем меню выберите пункт "Конструктор запросов с обработкой результатов см.рис.":

Если Вы нажали на пункт Конструктор запросов с обработкой результатов", то выпадет модальное окно "Не найден текст запроса.Создать новый?",нажимайте да.Откроется встроенный конструктор запроса, в котором на его первой вкладке "Обработка результата" - выбираем пункт первый "Обход результата". Все, больше нам от этого конструктора ничего не нужно, нажимаем на кнопку "Ок" - выпадет модальное окно "В запросе не выбрано ни одного поля, жмем "Ок".

После этого внутри нашей процедуры ВыполнитьЗапросНаСервере() появится вот такая готовая заготовочка:

 

Перейдем к построенному конструктором выражению:

    Запрос.Текст = 
        "";


Сотрем кавычки и запишем здесь ссылку на наш текст запроса, который мы в пользовательском режиме создавали, наш текст хранится в реквизите формы "ТекстЗапроса", значит на него и будем ссылаться:

Запрос.Текст =Объект.ТекстЗапроса;

Вот так все просто, наша кнопка "ВыполнитьЗапрос" на форме обработки уже практически работоспособна, пока что она может обрабатывать только простые запросы без параметров, но главное что работает! Осталось только вывести визуально в реквизит "ТаблицаЗначений" на форме обработки - результаты нашего запроса. Напомню,что наш реквизит "ТаблицаЗначений" имеет тип "Табличный документ", потому что иначе никак мы в пользовательском режиме не увидим наши результаты. Выводом табличных данных пользователю всегда занимается или Табличный документ или Макет, мне бы очень хотелось чтобы можно было вывести данные через таблицу значений - так как она очень простая в работе и привычная, но, к сожалению, таблица значений - это лишь инструмент, который нужен разработчику, выдавать данные на экран с помощью нее нельзя...

Рассмотрим подробней, что такое есть Табличный Документ-это как лист Exel - добраться до записи в конкретную ячейку можно только с помощью Ячеек таблицы, здесь они у нас называются область, но мы сами можем выбрать диапазон этой области в одну конкретную Ячейку:

А чтобы считать строки в нашем табличном документе - нам понадобится еще Свойство Табличного документа - "ВысотаТаблицы".

Итак, разобрались, что такое табличный документ, определили для себя, что нам потребуется в конкретную ячейку данного табличного документа определить данные из нашего запроса. Но подумаем: а что такое "РезультатЗапроса", который конструктор нам так быстро сформировал? Открываем справку - Результат запроса - это таблица, у которой есть соответствующие свойства! см.рис.

 

И если мы сейчас напишем после выражения РезультатЗапроса = Запрос.Выполнить();(созданного конструктором) вот такой простой цикл для Коллекций:

    Для каждого ИмяКолонки Из РезультатЗапроса.Колонки Цикл
             сообщить(ИмяКолонки.Имя);
    КонецЦикла; 

После этого цикла пока что заремарьте все выражения построенные автоматически конструктором. И запустите 1С:Предприятие8  под толстым клиентом.Создайте любой простенький запрос (Можно Конструктором запросов - он у нас уже работает) и нажмите на кнопку "ВыполнитьЗапрос":

 

То Вы увидите внизу окна в сообщения - что в таблице РезультатЗапроса хранятся наименование полей, которые мы только что выбрали, создав простенький запрос.

Теперь выведем эти имена полей наших страданий в Табличный документ:

      Для каждого ИмяКолонки Из РезультатЗапроса.Колонки Цикл
            Ячейка=Объект.ТаблицаЗапроса.Область(1,РезультатЗапроса.Колонки.Индекс(ИмяКолонки)+1);
             Ячейка.Текст=ИмяКолонки.Имя;
      КонецЦикла; 

Чтобы вывести деталировку по данным запроса - разремарим созданные автоматически конструктором выражения и внутрь цикла перебора "ВыборкаДетальныеЗаписи" самого запроса вставим точно такой же цикл,который мы использовали для вывода наименований колонок, только теперь в текст Ячейки нам нужно передать не данные таблицы"РезультатЗапроса", а данные самой Выборки, посмотрим в справке, как можно обратиться к полю Детальной выборки запроса:

Запишем:

ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
    
    Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
        //в первой строке у нас уже записаны имена колонок таблицы,поэтому данные загружаем ниже первой строки
          НомерСтрокиДок=Объект.ТаблицаЗапроса.ВысотаТаблицы+1;
          
      Для каждого ИмяКолонки Из РезультатЗапроса.Колонки Цикл
            Ячейка=Объект.ТаблицаЗапроса.Область(НомерСтрокиДок,РезультатЗапроса.Колонки.Индекс(ИмяКолонки)+1);
            Ячейка.Текст=ВыборкаДетальныеЗаписи[ИмяКолонки.Имя];
      КонецЦикла; 
    КонецЦикла;

Все, можем проверять, загружаем предприятие под толстым клиентом, вводим простой запрос без параметров, нажимаем на кнопку "ВыполнитьЗапрос" см.рис:

Ура, все работает!!!

Очень удобно, когда при открытии/закрытии нашей Консоли запросов - вновь в поле "ТекстЗапроса" записывается наш текст запроса, с которым мы перед закрытием консоли работали. Для этого просто нужно включить свойство формы = Автосохранение см.рис:

Все, наша консоль работает. Чтобы мы могли писать более сложные запросы с указанием в них параметров - нужно создать еще одну кнопку "НайтиПараметры", так же как и код кнопки "ВыполнитьЗапрос" - код кнопки "НайтиПараметры" будет выполняться на клиенте и на сервере. Далее в серверной процедуре мы точно так же запускаем запрос с переданным в него текстом из окна "ТекстЗапроса", с помощью выражения "Запрос.НайтиПараметры()" находим переданные параметры и просто в цикле вносим их в табличную часть формы "ПараметрыЗапроса". Не забудьте потом из заполненной таблицы параметров передать их в процедуру "ВыполнитьЗапрос".

Можно еще к нашей Консоли добавить пару кнопок, которые будут очищать в пользовательском режиме окно Параметров и окно Текста запроса.

Наша Консоль запросов готова к использованию, желаю успешных творческих решений с помощью такого простого и мощного инструмента, как Консоль запросов!

Данная обработка написана на платформе 1с8.3 (управляемые формы), запускается под толстым клиентом. Так же ее можно написать и на платформе 1с8.2 как под обычными формами, так и под управляемыми.

В загрузке находится образец только что созданной нами Консоли запросов.  

///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

Апгрейд Консоли Запросов:

1)Теперь наша самодельная Консоль запросов со встроенным Конструктором запросов будет запускаться под любым клиентом: под толстым клиентом обычных и управляемых форм и под тонким и веб клиентом.

п.с.Форма и вид встроенного Конструктора запроса отличается - в зависимости от того под каким клиентом мы запустили нашу Консоль.(лично мне привычней и удобней форма Конструктора запросов под толстым клиентом)

&НаКлиенте
Процедура КонструкторЗапроса(Команда)
	//вызов стандартного Конструктора запроса возможен только под толстым клиентом
	#Если ТолстыйКлиентУправляемоеПриложение или ТолстыйКлиентОбычноеПриложение Тогда
		Конструктор=Новый КонструкторЗапроса;
		Если не ПустаяСтрока(Объект.ТекстЗапроса) Тогда
			Конструктор.Текст=Объект.ТекстЗапроса;
		КонецЕсли;
		Если Конструктор.ОткрытьМодально()=Истина Тогда
			Объект.ТекстЗапроса=Конструктор.Текст;
		КонецЕсли; 
	//		#Иначе
	//	      Сообщить("Вызов Конструктора запросов возможен только под толстым клиентом");
	//		  Возврат;
	//# КонецЕсли
		  
	#Иначе
	        Сообщить("Вы запускаете Конструктор запросов под тонким клиентом - он отличается немного по своей форме и скорости производительности!");
			Конструктор = Новый КонструкторЗапроса();
						
		Если не ПустаяСтрока(Объект.ТекстЗапроса) Тогда
			Конструктор.Текст=Объект.ТекстЗапроса;
		КонецЕсли;
			
			ОповещениеКонструктора = Новый ОписаниеОповещения("ВыполнитьПослеЗакрытияКонструктора", ЭтаФорма);
			Конструктор.Показать(ОповещениеКонструктора);
	# КонецЕсли
	КонецПроцедуры

&НаКлиенте
Процедура ВыполнитьПослеЗакрытияКонструктора(Результат, ПараметрыКонструктора)  Экспорт   //Результат=текст,если Конс-р закрыли по кнопке ок
	Объект.ТекстЗапроса = СокрЛП(Результат);   //работает!!!
КонецПроцедуры

2)Добавила возможность в нашу простую Консоль запросов вводить сложные запросы с передаваемой в параметры Временной таблицей!!! Механизм получился очень простой и элегантный - без использования XML-кода, как делают в профессиональных консолях.

Сам код и процедуры по механизму передачи в параметры Временных таблиц Вы сможете посмотреть во втором прикрепленном файле. С чего начала разрабатывать свой вариант Временных таблиц в параметрах можно посмотреть по этой ссылке https://forum.infostart.ru/forum9/topic183700/

Теперь как пользоваться Консолью при сложном запросе, когда в его параметры передана временная таблица. Для примера можете взять код вот этого запроса;

ВЫБРАТЬ
	ВнешниеДанные.Товар,
	ВнешниеДанные.Количество
ПОМЕСТИТЬ ВнешниеДанные
ИЗ
	&ВнешниеДанные КАК ВнешниеДанные
;

////////////////////////////////////////////////////////////////////////////////
ВЫБРАТЬ
	ВнешниеДанные.Товар,
	ВнешниеДанные.Количество,
	ЕСТЬNULL(ОстаткиТоваровОстатки.КоличествоОстаток, 0) КАК Поле1,
	ЕСТЬNULL(ОстаткиТоваровОстатки.КоличествоОстаток, 0) - ВнешниеДанные.Количество КАК Осталось
ИЗ
	ВнешниеДанные КАК ВнешниеДанные
		ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.ОстаткиТоваров.Остатки(
				&Дата,
				Товар В
					(ВЫБРАТЬ
						ВнешниеДанные.Товар
					ИЗ
						ВнешниеДанные КАК ВнешниеДанные)) КАК ОстаткиТоваровОстатки
		ПО ВнешниеДанные.Товар = ОстаткиТоваровОстатки.Товар

По образцу и подобию приведенного выше кода запроса - Вы можете создать свой сложный запрос, с учетом Ваших объектов данных.

Итак, в конструкторе запросов мы создали выше приведенный запрос,закрыв Конструктор - текст запроса попадет в наше поле консоли "ТекстЗапроса",нажимаем на кнопку "НайтиПараметры", видим, что в таблице Параметров появилась строка = "ВнешниеДанные",типЗначения="ТаблицаЗначения",см.рис.

В данной таблице Параметров - вводим параметр Дата,н-р, сегодняшняя дата, потом нажимаем для попытки редактирования на наш параметр временной таблицы "ВнешниеДанные", нажимаем в поле с "ТаблицаЗначений" на три точки - появится выбор типов,жмем строка, наш механизм переворачивает нам страницу на форме, где нам необходимо в ручную ввести эту самую временную таблицу.

Здесь отметьте, что при этом на странице "ВремТаблицы" внизу в поле "Имя временной таблицы в параметрах" - появится имя нашей временной таблицы (оно копируется с таблицы Параметров).

Пока что на странице "ВремТаблицы" мы види только одну пустую таблицу - это таблица Типов нашей будущей временной таблицы.С помощью кнопки "Добавить" - добавим наименование реквизита и типа будущей таблицы. Будьте внимательны - наименование и тип должен соответствовать тому, что мы задали в запросе для &ВнешниеДанные:

Теперь нажимаем кнопку "ОбновитьВременнуюТаблицу" - и у нас здесь же появится вторая таблица - в нее мы уже непосредственно будем набивать через кнопку "Добавить" данные временной таблицы.

Все,можем еще раз перепроверить себя ввели ли мы примитивные данные параметров запроса в таблице параметров на 1-й странице обработки, и жмем кнопку "ВыполнитьЗапрос" - все считает,выбирает соответственно с ограничением по данным, переданых в параметре нашей временной таблицы

п.с.Если Вы сделали ошибку при наборе наименования реквизитов и их типов (в первой таблице) - просто закройте Консоль и откройте ее вновь - временная таблица данных будет стерта - и таблицу Типов вновь можно отредактировать и создать вновь новую таблицу данных.

/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

Вот и все, мы можем своими руками создать очень мощный рабочий инструмент, кроме того, наша консоль еще очень шустрая по сравнению с профессиональными - а это очень большой плюс для разработчиков! И,конечно, теперь наша консоль работает под любым клиентом! Удачи в Ваших творческих разработках!!!

//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

Работаю постоянно своей КонсольюЗапросов, и вот попался недавно очень интересный запрос, в котором Временные таблицы находились не в первом пакете запроса,а в следующих - и вот тут моя консолька чуточку захандрила...Пришлось ей делать еще один апгрейд.

Итак, менеждер Временных таблиц в запросе не всегда понимает, что с ним работают)) Поэтому нужно явно задать этот самый менеджер Временных таблиц:

&НаСервере
Процедура ВыполнитьЗапросНаСервере()
	//апгрейд2-явное определение менеджера ВременныхТаблиц!
	МенеджерВТ=Новый МенеджерВременныхТаблиц;
	
	Запрос = Новый Запрос;
	
	//апгрейд2-явное определение менеджера ВременныхТаблиц!
	Запрос.МенеджерВременныхТаблиц = МенеджерВТ;
	
	Запрос.Текст = Объект.ТекстЗапроса;

Данный вариант консоли лежит в третьей загрузке.

10

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

Наименование Файл Версия Размер
1.Простая Консоль запросов со встроенным КонструкторомЗапросов для 1с8.3(8.2) своими руками:
.epf 9,79Kb
15.02.19
8
.epf 9,79Kb 8 Скачать
2.Функциональная Консоль запросов с Конструктором запросов для 1с8.3 (8.2) под любым клиентом работает + в Параметрах можно задать Врем.Таблицу! :
.epf 12,26Kb
15.02.19
4
.epf 12,26Kb 4 Скачать
3.МногоФункциональная Консоль запросов с Конструктором запросов для 1с8.3 (8.2) под любым клиентом работает + в Параметрах можно задать Врем.Таблицу+МенеджерВременныхТаблиц :
.epf 12,35Kb
05.01.18
33
.epf 12,35Kb 33 Скачать

См. также

Специальные предложения

Комментарии
Избранное Подписка Сортировка: Древо
1. rpgshnik 1177 22.12.17 04:08 Сейчас в теме
Вряд ли кто-то переплюнет "инструменты разработчика", но за теорию плюс!
jaroslav.h; Liris; DrAku1a; jan-pechka; Morkhe; +5 Ответить
2. DrAku1a 1301 22.12.17 10:37 Сейчас в теме
(1) Инструменты разработчика - только под обычные, неуправляемые формы, если не ошибаюсь...
jan-pechka; +1 Ответить
3. Amur_MVS 115 22.12.17 10:50 Сейчас в теме
Спасибо, мне интересно
jaroslav.h; jan-pechka; +2 Ответить
4. boln 995 22.12.17 10:54 Сейчас в теме
Если Конструктор.ОткрытьМодально()=Истина Тогда
Уже не комильфо. В типовых конфигурациях на сегодня по умолчанию запрещено открытие модальных окон и другие НСВ. Будет ошибка. Авторессе - уделить внимание асинхронному программированию :)

А вообще чувства авторессы мне близки. Лет 50 назад, когда я собрал в пионерском радиокружке свой первый детекторный приемник, я испытывал примерно такой же восторг, целый новый мир открылся :)
Serj1C; DrAku1a; BigB; jan-pechka; +4 Ответить
5. jan-pechka 146 22.12.17 11:02 Сейчас в теме
(4)Если Вы работаете над конфигурацией,то у Вас уже априори есть возможность на момент разработки открыть себе в управляемых формах режим модальности (см.рис,прикрепленный к ответу)

А вообще можно и без всякой консоли запросов писать с тем же успехом сложные запросы с использованием встроенного конструктора запросов прямо внутри конфигуратора - но чтобы посмотреть промежуточный результат - постоянно сохраняться и выходить в пользовательский режим - это утомительно...Консоль ускоряет процесс разработки.
Прикрепленные файлы:
6. boln 995 22.12.17 11:05 Сейчас в теме
(5)
Если Вы работаете над конфигурацией,то у Вас уже априори есть возможность на момент разработки открыть себе в упоравляемых формах режим модальности (см.рис,прикрепленный к ответу)
Однако для профессиональных разработок это не прокатит. В настоящее время предполагается обязательная возможность работы из веб-клиента, а там никакие НСВ не разрешаются.
7. Boneman 218 22.12.17 11:05 Сейчас в теме
конструктор запроса в тонком клиенте давно уже работает.
JohnConnor; jan-pechka; boln; +3 Ответить
8. boln 995 22.12.17 11:08 Сейчас в теме
(7)
конструктор запроса в тонком клиенте давно уже работает.
Кстати, верное замечание. Правда, плохонький, тормозит сильно и многие функции не так удобны, как в обычном. Но для веб-клиента сойдет.
9. jan-pechka 146 22.12.17 11:36 Сейчас в теме
(7)В этой статье я попробывала рассказать как соорудить для себя инструмент и при этом так же пройти этап обучения азам языка 1с8...мне вот это дается не просто - справка восьмерки просто убивает напрочь!)) Но когда сильно захотелось хотя бы что-нибудь сделать,например,простенький прототип мультика (https://infostart.ru/public/714992/ ) на 1с8 , то потихонечку начала разбираться в справке 1с8 - там просто все функции в одной большой куче свалены: и под управляемые формы и под обычные....

Если Вы очень хорошо уже разобрались в предоставленной схеме кодирования своей Консоли запросов под толстым клиентом, то вот добавьте тогда,пожалуйста, вот этот код
для управляемых форм вызов Конструктора Запроса под тонким и веб клиентом.

И тогда наша простенькая,но восхитительная Консоль запросов будет вообще на вес золота!)).Спасибо за интерес к теме!

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

	КонецПроцедуры
	
	&НаКлиенте
Процедура ВыполнитьПослеЗакрытияКонструктора(Результат, ПараметрыКонструктора)  Экспорт
	ТекстЗапроса = СокрЛП(Результат);
	Если ЗначениеЗаполнено(ТекстЗапроса) Тогда  
		ПараметрыКонструктора.ТекстЗапроса = ТекстЗапроса;
		Модифицированность = Истина;
	Иначе
		Модифицированность = Ложь;
	КонецЕсли;	
КонецПроцедуры
Показать


п.с.единственное, что мне ну как-то не привычно - Конструктор запросов под тонким клиентом как гвоздей наелся - никак его в маленькое скромненькое окошко не свернуть))) Но зато чисто под тонким и веб клиентом работает.
Прикрепленные файлы:
10. boln 995 22.12.17 11:48 Сейчас в теме
(9) Как сказал бы незабвенный Владимир Ильич, "правильной дорогой идете, товарищ!".
Вы - настойчивая и упорная, со временем достигнете высочайших вершин в 1С, если не надоест, конечно :)
jan-pechka; +1 Ответить
11. boln 995 22.12.17 11:51 Сейчас в теме
(9)
справка восьмерки просто убивает напрочь!
Справка - она и есть справка, по ней учиться нельзя (хотя я 20 лет назад учился VBA по справке, там она была как учебник). Справка - это вспомнить то, что забылось из уже постигнутого.

Лучше книжечки почитывать, и безплатных курсов сейчас в сети полно, и вообще инфы всякой ценной. Я вот последнее время только в Интернете и учусь.
jan-pechka; +1 Ответить
13. jan-pechka 146 22.12.17 15:11 Сейчас в теме
(12)Очень хорошие инструменты Вы показали!!!
Но ни каждый разработчик вот так сходу может открыть готовый профессиональный продукт и сказать:"ааа,я знаю теперь как это работает"

на скринах - частичка всего того,что находится в проф.консоли...но уже может закружиться голова!!! Вызывают Конструктор для тонкого кл.стандартно(сравните скрин и код выше), только вот разобраться что да как трудновато...
Прикрепленные файлы:
15. jan-pechka 146 22.12.17 15:31 Сейчас в теме
(12)не крепятся к предыдущему посту еще скрины, приклею их тут, вот посмотрите на скрин - столько работы запутанной на тонны страниц провели профессионалы с Консолью,на которую Вы дали ссылку, а она все равно выдает баг....

Потом в конструкторе запросов, вызванном под тонким или веб клиентом - нет возможности создать и описать поля Временной таблицы...А это ой как надо!!!

И как же чертовски тормозит профессиональная разработка!!!! Даже если возьмете указанный мною чуть выше код для конструктора запросов под тонкий клиент и установите на образец, который мы создавали здесь своими руками,то наша разработка вообще легкая и не тормозит!!!
Прикрепленные файлы:
17. boln 995 22.12.17 16:28 Сейчас в теме
(12) Вот чем мне не нравится Консоль для УФ от 1С, так это тем, что ее файл списка запросов (q1c) не совместим с файлом до сих пор очень популярной Консоли запросов для обычного режима (sel).

Я, когда делал свою Консоль запросов для УФ в 2010 году, сделал файл списка запросов аналогичным формату sel. Многим нравится.
14. Liris 40 22.12.17 15:19 Сейчас в теме
(0) Прошу прощения, вопрос не по теме статьи.
На всех снимках экрана, которые содержат код, заметил "не типовой" шрифт текстов модулей. Понравился шрифт, напишите его название, пожалуйста.
16. jan-pechka 146 22.12.17 15:33 Сейчас в теме
(14)Georgia, 12
Прикрепленные файлы:
18. boln 995 22.12.17 16:35 Сейчас в теме
(15)
Потом в конструкторе запросов, вызванном под тонким или веб клиентом - нет возможности создать и описать поля Временной таблицы...А это ой как надо!!!
Почему же нет, есть:
Прикрепленные файлы:
jan-pechka; +1 Ответить
19. jan-pechka 146 23.12.17 21:46 Сейчас в теме
Здесь продолжаю искать варианты как к моей простой Консоли запросов добавить механизм в котором в запрос будут передаваться в виде параметров Временные таблицы.
https://forum.infostart.ru/forum9/topic183700/#message1903300
ivangrant; +1 Ответить
20. JohnConnor 33 16.01.19 13:20 Сейчас в теме
статья интересная, но отформатирована так что "Вырви глаз"
21. ivangrant 18.02.19 13:04 Сейчас в теме
Какой запрос написан в процедуре ОчиститьПараметры ?
Оставьте свое сообщение