Discussion :

[Chipniz]

Bonjour,

Sous Lotus 9, j'ai un sous-masque qui effectue dans le post-open la formule suivante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
@If (@IsNewDoc;
	@Do (
		Toto := @DbLookup( "" :"" ; @DbName ; "Liste des agents" ; @UserName ; 2 ) ;
		@SetField("NUMERO_AGENT";@Word(Toto;";";1));
		@SetField("NOM_AGENT";@Word(Toto;";";2));
          @If(@IsError(NOM_AGENT);
          @Failure("Il y a une erreur dans le nom de l'agent"); @Success);
		@SetField("SERVICE";@Word(Toto;";";3));
	     @SetField("COMPTE_LOTUS";@Word(Toto;";";6)) ;
		@Command([ViewRefreshFields])
		);
	@Nothing)

Or il arrive que le nom d'un agent ne figure pas dans la vue "Liste des agents". Du coup j'ai une erreur "Entrée absente de l'index".



Comment intercepter cette erreur et afficher un message d'erreur ?

Bien cordialement.

[Jérôme Deniau]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
[FailSilent];

Toto := @DbLookup( "" :"" ; @DbName ; "Liste des agents" ; @UserName ; 2 ; [FailSilent]) ;

cela donne Toto="" si @username n'est pas trouvé

sinon:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Toto := @DbLookup( "" :"" ; @DbName ; "Liste des agents" ; @UserName ; 2 ) ;
@(!@iserror(Toto);"on a un résultat";"on a l'erreur index not found")

[Chipniz]

Merci Jérôme !