Отправлено: 22.06.12 18:14. Заголовок: Leto DB Server (продолжение 8)

Немного доработал документацию к letodb

 Отправлено: 28.02.13 17:03. Заголовок: Pasha пишет: Я выкл..

Pasha пишет:

цитата:

Я выкладывал сборку этой библиотеки с xHarbour SVN, и она может быть несовместима с более ранней версией xHarbour.

Точно, не совместима ! Скачал xHarbour 1.2.3 SVN и ВСЕ ЗАРАБОТАЛО....
Блин, как баран в стенку долбился...

Pasha а нельзя где нибудь файлик к этой либе ( lib.xharbour\rddleto.lib ) приложить - типа "совместимо/собрано только для xHarbour 1.2.3 SVN" ?
Другие чтобы не залетали...

А еще лучше запросить версию rddleto.lib из своей программы, функцию какую нибудь. Так можно ?

 Отправлено: 28.02.13 18:25. Заголовок: Pasha А в LetoDB ес..

Pasha
А в LetoDB есть серверные (оптимизированные) фильтры как в ADS ?

 Отправлено: 28.02.13 19:51. Заголовок: Andrey пишет: Pasha..

Andrey пишет:

цитата:

Pasha а нельзя где нибудь файлик к этой либе ( lib.xharbour\rddleto.lib ) приложить - типа "совместимо/собрано только для xHarbour 1.2.3 SVN" ? Другие чтобы не залетали...

Мое упущение. Сейчас уже архив перезаливать не буду, учту на следующий раз.

цитата:

А еще лучше запросить версию rddleto.lib из своей программы, функцию какую нибудь. Так можно ?

Версию клиента можно запросить вызовом
dbinfo(DBI_RDD_VERSION)

версию letodb сервера, к которому выполнен коннект:

LETO_GETSERVERVERSION()

Но это все не для случая сборки программы и клиентской библиотеки разными версиями харбора.

 Отправлено: 28.02.13 19:53. Заголовок: Dima пишет: А в Let..

Dima пишет:

цитата:

А в LetoDB есть серверные (оптимизированные) фильтры как в ADS ?

Да, конечно. При установке фильтра командой set filter сервер пытается выполнить выражение фильтра. Если попытка успешна, то устанавливается серверный фильтр, если нет - фильтр выполняется на клиенте.

 Отправлено: 28.02.13 20:42. Заголовок: Pasha Понял. А как ..

Pasha
Понял. А как узнать успешна ли попытка установки фильтра на сервере ?

 Отправлено: 28.02.13 21:04. Заголовок: После dbSetFilter на..

После dbSetFilter надо вызвать проверку:
LETO_ISFLTOPTIM()
Фильтр может быть неоптимальным (клиентским), если в нем присутствуют переменные памяти или вызовы функций, незарегистрированных на сервере. Еще сервер не поймет ссылки на другие рабочие области. Я не рассматриваю случай просто неверного выражения.

 Отправлено: 28.02.13 21:57. Заголовок: На МиниГуи с ходу ст..

На МиниГуи с ходу стало собираться и конектиться...
Вопрос по путям:
D:\@TEST_LETODB\letodb.ini
[MAIN]
Port=2812
Log=letodb.log
DataPath=D:\@TEST_LETODB\DATA

Посмотрел лог-файл на всякий случай:
02/28/13 23:11:37: Leto DB Server has been started.
Leto DB Server v.2.09 ! INIT: DataPath=D:\@TEST_LETODB\DATA, ShareTables=....

У меня в программе:
#include "rddleto.ch"
#include "minigui.ch"

Local cPath := "//127.0.0.1:2812/"
.....
// Создать базу перед формой, иначе данные будут недоступны
MyDbf866(cPath)
....
ITEMS LoadDbf866(cPath) ; // загрузить базу на форму
// далее эти 2 функции Скрытый текст

//////////////////////////////////////////////////////////// Procedure MyDbf866(cPath) LOCAL cFileDbf, aDbf := {}, nI cFileDbf := cPath + "test866.dbf" AADD( aDbf , {"FIO" ,"C", 25,0 } ) AADD( aDbf , {"STATUS" ,"C", 10,0 } ) AADD( aDbf , {"CLASS" ,"C", 4,0 } ) DBCreate( cFileDbf, aDbf ) USE ( cFileDbf ) Alias TEMP866 CODEPAGE "RU866" NEW EXCLUSIVE aDbf := {} AADD( aDbf , {"Петров Артем" ,"ученик" ,"1a"} ) ........................... AADD( aDbf , {"Куликов Сергей Борисович" ,"учитель","-"} ) SELECT TEMP866 FOR nI := 1 TO LEN(aDbf) APPEND BLANK TEMP866->FIO := aDbf[nI,1] TEMP866->STATUS := aDbf[nI,2] TEMP866->CLASS := aDbf[nI,3] NEXT CLOSE TEMP866 Return //////////////////////////////////////////////////////////// FUNCTION LoadDbf866(cPath) LOCAL aRows := {}, cFileDbf, cNum cFileDbf := cPath + "test866.dbf" MsgInfo("LETO_FILE( "+cFileDbf+" )=" ) MsgInfo( LETO_FILE( cFileDbf ) ) IF !LETO_FILE( cFileDbf ) AAdd( aRows, {"", "Нет базы / No Base !" , "" , "" } ) AAdd( aRows, {"", cPath , "test866.dbf" , "" } ) ELSE // открытие базы 866 / open base 866 USE ( cFileDbf ) Alias TEMP866 CODEPAGE "RU866" //NEW SHARED SELECT TEMP866 GOTO TOP DO WHILE !EOF() cNum := ALLTRIM(STR( RECNO() ))+"." AAdd( aRows, {cNum, ALLTRIM(FIELD->FIO) , FIELD->STATUS, FIELD->CLASS } ) SKIP ENDDO CLOSE TEMP866 ENDIF RETURN aRows

