Manuel §2.1.9    

Fonctions Query et Next

Les fonctions Query et Next permettent de réaliser des requêtes sur la base produit. La requête commence par l ’appel de la Query, puis par le positionnement des champs dont on veut l ’exacte correspondance lors de la requête (ce sont les critères de sélection), puis d ’une succession d ’appel à la fonction Next() pour chaque produit correspondant aux critères.

BaseProduit.Query()

BaseProduit.Next() : status

Les fonctions Query et Next n ’attendent aucun paramètre. La fonction Next retourne un nombre non nul en cas de succès, 0 en cas d ’échec c ’est à dire quand la requête est terminée.

Par exemple :

Bons = 0 ;
MesProduits.Query() ;
MesProduits.Begin = "  1999/2/1 0 :0 :0 "  ;
MesProduits.End = "  1999/2/28 23 :59 :59 "  ;
MesProduits.Model = "  XB18 "  ;
While MesProduits.Next() Do  If MesProduits.Defect == 0 then Bons  = Bons+1 ;