Procedure Habilitation ActiverContrainte(Activite : ActiviteContrainte);
Faire passer les contraintes à l'état ContrainteImmediate provoque leurs évaluations. Faire passer les contraintes à l'état ContrainteIgnorees conserve les contraintes en attente.
Le contrôle des contraintes n'est possible que si le programme a été généré avec l'option contrainte=O.
Type Octet=Entier Contrainte Objet Entre 0 Et 256;
Type Employe Defaut Transactionnel
/********************************/
...
Fin Type
Principal
/*******/
Debut
...
Octet.ActiverContrainte(ContrainteIgnoree);
/* On ignore les contraintes sur ce type. */
...
Employe.ActiverContrainte(ContrainteTransaction);
/* On gèle les contraintes jusqu'a l'évaluation de la transaction. */
...
Fin Principal
- | - | - | - | - | - | - | - | - |