Helio Beltrao Jr.

Boa noite, Diego Resolvido obrigado valeu

Boa tarde, Pessoal Estou com um problema com o layout do ACBRMONITORPLUS com as ultimas versoes porque nao sai mais o municipio de descarrego vou colocar anexar duas imagens que foi tirada ontem com um versao antiga e outra com a mais recente.

Bom dia, Pessoal Nao consegui utilizar a ACBRLIB.DLL acredito que e porque estou uma versao muito antiga do Xharbour 0.99.7 que nao tem esse METHOD hb_StrToUTF8 infelizemente

Boa noite, Jose Nesse topico que tem no LEIA-ME da ACBRLIB tentei fazer de varias forma passando array e string mais nao deu certo, acho que nao entendi esse topico: https://acbr.sourceforge.io/ACBrLib/ComotrabalharcomStrings.html A forma que eu passo o buffer e assim nao sei se estar correto segue o exemplo: FUNCTION ConfigLerValor(eSessao, eChave) local hResult, buffer, bufferLen bufferLen := 255 buffer := Space(bufferLen) hResult := DllCall(hHandle, DLL_OSAPI, "NFE_ConfigLerValor", eSessao, eChave, @buffer, @bufferLen) IF hResult = -1 atencao('<ConfigLerValor> Error: -1 Indica que a biblioteca não foi inicializada.') ELSEIF hResult = -3 atencao('<ConfigLerValor> Error: -3 Indica que houve erro ao ler a configuração informada.') ENDIF CheckResult(hResult) RETURN ProcessResult(buffer, bufferLen)

Bom dia, Daniel E no ACBRLIB.INI e isso ? Se for ja estar CodificacaoResposta=1 e so nesse campo ? Segue o meu arquivo ACBRLIB.INI ACBRLIB.INI

Bom dia, Jose Acredito que seja este method hb_StrToUTF8(eArqConfig) que nao existe no Xharbour 0.99 e ja procurei e varios forum mais nao encontrei nada parecido infelizmente estar complicado de utilizar a DLL.

Boa tarde, Jose M. S. Junior Tambem acho que seja o retorno porque estou mando uns arquivos para poder ser analizado pela equipe e ver se tem condicoes pra me poder usar porque ja fiz varios teste e o retorno e o mesmo. Esse e o inicio para carregar a DLL e inicializar e chamar alguns method: hHandle := '' hHandle := DllLoad(ACBrLIB) IF EMPTY(hHandle) //oErr := ErrorNew() //oErr:Severity := ES_ERROR //oErr:Description := "Erro a carregar a dll [" + ACBrLIB + "]" atencao("Erro a carregar a dll [" + ACBrLIB + "]") ELSE hResult := DllCall(hHandle, DLL_OSAPI, "NFE_Inicializar", eArqConfig, eChaveCrypt) IF hResult = -1 atencao('<INICIALIZAR> Indica que houve falhas na inicialização da biblioteca.') ELSEIF hResult = -5 atencao('<INICIALIZAR> Indica que não foi possível localizar o arquivo INI informado.') ELSEIF hResult = -6 atencao('<INICIALIZAR> Indica que não foi possível encontrar o diretório do arquivo INI.') ENDIF CheckResult(hResult) ENDIF CarregarINI(eArqConfig) CarregarEventoINI(eArqConfig) ConfigLerValor('NFE','FormaEmissao') // estar dando erro porque tem a string e o inteiro (, @buffer, @bufferLen) StatusServico() // nesse caso dar o retorno: E logo dar o o seguinte erro: acbrlib_method.txt ACBrLibNFE-20220602.log ACBRLIB.INI

Bom dia, Jose Consegui imprimir uma nota agora esses erros que postei anteriormente nao consigo saber o que pode ser. Principalmente o STATUS que nao funciona.

Boa Tarde, Pessoal A parte de configuracao o ACBRLIB.INI ocorreu tudo muito bem segue os arquivos ACBRLIB.INI e o arquivo de LOG pra ver onde estou errando me desculpe mais gostaria de usar esta DLL. ACBrLibNFE-20220530.log ACBRLIB.INI

O arquivo ACBRLIB.INI segue em anexo ACBRLIB.INI

Bom dia, Jose O que pode estar acontecendo que nao estar me dando o retorno e estar dando esses erros segue em anexo o arquivo de log. ACBrLibNFE-20220525.log

Bom dia, Jose Nao estou sabendo que passar esses parametros :NFE_ConfigGravarValor(eSessao, eChave, sValor). o que e eSessao o que e eChave o que e sValor

Desculpe o que significa isso NFE_ConfigGravarValor(eSessao, eChave, sValor)

Boa tarde, Jose segue em anexo o que voce me pediu ACBrLibNFE-20220523.log ACBRLIB.INI

Bom dia, Fiz os teste com os dois exemplo esse MT / STDCALL / 32bits. e CDECL da error no status do servico: Indica que houve erro ao consultar o status de serviço. utilizo o Xhabour 0.99

Bom dia, Jose Segue em anexo ACBrLibNFE-20220520.log ACBRLIB.INI

Boa noite, Consegui carregar a ACBRLIB.DLL agora o problema e em alguns metodos dar error por exemplo: FUNCTION Versao() local hResult, buffer, bufferLen bufferLen := STR_LEN buffer := Space(bufferLen) hResult := DllCall(hHandle, DLL_OSAPI, "NFE_Versao", @buffer, @bufferLen) IF hResult = -10 atencao('<VERSAO> Indica que houve falhas na execução do método.') RETURN .F. ENDIF //CheckResult(hResult) RETURN buffer //ProcessResult(buffer, bufferLen)

pasta STDCALL

Erro a carregar a dll ACBrLIB

Pessoal, Estava testando com o ACBRMONITORPLUS rodando mais depois que encerrei estar dando error a carregar a ACBRLIB.DLL o que estou fazendo de errado ? #define ACBrLIB 'ACBrNFe32.dll' hHandle := DllLoad(ACBrLIB) if ! EMPTY(hHandle) atencao("Erro a carregar a dll [" + ACBrLIB + "]") endif

Bom dia, Estou testando essa metodo que peguei no ACBR e nao estar retornando em branco: FUNCTION Versao() local hResult, buffer, bufferLen bufferLen := STR_LEN buffer := Space(bufferLen) hResult := DllCall(hHandle, DLL_OSAPI, "NFE_Versao", @buffer, @bufferLen) atencao(buffer) // apresenta uma tela CheckResult(hResult) RETURN ProcessResult(buffer, bufferLen)

Boa noite, Jose Tem uma outra forma de fazer isso porque passei o dia todo e nao consegui resolver gostaria muito de usa ACBRLIB.DLL mais nao estou conseguindo uso Xharbour 0.9 com SQLRDD

METHOD ConfigLer(eArqConfig) CLASS ACBrNFe local hResult hResult := DllCall(::hHandle, DLL_OSAPI, "NFE_ConfigLer", hb_StrToUTF8(eArqConfig)) ::CheckResult(hResult) RETURN nil

Bom dia, pessoal Estou querendo usar a ACBRLIB.DLL mais estou com um problema na funcao hb_StrToUTF8() porque uso o Xharbour e nao tem esta funcao como posso substituir ?

Bom dia, Daniel Funcionou obrigado