mkstat permet de renvoyer un statut d'erreur en contrôle de saisie, mais aussi de définir des conditions d'affichage ou de saisie d'un champ.
# action champ : Avant_saisie
# le champ PRITYP n'est pas saisissable
# si la variable GNOTATI est positionnée à 1
Subprog AS_PRITYP(VALEUR)
Variable Integer VALEUR
If GNOTATI = 1
mkstat = 2
Endif
End
# action champ : Contrôle
# contrôle d'existence sur la fiche tiers
# avec blocage en saisie si tiers inexistant
Subprog C_BPCPYR(VALEUR)
Variable Char VALEUR()
If GREP = "C" | GREP = "D"
If VALEUR <> "" & VALEUR <> [M:BPC0]BPCNUM
Call CONTROLE("BPR","",VALEUR,"",mkstat) From CONTOBJ
Endif
Else
Call CONTROLE("BPR","",VALEUR,"",mkstat) From CONTOBJ
Endif
End
mkstat est une variable système Adonix dont la valeur initiale vaut 0. Cette valeur peut être modifiée par l'utilisateur de la façon suivante :
Dans le cas de contrôles, dans les actions sur champ de contrôle, d'après-zone, d'après-modif, mkstat peut avoir les valeurs suivantes :
En conditionnement d'affichage, dans une action sur champ d'avant-zone, mkstat peut avoir les valeurs suivantes :
En conditionnement de saisie, dans une action sur champ d'avant-saisie, mkstat peut avoir les valeurs suivantes :
Dans le cas de traitement par boutons sur toute zone de l'écran, mkstat peut avoir les valeurs suivantes :
Dans le cas de traitement par boutons sur la variable de bas de tableau, mkstat peut avoir les valeurs suivantes :