Migrar Clipper para Harbour.

[JoséQuintas]

Só um comentário extra, que o Itamar confundiu:

Passei apenas o link do mingw que deixo disponível pra download.
Isso não deixa preso a nada, é apenas pra facilitar.

Acho que o Itamar confundiu com o link do meu Harbour, que pode ser diferente do oficial.
Mas o compilador C, não tem como, é sempre o oficial.

Na prática a gente nunca atualizava o compilador C.
Mas de uns tempos pra cá, desde quando o Harbour 3.2 parou de funcionar com versões anteriores, virou uma coisa de ficar sempre atualizando o compilador C.

Aqui continuo com Harbour 3.4 e mingw 7.3

Não se preocupe com a versão do Harbour. A oficial e mais usada é a 3.2 mesmo

NÃO se trata de versão mais nova, é que a equipe se dividiu, e cada equipe usa um número diferente.
Melhor ficar na 3.2 oficial, porque é a mais usada, e se precisar de ajuda vai estar igual a maioria.
E tudo que é LIB adicional acaba sendo voltada pra 3.2, então 3.4 poderia só trazer complicações.

[JSystem]

Valeu Pessoal!

Muito obrigado ao Itamar, JoseQuintas e MicroVolution em dedicar vossos preciosos tempos para me ajudarem, não imaginava tanta informação rsrs.

Negócio agora é eu gerir todas elas e, mão na massa rsrsrs!

Grato,
Josadac

[djmoy]

Pessoal socorro.
estou migrando de clipper para harbour.

os comandos SEEK e LOCATE FOR nao funcionam quando pesquiso em campos do tipo DATA dos dbf´s.

Já indexei de varias formas e nada.

Alguma dica ?

[Itamar M. Lins Jr.]

Olá!
Manda um exemplo que mostra no clipper funcionando e no harbour dando erro.

Saudações,
Itamar M. Lins Jr.

[Nascimento]

Manda um exemplo que mostra no clipper funcionando e no harbour dando erro.

exato o nobre amigo itamar tem razão e ainda dou a minha, vc pondo exemplos fica mais simples de ajudar-mos

[JoséQuintas]

Acho que o mais comum é indexar usando Dtos(), e o SEEK também usando Dtos().
E.... a data tem que existir pra encontrar...
Opcionalmente poderia usar SEEK Dtos( data ) SOFTSEEK, pra posicionar numa data posterior caso não encontre a data digitada/procurada.

Outras possibilidades de erro:

- Tá na área correta?
- Tá no índice correto?
- A conversão é a mesma?
- A pesquisa usa os campos necessários, caso precise de mais algum além da data?

Tente fazer um teste simples, isolado do aplicativo, pra confirmar se funciona ou não.
E caso não funcione, poste aqui pra entendermos.

Outra possibilidade de erro:

ordem DESCEND
codepage pode afetar isso.

[JSystem]

Olá Pessoal,

Estou iniciando a migração de clipper para harbour, num sistema de materiais para construção.

Meu cliente me questionou se é possível enviar orçamento em pdf para o whatsapp do cliente ?

Grato!

[JSystem]

Olá Pessoal!

Assim que possível, alguém me responde essa dúvida acima, por favor, o cliente está me questionando se é possível.

Grato!

[Itamar M. Lins Jr.]

Olá!
Tira a foto e manda é mais simples. Cada vendedor tem seu telefone.
Se deseja enviar PDF etc pelo WhatsApp basta usar WhatsApp WEB, muito simples. Mas fica atrelado a apenas 1 CPU.
Não precisa de Harbour para isso, CLIPPER pode fazer tranquilamente.
Precisa saber COMO o WhatsApp funciona seus serviços PAGOS, como faz isso com outras linguagens, o Harbour vai pelo mesmo caminho.
https://developers.facebook.com/docs/whatsapp/pricing/
Texto é mais simples.
Aqui no forum tem alguma coisa explicando como é o processo de enviar mensagens pelo Harbour, mas pode ser usado com CLIPPER ou qualquer outra coisa.
https://api.whatsapp.com/send?phone=seu ... 20mensagem Basicamente é trocar essas linhas pelo telefone do cliente e o texto.
Mas com o passar do tempo, todo mundo quer colocar BOTÃO do WhatsAPP para enviar, ai vc vai precisar usar uma LIB gŕafica que é outro passo.
E pagar o serviço de alguma API.

Saudações,
Itamar M. Lins Jr.

[JSystem]

Olá Pessoal!

Estou precisando da vossa ajuda!

Graças a ajuda do Itamar, consegui compilar um sistema em clipper na harbour.

