TRightProfilManager (class)
De Wiki1000
(Différences entre les versions)
| (2 révisions intermédiaires par un utilisateur sont masquées) | |||
| Ligne 1 : | Ligne 1 : | ||
Cette façade métier permet à l'Application métier de configurer les profils de droits pour un utilisateur. | Cette façade métier permet à l'Application métier de configurer les profils de droits pour un utilisateur. | ||
| − | Lorsque le profil de droit est chargé les valeurs des paramètres de ce profil sont définis avec le paramétrage défini pour cette utilisateur. | + | Lorsque le profil de droit est chargé, les valeurs des paramètres de ce profil sont définis avec le paramétrage défini pour cette utilisateur. |
| − | La façade permet de définir les valeurs des paramètres au chargement de l'application en remplacement (ou en | + | La façade permet de définir les valeurs des paramètres au chargement de l'application en remplacement (ou en complément) du paramétrage de l'utilisateur. |
| − | Ceci permet d'implémenter une gestion plus sophistiquée du paramétrage sous le contrôle de l'Application métier. | + | Ceci permet d'implémenter une gestion plus sophistiquée du paramétrage, sous le contrôle de l'Application métier. |
Cette façade doit avoir l'interface suivante : | Cette façade doit avoir l'interface suivante : | ||
| Ligne 43 : | Ligne 43 : | ||
|} | |} | ||
| − | La fonction ''ConfigureParameter'' est | + | La fonction ''ConfigureParameter'' est appelée pour chaque paramètre. |
* Valeur de retour False | * Valeur de retour False | ||
| Ligne 49 : | Ligne 49 : | ||
* Valeur de retour True | * Valeur de retour True | ||
| − | : Le paramètre est configuré par la valeur | + | : Le paramètre est configuré par la valeur retournée dans aValue |
aValue doit être correctement formaté. | aValue doit être correctement formaté. | ||
| Ligne 100 : | Ligne 100 : | ||
[[Category:Façade métier]] | [[Category:Façade métier]] | ||
| + | [[Category:Version700]] | ||
Version actuelle en date du 31 octobre 2017 à 15:18
Cette façade métier permet à l'Application métier de configurer les profils de droits pour un utilisateur.
Lorsque le profil de droit est chargé, les valeurs des paramètres de ce profil sont définis avec le paramétrage défini pour cette utilisateur.
La façade permet de définir les valeurs des paramètres au chargement de l'application en remplacement (ou en complément) du paramétrage de l'utilisateur.
Ceci permet d'implémenter une gestion plus sophistiquée du paramétrage, sous le contrôle de l'Application métier.
Cette façade doit avoir l'interface suivante :
Type TRightProfilManager = Class(TitObject) public Class Function ConfigureParameter(const iProfilName:string; const iParameterName:string; const iClassName:string; const iOperator:string; const iAttribute:string; var aValue:variant):boolean; end;
ConfigureParameter
| Paramètre | Usage |
|---|---|
| iProfilName | Nom du profil de droit |
| iParameterName | Nom du paramètre |
| iClassName | Nom de la classe sur lequel porte le droit |
| iOperator | Opérateur du droit |
| iAttribute | Nom de l'attribut sur lequel porte le droit |
| aValue | Valeur du droit à appliquer |
La fonction ConfigureParameter est appelée pour chaque paramètre.
- Valeur de retour False
- Le paramètre n'est pas configuré et sera configuré par la configuration de l'utilisateur
- Valeur de retour True
- Le paramètre est configuré par la valeur retournée dans aValue
aValue doit être correctement formaté.
Exemple :
unit genConfiguration; interface Type TRightProfilManager = Class(TitObject) public Class Function ConfigureParameter(const iProfilName:string; const iParameterName:string; const iClassName:string; const iOperator:string; const iAttribute:string; var aValue:variant):boolean; end; Implementation {TRightProfilManager} Class Function TRightProfilManager.ConfigureParameter(const iProfilName:string; const iParameterName:string; const iClassName:string; const iOperator:string; const iAttribute:string; var aValue:variant):boolean; //Class Function ConfigureParameter(const iParameterName:string; const iClassName:string; const iOperator:string; const iAttribute:string; var aValue:variant):boolean; begin Result := False; if Pos('%ETABLISSEMENT',iParameterName)=1 then begin aValue := QuotedStr('BDX'); if iOperator='in' then aValue := Format('(%s)',[aValue]); Result := True; end; if Pos('%SITE',iParameterName)=1 then begin aValue := QuotedStr('BDX'); if iOperator='in' then aValue := Format('(%s)',[aValue]); Result := True; end; if Pos('%DEPOT',iParameterName)=1 then begin aValue := QuotedStr('BDX')+','+QuotedStr('MTL'); if iOperator='in' then aValue := Format('(%s)',[aValue]); Result := True; end; end; end.
