Форум

Ещё раз здравствуйте!

флуд

Здравствуйте.

1. Есть ли более подробное описание элементов управления (xbLabelEditRefer, xbReferCaller, xbGrid)?
Стандартный хэлп, уроки не устраивает - там нет этой информации или она ограниченная.

2. Можно ли пользоваться компонентой TBestDataset, не создавая TBObject, аналогично TBObject?
Т.е. обращаться к методам append, edit и т.д.

3.Есть подробно расписанные примеры реализации интерфейса с вызовом справочников?
Уроки в форуме тоже не устраивают.

Цитата
Денис пишет: Почему вы не хотите перейти на системный сегмент (Партнеры) аналитики на этих счетах?

, мне кажется, в другом - назначить сегмент аналитики группе счетов, а какой он: пользовательский или системный строго говоря без разницы.

Такой реорганизации мы не нашли - сделали сами. http://www.sbuh.ru/node/43

Попробуйте в настройке подсистемы->работа с архивом данных выполнить восстановление совокупных параметров.

P.S. Только базу сохраните предварительно.
Если не поможет, то нужно будет разбираться с базой...

Цитата
Борис Иванской пишет: Даже отправляли вам писульку по этому поводу

Добрый день.
Писульку не получал - продублируйте ещё раз.

Наш плагин так и работает... Посмотрите на нашем сайте...

Цитата
Людмила Квасова пишет: Попробуйте через Foxbro посмотреть по БД в папке CASH файл K_schet, нет-ли одинаковых строк по одному кассовому счету.

Там всё нормально.

Это я "тупанул"...
Отчёт считается и показывается правильно, правда провели индексацию предварительно.

Да, действительно в отчёте кассира - три строки на входящее сальдо и каждая проводка показывается трижды...
Смотрели на рабочей базе и на демо.

Цитата
Денис пишет: Поясните для чего умножаете на количество пользователей?

Просто прикинул потери рабочего времени для организации.

Цитата
Денис пишет: Есть подозрение, что если написать плагин, который будет физически удалять все записи в перечисленных файлах, а потом запустить полный пересчет Банка данных по счетам, то получим результат быстрей (с учетом времени работы плагина), чем после индексации (на СП21 без учета времении на индексацию)

Обязательно приму рекомендации к сведению, как выполню - сообщу результаты; кстати насчёт плагина, если делать такой плагин, то нужно расчёт банка данных запускать не в монопольном режиме. Естественно если это возможно...

Добрый день.

Появилась задача, следующего характера:
Есть два ключа БЭСТ5 с различным набором модулей и количеством рабочих мест.

Возможна ли установка двух ключей на один сервер и если возможна то, как это сделать или где посмотреть...

P.S. При приобретении промахнулся с технологией работы пользователей - через терминал или обмен данными средствами БЭСТ.

Да, всё так.
Спасибо.

Ок, всем спасибо.

Результаты таковы:
БЭСТ5 SP 20, к сожалению не было возможности построить банк данных по счетам на SP21..
Касперский выключен был.
В main.dbf 352503 проводок

Сервер у клиента - 2 процессора Intel Xeon по 4-ре ядра 2.33 Ghz, RAM 4 Gb, зеркало SATA по 500Gb, 2LAN x 1000, OC - Windows Server 2003 Enterprise Edition

Расчёт шёл 1 час 45 минут - достаточно быстро, но 1 час 45 миниут х 53 пользователя = 92,75 часа.
Это больше чем две рабочих недели простоя ...

"Типа сервер" у меня - HP Compaq 1 процессор Intel на два ядра 2.8 Ghz, RAM 4 Gb, SATA, 1 LAN x1000, ОС - Windows XP Prof.
Построение банка данных шло 22 часа 15 минут.

В целом - результатами удовлетворён.

Есть одно обстоятельство - я нигде не нашёл есть ли в SP21 изменения по функциям DR и CR?
Сделали ли параметр отвечающий за расчёт по main.dbf или по банку данных и как его вызывать, если сделали?

На Харборе, можно решить например, так...
Шаблон можете сделать любой, но если желаете - вышлю свой по запросу...

//Скрипт выводу на печать в FastReport выбранных строк прайс-листа

Function Main

#include "box.ch"
#include "achoice.ch"
#include "inkey.ch"
#include "dbedit.ch"

Private i, k, ch_p, str, nProcess
Private cFile, cFileStr, aStru:={}

Private aSet, aSetKey

AltD()

aSet:=SaveSet()
aSetKey:=SaveSetKey()

If nNumber=1

// Прописываем имена-пути для файлов источников и шаблона отчета
aGlobVars[1]:= 'real\template\ch_price.frf'
r_n := SubStr(Time(),1,2)+SubStr(Time(),4,2)+SubStr(Time(),7,2)
aGlobVars[2]:= LoadPath()+'tmp\fo'+r_n+'.dbf'
aGlobVars[3]:= LoadPath()+'tmp\rt'+r_n+'.dbf'
aGlobVars[4]:= .F.

