Ir para conteúdo
  • Cadastre-se

Eduardo Vismara

Membros
  • Total de ítens

    9
  • Registro em

  • Última visita

Posts postados por Eduardo Vismara

  1. Bom dia,

    Fiz a seguinte alteração no arquivo ACBrCTe.pas:

      if ( (TipoEmissao in [teSVCRS]) and (CUF in [31,41,50,51]) ) then
      begin
         urlUF := LerURLDeParams('CTe', CUFtoUF(CUF), TipoAmbiente, 'URL-QRCode', 0)
      end
      else
         urlUF := LerURLDeParams('CTe', GetUFFormaEmissao, TipoAmbiente, 'URL-QRCode', 0);

    Conforme a informação do portal https://dfe-portal.svrs.rs.gov.br/Cte/Avisos, a URL do QrCode para MS ,MT ,MG e PR devem permanecer as mesmas, segue o arquivo com a alteração na função GetUFFormaEmissao.

    ACBrCTe.pas

    • Obrigado 1
  2. Bom dia,

    Tive um problema com o grande total com uma ECF Bematech MP-4200 TH FI, onde o Acbr me retornava o Grande Total com o valor zerado, analisando o código do ACBrECFEscECF.pas vi que a função GetGrandeTotal estava convertendo a string de retorno da ECF para inteiro e no caso a ECF do meu cliente já tinha atingido o valor de R$ 21.478.320,17 no grande total, assim ultrapassou o valor máximo que o tipo Integer suporta no delphi, segue a baixo a solução que encontrei para o problema.

     

    Código com o erro:

    function TACBrECFEscECF.GetGrandeTotal: Double;
    var
      StrValue: String;
    begin
      RetornaInfoECF( '4|1' ) ;
      StrValue := EscECFResposta.Params[1] ;
      Result   := StrToIntDef( StrValue, 0 ) / 100;
    end;

     

    Solução:

    function TACBrECFEscECF.GetGrandeTotal: Double;
    var
      StrValue: String;
    begin
      RetornaInfoECF( '4|1' ) ;
      StrValue := EscECFResposta.Params[1] ;
      Result   := StrToCurrDef( StrValue, 0 ) / 100;
    end;

     

    • Curtir 2
  3. Anexei o arquivo de log.

    Verifiquei com o fabricante e a ECF está na última versão do software básico.

    Uma coisa que notei é que a ECF funciona na USB 2.0 e as maquinas onde o problema está acontecendo são as mais antigas onde verifiquei que a USB é 1.0, vou substituir o computador para ver se o problema é a versão da USB.

    acbrlog.txt

  4. Boa Tarde,

     

     

    Estou testando a nova ECF da Bematech MP-4200 TH FI e estou tendo problema ao utilizar a função ACBrECF1.DadosUltimaReducaoZ, ela não me retorna o valor do Grande Total, não estou utilizando o emulador.

     

    Dei uma olhado nos dados que a impressora retorna e não encontrei o GT, gostaria de saber se essas impressoras novas não retornam mais essa informação mesmo.

     

    Segue o Retorno da ECF.

     

     

    Data Impressora    : 10/06/2015

    Numero Srie       : BE101310100700000627
    Numero Srie MFD   : 
    Numero ECF         : 003
    Numero Loja        : 001
    Numero COO Inicial : 31
    { REDUO Z }
    Data Movimento  : 03/06/2015
     
    { CONTADORES }
    COO  : 34
    GNF  : -1
    CRO  : 1
    CRZ  : 3
    CCF  : -1
    CFD  : -1
    CDC  : -1
    GRG  : -1
    GNFC : -1
    CFC  : -1
    NCN  : -1
    CCDC : -1
     
    { TOTALIZADORES }
    Grande Total      : -1,00
    VendaBruta        : 6,50
    CancelamentoICMS  : 6,50
    DescontoICMS      : 0,00
    CancelamentoISSQN : 0,00
    DescontoISSQN     : 0,00
    CancelamentoOPNF  : -1,00
    DescontoOPNF      : -1,00
    VendaLiquida      : 0,00
    AcrescimoICMS     : 0,00
    AcrescimoISSQN    : 0,00
    AcrescimoOPNF     : -1,00
     
    { ICMS }
    Indice    : T01
    Tipo      : T
    Aliquota  : 5,00
    Total     : 0,00
    Indice    : T02
    Tipo      : T
    Aliquota  : 17,00
    Total     : 0,00
    Indice    : T03
    Tipo      : T
    Aliquota  : 7,00
    Total     : 0,00
    Indice    : T04
    Tipo      : T
    Aliquota  : 12,00
    Total     : 0,00
    TotalICMS         : 0,00
    SubstituicaoTributariaICMS: 0,00
    IsentoICMS                : 0,00
    NaoTributadoICMS          : 0,00
     
    { ISSQN }
    TotalISSQN        : -1,00
    SubstituicaoTributariaISSQN: 0,00
    IsentoISSQN                : 0,00
    NaoTributadoISSQN          : 0,00
     
    { TOTALIZADORES NO FISCAIS }
    TotalOperacaoNaoFiscal : -1,00
     
    { RELATRIO GERENCIAL }
     
    { MEIOS DE PAGAMENTO }
    Total Troco : -1,00
    ********  Retorno sem tratamento INICIO  ********
    [ECF]
    DataECF = 10/06/15
    DataMovimento = 03/06/15
    NumSerie = BE101310100700000627
    NumECF = 003
    NumLoja = 001
    NumCOOInicial = 31
    NumCOO = 000034
    NumCRZ = 000003
    NumCRO = 000001
     
    [Totalizadores]
    VendaBruta = 6,50
    VendaLiquida = 0,00
    TotalDescontos = 0,00
    TotalCancelamentos = 6,50
    TotalAcrescimos = 0,00
    TotalDescontosISSQN = 0,00
    TotalCancelamentosISSQN = 0,00
    TotalAcrescimosISSQN = 0,00
     
    [Aliquotas]
    01T0500 = 0,00
    02T1700 = 0,00
    03T0700 = 0,00
    04T1200 = 0,00
     
    [OutrasICMS]
    TotalICMS = 0,00
    TotalSubstituicaoTributaria = 0,00
    TotalNaoTributado = 0,00
    TotalIsencao = 0,00
    TotalSubstituicaoTributariaISSQN = 0,00
    TotalNaoTributadoISSQN = 0,00
    TotalIsencaoISSQN = 0,00
     
     
    ********  Retorno sem tratamento FIM  ********
     

     

×
×
  • 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.