Erro ao executar NFE_LIMPARLISTA

[VFADev]

Pessoal,

Ao executar a função NFE_LIMPARLISTA, estou recebendo a seguinte mensagem de erro:

    Error BASE/1099  Argument error: STR
    NFE_LIMPARLISTA( 1740 )

[Juliomar Marchetti]

12 minutos atrás, VFADev disse:

Pessoal,

Ao executar a função NFE_LIMPARLISTA, estou recebendo a seguinte mensagem de erro:

    Error BASE/1099  Argument error: STR
    NFE_LIMPARLISTA( 1740 )

segundo a documentação não tem parametro

então pode passar só NFE_LIMPARLISTA

[VFADev]

Esse número entre parenteses indica o número da linha em que o erro está acontecendo, não é parâmetro.

[lucimauro]

Ola;

Usando qual linguagem?

[VFADev]

FWH/Harbour.

[lucimauro]

Aqui uso assim

MT

METHOD LimparLista() CLASS ACBrNFe
   local hResult
   hResult := DllCall(::hHandle, DLL_OSAPI, "NFE_LimparLista", ::nPonteiroDll)
   ::CheckResult(hResult)
   Return nil

ST

METHOD LimparLista() CLASS ACBrNFe
   local hResult
   hResult := DllCall(::hHandle, DLL_OSAPI, "NFE_LimparLista")
   ::CheckResult(hResult)
   Return nil

Isso a partir da classe  disponível aqui.

[VFADev]

O que é esse ::nPonteiroDll ?

 

[lucimauro]

Ai depende do tipo da dll que voce esta usando , no lnk abaixo tem mais informações sobre a MT

 

[VFADev]

Obrigado Mauro,
Já me ajudou muito, não sabia que havia uma versão da lib especifica para MT.  Vou baixar e testar de novo.

[lucimauro]

Lembrando que se esta usando a classe que disponível aqui no projeto esta e só para singletrhead(ST), voce tem que ver qual dll esta usando, pode ser que seja a errada.

[VFADev]

Sim, estava usando a DLL ST, mas uso MT no nosso frente de loja. Vou ter que trocar. Poderia me adiantar que modificações (Além de trocar a DLL) devo fazer para que a DLL funcione com MT ?
como você inicializou essa sua variável nPonteiroDll?

Editado 21 Setembro, 2022 por VFADev

[Daniel Simoes]

Veja se essa resposta, ajuda...

 

[VFADev]

20 horas atrás, Juliomar Marchetti disse:

segundo a documentação não tem parametro

então pode passar só NFE_LIMPARLISTA

 

14 horas atrás, Daniel Simoes disse:

Veja se essa resposta, ajuda...

 

Obrigado Daniel !

[lucimauro]

Ola;

Ao criar a classe
 

CREATE CLASS ACBrNFe
 HIDDEN:
   VAR hHandle
   VAR nPonteiroDll

Ao iniciar a DLL

::nPonteiroDll:=0
   hResult:= DllCall(::hHandle, DLL_OSAPI, "NFE_Inicializar", @::nPonteiroDll, hb_StrToUTF8(eArqConfig), hb_StrToUTF8(eChaveCrypt))

Depois em cada chamada o ponteiro vai depois do nome de funcao.

METHOD Nome CLASS ACBrNFe
   local hResult, buffer, bufferLen
   bufferLen := STR_LEN
   buffer := Space(bufferLen)
   hResult := DllCall(::hHandle, DLL_OSAPI, "NFE_Nome", ::nPonteiroDll, @buffer, @bufferLen)
   Return(::CheckResult(hResult))

 

Editado 22 Setembro, 2022 por lucimauro

[VFADev]

Muito Obrigado

[Juliomar Marchetti]

51 minutos atrás, VFADev disse:

Muito Obrigado

Deu certo?

[VFADev]

Sim, com as dicas do lucimauro está funcionando agora.

[Juliomar Marchetti]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.

[Juliana Tamizou]

Bom dia pessoal,

Os demos e a documentação da lib serão ajustados para deixar mais claro estas questões.

At.

[antonio.carlos]

@VFADev e @lucimauro subi uma versão ACBrLibNFe versão MultiThread para Harbour- Rev. 26826

Fiquem à vontade para testar e sugerir correções.