Clipper On Line • Ver Tópico - LetoDb e Harbour, como usar.

LetoDb e Harbour, como usar.

Discussão sobre Banco de Dados e RDDs para Clipper/[x]Harbour.

Moderador: Moderadores

 

LetoDb e Harbour, como usar.

Mensagempor esbasso » 18 Ago 2015 19:19

Consegui resolver o problema verificando o arquivo letocl.c

No que funcionava a conexão LETOCONNECTION tinha a seguinte linha
hSocket = hb_ipConnect( szAddr, htons( iPort ), iTimeOut );

Na atual versão esta linha foi alterada para
hSocket = hb_ipConnect( szAddr, iPort, iTimeOut );

Troquei a linha e voltou a funcionar.

htons( iPort ) e iPort eis a diferença
Luis Fernando Basso
Desenvolvedor VFP + XHARBOUR + HWGUI
lfbasso@gmail.com
http://www.engersoft.com.br
esbasso
Colaborador

Colaborador
 
Mensagens: 325
Data de registro: 24 Jan 2007 16:49
Cidade/Estado: CHAPECO/SC
Curtiu: 0 vez
Mens.Curtidas: 8 vezes

LetoDb e Harbour, como usar.

Mensagempor asimoes » 19 Ago 2015 21:44

Esbasso,

Já foi resolvido este problema?
â–ºHarbour 3.x | Minigui xx-x | HwGuiâ—„
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar de usuário

asimoes
Colaborador

Colaborador
 
Mensagens: 4919
Data de registro: 26 Abr 2007 16:48
Cidade/Estado: RIO DE JANEIRO-RJ
Curtiu: 341 vezes
Mens.Curtidas: 258 vezes

LetoDb e Harbour, como usar.

Mensagempor asimoes » 15 Set 2015 22:03

Prezados,

Como é definido usuário e senha para acesso
ex.
Onde é informado o usuário admin e senha admin?

Tem algum exemplo?

IF Leto_Connect( cServidorDB, 'admin', 'admin' ) == -1
ENDIF
â–ºHarbour 3.x | Minigui xx-x | HwGuiâ—„
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar de usuário

asimoes
Colaborador

Colaborador
 
Mensagens: 4919
Data de registro: 26 Abr 2007 16:48
Cidade/Estado: RIO DE JANEIRO-RJ
Curtiu: 341 vezes
Mens.Curtidas: 258 vezes

LetoDb e Harbour, como usar.

Mensagempor asimoes » 16 Set 2015 01:09

Pessoal,

PASS_FILE tem algum exemplo, eu queria testar a autenticação no letodb, tá dificil! não tem nenhum exemplo?

Quero testar esse arquivo, eu não sei o que informar.

; the path and name of users info file;
PASS_FILE = "LETO_USERS"
â–ºHarbour 3.x | Minigui xx-x | HwGuiâ—„
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar de usuário

asimoes
Colaborador

Colaborador
 
Mensagens: 4919
Data de registro: 26 Abr 2007 16:48
Cidade/Estado: RIO DE JANEIRO-RJ
Curtiu: 341 vezes
Mens.Curtidas: 258 vezes

LetoDb e Harbour, como usar.

Mensagempor asimoes » 16 Set 2015 09:46

Não sei como se faz, mas acredito que não funciona.
Com o netio consigo definir a segurança de acessso. No letodb tá dificil!

Pass_for_Login = 1
Pass_File = "leto_users"

Alguém me diz ao contrário com exemplo?
â–ºHarbour 3.x | Minigui xx-x | HwGuiâ—„
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar de usuário

asimoes
Colaborador

Colaborador
 
Mensagens: 4919
Data de registro: 26 Abr 2007 16:48
Cidade/Estado: RIO DE JANEIRO-RJ
Curtiu: 341 vezes
Mens.Curtidas: 258 vezes

LetoDb e Harbour, como usar.

Mensagempor asimoes » 04 Nov 2015 12:51

Caros,

Estou com este erro, quando faço indexação com o rddleto, o problema está em month(d_nasc) = nMes, com netio ou dbfcdx indexa sem problemas, alguém sabe como contornar este problema?
O letodb não está gostando da variável nmes

Error LETO/1003 Variavel nao existe
Called from ->ORDCREATE(0)
Called from REL_ANI.PRG->REL_ANI(57)
Called from ->(b)MAIN(849)
Called from ->MAIN(849)

INDEX ON NOME TAG INDICE01 FOR !Left(Classe_Pg,2) $ "06,07,08,09,10,11,12,13" .AND. Month(D_Nasc) = nMes  .AND. Empty(D_Faleci) .AND. !Deleted() TEMPORARY ADDITIVE
â–ºHarbour 3.x | Minigui xx-x | HwGuiâ—„
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar de usuário