If(File(aGlobVars[2]),fErase(aGlobVars[2]),)
If(File(aGlobVars[3]),fErase(aGlobVars[3]),)

aStru := {}
aAdd(aStru,{"VarName" ,"C",32,0})
aAdd(aStru,{"VarC" ,"C",10,0})
aAdd(aStru,{"VarN" ,"N",12,2})
aAdd(aStru,{"VarD" ,"D",8 ,0})
aAdd(aStru,{"FieldName","C",19,0})

dbCreate(aGlobVars[2],aStru)
NetUse("File_op",aGlobVars[2])

FILE_OP->(AddRec())
FILE_OP->VARNAME :='Дата_прайс_листа'
FILE_OP->VARD := Date()
FILE_OP->(DbUnlock())

FILE_OP->(AddRec())
FILE_OP->VARNAME :='Номер_документа'
FILE_OP->VARC := '_____________'
FILE_OP->(DbUnlock())

FILE_OP->(AddRec())
FILE_OP->VARNAME :='Группа'
FILE_OP->FIELDNAME :='rt'+r_n+'.Grup'
FILE_OP->(DbUnlock())

FILE_OP->(AddRec())
FILE_OP->VARNAME :='Ном_номер'
FILE_OP->FIELDNAME :='rt'+r_n+'.NNum'
FILE_OP->(DbUnlock())


FILE_OP->(AddRec())
FILE_OP->VARNAME :='Партия'
FILE_OP->FIELDNAME :='rt'+r_n+'.Part'
FILE_OP->(DbUnlock())

FILE_OP->(AddRec())
FILE_OP->VARNAME :='Наименование_ТМЦ'
FILE_OP->FIELDNAME :='rt'+r_n+'.Name'
FILE_OP->(DbUnlock())

FILE_OP->(AddRec())
FILE_OP->VARNAME :='Цена_1'
FILE_OP->FIELDNAME :='rt'+r_n+'.Cena_1'
FILE_OP->(DbUnlock())

FILE_OP->(AddRec())
FILE_OP->VARNAME :='Цена_2'
FILE_OP->FIELDNAME :='rt'+r_n+'.Cena_2'
FILE_OP->(DbUnlock())

FILE_OP->(AddRec())
FILE_OP->VARNAME :='Цена_3'
FILE_OP->FIELDNAME :='rt'+r_n+'.Cena_3'
FILE_OP->(DbUnlock())

FILE_OP->(AddRec())
FILE_OP->VARNAME :='Цена_4'
FILE_OP->FIELDNAME :='rt'+r_n+'.Cena_4'
FILE_OP->(DbUnlock())

aStru := {}
aAdd(aStru,{"Grup" ,"C",5 ,0}) // группа
aAdd(aStru,{"NNum" ,"C",13 ,0}) // номенклатурный номер
aAdd(aStru,{"Part" ,"C",5 ,0}) // партия
aAdd(aStru,{"Name" ,"C",60 ,0}) // наименование ТМЦ
aAdd(aStru,{"Cena_1","N",19 ,8}) // цена первая из прайс-листа
aAdd(aStru,{"Cena_2","N",19 ,8}) // цена вторая из прайс-листа
aAdd(aStru,{"Cena_3","N",19 ,8}) // цена третья из прайс-листа
aAdd(aStru,{"Cena_4","N",19 ,8}) // цена четвертая из прайс-листа

dbCreate(aGlobVars[3],aStru)
NetUse("RTmp",aGlobVars[3])

EndIf

RTMP->(AddRec())
RTMP->(RecLock())
If !Empty(SPR_PART->CODE)
RTMP->Grup :=SPR_PART->GRUP
RTMP->NNum :=SPR_PART->NNUM
RTMP->Part :=SPR_PART->CODE
RTMP->Name :=MLABEL->NAME
RTMP->Cena_1:=SPR_PART->OCENA1
RTMP->Cena_2:=SPR_PART->OCENA2
RTMP->Cena_3:=SPR_PART->OCENA3
RTMP->Cena_4:=SPR_PART->OCENA4
Else
RTMP->Grup :=MLABEL->GRUP
RTMP->NNum :=MLABEL->NNUM
RTMP->Name :=MLABEL->NAME
RTMP->Cena_1:=MLABEL->OCENA1
RTMP->Cena_2:=MLABEL->OCENA2
RTMP->Cena_3:=MLABEL->OCENA3
RTMP->Cena_4:=MLABEL->OCENA4
EndIf
RTMP->(f_DbUnLock())

If nNumber=nKolStrok

WinReport(aGlobVars[1],aGlobVars[2],aGlobVars[3],aGlobVars[4])

FILE_OP->(dbCloseArea())
RTMP ->(dbCloseArea())

If(File(aGlobVars[2]),fErase(aGlobVars[2]),)
If(File(aGlobVars[3]),fErase(aGlobVars[3]),)
EndIf

RestSetKey(aSetKey)
RestSet(aSet)

Return NIL

