Помогите пожалуйста! Проблема с 1С по сети!
Показывать по
10
20
40
сообщений
- 1
- 2
23.11.2007
15:20
#11
"Процедура ОбновитьСчета(чРеж = 0)
Если Выбран()=1 Тогда
тзСчета.УдалитьСТроки();
глЗагрузитьСписок("Счета",ТекущийЭлемент(),тзСчета);
КонецЕсли;
тзСчета.Сортировать("ДатаРег, ВремяРег");
флОбнСчета = Да; // Таблица счетов должна обновляться единожды
КонецПроцедуры // ОбновитьСчета
Функция ПриПростоях()
// // Определение текущего контактного лица для обновления списка телефонов .....
и дальше куча текста, все не буду перекидать просто
невлезет очень много! если надо перекинуть могу по ISQ
"
Если Выбран()=1 Тогда
тзСчета.УдалитьСТроки();
глЗагрузитьСписок("Счета",ТекущийЭлемент(),тзСчета);
КонецЕсли;
тзСчета.Сортировать("ДатаРег, ВремяРег");
флОбнСчета = Да; // Таблица счетов должна обновляться единожды
КонецПроцедуры // ОбновитьСчета
Функция ПриПростоях()
// // Определение текущего контактного лица для обновления списка телефонов .....
и дальше куча текста, все не буду перекидать просто
"
23.11.2007
15:34
#12
В отладчике пункт меню Отладка и далее Замер производительности включите, прогоните процедуру ОбновитьСчета (переключитесь в 1С предприятии в справочнике на закладку счета), как процедура отработает, отключите замер производительности и покажите результаты. Еще бы не мешало глянуть процедуру глЗагрузитьСписок из глобального модуля.
23.11.2007
18:07
#13
"вот результаты но не все
Справочник.МедУчрежд.Форма 375 ОбновитьСчета(); 1 57.541118 99.84
Справочник.МедУчрежд.Форма 103 глЗагрузитьСписок("Счета",ТекущийЭлемент(),тзСчета); 1 57.539771 99.84
Глобальный модуль 62 Рег.ВыгрузитьИтоги(тбИтоги); 1 55.373092 96.08
Глобальный модуль 64 тбИтоги.Свернуть("Счет","Сумма"); 1 2.152149 3.74
Справочник.МедУчрежд.
ФормаСписка.ФормаСписка 28 Форма.тКолЭлементов.Заголовок(""""); 3 0.017811 0.03
......
......
Справочник.МедУчрежд.Форма 167 КонецЕсли; 1 0.000001 0.00
а при выделении всех пунктов в низу написалоо
кол. 123 время 172.72704 %(врем.)299.7
и еще процедура глЗагрузитьСписок из глобального модуля:
Процедура глЗагрузитьСписок(Тип,ОбъектФильтра,тз,флПрава="""") Экспорт
Если ТИп="КонтЛица" Тогда
Доки=СоздатьОбъект("Документ");
Доки.ВыбратьПоЗначению(,,"КонтЛица",ОбъектФильтра);
Пока Доки.ПолучитьДокумент()=1 Цикл
Если (Доки.Проведен()=0) или (Доки.ПометкаУдаления()=1) Тогда
Продолжить;
КонецЕсли;
тз.НоваяСтрока();
тз.э = Доки.ТекущийДокумент();
тз.Должность = Доки.Должность;
тз.ФИО = Доки.Наименование;
тз.Примечание = Доки.Примечание;
КонецЦикла;
ИначеЕсли Тип="Счета" Тогда .....и т.д.
и там еще куща текста."
Справочник.МедУчрежд.Форма 375 ОбновитьСчета(); 1 57.541118 99.84
Справочник.МедУчрежд.Форма 103 глЗагрузитьСписок("Счета",ТекущийЭлемент(),тзСчета); 1 57.539771 99.84
Глобальный модуль 62 Рег.ВыгрузитьИтоги(тбИтоги); 1 55.373092 96.08
Глобальный модуль 64 тбИтоги.Свернуть("Счет","Сумма"); 1 2.152149 3.74
Справочник.МедУчрежд.
ФормаСписка.ФормаСписка 28 Форма.тКолЭлементов.Заголовок(""""); 3 0.017811 0.03
......
......
Справочник.МедУчрежд.Форма 167 КонецЕсли; 1 0.000001 0.00
а при выделении всех пунктов в низу написалоо
кол. 123 время 172.72704 %(врем.)299.7
и еще процедура глЗагрузитьСписок из глобального модуля:
Процедура глЗагрузитьСписок(Тип,ОбъектФильтра,тз,флПрава="""") Экспорт
Если ТИп="КонтЛица" Тогда
Доки=СоздатьОбъект("Документ");
Доки.ВыбратьПоЗначению(,,"КонтЛица",ОбъектФильтра);
Пока Доки.ПолучитьДокумент()=1 Цикл
Если (Доки.Проведен()=0) или (Доки.ПометкаУдаления()=1) Тогда
Продолжить;
КонецЕсли;
тз.НоваяСтрока();
тз.э = Доки.ТекущийДокумент();
тз.Должность = Доки.Должность;
тз.ФИО = Доки.Наименование;
тз.Примечание = Доки.Примечание;
КонецЦикла;
ИначеЕсли Тип="Счета" Тогда .....и т.д.
и там еще куща текста."
21.01.2008
08:50
#14
> "счета"- вот эта зкладка наиболие всего плужит по сети, но на сервере работает(не очень быстро, но работать можно
) а вот уже на другой машине по сети (это просто завал) сформировать его просто невозможно.
Это такая особенность 1С в файл-серверном варианте подключения, тем более, что на сервере базы данных ваша тормозная часть кода тоже обрабатывается не быстро. Переходите на терминальное подключение рабочих станций. Переработайте тормозную часть кода.
Это такая особенность 1С в файл-серверном варианте подключения, тем более, что на сервере базы данных ваша тормозная часть кода тоже обрабатывается не быстро. Переходите на терминальное подключение рабочих станций. Переработайте тормозную часть кода.
31.01.2008
14:05
#15
Давай, вперед, ставь винду 2003! И потом в УБЭП позвони, чтобы они долго не ходили
12.02.2008
17:23
#16
"Была такая хрень
Правда на серваке стояла 2000Сервер, а клиенты 98 (для особоушлых Мозголомов: все лицензии)
Так дело было, не поверите, в принтерах!!! Вернее не в самих принтерах, а в проге-обслуживалке. Как только в базу заходит комп-клиент у которого в трее есть значок принтера проги-обслуги, так все остальные, да и он тоже, просто неворочаются вообще!
Причём, именно как в вашем случае, это происходило когда в базе более двух клиентов. Если один или два, пусть даже со значками принтеров, - работает нормально!
Что сделано: из автозагрузки убраны ярлыки запуска прог обслуг принтеров. Компы перезагружены или выгружены проги-обслуги. Замечу: печать без этих приблуд нормальная! - Разве что комп не говорит противным женским голосом что-то типа: добавьте бумагу в принтер
- Но без этого, считаю, выжить можно! ;)
Актуально для принтеров HP и Canon настольных моделей типа LBP-1100, LBP-1120 и подобных.
Сетевые принт-серверы фирмы HP и Kiocera-Mita и их проги-обслуги на работу в моём случае не влияют
Удачи, Михаил"
Правда на серваке стояла 2000Сервер, а клиенты 98 (для особоушлых Мозголомов: все лицензии)
Так дело было, не поверите, в принтерах!!! Вернее не в самих принтерах, а в проге-обслуживалке. Как только в базу заходит комп-клиент у которого в трее есть значок принтера проги-обслуги, так все остальные, да и он тоже, просто неворочаются вообще!
Причём, именно как в вашем случае, это происходило когда в базе более двух клиентов. Если один или два, пусть даже со значками принтеров, - работает нормально!
Что сделано: из автозагрузки убраны ярлыки запуска прог обслуг принтеров. Компы перезагружены или выгружены проги-обслуги. Замечу: печать без этих приблуд нормальная! - Разве что комп не говорит противным женским голосом что-то типа: добавьте бумагу в принтер
Актуально для принтеров HP и Canon настольных моделей типа LBP-1100, LBP-1120 и подобных.
Сетевые принт-серверы фирмы HP и Kiocera-Mita и их проги-обслуги на работу в моём случае не влияют
Удачи, Михаил"
- 1
- 2
Читают тему
(гостей: 1)