Отправлено: 18.05.11 19:04. Заголовок: Leto DB Server

Добавил функцию:

LETO_GROUPBY(cGroup, cFields, [cFilter], [xScopeTop], [xScopeBottom])

cGroup - имя поля, по которому группируются данные;
cFields - список числовых полей через запятую, которые суммируются. Символ # обозначает к-во записей в группе

Функция возвращает двумерный массив строк.
1-й элемент каждой строки - значение поля cGroup, следующие элементы суммы полей, заданных в cFields, или к-во записей в группе

 Отправлено: 21.07.11 09:33. Заголовок: При остановке службы..

При остановке службы бывает, что выскакивает такое сообщение

но служба останавливается. Что может быть?

 Отправлено: 21.07.11 09:56. Заголовок: Pasha пишет: Переим..

Pasha пишет:

цитата:

Переименовал (вернул) letodb.lib(a) в rddleto.lib(a).

Паша, в старой версии было по правилам, библиотеки в папке lib
-olib/rddleto

Если можно, то поменяйте.

 Отправлено: 21.07.11 10:06. Заголовок: Пересобираю letodb и..

Пересобираю letodb и получаю
../../../source/common/net.c:144:18: error: 'MAX_COMPUTERNAME_LENGTH' undeclared (first use in this function)
../../../source/common/net.c:144:18: note: each undeclared identifier is reported only once for each function it appears in
../../../source/common/net.c:148:4: warning: implicit declaration of function 'GetComputerName'
../../../source/common/net.c:145:9: warning: unused variable 'szValue'
hbmk2: Error: Running C/C++ compiler. 1
gcc.exe -c -O3 -march=i586 -mtune=pentiumpro -fomit-frame-pointer -W -Wall -pipe -Ic:/dev/harbour/include -I../../../include ../../../.hbmk/win/mingw/rddsys.c ../../../source/client/leto1.c ../../../source/client/letomgmn.c ../../../source/common/blowfish.c ../../../source/common/common_c.c ../../../source/common/hbip.c ../../../source/common/net.c

Вроде ничего глобально не менялось, а такое вылезло и что делать?

 Отправлено: 23.07.11 10:07. Заголовок: AlexMyr пишет: и чт..

AlexMyr пишет:

цитата:

и что делать?

Это не вопрос letodb и не вопрос харбора
MAX_COMPUTERNAME_LENGTH для mingw определен в include\winbase.h. Проверьте, может берутся какие-то другие *.h файлы
Насчет обновления - сделаю в начале августа, т.к. сейчас я в командировке.

 Отправлено: 25.07.11 16:29. Заголовок: Я еще нашел разницу в работе ST и MT версий

Я еще нашел разницу в работе ST и MT версий со SET SCOPE

Первая запись попадающая в SCOPE у меня отображается 2 раза

Картинка

а в ST нет , на картинке видно как я вызываю SCOPE

 Отправлено: 28.07.11 14:12. Заголовок: sashaBG пишет: Перв..

sashaBG пишет:

цитата:

Первая запись попадающая в SCOPE у меня отображается 2 раза

Нужен пример самодостаточный
тогда смогу посмотреть

 Отправлено: 28.07.11 21:14. Заголовок: Тест МТ

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


PROCEDURE MAIN()
LOCAL _Server := '//127.0.0.1:2812/'

REQUEST LETO
RDDSETDEFAULT( "LETO" )

USE (_Server + 'DFAKT_0' ) NEW
INDEX ON DOK TAG DOK
ORDSETFOCUS('DOK')

USE (_Server + 'DFAKT_N' ) NEW
INDEX ON DOK TAG DOK
ORDSETFOCUS('DOK')

SELECT DFAKT_0
GO TOP

SELECT DFAKT_N
SET_SCOPE( )
skip -1
BROWSE()

SELECT DFAKT_0
SKIP

SELECT DFAKT_N
SET_SCOPE( )
skip -1
BROWSE()

RETURN
//----------------------------------------------------
STATIC PROCEDURE SET_SCOPE( )
DFAKT_N->( ORDSCOPE( 0, DFAKT_0->DOK ) )
DFAKT_N->( ORDSCOPE( 1, DFAKT_0->DOK ) )
DFAKT_N->( DBGOTOP() )
RETURN

click here

 Отправлено: 29.07.11 13:33. Заголовок: sashaBG пишет: Я ещ..

sashaBG пишет:

цитата:

Я еще нашел разницу в работе ST и MT версий со SET SCOPE Первая запись попадающая в SCOPE у меня отображается 2 раза

