ZONCOU |
zoncou contains the name of the zone being entered in a mask.
Char [S]zoncou(12)
# Management of access codes
Local Dlgbox Mask [AMC]
& Button mess(2,123,1) , mess(5,123,1) ,
mess(65,123,1)
& With left$(mess(2,123,1),1) , left$(mess(5,123,1),1)
, left$(mess(65,123,1),1)
& CODED GSTAENR, GSTAFIN , GSTAEND
& Titled mess(140,124,1) As [AMC]
Boxact [AMC]
Onevent AFTER_CHANGE Gosub APRES_MODIF
Boxinp [AMC] Using REPONSE
ONEVENT AFTER_CHANGE
$APRES_MODIF
Case zoncou
When "MASQUE"
Read
[AMK]CODMSK = zc
If fstat
Call ERREUR(mess(72,123,1)) From GESECRAN
Endif
When Default
Endcase
zoncou contains the name of the field being entered in a mask. This variable is available in:
· the pre-zone of a zone.
· when initialising a zone.
· the pre-input of a zone.
· when checking a zone.
· the post-zone of a zone.
· the post-modification of a zone.
When this field is sized, the index variable gives the current index for it.
No associated errors.
|
|