Цитата
Денис пишет: После выхода СП21 (надеюсь) попробуйте сделать индексацию и посмотреть время построение банка данных по счетам. Сутки идет полный перерасчет или за последний месяц? И присоединяюсь к у, расчет банка данных по счетам проходит локально или по сети?

Давай так поступим, я сейчас на сервере клиента запущу полный переасчёт и по результаты сообщу позже.
Считаем локально на сервере.

Цитата
nordk пишет: Сан Саныч уже пообещал запрос отключить, а вот почему банк данных столько строится ? Это на базе в 300 тысяч проводок ? Запускаете задачу локально на сервере? В это время еще какие-то задачи крутятся ?

В базе данных сейчас 352503 проводки, это соответствует первому полугодию.
Всё расчёты и первичный, и перестроение запускаем на сервере.
Задач на сервере больше нет, сервер специально куплен только для БЭСТ5. Единственная подозрительная задача, это антивирус Касперского, но по идее, он не должен сильно тормозить.

Цитата
nordk пишет: Да, в примитивном случае можно наложить скоб и будет все быстро, но потом у кого то высняется что в 1 случае из 1000 бывает вот такая ситуация, у другого другая и универсальность бывает расплатой за скорость.

Плагин буден уникальным - только для этого клиента.

Цитата
nordk пишет: Если добавляете строки - используйте ADDREC() - эта штатная функция невидимо от Вас сама заполняет ключевые гуиды.

Эту функцию и используем..., но idmain не заполняется? Может AddRec вызывать с какими-то параметрами, чтобы idmain заполнялся? Но в описании функции не написано, что у AddRec вообще есть параметры.

Цитата
nordk пишет: Но еще раз повторю - я не системщик, подобные ы лучше бы обсудить на соответствующем форуме, но большого разбега по времени между локальной работой и работой по сети быть не должно....

Спасибо за разъяснения, я тоже не системщик... По крайней мере понятно, где и как можно проводить оптимизацию.

Цитата
nordk пишет: Обычно при такой ситуации мы давали системную администратору задачу, чтобы скорость работы по сети не уступала локальной существенно. Не знаю над чем он там колдовал, но в итоге скорость работы что локально, что по сети были примерно одинаковые.

Можно поподробнее, над чем он там колдовал?
И сколько одновременно работающих пользователей было?

Цитата
nordk пишет: В свое время Александр Гершанов обращался с вопросом, что у него в базе было около миллиона проводок и мне доводлилось доказывать что харбор умеет работать с таким массивом очень быстро. Так что 300 тысяч для харбора это не размер :) В функциях которые Вы критикуете, применяется именно скоб и работают они не медленно, а если использовать банк данных, то практически моментально.

Да, Харбор штука шустрая, мне и удивительно, что в базе всего 350000 проводок и такое "проседание" по скорости.

Цитата
nordk пишет: Александр я прошу Вас оставить эмоции. Не вижу, чтобы я был с Вами не вежлив.

Может я и погорячился, но я прошу помощи в решении а и не рассчитываю на ответ, а читал ли я про поля.
На будущее - замечание услышал... буду точнее описывать задачу и ситуацию вокруг неё.

Я сюда хожу за решениями вопросов и клиент у меня серьёзный, пусть даже и один. Пока один...

Цитата
Александр Титов пишет: Добрый день! 1. IDMAIN лучше заполнить функцией XGUID() (если в БЭСТе). 2. Насчет запросов - с ближайшем пакете сделаем возможность управления (задать вид расчета). 3. По поводу "наложить скоб и выдать результат за пять минут" - пробуйте конечно, но не все так просто...

Спасибо за конструктивный ответ.
Только что, получили результат: отчёт со скобом сформировался за 4-ре секунды !!!

Заметили ещё одну особенность: в случае использования DR и CR на сервере отчёт отчёт формировался за 5-7 минут, а на клиенте более 40 и выключили не дождавшись... Такое ощущение, что алгоритм расчёта функций не использует технологии SQL или использует как-то не полностью.

Цитата
itman пишет: К тому же вы затрагиваете самое святое - main.dbf, кому придется за последствия отвечать?

Последствия мои..

Цитата
itman пишет: Судя по у, можно понять что вы пытаетесь сформировать пакет проводок на основании данных по счетам. Почему харбор а не групповые операции? Что ответил на вашу проблему Региональный представитель?

1. Совершенно верно, есть такая задача - закрытие счетов затрат, да и не только затрат.
2. Харбор, потому что, база большая, 352503 проводки и пользователей 53 человека будет. Хотя для SQL, это не объём должен быть...
3. Региональный представитель настраивает групповые операции, а они в данном случае очень медленно работают.

Спасибо за помощь.
Запрос заработал.

Но теперь ситуация такая, ошибка исчезла, но объединения не происходит, то есть результирующий запрос выдает только обороты по 2503, а все остальные счета, игнорируются. То есть запросы, как бы выполняются, но в результирующей таблице показывается результат только последнего запроса ???