Sweda + PAF + xHarbour + DLL

[seththefirst]

Olá colegas... tenho um problema com o desenvolvimento do PAF, e gostaria que alguém podesse me ajudar.
O sistema da empresa em que trabalho, trabalhar com praticamente todos os modelos de ECF do mercado, e por isso, tenho que desenvolver o PAF compativel com todos eles.

Atualmente, estou adaptando o sistema para o PAF com a ECF da Sweda. Acontece, que ainda não fui capaz de conseguir fazer o download do Arquivo MFD.
Segundo o manual da DLL da Sweda, o comando para isso é: ECF_DownloadMFD. Mas já tentei de tudo quanto foi maneira, e não consegui.

Alguém aqui tem ou teve esse tipo de problema e poderia me ajudar?

Código: Selecionar todos

        d1 := CTOD("01/01/10")
        d2 := DATE()
        cFile := "c:\teste.txt"

        cData1 := STRZERO(DAY(d1), 2 ) + "/" + STRZERO(MONTH(d1), 2) + "/" + RIGHT(STRZERO(YEAR(d1), 4), 2)
        cData2 := STRZERO(DAY(d2), 2 ) + "/" + STRZERO(MONTH(d2), 2) + "/" + RIGHT(STRZERO(YEAR(d2), 4), 2)

        nResposta := DLLCALL( "CONVECF.DLL"           ,;
                              0x0020            ,;
                              "ECF_DownloadMFD" ,;
                              cFile             ,;
                              "1"               ,;    // TIPO 1 DATA
                              cData1            ,;
                              cData2            ,;
                              "0"                )

Executando esse código, a DLL se activa, faz como se estivesse fazendo o procedimento, mas logo depois apresentar uma msg de erro:

Código: Selecionar todos

Encerrando comunicação- Não foi executado ECF_FechaPortaSerial()

Já tentei com loadlibrary antes, e usando o handle no lugar do nome da dll, ja tentei mudar o segundo parametro para o outro valor la possivel, ou até mesmo, o número 32, que já vi em alguns exemplos por ai. Mas não deu certo.

O mais engraçado, é que o exemplo que vem em Delphi (considerando as diferenças de sintaxe), esta exatamente igual ao meu, e pelo Delphi, não apresenta esse erro.

Alguem tem idéia do que possa ser?

Obrigado

ps.: (estou compondo a data, porque o set date do nosso sistema usa outro formato )

[alaminojunior]

Deve ter algum parâmetro desformatado aí. Confira todos eles e verifique se atende ao que a DLL precisa.

[seththefirst]

Ja revisei os parametros todinhos, e confrontei com todos os modelos que vem com o Conect_f.
Vou entrar em contacto com o povo da Sweda, para ver, se alguém pode me ajudar.

Obrigado.

[alaminojunior]

Conect_f.

Eu uso a dll que vem no pacote Connect/C para Windows:
Convecf.dll e Swmfd.dll