Página 2 de 13
Re: RDD LETO Sem Mistério
Enviado: 30 Nov 2009 14:57
por frazato
Estou tentando usar o LetoDb, so que nao estou conseguindo gerar a lib, estou usando o xharbour 99.70, gostaria de saber se existem alguem que tenha a lib ja compilada para me enviar. Não estou usando a versao 1.00 do xharbour pois faco uso da Gtwvw, Pdf, Hbcom e fica muito trabalhoso ter que recompilar tudo novamente.
Muito obrigado pela atenção.
frazato@ibest.com.br
frazato
Re: RDD LETO Sem Mistério
Enviado: 30 Nov 2009 19:52
por sygecom
Buenas,
Com a 9970 o LetoDB não funciona, acho que vale a penas você recompilar suas LIB, se se tiver com um pouco mais de tempo, já de uma olhada no Harbour que está voando baixo e com Letodb roda perfeito, tnato em Windows como Linux.
Re: RDD LETO Sem Mistério
Enviado: 09 Dez 2009 19:14
por Hasse
Boa noite colegas.
Como não estou mais conseguindo compilar aplicativos com LetoDB acredito que estou com uma tremenda salada de versões, entre LIBS, CH's, etc..
Eu gostaria de tirar isto a limpo.
Alguém poderia fazer a gentileza de encaminhar para o meu e-mail o LetoDB (todos os arquivos auxiliares) compilado para BCC ? Não esquercer de informar qual a versão do xHarbour que devo usar para compilar o aplicativo.
Antecipadamente os meus agradecimentos.
ivo.hasse@fiomaq.com.br
Re: RDD LETO Sem Mistério
Enviado: 12 Dez 2009 19:44
por sygecom
Olá Hasse,
Com xHarbour não está compilando a versão do CVS, a não ser que compile com a CFLAG: -D__OLDRDD__ , Isso faz ele compilar com uma compatibilidade antes de algumas mudança importantes para Harbour.
Eu compilei com a Versão 1.2.1 do xHarbour, coloquei em anexo o que acabei de compilar.
Re: RDD LETO Sem Mistério
Enviado: 13 Dez 2009 09:23
por Hasse
Obrigado, Leonardo.
Re: RDD LETO Sem Mistério
Enviado: 13 Dez 2009 10:29
por asimoes
Pessoal,
Estou tendo este problema na compilação com harbour já algum tempo, se não me engano até uma versão do dia 16/11/09 eu conseguia gerar a lib rddleto.lib e o letodb.exe
A atualizações partir desta data apresentam o erro abaixo.
Alguém está tendo o mesmo problema?
Confirmando foi uma atualização a partir do 16/11/09
Os fontes com problema:
errint.c (letodb)
hbapierr.h (harbour)
[]´s
Código: Selecionar todos
MAKE Version 5.2 Copyright (c) 1987, 2000 Borland
bcc32 -c -Iinclude;D:\HARBOURX\include -d -tWM -D__WIN32__ -D__WIN_DAEMON__ -oobj\b32\leto1.obj source\client\leto1.c
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
source\client\leto1.c:
bcc32 -c -Iinclude;D:\HARBOURX\include -d -tWM -D__WIN32__ -D__WIN_DAEMON__ -oobj\b32\letomgmn.obj source\client\letomgmn.c
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
source\client\letomgmn.c:
bcc32 -c -Iinclude;D:\HARBOURX\include -d -tWM -D__WIN32__ -D__WIN_DAEMON__ -oobj\b32\hbip.obj source\common\hbip.c
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
source\common\hbip.c:
bcc32 -c -Iinclude;D:\HARBOURX\include -d -tWM -D__WIN32__ -D__WIN_DAEMON__ -oobj\b32\net.obj source\common\net.c
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
source\common\net.c:
bcc32 -c -Iinclude;D:\HARBOURX\include -d -tWM -D__WIN32__ -D__WIN_DAEMON__ -oobj\b32\common_c.obj source\common\common_c.c
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
source\common\common_c.c:
bcc32 -c -Iinclude;D:\HARBOURX\include -d -tWM -D__WIN32__ -D__WIN_DAEMON__ -oobj\b32\blowfish.obj source\common\blowfish.c
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
source\common\blowfish.c:
D:\HARBOURX\bin\harbour.exe -iinclude;D:\HARBOURX\include -n -q0 -w -es2 -gc0 -d__WIN_DAEMON__ source\client\rddsys.prg -oobj\b32\rddsys.c
bcc32 -c -Iinclude;D:\HARBOURX\include -d -tWM -D__WIN32__ -D__WIN_DAEMON__ -oobj\b32\rddsys.obj obj\b32\rddsys.c
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
obj\b32\rddsys.c:
IF EXIST "lib\rddleto.lib" del "lib\rddleto.lib" > NUL
TLIB "lib\rddleto.lib" /0 @MAKE0000.@@@
TLIB 4.5 Copyright (c) 1987, 1999 Inprise Corporation
+obj\b32\leto1.obj &
+obj\b32\letomgmn.obj &
+obj\b32\hbip.obj &
+obj\b32\net.obj &
+obj\b32\common_c.obj &
+obj\b32\blowfish.obj &
+obj\b32\rddsys.obj &
+
D:\HARBOURX\bin\harbour.exe -iinclude;D:\HARBOURX\include -n -q0 -w -es2 -gc0 -d__WIN_DAEMON__ source\server\server.prg -oobj\b32\server.c
bcc32 -c -Iinclude;D:\HARBOURX\include -d -tWM -D__WIN32__ -D__WIN_DAEMON__ -oobj\b32\server.obj obj\b32\server.c
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
obj\b32\server.c:
D:\HARBOURX\bin\harbour.exe -iinclude;D:\HARBOURX\include -n -q0 -w -es2 -gc0 -d__WIN_DAEMON__ source\common\common.prg -oobj\b32\common.c
bcc32 -c -Iinclude;D:\HARBOURX\include -d -tWM -D__WIN32__ -D__WIN_DAEMON__ -oobj\b32\common.obj obj\b32\common.c
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
obj\b32\common.c:
bcc32 -c -Iinclude;D:\HARBOURX\include -d -tWM -D__WIN32__ -D__WIN_DAEMON__ -oobj\b32\letofunc.obj source\server\letofunc.c
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
source\server\letofunc.c:
Warning W8004 source\server\letofunc.c 3053: 'pData' is assigned a value that is never used in function leto_Skip
Warning W8066 source\server\letofunc.c 4704: Unreachable code in function thread2
bcc32 -c -Iinclude;D:\HARBOURX\include -d -tWM -D__WIN32__ -D__WIN_DAEMON__ -oobj\b32\letoacc.obj source\server\letoacc.c
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
source\server\letoacc.c:
bcc32 -c -Iinclude;D:\HARBOURX\include -d -tWM -D__WIN32__ -D__WIN_DAEMON__ -oobj\b32\leto_win.obj source\server\leto_win.c
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
source\server\leto_win.c:
bcc32 -c -Iinclude;D:\HARBOURX\include -d -tWM -D__WIN32__ -D__WIN_DAEMON__ -oobj\b32\errint.obj source\server\errint.c
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
source\server\errint.c:
Error E2356 source\server\errint.c 66: Type mismatch in redeclaration of 'hb_errInternalRaw'
Error E2344 D:\HARBOURX\include\hbapierr.h 171: Earlier declaration of 'hb_errInternalRaw'
Error E2356 source\server\errint.c 96: Type mismatch in redeclaration of 'hb_errInternal'
Error E2344 D:\HARBOURX\include\hbapierr.h 170: Earlier declaration of 'hb_errInternal'
*** 4 errors in Compile ***
** error 1 ** deleting obj\b32\errint.obj
Re: RDD LETO Sem Mistério
Enviado: 14 Dez 2009 18:22
por Hasse
Boa tarde colegas.
F U N C I O N O U . . . . ! ! ! !
)
)
)
Instalei o pacote que o colega Leonardo (Sygecom) disponibilizou e imediatamente a compilação do aplicativo funcionou na primeira tentativa. É claro que também copiei os arquivos da pasta INCLUDE e LIB do LetoDB para as homônimas do xHarbour antes de compilar.
É evidente que havia alguma incompatibilidade entre o xHarbour, a Lib do LetoDB e os arquivos *.ch e *.h da pasta INCLUDE.
Obrigado a todos que colaboraram. :{ :{ :{
Re: RDD LETO Sem Mistério
Enviado: 14 Dez 2009 21:05
por alaminojunior
Aproveitando o prestigioso tópico, pergunto aos colegas se seria possível a seguinte situação:
1º Possuo um cliente que possui duas lojas de vestuário;
2º Nestas lojas existe rodando, o meu sistema em xHarbour com DBFCDX;
3º Às vezes surge a necessidade de receber na loja 1, contas que o cliente contraiu na loja 2 e vice-versa, coisa que já foi superada por meio do TS;
4º Em outras ocasiões surge a necessidade de a loja 1, puxar os dados de um cliente que cadastrou-se na loja 2, e vice-versa, e essa é a questão:
Adiantando....
Por hora estou fugindo de ter de migrar tudo para o LetoDB ou MYSQL, em vista do tempo já demandado por outras coisas urgentes como
TEF e PAF.
Também está descartada por hora, a unificação do cadastro de clientes.
Enfim, seria possível continuar trabalhando com DBFCDX, e no momento de precisar transferir os dados de um cliente para outra loja, fazer esta transferência usando simultâneamente os recursos do LetoDB ?
Na prática, imaginei o seguinte:
Eu faço a consulta ao cadastro da outra loja via TS;
Encontrado o cliente desejado, eu armazenaria os dados cadastrais deste cliente e em seguida, em sentido contrário (da máquina remota para a local) o sistema que está na máquina remota, por meio do LetoDB appendava os dados no DBF local.
Não sei se me fiz entender, mas seria possível esta proeza ?
Re: RDD LETO Sem Mistério
Enviado: 15 Dez 2009 07:45
por asimoes
Alamino,
Tente expor por meio de gráficos, acho que ficaria mais entendivel. Como por exemplo usando a figura de 2 computadores e a sequencia de transmissão/recepção de dados.
[]´s
Re: RDD LETO Sem Mistério
Enviado: 15 Dez 2009 07:47
por asimoes
Hasse,
Eu baixei os fontes que o Sygecom disponibilizou, tentei compilar com harbour e não funcionou, apresentou ou erro.
Na versão da cvs, pelo menos gera a lib, o letodb.exe, não.
Re: RDD LETO Sem Mistério
Enviado: 16 Dez 2009 19:23
por alaminojunior
asimoes escreveu:Alamino,
Tente expor por meio de gráficos
Hare Baguandí, daí eu teria que fazer um curso antes.
Mas a idéia é simples:
Os dois sistemas (loja 1 e loja 2) estão trabalhando com xHarbour e DBFCDX;
Em dado momento, o usuário da loja 1 precisa consultar na loja 2 um determinado cliente nela cadastrado (coisa que já funciona atravéz de TS), e trazer o cadastro deste cliente para a loja 1.
Esse "trazer o cadastro" é que preciso resolver.
Aliás, pensando bem e deixando de lado a idéia do post anterior...
eu poderia acessar o cadastro da loja 2 via RDDLETO , estando esta loja a usar o DBF com DBFCDX ?
Se me disserem que é possível, eu meto as caras.
Re: RDD LETO Sem Mistério
Enviado: 16 Dez 2009 22:10
por asimoes
eu poderia acessar o cadastro da loja 2 via RDDLETO , estando esta loja a usar o DBF com DBFCDX ?
Alamino,
Sim perfeitamente, eu já fiz este teste e funciona.
Para isto você vai ter que usar um serviço de dns como por exemplo o no-ip ou dyndns.
Não esquecendo de liberar a porta 2812 no roteador.
Ficaria por exemplo assim: cServidorDB:='//meuservicodns.org:2812/'
Observação: Se você vai fazer consulta da base clientes, sem problemas, mas se for uma base muito grande, pode perder performance.
[]´s
Re: RDD LETO Sem Mistério
Enviado: 16 Dez 2009 22:36
por alaminojunior
Legal então. Já tenho diversão para o resto da semana
)
asimoes escreveu:Observação: Se você vai fazer consulta da base clientes, sem problemas, mas se for uma base muito grande, pode perder performance.
Deve ter lá os seus 10000 registros.
Mas eu penso em:
No sistema e loja locais, ter um comando onde eu insira o cpf do cliente a consultar, e em seguida escolher em qual loja consultar. Esta escolha poderia ser feita num dbf onde tenha o seguinte:
Código: Selecionar todos
loja ip
loja 01 loja001.no-ip.info
loja 02 loja002.no-ip.info
Com isso o sistema local vai abrir a base de dados de clientes lá na loja remota, e fazer um seek pelo cpf informado, caso encontrar, eu appendo um novo registro na loja local com os dados remotos. Nem precisa exibir em browse, somente confirmar se existe o cpf ou não.
E para finalizar encerro a conexão e já elvis.
Se for isso mesmo ...
Obrigado pela força.
Re: RDD LETO Sem Mistério
Enviado: 21 Dez 2009 08:53
por asimoes
Senhores,
Alguém já consegiui gerar o binário: letodb.exe com o harbour beta 3?
Desde a ultima atualização do harbour beta 3 de 16/11/2009, só gera a lib: rddleto.lib.
[]´s
Re: RDD LETO Sem Mistério
Enviado: 22 Dez 2009 18:31
por sygecom
Olá Asimões,
Esse LetoDB, que postei está corrigido para rodar com xHarbour. Mandei para o Russo as alterações para ele commitar no CVS, mas ainda não me respondeu.
Com Harbour nem testei, mas baixe do ZERO do cvs do LetoDB, e tente compilar com o Harbour do SVN. Assim que sobrar um tempinho vou fazer isso.