ACBRGtin com NCM vindo sem zeros à esquerda

[Ademar DC]

Bom dia, notei que ao realizar a consulta de GTIN produtos que possuem NCM com 0 a esquerda estão vindo sem o mesmo, por exemplo:
Para o EAN 7898970338246

Padrão:

 

Para resolver apenas inseri um PadLeft, considerando que sempre o NCM deve ter 8 caracteres, no tratamento de dados no retorno, no método TGTINConsulta.TratarResposta:

 

 FNCM := GTINRetorno.NCM.PadLeft(8,'0');

Com PadLeft:

 

PS: Não achei tópico específico para ACBRGtin então lancei neste mesmo.

É válida a alteração ? (Arquivo em anexo)

ACBrGTINWebServices.pas

[Diego Foliene]

Obrigado pela contribuição, em breve será validada para possível inclusão ao svn #TK-3810 

[Italo Giurizzato Junior]

Boa tarde Ademar,

Fiz uma pequena alteração, já esta no SVN.

Favor atualizar os fontes, reinstale o ACBr e faça novos testes.

[Ademar DC]

Bom dia, realizei os testes atualizando o componente e funcionou corretamente, obrigado.

[Diego Foliene]

Obrigado por reportar.

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