Ir para conteúdo
  • Cadastre-se

Vanderlei Soares

Membros
  • Total de ítens

    38
  • Registro em

  • Última visita

Tudo que Vanderlei Soares postou

  1. Bom dia, Obrigado! O cliente emite pelo site da prefeitura com o serviço 16.02. Como complemento encontrei esse arquivo da Prefeitura de São José dos Campos/SP - Provedor DSF.
  2. Boa tarde, Notei a necessidade de ser incluído o código do serviço 16.02 nos Schemas da NFs-e para os provedores DSF. 16.02 - Outros serviços de transporte de natureza municipal. (Acrescido pela Lei n° 16.757, de 14/11/17). Schemas DSF 2.03 nfse.xsd
  3. Bom dia @Italo Giurizzato Junior. O envio da nota e consulta por rps funcionou. Obrigado.
  4. Bom dia @Italo Giurizzato Junior, Fontes atualizado e funcionando. Obrigado! Sobre as cidades que atendem, não responderam.
  5. @Italo Giurizzato Junior, Deixei da seguinte forma o arquivo para testar o envio, e obtive sucesso a nota foi Aprovada. ACBrNFSeXServices.ini [Kalana] ProRecepcionar=https://www.kalana.com.br/wsnfe/recepcionarLoteRps ProConsultarSituacao=https://www.kalana.com.br/wsnfe/consultarSituacaoLoteRps ProConsultarLote=https://www.kalana.com.br/wsnfe/consultarLoteRps ProConsultarNFSeRps=https://www.kalana.com.br/wsnfe/consultarNfsePorRps ProConsultarNFSe= ProCancelarNFSe= Notei que vai ser necessário a alteração no arquivo Kalana.GravarXml, incluir o FormatoItemListaServico := filsSemFormatacao. Para que o número do ItemListaServico vá sem o ponto e passe a ser de <ItemListaServico>20.03</<ItemListaServico> para <ItemListaServico>2003</ItemListaServico>). unit Kalana.GravarXml procedure Configuracao; override; procedure TNFSeW_Tecnos201.Configuracao; begin inherited Configuracao; FormatoItemListaServico := filsSemFormatacao; .... end;
  6. @Italo Giurizzato Junior, As urls são de produção, o provedor não tem uma url dedicada para homologação. Somente encontrei a consulta pelo número do rps.
  7. Boa tarde Italo, Obtive essa resposta quanto ao cancelamento da NFs-e: "O procedimento de cancelamento se dá através apenas do portal, não do WS". Sobre as cidades atendidas pelo provedor, estou aguardando me retornarem.
  8. Bom dia, houve uma troca de provedor para a cidade de RIO LARGO/AL. RecepcionarLoteRps Serviço: https://www.kalana.com.br/wsnfe/recepcionarLoteRps WSDL: https://www.kalana.com.br/wsnfe/recepcionarLoteRps?wsdl ConsultarSituacaoLoteRps Serviço: https://www.kalana.com.br/wsnfe/consultarSituacaoLoteRps WSDL: https://www.kalana.com.br/wsnfe/consultarSituacaoLoteRps?wsdl ConsultarNfsePorRps Serviço: https://www.kalana.com.br/wsnfe/consultarNfsePorRps WSDL: https://www.kalana.com.br/wsnfe/consultarNfsePorRps?wsdl ConsultarLoteRps Serviço: https://www.kalana.com.br/wsnfe/consultarLoteRps WSDL: https://www.kalana.com.br/wsnfe/consultarLoteRps?wsdl Manual Abrasf v1.0 NFSe_ManualDeIntegracao_2008dez29.pdf
  9. Bom dia pessoal da ACBr, No provedor ginfes não está gerando a tag Servicos.ValorIssRetido. Efetuei uma alteração no Ginfes.GravarXml Ginfes.GravarXml.pas
  10. Boa tarde Ítalo, Entrei em contato com a prefeitura/suporte e me informaram se tratar de uma informação obrigatória. Me enviaram os manuais e um arquivo excel que consta como obrigatório. Aparentemente os manuais estão desatualizados. Tipos de dados do RPS - PREFEITURA MUNICIPAL DE INDAIATUBA.xlsx
  11. Bom dia Italo, No XML do RPS é gerado somente o Código do Município, e então é me retornado o erro "Pais do tomador do serviço inválido". Se enviar como 9999999 o código do pais é gerado no XML e a tag, e a nota aprovada. Preencho da seguinte forma: Tomador.Endereco.CodigoMunicipio = 3520509 (Sai no XML) Tomador.Endereco.CodigoPais = 1058 (Não sai no XML) Nesse caso não teria como gerar o xml com um município diferente do 9999999?
  12. Bom dia Pessoal do ACBr, Na emissão da NFS-e estou com um problema que é me retornado a mensagem "Pais do tomador do serviço inválido". No provedor DEISS usa como base o ABRASFv2 e na unit ACBrNFSeXGravarXML_ABRASFv2 existe uma validação sobre o pais estrangeiro (Código Município = 9999999) Ao remover a validação o problema não ocorreu e a NFS-e foi aprovada, portanto dando a entender que a tag do pais deve ser gerada em todos os casos para o DEISS Schema 2.3. Alguém poderia me ajudar nesse caso? Desde ja Obrigado!
  13. Bom dia Pessoal da ACBr, tudo bem ? Recentemente notei que teve mudanças sobre a chave do cte de complemento de valores. N impressão da DACTe para Fast Report não está saindo quando o cte é versão 4.0. Se alguém puder fazer a analise da contribuição, não consegui efetuar os testes para ver se de fato resolve. Obrigado. ACBrCTeDACTEFR.pas
  14. Bom dia Pessoal do Forum ACBr, Aparentemente falta ser adicionado os eventos de Insucesso e Canc. Insucesso no TACBrCTeDACTEFR.CarregaDadosEventos. ACBrCTeDACTEFR.pas
  15. Boa tarde Juliomar, Verifiquei e aparentemente está ok. Na unit ACBrCTeDACTEFR, dentro da procedure TACBrCTeDACTEFR.CarregaDadosEventos, não preenche o dsEventos dentro do case pois não tem o evento de insucesso.
  16. Bom dia Pessoal do Forum ACBr, No evento de insucesso na entrega do CT-e, minha impressão está ficando "vazia". Alguém sabe o que pode ser? Nesse tipo de evento existe a impressão?
  17. Obrigado!
  18. Vanderlei Soares

    CT-e 4.0

    Boa tarde, tudo bem a todos. percebi que na pasta do Schemas CT-e não existe o Schemas retConsReciCTe_v4.00. Estou usando a function ACBrCTe.WebServices.Retorno.Executar
  19. Boa tarde, Tive que tratar formatação do xml de retorno e alterar os métodos. (A Consulta para mim Resolveu alterando NFseBrasil.LerXML, NFSeBrasil.Provider). (A solução não é a mais adequada principalmente no ACBrXmlDocument). (Não consegui anexar o soap de retorno ainda). TACBrNFSeXWebserviceNFSeBrasil.TratarXmlRetornado Result := RemoverCaracteresDesnecessarios(Result); Result := StringReplace(Result, '<return xsi:type="xsd:string">', '<return>', [rfReplaceAll]); Result := StringReplace(Result, '<Nfse versao="1.0">', '<Nfse>', [rfReplaceAll]); TNFSeR_NFSeBrasil.LerXmlNfse(const ANode: TACBrXmlNode) AuxNode1 := ANode.Childrens.FindAnyNs('xml'); AuxNode1 := AuxNode1.Childrens.FindAnyNs('CompNfse'); procedure TACBrXmlDocument.LoadFromXml(AXmlDocument: string); loadedDoc := xmlParseDoc(PAnsiChar(AnsiToUtf8(AXmlDocument)));
  20. Bom dia Italo, Anexei o retorno ret.xml
  21. Bom dia Italo, efetuei a Aprovação/Consulta por RPS. Talvez não seja a melhor solução... arquivos editados. ACBrXmlDocument.pasNFSeBrasil.LerXml.pasNFSeBrasil.Provider.pas
  22. Bom dia, o problema ocorre neste ponto. uses ACBrXMLDocument procedure TACBrXmlDocument.LoadFromXml(AXmlDocument: string); var loadedDoc: xmlDocPtr; loadedRoot: xmlNodePtr; begin loadedDoc := xmlParseDoc(PAnsiChar(ansistring(AXmlDocument))); if loadedDoc <> nil then begin xmlFreeDoc(xmlDocInternal); xmlDocInternal := loadedDoc; loadedRoot := xmlDocGetRootElement(xmlDocInternal); if loadedRoot <> nil then begin xmlRootElement.Free; xmlRootElement := TACBrXmlNode.Create(Self, loadedRoot); end else raise EACBrXmlException.Create(xmlGetLastError()^.message); end else raise EACBrXmlException.Create(xmlGetLastError()^.message); end;
  23. Bom dia Italo, emissão ficou ok. Estou tendo um problema na consulta (ConsultaNFSePorRPS) function TACBrNFSeXWebserviceNFSeBrasil.TratarXmlRetornado( const aXML: string): string; begin Result := inherited TratarXmlRetornado(aXML); if Pos('ISO-8859-1', Result) > 0 then Result := AnsiToNativeString(Result); Result := string(NativeStringToUTF8(Result)); Result := StringReplace(Result, '&amp;amp;', 'e',[rfReplaceAll]); Result := ParseText(AnsiString(Result), True, {$IfDef FPC}True{$Else}False{$EndIf}); Result := RemoverDeclaracaoXML(Result, True); Result := RemoverCDATA(Result); Result := RemoverIdentacao(Result); Result := RemoverPrefixosDesnecessarios(Result); Result := StringReplace(Result, 'R$', '', [rfReplaceAll]); Result := StringReplace(Result, '&', '&amp;', [rfReplaceAll]); end; Document.LoadFromXml(Response.ArquivoRetorno); Mesmo com as tratativas está me retornando a mensagem: Erro input is not proper UTF-8, indicate encoding! bytes.
  24. Bom dia Italo, tive que alterar NFSe.Tomador.Endereco.xMunicipio / NFSe.Tomador.Endereco.CodigoMunicipio. para conseguir aprovar. unit NFSeBrasil.GravarXml function TNFSeW_NFSeBrasil.GerarEnderecoTomador: TACBrXmlNode; begin Result.AppendChild(AddNode(tcStr, '#43', 'CodigoMunicipio', 1, 7, 0, NFSe.Tomador.Endereco.CodigoMunicipio, DSC_CMUN)); end; NFSeBrasil.GravarXml.pas
  25. Boa tarde Ítalo, sobre o problema 'Acesso não permitido, verifique os dados e certifique-se de possuir permissão para a operação.' é necessário uma liberação por parte do provedor para o envio. estou tentando enviar em Produção que me retorna o problema Mensagem: Erro de Conexão: Erro Interno: 0 Erro HTTP: 200. Enviei um e-mail para o suporte do provedor, estou aguardando um resposta deles.
×
×
  • 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.