Leitor Busca Preco da GERTEC

[alberto_dias]

Prezados amigos,
Preciso fazer com que o meu sistema tenha comunicação com o Busca Preço da GERTC ( DLL SC501GER.DLL)
Por favor alguém teria um exemplo de como se comunicar via SOCKET com esta DLL
Estou tentando usar as funções HB_DYN_CALLCONV_CDECL mas evolui muito pouco, alguns comandos funcionam outros não,
Agradeço desde já,

[fladimir]

Tenho a anos integração, mas instalo o ServUni da Gertec e exporto um TXT no formato q ele lê na pasta especifica e pronto,simples e prático...

Não resolve assim?

[alberto_dias]

Fladimir,
obrigado por responder,
Liguei para o suporte da Gertec
e eles estão enviando o material do Servuni,
Vou fazer os testes,

[fladimir]

Código: Selecionar todos

	      cArq  := "PriceTAB.TXT"
	      nHand := FCREATE(cArq,0)
	
	      Produto->(DBGOTOP())
	      while Produto->( !eOF() )
	         if Empty(Produto->Codigo)
	            Produto->(DbSkip())
	         else
	            cBuffer := alltrim(Produto->codigo) + "|"+ Alltrim(Produto->Descricao) + "|" + alltrim(Str(Produto->Preco)) +"|"+chr(13) + chr(10)
	            FWRITE(nHand, cBuffer,len(cBuffer) )
	            Produto->(DbsKIP())
	         endif
	      END
	      FCLOSE(nHand)
	     Filecopy("PriceTab.TXT", cCaminhoBDServUNI + "PriceTab.TXT")