QueueRef (TStereotypeClassQueue)
property queueRef:TRef;
Cet attribut du stéréotype permet de référencer un objet métier à partir d'un objet de la file.
La classe référencée est une classe métier générique.
var sel:TSelector; obj:MyQueue; inst:WFClasseA;
begin
sel := WFClasseA.CreateSelector('unEntier>%1','',true,[10]);
// This line insert WFClasseA objects in the queue
sel.InQueue('MyQueue','wfclassea/@oid');
// Use default enumeration
foreach obj in MyQueue do
begin
// queueRef is an object of the class that has been inserted
// could be cast typed here
inst := obj.queueRef as WFClasseA;
if Assigned(inst) then
begin
end;
end;
end;
Voir aussi