ReciprocalRoleName (Instance)

<source lang='delphi'>function ReciprocalRoleName(const iRoleListName:string):string;</source>

Cette fonction retourne le nom du rôle réciproque en fonction du nom du rôle liste

Result	Le nom du rôle réciproque de la classe référencée par le rôle.
iRoleListName	Un nom de rôle liste.

Exemple <source lang='delphi'> //Function _CreateCursorObjetsSession(aSession:TSessionImportation):TCursor; //Création d'un curseur afin de retourner tous les objets de la session quelque //soit le type de la session et des objets de la session. var

 vClassName : String;
 vCursor    : TCursor;

begin

 //Recherche du nom de la classe enfant
 vClassName := aSession.RoleClassName('ImportDonneeList');
 
 //Créer le curseur
 vCursor := ClassManager.CreateCursor(vCursorClass);
 //En déduire l'attribut du rôle réciproque, dans notre cas oidSessionImportation
 //car nous avons un rôle liste ImportDonneeList et le rôle réciproque référençant le parent SessionImportation.
 vCursor.Where := 'oid' + aSession.ReciprocalRoleName('ImportDonneeList') +'=%1';
 vCursor.ArgCount := 1;
 vCursor.Args[1] := aSession.instanceoid;
 vCursor.Nolock := True;
 vCursor.Descendants := True;
 
 result := vCursor;   

end; </source>

Voir aussi

{{#if:Objets métiers (tech)|

{{#if:Objets métiers (tech)|— Objets métiers (tech) |}} — Développement DSM —

|

{{#if:|— [[{{{1}}}]] |}} — Développement DSM —

}}