Упрощение работы с SQL запросами и встроенная консоль

18.03.24

Разработка - Инструментарий разработчика

Просто надоело писать много букв (постоянно описывать коннекторы и объекты). Была создана обработка для минимизации кода и помогает Ctrl+пробел.

Скачать файл

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

Наименование По подписке [?] Купить один файл
Запрос SQL и консоль:
.epf 54,88Kb ver:3.240318
19
19 Скачать (1 SM) Купить за 1 850 руб.

Платформа минимум 8.3.6.1977 будет работать на платформах 8.2 если заменить функцию СтрРазделить на свою.

Обработка тестировалась на платформе 8.3.10.2580. 

Конфигурация не имеет значения.

 

Примеры использования обработки:

1. Инициализировали данные подключения и написали запрос.

ЗапросSQL = Обработки.ЗапросSQL.Создать();
ЗапросSQL.Сервер = "server";
ЗапросSQL.База = "base";
ЗапросSQL.Пользователь = "user";
ЗапросSQL.Пароль = "PSW";
ЗапросSQL.Текст = 
	"SELECT
 	|Контры.INN ИНН,
 	|COUNT(DISTINCT Контры.Firma) Организация,
 	|MAX(Контры.Date) Дата
 	|	FROM IS_Customers_MeetCredit2 Контры 
 	|GROUP BY Контры.INN";

2. А затем выполняем запрос и обрабатываем результаты.  

2.0  Реквизит обработки "Выполнено" является индикатором выполнения запроса. 

2.1 Результат в выборку - функция Выбрать() которая возвращает выборку по полям запроса.


ВыборкаSQL = ЗапросSQL.Выбрать(); //элемент выборки ВыборкаSQL
Пока ЗапросSQL.СледующийИзВыборки() Цикл 
	Сообщить("Результат: " + ВыборкаSQL.Дата + ВыборкаSQL.ИНН + " - " + ВыборкаSQL.Организация);
КонецЦикла;

//Функци выборки ВыборкаSQL = ЗапросSQL.Выбрать(); элемент выборки ВыборкаSQL
//ЗапросSQL.СледующийИзВыборки();
//ЗапросSQL.ВНачалоВыборки();
//ЗапросSQL.ВКонецВыборки();
//ЗапросSQL.ПреведущийИзВыборки();
//ЗапросSQL.УстановитьНаПазициюВВыборки(3);

2.2 Результат в таблицу - функция Выгрузить(ТаблицаКоторуюЗаполнитьРезультатом = Неопределено) которая возвращает таблицу значений .

Если в параметр "ТаблицаКоторуюЗаполнитьРезультатом" передать таблицу значений, то она заполниться в соответствии, колонка т.з. - поле запроса.


Таблица = ЗапросSQL.Выгрузить();
Если ЗапросSQL.Выполнено Тогда  // Или Таблица <> Неопределено
	Таблица.ВыбратьСтроку();
КонецЕсли;	

Таблица = Новый ТаблицаЗначений;
Таблица.Колонки.Добавить("ИНН");
ЗапросSQL.Выгрузить(Таблица);
Таблица.ВыбратьСтроку();

2.3 Результат в запрос (самая полезная имхо) - функция ЗапросSQL.ВыгрузитьВЗапрос(ИмяВременнойТаблици,Запрос1с = Неопределено) которая возвращает запрос 1с и временную таблицу в нем.

Если передать в параметр  "Запрос1с" передать запрос 1с то временная таблица добавиться в этот запрос.

Запрос1С = ЗапросSQL.ВыгрузитьВЗапрос("ИмяВременнойТаблици");
//Подключаем другую базу
ЗапросSQL.Сервер = "server2";
ЗапросSQL.База = "est1s";
ЗапросSQL.Пользователь = "est1s";
ЗапросSQL.Пароль = "est1s";
ЗапросSQL.Текст = 
	"SELECT
	|	sdate.stend,
	|	sdate.state
	|FROM	sdate AS sdate";
