Ir para conteúdo
  • Cadastre-se

johnbh3

Membros
  • Total de ítens

    703
  • Registro em

  • Última visita

Tudo que johnbh3 postou

  1. Curioso! Eu testei no DEMO. Não deu erro. Tentou comunicar. Mas fiquei completamente sem entender. Porque o codigo e igual ACBrNFSe1.NotasFiscais.Clear; GerarNFSe(DM_PROCEDURE.SP_NF_SERVICOID.AsString); // aqui esta igual o componente DEMO ACBrNFSe1.Gerar(StrToInt(DM_PROCEDURE.SP_NF_SERVICOID.AsString)); O erro ocorre aqui Alguma informação errada nas TAG? Seila CNES, codigo do serviço, valor do imposto.
  2. Ola Tô testando o nfse deu certo para bh, Sabará. Agora fui mecher em contagem, deu erro de acesso violation ao enviar Alguém sabe o que pode ser? Uma vez que o código e igual. A diferença é só de provedor.
  3. Alguém sabe?
  4. johnbh3

    Erro no arquivo PDF (DanFe)

    olá, Pessoal Ao gerar o PDF os DANFe fica dando mensagem ao tentar o PDF. Ha um erro nesta página,talvez o acrobat não exiba a pagina corretamente. Entre em contato com a pessoa que criou este documento. Usando o DanFeRL
  5. Procure pelo arquivo ISSDigital.ini Note que esta Altere para validar=0 ; No grupo abaixo é definido os nomes dos arquivos XSD ; usados para realizar a validação do XML a ser enviado ; ao webservice ; 0 = False / 1 = True (Se True então valida) [Schemas] Validar=0
  6. Olá Conseguir resolver a situação para Sabara com provedor ISSDigital So acho estranho se alguem tinha a solução para o ISSDigital funcionando sendo que recebi instrução do mesmo provedor pra corrigir pontos que impedia o envio. Na Unit pnfsNFSeG procedure TNFSeG.SetAtributos; Esta assim // Atributo Id =============================================================== if Identificador <> '' then begin aIdentificador := ' ' + Identificador + '="' + IdLote + '"'; if Provedor in [proGovBR, proPronim, proISSDigital] then aIdentificador := ''; end // Atributo Id =============================================================== if Identificador <> '' then begin aIdentificador := ' ' + Identificador + '="' + IdLote + '"'; if Provedor in [proGovBR, proPronim, proISSDigital] then aIdentificador := ''; //Para atender Sabara 01/12/2016 // acrescentei if Provedor in [proISSDigital] then // acrescentei aIdentificador := ' ' + Identificador + '="' + IdLote + '"'; // acrescentei end Você vão dizer claro poderia tirar if Provedor in [proGovBR, proPronim, proISSDigital] then aIdentificador := ''; Como eu so queria resolver meu problema aqui. Caso alguem queria subir Também na unit pnfsNFSeW_ABRASFv2 procedure TNFSeW_ABRASFv2.GerarXML_ABRASF_v2; case FProvedor of proABase, proBethav2, proDigifred, proEReceita, proFiorilli, proGovDigital, proISSe, proMitra, proNEAInformatica, proNotaInteligente, proPVH, proSisPMJP: begin // Tire o ISS Digital daqui Gerador.wGrupoNFSe('InfDeclaracaoPrestacaoServico ' + FIdentificador + '="' + NFSe.InfID.ID + '"'); Gerador.wGrupoNFSe('Rps'); end; Passei issDitgital pra ca Seila porque eles la mandam por o namespace proISSDigital: begin Gerador.wGrupoNFSe('InfDeclaracaoPrestacaoServico xmlns="http://www.abrasf.org.br/nfse.xsd" ' + FIdentificador + '="' + NFSe.InfID.ID + '"'); Gerador.wGrupoNFSe('Rps ' + FIdentificador + '="' + NFSe.InfID.ID + '"'); end; Foi minha primeira experiencia com a NFSe como não obtive muita resposta foi isso que fiz pra sucesso.
  7. Isto porque questionei eles que dando um erro <EnviarLoteRpsResposta xmlns="http://www.abrasf.org.br/nfse.xsd"> <Situacao>3</Situacao> <ListaMensagemRetorno> <MensagemRetorno> <Codigo> Exxx(RPS 661 já se encontra no sistema, protocolo: 20160007318, IdDeclaracao: *** </Codigo> <Mensagem/> </MensagemRetorno> </ListaMensagemRetorno> </EnviarLoteRpsResposta> Resposta deles 1- inclua o numero do lote rps id =670 2- inclua o site da abrasf na tag infdeclaracaoprestacaoservico o id= desta tag deve conter somente dígitos numéricos sem letras e a sequencia não precisa ser extensa . 3- rps deve ser informado o número do id= Eu questionei porque dando que RPS ja exsito. O numero esta sendo sequencial se eu gerar 662, 663, 890 qualquer numero da a mesma mensagem. O primeiro envio deu certo 660 este protocolo 20160007318 aponta pro xml do sucesso. Dai ja não sei se eles tem razão devido faltar o lote nessa tag questionada. 662-env-lot.xml
  8. Outra coisa A primeira deu certo Qualquer outra retorna um protocolo vou no site consultar diz: - Exxx(RPS 661 já se encontra no sistema, protocolo: 20160007318, IdDeclaracao: *** Este procotocolo que ela cita no erro refere-se a primeira RPS que enviou com sucesso, agora não envia mais nenhuma sempre citando o mesmo erro. Ocorre que o rps que estou informando e diferente. NotasFiscais.NumeroLote:=Estou informando id sequencial ACBrNFSe1.Enviar(Aqui o mesmo id sequencial) Você sabe o que pode ser? No meu entender esta rps diferente não? Anexei ai! Primeiro_lote_enviado.xml foi enviado pelo sistema com sucesso, retorno o rps com codigo de verificaçã etc. O segundo arquivo e eu tentando enviar e dizendo que já foi enviado rps 661 e cita novo procolo 20160007318 ai consulto no site deles o protocolo - 20160007318 retorna o primeiro rps enviado com sucesso! Mas o numero do lote pelo menos que eu entendi ta diferente no XML. Novo_Lote_661.xml Primeiro_lote_enviado.xml
  9. Que pena! Já tentei aqui e não consegui. Mostrar a mensagem de erro, fica estranho. Só esta retornando protocolo - ACBrNFSe1.WebServices.EnviarLoteRPS.RetEnvLote.InfRec.Protocolo que o usuario precisa de ir no site pra ver o erro, que tornaria bem complicado. Mesmo sendo enviado mostrar como se tivesse erro retornando protocolo. Eu vou atribuir isto a este provedor porque o mesmo não ocorre em BH, ou ate mesmo na NF-e. Como você disse, deixa o erro ser mostrado eu so trato pra fica mais bonitinho e pra pessoa conseguir copiar e colar o erro.
  10. Olá, Amigo sabe mim dizer o que esta ocorrendo? Deu tudo certo ! Porem ficou algo que não gostei e neste tratamento. Meu codigo e: ACBrNFSe1.Enviar(StrToInt(DM_PROCEDURE.SP_NF_SERVICOID.AsString)); Ele faz o envio, depois consulta porque deixei marcado pra true (Consulta lote apos envio) tudo igual pra BH. Em BH, quando eu envio usando ACBrNFSe1.Enviar(StrToInt(DM_PROCEDURE.SP_NF_SERVICOID.AsString)); Ele retorna o codigo de verificação, e chama a NFS-e OK Meu codigo ta assim: Try ACBrNFSe1.Enviar(StrToInt(DM_PROCEDURE.SP_NF_SERVICOID.AsString)); Except On E:Exception Do begin FrmErro:=TFrmErro.Create(Application); FrmErro.BitBtn2.Visible:=True; FrmErro.Edt_error.Lines.Add('Erro: '+E.Message); FrmErro.Edt_error.Lines.Add('Protocolo: '+ACBrNFSe1.WebServices.EnviarLoteRPS.RetEnvLote.InfRec.Protocolo); if ACBrNFSe1.WebServices.EnviarLoteRPS.RetEnvLote.InfRec.MsgRetorno.Count>0 then begin FrmErro.Edt_error.Lines.Add('Código '+ACBrNFSe1.WebServices.EnviarLoteRPS.RetEnvLote.InfRec.MsgRetorno.Items[0].Codigo); FrmErro.Edt_error.Lines.Add('Mensagem: '+ACBrNFSe1.WebServices.EnviarLoteRPS.RetEnvLote.InfRec.MsgRetorno.Items[0].Mensagem); end else begin FrmErro.Edt_error.Lines.Add('Entre no site de sua prefeitura e verifique o erro com protocolo acima.'); end; if ACBrNFSe1.NotasFiscais.Items[0].NFSe.Situacao='3' then FrmErro.Edt_error.Lines.Add('Correção: Utlize a opçao Excluir NFS-e/Consultar(Corrigir)'); //FrmErro.Edt_error.Lines.Add('Código: '+ACBrNFSe1.WebServices.GerarLoteRPS.RetornoNFSe.ListaNFSe.MsgRetorno[0].Codigo); //FrmErro.Edt_error.Lines.Add('Correção: '+ACBrNFSe1.WebServices.GerarLoteRPS.RetornoNFSe.ListaNFSe.MsgRetorno[0].Correcao); FrmErro.ShowModal; //Ln_Status_Envio.Visible:=False; end; Em BH, não entra no Except porque a nota e enviada com sucesso. EM Sabara do ISSDigital que e novidade, deu tudo certo porem ele entra no Except como se houvesse ocorrido um erro, como de costume não consigo pegar algum codigo ACBrNFSe1.WebServices.EnviarLoteRPS.RetEnvLote.InfRec.MsgRetorno.Items[0].Codigo tipo LOTE PROCESSO COM SUCESSO. Ai eu preciso usar a opção de consultar o RPS,, ele diz que já existe a RPS no site e eu pego o codigo de verificação. Como você esta fazendo na questão de tratar o erro e sucesso?
  11. Se eu tento ACBrNFSe1.WebServices.EnviarLoteRPS.RetEnvLote.InfRec.MsgRetorno[0].Mensagem conforme arquivo txt \\ACBrDFe\ACBrNFSe\Retornos.txt Da erro List index out of bounds(0) Eu to usando o metodo ACBrNFSe1.Enviar Se eu tento o metodo gerar e tratar conforme o TXT ACBrNFSe1.WebServices.GerarLoteRPS.RetornoNFSe.ListaNFSe.MsgRetorno[ x ].Codigo Da Erro de acess violation na linha Mas ja esta quase 100%, so queria mesmo tratar esses erros, deu muitos, que fui ver indo no site da prefeitura colocando o protocolo. Mas ate o procoolo tive que ir na pasta de geração.
  12. OK Aumentei 15000 Esta dando uns erro. Em BH tinha algumas coisas diferentes. Que ao tentar em Sabara esta dado erro TIpo CNAE e so com 6 digitos. Mim diz uma coisa: Consumindo em BH - Os erros são todos retornados Por este provedor eu to descobrindo abrindo o arquivo criado na pasta \\654-rec.xml Em BH ou Contagem por exemplo o codigo: ACBrNFSe1.NotasFiscais.Items[0].NFSe.Situacao retorna o erro Tipo ultimo erro veio (Que refere-se a tributação) <EnviarLoteRpsResposta xmlns="http://www.abrasf.org.br/nfse.xsd"> <ListaMensagemRetorno> <Codigo>E160</Codigo> <Mensagem> Arquivo em desacordo com o XML Schema. (ERROR: cvc-pattern-valid: Value '9' is not facet-valid with respect to pattern '1|2|3|4|5|6' for type 'tsRegimeEspecialTributacao'.;) </Mensagem> </ListaMensagemRetorno> </EnviarLoteRpsResposta>
  13. Da onde tirou isso? Agora deu outro erro: O tempo limite da operação foi atingido - URL:http://209.126.222.200/nfe/snissdigitalsvc.dll/soap/IuWebServiceIssDigital - SOAPAction:urn:uWebServiceIssDigitalIntf-IuWebServiceIssDigital#RecepcionarLoteRps
  14. Agora da o seguinte erro: Received content of invalid Content-Type setting: text/html - SOAP expects "text/xml"
  15. Em Sabara-MG to tentando fazer testes. Eu falei com pessoa da ISS Digital recebi esta obbservação? 1- O contribuinte não precisa de certificação digital. O sistema de integração necessita das informações de acesso ao ISS DIGITAL (inscrição municipal/senha/frase secreta) Trata-se de eu mesmo tentando emitir a NFS-e pela minha empresa, e não tenho certificado digital. E a resposta deles e que não precisa. Dai deixo o campo certificado digital vazio no componente. Ai recebo a mensagem - Número de Série do Certificado Digital não especificado Minha pergunta e! Eu consigo enviar sem assinar com certificado uma vez que esse Webserivice não precisa disso?
  16. Alguem sabe mim dizer porque no meu sistema tratando retorna. Certificado diigital não encontrado? To testando com um provedor que não requer certificado digital. NO Demo do ACBR e como se ele tentasse enviar sem questionar ele gera uns arquivo SOAP. No meu sistema reclama certificado digital, como fazer pra não dar essa mensagem. Não exigir assinar o documento com certificado, deixei o campo vazio. Depurando o erro ocorre na UNI: ACBrDFeCapicom - procedure TDFeCapicom.CarregarCertificado; raise EACBrDFeException.Create( 'Número de Série do Certificado Digital não especificado !'); Porem no demo ele nao questiona isso.
  17. Pelo sistema nao da nada. Porem esse provedor não precisa certificado e eu nao tenho Ele da ero: Erro: Número de Série do Certificado Digital não especificado ! Agora pelo demo. O usuario e senha estao informador assim como a frase secreta e da esse erro questionando senha. Configurei o cidade.ini pra sabara e ISSDigital apontando WebService Cidades.ini ISSDigital.ini
  18. Perdão sou novato na NFSE Mas consegui o webservice Caso queriam incluir Sabara! Incluir no cidades.ini Uma duvida: Recebi isto da empresa - Como vou autenticar? La pedi usuario que seria CNPJ, e senha que o componente trata, mas pedi também frase secreta para conectar Conforme item 1 1- O contribuinte não precisa de certificação digital. O sistema de integração necessita das informações de acesso ao ISS DIGITAL (inscrição municipal/senha/frase secreta) Prezados O endereço para a integração via Webservice: http://209.126.222.200/nfe/snissdigitalsvc.dll Através deste endereço o contribuinte, poderá realizar os testes de envio e futuramente a integração definitiva para homologação das notas. Estamos enviando em anexo também os manuais e esquemas necessários para que o contribuinte possa adaptar seu sistema próprio de emissão de notas fiscais. No sistema de ISS DIGITAL, há a opção de realizar a verificação e também a opção de baixar estes manuais. Acessando o menu NF-e\Integração via Webservice: Segue as observações: 1- O contribuinte não precisa de certificação digital. O sistema de integração necessita das informações de acesso ao ISS DIGITAL (inscrição municipal/senha/frase secreta) 2- O ambiente é o mesmo para teste e homologação, porém o que irá definir se a nota será de teste o definitiva é a informação da tag produção, ou seja, se informada produção 2 notas de teste serão validadas, se informado 1 notas definitivas serão validadas. 2.1 Notas de teste (produçao 2) não totalizará valores na guia / receita. 2.2 Notas de homologação definitiva (produção 1 ) gera guias de recolhimento para o contribuinte. 3- O contribuinte deverá baixar no ISS DIGITAL, o arquivo das Atividades Cnaes, que serão necessárias para realizar a integração (menu Relatório\Atividades) 4- É necessário ter a autorização de AIDF-e, para que o contribuinte possa realizar a integração, mesmo que seja para teste. 5- A nota de teste é identificada no sistema de ISS DIGITAL, com a nomenclatura T00000*. Quando a nota for para homologação, a numeração será a mesma utilizada pelo ISS Digital. Caso o contribuinte tenha alguma dúvida no funcionamento do sistema de integração, ele poderá enviar a sua dúvida ao e-mail:[email protected] Segue em anexos os manuais, modelo RPS, tabelas de municípios,países, lei de serviços 116 e schemas referentes a integração via webservice. E o Exemplo do arquivo RPS no formato .xml e no padrão ABRASF
  19. Olá, Galera a cidade de Sabara - Mg - IBGE 3156700 http://209.126.222.200/nfe/snissdigitalsvc.dll Como faz a inclusão? Sei que é da do provedor = ISSDigital Não sei so colocar no ISSDigital.ini? Homologação e produção Detalhe o servidor de produção e homologação e o mesmo.
  20. johnbh3

    NFSe São Paulo capital

    Ola Bom dia a todos Pessoal Qual componente usar para emissão da nota fiscal de serviço de SP-Capital? Tem o demo de teste?
  21. Olá, Italo! Bom dia! Obrigado! NO site da PBH tem a opção de substituir. Eu achei que tinha como via webservice.
  22. Alguem sabe o telefone ou contato dessa empresa SuperNova do ISSDigital Italo respondeu: Por outro lado a da cidade de Santa Luzia é: "http://209.126.222.200/nfe/snissdigitalsvc_santaluzia.dll/soap/IuWebServiceIssDigital" PReciso testar a cidade de sabara/MG que tem o mesmo IPhttp://209.126.222.200/ certamente trata-se da mesma empresa.
  23. ola, Pessoal Tudo funciona! Tentei usar a opção de subistiuir e da isso -> SoapAction não definido para: TNFSeSubstituirNFSe
  24. Perdão Juliomar! Fiz isto e encontrei! Obrigado! Desculpe o transtorno
  25. Verdade na tag ICMS não ta 300 que o usuario preencheu!
×
×
  • 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.