Olá Alexandre,
Alexandre Silva escreveu:Jairo essa opcao do define nao deu..
coloquei no xxx.ch recompilei, continua mostrando variavel DB_1IND_ORD nao existe..
Alexandre, então não sei. Estou usando a opção via #include, e ela sofre alteração, veja:
Nota: se o arquivo que vc diz: xxx.ch é o arquivo do nome do projeto, ele é atualizado cada vez que vc altera seu projeto e gera os fontes.
Este é como ind_or está no arquivo do Clipper:
1EXPO 1 ├▓ë(z DT ▓ë8z $┐ °¤CIDCLI DB_1FREEZE ╬▓ë(z
DT ▓ë8z $┐ °¤
DB_1IND_OR ╬▓ë(z
DT ▓ë8z $┐ °¤ @DB_1QTDC R ╬▓ë(z
Este é como ind_or está no arquivo Harbour:
ÇD@
DB_1IND_OR ╬
@DB_1FREEZE ╬
DB_1EXPO ├
Veja, Ambos estão como ind_or.
drvautohelp também usei #define
Alexandre Silva escreveu:Olha o que eu fiz: No arquvo xxx_FUNC.prg que sempre é gerado, na funcao.. FUNC LDBEDIT(lecons) na linha que le a consulta gravada
ind_ord=db_&pas.ind_or //d ( tirei o d e funcionou) o inconveniente é que a cada geracao tem que editar e mudar..
Ok. Vc alterou a variavel que retorna o indice escolhido pelo usuário. A rigor, retorna apenas o indice, não a consulta, veja:
db_&pas.arqf=id_carg[1] // retorna o filtro
db_&pas.expo=id_carg[2] // retorna a ordem
db_&pas.chvr=id_carg[3] // retorna a chave de relacionamento quando há consulta relacional
db_&pas.ind_ord=id_carg[4] //retorna o indice da consulta
Alexandre Silva escreveu:Sobre GasPRO
1-Tem um problema que nao conseguir resolver ainda.. nas consultas pode se relacionar uma base de dados com outra, usando o J , Exemplo no browse de cima ficam os cliente, na parte de baixo as contas a receber, relacionadas pelo codigo do cliente.
Entao quando se movia a base do cliente, ou se posicionava em algum cliente o browse de baixo mostrava os dados daquele cliente.. NO harbour nao esta acontecendo isso..!!!
A funcao é BRWFUNC() no xxx_FUNC.PRG
Pois é.... Quando li isso, veio o popular "putz!". Não verifiquei isso ainda, mas se vc está dizendo é pq tem problema. Mas, como nem tudo são rosas, fazer o q? Vamos ter que resolver.
Alexandre Silva escreveu:2-Voce refez a funcao que encripta ? teve que trocar todas a senhas certo ? ou vc tem a funcao original ? Tem bastante gente migrando do GAS (efeito do SEVEN 64)
Primeiramente, ainda não atualizei sistema em Harbour para nenhum cliente. Decidi migrar para Harbour, e estou trabalhando justamente um sistema desenvolvido pelo Gaspro, e bastante complexo. Acho que o mais complexo que crie até agora, por isso o motivo de tê-lo escolhido, para viver a maior quantidade de problemas possiveis.
Quanto as senhas, não consegui recriar ou restaurar ENCRIPT/DECRIPT, e após exaustivas tentativas acabei usando as opções disponibilizadas pelo Harbour: SX_ENCRYPT/SX_DECRYPT. Mas as senhas não serão perdidas, criei dois utilitários que quando for montar o instalador serão rodados na primeira atualização.
A idéia foi criar um pequeno utilitario no Clipper com a lib GASPRO52, descompactar todas as senhas no arquivo de senhas e salvar, e em seguida abri-lo novamente e compacta-las com o utilitario em Harbour. Já testei, funcionou.
Também pretendo abandor SAVE/RESTORE do Clipper, e usar as do Harbour, acrescentando as linhas de redirecionamento que já passei, mas isso será depois, pois tenho que criar o utilitário para atualizar todas as consultas gravadas por clientes.
Estudei isso, e embora ainda não testei, teoricamente me parece mais simples que a atualização das senhas, pois posso fazê-lo com apenas um utilitário em Harbour.