4D Write v14WR VERROUILLER COMMANDE |
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
4D Write v14
WR VERROUILLER COMMANDE
|
WR VERROUILLER COMMANDE ( zone ; cmdNo ; verrouillé ) | ||||||||
Paramètre | Type | Description | ||||||
zone | Entier long |
![]() |
Zone 4D Write | |||||
cmdNo | Entier long |
![]() |
Numéro de commande à traiter | |||||
verrouillé | Entier |
![]() |
0=permet l'exécution 1=interdit l'exécution | |||||
La commande WR VERROUILLER COMMANDE permet d'empêcher ou non l'exécution par l'utilisateur de la commande passée en paramètre. Ces commandes peuvent être localisées dans les menus (ce qui permet d’utiliser les menus de 4D Write par programmation) ou dans les palettes.
Vous pouvez passer dans le paramètre verrouillé l'une des constantes suivantes, placées dans le thème "WR Paramètres" :
Constante | Type | Valeur | Commentaire |
wr commande déverrouillée | Entier long | 0 | La commande s'exécutera lorsqu'elle sera appelée. |
wr commande verrouillée | Entier long | 1 | La commande ne s'exécutera pas lorsqu'elle sera appelée et elle apparaîtra grisée dans les menus et palettes où elle est présente. |
Attention :
Notez que les commandes du menu verrouillé ne seront plus accessibles lors du déroulement du menu, toutefois celles qui possèdent un équivalent clavier ou une représentation dans les palettes pourront toujours être exécutées. Si vous désirez verrouiller complètement ces commandes, il vous faudra utiliser WR VERROUILLER COMMANDE spécifiquement sur chacune d'entre elles.
Note : La liste des menus, commandes et de leur référence vous est fournie dans le thème de constantes “WR Commandes”. Vous pouvez indifféremment passer la valeur ou la constante.
Vous voulez laisser l’accès à la structure si l’utilisateur est le superviseur de la base et en interdire l’accès dans les autres cas :
Si(Utilisateur courant="Super_Utilisateur")
WR VERROUILLER COMMANDE(LaZone;wr cmd insérer expression 4D;wr commande déverrouillée)
Sinon
WR VERROUILLER COMMANDE(LaZone;wr cmd insérer expression 4D;wr commande verrouillée)
Fin de si
Si le nom de l'utilisateur n’est pas "Gourou", nous lui refusons la création de nouveaux documents :
Si(Evenement formulaire=Sur chargement)
Si(Utilisateur courant#"Gourou") `Si l’utilisateur n’est pas Gourou
WR VERROUILLER COMMANDE(LaZone;wr cmd nouveau;wr commande verrouillée) `Protégeons la commande Nouveau
Fin de si
Fin de si
Produit : 4D Write
Thème : WR Contrôle de la zone
Numéro :
89446
Nom intl. : WR LOCK COMMAND
Créé : 4D Write 6.5
Annexe B : Codes des commandes de menus
WR APPELER SUR COMMANDE
4D Write - Langage ( 4D Write v11.6)
4D Write - Langage ( 4D Write v12)
4D Write - Langage ( 4D Write v14)
4D Write - Langage ( 4D v13)
4D Write - Langage ( 4D Write v14 R2)
4D Write - Langage ( 4D Write v14 R3)
4D Write - Langage ( 4D Write v14 R4)