Опробованная версия скрипта SQLIntellisence
Занимается тем, что пытается определить какие поля пойцдут после точки,
после "$","*" и на пустой строке (после "|..."). Работает в "целом" тексте запроса,
который в модуле представлен 1-м куском:
ТекстЗапроса = "
|SELECT .....
|.....
|......."

После точки пытается определить таблицу, с которой имеем дело.
Таблицы определяются по патернам:
"(\s+FROM|,)+\s+([a-zA-Zа-яА-Я0-9_])+\s+as\s"+cObj
"\s+JOIN+\s+([a-zA-Zа-яА-Я0-9_\$\.])+\s+as\s"+cObj
где cObj - имя объекта который стоит перед точкой в запросе.

После "$" скрипт выставляет список стандартных идентификаторов:
$Документ, $Справочник,... + дополняет списком алиасов таблиц, перечисленных
в запросе.

После "|" т.е. в пустой строке представляет список шаблонов типа:
"SELECT * "
"SELECT * @FROM"
"SELECT * @FROM @WHERE" и т.п.

После "*" скрипт выдает список функций SQL
После ":" скрипт выдает список идентификаторов элемента диалога
типов: "Реквизит,ПолеСписок,Флажок,Переключатель"

Изменения:
     * scripts/Intellisence/SQLIntellisence.vbs 1.4:
           [+] К шаблонам добавлено ORDER BY
           [+] Если распознанная табличка у нас _1SJOURN.$ОбщийРеквизит идет автоподстановка списка общих рекв-ов документа. Форматирование.
     * scripts/Intellisence/SQLIntellisence.vbs 1.5:
           [+] Заготовка для внедрения пунтосвитчерных дел в скрипт
     * system/ScriptingPlus.wsc 1.2:
           [+] Добавлен комментарий с версией
     * scripts/Intellisence/SQLIntellisence.vbs 1.2:
           [+] Для справочника добавим поля:
           CODE,DESCR, PARENTEXT, PARENTID,ISFOLDER
           [+] Рефакторинг с  использованием ScriptingPlus.AppendStr
Актуальне релицы внизу....

Немного пофиксил. Брать в "0". обновился и wsc и скрипт и описание.
Изменения:
- После ":" скрипт выдает список идентификаторов элемента диалога 
типов: "Реквизит,ПолеСписок,Флажок,Переключатель"
- немного усложнен патерн исходной таблицы.
- багфиксы.

Ну ОК-и. Если есть пожелания - пиши..

Сделай, пожалуйста, чтобы окошко вылазило под курсором, а не в центре, если возможно конечно.

Подправил немного.

[+] Упростил шаблоны. Добавил немного:
-(NOLOCK)
-INNER JOIN $<что> as <как> on <условие соединенний>
[+] Добавил подстановку после "$":
-$РегистрОстатки
-$Регистр
добавил там-же алиасы.
[+] Добавил контроль на 3 точки, работаем только с 2-мя точками.
[-] Баги.
[+] Добавил генерацию списков атрибутов для:
-$РЕГИСТРОСТАТКИ
-$РЕГИСТР
-$ОБЩИЙРЕКВИЗИТ
[+] выбор результата осуществляется вместо:
CommonScripts.SelectValue(strMetod) локальной процедуриной использующей вызов:
Scripts("Intellisence").SelectFromList(psStrValues, "")
Тем самым используются настройки Intellisence.vbs.
Шаблоны так-же вызываются и после "," как вызывались на пустой строке.

Может уже из "пробной" перевести в разряд "опробованной"?

Update mini. v 1_9
Баг фиксы.

Цитата:

На данный момент "да", т.к. скрипт пользуется процедурой и настройками Intellisence.
Но функционал можно перенести в сам скрипт.

2.5 метра откуда взялось?

Леш, помоему без этого никак т.к. там содержатся не только Интеловский скрипт, но и еще пара-тройка файлов, необходимых для функционирования SQLIntellisence.
Прийдется много чего отвязывать (читай переделывать), а это разумно?
ПС. в принципе не много, но прийдется выдирать из инсталятора нужные файлы и реализовывать функционал заново.
Лучше качни да поставь. Меньше будет ненужной мороки...

Верю. Такое же впечатление.
ОК. Попробую сделать минисборку.
Тока эта, скажи че те надо...
ПС. Только я поступаю немного подругому. Ставлю только нужные плагины.

Попробуй:

Цитата:

По-моему, его вызов надо на горячую клавишу повесить.

trdm писал(а) 30. Марта 2007 :: 06:26:

Мммм... эээээ.... Я думал, что она, как телепат, будет при наборе подхватывать...
Тогда напиши как пользоваться для полных даунов вроде меня.

Хм... угу... Спасибо. Теперь дошло окончательно.

А можешь сделать, чтобы он не обращал внимания на 1С-кие комментарии, разрывающие текст запроса?
Поясню.
Есть такой запрос:

ТекстЗапроса = "
	|SELECT
	|	ЗаменаОСАГО.iddoc as [Замена $Документ.ЗаменаОСАГО]
//	|	,CAST($ЗаменаОСАГО.Взнос as NUMRERIC(10,3)) as ВзносЗамены
	|	,$ЗаменаОСАГО.Взнос as ВзносЗамены
	|	,$ЗаменаОСАГО.НомерПолиса as НомерПолисаЗамены
	|	,ДоговораОСАГО.iddoc as [Договор $Документ.ДоговораОСАГО]
//	|	,CAST($ДоговораОСАГО.Взнос  as NUMRERIC(10,3)) as ВзносДоговора
	|	,$ДоговораОСАГО.Взнос as ВзносДоговора
	|	,$ДоговораОСАГО.НомерПолиса as НомерПолисаДоговора
	|	,$ДоговораОСАГО.Начало as Начало
	|	,$ДоговораОСАГО.Конец as Конец
	|FROM
	|	$Документ.ЗаменаОСАГО as ЗаменаОСАГО
	|INNER JOIN
	|	1SJourn as Журнал ON Журнал.iddoc = ЗаменаОСАГО.iddoc
	|INNER JOIN
	|	$Документ.ДоговораОСАГО as ДоговораОСАГО ON $ЗаменаОСАГО.ДокументОснование = ДоговораОСАГО.iddoc
	|WHERE
	|	$ДоговораОСАГО.Начало BETWEEN :НачДата~~ AND :КонДата~~
	|	AND Журнал.Closed = 5 

Скрипт будет пахать только после второго комментария, т.е. со строки

|	,$ДоговораОСАГО.Взнос as ВзносДоговора 

trdm писал(а) 04. Апреля 2007 :: 12:20:

Супер! Всё работает. Спасибо.

alest писал(а) 11. Апреля 2007 :: 12:26:

Спасибо за коммит. может и стоит )

Не работает ,  пишет:
Не могу создать объект ScriptingPlus.Function
Скрипт SQLIntellisence не загружен

trdm писал(а) 15. Мая 2007 :: 05:59:


Спасибо, помогло

Дайте точный и последний набор нужных файлов, обновлю.

Дождусь подтверждения от автора, что это последняя версия, и нет проблем
Дима, отзовись.