Ir para conteúdo
  • Cadastre-se

simtechsistemas

Membros Pro
  • Total de ítens

    179
  • Registro em

  • Última visita

Posts postados por simtechsistemas

  1. 1 hora atrás, Diego Foliene disse:

    Conferindo seu fonte, o mesmo parece estar coincidindo com o exemplo que nos foi disponibilizado pela comunidade.

    Por favor, defina no arquivo INI que está salvando suas configurações as propriedades relativas ao Log e refaça o teste.

    Vamos ver se ele gera o arquivo de log para que possamos analisar.

     

    Não tenho o ambiente de desenvolvimento xHarbour, mas fiz um teste com o exemplo em C# e ao chamar o ConfigGravar passando o nome ACBrNFSeX.ini ele gerou para mim um arquivo de mesmo nome com as configurações.

    Pra mim ele também gera o arquivo que defini como padrão, no caso ACBrNFSeX.ini. Qual o parâmetro para gerar o log?

    [Principal]
    TipoResposta=0
    CodificacaoResposta=0
    LogNivel=0
    LogPath=C:\TEMP\

    Outra coisa, ele não está reconhecendo o código do município de BH.

    [NFSe]
    FormaEmissao=0
    SalvarGer=1
    ExibirErroSchema=1
    FormatoAlerta=TAG:%TAGNIVEL% ID:%ID%/%TAG%(%DESCRICAO%) - %MSG%.
    RetirarAcentos=1
    RetirarEspacos=1
    IdentarXML=1
    ValidarDigest=0
    CodigoMunicipio=3106200

     

  2. Não estou falando do arquivo ACBrNFSeXServicos. 

    Uso a classe de exemplo disponibilizada pelo Acbr (Harbour) para usar os métodos da DLL

    METHOD New(eArqConfig, eChaveCrypt) CLASS ACBrNFSe
        local hResult, buffer, bufferLen, oErr
    
        eArqConfig  := IIF(eArqConfig = NIL, '', eArqConfig)
        eChaveCrypt := IIF(eChaveCrypt = NIL, '', eChaveCrypt)
    
        ::hHandle := DllLoad(ACBrLIB)
        if EMPTY(::hHandle) // Eric.Developer: xHarbour retorna 0x00000000
            oErr             := ErrorNew()
            oErr:Severity    := ES_ERROR
            oErr:Description := "Erro a carregar a dll [" + ACBrLIB + "]"
            Throw(oErr)
        endif
        hResult  := DllCall(::hHandle, DLL_OSAPI, "NFSE_Inicializar", hb_StrToUTF8(eArqConfig), hb_StrToUTF8(eChaveCrypt))
        ::CheckResult(hResult)
    RETURN Self

    No método new (Construtor da Classe), me dá a possibilidade de informar qualquer nome para o arquivos de configuração (No seu caso ACBRLib.ini).

    Uso estes métodos, para ler e gravar as configurações:

    METHOD ConfigLerValor(eSessao, eChave) CLASS ACBrNFSe
        local hResult, buffer, bufferLen
        bufferLen := STR_LEN
        buffer    := Space(bufferLen)
        hResult   := DllCall(::hHandle, DLL_OSAPI, "NFSE_ConfigLerValor", hb_StrToUTF8(eSessao), hb_StrToUTF8(eChave), @buffer, @bufferLen)
        ::CheckResult(hResult)
    RETURN ::ProcessResult(buffer, bufferLen)
    
    METHOD ConfigGravarValor(eSessao, eChave, eValor) CLASS ACBrNFSe
        local hResult
        hResult   := DllCall(::hHandle, DLL_OSAPI, "NFSE_ConfigGravarValor", hb_StrToUTF8(eSessao), hb_StrToUTF8(eChave), hb_StrToUTF8(eValor))
        ::CheckResult(hResult)
    RETURN nil

     

    Esta é a forma de como uso os métodos para gravar as configurações

          ::oNFSe:ConfigGravarValor( "NFSe", "FormaEmissao"    , ::aCampos[ "cFormaEmissao" ]  )
          ::oNFSe:ConfigGravarValor( "NFSe", "SalvarGer"       , ::aCampos[ "cSalvarGer" ]  )
          ::oNFSe:ConfigGravarValor( "NFSe", "ExibirErroSchema", ::aCampos[ "cExibirErroSchema" ]  )
          ::oNFSe:ConfigGravarValor( "NFSe", "RetirarAcentos"  , ::aCampos[ "cRetirarAcentos" ]  )

    Só que não grava, Ou a DLL só reconhece o nome do arquivo  "ACBrLib.ini"? 

    Não está gerando LOG

    E as informações gravadas estão de acordo com o Layout

     

  3. 1 hora atrás, Diego Foliene disse:

    O ACBrMonitor e a ACBrLib criptografam no INI as informações de senha.

    No caso da lib, você não pode editar e inserir a senha manualmente no arquivo ini, você precisa usar o método NFE_ConfigGravarValor.

    Você fez este processo?

    [Email]
    Nome=Marcio Augusto (Simtech)
    Servidor=smtp...................com.br
    [email protected]
    Usuario=193819495C382311230A58752429192D0E495D2429072D0E4754246E173606045725
    Senha=393808597562764661
    Codificacao=27
    Porta=587
    SSL=0
    TLS=1
    Timeout=0
    Confirmacao=1
    ConfirmacaoEntrega=0
    SegundoPlano=0
    Tentativas=0
    IsHTML=1
    Priority=
     

  4. Fiz o cancelamento da nota, normal. Voltei pra tela de pedidos, fiz um novo pedido e faturei, emitir a nota e depois sistema abortou. 

    ACBrLibNFE-20230808.log

    18 minutos atrás, Daniel Simoes disse:
    D:\WERP\NOTAS\

    Essa pasta é uma pasta de Rede ? O ideal que seja gravado em Disco Local... Se a houver desconexão de rede, ou problemas de acesso a essa pasta, pode explicar o problema

    Há algum antivírus ou programa nessa máquina, que possa estar derrubando a aplicação ?

    Não é uma pasta de rede. É uma unidade de disco em meu notebook, onde estão instalados os programas.

  5. Source: "D:\RepositorioLocal\Fivewin\WERP\ACBrLib\dep\ACBrCTeServicos.ini"; DestDir: "{app}"; Flags: ignoreversion
    Source: "D:\RepositorioLocal\Fivewin\WERP\ACBrLib\dep\ACBrMDFeServicos.ini"; DestDir: "{app}"; Flags: ignoreversion
    Source: "D:\RepositorioLocal\Fivewin\WERP\ACBrLib\dep\ACBrNFeServicos.ini"; DestDir: "{app}"; Flags: ignoreversion
    Source: "D:\RepositorioLocal\Fivewin\WERP\ACBrLib\dep\ACBrNFSeXServicos.ini"; DestDir: "{app}"; Flags: ignoreversion
    Source: "D:\RepositorioLocal\Fivewin\WERP\ACBrLib\bin\StdCall\ACBrCTe32.dll"; DestDir: "{app}"; Flags: ignoreversion
    Source: "D:\RepositorioLocal\Fivewin\WERP\ACBrLib\bin\StdCall\ACBrBoleto32.dll"; DestDir: "{app}"; Flags: ignoreversion
    Source: "D:\RepositorioLocal\Fivewin\WERP\ACBrLib\bin\StdCall\ACBrMail32.dll"; DestDir: "{app}"; Flags: ignoreversion
    Source: "D:\RepositorioLocal\Fivewin\WERP\ACBrLib\bin\StdCall\ACBrNFe32.dll"; DestDir: "{app}"; Flags: ignoreversion
    Source: "D:\RepositorioLocal\Fivewin\WERP\ACBrLib\bin\StdCall\ACBrMDFe32.dll"; DestDir: "{app}"; Flags: ignoreversion
    Source: "D:\RepositorioLocal\Fivewin\WERP\ACBrLib\bin\StdCall\ACBrNFSe32.dll"; DestDir: "{app}"; Flags: ignoreversion
    Source: "D:\RepositorioLocal\Fivewin\WERP\ACBrLib\dep\LibXml2\*"; DestDir: "{app}\LibXml2"; Flags: ignoreversion recursesubdirs createallsubdirs
    Source: "D:\RepositorioLocal\Fivewin\WERP\ACBrLib\dep\OpenSSL\*"; DestDir: "{app}\OpenSSL"; Flags: ignoreversion recursesubdirs createallsubdirs
    Source: "D:\RepositorioLocal\Fivewin\WERP\ACBrLib\dep\Schemas\*"; DestDir: "{app}\Schemas"; Flags: ignoreversion recursesubdirs createallsubdirs

    Esta é a estrutura do arquivo .iss do instalador do programa. Existe algo errado na estrutura das pastas de onde é copiado os arquivos do acbr?

  6. Linguagem xHarbour.

    O log é gerado até a emissão da nota. 

    A biblioteca está sendo carregada, só que após a emissão da nota e impressão, simplesmente o sistema é fechado. É como se eu estivesse usando uma Demo, que tivesse um total programado de execuções. Infelizmente não tenho como gerar um demo pra simular a situação.

×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...