ЗапросSQL.ВыгрузитьВЗапрос("ИмяВременнойТаблици2",Запрос1С);
Запрос1С.Текст = 
		"ВЫБРАТЬ
		|	Контрагенты.Ссылка,
		|	ИмяВременнойТаблици2.stend
		|ИЗ
		|	Справочник.Контрагенты КАК Контрагенты
		|		ВНУТРЕННЕЕ СОЕДИНЕНИЕ ИмяВременнойТаблици КАК ИмяВременнойТаблици
		|		ПО (ИмяВременнойТаблици.ИНН = Контрагенты.ИНН)
		|		ВНУТРЕННЕЕ СОЕДИНЕНИЕ ИмяВременнойТаблици2 КАК ИмяВременнойТаблици2
		|		ПО (ИмяВременнойТаблици2.stend = ИмяВременнойТаблици.Организация)";
Выборка = Запрос1С.Выполнить().Выбрать();
Пока Выборка.Следующий() Цикл
	Сообщить("Результат: " + Выборка.Ссылка + " : " + Выборка.stend);
КонецЦикла;

2.3 Классика жанра - функция Получить() 

Результат = ЗапросSQL.Получить();
Пока Не Результат.EOF Цикл 
	Сообщить("Результат: " + Результат.Fields.Item("ИНН").Value);
	Результат.MoveNext();
КонецЦикла;	

3. И еще дополнительно можно:

//---------------------------- Файлы -------------------------------------------
ЗапросSQL.Текст = "INSERT INTO sdate (stend,state)	VALUES (1,?)" ;
ЗапросSQL.УстновитьФайлКакПараметр("D:\bender_iz_futuramy_1600x1200_4997.jpg");
ЗапросSQL.Получить();

Если ЗапросSQL.Выполнено Тогда
	ЗапросSQL.Текст = "SELECT TOP 1 state FROM sdate";
	ЗапросSQL.ВыгрузитьВФайл("state","D:\test.jpg");
КонецЕсли;	

//---------------------------- ActiveDirectory -------------------------------------------
ЗапросSQL.НастройкаКакActiveDirectoryProvider();
ЗапросSQL.Текст =  "SELECT Name,ADSPath,SAMAccountName  FROM 'LDAP://DC=domen,DC=ru' WHERE Name='*/*'";
ВыборкаSQL = ЗапросSQL.Выбрать();
Пока ЗапросSQL.СледующийИзВыборки() Цикл 
	Сообщить("Результат: " + ВыборкаSQL.Name + ВыборкаSQL.ADSPath + " - " + ВыборкаSQL.SAMAccountName);
КонецЦикла;

//---------------------------- Всякое - Работают только с Выгрузить(); Пост обработка таблицы. -------------------------------------------

ЗапросSQL.ФункцияЗамены.Вставить("ИНН","СтрЗаменить(&values&,""0"",""*"")"); 
ЗапросSQL.ФункцияЗамены.Вставить("Организация","&values& * -1"); 
ЗапросSQL.Выгрузить().ВыбратьСтроку();
ЗапросSQL.Квалификаторы.Вставить("ИНН",Новый ОписаниеТипов("Строка",,,,Новый КвалификаторыСтроки(2,ДопустимаяДлина.Фиксированная))); 
ЗапросSQL.Выгрузить().ВыбратьСтроку();
ЗапросSQL.ПредставлениеКолонки.Вставить("ИНН","Это ИНН"); 
ЗапросSQL.Выгрузить().ВыбратьСтроку();

p.s. Добавил кнопку создания на sql сервере БД соответствия данных 1с и sql. Связь object_id - ключ

Проверено на следующих конфигурациях и релизах:

  • 1С:Комплексная автоматизация 2, релизы 3.1.22.80

SQL

См. также

Инструментарий разработчика Роли и права Запросы СКД Программист Руководитель проекта Платформа 1С v8.3 Управляемые формы Запросы Система компоновки данных Платные (руб)

