Clipper On Line • Ver Tópico - LetoDBf (fork) -> LetoDb com espinafre
Mudar para estilo Clássico
Discussão sobre Banco de Dados e RDDs para Clipper/[x]Harbour.
Postar uma resposta

LetoDBf (fork) -> LetoDb com espinafre

20 Fev 2017 15:36

Ola!
Mudei para o LETODBf um fork que o Rolf "Elch" fez do LetoDb(Alexander Kresin).
Estou gostando, ele corrigiu os erros do LETODB e aprimorou os comandos, adicionou mais opções.
Agora com o LetoDBf a conexão está mais rápida, pois ele chama 2 processo simultâneos no servidor na mesma conexão.
Esta funcionando com CDX/NTX...
Explicações "melhores" em inglês no readme.txt
https://github.com/elchs/LetoDBf

Saudações,
Itamar M. Lins Jr.

LetoDBf (fork) -> LetoDb com espinafre

20 Fev 2017 16:25

Ola!
Na época que comecei a usar não tinha NetIO.
Mas mesmo assim o NetIO não faz a mesma coisa que o LetoDB faz. O NetIO não tinha o conceito na época de:
Código:
leto_connect( "\\loja2.ddns.net:2812\")
use clientes new shared
browse()

Tem umas diferenças que o Przmek explicou, o NetIO é mais para redes LOCAIS e não tinha o tal "transaction" e outros recursos do LetoDb.
Código:
Comparing HBNETIO with LetoDB does not make sense. HBNETIO for file IO
operations is only network redirector which uses TCP connections to
replace different native system network redirectors. It give some small
speed improvement (i.e. 20-30%) but the main goal is resolving problems
with local caches and incompatible locking which break concurrent file
access when different OS-es are used on client stations or some of them
use danger "speedup" mechanism like opportunistic locking or some others
does not have native network redirectors which allow to connect to the
server.
Nothing more. Pure HBNETIO file access does not reduce network
traffic. Only RPC in HBNETIO can noticeable reduce it and this will
give the best speed results but user has to add to the server code
for all time consuming operations he wants to optimize.

best regards,
Przemek


Saudações,
Itamar M. Lins Jr.

LetoDBf (fork) -> LetoDb com espinafre

20 Fev 2017 16:34

Ola!
Algumas comparações do ADS com o LetoDBf.
https://groups.google.com/forum/#!topic/harbour-users/hxyjdpmMCNY

Com LetoDbf:
The two lines above indicate the timing to delete the 1,010 attribute tags that were created in the previous process. For LetoDBF the process took 22 seconds more or less.

Com ADS:
The attribute tag deletion process under ADS took 4 minutes and 1 second, more or less.


Saudações,
Itamar M. Lins Jr.

LetoDBf (fork) -> LetoDb com espinafre

20 Fev 2017 22:01

Agora pq não ajeitaram o projeto original? Meu receio é virar tipo q nem as libs gráficas... varias... e no caso das libs gráficas o esforço poderia ter sido concentrado em uma no maximo 2.

LetoDBf (fork) -> LetoDb com espinafre

20 Fev 2017 22:41

Boa noite
Me fiz a mesma pergunta fladimir.
Por isso que os projetos deixam de crescer.

LetoDBf (fork) -> LetoDb com espinafre

21 Fev 2017 09:55

Ola!
Segundo Elch, não quis mexer nos códigos de compatibilidade, que tem no original, compatibilidade com o xHarbour principalmente.
O LetodbF não roda no xHarbour por exemplo e versões velhas do Harbour.
The cause of this fork was to get the freedom of removing over many years accumulated legacy technics, and to continue, to...
Mais em:
https://github.com/elchs/LetoDBf/blob/master/README.md

Saudações,
Itamar M. Lins Jr.

LetoDBf (fork) -> LetoDb com espinafre

21 Fev 2017 11:56

Realmente é um ótimo argumento

Agora esse novo fork pode desancar pq não fica preso as compatibilizações.

LetoDBf (fork) -> LetoDb com espinafre

02 Mar 2017 00:11

Baixei do git e fui testar mas pelo q entendi tem BAT pra MSVC e BCC... como faço em MinGW?

LetoDBf (fork) -> LetoDb com espinafre

02 Mar 2017 00:13

Desculpem... esqueçam o q falei tem os HBP na pasta... to dormindo na frente do computador... kkkk

LetoDBf (fork) -> LetoDb com espinafre

14 Mar 2017 23:15

uma das primeiras duvidas é a abertura e criação dos indices atualmente tenho uma função que faz isso vou colocar um trecho aqui , original
a duvida é como seria no Letodb

Código:

// chamada da net_use()
  *                dbf    alias   indice
   if (!net_use("MCOCUP", "MCO","MCOCUP"))
      quit
   endif

**********************************************************
function Net_use
   parameters lfile, lalias, lindex, lexcl, lretry
   private lforever, v_arq,nomearq
   lretry:= iif(Type("lretry") != "N", 500, lretry)
   lexcl:= iif(Type("lexcl") != "L", .F., lexcl)
   lforever:= lretry == 0
   v_arq:= lfile + ".dbf"
   do while (lretry > 0 .or. lforever)
      if (lexcl)
         use (lfile) alias (lalias) new exclusive
      else
         use (lfile) alias (lalias) new
      endif
      if (used())
         exit
      endif
      if (mens(24, 11, "Arquivo nao liberado... AGUARDE ", 1) == 27)
         exit
      endif
      lretry:= lretry - 1
   enddo
   if (used())
      if (lindex = p_bancos+"MCOCUP")       
         if (!file(p_bancos+"MCOCUP.CDX"))
            nomearq:= lindex
*            Criando arquivo de indice     
            index on sui tag sui to (lindex) 
            set index to (lindex)
         else
            set index to (lindex)
         endif
      endif
endif
*************************************
             

LetoDBf (fork) -> LetoDb com espinafre

15 Mar 2017 09:25

Ola!
Isso não muda. Continua da mesma forma.

Saudações,
Itamar M. Lins Jr.

LetoDBf (fork) -> LetoDb com espinafre

15 Mar 2017 10:48

na chamada nao tem que dizer onde ta o letodb?

LetoDBf (fork) -> LetoDb com espinafre

15 Mar 2017 18:05

Se não testei errado... kkk, não, vc apenas define pra conectar em tal lugar e o path

Depois Use normal etc.

LetoDBf (fork) -> LetoDb com espinafre

17 Mar 2017 17:01

Ola!
Antes de suas funções, basta setar o AMBIENTE.
Código:
RDDSETDEFAULT("LETO")
leto_Connect( '//localhost:2812/' ) // ou o IP onde está os DBF´s  com o LETO 192.168.10.10 por exemplo, no lugar de localhost.

...Aqui suas funções.


Se quer ver as coisas(arquivos) que estão lá no servidor use as funções "NOVAS" do LETO para isso.
LETO_FILE()
LETO_DIRECTORY... em muitas outras, mas o básico você não mexe.

Saudações,
Itamar M. Lins Jr.

LetoDBf (fork) -> LetoDb com espinafre

19 Mar 2017 11:02

então pelo que compreendi fica exatamente dessa forma

Código:

RDDSETDEFAULT("LETO")
leto_Connect( '//localhost:2812/' ) // ou o IP onde está os DBF´s  com o LETO 192.168.10.10 por exemplo, no lugar de localhost.

// chamada da net_use()
  *                dbf    alias   indice
   if (!net_use("MCOCUP", "MCO","MCOCUP"))
      quit
   endif

**********************************************************
function Net_use
   parameters lfile, lalias, lindex, lexcl, lretry
   private lforever, v_arq,nomearq
   lretry:= iif(Type("lretry") != "N", 500, lretry)
   lexcl:= iif(Type("lexcl") != "L", .F., lexcl)
   lforever:= lretry == 0
   v_arq:= lfile + ".dbf"
   do while (lretry > 0 .or. lforever)
      if (lexcl)
         use (lfile) alias (lalias) new exclusive
      else
         use (lfile) alias (lalias) new
      endif
      if (used())
         exit
      endif
      if (mens(24, 11, "Arquivo nao liberado... AGUARDE ", 1) == 27)
         exit
      endif
      lretry:= lretry - 1
   enddo
   if (used())
      if (lindex = p_bancos+"MCOCUP")       
         if (!file(p_bancos+"MCOCUP.CDX"))
            nomearq:= lindex
*            Criando arquivo de indice     
            index on sui tag sui to (lindex) 
            set index to (lindex)
         else
            set index to (lindex)
         endif
      endif
endif
*************************************
Postar uma resposta