OK, a msg. de erro é essa:
X800
Erro de Validação: → 1832 - Element ‘{http://www.ginfes.com.br/tipos_v03.xsd}ItemListaServico’: [facet ‘maxLength’] The value has a length of ‘6’; this exceeds the allowed maximum length of ‘5’.
Acredito a propriedade ItemListaServico seja uma dessas 2 olhando na documentação:
PedidoEmissao.infDPS.serv.cServ.cTribNac := ‘140200’;
PedidoEmissao.infDPS.serv.cServ.cTribMun := ‘1402’;
Eu já inverti os valores mas retorna a mesma msg. de erro.
A propriedade ItemListaServico do provedor Ginfes refere-se à propriedade infDPS.serv.cServ.cTribNac.
Como a mensagem de erro indica que o tamanho máximo é 5, então você pode tentar da seguinte forma:
PedidoEmissao.infDPS.serv.cServ.cTribNac := ‘14.02’;
mais essa, aff
E16
A data da emissão do RPS não poderá ser superior a data de hoje
Informe uma data de emissão de RPS válida
Estou enviando assim agora:
infDPS.dhEmi := TTimeZone.Local.ToUniversalTime(Now)
mas já tentei de várias formas.
Informe as datas em fuso local mesmo, pois a SDK já transforma os campos datetime para UTC:
infDPS.dhEmi := Now;
Mesmo assim retorna o mesmo erro!
Enviei dessa forma:
infDPS.dhEmi := Now;
infDPS.dCompet := Int(Now)
Tente assim:
infDPS.dhEmi := Now;
infDPS.dCompet := Now;
Caso não dê certo, favor informar o id da nota para verificarmos o que está ocorrendo.
segue:
nfs_3a09350ac62c4eaea01ee82f4d128ca6
Eu já tinha tentado dessa forma tb.
Teremos que fazer uma alteração específica para o provedor dessa prefeitura. Favor aguardar.
Por enquanto está com erro:
ServerError
Internal server error: WT-fpWCCGn-hkpKil5AizQ
Certo, já detectamos aqui.
Vamos analisar e em breve retornamos.
Mudou a msg. de erro agora:
E15
Data da emissão do RPS inválida
Informe a Data da emissão do RPS no formato Date
ID:
nfs_3a0935f51c7a4992b8b11bb42c72f1bd
Boa tarde, agora a msg. de erro mudou:
E16
A data da emissão do RPS não poderá ser superior a data de hoje
Informe uma data de emissão de RPS válida
Bom dia @leandro . O web service da sua prefeitura está se mostrando bem diferente e inconsistente com a maioria das outras prefeituras.
Para minimizar essas várias interações, gostaríamos de saber se nos autorizaria a emitir algumas notas de teste (que posteriormente seriam canceladas, obviamente), usando o certificado digital que você cadastrou na Nuvem Fiscal, para agilizarmos esse processo e minimizarmos essas interações?
Se isso não for possível, sem problema nenhum, podemos continuar as interações por aqui como estamos fazendo.
Bom dia, desde que as notas sejam em Homologação sem problemas!
Agora autorizou, obrigado pelo empenho.
Só mais uma coisa , o XML e PDF em Delphi uso TFileStream para carrega os dados?
Sim, você pode utilizar o TFileStream caso sua intenção seja salvar em disco.
Nesse tópico tem um exemplo de utilização usando o TFile.WriteAllBytes, que nada mais é que um “atalho” para o TFileStream:
Este tópico foi fechado automaticamente 24 horas depois da última resposta. Novas respostas não são mais permitidas.