Jump to content
Notícias do ACBr

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

consultoria_sticker.png

Conteúdo para desenvolvedores
 ao vivo de terça a quinta!
Saiba mais

dev.png

logo_acbr_paygo.png

TEF ACBr PayGo
Seja um revendedor e ofereça uma solução completa para seu cliente.


botao.png

beneficios.png

snoopyfael

Membros
  • Content Count

    14
  • Joined

  • Last visited

Community Reputation

2 Neutral

About snoopyfael

  • Rank
    Novato

Profile Information

  • Sexo
    Masculino
  • Location
    Belo Horizonte
  1. Muito obrigado. Não tinha prestado atenção na classe de pcnConversaoBPe. Ficou perfeito.
  2. Segundo o manual do BPe as formas de pagamento são: 01-Dinheiro;02-Cheque;03-Cartão de Crédito;04-Cartão de Débito;05-Vale Transporte;99 -Outros Fiz as modificações no arquivo para atender o BPe. PCNComum/pcnConversao.pas TpcnFormaPagamentoBPe = (fpDinheiroBPe, fpChequeBPe, fpCartaoCreditoBPe, fpCartaoDebitoBPe, fpValeTransporteBPe, fpOutroBPe); function FormaPagamentoBPeToStr(const t: TpcnFormaPagamentoBPe): string; function FormaPagamentoBPeToDescricao(const t: TpcnFormaPagamentoBPe): string; function StrToFormaPagamentoBPe(out ok: boolean; const s: str
  3. Bom dia Italo, Atualizei os fontes e fiz um teste aqui, a variável ACBrCTe1.WebServices.Consulta.RetCTeDFe esta sempre retornando vazia, mesmo o arquivo sendo gerado correto. Segue xml em anexo. 31140616883860000150570020000766971000766973-CTeDFe.xml
  4. Como migramos da versão 1.4 para 2.0 isso pasou dispercebido... Problema e convencer os clientes que não é necessarios sair impresso esse valor mais.
  5. with InfCTeComp do begin Chave := Cabecalho.Chave; vPresComp.vTPrest := Rodape.ValorFrete;
  6. Debugando a unit pcteCTeR: (* Grupo da TAG <infCteComp> ************************************************) if Leitor.rExtrai(1, 'infCteComp') <> '' then begin CTe.InfCTeComp.Chave := Leitor.rCampo(tcStr, 'chave'); if Leitor.rExtrai(2, 'vPresComp') <> '' then begin CTe.infCTeComp.vPresComp.vTPrest := Leitor.rCampo(tcDe2,'vTPrest'); i01 := 0; while Leitor.rExtrai(3, 'compComp', '', i01 + 1) <> '' do begin CTe.InfCTeComp.vPresComp.compComp.Add; CTe.InfCTeComp.vPresComp.compComp[i01].xNome := Leitor.rCampo(tcStr,
  7. Meu problema é ao carregar o xml ao componente... Vou adicionar as units ao projeto para debugar.
  8. Estou tendo um problema parecido ao imprimir a DACTE o valor complementado sai corretamente, mas ao carregar o componente com o XML via LoadFromStream o valor complementado sempre sai zero. Alguma solução para esse problema?
  9. Obrigado Nellien, vou fazer o teste aqui.
  10. Segue retorno em Anexo: retorno.xml Se tentar enviar novamente recebo o retorno que o evento esta duplicado. Mas em todos os casos esta entrando na except raise EACBrCTeException.Create('Erro Desconhecido ao Enviar Evento de CT-e!')
  11. Segue e-mail recebido ontem pela SEFAZ. Fazendo o teste aqui o retorno é stat=135 e mesmo assim retorna o erro de 'Erro Desconhecido ao Enviar Evento de CT-e!', consultando o CTe pelo http://portalcte.fazenda.mg.gov.br/consultas.html não tem como identificar se foi ou não enviada a CCe.
  12. Muito obrigado Nellien, estava quebrando a cabeça aqui...
  13. Atualizei os fontes ontem e recompilei. Estou tentando enviar o evento CCe para MG, mas sempre recebo como retorno o erro: "630 - Rejeicao: Falha no schema XML especifico para o evento", mesmo não dando nenhum erro no schema. Alguma ideia de como resolver esse problema? Segue em anexo o xml de envio e o retorno. Obrigado, Raphael... CCe.xml retorno.xml CCe.xml retorno.xml
×
×
  • Create New...