Ir para conteúdo
  • Cadastre-se

Werner_Marques

Membros Pro
  • Total de ítens

    780
  • Registro em

  • Última visita

Posts postados por Werner_Marques

  1. Bom dia, estou com um problema para homologar boletos com ACBr juntamente ao banco do nordeste. 

    O meu problema é o seguinte: Estou informando ao componente o código da carteira que possui apenas um digito, conforme o layout do BNB, porém o banco exige que no campo da carteira fique o tipo da operação que possui dois dígitos. Como posso proceder neste caso? Já tentei passar o tipo de operação para o local da carteira, mas não deu certo, pois no boleto continua sendo gerado apenas com o primeiro dígito que informei. 

  2. Régys, eu falei com o suporte do representante da Bematech na minha cidade, segundo eles não há problema algum com a impressora, pelo fato de o movimento ter sido no dia 20 e não no dia 23, o arquivo TDM iria sair dessa forma e eu teria que fazer algum tipo de alteração no meu software, por isso vim pedir a ajuda de vocês.

  3. Bom dia.

    Estou com um problema em um arquivo MFD-TDM. O meu cliente fez vendas no dia 20/02 porém só retirou a redução Z no dia 23/02, quando ele gera o arquivo MFD-TDM do dia 20/02 o mesmo sai com as informações corretas, porém quando ele gera do dia 23/02 o numero do ECF sai com 000  e sem o numero do CNPJ. 

    A impressora dele é uma Bematech MP-2100 TH FI

    Isso é normal? Alguém já passou por alguma situação semelhante?

    Agradeço desde já pela ajuda.

  4. Boa Tarde companheiros,  

    Vejam a minha situação: Um cliente meu está tentando transmitir uma NFe para uma pessoa física com inscrição estadual e isenta de ICMS. Quando ela transmite a NFe a inscrição estadual do destinatário fica em branco no DANFE e também no XML.

    Estou informando ao componente a IE no campo dest.IE e o tipo do contribuinte em dest.indIEdest. Interessante que nos testes que realizei ele só exibe a inscrição estadual caso o indIEDest seja igual a inContribuinte. Esse comportamento está correto?

     

     

  5. Boa Tarde,

    hoje um cliente me relatou um problema em uma NFe. A transmissão ocorreu de forma normal, porém quando ele foi tentar consultar a NFe pela chave, apareceu o seguinte erro: digestvalue não confere. Quando faço o download do xml pelo portal da SEFAZ, realmente o digestvalue está diferente do xml gerado pelo meu sistema. Já aconteceu isso com vocês?

  6. Bom dia,

    Estou passando por um problema para gerar os boletos para um cliente.

    O convênio é de 6 dígitos, carteira 18, banco do Brasil.

    Eu informo ao componente o nosso numero assim: 11383. O componente formata com zeros a frente do numero que informo.

    No momento da impressão o nosso numero fica com o valor que informei com os zeros, e acredito eu que deveria ter também o numero do convenio. 

    Estou informando algo errado?Alguém já passou por esse problema que possa me ajudar?

  7. Bom dia 

    Estou utilizando o seguinte componente "ACBrTEFDDepoisConfirmarTransacoes" que me retorna alguma informações da transação feita do cartão, ele esta funcionando normalmente me trazendo as informações que eu preciso, sendo que especificamente no tipo de cartão " Ticket Cultura" e no TEF D-TEF Direção ao entrar nessa procedure ele trava o sistema. Eu consigo imprimir o cupom e as duas vias do cartao em seguida trava e para na execução dessa procedure. Segue abaixo como ela esta sendo feita:

    var
      I : Integer;
      sdes : string;
    begin
      for I := 0 to RespostasPendentes.Count-1  do
      begin
         with RespostasPendentes do
         begin

            frcupom.Memo1.Lines.Add('Confirmado: '+Header);
            frcupom.Memo1.Lines.Add('ID: '+IntToStr(ID));
            frcupom.Memo1.Lines.Add('Rede: '+Rede);
            frcupom.Memo1.Lines.Add('NSU: '+NSU);
            frcupom.Memo1.Lines.Add('Valor: '+FormatFloat('###,###,##0.00',ValorTotal)) ;
            frCupom.memo1.lines.Add('Parcelas: '+IntToStr(TipoParcelamento));
            frcupom.Memo1.Lines.Add('Qtd Parcelas: '+IntToStr(QtdParcelas));
            frcupom.Memo1.Lines.Add('Cupom Vinculado: '+DocumentoVinculado);
            frcupom.Memo1.Lines.Add('Valor Orgiginal: '+FormatFloat('###,###,##0.00',ValorOriginal));
            frcupom.Memo1.Lines.Add('Taxa de Servico: '+FloatToStr(taxaservico));
            frcupom.Memo1.Lines.Add('Finalizacao: '+Finalizacao);
            frcupom.Memo1.Lines.Add('StatusTransacao: '+StatusTransacao);
            frcupom.Memo1.Lines.Add('Tipo Transacao: '+IntToStr(tipotransacao));
            frcupom.Memo1.Lines.Add('CodigoAutorizacaoTransacao: '+IntToStr(CodigoAutorizacaoTransacao));
            frcupom.Memo1.Lines.Add('NumeroloteTransacao: '+IntToStr(NumeroloteTransacao));
            frcupom.Memo1.Lines.Add('CodigoRedeAutorizada: '+CodigoRedeAutorizada);

            if debito then begin
               frcupom.Memo1.Lines.Add('Debito:  '+'SIM');
               frcupom.Memo1.Lines.Add('Credito: '+'NAO')
            end
            else begin
                frcupom.Memo1.Lines.Add('Debito: '+'NAO');
                frcupom.Memo1.Lines.Add('Credito: '+'SIM');
            end;

            frcupom.Memo1.Lines.Add('Nome Administradora: '+NomeAdministradora);

            if transacaoaprovada then
               frCupom.Memo1.Lines.Add('Transação Aprovada: '+'SIM')
            else
               frCupom.Memo1.Lines.Add('Transação Aprovada: '+'NAO');

            frcupom.Memo1.Lines.Add('Data/Hora Host: '+DateToStr(DataHoraTransacaoHost));
            frcupom.Memo1.Lines.Add('Data/Hora Transacao: '+DateToStr(DataHoraTransacaoLocal));
            frcupom.Memo1.Lines.Add('Data/Hora Transação Comprovante: '+DateToStr(DataHoraTransacaoComprovante));
            frcupom.Memo1.Lines.Add('NSU Transação Cancelada: '+NSUTransacaoCancelada);
            frcupom.Memo1.Lines.Add('Data Transação Cancelado: '+DateToStr(DataHoraTransacaoCancelada));
            frcupom.Memo1.Lines.Add('Data Vencimento: '+DateToStr(DataVencimento));
            frcupom.Memo1.Lines.Add('Modalidade Pgto: '+ ModalidadePagto);
            frcupom.Memo1.Lines.Add('Autenticação: '+Autenticacao);
            frcupom.Memo1.Lines.Add('Campo 11: '+LeInformacao(141,142).AsString);

            frCupom.Memo1.Lines.Add('Parcelado por: '+GetEnumName(TypeInfo(TACBrTEFDRespParceladoPor), integer(ParceladoPor)));
            frCupom.Memo1.Lines.Add('Tipo Operação: '+GetEnumName(TypeInfo(TACBrTEFDRespParceladoPor), Integer(TipoOperacao)));
            frcupom.Memo1.Lines.Add('Autenticacao:  '+GetEnumName(TypeInfo(TACBrTEFDRespParceladoPor), Integer(Autenticacao)));


            frCupom.Memo1.Update;
            frCupom.Memo1.Lines.SaveToFile(PATH_PDV);
            frCupom.Memo1.Lines.SaveToFile(ExtractFileDir(Paramstr(0))+'\Transacoes.txt');


            qrDesc.Close;
            qrDesc.sql.Clear;
            qrDesc.SQL.Add('select');
            qrdesc.sql.Add('nr_loja as nr_loja,data as data,nr_cupom as nr_cupom,nr_ecf as nr_ecf,');
            qrDesc.SQL.Add('nr_id as nr_id,rede as rede,nr_nsu as nr_nsu,');
            qrDesc.sql.Add('qt_parcelas as qt_parcelas,tp_modal as tp_modal,');
            qrDesc.SQL.Add('dt_transcancel as dt_transcancel,nr_nsucancel as nr_nsucancel');
            qrDesc.SQL.Add('from cupom');
            qrDesc.SQL.add('where');
            qrDesc.SQL.add('data ="'+invertedata(impfiscal.acbr1.DataHora)+'"');
            qrDesc.SQL.add('and nr_loja ="'+impfiscal.NrLojaEstoque+'"');
            qrDesc.SQL.add('and nr_ecf ="'+nrecf+'"');
            qrDesc.SQL.add('and nr_cupom ="'+nrcupom+'"');
            qrDesc.SQL.add(';');
            //InputBox('','',qrDesc.SQL.Text);
            qrDesc.open;


            with zLocal2.Script do begin
              Clear;
              if (Header='CRT') then begin
                  add('update cupom set nr_id="'+IntToStr(ID)+'",');
                  Add('rede="'+Rede+'",');
                  Add('nr_nsu="'+NSU+'",');
                  Add('qt_parcelas="'+IntToStr(QtdParcelas)+'",');

                  if debito then
                     Add('tp_modal="1"')
                  else if credito then
                     Add('tp_modal="0"');
              end;
              
              if NSUTransacaoCancelada<>'' then begin
                 add('update cupom set');
                 Add('dt_transcancel="'+InverteData(DataHoraTransacaoCancelada)+'",');
                 Add('nr_nsucancel="'+NSUTransacaoCancelada+'"');
              end;
              
              add('where');
              add('data ="'+invertedata(impfiscal.acbr1.DataHora)+'"');
              add('and nr_loja ="'+impfiscal.NrLojaEstoque+'"');
              add('and nr_ecf ="'+nrecf+'"');
              add('and nr_cupom ="'+nrcupom+'"');
              add(';');
            end;
            zLocal2.Execute;

         end;

      end;
     

     

    Alguém poderia me ajudar?

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