amauridebarros

Uma outra dúvida é a seguinte: Eu gerei o RPS como faço agora pra gerar a NFSE?

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?

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

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?

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

Ok entendi muito obrigado pelo retorno...

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

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.

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

Muito obrigado Felipe

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

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.

"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?

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

***************************************************************************************************************************************************************************** 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; *******************************************************************

Ele gerou estes XML 0-eve.xml 0-ped-eve.xml 1905111145-eve.xml 1905111145-ped-eve.xml

Conferido e está atualizado, tinhamos feito isto ontem, mas fizemos novamente...

Ok mas conforme eu disse acho que estou enviando alguma informação errada só não consigo saber o que conferir pois em um outro software que utiliza exatamente a mesma pasta de eschema ele funciona, mas eu não consegui descobrir o que ele está fazendo diferente do meu. Eu estou utilizando exatamente a mesma rotina de cancelamento.

Bom dia: Estou utilizando o ACBR para emitir minhas Notas fiscais. A emissão da NFE está funcionando sem problemas porem quando eu tento cancelar a NFE ele me da o seguinte erro: "Rejeição: Falha no Schema XML", como ele da est mensagem e não da mais nenhuma referência eu não sei onde procurar o que pode estar errado, seguindo outros tópicos eu verifiquei que poderia ser algum erro no arquivo XML mas ele está integro e sem erros, verifiquei um post que dizia que o problema poderia ser em "ACBrNFe.Configuracoes.Geral.CamposFatObrigatorios:=False" eu colouei false com o post dizia a pasta schemas está atualizada e o cancelamento funciona em um outro software que também utiliza ACBR e eu confiro os atributos do componente que esta la e está igual ao meu e também conferindo as informações que o outro software envia não consegui encontrar nada diferente do meu. Alguém pode me dar alguma luz de o que mais eu devo conferir?

Boa tade, Tenho um cliente que perdeu os xmls das notas emitidas, pior que isto tenho que inutilizar algumas notas no intervalo e não sei como fazer isto sem saber exatamente quais notas não foram emitidas. Exemplo: tem um intervalo entre Nota numer 1 e a nota 263, porem existem notas emitidas neste intervalo. Alguem sabe se tem algum recurso para localizar as notas deste intervalo, lembrando que não tenho a chave da nota, não tenho danfe, não tenho xml resumindo não tenho nada....

Eu preciso que saia a cst 060 60 ICMS cobrado anteriormente por substituição tributária

Boa tarde, estou gerando a danfe de uma nota emitida mas o meu problema é que ele não gera de jeito nenhum o cst na danfe, o valor vem 0 na danfe e no xml, alguém sabe me dizer de qual atributo o acbr traz esta informação, Segue anexo um print da danfe e do xml.

Boa noite, Eu estou iniciando em acbr nunca fiz nada, estou tentando iniciar um projeto. No momento estou tentando ver o status do serviço, tenho um sistema para emissão das Nfs da empresa que está funcionando normalmente que utiliza a mesma verão do acbr, eu tenho os fontes dele mas não consigo compilar para debugar porque ele utiliza um milhão de componentes externos e eu não estou interessado em instalar todos eles que estou utilizando, mas eu tenho o executável e ele funciona certinho. eu peguei os fontes e pelo que fi ele configura estes parâmetros no acbrnfe. ACBrNFe1.Configuracoes.Geral.IdCSC := '000001' ; //'000001' <-Usado em homologação ACBrNFe1.Configuracoes.Geral.CSC := ''; ACBrNFe1.Configuracoes.Certificados.NumeroSerie := '' ; //Numero de série do Certificado Digital ACBrNFe1.SSL.NumeroSerie := '' ; //Numero de série do Certificado Digital ACBrNFe1.SSL.CarregarCertificado; //Cria a Estrutura para Salvar os XMLS em Pastas separadas ACBrNFe1.Configuracoes.Arquivos.Salvar := True; ACBrNFe1.Configuracoes.Arquivos.EmissaoPathNFe := True; ACBrNFe1.Configuracoes.Arquivos.SepararPorMes := True; ACBrNFe1.Configuracoes.Arquivos.AdicionarLiteral:= False; ACBrNFe1.Configuracoes.Arquivos.PathNFe := IncludeTrailingPathDelimiter(ExtractFilePath(Application.ExeName) +'\Transmitidas' ); ACBrNFe1.Configuracoes.Arquivos.PathEvento := IncludeTrailingPathDelimiter(ExtractFilePath(Application.ExeName)+'\Canceladas' ); ACBrNFe1.Configuracoes.Arquivos.PathInu := IncludeTrailingPathDelimiter(ExtractFilePath(Application.ExeName)+'\Inutilizados' ); eu coloquei exatamente as mesmas informações que estão no sistema que está funcionando, e não consigo ver mais nada que esteja diferente das minha configurações porem nela quando eu executo o comando CodigoStatus := ACBrNFe1.WebServices.StatusServico.cStat; ele me retorna a mensagem - Erro Interno: 0 Erro HTTP: 404. Eu li outros tópicos mas eles dizem que o problema é com a url, ou com o servidor, isto não pode ser porque o outro acbr sistema está funcionando, embora eu não achei onde se configura a url do servidor. Obs, até a solicitação da senha do tokem ele vai. Alguém consegue me dar uma luz do que pode estar acontecendo? Meu ambiente é o seguinte: Windows 10 Delphi xe 8 Acbr - ACBrNFe Ver: 2.0.0a Antecipadamente agradeço a todos.

Bom dia; Muito obrigado pelo seu retorno. Tem alguma forma especifica de debugar o AcbrNfe? pois utilizando o debug do delphi não da nenhum erro esta mensagem é um erro tratado internamente no componente.

Boa tarde, Sou novo aqui e estou usando o componente ACBrNFe, meu objetivo é conseguir emitir uma NF. Consegui chegar até a geração do xml porém quando tento executar o evento enviar do componente ele está me apresentando um erro na tela: ========================================================== Emissor de Nfe falha na validação dos dados da nota Campo:CNPJ - Conteúdo invalido ========================================================== No banco de onde ele está buscando os dados o CNPJ está correto, alguém sabe se eu tenho como criar uma rotina pra ver quais os dados que ele levando em cada campo? pois eu queria conferir se tem alguma informação errada. Antecipadamente Muito obrigado