Так вот сам вопрос.
База успешно создается по пути: D:\@TEST_LETODB\DATA\test866.dbf
А почему при открытии в функции LoadDbf866(cPath)
cFileDbf := cPath + "test866.dbf"
IF !LETO_FILE( cFileDbf ) -> возвращает .F.
Что я не так делаю ?

 Отправлено: 28.02.13 22:14. Заголовок: Andrey пишет: IF !L..

Andrey пишет:

цитата:

IF !LETO_FILE( cFileDbf ) -> возвращает .F.

в letodb.ini надо
EnableFileFunc = 0 - если 1, разрешено использование файловых функций
( leto_file(), leto_ferase(), leto_frename();

читаем readme

 Отправлено: 28.02.13 22:19. Заголовок: AlexMyr пишет: чита..

AlexMyr пишет:

цитата:

читаем readme

Спасибо БОЛЬШОЕ !
Пропустил....

А как заставить запущенную службу LETODB перечитать заново letodb.ini ?

 Отправлено: 28.02.13 22:24. Заголовок: Andrey пишет: А как..

Andrey пишет:

цитата:

А как заставить

администрирование-службы-letodb-перезапустить

 Отправлено: 28.02.13 22:38. Заголовок: AlexMyr пишет: адми..

AlexMyr пишет:

цитата:

администрирование-службы-letodb-перезапустить

Это понятно, а как на ходу перечитать конфигурацию сервера ?
Если удаленно нужно это сделать ?

 Отправлено: 01.03.13 09:40. Заголовок: Только перезапуск сл..

Только перезапуск службы
Его можно автоматизировать батником:

net stop "LetoDB Service"
net start "LetoDB Service"

 Отправлено: 01.03.13 10:00. Заголовок: Pasha пишет: Его мо..

Pasha пишет:

цитата:

Его можно автоматизировать батником:

Спасибо БОЛЬШОЕ !

А не планируется ли какая то хитрая команда на сервер LetoDB чтобы на "ходу" править конфигурацию его.
А то если нет доступа по удаленке на комп, то труба... Ножками топать придется к заказчику...

 Отправлено: 01.03.13 10:17. Заголовок: Андрей, зачем? ..

Андрей, зачем?

 Отправлено: 01.03.13 10:32. Заголовок: Andrey пишет: А не ..

Andrey пишет:

цитата:

А не планируется ли какая то хитрая команда на сервер LetoDB чтобы на "ходу" править конфигурацию его. А то если нет доступа по удаленке на комп, то труба... Ножками топать придется к заказчику...

Не планируется. Этих настроек всего-то 3-4 позиции, и выставить их правильно изначально труда не составляет.

 Отправлено: 01.03.13 10:33. Заголовок: PSP пишет: А не пла..

PSP пишет:

цитата:

А не планируется ли какая то хитрая команда на сервер LetoDB чтобы на "ходу" править конфигурацию его

Даже в ADS нет такого.

 Отправлено: 01.03.13 14:28. Заголовок: Уже и сразу запинали..

Уже и сразу запинали....

 Отправлено: 02.03.13 17:28. Заголовок: Что то не могу обнов..

Что то не могу обновиться. Может кто чего подскажет...




http://shot.qip.ru/00bVmc-3vwdt63nm/
http://shot.qip.ru/00bVmb-3V4IuUaS2/
http://shot.qip.ru/00bVma-3d3R3GdrE/

 Отправлено: 02.03.13 21:53. Заголовок: Только что успешно о..

Только что успешно обновился с точно такими же параметрами.
Но у меня очень старая версия TortoiseCVS: 1.8.3 2004 года
С тех пор, как начал работать с харбором (делать коммиты) - не обновлял ее. А это было 9 лет назад

 Отправлено: 02.03.13 21:56. Заголовок: AlexMyr пишет: Если..

AlexMyr пишет:

цитата:

Если не задана настройка формата memo в letodb.ini, то возвращать логически ожидаемое для DBFCDX - fpt, DBFNTX - dbt, если задан формат, то это значение.

Наконец-то дошли руки, и сделал поддержку параметра Memo_Type в letodb.ini