Adaptação do arquivo ACBrNFSeNotasFiscais

[Henrique Sandri Zimermam]

Boa tarde,

 

Estou implementando uma rotina que utiliza o metodo TNotasFiscais.LoadFromString da unit ACBrNFSeNotasFiscais. Este metodo contém a subfunção TNotasFiscais.LoadFromString.PosNFSe que possui um laço de repetição que originalmente deve ser repetido 10 vezes (tamanho fixo). Devido ao tamanho fixo definido na condição deste repeat, a rotina acabava não efetuando as validações necessárias para todos os elementos do array TagF.

Para otimizar o código e não precisar alterar a condição do repeat toda vez que um novo elemento seja adicionado ao array, efetuei uma modificação no until para que o contador seja comparado ao high do array. Em anexo encaminho o arquivo alterado para análise.

 

Att.

ACBrNFSeNotasFiscais.pas

[Italo Giurizzato Junior]

Bom dia Henrique,

Muito obrigado pela colaboração, ainda hoje estarei enviando para o repositório.