AddConstraint (selector)

Version du 3 novembre 2016 à 09:54

function AddConstaint(iParent:TSelectorConstraint; const iClassName:string; const iRightName:string; const iLeftName:string; const iWhere:string; const iArgs:Array of variant):TSelectorConstraint;

Cette méthode définit une contrainte matérialisé par une jointure.

ATTENTION: Cette méthode ne fonctionnant pas actuellement avec les curseurs, il faut impérativement passer par une liste TSelector.ASList.

• iParent

Une contrainte parente matérialisant la classe de droite

nil pour faire porter la contrainte sur la classe du sélecteur

• iClassName

Une classe sur laquelle porte la contrainte

• iLeftName

Un attribut de la classe de la contrainte (iClassName) portant la contrainte

• iRightName

Un attribut de la classe de droite, du parent ou du sélecteur, portant la contrainte

• iWhere

Clause where de la contrainte, la clause where est exprimée par rapport à la classe de la contrainte (iClassName). Les rôles NE sont pas évalués, il faut passer impérativement par AliasOf au besoin.

• iArgs

Arguments de la contrainte

Exemple :

function doSelector(const iCodeA:string; const iCodeB:string):Integer;
var selA:TSelector; obj:TObject;
begin
  selA := ClassA.CreateSelector('unCodeA=%1','unCodeA',True,[iCodeA]);
  obj  := selA.AddConstraint(nil, 'ClassB','oid','refB','unCodeB=%1',[iCodeB]);
  Result := selA.Count;
end;

Cette contrainte va générer le code SQL suivant :

  select * from CLASSA t0 
  join CLASSB t1 on (t1.oid=t0.refB) and (unCodeB='iCodeB')

Voir aussi :

• Contrainte sur un sélecteur
• AliasOf (expression)