Règle objet non supprimable (rule)

Usage

La règle objet non supprimable portant sur une classe empêche de supprimer des objets de cette classe.

Points de déclenchement

• Suppression d'un objet de la classe.

Action de cette règle

Si Result = True après le déclenchement de cette règle :

• Une tentative de suppression d'un objet de la classe va générer un message d'erreur.

Exemple

<source lang='delphi'> {TCompteGeneral.ObjetNonSupprimable_EstGroupe} var

 vParam : TParametreSociete;

begin

 Result := False;
 vParam := ClassManager.FindSingleton('TParametreSociete');
 if Assigned(vParam) then
   Result := EstGroupe and (vParam.controleComptesDupliques.Value = TypeControl_1_Blocage);

end; </source>

{{#if:Moteur de règle|

{{#if:Moteur de règle|— Moteur de règle |}} — Développement DSM —

|

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

}}