Ir para conteúdo
  • Cadastre-se

ALA

Membros
  • Total de ítens

    2.430
  • Registro em

  • Última visita

  • Days Won

    1

Tudo que ALA postou

  1. Bom dia senhores, a propriedade ACBrNFeDANFCeFortesA4.ImprimeQRCodeLateral,não esta funcionando corretamente no componente ACBrNFeDANFCeFortesA
  2. Ops, obrigado pela resposta...
  3. Pessoal, bom tarde. Eu faço isso na NFc-e, mas um pouco diferente, se o produto for o mesmo eu somo as quantidades antes de gerar o xml. Ai quando mando gerar o xml a impressão fica igual. Exemplo: Produto 01 Quantidade: 01 Produto 01 Quantidade 10 Quando gero o xml, produto 01, quantidade 11 Quando imprimo a NFC-e baseado no xml autorizado pela SEFAZ Produto: 01 quantidade 11
  4. CliSiTef.log
  5. Senhores, bom dia. Estou enfrentando um problema na coleta dos doados direto no pinpad. Como já foi dito em outro tópico o TEF deve estar inicializado. Até ai tudo bem. Mas quando tento acionar a função g.ACBrTEFD.TEFCliSiTef.ObtemDadoPinPadDiretoEx(2, ' ', ' ' ) antes de realizar uma venda, ocorre erro -100 na função e não aciona o pinpad.. if Trim( dmst_TEF_DLL ) = dmco_Sim then begin g.ACBrTEFD.DesInicializar( TACBrTEFDTipo( gpCliSiTef ) ); // Configura TEF // g.ACBRTEFD.SuportaSaque := False; g.ACBRTEFD.SuportaDesconto := False; g.ACBRTEFD.SuportaReajusteValor := False; g.ACBRTefD.NumVias := dmin_NViasTef; g.ACBRTefD.EsperaSTS := dmin_ContadorTEF; g.ACBRTefD.TEFCliSiTef.EnderecoIP := dmst_TEF_Endereco_IP; g.ACBRTefD.TEFCliSiTef.CodigoLoja := dmst_TEF_IDLoja; g.ACBRTefD.TEFCliSiTef.NumeroTerminal := g.FormataIDTerminal( dmst_TEF_IdTerminal ); if dmst_TEF_MultiplosCartoes = dmco_Sim then begin g.ACBRTefD.MultiplosCartoes := True end else begin g.ACBRTefD.MultiplosCartoes := False; end; if dmst_TEF_AutoAtivarGP = dmco_Sim then begin g.ACBRTefD.AutoAtivarGP := True end else begin g.ACBRTefD.AutoAtivarGP := False; end; g.ACBRTefD.AutoEfetuarPagamento := False; // sempre falso // g.ACBRTefD.AutoFinalizarCupom := False; // sempre falso // // ** // lcst_estadoSimuladoEcf:= tpsVenda; // CANCELA PENDENTE // ala 21/08/2017 se ocorrer prolema retornar com essa linha lcst_estadoSimuladoEcf := tpsLivre; if not( g.ACBrTEFD.Inicializado(TACBrTEFDTipo( gpCliSiTef ))) then begin g.ACBrTEFD.Inicializar( TACBrTEFDTipo( gpCliSiTef ) ); end; // ** // // *** 1 CPF, 2 CNPJ *** // try if not(InputQuery( 'PDV NFC-e', 'Informe: 1-CPF, 2-CNPJ', lcst_Opcao )) then begin ShowMessage( 'Opção inválida.' ); Abort; end; if StrtoInt( lcst_Opcao ) = 1 then // CPF // begin lbl_Mensagem1.Caption := 'AGUARDANDO DIGITAÇÃO DO CPF NO PINPAD...'; lbl_Mensagem1.Refresh; lcst_Retorno := g.ACBrTEFD.TEFCliSiTef.ObtemDadoPinPadDiretoEx(1, ' ', ' ' ); end else if StrtoInt( lcst_Opcao ) = 2 then // CNPJ // begin lbl_Mensagem1.Caption := 'AGUARDANDO DIGITAÇÃO DO CNPJ NO PINPAD...'; lbl_Mensagem1.Refresh; lcst_Retorno := g.ACBrTEFD.TEFCliSiTef.ObtemDadoPinPadDiretoEx(2, ' ', ' ' ); end else begin Abort; end; except begin ShowMessage( 'Opção inválida.' ); Abort; end; end; if Trim( lcst_Retorno ) <> EmptyStr then begin if not UTIL.Validar_CNPJ_CPF( lcst_Retorno ) then begin lbl_Mensagem1.Caption := EmptyStr; ShowMessage( 'CPF/CNPJ inválido' ); end else begin lbl_Mensagem1.Caption := 'CPF/CNPJ: ' + lcst_Retorno; ShowMessage( 'CPF/CNPJ: ' + lcst_Retorno ); DMXML.DS_VENDA.DataSet.Edit; DMXML.DS_VENDA.DataSet.FieldByName( 'VEN_CNPJ_CIC' ).AsString := lcst_Retorno; DMXML.DS_VENDA.DataSet.Post; DMXML.DS_VENDA.DataSet.Edit; end; end else begin lbl_Mensagem1.Caption := EmptyStr; ShowMessage( 'CPF/CNPJ Não informado' ); end; lcst_estadoSimuladoEcf := tpsLivre; end else begin ShowMessage( 'Opção disponível apenas para SkyTef'); end;
  6. Boa tarde pessoal. Estou com o mesmo problema. Não existe inutilização de nfe para produtor rual ?
  7. Pessoal, boa tarde. Realizei alguns ajustes no relatorio. Se puderem analisar.. agradeço. Apenas removi os '......' Fortes.rar
  8. Obrigado pela resposta vou utilizar ACBrTEFD.Resp.TransacaoAprovada p ver se resolvo o meu problema .. Obrigado...
  9. EMBarbosa, obrigado pela resposta. O problema é, quando utilizou alguns cartões conforme mencionei o campo ACBrTEFD.Resp.CodigoAutorizacaoTransacao esta vazio, apos incluir o código que o OSMCVL postou, o campo passou a ser preenchido para todos os tipos de cartões.. Qual dos campos abaixo posso utilizar para verificar se a transação foi aprovada ou não ? Estava utilizando apenas a ACBrTEFD.Resp.CodigoAutorizacaoTransacao mas nesse caso especifico este campo esta vazio, dessa forma a transação era aprovada no TEF mas a minha aplicação não finalizava a venda. sTEFAutorizacao := ACBrTEFD.Resp.NFCeSAT.Autorizacao; sTEFCodAutorizacao := ACBrTEFD.Resp.CodigoAutorizacaoTransacao; Então realizei um ajuste nos fontes do ACBr e alterei a forma de tratar o retorno na minha aplicação, ficou assim.
  10. Pessoal, bom dia. A alteração postada aqui ainda não foi incorporada no ACBr. Gostaria de saber se a mesma será incorporada ? Estava com problema com cartão de debito do banco original e cartão alimentação de algumas prefeituras. Consegui resolver o problema utilizando o '.pas' postado aqui. Foi incluido apenas uma linha. No caso dos cartoes que mencionei o campo ACBrTEFD.Resp.CodigoAutorizacaoTransacao estava vindo vazio, dessa forma a transação estava aprovado mas a minha aplicação não consegui finalizar a venda...
  11. Pessoal, não sei se estou fazendo corretamente, mas o componente ACBrNFeDANFCeFortes não consegui imprimir em formato A4. Só consegui utilizando o componente ACBrNFeDANFCeFortesA4. Qual ".pas" tenho que alterar para ajusta o layout e remover os '.....' e ':' do Produto...... e Quantidade: Vlr. Unitário: Valor Total:
  12. Boa tarde. Obrigado pela resposta. Não consegui identificar o que esta fora do padrão....
  13. Pessoal, toquei o componente para ACBrNFeDANFCeFortes. Esta saindo conforme imagem abaixo. E obrigatório o formato A4 ser igual ao formato EscPos ?
  14. Boa tarde Juliana, os pontinhos após a palavra "Produto....' os dois pontos após Quantidade:, Vlr. Unitario:, Valot Total: Utilizo o ACBrNFeDANFCeFortesA4
  15. Senhores, boa tarde. Estou tentando imprimir o xml da NFC-e em formato A4. Qual o melhor componente para realizar este procedimento ? Estou utilizando o, ACBrNFeDANFCeFortesA4, mas parece que esta com erro na descrição do "Produto......"
  16. Ops, funcionou blzinha aqui...
  17. Ops, vou testar isso aqui, vc colocou essa função para se acionada antes de iniciar a venda ?
  18. Roney, bom dia. Será que vc poderia informar qual o procedimento vc realizou p isso funcionar. Tentei utilizar isso aqui mas não funcionou... Tenho vários clientes cobrando isso..
  19. Bom dia EMBarbosa, vou baixar aqui e solicitar que o cliente realize os testes.. Breve retorno... Obrigado...
  20. Eu so removi do MDFe, do CT-e ainda esta no meu projeto.
  21. Pelo que entendi vc deve remover essa configuração.. Aqui eu fiz isso e funcionou...
  22. Italo, boa tarde. Essa propriedade foi removida e sempre sera impresso o QrCode do CT-e e MDF-e ? Então posso tirar a configuração do meu projeto, se enviar ou não essa tag ?
  23. Obrigado pela resposta. Mas quando utilizo o ".pas " que foi postado pelo OSMCVZ funciona...
  24. Senhores, bom dia. Utilizando o '.pas' postado no endereço o problema foi resolvido. Mas quando retorno com a '.pas' original do ACBr o erro retorna. Não sei o que o OSMCVL alterou, mas funcionou... Ainda não posso incorporar esse '.pas' no meu projeto, pois não foi liberado pela equipe do ACBr... ACBrTEFDCliSiTef.pas_AJUSTADO_ala
×
×
  • 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.