XML de retorno da cidade de Brotas (Assessor Público)

[FabioTellini]

Bom dia.

Após a transmissão da nota de serviço na cidade de Brotas-SP é feito a consulta, essa consulta é feita corretamente, mas o XML devolvido pelo webservice está vindo com os campos abaixo:

<CANCELADA>N</CANCELADA>
<DATACANCEL>/ /</DATACANCEL>
<HORACANCEL>00:00:00</HORACANCEL>

Na unit AssessorPublico.LerXML, rotina LerInformacoesCancelamento tem o seguinte trecho:

  if (OnlyNumber(HoraCancel) <> '') then
    DataCancel := DataCancel + ' ' + HoraCancel;

  if OnlyNumber(DataCancel) <> '' then
    NFSe.NfseCancelamento.DataHora := StringToDateTime(DataCancel, 'DD/MM/YYYY hh:nn:ss');

No primeiro if está validando somente a variável HoraCancel, como a condição é verdadeira a variável DataCancel está ficando "  /  /     00:00:00", com isso na atribuição do campo NFSe.NfseCancelamento.DataHora ocorre o erro na conversão.

Alterei o primeir if para " if (OnlyNumber(DataCancel) <> '') and (OnlyNumber(HoraCancel) <> '') then", dessa forma não ocorreu erro na transmissão, a consulta e o cancelamento também ficaram certos.

Segue arquivo para validação.

AssessorPublico.LerXml.pas

[Italo Giurizzato Junior]

Boa tarde @FabioTellini,

Muito obrigado pela colaboração, já foi criado a tarefa ACBr 7986 para analise.

[Italo Giurizzato Junior]

Bom dia @FabioTellini,

Já esta no SVN.

[FabioTellini]

Obrigado.

[Italo Giurizzato Junior]

Obrigado por reportar.

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