asimoes
Colaborador

Colaborador
 
Mensagens: 4919
Data de registro: 26 Abr 2007 16:48
Cidade/Estado: RIO DE JANEIRO-RJ
Curtiu: 341 vezes
Mens.Curtidas: 258 vezes

LetoDb e Harbour, como usar.

Mensagempor asimoes » 13 Nov 2015 21:38

Pessoal,

O letoudf.prg que eu tenho tem uma função nova que eu gostaria de usar (UDF_Eventos).
Só que ao executar o letodb (versão daemon) dá a seguinte mensagem no letodb.log:

11/13/15 22:26:20: Error BASE/6101 Unknown or unregistered symbol: DOEVENTS
ERROR! SETHRBERROR - pUStru not found!!!!!!!!!!!!!!!!!!!!

FUNCTION UDF_Eventos( nUserStru )
   DoEvents()
RETURN .T.

#pragma BEGINDUMP
#include <windows.h>

HB_FUNC( DOEVENTS )
{
   MSG Msg;

   while( PeekMessage( ( LPMSG ) &Msg, 0, 0, 0, PM_REMOVE ) )
   {
      TranslateMessage( &Msg );
      DispatchMessage( &Msg );
   }
}
#pragma ENDDUMP
â–ºHarbour 3.x | Minigui xx-x | HwGuiâ—„
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar de usuário

asimoes
Colaborador

Colaborador
 
Mensagens: 4919
Data de registro: 26 Abr 2007 16:48
Cidade/Estado: RIO DE JANEIRO-RJ
Curtiu: 341 vezes
Mens.Curtidas: 258 vezes

LetoDb e Harbour, como usar.

Mensagempor Itamar M. Lins Jr. » 30 Nov 2015 14:01

Ola!
Não pode, use da mesma forma que usamos no SQL.

..."Month(d_nasc) = " +str(nMes,2)+"...

Saudações,
Itamar M. Lins Jr.
Avatar de usuário

Itamar M. Lins Jr.
Colaborador

Colaborador
 
Mensagens: 6927
Data de registro: 30 Mai 2007 11:31
Cidade/Estado: Ilheus Bahia
Curtiu: 309 vezes
Mens.Curtidas: 503 vezes

LetoDb e Harbour, como usar.

Mensagempor asimoes » 30 Nov 2015 14:21

Itamar,

O letodb não gostou do uso código em c no letoudf.prg

11/13/15 22:26:20: Error BASE/6101 Unknown or unregistered symbol: DOEVENTS
ERROR! SETHRBERROR - pUStru not found!!!!!!!!!!!!!!!!!!!!

Você sabe como resolver?

FUNCTION UDF_Eventos( nUserStru )
DoEvents()
RETURN .T.

#pragma BEGINDUMP
#include <windows.h>

HB_FUNC( DOEVENTS )
{
MSG Msg;

while( PeekMessage( ( LPMSG ) &Msg, 0, 0, 0, PM_REMOVE ) )
{
   TranslateMessage( &Msg );
   DispatchMessage( &Msg );
}
}
#pragma ENDDUMP

â–ºHarbour 3.x | Minigui xx-x | HwGuiâ—„
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar de usuário

asimoes
Colaborador

Colaborador
 
Mensagens: 4919
Data de registro: 26 Abr 2007 16:48
Cidade/Estado: RIO DE JANEIRO-RJ
Curtiu: 341 vezes
Mens.Curtidas: 258 vezes

LetoDb e Harbour, como usar.

Mensagempor Itamar M. Lins Jr. » 30 Nov 2015 14:33

Ola!
Uma dica! Não sei se irá resolver, mas usando o httpd recompilo ele junto com o letodb.hbc e a hbwin.hbc usando REQUEST.

#require "rddleto"
REQUEST __HB_EXTERN__
REQUEST LETO, LETO_CONNECT, LETO_CONNECT_ERR, LETO_DISCONNECT, LETO_FILE, LETO_COMMIT
REQUEST LETO_GETCURRENTCONNECTION, LETO_SETCURRENTCONNECTION, LETO_GETSERVERVERSION
REQUEST WIN_PRINTERLIST,WIN_PRINTERGETDEFAULT,WIN_PRINTFILERAW
REQUEST HB_MEMOWRIT, __BREAKBLOCK, ISDEC, WIN_PRN


Ou vc pode colocar a função lá no \source\server\letofunc.c e recompilar... Boa sorte!

