select a.usename, count(l.pid) from pg_locks l inner join pg_stat_activity a on a.procpid = l.pid where not(mode = ‘AccessShareLock’) group by a.usename;   

 SELECT tableName, pg_size_pretty(pg_total_relation_size(CAST(tablename as text))) as size

from pg_tables

where tableName not like ‘sql_%’ and pg_size_pretty(pg_total_relation_size(CAST(tablename as text))) like ‘%MB%’;   

 SELECT tableName, pg_size_pretty(pg_total_relation_size(CAST(tablename as text))) as size

from pg_tables

where tableName not like ‘sql_%’

order by size;   

 select a.usename, t.relname, a.current_query, mode from pg_locks l inner join pg_stat_activity a on a.procpid = l.pid inner join pg_stat_all_tables t on t.relid=l.relation where t.relname = ‘tablename’;   

 select relation::regclass, mode, a.usename, granted, pid from pg_locks l inner join pg_stat_activity a on a.procpid = l.pid where not mode = ‘AccessShareLock’ and relation is not null;   

 select a.usename, a.current_query, mode from pg_locks l inner join pg_stat_activity a on a.procpid = l.pid where mode ilike ‘%exclusive%’;   

 select a.usename, count(l.pid) from pg_locks l inner join pg_stat_activity a on a.procpid = l.pid where not(mode = ‘AccessShareLock’) group by a.usename;   

 select count(usename), usename from pg_stat_activity group by usename order by count(usename) desc;   

 Запрос = Новый Запрос;

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

"ВЫБРАТЬ

|	ВЫБОР

|		КОГДА ОтражениеЗарплатыВРеглУчетеОтражениеВУчете.СубконтоДт1 ССЫЛКА Справочник.НоменклатурныеГруппы

|			ТОГДА ОтражениеЗарплатыВРеглУчетеОтражениеВУчете.СубконтоДт1

|		КОГДА ОтражениеЗарплатыВРеглУчетеОтражениеВУчете.СубконтоДт2 ССЫЛКА Справочник.НоменклатурныеГруппы

|			ТОГДА ОтражениеЗарплатыВРеглУчетеОтражениеВУчете.СубконтоДт2

|		КОГДА ОтражениеЗарплатыВРеглУчетеОтражениеВУчете.СубконтоДт3 ССЫЛКА Справочник.НоменклатурныеГруппы

|			ТОГДА ОтражениеЗарплатыВРеглУчетеОтражениеВУчете.СубконтоДт3

|	КОНЕЦ КАК Измерение,

|	ОтражениеЗарплатыВРеглУчетеОтражениеВУчете.LOCATION_ACTIVITY,

|	ОтражениеЗарплатыВРеглУчетеОтражениеВУчете.REVENUE_COST_CENTER,

|	ОтражениеЗарплатыВРеглУчетеОтражениеВУчете.Сумма,

|	ОтражениеЗарплатыВРеглУчетеОтражениеВУчете.Ссылка.Организация,

|	ОтражениеЗарплатыВРеглУчетеОтражениеВУчете.Ссылка.Комментарий,

|	ОтражениеЗарплатыВРеглУчетеОтражениеВУчете.Ссылка КАК Документ

|ПОМЕСТИТЬ втПоИзмерениям

|ИЗ

|	Документ.ОтражениеЗарплатыВРеглУчете.ОтражениеВУчете КАК ОтражениеЗарплатыВРеглУчетеОтражениеВУчете

|ГДЕ

|	ОтражениеЗарплатыВРеглУчетеОтражениеВУчете.Ссылка.Проведен

|	И ОтражениеЗарплатыВРеглУчетеОтражениеВУчете.Ссылка.ПериодРегистрации МЕЖДУ &НачалоПериода И &ОкончаниеПериода

|;

|

|////////////////////////////////////////////////////////////////////////////////

|ВЫБРАТЬ

|	втПоИзмерениям.Измерение,

|	втПоИзмерениям.LOCATION_ACTIVITY,

|	втПоИзмерениям.REVENUE_COST_CENTER,

|	втПоИзмерениям.Сумма,

|	втПоИзмерениям.Организация,

|	втПоИзмерениям.Комментарий,

|	втПоИзмерениям.Документ

|ИЗ

|	втПоИзмерениям КАК втПоИзмерениям

|ГДЕ

|	втПоИзмерениям.Измерение ССЫЛКА Справочник.НоменклатурныеГруппы";

Запрос.УстановитьПараметр("НачалоПериода", Дата("01.09.2014 0:00:00"));

Запрос.УстановитьПараметр("ОкончаниеПериода", Дата("30.09.2014 23:59:59"));





Результат = Запрос.Выполнить();

Выборка = Результат.Выгрузить();

Для каждого СтрокаТЗ Из Выборка Цикл



КонецЦикла;   

 RS= Новый COMОбъект("ADODB.Recordset");

SSource = "S_elect * FROM nomen.dbf WHERE cost>100";

SConnect = "Provider=MSDASQL.1;Persist Security Info=False;Data Source=nomen.dbf;Initial Catalog=D:\";

RS.Open(SSource,SConnect);

Пока RS.EOF() = 0 Цикл

//Сообщить (RS.Fields("Code").Value+" "+RS.Fields("Name").Value+" "+Строка(RS.Fields("Cost").Value)+" "+RS.Fields("Ed").Value);



Сообщить (RS.Fields("Code").Value+" "+Строка(RS.Fields("Cost").Value));

RS.MoveNext();

КонецЦикла;

RS.Close();