Разобрался.
source\client\leto1.c
Стр. 1791
ULONG ulDataLen, ulRecLen, ulRecNo = 0;

Стр. 1908 - 1911
{
bCurRecInBuf = TRUE;
ulRecNo = pArea->ulRecNo;
}

Стр. 1935
if( ! bCurRecInBuf || ( pArea->ulRecNo == ulRecNo ) )

Я смогу сделать коммит на следующей неделе.

 Отправлено: 01.08.11 19:18. Заголовок: Отправил изменения..

Отправил изменения

 Отправлено: 05.08.11 13:47. Заголовок: Я смотрю, в Harbour ..

Я смотрю, в Harbour SVN убрали HB_LEGACY_TYPES_OFF, и теперь letodb не собирается, хотя с Harbour 3.0 сборка еще работает.
Та же проблема и с hwgui
Надо менять типы данных
ULONG -> HB_ULONG, и т.д
и макросы
ISBYREF -> HB_ISBYREF. и т.д.

Думаю, надо определиться с перечнем версий харбора, для которых возможна сборка letodb
Для Harbour это пусть будут версии 1.0, 2.0, 3.0 и SVN (если с 1.0 еще сборка возможна), для
xHarbour - надо посмотреть.
Думаю, надо отказаться от рудиментов и атавизмов старых версий, и за основу взять новое API.
Скажем, использовать не BOOL, а HB_BOOL, и так далее

 Отправлено: 05.08.11 16:26. Заголовок: Pasha пишет: Думаю,..

Pasha пишет:

цитата:

Думаю, надо отказаться от рудиментов и атавизмов старых версий, и за основу взять новое API. Скажем, использовать не BOOL, а HB_BOOL, и так далее

Я тоже так думаю. Хочу попробовать поправить код hwgui, уже малую часть исправил, но времени не хватает (с нашим законодательством и семейством 1с уже замучился бороться и слов не хватает никаких). Так что с меня +1.

 Отправлено: 06.08.11 20:32. Заголовок: Не стал выдумывать в..

Не стал выдумывать велосипед, и сделал как Przemek для hwgui
Поддержку Harbour 1.0 сделать не получилось.

С MAX_COMPUTERNAME_LENGTH дело оказалось вот в чем:
После

2011-07-17 16:21 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)

windows.h неявно не включается, и его надо указывать напрямую

 Отправлено: 07.08.11 22:33. Заголовок: Я получил рекламацию..

Я получил рекламацию из Бразилии, что служба не запускается. Добавил в лог код ошибки - пишут, что ошибка 0.
У меня запуск службы выполняется
Непонятно. Как в той пословице: чи рыба чи рак - Кандыба дурак. Чи рак чи рыба - всэ дурэнь Кандыба.
Подтвердите запуск или незапуск службы.

 Отправлено: 08.08.11 09:54. Заголовок: Pasha пишет: Подтве..

Pasha пишет:

цитата:

Подтвердите запуск или незапуск службы.

Сегодня собрал /* $Id: Changelog,v 1.350.2.38 2011/08/07 06:15:27 ptsarenko Exp $ */
Результат:
08/08/11 09:52:24: Leto DB Server has been started.
Leto DB Server v.2.02 ! INIT: DataPath=, ShareTables=0, MaxUsers=500, MaxTables=5000, CacheRecords=10

 Отправлено: 08.08.11 10:56. Заголовок: И у меня тоже все в ..

И у меня тоже все в порядке. По-видимому, у моего корреспондента проблема не с letodb

 Отправлено: 09.08.11 11:39. Заголовок: Еще test_tr не собир..

Еще test_tr не собирается:

