Olá Fabiano

Exatamente o que o código faz , não sei , e também não estou muito preocupado em entender ...
É grande, é verdade , mas funciona , e isso é o mais importante .

Além disso vêm de uma pessoa , que percebe muito de VFP ...

Muito obrigado a todos