dans une fiche client si le Champ : NomClient n'est pas rempli j aimerai qu un message d erreur du type "vous devez saisir un nom pour ce client" puisse apparaitre ... j ai essayé ce code pour le bouton valider:
Si NomClient = faux ALORS
info("vous devez saisir un nom pour ce client")
mais malgrés je reviens sur ma tableclient avec un enregistrement vide de plus.
Le code actuel de mon bouton "valider" est :
// Selon le mode de la fenêtre
SELON Gauche(ExtraitChaîne(gModeFenetre,1,"="),8)
// Mode création
CAS "Création"
// Mise en place de l'enregistrement et validation
SI RADEnregistre() ALORS
// Ajout de l'enregistrement
HAjoute(Client)
SI ErreurDétectée ALORS
Info("Impossible d'ajouter un enregistrement"+RC+HErreurInfo())
RETOUR
FIN
// Indique que la fiche n'est plus modifiée
gbFenetreModifiee = gbFenetreModifiee OU MaFenêtre..Modifié
MaFenêtre..Modifié=Faux
FIN
// Mode modification
CAS "Modif"
// Mise en place de l'enregistrement et validation
SI RADEnregistre() ALORS
// modification de l'enregistrement
HModifie(Client)
SI ErreurDétectée ALORS
Info("Impossible de modifier l'enregistrement"+RC+HErreurInfo())
RETOUR
FIN
// Indique que la fiche n'est plus modifiée
gbFenetreModifiee = gbFenetreModifiee OU MaFenêtre..Modifié
MaFenêtre..Modifié=Faux
FIN
FIN
// si la fenêtre a été ouverte en mode parcours
SI ModeOuverture="Parcours" OU ModeOuverture~="ParcoursLié" OU gsModeAppel~="Parcours" ALORS
// le nouvel enregistrement devient l'enregistrement en cours
gNumEnr = HNumEnr(Client)
// Est-ce que le mode d'ouverture de la fenêtre a été changé ?
SI gsModeAppel ~= "Parcours" ALORS
// On se positionne sur l'enregistrement pour réinitialiser le parcours
SI gNumEnr<>0 ALORS
HLitPremier(Client)
SINON
HLitPremier(Client,IDClient)
FIN
// On rétablit le mdoe d'ouverture prévu
ModeOuverture = gsModeAppel
FIN
// retour dans le mode d'origine
ModifModeFenetre(ModeOuverture)
// dans les autres cas
SINON
// fermeture de la fenêtre
Ferme("",gbFenetreModifiee)
FIN

