Ir para conteúdo
  • Cadastre-se

Gallixx

Membros
  • Total de ítens

    79
  • Registro em

  • Última visita

Tudo que Gallixx postou

  1. Estou tendo o mesmo problema. Inclusive tenho um post também Fiz a exportação de um XML do site e percebi que os valores informados para este campo é "0" e o ACBR está enviando "0.00" e "0.0000". Alguma ideia? Será algum problema de configuração?
  2. Certo Italo, Eu preciso ajustar alguns detalhes aqui de certificado digital, que pode estar ocasionando o erro. Vou finalizar isso e tentar novamente. Caso persistir entro em contato novamente. Obrigado pela atenção. (pode fechar o tópico)
  3. Boa tarde, Segue anexo tudo o que eu tenho. (acabei de atualizar o ACBR e fazer o teste novamente) Te enviei meus fontes (no post passado) e agora todos arquivos de configuração que utilizo para enviar a nota. ISSDSF.ini soap.rar ArqINICidades.ini IssDSF.rar 3517105831545800011056000000000000001-rps.xml
  4. Sim Italo, tudo atualizado. Anexei os fontes que utilizo para confiugrar o componente e enviar a nota. Consegue analisar por favor? É bem pouco código. Obrigado. ufrmNFSE.pas ufrmNFSE.dfm
  5. Bom dia Italo. Sim estou usando os arquivos de schemas localizados em \Exemplos\ACBrDFe\ACBrNFSe\Schemas\IssDSF. Utilizei essa configuração abaixo e os arquivos do schema IssDSF copiei para a posta configurada: NFBR.Configuracoes.Geral.PathIniProvedor := Path+'\Provedores\IssDSF'; NFBR.Configuracoes.Arquivos.PathSchemas := Path+'\Provedores\IssDSF';
  6. Peço desculpas, postei na seção errada do forum. Poderiam mover para ACBr -> ACBrDFe -> ACBrNFSe ? Obrigado.
  7. Bom dia a todos, Estou com um problema para enviar nota de serviço para Sorocaba/SP, provedor IssDSF. Consultei o fórum previamente mas não localizei nenhuma solução. Imagem de erro: Segue anexo o XML, aonde os valores informados realmente estão "0.0000" ao invés de "0.00". Alguém já passou por isso? Obrigado. 3517105831545800011056000000000000001-rps.xml
  8. Bom dia, Tenho uma integração feita na minha empresa para emitir nota fiscal eletrônica para Belo Horizonte utilizando o ACBr. A questão é, em uma única máquina o sistema não funciona, e aparece o seguinte erro ao enviar a nota: Alguém já passou por isso? Obrigado.
  9. Wilker, Não consegui encontrar o erro em seu XML, estou sem muito tempo agora pra analisar. Mas olha a dica: Faça download do notepad++ Adicione o Plugin XML Coloque um XML no notepad++ e aperter CTRL+SHIFT+ALT+B Essa ação faz uma validação de formatação e sintaxe do XML, indicando quais os erros que seu XML possui. Se passar no notepad++ com certeza a prefeitura também aceitará. Outra coisa, segue um exemplo válido para issDSF criado por mim. Utilizo esse XML para enviar NFSe para Sorocaba, cujo o padrão é o mesmo. Estou acompanhando o tópico, nos de um feedback. abraço teste_assinatura_Sorocaba.xml
  10. Informe o XML que está enviando para que eu possa verificar. Aguardo, abraço
  11. Pelo visto todas as prefeituras para DSF estão com erro no ACBR.
  12. A geração de XML deste provedor está errada no ACBR, estou tentando concluir os testes pra disponibilizar a minha versão.
  13. Oá boa tarde, Alguém já consegiu fazer a prefeitura de Sorocaba? Procurei no forum inteiro e não achei nenhuma solução a não ser as mesmas dúvidas.
  14. Estou recebendo estes erros: Numero do Lote : Recebimento... : Protocolo..... : Provedor...... : IssDSF Erro ao enviar RPS #10590. Erro Desconhecido ao Enviar o Lote! Alguém??
  15. Sim marcelo, cada filial é um objeto e possui algumas configurações pré definidas em código. Vou te enviar um e-mail dizendo um OI e te ajudo sim, abraço.
  16. @Marcelo Henrique, eu descubro na tentativa e erro, normalmente o ACNBR ja acusa o erro de não existir tal implementação na hora de executar. Eu particularmente gosto de enviar Sincrono, pois cada nota é enviada separadamente. Mas existem prefeituras aonde o EnviarSincrono não há implementação, ai eu altero para GerarNFSe.
  17. Olá bom dia, Neste exemplo faço o envio de acordo com a configuração que fiz anteriormente pra cada cidade. Com o ACBR existe a possibilidade da chamada "Enviar", "Gerar" e "EnviarSincrono". Sou novo aqui ainda e espero ajudar. abraço
  18. Olá boa tarde, Sim, o link anterior não está funcionando. Alguem chegou a testar?
  19. Olá bom dia, Verifiquei que para Goiania/GO houve uma alteração no link para GerarNfse. Peço que alterem em ACBrProvedorGoiania: Linha 290: De: acGerar: Result := 'http://nfse.goiania.go.gov.br/ws/GerarNfse '; Para: acGerar: Result := 'https://nfse.goiania.go.gov.br/ws/nfse.asmx?op=GerarNfse '; Se preferir segue em anexo a unit. ACBrProvedorGoiania.pas
  20. Estou tendo o mesmo erro. Alguma novidade?
  21. Estava gerando NFSe para Ji-Parana normalmente esta semana e algumas horas atrás comecei receber a seguinte mensagem: Arquivo enviado com erro na assinatura Validei o XML que envio no site https://www.receita.fazenda.gov.br/Aplicacoes/SSL/ATBHE/assinadoc/ValidadorAssinaturas.app/valida.aspx e ele diz que a assinatura é válida. A assinatura é valida até o fim do ano de 2014. Alguém pode me ajudar?
  22. JI Parana já foi commitada? Dei update aqui e aparece a mensagem: Erro ao enviar RPS #266. TTransmissorACBR.pcdConfiguraComponente: Schemas deste provedor não definido Obrigado
  23. XML que estou enviando: <?xml version="1.0"?> <SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:SOAP-ENC="http://schemas.xmlsoap.org/soap/encoding/"> <SOAP-ENV:Body> <GerarNota xmlns="http://iss.londrina.pr.gov.br/ws/v1_01"> <DescricaoRps xmlns=""> <ccm>948314</ccm> <cnpj>000116506000918</cnpj> <cpf>22853201830</cpf> <senha>*****</senha> <aliquota>5,00</aliquota> <servico>2601</servico> <situacao>tt</situacao> <valor>28855,56</valor> <base>28855,56</base> <ir/> <pis/> <cofins/> <csll/> <inss/> <retencao_iss/> <cod_municipio_prestacao_servico>4113700</cod_municipio_prestacao_servico> <cod_municipio_incidencia>4113700</cod_municipio_incidencia> <descricaoNF>SERV. PREST. CONF. EXTRATOS EM ANEXO</descricaoNF> <tomador_tipo>4</tomador_tipo> <tomador_cnpj>60746948050217</tomador_cnpj> <tomador_email/> <tomador_ie/> <tomador_im>948314</tomador_im> <tomador_razao>BANCO BRADESCO S/A</tomador_razao> <tomador_endereco>AVENI PARANA</tomador_endereco> <tomador_numero>109</tomador_numero> <tomador_complemento/> <tomador_bairro>CENTRO</tomador_bairro> <tomador_CEP>86020300</tomador_CEP> <tomador_cod_cidade>4113700</tomador_cod_cidade> <tomador_fone/> <tomador_ramal/> <tomador_fax/> <rps_num>4437</rps_num> <rps_serie>6</rps_serie> <rps_dia>24</rps_dia> <rps_mes>1</rps_mes> <rps_ano>2014</rps_ano> </DescricaoRps> </GerarNota> </SOAP-ENV:Body> </SOAP-ENV:Envelope>
  24. Fala pessoal. Sou novo no ramo de NFSe e até agora não desenvolvi nenhuma Nota Fiscal Eletronica em uma prefeitura que não esteja no Projeto ACBR. Essa semana iniciei Londrina, e os usuários já estão criados, e tudo certo. estou recebendo sempre a mensagem: Processo Geral - Usuário não emissor de nota eletrônica Processo Geral - Falha na autenticação, verifique suas credenciais. Esse código é o envio da nota através do XML, gostaria de saber se estou fazendo da maneira certa. var RPS : TElementoRPS; ws: ModuloEmissorNFSePortType; descricaoRps: tcDescricaoRps; retornoNota: tcRetornoNota; DescricaoErros: tcListaErrosAlertas; I: Integer; dia,mes,ano : word; begin try RPS := TLeitorGenerico(TNFPSe(FNFPSeRef).Leitor).lote.listaRPS.item(indice); descricaoRps := tcDescricaoRps.Create; DescricaoErros := tcListaErrosAlertas.Create(); if TUtil.iif(IniOptions.Ambiente = 1, True, False) then begin ws := getModuloEmissorNFSePortType(True, 'http://testeiss.londrina.pr.gov.br/ws/v1_01/sigiss_ws.php?wsdl', frmMenu.HTTPRIO1); descricaoRps.ccm := 948314; descricaoRps.cpf := '22853201830'; descricaoRps.senha := '**********'; end else begin ws := getModuloEmissorNFSePortType(True, 'https://iss.londrina.pr.gov.br/ws/v1_01/sigiss_ws.php?wsdl', frmMenu.HTTPRIO1); descricaoRps.ccm := 948314; descricaoRps.cpf := '10280162634'; descricaoRps.senha := ''**********';'; end; descricaoRps.cnpj := Session.Filial.getCnpj; if (RPS.Servico.Valores.IssRetido <> 0.00) then descricaoRps.situacao := 'tt' // tributado no tomador else descricaoRps.situacao := 'tp'; // tributado no prestador //cod_pais_prestacao_servico := '1082'; descricaoRps.servico := StrToInt(RPS.Fiscal.ItemListaServico); descricaoRps.aliquota := RPS.Servico.Valores.Aliquota; if StrToFloat(descricaoRps.aliquota)=0 then descricaoRps.aliquota := '0,00' else descricaoRps.aliquota := descricaoRps.aliquota+',00'; descricaoRps.cod_municipio_prestacao_servico := IntToStr(ord(Session.Filial.getEndereco.CodigoMunicipio)); descricaoRps.cod_municipio_incidencia := RPS.Fiscal.CodIBGEMunicipioIncidencia; // ****************************** Início Dados Tomador ******************************** // // Verifica o tipo de tomador if (RPS.Tomador.TipoPessoa = pesFisica) then descricaoRps.tomador_tipo := 2 // 2- Pessoa Física else if (descricaoRps.cod_municipio_prestacao_servico = descricaoRps.tomador_cod_cidade) then descricaoRps.tomador_tipo := 3 // 3- Pessoa Jurídica do Município do Prestador else if (descricaoRps.cod_municipio_prestacao_servico <> descricaoRps.tomador_cod_cidade) then descricaoRps.tomador_tipo := 4 // 4- Pessoa Jurídica de Fora else raise Exception.Create('Tipo do Tomador inexistente!!!'); if (descricaoRps.tomador_tipo<>1) and (descricaoRps.tomador_tipo<>5) then begin descricaoRps.tomador_cnpj := RPS.Tomador.Documento; descricaoRps.tomador_razao := RPS.Tomador.RazaoSocial; descricaoRps.tomador_endereco := RPS.Tomador.Endereco.Logradouro; descricaoRps.tomador_numero := RPS.Tomador.Endereco.Numero; descricaoRps.tomador_CEP := RPS.Tomador.Endereco.CEP; descricaoRps.tomador_cod_cidade := RPS.Tomador.Endereco.CodigoMunicipio; descricaoRps.tomador_bairro := RPS.Tomador.Endereco.Bairro; if (descricaoRps.tomador_tipo<>1) then descricaoRps.tomador_complemento := ''; end; descricaoRps.tomador_im := IntToStr(descricaoRps.ccm); // ****************************** Fim Dados Tomador ************************************ // // Verifica se o código de incidência do serviço é diferente do município do prestador. if (descricaoRps.cod_municipio_incidencia <> descricaoRps.cod_municipio_prestacao_servico) then begin descricaoRps.situacao := 'nt'; descricaoRps.retencao_iss := FormataDinheiro(FloatToStr(RPS.Servico.Valores.Inss.AsCurrency)); end else //descricaoRps.retencao_iss := '0,00'; //NAO PREENCHER COM NENHUM VALOR //Dados e Impostos RPS descricaoRps.valor := FormataDinheiro(FloatToStr(RPS.Servico.Valores.Servico)); descricaoRps.base := FormataDinheiro(FloatToStr(RPS.Servico.Valores.BaseDeCalculo)); if RPS.Servico.Valores.Ir.AsFloat>0 then descricaoRps.ir := FormataDinheiro(FloatToStr(RPS.Servico.Valores.Ir.AsFloat)); if RPS.Servico.Valores.Pis.AsFloat>0 then descricaoRps.pis := FormataDinheiro(FloatToStr(RPS.Servico.Valores.Pis.AsFloat)); if RPS.Servico.Valores.Cofins.AsFloat>0 then descricaoRps.cofins := FormataDinheiro(FloatToStr(RPS.Servico.Valores.Cofins.AsFloat)); if RPS.Servico.Valores.Csll.AsFloat>0 then descricaoRps.csll := FormataDinheiro(FloatToStr(RPS.Servico.Valores.Csll.AsFloat)); if RPS.Servico.Valores.Inss.AsFloat>0 then descricaoRps.inss := FormataDinheiro(FloatToStr(RPS.Servico.Valores.Inss.AsFloat)); descricaoRps.descricaoNF := RPS.Servico.Discriminacao; descricaoRps.rps_num := StrToInt(RPS.Numero); descricaoRps.rps_serie := RPS.Serie; DecodeDate(now,ano,mes,dia); descricaoRps.rps_dia := dia; descricaoRps.rps_mes := mes; descricaoRps.rps_ano := ano; retornoNota := tcRetornoNota.Create; ws.GerarNota(descricaoRps, retornoNota, DescricaoErros); if retornoNota.Resultado=1 then begin with retornoNota do begin TfrmNFSeEnvio(Pai).dolog('Auth: '+autenticidade,tmSucesso); TfrmNFSeEnvio(Pai).doLog('Nota: '+IntToStr(Nota),tmSucesso); TfrmNFSeEnvio(Pai).dolog('Link para visualização: '+LinkImpressao,tmSucesso); end; end else begin for I:= 0 to Length(DescricaoErros)-1 do with DescricaoErros[I] do begin TfrmNFSeEnvio(Pai).dolog(ID+'-'+DescricaoProcesso+' - '+DescricaoErro,tmVermelho); end; end; { if ((Length(DescricaoErros) > 0) and (retornoNota.Nota = 0)) then begin for I := 0 to Length(DescricaoErros) - 1 do begin with DescricaoErros[I] do begin frmNFSeEnvio.doLog(IntToStr(id) + ' - ' + DescricaoProcesso + ': ' + DescricaoErro, tmErro); end; end; end else begin frmNFSeEnvio.doLog(retornoNota.Resultado, tmSucesso); frmNFSeEnvio.doLog(retornoNota.Nota, tmSucesso); frmNFSeEnvio.doLog(retornoNota.autenticidade, tmSucesso); frmNFSeEnvio.doLog(retornoNota.LinkImpressao, tmSucesso); end; } except on e: Exception do raise Exception.Create('Erro ao enviar da nota fiscal.' + sLineBreak + e.Message); end; end; Alguém pode me auxiliar no codigo acima?? agradeço.
×
×
  • 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.