Ir para conteúdo
  • Cadastre-se

nildglan

Membros
  • Total de ítens

    443
  • Registro em

  • Última visita

Tudo que nildglan postou

  1. Pessoal estou tentarndo enviar um NFCe em homologação no Pará e ta dando esse erro Rejeicao: Endereco do site da UF da consulta via QR-Code diverge do previsto
  2. mais o acbr vai ta atualizado quanto a isso ou vamos ter que mudar algo?
  3. Pessoal com sistema no Pará em setembro o sefaz do pará vai mudar o ambiente da NFe e NFA, temsos que ta ligado, gostaria de saber se tem que mudar o fonte no acbr ? ou tem lugar pra mudar http://sefa.pa.gov.br/index.php/noticias/15474-autorizacao
  4. Na verdade gabriel, não aparece mesagem vinculado e em outro cliente da tudo certo, só nesse cliente que não faz nada ele não está entrando aqui NFe.EnviarEvento(StrToInt(IDLote)); with NFe.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento do begin lMsg:= 'Id: ' +Id+#13+ 'tpAmb: ' +TpAmbToStr(tpAmb)+#13+ 'verAplic: ' +verAplic+#13+ 'cOrgao: ' +IntToStr(cOrgao)+#13+ 'cStat: ' +IntToStr(cStat)+#13+ 'xMotivo: ' +xMotivo+#13+ 'chNFe: ' +chNFe+#13+ 'tpEvento: ' +TpEventoToStr(tpEvento)+#13+ 'xEvento: ' +xEvento+#13+ 'nSeqEvento: ' +IntToStr(nSeqEvento)+#13+ 'CNPJDest: ' +CNPJDest+#13+ 'emailDest: ' +emailDest+#13+ 'dhRegEvento: '+DateTimeToStr(dhRegEvento)+#13+ 'nProt: ' +nProt; Application.ProcessMessages; bVinculadoManifesto:=true; lblInfo1.caption:='MANIFESTE VINCULADO...' ; end; nesse código esse é o problema o certificado é o mesmo e cnpj também
  5. foi mal ai, o erro é que não vincula o evento , fica como se fosse manifestada mais não baixa o xml
  6. nildglan

    Manifesto da NFe

    Pessoal desde semana passada que não consigo manifestar a nfe, estava manifestando e agora não baixa a nfe, veja como estou fazendo / Memo1.Lines.Add( NFe.SSL.SelecionarCertificado); edtDestinatario.Text := NFE.SSL.CertCNPJ; CNPJ := edtDestinatario.Text; Chave := ''; Chave := RetornoNFEChave.Text; idLote := '1'; CNPJ := edtDestinatario.Text; NFe.EventoNFe.Evento.Clear; Result:= Application.MessageBox('Deseja confirma está nota junto a RECEITA FEDERAL?','Confirmação',MB_YESNO+ MB_ICONQUESTION + Mb_DefButton3); case Result of 2: abort; 7: abort; end ; with NFe.EventoNFe.Evento.Add do begin InfEvento.cOrgao := 91;//UFtoCUF('MA');// infEvento.chNFe := Chave; infEvento.CNPJ := CNPJ; infEvento.dhEvento := now; //infEvento.tpEvento := teManifDestConfirmacao; infEvento.tpEvento := teManifDestCiencia; end; NFe.EnviarEvento(StrToInt(IDLote)); with NFe.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento do begin lMsg:= 'Id: ' +Id+#13+ 'tpAmb: ' +TpAmbToStr(tpAmb)+#13+ 'verAplic: ' +verAplic+#13+ 'cOrgao: ' +IntToStr(cOrgao)+#13+ 'cStat: ' +IntToStr(cStat)+#13+ 'xMotivo: ' +xMotivo+#13+ 'chNFe: ' +chNFe+#13+ 'tpEvento: ' +TpEventoToStr(tpEvento)+#13+ 'xEvento: ' +xEvento+#13+ 'nSeqEvento: ' +IntToStr(nSeqEvento)+#13+ 'CNPJDest: ' +CNPJDest+#13+ 'emailDest: ' +emailDest+#13+ 'dhRegEvento: '+DateTimeToStr(dhRegEvento)+#13+ 'nProt: ' +nProt; end; RetornoNFE.Edit; RetornoNFEManifestacao.Text := NFe.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.xEvento; RetornoNFE.Post; ShowMessage(lMsg); // nfe.ImprimirEvento; estou no estado do Pará
  7. Pessoal estou tentando enviar uma NFCe e está dando esse erro custom apenas aceitas keycode 2=1, keycode 2 = 0, já desistalei e instalei certificado já atualizei esquemas fiz tantas coisas, alguém já passou por isso?
  8. Juliana é que o cliente cobra o juros dele dessa forma ai 0,034, agora me fala uma coisa pra ficar 1% mensal como eu faria ai?
  9. nildglan

    juros do arquivo remessa

    Pessoal meu tópico foi fechado mais, não resolvir meu problema quanto ao juros do boleto do banco do bradesco estou fazendo dessa forma veja if dtArquivoTIPO_JUROS.AsString ='1' then //Juros Diario begin Titulo.CodigoMoraJuros := cjValorDia; Titulo.ValorMoraJuros := dtArquivoJUROS_BOLETOS.AsFloat; end else if dtArquivoTIPO_JUROS.AsString ='2' then //Juros Mensal begin Titulo.CodigoMoraJuros := cjTaxaMensal; Titulo.ValorMoraJuros := dtArquivoJUROS_BOLETOS.AsFloat; end else if dtArquivoTIPO_JUROS.AsString ='3' then //Isento begin Titulo.CodigoMoraJuros := cjIsento; Titulo.ValorMoraJuros := 0; end; só que o juro confifurado esta dessa forma o valor 0,034 ai se eu deixar assim ele só aparece assim no arquivo remessa COBRAR JUROS DE R$ 0,03 POR DIA DE ATRASO PARA PAGAMENTO A PARTIR e na coluna de valores assim 0000000000003 se eu tirar o juros e colocar assim 0,34 fica assim COBRAR JUROS DE R$ 0,34 POR DIA DE ATRASO só que não posso colocar assim tenho que colocar o certo 0,034 como resolver isso?
  10. Pessoal estou usando AcbrNfe para tirar NFCe mais ta dando muito erro de timeout no envio e as vezes de mais no recebimento já aumentei, fiz todas configuração que vir na internet com Internet Explorer, agora depois de um dia todo agora ta passando o envio e ta demorando muito receber , muito tempo e da erro de Lote em processamento então pergunta são duas, porque tanto erro de timeout nesse componente ? e porque essa demora em receber e esse erro de Lote em processamento? veja as configuração ACBrNFe.Configuracoes.WebServices.TimeOut := 25000; ACBrNFe.Configuracoes.WebServices.AguardarConsultaRet := 13000; ACBrNFe.Configuracoes.WebServices.IntervaloTentativas := 3000; ACBrNFe.Configuracoes.WebServices.Tentativas := 20; ACBrNFe.Configuracoes.WebServices.AjustaAguardaConsultaRet := True; alguém sabe porque isso, é um dos problemas maiores que tem de nota, os clientes fica a flor da pele e querendo trocar de sistema, alguém sabe de vez o motivo disso sou do estado do pará
  11. achei mudou para MostraPreview e MostraSetup
  12. aonde está essas propriedades ACBrNFeDANFEFR1.ShowDialog ACBrNFeDANFEFR1.MostrarPreview tenho monte de fonte com isso depois que atualizei hoje não tem mais nada, onde configur isso?
  13. pessoal pelo que vir a variação que tava errada tava 001 e acho que é 19 bem eu acho agora queria saber isso aqui > Segmento S < Lote 0001 > -------------------------------------------------------------------- Deve ser removido: Não será tratado pelo Banco. é pra remover aonde?
  14. Pessoal o banco me retonou o segunte erro depois de ter homologado veja Arquivo analisado conforme convênio acima Efetue o(s) ajuste(s) listado(s): > Header de Arquivo < Lote 0000 > -------------------------------------------------------------------- Posições 033 a 052: Preencher com o código do convênio: '002594019001417019 ' CONSTA 07.0 Código do Convênio no Banco 033 a 052 (20)A G007 > [002594019001417001 ] > Header de Lote < Lote 0001 > -------------------------------------------------------------------- Posições 034 a 053: Preencher com o código do convênio: '002594019001417019 ' CONSTA 11.1 Código do Convênio no Banco 034 a 053 (20)A G007 > [002594019001417001 ] > Segmento S < Lote 0001 > -------------------------------------------------------------------- Deve ser removido: Não será tratado pelo Banco. Após regularização da(s) pendência(s), reenviar o arquivo para validação. Gentileza, ao responder, conservar histórico desse e-mail. Caso não seja identificado retorno desta mensagem após 5 dias corridos (incluso este) o protocolo será encerrado em nossos sistemas. e minha remessa vou anexar só que olhando para o código do acbr no fonte do banco do brasil ta muito diferente veja PadLeft(OnlyNumber(CNPJCPF), 14, '0') + // 19 a 32 -Número de inscrição do cedente PadLeft(Convenio, 9, '0') + '0014' + // 33 a 45 - Código do convênio no banco [ Alterado conforme instruções da CSO Brasília ] 27-07-09 ACBrBanco.ACBrBoleto.ListadeBoletos[0].Carteira + // 46 a 47 - Carteira aModalidade + ' ' + // 48 a 52 - Variacao Carteira e meu acbr ta atualizado porque será que ta assim? R20_4_12_2018.txt
  15. sim resolvir onte a noite muito obrigado, eu tirei esse ACBrNFe.NotasFiscais.GravarXML da contigencia deixei só no Gerarxml que fiz
  16. não é isso eu removir do exception e continua gerando dois, e to debugando e ta indo somente um vez para GerarNFCe agora quando chega nesse procedimento aqui ACBrNFe.NotasFiscais.GravarXML; ele gera os dois 00991200000000000000650000000000001076922530-nfe.xml 15181217543691000172650010000012469000012467-nfe.xml
  17. esse procedimento aqui está gravando dois ACBrNFe.NotasFiscais.GravarXML baixo de else begin Application.ProcessMessages; StatusPrincipal('Validando e assinando NFCe...',rAviso); FrmAreaPrincipal.txtInfomacao.Lines.Add('Validando e assinando NFCe.'); SetStatusNFCe(0,sCupomEnviarNFce,sStatusNFce); // enviada Codigo.txt
  18. veja meu procedimento e como eu chamo ... Moderação: Editado
  19. Pessoal estou fazendo dessa forma if EnviarNFCeOff then begin Ide.tpEmis := teOffLine; end else begin if not InternetGetConnectedState(@Flags, 0) then Ide.tpEmis := teOffLine else Ide.tpEmis := TpcnTipoEmissao(Configuracao.Geral.FormaEmissao); if Ide.tpEmis = teOffLine then FrmAreaPrincipal.txtInfomacao.Lines.Add('Tipo emissão: Contingência'); end; e está gerando dois xml na minha pasta porque?
  20. nildglan

    Homologar boleto BB

    Pessoal mandei minhas remessas para homologar, fiz a homologação mais falta corrigir algo veja Os boletos recebidos estão em conformidade com as normas técnicas adotadas pelo Banco, portanto os boletos estão homologados/validados (por amostragem). Linha Digitável: OK Código de Barras: OK Nosso Número: OK ------------------------------------- Arquivo "R86_19_11_2018.txt" analisado com base nos dados acima, apresentou as seguintes inconsistências: > Estrutura do Arquivo Linhas 07 a 26, posições 09 a 13 : Erro no sequencial do segmento. Ex: - Linha 0007: informado '00004'. Correto '00005' - Linha 0008: informado '00005'. Correto '00006' - Linha 0009: informado '00006'. Correto '00007' Linha 0027, Trailer de Lote: Quantidade de Registros com erro. informado '000024'. Correto '000026' > Header de Arquivo < Lote 0000 > -------------------------------------------------------------------- Posições 033 a 052: Preencher com o código do convênio: '002594019001417019 ' Foi preenchido........................................: '002594019001417001 ' > Header de Lote < Lote 0001 > -------------------------------------------------------------------- Posições 034 a 053: Preencher com o código do convênio: '002594019001417019 ' Foi preenchido........................................: '002594019001417001 ' > Segmento R < Lote 0001 > -------------------------------------------------------------------- Posições 067 a 074: Preencher com a data de cobrança da multa; Deverá ser posterior ao vencimento do título. Foi preenchido: '30121899' > Segmento S < Lote 0001 > -------------------------------------------------------------------- Posições 018 a 018: Preencher com '8' para Bloqueto por email. Esse segmento é utilizado no Banco do Brasil somente para informar o email de Pagadores que receberão seus títulos por email. Para isso, é necessário o cadastramento prévio dessa opção no seu convênio de cobrança junto ao Banco do Brasil. Nesse caso, solicite a sua agência de relacionamento Posições 021 a 160: Informar o endereço de email do cliente; Pode ser informado mais de um, usando ' (sinal gráfico apóstrofo) e está atualizado o acbr porque essas linhas por exemplo Posições 033 a 052: Preencher com o código do convênio: '002594019001417019 ' Foi preenchido........................................: '002594019001417001 ' estão erradas? Estou tentando homologar
  21. pessoal removir o "S" como me falaram e agora o erro persiste em produção, só passa qrCode versão 200 se eu configurar para Capicom e o capicom vai descontinuar como devo fazer? na 100 ta aparecendo menssagem de que não usa mais , como usar a versão veqr200 e libWincript ?
  22. Pessoal não consigo emitir uma nota em modo de homologação aqui no meu estado Pará, da esse erro e ja tentei de todos asa formas ja vi esse link aqui https://www.projetoacbr.com.br/…/43386-infnfesupl-tamanho-…/ mais não resolvir , ja atualizei esquemas ja mudei qrCode para 100, 200 e nada, alguém pode me ajudar? vou postar a imagem do erro agora eu descobrir uma coisa, mudei direto no fonte assim if NFe.infNFe.Versao >= 4 then NFe.infNFeSupl.urlChave := 'http://appnfc.sefa.pa.gov.br/portal-homologacao/view/consultas/nfce/nfceForm.seam'; ai deu certo ou seja sem "S" no http mais só que assim fica ruim porque tem que mexer no fonte e não queria fazer isso, tentei tirar do arquivo ACBrNFeServicos.ini mais debugando vir que não traz certo
  23. eu percebi que o valor 0,034 da percentagem o campo ValorMoraJuros não coloca todos se colocar 0,34 ai ele ja aparece 0,1 no boleto será que é formato desse campo que não aceita?
×
×
  • 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.