Cette action est appelée lorsqu'on a réussi à verrouiller une fiche courante encours de modification. La valeur correspondante de la clé est stockée dans le tableau CLESEC,la variable SYMBOLE contenant le symbole verrouillé (il s'agit del'abréviation de la table suivie de la clé courante dans les cas de gestion simple oucombinée, et du nom de la table en gestion tableau).
Simple, Tableau, Combiné
Non
Si on considère qu'une condition particulière doit empêcher le verrouillage, il fautdéverrouiller le symbole, à l'aide de l'instruction Unlock =SYMBOLE et affecter lavariable OK à la valeur 0.
Dans la saisie des factures tiers, la table à verrouiller n'est pas la tableprincipale de l'OBJet, mais la table GACCENTRY [HAE].
$VERROU
[L]SYMBHAE = "HAE"+[F:SIH]NUM+"\"+[F:SIH]GTE
Lock =SYMBHAE With lockwait=0
If fstat
Unlock =SYMBOLE
[L]OK=0
Endif
Return
$DEVERROU
Unlock =SYMBHAE
Return