Saudações,
Itamar M. Lins Jr.
Avatar de usuário

Itamar M. Lins Jr.
Colaborador

Colaborador
 
Mensagens: 6927
Data de registro: 30 Mai 2007 11:31
Cidade/Estado: Ilheus Bahia
Curtiu: 309 vezes
Mens.Curtidas: 503 vezes

LetoDb e Harbour, como usar.

Mensagempor JAIR RANGEL » 13 Abr 2016 18:28

Olá a todos!

Estou compilando um programa para testar o leto e uma série de erros aparece.
Baixei o leto e pelo que vi parece estar completo.
Tem o executável do servidor, pois vejo que ele carrega do serviço e com o Manager posso verificar que ele está no ar.
No entanto, quando compilo, ao link-editar, surge as mensagens de Erro.
Acho que não está reconhecendo o rddleto.lib, mesmo estando configurado.

Uso MiniGUI/Harbour, BCC32

Por outra, tentei compilar o leto com o meu ambiente de desenvolvimento, mas não tive sucesso.

Se alguém puder dar uma dica, seria show.

Vlw
MINIGUI + HARBOUR + BRMAKE + CDX
CLIPPER 5.2E + VISUALLIB 2 + BLINKER
Avatar de usuário

JAIR RANGEL
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 177
Data de registro: 19 Jul 2005 16:01
Cidade/Estado: RIO DE JANEIRO
Curtiu: 1 vez
Mens.Curtidas: 2 vezes

LetoDb e Harbour, como usar.

Mensagempor jelias » 30 Jun 2016 10:33

Olá amigos,

Estou terminando a migração para o uso do LETODB e estou com as seguintes dúvidas.

a) Ao sair do sistema devo utilizar o comando LETO_DISCONNECT(). O que realmente faz este comando?
b) Através de alguns relatos que li, existe algum "bug" com relação ao comando QUIT ao sair do sistema?
c) O erro relatado pelos colegas ASIMOES e WAGNERARAGÃO, "leto_errInternal!!!!!!!!!!!!!!!!!!" foi resolvido?

Desde já agradeço aos amigos pela colaboração,

Saudações,

Júlio.
xHarbour 1.2.1 (simplex) + BCC 5.8.2 + Hwgui + SQLRDD
Clipper 5.2e / Blinker 7
Júlio Cézar Elias
e-mail: jelias@tpnet.psi.br
jelias
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 249
Data de registro: 27 Ago 2008 11:32
Cidade/Estado: Minas Gerais
Curtiu: 0 vez
Mens.Curtidas: 16 vezes

LetoDb e Harbour, como usar.

Mensagempor jelias » 19 Ago 2016 15:57

Olá Amigos,

Estou usando o LETODB e estou acompanhando no site https://sourceforge.net/projects/letodb/ onde está sendo "comitado" algumas atualizações!

Como faço para baixar estas atualizações?
É através do programa TORTOISE CVS? Já tentei atualizar através do mesmo e aparece a seguinte mensagem de erro!

CVSROOT: cvs -d:pserver:anonymous@letodb.cvs.sourceforge.net:/cvsroot/letodb checkout -r rel-1-mt letodb

Desde já agradeço pela colaboração!

Saudações,

Júlio.
Anexos
letodb.png
xHarbour 1.2.1 (simplex) + BCC 5.8.2 + Hwgui + SQLRDD
Clipper 5.2e / Blinker 7
Júlio Cézar Elias
e-mail: jelias@tpnet.psi.br
jelias
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 249
Data de registro: 27 Ago 2008 11:32
Cidade/Estado: Minas Gerais
Curtiu: 0 vez
Mens.Curtidas: 16 vezes

LetoDb e Harbour, como usar.

Mensagempor wagner aragao » 19 Ago 2016 16:57

OLá

Alguém poderia me passa o link da última versão estável do LetoDB ????

Funciona bem com windows 2008 e 2010 ???

t+
xHarbour 1.2.3 Simplex / xDev 0.70 / LetoDB 2.15b37 / HWGUI 2.17 / xDesigner (LF Basso)
wagner aragao
Usuário Nível 2

Usuário Nível 2
 
Mensagens: 58
Data de registro: 30 Jan 2008 01:06
Cidade/Estado: PORTO VELHO-RONDÔNIA
Curtiu: 0 vez
Mens.Curtidas: 0 vez

LetoDb e Harbour, como usar.

Mensagempor elrosa » 29 Ago 2016 11:01

Hello,

does anyone knows what the following error means?

