Erro conversão data retorno NFS-e provedor ELv2 (StringToDateTime)

[Paulo R G Oliveira 8]

Bom dia, estou com problemas NFS-e(Provedor ELv2, Cidade de Cachoeiro do Itapemirim), aparentemente o erro está ocorrendo na conversão de data dentro da Unit ...ACBrComum/ACBrUtil.pas, método/função function StringToDateTime(const DateTimeString : String ; const Format : String. Ao enviar a NFS-e e consultar o retorno ocorre o erro  que parece ser devido ao formato data/hora contida no XML de retorno <DataEmissao>2020-09-22T00:00:00.000-03:00</DataEmissao>. Gostaria de ajudar para poder entender se o problema é no provedor ou alguma alteração na Unit. Lembrando que mesmo XML de notas emitidas anteriormente normalmente(Antes da atualização do componente) agora estão com mesmo erro ao reimprimir DANFE.

Anexo XML retornado na rotina ACBrNFSe1.ConsultarNFSeporRps

Retorno8077.xml

[antonio.carlos 65]

Tópico movido para a área do SAC, para que o SLA de respostas seja considerado

[antonio.carlos 65]

@Paulo R G Oliveira poderia fazer uma alteração no componente ?
Na unit pnfsNFSeR acrescente a linha DataHorBR := Copy(DataHorBR, 1, 19);
mais precisamente em:

proNFSeBrasil,
        proELv2,
        proSilTecnologia:
          begin
            DataHorBR := Leitor.rCampo(tcStr, 'DataEmissao');
            DataHorBR := Copy(DataHorBR, 1, 19);      // linha acrescentada

            NFSe.DataEmissao := StringToDateTime(DataHorBr, 'DD/MM/YYYY hh:nn:ss');
          end;
Esse código se refere a função:
function TNFSeR.LerNFSe: Boolean;

[Paulo R G Oliveira 8]

Fiz a alteração conforme informado e ainda ocorre o problema. 

 

Se eu grosseiramente colocar um try except dentro da função, o erro para, porém não tem como acessar a data de emissão da nota.

Edited September 23, 2020 by Paulo R G Oliveira

[Italo Giurizzato Junior 9,894]

Boa tarde Paulo,

Com essa alteração qual é o erro apresentado quando se tenta ler o XML da nota?

[Paulo R G Oliveira 8]

Boa tarde,

Isso Ítalo, ao fazer a leitura do XML para imprimir o DANFE da NFS-e ocorre este problema, seguindo a linha de racioncínio do colega Antônio Carlos, comparei a versão atual da Unitr pnfsNFSeR.pas com a versão anterior e consegui resolver o problema comentando a referencia do provedor ELv2 na função function TNFSeR.LerNFSe: Boolean; linha 1529. Com isso a leitura do campo data vai para o outra condição e forma de tratamento. 

[Italo Giurizzato Junior 9,894]

Paulo,

Muito obrigado pelo retorno, vou fazer essa alteração e enviar para o repositório.

[antonio.carlos 65]

@Paulo R G Oliveira nosso consultor @Italo Jurisato Junior fez alteração e já subiu no SVN.

[Paulo R G Oliveira 8]

Meu muito obrigado a todos pela atenção, me ajudaram muito.

[antonio.carlos 65]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.