Requête comportant deux fois la même rubrique dont les paramètres diffères

**djenny** · 17/12/2013, 10h59

Salut à tous!
Les codes ci-dessous me crée une requête dont la structure est la suivante:

Num_compte------Lib_compte-----Mont_prévision-----Réal(USD)-----Mont_prévision

La colonne Réal(USD) est la somme des Mont de la table OPÉRATION tandis que Mont_prévision sont enregistrements de la table PRÉVISION. Cette requête est paramétrée (Année) et dépend du type opération choisi.
Les colonnes 3 et 4 me permettent d'évaluer la prévision par rapport à la réalisation (année qui s'achève), tandis que la colonne 5 me donne la prévision de l'année qui commence d'où le Paramètre pour la colonne 5 sera d'office Supérieur à ceux des colonnes 3 et 4. pour mieux dire le paramètre qu'on va entrer dans le champ de saisie SAI_Saisie1 sera le paramètre pour la colonne 5 mais pour les colonnes 3 et 4 ça doit etre la valeur de SAI_Saisie1 - 1.
Voici mes codes:

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
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
sMa_requete est une chaîne
sdRQ1 est une Source de Données
 
sMa_requete = [
SELECT
A.Num_compte,
A.Lib_compte,
PREVISION.Mont_prévision,
A.TOT,
PREVISION.Mont_prévision
FROM
(
SELECT  
op.Num_compte,
COMPTE.Lib_compte,
Sum(op.TOT) AS TOT
FROM
(
SELECT  
OPERATION.Num_compte,
OPERATION.Cod_devise,
OPERATION.mont,
Taux_USD,
DEVISE.Taux,
OPERATION.mont * Taux_USD / DEVISE.Taux AS TOT
FROM 
OPERATION,
DEVISE,
(	SELECT	Taux AS Taux_USD
FROM		DEVISE
WHERE	Cod_devise = 'USD'
) AS	USD
WHERE 
OPERATION.Cod_devise = DEVISE.Cod_devise
]
sMa_requete += RC + "				AND	Left(OPERATION.Dat_operation,4) = '" +  SAI_Saisie1 + "'"
SI COMBO_Opération..ValeurAffichée <> "" ALORS
	sMa_requete += RC + "				AND	OPERATION.Typ_operation = '" + COMBO_Opération..ValeurAffichée + "'"		
FIN
sMa_requete += RC + [
) AS op,
COMPTE
WHERE 
op.Num_compte = COMPTE.Num_compte
GROUP by Num_compte,Lib_compte
) AS A,
PREVISION
WHERE
A.Num_compte = PREVISION.Num_compte
]
sMa_requete += RC + "AND	PREVISION.Année = '" +  SAI_Saisie1 + "'"
 
// copie sMa_requete vers le presse papier pour le debogage
Res est un entier
Res = VersPressePapier(sMa_requete)
SI Res = Faux ALORS
	Erreur("Erreur lors de l'écriture dans le presse-papiers")
FIN
 
 
// Exécution de la requête
SI PAS HExécuteRequêteSQL(sdRQ1,MaConnexion1,hRequêteSansCorrection,sMa_requete) ALORS Erreur("Problème requête"); RETOUR
 
// remplit la table TCD
ConstruitTableFichier(TABLE_TCD_operation_periode,sdRQ1,taRemplirTable)
 
 
// renomme les colonnes
{"TABLE_TCD_operation_periode._COL1",indChamp}..Titre = "N° compte"
{"TABLE_TCD_operation_periode._COL2",indChamp}..Titre = "Libéllé compte"
{"TABLE_TCD_operation_periode._COL3",indChamp}..Titre = "Prévision avant"
{"TABLE_TCD_operation_periode._COL4",indChamp}..Titre = "Realisation"
{"TABLE_TCD_operation_periode._COL5",indChamp}..Titre = "Prévision prochaine"
 
 
nNb_ligne est un entier
TableAjouteLigne(TABLE_TCD_operation_periode)
nNb_ligne = TableOccurrence(TABLE_TCD_operation_periode)
 
{"TABLE_TCD_operation_periode._COL1",indChamp}[nNb_ligne] = "TOTAUX"
{"TABLE_TCD_operation_periode._COL3",indChamp}[nNb_ligne] = {"TABLE_TCD_operation_periode._COL3",indChamp}[ligneTotal]
{"TABLE_TCD_operation_periode._COL4",indChamp}[nNb_ligne] = {"TABLE_TCD_operation_periode._COL4",indChamp}[ligneTotal]
{"TABLE_TCD_operation_periode._COL5",indChamp}[nNb_ligne] = {"TABLE_TCD_operation_periode._COL5",indChamp}[ligneTotal]
 
 
{"TABLE_TCD_operation_periode",indChamp}[nNb_ligne]..CouleurFond = GrisFoncé

Dans ce code les paramètres sont les mêmes pour tous!

Pour plus de détails j'ai joint mon analyse et mon analyse et le résultat la requête.
Merci d'avance!

**tatayo** · 17/12/2013, 11h13