Generating C source output to 'd:\tmp\hbmk_7iyn9u.dir\test_tr.c'... Done.
hbmk2: C/C++ compiler command:
gcc.exe -c -O3 -march=i586 -mtune=pentiumpro -fomit-frame-pointer -W -Wall -pipe -Ic:/dev/harbour/include -IC:/dev/letodb/include d:/tmp/hbmk_7iyn9u.dir/test_tr.c d:/tmp/hbmk_o9bjra.c
tests\test_tr.prg: In function 'HB_FUN_LETO_DBTRANS':
tests\test_tr.prg:56:4: warning: implicit declaration of function 'ISNUM'
tests\test_tr.prg:85:13: warning: implicit declaration of function 'ISNIL'
hbmk2: Linker command:
gcc.exe d:/tmp/hbmk_7iyn9u.dir/test_tr.o d:/tmp/hbmk_7iyn9u.dir/hbmk_o9bjra.o -mconsole -Wl,--start-group -lrddleto -lhbextern -lhbdebug -lhbvm -lhbrtl -lhblang -lhbcpage -lgtcgi -lgtpca -lgtstd -lgtwin -lgtwvt -lgtgui -lhbrdd -lhbuddall -lhbusrrdd -lrddntx -lrddcdx -lrddnsx -lrddfpt -lhbrdd -lhbhsx -lhbsix -lhbmacro -lhbcplr -lhbpp -lhbcommon -lhbmainstd -lkernel32 -luser32 -lgdi32 -ladvapi32 -lws2_32 -lwinspool -lcomctl32 -lcomdlg32 -lshell32 -luuid -lole32 -loleaut32 -lmpr -lwinmm -lmapi32 -limm32 -lmsimg32 -lwininet -lhbpcre -lhbzlib -Wl,--end-group -otest_tr.exe -Lc:/dev/harbour/lib/win/mingw -Lc:/dev/harbour/bin -Llib
d:/tmp/hbmk_7iyn9u.dir/test_tr.o:test_tr.c:(.text+0x5e): undefined reference to `ISNIL'
d:/tmp/hbmk_7iyn9u.dir/test_tr.o:test_tr.c:(.text+0x247): undefined reference to `ISNUM'
d:/tmp/hbmk_7iyn9u.dir/test_tr.o:test_tr.c:(.text+0x3ef): undefined reference to `ISNIL'
d:/tmp/hbmk_7iyn9u.dir/test_tr.o:test_tr.c:(.text+0x4ce): undefined reference to `ISNIL'
collect2: ld returned 1 exit status
hbmk2: Error: Running linker. 1
gcc.exe d:/tmp/hbmk_7iyn9u.dir/test_tr.o d:/tmp/hbmk_7iyn9u.dir/hbmk_o9bjra.o -mconsole -Wl,--start-group -lrddleto -lhbextern -lhbdebug -lhbvm -lhbrtl -lhblang -lhbcpage -lgtcgi -lgtpca -lgtstd -lgtwin -lgtwvt -lgtgui -lhbrdd -lhbuddall -lhbusrrdd -lrddntx -lrddcdx -lrddnsx -lrddfpt -lhbrdd -lhbhsx -lhbsix -lhbmacro -lhbcplr -lhbpp -lhbcommon -lhbmainstd -lkernel32 -luser32 -lgdi32 -ladvapi32 -lws2_32 -lwinspool -lcomctl32 -lcomdlg32 -lshell32 -luuid -lole32 -loleaut32 -lmpr -lwinmm -lmapi32 -limm32 -lmsimg32 -lwininet -lhbpcre -lhbzlib -Wl,--end-group -otest_tr.exe -Lc:/dev/harbour/lib/win/mingw -Lc:/dev/harbour/bin -Llib

 Отправлено: 09.08.11 11:49. Заголовок: Надо сделать замену ..

Надо сделать замену IS* => HB_IS*

 Отправлено: 22.08.11 14:39. Заголовок: LetoDB и Linux UBUNTU !

Здравствуйте , захотелось попробовать как работает LetoDB под линукс .
Слил HARBOUR из SVNa , установил необходимые библиотеки и компиляторы
сделал make install и Harbour откомпилировалсая и устоновился в usr/local/bin , библиотеки в usr/local/lib/harbour, include в usr/lib/harbour
потом тупо скопировал из windows компютера LetodbMT . Почитал readme.txt .
въполнил ./make_linux.sh , получилась ошибка bash: ./make_linux.sh /bin/bash^M: bad interpreter: No such fil or directory

потом попробовал hbmk2 rddleto.hbp lrtodb.hbp
Выдало куча ошибок компиляции ERR

Посоветуйте пожалуста как откомпилировать сервер !

 Отправлено: 22.08.11 15:55. Заголовок: sashaBG пишет: ошиб..

sashaBG пишет:

цитата:

ошибка bash: ./make_linux.sh /bin/bash^M: bad interpreter: No such fil or directory

Переводы строк в скрипте виндовые
Надо либо с CVS тянуть в linux
либо окончания строк поменять в формате linux (т.е. только 10, а не 13,10)

цитата:

потом попробовал hbmk2 rddleto.hbp lrtodb.hbp Выдало куча ошибок компиляции ERR

А вот это странно. Файлы не те? По новой с CVS и еще раз

UPD: "lrtodb.hbp" - шо це тако???

 Отправлено: 22.08.11 16:14. Заголовок: Я как-то делал компиляцию под UBUNTU

Зайдите на мой бложик, там на http://dimao.blogspot.com/p/blog-page.html есть мои пошаговые заметки. Буду рад, если поможет.