Provedor IPM com erro na consulta de Lote.

[Maiquel]

Olá Pessoal;

Provedor IPM esta retornando erro na consulta de lote.

 ''22/01/2024' is not a valid date and time'.

Debugando, percebi que na Unit IPM.LerXml o campo competência esta com a seguinte formatação:

Citar

Competencia := ObterConteudo(AuxNode.Childrens.FindAnyNs('data_fato'), tcDat);

Nisso ocorre o erro, se faz necessário alterar para 

Competencia := ObterConteudo(AuxNode.Childrens.FindAnyNs('data_fato'), tcDatVcto);

Segue a unit alterada também.

Com esta alteração funciona, corretamente.

 

Obrigado.IPM.LerXml.pas

[Italo Giurizzato Junior]

Bom dia @Maiquel,

Muito obrigado pela colaboração, já inclui na minha lista de tarefas. TK-5026

[Italo Giurizzato Junior]

Boa tarde @Maiquel,

Já esta no SVN.

[jaidomini]

Bom dia, está dando este mesmo erro com a tag data_nfse + hora_nfse e data_emissao_recibo_provisorio + hora_emissao_recibo_provisorio

 

Linha 303 +/-

    aValor := ObterConteudo(AuxNode.Childrens.FindAnyNs('data_emissao_recibo_provisorio'), tcStr);
    aValor := aValor + ' ' +
              ObterConteudo(AuxNode.Childrens.FindAnyNs('hora_emissao_recibo_provisorio'), tcStr);

    NFSe.DataEmissao := EncodeDataHora(aValor, 'DD/MM/YYYY');
    NFSe.DataEmissaoRps := EncodeDataHora(aValor, 'DD/MM/YYYY');
 

Linha 220 +/-

        aValor := ObterConteudo(AuxNode.Childrens.FindAnyNs('data_nfse'), tcStr);
        aValor := aValor + ' ' +
                  ObterConteudo(AuxNode.Childrens.FindAnyNs('hora_nfse'), tcStr);

        DataEmissao := EncodeDataHora(aValor, 'DD/MM/YYYY');

 

 

Obg

[jaidomini]

Ítalo, possível correção para vc analisar se está de acordo, aqui funcionou.

[Alexandre de Paula]

Obrigado pela contribuição.

Se possível anexe o arquivo alterado para agilizar a avaliação.

[Italo Giurizzato Junior]

Boa tarde @jaidomini,

Você poderia anexar um XML para analise?

[jaidomini]

Olé, desculpe a demora

Asism que pegar o XML, tira ele da visualização publica, eu ja tirei o CNPJ do prestador e tomador pq o xml é do cliente.

Att

Jaisson

 

[Italo Giurizzato Junior]

Bom dia Jaisson,

Muito obrigado pelo XML,

Já deletei ele da postagem.

Muito obrigado pela colaboração, já inclui na minha lista de tarefas. TK-5044

[Italo Giurizzato Junior]

Boa noite Jaisson,

Já esta no SVN.