Discussion :

[Tober]

Bonjour,
J'ai créé une formule qui me permet de calculer plusieurs valeurs en fonction de certain paramètres :

Code :

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

1
2
3
4
5
6
7
8
if x = 1 then
    if y = 1 then
        a := bla
    else if y = 2 then
        b = bla
else if x = 2 then
    if y = 1 then
        c = bla

mon probleme est que il faudrait une délimitation comme dans n'importe quel langage du type begin end pour structurer ces if/else...
Je n'ai trouvé nul part une explication sur ce problème... Est-ce au moins possible ?

[kikidrome]

bonjour
je pense que tu peux mettre des ; et des ( ) pour séparer tes instructions.

dans l'aide, il y a un exemple :

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
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
//Expression If - Exemple 5
 
Local CurrencyVar impôt := 0;
 
Local CurrencyVar revenu := {Employés.Salaire};
 
Local StringVar message := "";
 
If revenu < 8000 Then
 
(
 
   message := "non imposable";
 
   impôt := 0
 
)
 
Else If revenu >= 8000 And revenu < 20000 Then
 
(
 
   message := "imposable la plus faible";
 
   impôt := (revenu - 8000)*0.20
 
)
 
Else If revenu >= 20000 And revenu < 35000 Then
 
(
 
   message := "imposable moyenne";
 
   impôt := (20000 - 8000)*0.20 + (revenu - 20000)*0.29
 
)
 
Else
 
(
 
   message := "imposable la plus élevée";
 
   impôt := (20000 - 8000)*0.20 + (35000 - 20000)*0.29 +
 
          (revenu - 35000)*0,40
 
);

[CIFQ_Drew]

Dans ton exemple sa donne

Code :

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

1
2
3
4
5
6
7
8
9
IF x = 1 then (
    IF y = 1 then
        a := bla
    else IF y = 2 then
        b := bla
) else IF x = 2 then (
    IF y = 1 then
        c := bla
);

Tu peux toujours utilisé la fonction SELECT

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
SELECT x
  CASE 1 : (
    SELECT y
      CASE 1 : (
        a := "bla"
      ) CASE 2 : (
        b := "bla"
      ) DEFAULT : (
        d := "bla"
      )
  ) CASE 2 : (
     IF y = 1 THEN
       c := "bla"
  )

Certe la syntaxe SELECT peut être un peu plus lourde lorsqu'il n'y a pas beaucoup de "CASE", mais il permet d'ajouter des éléments beaucoup plus facilement qu'avec une série de ELSE IF, à mon humble avis!!!

[Tober]

Ok merci !