NBZON |
nbzonpermet de connaître le nombre de champs d'une table ouverte.
Shortint [G:abv]nbzon
# Affichage des caractéristiques de latable BPCUSTOMER
File BPCUSTOMER [BPC]
Infbox "Il y a"-num$([G:CLI]nbzon)-" champs dans la table CLIENT :"
For I = 0 To [G:BPC]
Infbox[G:BPC]adxfname(I)
Next I
Infbox "Il y a"-num$([G:BPC]nbind)-"index dans la table CLIENT :"
For I = 0 To [G:BPC]nbind - 1
Infbox[G:BPC]keyname(I)
Case[G:BPC]keyuniq(I)
When 0 : Infbox " (Avec Homonymes) "
When 1 : Infbox " (Sans Homonymes) "
When 2 : Infbox " (Nombreux Homonymes) "
Endcase
Infbox "Longueur= "-num$([G:BPC]keylen(I))
Next I
Infbox "Taille totale enregistrement ="-num$([G:BPC]tairec)
nbzonest une variable de la classe [G] associée à une table déclarée par un ordreFile.
nbzoncontient le nombre de champs de la table correspondante. Cette variable estaccessible en lecture seulement.
EREADONLY(62) | EREADONLY(62) |
NBIND - TAIREC - KEYNAME - KEYUNIQ - ADXFNAME - FILE
Adonix X3(r) L4G |