TotAbrSel

@ Para retornar o total de abrangências no sistema @

xTotal = TotAbrSel;

 

@ Para percorrer por todas as abrangências @

Definir Numero x;
Definir Alfa xAux;

Para (x = 1; x < TotAbrSel; x++)
    Inicio
        xAux = AbrTelSel[x];
    Fim;