Discussion :

[chapeau_melon]

Bonjour,

Comment écrire au mieux ceci :

champ 1: date1
champ 2: date2
champ 3: date3
champ 4: date4
Champ 5: calcul de date

calcul de date =

SI 1 est vide, voir si 2 est vide (sinon prendre 5 = 1)
SI 2 est vide, voir si 3 est vide (sinon prendre 5 = 2)
SI 3 est vide, prendre 5 = 4 (sinon prendre 5 = 3)


J'hésite avec SINON et SINON SI
Au peut-être d'une autre façon ?

BAV

[Jannus]

SELON CAS
Il y a plusieurs syntaxes possibles

[chapeau_melon]

Je me trompe ou SELON CAS c'est pour un champ en particulier ?

SELON CAS champ 1
CAS

et les autres champs ?

BAT

[chapeau_melon]

Je pense qu'avec ceci cela fonctionne :

Code :

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

1
2
3
4
5
6
7
8
9
10
 
// calcul vervangdata 
        SI SAI_PM_implantdatum1 <> "" ALORS SAI_Vervangdata = SAI_PM_implantdatum1..ValeurAffichée SINON 
        SI "SAI_Aelec impl datum3" <> "" ALORS SAI_Vervangdata = "SAI_Aelec impl datum3"..ValeurAffichée SINON
        SI "SAI_Aelec impl datum4" <> "" ALORS SAI_Vervangdata = "SAI_Aelec impl datum4"..ValeurAffichée SINON
        SI "SAI_Aelec impl datum5" <> "" ALORS SAI_Vervangdata = "SAI_Aelec impl datum5"..ValeurAffichée    
        FIN
        FIN
        FIN    
        // fin calcul vervangdata

Par contre J'ai un souci d'affichage :

Tout les champs ont comme masque de saisie JJ/MM/AAAA - valeur retournée AAAAMMJJ.

Tous s'affichent correctement sauf le champ calculé ? Pourquoi ?

[chapeau_melon]

tous saisie JJ/MM/AAAA et valeur JJMMAAAA
et calcul = définit par le projet / tel quel

[chapeau_melon]

Pour finir ce n'est pas résolu

Quand il n'y a une valeur dans 4 ou 5, le champs calculé ne se rempli pas ?

Pourquoi ?

BAV

[mogwai162]

Bonjour

Je me trompe ou SELON CAS c'est pour un champ en particulier ?

SELON CAS champ 1
CAS

et les autres champs ?

BAT

EN fait les 2 syntaxes sont possibles :

SELON CAS n

CAS 1
CAS 2

FIN

ou

SELON CAS

CAS a=b
CAS c=d

fin

J'ajouterai que oui des qu'un test devient un peu compliqué il faut abandonner les IF au profit de SELON, c'est beaucioup plus lisible.

N'oubliez jamais que le plus difficile n'est pas d'ecrire un programme mais de le modifier un an après quand vous ne vous souvenez plus de la manièfre dont il fonctionne

Bon Dév

[CaDegenere]

Et un truc du genre ?

Code :

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

1
2
3
4
5
 
 
POUR i = 5 A 1 PAS -1
SI {"SAI_PM_implantdatum" + i, indChamp} <> "" ALORS SAI_Vervangdata = {"SAI_PM_implantdatum" + i, indChamp}..ValeurAffichée
FIN

(je le fais en décroissant pour que tu ais à l'arrivée la première valeur renseignée...)

[chapeau_melon]

Code :

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

1
2
3
4
5
6
SELON Vrai
            CAS "SAI_Aelec impl datum3"..Valeur <> "" : SAI_Vervangdata = "SAI_Aelec impl datum3"..ValeurAffichée
            CAS "SAI_Aelec impl datum4"..Valeur <> "" : SAI_Vervangdata = "SAI_Aelec impl datum4"..ValeurAffichée
            CAS "SAI_Aelec impl datum5"..Valeur <> "" : SAI_Vervangdata = "SAI_Aelec impl datum5"..ValeurAffichée        
            AUTRE CAS
            SAI_Vervangdata..Valeur = ""

Je pense qu'il y avait aussi de souci de syntaxe genre ..valeur