Bonjour,
Si je comprends bien, les deux colonne Mont_prévision récupèrent des données de la table PREVISION, mais selon des critères différents.
Si c'est bien le cas, il faut faire apparaître la table PREVISION deux fois dans la requête, en utilisant deux alias différents.

Tatayo.

P.S. j'ai du mal à voir l'utilité des sous-requêtes, surtout celle concernant la table DEVISE. Une simple jointure sera suffisante.

**laurent30s** · 17/12/2013, 14h42

Il te faut faire une jointure entre le résultat de 2 requêtes
- la 1ère va récupérer les comptes, les opérations et les prévisions de l'année N
- la 2ème les prévisions de l'année N+1

Dans le code ci-dessous j'ai fait une jointure externe gauche (LEFT OUTER JOIN).
Ce type de jointure permet que même si la prévision de l'année N+1 n'est pas saisie pour un compte, la ligne du compte est quand même affichée (si elle a eu des opérations).
Si on fait une jointure interne (INNER JOIN) ou si on place la condition de jointure dans le WHERE seulement les lignes des comptes qui ont une prévision N+1 seront affichées.

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
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
sMa_requete est une chaîne
sdRQ1 est une Source de Données
 
sMa_requete = [
SELECT
	B.Num_compte,
	B.Lib_compte,
	B.Mont_prévision,
	B.TOT,
	C.Mont_prévision AS Mont_prévision2
FROM
	(
		SELECT
			A.Num_compte,
			A.Lib_compte,
			PREVISION.Mont_prévision,
			A.TOT
		FROM
			(
				SELECT  
					op.Num_compte,
					COMPTE.Lib_compte,
					Sum(op.TOT) AS TOT
				FROM
					(
						SELECT  
							OPERATION.Num_compte,
							OPERATION.Cod_devise,
							OPERATION.mont,
							Taux_USD,
							DEVISE.Taux,
							OPERATION.mont * Taux_USD / DEVISE.Taux AS TOT
						FROM 
							OPERATION,
							DEVISE,
							(	SELECT	Taux AS Taux_USD
								FROM		DEVISE
								WHERE	Cod_devise = 'USD'
							) AS	USD
						WHERE 
							OPERATION.Cod_devise = DEVISE.Cod_devise
]
sMa_requete += RC + "						AND	Left(OPERATION.Dat_operation,4) = '" +  (Val(SAI_Annee) - 1) + "'"
SI COMBO_Opération..ValeurAffichée <> "" ALORS
	sMa_requete += RC + "						AND	OPERATION.Typ_operation = '" + COMBO_Opération..ValeurAffichée + "'"		
FIN
sMa_requete += RC + [
					) AS op,
					COMPTE
				WHERE 
					op.Num_compte = COMPTE.Num_compte
				GROUP by Num_compte,Lib_compte
			) AS A,
			PREVISION
		WHERE
			A.Num_compte = PREVISION.Num_compte
]
sMa_requete += RC + "		AND	PREVISION.Année = '" +  (Val(SAI_Annee) - 1) + "'"
 
sMa_requete += RC + [
	) AS B
	Left OUTER JOIN
	(	SELECT	*
		FROM	PREVISION
]
sMa_requete += RC + "		WHERE	PREVISION.Année = '" +  SAI_Annee + "'"
sMa_requete += RC + [
	) AS C
		ON	B.Num_compte = C.Num_compte
]
 
 
 
// copie sMa_requete vers le presse papier pour le debogage
Res est un entier
Res = VersPressePapier(sMa_requete)
SI Res = Faux ALORS
	Erreur("Erreur lors de l'écriture dans le presse-papiers")
FIN
 
 
// Exécution de la requête
SI PAS HExécuteRequêteSQL(sdRQ1,MaConnexion1,hRequêteSansCorrection,sMa_requete) ALORS Erreur("Problème requête"); RETOUR
 
// remplit la table TCD
ConstruitTableFichier(TABLE_TCD_operation_periode,sdRQ1,taRemplirTable)
 
 
// renomme les colonnes
{"TABLE_TCD_operation_periode._COL1",indChamp}..Titre = "N° compte"
{"TABLE_TCD_operation_periode._COL2",indChamp}..Titre = "Libéllé compte"
{"TABLE_TCD_operation_periode._COL3",indChamp}..Titre = "Prévision avant"
{"TABLE_TCD_operation_periode._COL4",indChamp}..Titre = "Realisation"
{"TABLE_TCD_operation_periode._COL5",indChamp}..Titre = "Prévision prochaine"

**djenny** · 17/12/2013, 15h43

C'est génial Laurent!
Grand merci à toi!
C'est exactement ce que je voulais!

Encore une fois de plus tu as été disposé à répondre aux préoccupations des autres!
Plein succès à toutes tes entreprises!

**djenny** · 17/12/2013, 15h46

Merci à toi également tatayo pour avoir réagir à ma discussion!
C'est très gentil!

Requête comportant deux fois la même rubrique dont les paramètres diffères [WD15]

WinDev

Discussions similaires

Partager

Partager