Ir para conteúdo
  • Cadastre-se

Natanael.Ribeiro

Membros
  • Total de ítens

    54
  • Registro em

  • Última visita

Posts postados por Natanael.Ribeiro

  1. O problema ocorreu devido a essa revisão.

    Revision: 14454
    Author: dopi
    Date: quarta-feira, 17 de janeiro de 2018 11:18:02
    Message:
    Otimização, remoção de Hints e remoção de Casts (por: Waldir Paim)
    ----
    Modified : /trunk2/Fontes/PCNComum/pcnAuxiliar.pas
    Modified : /trunk2/Fontes/PCNComum/pcnGerador.pas
    Modified : /trunk2/Fontes/PCNComum/pcnLeitor.pas
    Modified : /trunk2/Fontes/PCNComum/pcnValidador.pas

    tem q alterar no pcnNFeW, na linha 223 a variável chave de ansistring para string.

  2. O problema ocorreu devido a essa revisão.

    Revision: 14454
    Author: dopi
    Date: quarta-feira, 17 de janeiro de 2018 11:18:02
    Message:
    Otimização, remoção de Hints e remoção de Casts (por: Waldir Paim)
    ----
    Modified : /trunk2/Fontes/PCNComum/pcnAuxiliar.pas
    Modified : /trunk2/Fontes/PCNComum/pcnGerador.pas
    Modified : /trunk2/Fontes/PCNComum/pcnLeitor.pas
    Modified : /trunk2/Fontes/PCNComum/pcnValidador.pas

  3. oi, estou com problemas ao instalar o ACBrNFe.

    Embarcadero Delphi for Win32 compiler version 30.0
    Copyright (c) 1983,2015 Embarcadero Technologies, Inc.
    C:\ACBR\Fontes\ACBrDFe\ACBrNFe\PCNNFe\pcnNFeW.pas(240) Error: E2033 Types of actual and formal var parameters must be identical
    C:\ACBR\Fontes\ACBrDFe\ACBrNFe\PCNNFe\pcnNFeW.pas(246) Error: E2033 Types of actual and formal var parameters must be identical
    C:\ACBR\Fontes\ACBrDFe\ACBrNFe\ACBrNFeNotasFiscais.pas(2140) Fatal: F2063 Could not compile used unit 'pcnNFeW.pas'
    Compilation failure
    Erro ao compilar o pacote "ACBr_NFe.dpk".
    Abortando... Ocorreram erros na compilação dos pacotes.
     
    no código eu vi que o problema é em relação ao ansistrin e string.
  4. olá, estou tentando especificar os dados da transação no tef(crédito, débito, quantidade de parcelas), mas o evento não está executando, eu coloco um pause break mas durante a operação esse evento não é executado.

    procedure TForm1.ACBrTEFD1AntesFinalizarRequisicao(Req: TACBrTEFDReq);
    begin
      if Req.Header = 'CRT' then
      begin
        Req.GravaInformacao(777, 777, 'REDECARD');
        Req.GravaInformacao(777, 777, 'CIELO');

        Req.GravaInformacao(800, 1, VMeuTipoCartao.toString); //0=crédito; 1=débito.
        Case VMeuTipoCartao of
          0:
          begin
            if VMinhaQtdeParc = 0 then
              Req.GravaInformacao(800, 2, '0') //0=à vista; 1=parcelado.
            else
            begin
              Req.GravaInformacao(800, 2, '1');                        //parcelado
              Req.GravaInformacao(800, 3, VMeuTipoParcelado.ToString); //0=ADM (juros por conta do dono do cartão); 1=Loja (juros por conta da loja).
              Req.GravaInformacao(800, 4, VMinhaQtdeParc.ToString);
            end;
          end;
          1: Req.GravaInformacao(800, 2, '0'); //Se for C.D., só à vista.
        end;
      end;
    end;

  5. @EliasCesar é um antigão, Wilbor RS485 (Term16), eu tive que alterar essa linha 112 pra funcionar normalmente, eu queria fosse alterado no svn ou adicionar um parametro pra definir se a confirmação da tecla ser dois toques ou não.

  6. Boa tarde, estou utilizando o terminal Wilbor junto com o ACBrTER, só que quando eu pressiono uma tecla não recebo a resposta, só recebo a resposta se eu teclar duas vezes bem rápido, pra reverter a situação eu alterei ACBrTERWilbor.pas na linha 112, onde alterei de 1 para 0 para receber qualquer tecla sem precisar teclar duas vezes, não encontrei nenhum parametro para confirmar a tecla com dois toques ou não, como procedo nesse caso?

    Procedure TACBrTERWilbor.LeSerial( MillisecTimeOut: Integer );
    Var Packet : String;
    Begin
      Try
         Packet := fpDevice.LeString( MillisecTimeOut );
         If TACBrTER( fpOwner ).Comutadora Then
          begin   //Possui Comutadora gerenciando vários Terminais?
            While Length( Packet ) >= 3 Do
            begin
               TACBrTER( fpOwner ).DoRecebeChar( StrToIntDef( Copy( Packet, 1, 2 ), 0 ), Packet[3] );
               Delete( Packet, 1, 3 );
            end;
          end
         else
          begin
            while Length( Packet ) > 0 Do // linha 112 - "while Length( Packet ) > 1 Do"
            begin
               TACBrTER( fpOwner ).DoRecebeChar( 0, Packet[1] );
               Delete( Packet, 1, 1 );
            end;
          end;
      Except
        { String não foi recebida (TimeOut) }
      End;
    End;

  7. Então nenhum cliente que não for posto de gasolina, não pode ter produto com mais de duas casas decimais no valor?

    Agora, Natanael.Ribeiro disse:

    Então nenhum cliente que não for posto de gasolina, não pode ter produto com mais de duas casas decimais no valor?

    vUnCom: Deve ser informado com 3 decimais no caso de combustíveis (Art. 20, da Resolução ANP nº 41/2013), para os demais com 2 decimais.

  8. Tenho um produto com o valor 23,077, quando o acbr gera a xml ele arredonda para 23,08 fazendo com que dê diferença no valor total com as formas de pagamento, se eu informar que aquele produto é um combustivel ele informa o valor que eu passei, mas altera o indRegra para Truncamento, o que eu posso fazer nesse caso, usar todos os produtos como combustivel?

  9. A Geração do TDM na Epson TM-81 FBIII, não informa os cupons do período.

    E01EP081510000000095990 ECF-IF EPSON               TM-T81 FBIII        01.00.04  2016082413243000223731565000144TDM000000000000201609242016092504.07.01AC1704 01.00.00
    E02EP081510000000095990 TM-T81 FBIII        23731565000144060811102     RIBEIRO PECAS                           RUA DOM AURELIANO MATOS, 1937 - CENTRO                  ITAPAJE - CEARA                                                 2016100714564200000100000000000000840501
    E04EP081510000000095990 TM-T81 FBIII        00              00000000000000              000000000000000000000000
    E05EP081510000000095990 TM-T81 FBIII        237315650001442016100714564260*by%!zn7
    E06EP081510000000095990 TM-T81 FBIII        2373156500014420161007145644R$  
    E07EP081510000000095990 TM-T81 FBIII        010004    20160824
    E08EP081510000000095990 TM-T81 FBIII        23731565000144MFD0810000000091146 
    E09EP081510000000095990 TM-T81 FBIII        00000120161007152822S
    E09EP081510000000095990 TM-T81 FBIII        00000220161015112434S
    E10EP081510000000095990 TM-T81 FBIII        000000        00000000000000000000000000
    E11EP081510000000095990 TM-T81 FBIII        00000000000000000000000000000000000000000000000000000000000000000000000000000020161026171526
    E12EP081510000000095990 TM-T81 FBIII        00000000000000000000                      00000000000000 
    E13EP081510000000095990 TM-T81 FBIII        00000000       0000000000000
    E14EP081510000000095990 TM-T81 FBIII        00000000000000        000000000000000000000000000 0000000000000 00000000000000 0000000000000                                         00000000000000
    E15EP081510000000095990 TM-T81 FBIII        00000000000000000                                                                                                                  0000000   00000000000000000000000000000000000000        000000000000000000000000000000000 00
    E16EP081510000000095990 TM-T81 FBIII        000000000000000000000000000000                
    E17EP081510000000095990 TM-T81 FBIII        00000000               0000000000000
    E18EP081510000000095990 TM-T81 FBIII        00000000               0000000000000
    E19EP081510000000095990 TM-T81 FBIII        00000000000000        000000000000000000000000000 0000000000000 00000000000000 0000000000000                                         00000000000000
    E20EP081510000000095990 TM-T81 FBIII        00000000000000000               0000000000000000000000000000000000000000000000000000 0000000000000
    E21EP081510000000095990 TM-T81 FBIII        00000000000000000000               0000000000000 0000000000000
    EADB7B933A84EE55BA07494802A2DA54D32A17AD9422FA338B6789531625B3469D4111F7438632FB12E20070CA8FE6C180BA9DAF82387516A5A56F610AA13AC404AE20565D1C42798E6D8421BF4C3865320F615D93B805B12DC71FA43A83386EBE38B618B7AA6EA5FAE35F569F8EE85B667425B64A13837D4FCE1782AB50CA03545

  10. Consegui Gerar o TDM trocando o "EPSON_Serial_Abrir_Porta" pelo "EPSON_Serial_Abrir_Fechar_Porta_CMD", mas gerou com nenhuma de informação de cupom, mas teve cupom no período informado.

    E01EP081510000000095990 ECF-IF EPSON               TM-T81 FBIII        01.00.04  2016082413243000223731565000144TDM000000000000201609242016092504.07.01AC1704 01.00.00
    E02EP081510000000095990 TM-T81 FBIII        23731565000144060811102     RIBEIRO PECAS                           RUA DOM AURELIANO MATOS, 1937 - CENTRO                  ITAPAJE - CEARA                                                 2016100714564200000100000000000000840501
    E04EP081510000000095990 TM-T81 FBIII        00              00000000000000              000000000000000000000000
    E05EP081510000000095990 TM-T81 FBIII        237315650001442016100714564260*by%!zn7
    E06EP081510000000095990 TM-T81 FBIII        2373156500014420161007145644R$  
    E07EP081510000000095990 TM-T81 FBIII        010004    20160824
    E08EP081510000000095990 TM-T81 FBIII        23731565000144MFD0810000000091146 
    E09EP081510000000095990 TM-T81 FBIII        00000120161007152822S
    E09EP081510000000095990 TM-T81 FBIII        00000220161015112434S
    E10EP081510000000095990 TM-T81 FBIII        000000        00000000000000000000000000
    E11EP081510000000095990 TM-T81 FBIII        00000000000000000000000000000000000000000000000000000000000000000000000000000020161026171526
    E12EP081510000000095990 TM-T81 FBIII        00000000000000000000                      00000000000000 
    E13EP081510000000095990 TM-T81 FBIII        00000000       0000000000000
    E14EP081510000000095990 TM-T81 FBIII        00000000000000        000000000000000000000000000 0000000000000 00000000000000 0000000000000                                         00000000000000
    E15EP081510000000095990 TM-T81 FBIII        00000000000000000                                                                                                                  0000000   00000000000000000000000000000000000000        000000000000000000000000000000000 00
    E16EP081510000000095990 TM-T81 FBIII        000000000000000000000000000000                
    E17EP081510000000095990 TM-T81 FBIII        00000000               0000000000000
    E18EP081510000000095990 TM-T81 FBIII        00000000               0000000000000
    E19EP081510000000095990 TM-T81 FBIII        00000000000000        000000000000000000000000000 0000000000000 00000000000000 0000000000000                                         00000000000000
    E20EP081510000000095990 TM-T81 FBIII        00000000000000000               0000000000000000000000000000000000000000000000000000 0000000000000
    E21EP081510000000095990 TM-T81 FBIII        00000000000000000000               0000000000000 0000000000000
    EADB7B933A84EE55BA07494802A2DA54D32A17AD9422FA338B6789531625B3469D4111F7438632FB12E20070CA8FE6C180BA9DAF82387516A5A56F610AA13AC404AE20565D1C42798E6D8421BF4C3865320F615D93B805B12DC71FA43A83386EBE38B618B7AA6EA5FAE35F569F8EE85B667425B64A13837D4FCE1782AB50CA03545

  11. Em 25/10/2016 at 14:11, Natanael.Ribeiro disse:

    é só conectar e no menu fiscal, clicar em Espelho da MFD.

    Arq. MFD, Arq.MF (Novo), Arq.MFD (Novo) Também ocorre. 

    Modelo da Impressora: Epson TM-T81 FBIII.

    2016-10-25 (1).png

    Mais Arquivos de Log.

    acbrlog.txt

    Em 25/10/2016 at 14:11, Natanael.Ribeiro disse:

    é só conectar e no menu fiscal, clicar em Espelho da MFD.

    Arq. MFD, Arq.MF (Novo), Arq.MFD (Novo) Também ocorre. 

    Modelo da Impressora: Epson TM-T81 FBIII.

    2016-10-25 (1).png

    Mais Arquivos de Log.

    acbrlog.txt

×
×
  • 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...
The popup will be closed in 10 segundos...