Последние сообщения

#1

FormEx / Формекс + йоксель + mxl = xls

Последний ответ от Andrewalexk - Сегодня в 16:38

всем привет
использую известную обработку
Быстрое сохранение mxl в xls.ert
которая через формекс (йоксель) объектом КонвертерExcel
превращает mxl в xls
но не более 65 тыщ строк
хотя с 2007 это должно быть более 1 млн
в алсе йокселя от 12 года ни слова про формат xlsx
в алсе формекса от 24 года ни слова про КонвертерExcel
есть что-то более свежее?

#2

FormEx / Re: формекс + пометка списка з...

Последний ответ от Andrewalexk - Сегодня в 16:22

спс

#3

Дружественные проекты / Re: 1с++ Индексированная табли...

Последний ответ от Ветер в поле - Вчера в 11:33

есть такая НД возможность
ну а смысл такой точности?

Я считаю, что надо использовать именно такую точность, чтобы видеть сколько та или иная операция занимает времени, а не плюс-минус лопата. Это дает точное понимание какие механизмы надо использовать, а какие стараться избегать. У меня многие вещи оптимизированы от и до. Поэтому на базе в несколько сотен ГБ 300 пользователей работали не испытывая проблем в производительности.

#4

Дружественные проекты / Re: 1с++ Индексированная табли...

Последний ответ от Andrewalexk - Вчера в 10:04

есть такая НД возможность
ну а смысл такой точности?
если надо время до секунды то можно так
//*******************************************
Процедура Сформировать() 
   Ч0=0;М0=0;С0=0;
   Ч1=0;М1=0;С1=0;
   Начало=ТекущееВремя(Ч0,М0,с0);
   Сообщить(Начало,"i");
   ит=0;
   Время0=3600*Ч0+60*М0+с0;
   Пока 1=1 Цикл
      КонецЛи=ТекущееВремя(Ч1,М1,с1);
      Время1=3600*Ч1+60*М1+с1;
      Если Время1>= Время0+секс Тогда
         Сообщить(КонецЛи+"("+ит+")","!");
         Прервать;
      КонецЕсли;
      ит=ит+1;
   КонецЦикла;
КонецПроцедуры

• [4455]

#5

Дружественные проекты / Re: 1с++ Индексированная табли...

Последний ответ от Ветер в поле - 27 октября 2026, 13:56

Я вот так время засекаю:

Код Выделить Развернуть

НачВремя = _GetPerformanceCounter();
	
итПац.ДобавитьИндекс("Элем", "*ТекущийЭлемент", 0);
	
Сообщить("Индекс * по " + ВыбКолвоСтрок + " строкам = "+(_GetPerformanceCounter()-НачВремя)/1000 + " с.");

Тогда точность до миллисекунды.

#6

Дружественные проекты / Re: 1с++ Индексированная табли...

Последний ответ от Andrewalexk - 27 октября 2026, 12:17

пардон
все ок

#7

Дружественные проекты / Re: 1с++ Индексированная табли...

Последний ответ от Andrewalexk - 27 октября 2026, 11:32

быстрее
но теперь разность не але

итз1.загрузить(тз1); 
итз1.ДобавитьИндекс("Пациент","*"+"Пациент");       
сообщить(текущеевремя()+" "+итз1.Количествострок());
итз2.загрузить(тз2); 
итз2.ДобавитьИндекс("Пациент","*"+"Пациент");       
сообщить(текущеевремя()+" "+итз2.Количествострок()+"("+НомерПериода+")");
итз2.Разность(итз1,"Пациент","Пациент",0);
сообщить(текущеевремя()+" "+итз1.Количествострок()+"-"+итз2.Количествострок());

11:30:27 73633
11:30:27 247818
11:30:28 73633-247818

#8

Дружественные проекты / Re: 1с++ Индексированная табли...

Последний ответ от Andrewalexk - 27 октября 2026, 10:49

спс за *

#9

Дружественные проекты / Re: 1с++ Индексированная табли...

Последний ответ от Ветер в поле - 25 октября 2026, 13:21

Если же не хочется уходить от сетевой версии, то для нее есть расширение Вирт:V7DBNet - отлично работает на небольших сетях. У меня несколько лет у 10 пользователей работало и никаких проблем не было. Скорость, конечно, поменьше, чем у терминала, но в разы выше, чем у стандартной сетевой. Раньше больше 3-х пользователей было платно, но сейчас это совершенно бесплатная разработка. Причем она убирает многие проблемы сетевой. Самое главное, что файлы базы не надо размещать в сетевом доступе. В общем, рекомендую!

#10

7.7 / Re: ЭтРН и 7.7

Последний ответ от sau - 24 октября 2026, 12:54

Что конкретно нужно? Отправить транспортную накладную в СБИС из 1С от грузоотправителя?