Ir para conteúdo
  • Cadastre-se

amauridebarros

Membros
  • Total de ítens

    136
  • Registro em

  • Última visita

Tudo que amauridebarros postou

  1. Bom dia Juliomar, muito obrigado pelo retorno, segue as respostas Poderia passar maiores informações? A1 ou A3? Resposta: A3 cadeia de certificados instalados? Resposta: Somente este certificado está na máquina A3 driver instalado? Resposta: Está, eu testei ele baixando um XML no portal da NFE windows se atualizou recente? Resposta: Esta máquina não tinha o certificado digital instalado antes da ultima atualização mas não houve atualização recente nela. Seu programa está executando como administrador? Sim
  2. amauridebarros

    Certificado

    Boa noite Estou utilizando o acbrnfe e ele está travando no momento em que pede o status do certificado. Não sei nem o que perguntar direito pois ele não retorna nenhum erro, não retorna nenhuma mensagem Simplesmente trava o sistema ele tem que ser reiniciado pelo gerenciador de tarefas. Ele trava no momento que que executa o comando. StatusCertificado() A partir dai o sistema trava. Alguém tem ideia do que pode ser este problema.
  3. Era isto mesmo. Estou agora com um outro problema mas é referente à tributação. Este problema esta resolvido muitíssimo obrigado RESOLVIDO
  4. Alguém aqui emite NFSE para o município de Guarulhos e mode me mandar um exemplo de como vocês informam o campo Servico.CodigoTributacaoMunicipio. O código de tributação do meu cliente na NFse emitida pelo portal da prefeitura é 1.07 / 951180001 Eu já tentei informar da seguinte forma 1.07 - 107 - 1.07 / 951180001 - 107 / 951180001 - 1.07/951180001 - 107/951180001 Mas não funciona de jeito nenhum ele sempre me da o erro - Código de tributação inexistente - conforme a imagem anexa. Alguém sabe como informar este valor? Antecipadamente obrigado
  5. Ok muito obrigado pode encerrar o tópico. RESOLVIDO
  6. Bom dia, O Meu provedor(ginfes) só me permite consultar lote, utilizando o botão consultar lote o processo funcionou. Muito obrigado ao pessoal que me ajudou. Este tópico pode ser encerrado (RESOLVIDO)
  7. Olá, Eu consultei troquei a consulta pelo botão consultar lote e ele funcionou. Agora estou com problema em que ele está me dizendo que o cnae informado no exemplo é inexistente estou procurando resolver este problema agora. Este tópico pode ser encerrado (RESOLVIDO) Muito obrigado
  8. Muito obrigado pelo retorno. Na realidade não é exatamente isso que eu preciso em um outro post que eu fiz eu recebi a instrução de que para gerar a NFSE eu preciso usar esta opção. O que eu realmente preciso é saber como gerar a NFSE depois de gerar o RPS, como eu faço para gerar a NFSE e imprimir a DANFE? tem alguma outra forma sem ter que fazer a consulta?
  9. Bom dia, Estou tentando consultar um lote RPS enviado à Prefeitura de Guarulhos(SP) e estou recebendo a mensagem: URL não definida para: TNFSeConsultarSituacaoLoteRPS É alguma configuração no componente NFSE? Estou utilizando o Botão "Consultar Situação do Lote" do programa exemplo segue anexo o RPS e o Retorno 1-rec.xml 3520070619644300018656000000000000001-rps.xml
  10. Olá pessoal obrigado pela ajuda mas agora surgiu um outro problema. ele está me retornando esta mensagem. CNPJ do prestador especificado no lote não confere com o prestador informado no RPS. Estou anexando o lote e o RPS aparentemente o cnpj do prestador está igual nos dois. 3520070619644300018656000000000000001-rps.xml 0001-env-lot.xml
  11. Uma outra dúvida é a seguinte: Eu gerei o RPS como faço agora pra gerar a NFSE?
  12. Obrigado Dercide Alvarez, peguei o protocolo no arquivo 1-rec.xml só que agora ele esta me dando a mensagem "URL não definida para: TNFSeConsultarSituacaoLoteRPS" voces sabem o que pode estar errado?
  13. Ok então eu estou meio perdido é no processo voce pode me ajudar? Quando eu envio o RPS pela opção - Enviar lote RPS(Enviar) - (No programa exemplo) ele gera o XML que está em anexo, pelo que eu entendi este xml vai ser utilizado para emitir a NFSE é isto? Se for como eu faço agora para gerar a NFSE? Obrigado 3520073206487900012156000000000000001-rps.xml
  14. amauridebarros

    Envio da NFSE

    Bom dia; Estou aprendendo a trabalhar com a NFSE, ja utilizo a NFE sem problemas e na NFSE estou no seguinte ponto: Estou emitindo uma NFSE da prefeitura de Guarulhos, e aparentemente ele gerou sem erros o RPS. Mas eu olho o XML do rps e não tem numero de protocolo. depois de utilizar a opção - Enviar lote RPS(Enviar) - do programa exemplo é preciso fazer mais algum procedimento para ele gerar o protocolo de envio ou tem algum procedimento a ser feito antes dele?
  15. amauridebarros

    Documentação NFSE

    Bom dia, Eu utilizo o acbr no meu sistema para emitir a NFE. Agora preciso emitir NFSE e estou com algumas dificuldades. Na configuração do componente, gostaria de saber onde eu baixo a documentação do NFSE
  16. Ok entendi muito obrigado pelo retorno...
  17. Bom dia, É possivel baixar os dados de uma NFE emitida utilizando o ACBR NFE? Por exemplo, eu tenho a chave da nfe. e preciso entrar no site da sefaz pra pegar o Nro protocolo, cnpj do destinatario, valor data de emissão etc. É possivel fazer isto direto do Acbr Nfe? Obrigado
  18. Bom dia, Confesso que não me sinto qualificado pra gerar fontes tão bem feitos e bem trabalhados quanto os que vejo aqui, de qualquer forma fica a sugestão. E aproveito para deixar meus sinceros agradecimentos à esta atualização que deixou o relatório muito funcional parabéns. Eu resolvi meu problema gerando um relatório à parte contendo a continuação do estrato.
  19. Boa noite pessoal, Eu estou utilizando o ACBR Boleto e o Layout lFaturaDetal emite o detalhamento da Fatura, porem não sei se estou fazendo algo errado mas só consigo imprimir 1 pagina e o extrato que eu estou tentando utilizar vai gerar varias páginas. Tem alguma forma de resolver isto? Obrigado...
  20. Boa tarde Pessoal me ajudem a esclarecer uma dúvida. Preciso fazer testes de emissão de NFE e de impressora de cupon fiscal porem o certificado digital que eu utilizava (Que é de uma empresa) venceu. Eu gostaria de saber se eu posso ter um certificado digital pessoal (Meu) para utilizar a base de homologação da receita e emitir NFE e Cupom fiscal para testar minhas aplicações. Isto da certo? Obrigado.....
  21. Bom dia pessoal, pelo jeito o problema é mais complexo do que eu imaginava... Meus sinceros agradecimentos ao pessoal que tentou me ajudar, vou pesquisar a documentação e assim que conseguir algo eu posto a solução aqui. Mais uma vez muito obrigado e bom trabalho ou estudos a todos.
  22. "Tente analisar o valor de ACBrNFe.EventoNFe.Evento.Count antes da chamada ao método ACBrNFe.EnviarEvento" ele retorna 1, então o eventoo está sendo enviado certo?
  23. Bom dia pessoal, Eu sei que não deveria estar pedindo este tipo de ajuda e sim lendo a documentação, e eu estou fazendo isto aos poucos mas no momento a situação é emergencial, alguem poderia me passar algum exemplo de cancelamento de nfe que esteja funcionando. Muito obrigado...
  24. ***************************************************************************************************************************************************************************** Esta é a minha rotina não consigo achar onde enviei duas vezes o mesmo evento debugando a aplicação o erro ocorre logo apos a linha: ****************************************************** if ACBrNFe.EnviarEvento(NumeroLote) then ***************************************************** ******************************************************************************************************************************************* procedure TFrmM005HK.SB_CanNfeClick(Sender: TObject); Var DataHoraEvento:TDateTime; NumeroLote :Integer; AnoDoc, MesDoc: string; VdAuxili :TDateTime; VtAuxili :TTime; VsAuxili :String; VsCnpCpf :String; VsNomArq :String; vfcnpcpf :Real; Vidatemi :Integer; Vidatsai :Integer; Vihorsai :Integer; VlrVal:String; vinped:Integer; teste:String; begin ViNroNfe:=StrToInt(EdtNumNfe.Text); VdAtbNfe:=DmAtbCadNfe.RetCadNfe(ViNroNfe ,'1' ,VdTabPed.fVinumped ,VlrNfe ,StrToDate(EdtPriPar.Text) ,1 ,StrToDate(EdtDatSai.Text) ,0 ,1 ,VdTabPed.fVsprzfat ,VdTabPed.fVsnroped ); DmAtbCadPed.Qry_LocNfePed.Close; DmAtbCadPed.Qry_LocNfePed.Parameters.ParamByName('PrNfe').Value:=VdAtbNfe.fVinumnfe; DmAtbCadPed.Qry_LocNfePed.Open; VsNomArq:=DmAtbCadPed.Qry_LocNfePed.FieldByName('nomarq').AsString; Vs_RetChvNfe:=DmAtbCadPed.Qry_LocNfePed.FieldByName('chanfe').AsString; Vs_Retnropro:=DmAtbCadPed.Qry_LocNfePed.FieldByName('codpro').AsString; If DmAtbCadPed.Qry_LocNfePed.FieldByName('codpro').AsString='' then Begin Showmessage('Nota sem protocolo de transmissão...'); abort; End Else begin Application.CreateForm(TFrmA003Hk, FrmA003Hk); FrmA003Hk.Lbl_definicao.Caption:='Justificativa com no minimo 15 caracteres'; FrmA003Hk.Mm_descricao.Lines.Clear; FrmA003Hk.ShowModal; end; if FrmA003Hk.Vb_cancelarNFE then Begin DmAtbCadPed.Qry_LocNfePed.Close; DmAtbCadPed.Qry_LocNfePed.Parameters.ParamByName('PrNfe').Value:=DmAtbCadPed.Tbl_BasePed.FieldByName('numnfe').AsInteger; DmAtbCadPed.Qry_LocNfePed.Open; ACBrNFe.Configuracoes.Arquivos.PathSchemas:='C:\Dsystem\NFE\Schemas\'; ACBrNFe.Configuracoes.Geral.CamposFatObrigatorios:=False; ACBrNFe.Configuracoes.Geral.IdCSC := VdAtbNfe.fVsidtcer; ACBrNFe.Configuracoes.Geral.CSC := VdAtbNfe.fVsidttok; ACBrNFe.Configuracoes.Certificados.NumeroSerie := VdAtbNfe.fVsidtcer; ACBrNFe.SSL.NumeroSerie := VdAtbNfe.fVsidtcer; ACBrNFe.SSL.CarregarCertificado ; // numero do lote de envio **** DataHoraEvento := NOW; NumeroLote := StrToInt(FormatDateTime('yymmddhhmm', NOW)); AnoDoc := Copy(DateToStr(Vd_Retdatemi),7,4); MesDoc := Copy(DateToStr(Vd_Retdatemi),4,2); if not FrmM005hk.ACBrNFe.NotasFiscais.LoadFromFile( FrmM004HK.Vs_arqxmlnfe + '\' + VsNomArq) then raise Exception.Create('Nao foi possivel carregar o xml da nota'); End; ACBrNFe.EventoNFe.idLote := NumeroLote; ACBrNFe.EventoNFe.Evento.Clear; with ACBrNFe.EventoNFe.Evento.Add do begin infEvento.CNPJ := FloatToStr(VdAtbNfe.fVicnpemi); infEvento.dhEvento := DataHoraEvento; infEvento.tpEvento := tecancelamento; infEvento.chNFe := Vs_RetChvNfe; infEvento.detEvento.nProt := Vs_Retnropro; infEvento.detEvento.xJust := FrmA003Hk.Mm_descricao.Text; end; ****************************************************** if ACBrNFe.EnviarEvento(NumeroLote) then ***************************************************** begin with ACBrNFe.WebServices do begin if EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat <> 135 then begin raise Exception.CreateFmt( 'Ocorreu o seguinte erro ao cancelar a nota fiscal eletrônica:' + sLineBreak + 'Código:%d' + sLineBreak + 'Motivo: %s', [ EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat, EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.xMotivo ]); end; end; end else begin with ACBrNFe.WebServices.EnvEvento do begin raise Exception.Create( 'Ocorreram erros ao tentar efetuar o cancelamento:' + sLineBreak + 'Lote: ' + IntToStr(EventoRetorno.idLote) + sLineBreak + 'Ambiente: ' + TpAmbToStr(EventoRetorno.tpAmb) + sLineBreak + 'Orgao: ' + IntToStr(EventoRetorno.cOrgao) + sLineBreak + sLineBreak + 'Status: ' + IntToStr(EventoRetorno.cStat) + sLineBreak + 'Motivo: ' + EventoRetorno.xMotivo ); end; end; if (ACBrNFe.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat = 135) or (ACBrNFe.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat = 155) then begin Showmessage('NFe cancelada com sucesso.'); //Altera o Status da NFE no banco para 3 - NFE Cancelada///////////////////////// // Inserido por amauri para pegar o valor do cnpj e numero VsCnpCpf := Floattostr(VdTabPed.fVfinscli); Dm_AtlBas.Atlcabnfe( DmAtbCadPed.Qry_LocNfePed.FieldByName('numnfe').AsInteger ,'1' ,DmAtbCadPed.Qry_LocNfePed.FieldByName('numnfe').AsInteger ,'1' ,DmAtbCadPed.Qry_LocNfePed.FieldByName('datemi').AsInteger ,DmAtbCadPed.Qry_LocNfePed.FieldByName('datsai').AsInteger ,DmAtbCadPed.Qry_LocNfePed.FieldByName('horsai').AsInteger ,0 ,1 ,VdTabPed.fVfinscli ,0 ,'NFE' ,0 ,0 ,0 ,0 ,0 ,0 ,0 ,0 ,0 ,0 ,0 ,0 ,DmAtbCadPed.Qry_LocNfePed.FieldByName('nomarq').AsString ,DmAtbCadPed.Qry_LocNfePed.FieldByName('chanfe').AsString ,DmAtbCadPed.Qry_LocNfePed.FieldByName('codpro').AsString ,3 //Status 03 - NFE Cancelada ,'0' //Numero da Inscrição estadual da Transportadora ,0 //Codigo da Transportadora ,'A'); ///////////////////////////////////////////////////////////////////////////////// end; *******************************************************************
×
×
  • 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.