Vanderlei Soares

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

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

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?

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!

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

Bom dia Pessoal do Forum ACBr, Aparentemente falta ser adicionado os eventos de Insucesso e Canc. Insucesso no TACBrCTeDACTEFR.CarregaDadosEventos. ACBrCTeDACTEFR.pas

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.

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?

Boa tarde pessoal do Projeto ACBr, Estou com tendo problema para cancelar NFS-e na cidade de Jundiaí/SP, a Aprovação e Consulta está OK Mas no retorno do ws chega como "Número da NFS-e inexistente na base de dados para o prestador de serviço pesquisado". Recentemente teve algumas mudanças Ginfes/Giss...

Obrigado!

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

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

Bom dia Italo, Anexei o retorno ret.xml

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

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;