Инструменты для разработчиков 1С 8.3: Infostart Toolkit. Автоматизация и ускорение разработки на управляемых формах. Легкость работы с 1С.

12000 руб.

02.09.2020    169274    937    403    

905

Инструментарий разработчика Чистка данных Свертка базы Инструменты администратора БД Системный администратор Программист Руководитель проекта Платформа 1С v8.3 Россия Платные (руб)

Инструмент представляет собой обработку для проведения свёртки или обрезки баз данных. Работает на ЛЮБЫХ конфигурациях (УТ, БП, ERP и т.д.). Поддерживаются серверные и файловые базы, управляемые и обычные формы. Может выполнять свертку сразу нескольких баз данных и выполнять их автоматически без непосредственного участия пользователя. Решение в Реестре отечественного ПО

8400 руб.

20.08.2024    12600    99    42    

101

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

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

9360 руб.

17.05.2024    26529    90    48    

134

Пакетная печать Печатные формы Инструментарий разработчика Программист Платформа 1С v8.3 Запросы 1С:Зарплата и кадры бюджетного учреждения 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 Платные (руб)

Инструмент, позволяющий абсолютно по-новому взглянуть на процесс разработки печатных форм. Благодаря конструктору можно значительно снизить затраты времени на разработку печатных форм, повысить качество и "прозрачность" разработки, а также навести порядок в многообразии корпоративных печатных форм.

22200 руб.

06.10.2023    16825    41    15    

75

SALE! %

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

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

4800 3840 руб.

14.01.2013    190550    1150    0    

918

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

Расширение позволяет без изменения кода конфигурации выполнять проверки при вводе данных, скрывать от пользователя недоступные ему данные, выполнять код в обработчиках. Не изменяет данные конфигурации, легко устанавливается практически на любую конфигурацию на управляемых формах.

15000 руб.

10.11.2023    11392    40    27    

66

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

Разработка Конструктор автоматизированных рабочих мест "Конструктор АРМ" реализована в виде расширения и является универсальным инструментом для создания АРМ любой сложности в пользовательском режиме.

3600 руб.

27.12.2024    775    2    0    

4

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

Восстановление партий или взаиморасчетов, расчет зарплаты, пакетное формирование документов или отчетов - теперь все это стало доступнее. * Есть желание повысить скорость работы медленных алгоритмов! Но... * Нет времени думать о реализации многопоточности? * о запуске и остановке потоков? * о поддержании потоков в рабочем состоянии? * о передаче данных в потоки и как получить ответ из потока? * об организации последовательности? Тогда ЭТО - то что надо!!!

5000 руб.

07.02.2018    103926    244    100    

306
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. user700035_6550355 34 06.08.18 11:36 Сейчас в теме
В обычном приложении не работает?

{ВнешняяОбработка.ЗапросSQL.МодульОбъекта(430,12)}: Процедура или функция с указанным именем не определена (СтрРазделить)
Данные = <<?>>СтрРазделить(СтрокаТЗ.Метаданные,".");
3. SanyMaga 69 06.08.18 13:18 Сейчас в теме
Сори не учел. Минимум 8.3.6.1977(обычный и уф) будет работать на платформах 8.2 если заменить функцию СтрРазделить на свою.
Например здесь https://helpf.pro/faq/view/1815.html
4. SanyMaga 69 06.08.18 13:20 Сейчас в теме
Сори. Минимум 8.3.6.1977. Нужно заменить функцию СтрРазделить на свою.
6. kuzyara 2106 09.08.18 04:26 Сейчас в теме
(1) замени СтрРазделить на свою, т.к. есть только с 8.3.6.1977
2. SanyMaga 69 06.08.18 13:11 Сейчас в теме
минимум 8.3.6.1977 будет работать на платформах 8.2 если заменить функцию СтрРазделить на свою.
5. kuzyara 2106 09.08.18 04:25 Сейчас в теме
обработка работает минимум на 8.3.6.1977, на платформах 8.2 нужно заменить функцию СтрРазделить на свою.
Оставьте свое сообщение