MKSTAT |
mkstatpermet de renvoyer un statut d'erreur en contrôle de saisie, mais aussi dedéfinir des conditions d'affichage ou de saisie d'un champ.
Shortint [S]mkstat
# 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
CallCONTROLE("BPR","",VALEUR,"",mkstat ) From CONTOBJ
Endif
Else
CallCONTROLE("BPR","",VALEUR,"",mkstat) From CONTOBJ
Endif
End
mkstatest une variable système Adonix dont la valeur initiale vaut 0. Cette valeurpeut ê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 champd'avant-zone, mkstatpeut avoir les valeurs suivantes :
En conditionnement de saisie, dans une action sur champd'avant-saisie, mkstatpeut avoir les valeurs suivantes :
Dans le cas de traitement par boutons sur toute zone de l'écran,
Dans le cas de traitement par boutons sur la variable de bas de tableau,
La variable zonsui est à utiliser pour les "débranchements desaisie" d'une zone mais pas dans la situation où l'on veut éviter lasaisie d'une zone. En effet, dans ce dernier cas, la gestion de zonsui seraitplus complexe que l'utilisation de
Pas d'erreur associée.
Adonix X3(r) L4G |