Bonjour,
j'ai une méthode dans laquelle je verrouille une table [UBO] sur un enregistrement.
Avant de stocker cet enregistrement j'ai besoin de savoir s'il n'existe pas dans cette table un autre enregistrement qui possède les mêmes champs [UBO]Nom et [UBO]Prenom.
Pour cela j'ai écrit ce bout de code :
où j'aimerais que $result me retourne une valeur VRAI ou FAUX.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 $process:=Numero du process courant $result:=Faux $proc:=Nouveau process("Test_UBO_Exist";128*1024;"Test si UBO existe";[UBO]Nom;[UBO]Prenom;$result;$process) SUSPENDRE PROCESS($process) // suite de ma méthode
La méthode Test_UBO_Exist effectue correctement la recherche et retourne dans $5 la valeur VRAI ou FAUX mais une fois que je reviens dans mon process. Voici le code de la méthode :
Merci pour votre aide
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26 TOUT SELECTIONNER([UBO]) CHERCHER([UBO];[UBO]Nom=$1) Si (Enregistrements trouves([UBO])>0) CHERCHER DANS SELECTION([UBO];[UBO]Nom_Jeune_Fille=$2) Si (Enregistrements trouves([UBO])>0) CHERCHER DANS SELECTION([UBO];[UBO]Prenoms=$3) Si (Enregistrements trouves([UBO])>0) $4:=Vrai Sinon $4:=Faux Fin de si Sinon $4:=Faux Fin de si Sinon $4:=Faux Fin de si REACTIVER PROCESS($5)
Ma version : 4D Serveur Win V12 64bits.
Partager