Kostenich Victor

48
Рейтинг

victor_goodwill



  •   Регистрация: 24.04.2009 (15 лет назад)

  •   Был(а) на сайте: 25.04.2024

Друзья
  • Александр Кузиков
Подписчики 8

Группы

Партнер IS-WP

Рейтинг 48

Компонента "Быстрый регистр" для 1С 7.7 (на прямых запросах SQL 1c++)

Инструменты и обработки Программист Платформа 1С v7.7 Windows Абонемент ($m) Внешний отчет (ert,erf) Универсальные функции

Ускорение операций с регистрами 1с 7.7 через объектную модель, за счет доступа через прямые запросы SQL (1c++). Существует возможность добавления произвольных подзапросов соединений c другими таблицами и отборов WHERE, гибкой настройки вывода полей в результат

1 стартмани

13.01.2014    16947    9    victor_goodwill    8       

7

Комментарии

HighLoadРешение проблем подвисания 1С “в онлайне”. Инструмент - консоль управления блокировками и процессами 1С и PostgreSQL (MS SQL - тестируется)#23 10.03.23 11:43
(22) Добрый, обработка под MS SQL дописана, но не прошла полноценного тестирования. Думаю там остались небольшие штрихи. Ну и те, кто хорошо в нем разбираются смогут сделать более тонкую настройку и какие-то фичи для себя
HighLoadРешение проблем подвисания 1С “в онлайне”. Инструмент - консоль управления блокировками и процессами 1С и PostgreSQL (MS SQL - тестируется)#21 27.01.23 6:04
(19) Также может быть проблема с некорректным адресом сервера предприятия и его порта (если он не стандартный)
HighLoadРешение проблем подвисания 1С “в онлайне”. Инструмент - консоль управления блокировками и процессами 1С и PostgreSQL (MS SQL - тестируется)#20 27.01.23 6:03
(19) Откройте отчет об ошибке что пишет. Чаще всего проблема с COM- коннектором
Код
Соединитель = Новый COMОбъект("V83.COMConnector");


Для его корректной работы на сервере предприятия необходимо зарегистрировать comcntr.dll через regsvr32.exe
HighLoadРешение проблем подвисания 1С “в онлайне”. Инструмент - консоль управления блокировками и процессами 1С и PostgreSQL (MS SQL - тестируется)#18 16.11.22 6:13
(16) К сожалению тут не подскажу, у меня были тексты запросов на тестовом Express сервере. Если есть решение проблемы - предлагайте, попробую исправить.
HighLoadРешение проблем подвисания 1С “в онлайне”. Инструмент - консоль управления блокировками и процессами 1С и PostgreSQL (MS SQL - тестируется)#14 12.11.22 14:33
(3) (9) (11) Выпустил наконец-то версию с поддержкой MS SQL, но сам не тестировал - нет работающей базы 1С под MS SQL - протестировал только запрос получения исполняемых запросов и встроил его в обработку. Всем кто качал ранее - напишите в личку, отправлю доработанную обработку на почту или другим способом
HighLoadРешение проблем подвисания 1С “в онлайне”. Инструмент - консоль управления блокировками и процессами 1С и PostgreSQL (MS SQL - тестируется)#13 11.11.22 17:20
(11) Извините, сделал, как вы сказали - исправил заголовок, пока не доработаю под MS SQL.
HighLoadРешение проблем подвисания 1С “в онлайне”. Инструмент - консоль управления блокировками и процессами 1С и PostgreSQL (MS SQL - тестируется)#8 04.09.22 17:46
(7) Здравствуйте! На данный момент нет, я пока не нашел время чтобы настроить тестовый стенд и отладить работу на MS SQL. Если быть уверенным в запросе для получения текущих запросов, которую приводили в (3), то могу без тестирования доработать обработку и сделать переключение между СУБД. Или если вы предложите другой запрос
HighLoadРешение проблем подвисания 1С “в онлайне”. Инструмент - консоль управления блокировками и процессами 1С и PostgreSQL (MS SQL - тестируется)#6 09.08.22 10:27
(5) Исправил, убрал зависимости

Вот код, который я добавил:
Код
Функция ПолучитьАДОCommand(Знач ConnectionString="") Экспорт 
   
   #Если Не МобильноеПриложениеСервер Тогда    
   Соединение = Новый COMОбъект("ADODB.Connection");
   Соединение.ConnectionTimeOut = 70;
   Соединение.CommandTimeout = 70;
   Соединение.CursorLocation = 3;
   Соединение.ConnectionString = ConnectionString;
   try
      Соединение.Open();  
   except 
      Сообщить("Невозможно установить соединение");
      //Сообщить(ConnectionString);
      Возврат -1;
   endtry;
   
   Cmd = Новый COMОбъект("ADODB.Command");
   Cmd.ActiveConnection = Соединение;
   Cmd.CommandTimeout = 70;
   Возврат Cmd;   
   #КонецЕсли
КонецФункции


Функция ПолучитьADOCommandТекущейБазыSQL() 
   ConnectionString="Driver={PostgreSQL ANSI(x64)}; Server="+СерверБД+"; Database="+ИмяБД+"; Uid="+ПользовательБД+"; Pwd=" +ПарольБД;
   Возврат ПолучитьАДОCommand(ConnectionString);
КонецФункции   


Кроме того, добавил 4 реквизита на форму СерверБД, ИмяБД, ПользовательБД, ПарольБД