Porém estou com dúvida ao executar o sistema com debugador, quem se lembra do clipper, basta compilar com o /b, em seguida abrir o executável utilizando o cld <nome do executável>, teclando ALT+D e F6, abre, conforme o print do clipper abaixo, mostrando a aba Order Keys, conforme circulei.

Na Harbour, o -b, porém ao abrir, não está mostrando a aba Order Keys, conforme tbem circulei no print da harbour abaixo.

Alguém pode me orientar o motivo ?

Ou se tem outra maneira na harbour ?

Grato,
Josadac

[JoséQuintas]

Nunca reparei nisso.
Mas... se cria os índices, já deve saber as ordens.
Lembrando que o CDX abre sempre todos, a não ser que tenha criado arquivos separados.

[JSystem]

Sim José,
São criados em arquivos separados.
Vc sabe se existe debugador na harbour ou é esse mesmo que utiliza no clippper, executando com ALT+D e F6 p/ visualziar os arquivos abertos e tudo mais ?

[Gilberto Teixeira]

Boa Tarde, sou novo aqui no forum e estou com um problema para migrar do Clipper para Harbour, para poder utilizar o mesmo no Linux (Mint).

Quando eu tento imprimir algo dentro do sistema, aparece a seguinte mensagem de erro.

Error TERM/2014 Create error: LPT1
(DOS ERROR 2)
Quit Retry Default

O Executavel, eu estou executando com o Wine.

A impressora instalada é uma Brother DCP 8085dn, sendo uma impressora de rede.

Eu estou com um projeto para migrar as estações de trabalho de Windows para Linux, por isso preciso migrar o meu sistema, para que possa ser executado no Linux.

Obrigado por enquanto.

[Toledo]

Amigos, vejam o link abaixo:

https://pctoledo.org/forum/viewto ... 35&t=25452

Abraços

[Alen69]

Não sou novo aqui no fórum, no entanto nunca fiz nenhum postagem.
Tenho passado muitas horas a ler todos os posts, em áreas que me interessam.
Desenvolvi software em linguagem XBase, e utilizei o Clipper para criar executáveis, no entanto à mais de 30 anos que não desenvolvo, pois a vida levou-me por outros caminhos.
No entanto numa pequena empresa, que sou Gerente, temos ainda em uso um software desenvolvido em linguagem XBase (não por mim, mas por um programador, que tal como eu parou no tempo. Eu parei de programar e ele continua a compilar com o Clipper)
Cada vez, é mais dificil de manter o hardware e software para poder correr esse tipo de aplicações (ambiente de 32 bits)
Por diversas vezes tenho lançado o desafio de se passar a utilizar o Harbour de forma a que o referido software possa ser utilizado num ambiente de 64 bits e nos possa libertar de servidor (2003 server) e posto de trabalho com o XP que nos permitem continuar a utilizar o referido software.
Quero informar que a empresa é proprietária das fontes e estou em conjunto com o programador a tentar compilar com o Harbour.
Feita esta introdução, vamos às dificuldades.
Informo que já li e reli todos as intervenções neste post, embora admita que a reposta para as nossas dificuldades se encontre deste forum e eu não tenha localizado por deficiência minha.
Para dificultar as coisas, ou não, o programador, utilizar ambiente Linux, que não sei se terá alguma influência no erro.

Passos que forma dados:

Ao fazer (no linux): "hbmk2 TRANS.HBP", dá-me o seguinte erro:
Cannot nest projects deeper than 10 levels

com mais detalhe:

hbmk2: Building sub-project (level 2): TRANS.HBP
hbmk2: Building sub-project (level 3): TRANS.HBP
hbmk2: Building sub-project (level 4): TRANS.HBP
hbmk2: Building sub-project (level 5): TRANS.HBP
hbmk2: Building sub-project (level 6): TRANS.HBP
hbmk2: Building sub-project (level 7): TRANS.HBP
hbmk2: Building sub-project (level 8): TRANS.HBP
hbmk2: Building sub-project (level 9): TRANS.HBP
hbmk2: Building sub-project (level 10): TRANS.HBP
hbmk2[TRANS]: Error: Cannot nest projects deeper than 10 levels


Conteúdo do ficheiro TRANS.HBP:

/ TRANS.HBP


-otrans
-inc
-compr=yes
-quiet
-lxhb
-lhbwin
-lhbct
-gui
TTRANS.PRG
AVERB.PRG
AVERB1.PRG
FAL.PRG
ORD.PRG
ORD1.PRG
ED_TAB1.PRG
ED_TAB2.PRG
FUNCNET.PRG
FUNCOES.PRG
FUNCTEMP.PRG
FUNCTRAN.PRG
FUNC1.PRG
FUNCVAL.PRG
TABELA.PRG
UTILS.PRG
LISTAG.PRG
TRBAN.PRG
GETSYS.PRG