| 4D Write v15WR Error text | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|  | 
    4D Write v15
 WR Error text 
         | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| WR Error text ( numErreur ) -> Résultat | ||||||||
| Paramètre | Type | Description | ||||||
| numErreur | Entier |   | Numéro d'erreur | |||||
| Résultat | Chaîne |   | Libellé de l'erreur spécifiée par numErreur | |||||
La commande WR Erreur texte retourne le texte de l’erreur passée en paramètre. Cette fonction permet d’afficher un message d’erreur.
Vous voulez afficher le descriptif de l’erreur si l’utilisateur est le superviseur de la base, et un message plus général pour les autres utilisateurs.
 ErrNo:=WR Error number(LaZone)
  `Une erreur s’est-elle produite ?
 If(ErrNo#0)
  `Si oui
    If(Current user="Super_Utilisateur")
  `S’il s’agit de l’utilisateur principal, donnons-lui le message complet
       ALERT(String(ErrNo;"Erreur N° ##### ")+WR Erreur texte(ErrNo))
    Else
       ALERT("Erreur : veuillez prévenir votre responsable.")
    End if
 End if
	Produit :  4D Write
	Thème :  WR Utilitaires
	Numéro :  
        89180
        
        
        
	
	Créé :  4D Write 6
	
	
	
	
	
	
	
	
	4D Write - Langage ( 4D Write v15)
	
	
	
	
	
	
	
 Ajouter un commentaire
Ajouter un commentaire