Avant que la boîte de dialogue « Nouveau numéro d'identification [new ident-no.] » ne s'ouvre dans 3Dfindit, un script sur le serveur peut vérifier si certaines conditions préalables sont remplies. En fonction du résultat, il demande une confirmation, affiche un message d’avertissement ou interrompt le processus avec un message d’avertissement, de sorte que la boîte de dialogue ne s’ouvre pas. Le script ne modifie aucune donnée.[79]
Usure
Entrez le script compilé ( .vbb ) dans le erpcustom.cfg :
[SERVER_BEFORE_SHOWDIALOG] 1=$CADENAS_SETUP/scripts/erp/erp_before_showdialog.vbb
Si
la vérification ne doit s'appliquer qu'à un rôle spécifique, le bloc est le suivant : [SERVER_BEFORE_SHOWDIALOG(<groupName>)].
Le
script contient la fonction Execute(context). Elle doit renvoyer la valeur 1
. Toute autre valeur ou toute exception est considérée comme une erreur.
Via
context, le script dispose des
informations et messages suivants :
-
Table,Document -
QueryConfirmed Vrai, si la requête est répétée après que l'utilisateur a confirmé une demande de confirmation ou une remarque . En lecture seule.-
Ask(message [, titre [, texteDeConfirmation [, texteD'Annulation]]]) Affiche une boîte de dialogue de confirmation. Si l' utilisateur confirme, la boîte de dialogue s'ouvre ; s'il annule, l'opération prend fin. Vous pouvez également définir le titre de la fenêtre et le libellé des deux boutons.
-
ShowInfo(message [, titre [, texte du bouton]]) Affiche une remarque. Une fois la confirmation effectuée, la boîte de dialogue s'ouvre. Vous pouvez, si vous le souhaitez, définir le titre de la fenêtre et le libellé du bouton.
-
StopWithInfo(message [, titre [, texteDuBouton]]) Affiche un message d'information et met fin à l' opération. La boîte de dialogue ne s'ouvre pas, même lors du deuxième passage après confirmation. Vous pouvez, si vous le souhaitez, définir le titre de la fenêtre et le libellé du bouton.
Avant l' ouverture de la boîte de dialogue, le système demande à l'utilisateur s'il souhaite continuer :
Function Execute(context)
context.Ask("Do you want to continue to the ERP dialog?", _
"Assign ERP number", "Proceed", "Stop")
Execute = 1
End Function
![[Remarque]](https://webapi.partcommunity.com/service/help/latest/pages/fr/ecatalogsolutions/doc/images/note.png)
erp_before_showdialog.vbb