C:/hb30/lib/win/mingw/librddleto.a(letomgmn.o):letomgmn.c:(.text+0xc20): undefined reference to `hb_extIsNil'
C:/hb30/lib/win/mingw/librddleto.a(letomgmn.o):letomgmn.c:(.text+0xc46): undefined reference to `hb_extIsNil'
C:/hb30/lib/win/mingw/librddleto.a(letomgmn.o):letomgmn.c:(.text+0xeee): undefined reference to `hb_extIsNil'
C:/hb30/lib/win/mingw/librddleto.a(letomgmn.o):letomgmn.c:(.text+0x1844): undefined reference to `hb_extIsNil'
C:/hb30/lib/win/mingw/librddleto.a(letomgmn.o):letomgmn.c:(.text+0x19ca): undefined reference to `hb_extIsNil'
C:/hb30/lib/win/mingw/librddleto.a(letomgmn.o):letomgmn.c:(.text+0x19fd): more undefined references to `hb_extIsNil' follow
C:/hb30/lib/win/mingw/librddleto.a(letocl.o):letocl.c:(.text+0xaf5): undefined reference to `__chkstk_ms'
C:/hb30/lib/win/mingw/librddleto.a(leto1.o):leto1.c:(.text+0x8d2a): undefined reference to `hb_extIsNil'
C:/hb30/lib/win/mingw/librddleto.a(leto1.o):leto1.c:(.text+0xa138): undefined reference to `hb_extIsNil'
C:/hb30/lib/win/mingw/librddleto.a(blowfish.o):blowfish.c:(.text+0x375): undefined reference to `__chkstk_ms'
C:/hb30/lib/win/mingw/librddleto.a(blowfish.o):blowfish.c:(.text+0x497): undefined reference to `__chkstk_ms'
collect2: ld returned 1 exit status
hbmk2: Error: Running linker. 1
gcc.exe OBJ/overige.o OBJ/rk.o OBJ/ag.o OBJ/rd.o OBJ/hs.o OBJ/conver.o OBJ/fax.o OBJ/print.o OBJ/browse.o OBJ/getsys.o OBJ/errorsy.o OBJ/rddsys.o OBJ/oops.o OBJ/tn.o OBJ/tn1.o OBJ/tn2.o OBJ/pr.o OBJ/pr2.o OBJ/pr_toep.o OBJ/toep_br.o OBJ/callrap.o OBJ/rl.o OBJ/rl2.o OBJ/rl3.o OBJ/or0.o OBJ/or1.o OBJ/or2.o OBJ/or3.o OBJ/or4.o OBJ/or5.o OBJ/nc_ver.o OBJ/nc_aan.o OBJ/ems.o OBJ/ems2.o OBJ/prspec.o OBJ/euro.o OBJ/budget.o OBJ/html.o OBJ/menuto.o OBJ/div1.o OBJ/div2.o OBJ/div3.o OBJ/hmenu.o OBJ/kostpr.o OBJ/snelcalc.o OBJ/prbudget.o OBJ/brutow.o OBJ/monsters.o OBJ/alloc.o OBJ/pr_overz.o OBJ/pdf.o OBJ/vis.o OBJ/combi.o OBJ/combi2.o OBJ/log_dien.o OBJ/dien_log.o OBJ/levtar.o OBJ/zeevrach.o OBJ/st.o OBJ/reach.o OBJ/harbour.o OBJ/pdfprint.o OBJ/hbmk_yrchxg.o    -mwindows -Wl,--start-group -lhbrtl -lhbvm -lhbcommon -lhbmacro -lhbrdd -lhbsix -lrddntx -lrddfpt -lrddcdx -lxhb -lhbwin -lhbct -lhbnf -lhmg -lhbmzip -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 -lhbmainwin -lkernel32 -luser32 -lgdi32 -ladvapi32 -lws2_32 -lwinspool -lcomctl32 -lcomdlg32 -lshell32 -luuid -lole32 -loleaut32 -lmpr -lwinmm -lmapi32 -limm32 -lmsimg32 -lwininet -lhbpcre -lhbzlib   -Wl,--end-group -oems.exe  -LC:/hb30/lib/win/mingw -LC:/hb30/bin


Thank you!

Maarten
elrosa
Usuário Nível 1

Usuário Nível 1
 
Mensagens: 1
Data de registro: 29 Ago 2016 10:57
Cidade/Estado: Amsterdam
Curtiu: 0 vez
Mens.Curtidas: 0 vez

Anterior Próximo



Retornar para Banco de Dados

Quem está online

Usuários vendo este fórum: Google Adsense [Bot] e 10 visitantes


Ola Amigo, espero que meu site e forum tem lhe beneficiado, com exemplos e dicas de programacao.
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
Faça uma doação para o forum
cron
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro