passer des paramètres à une requete SQL

**hadaf** · 30/05/2013, 09h28

Baonjour à tous
comment passer des paramètre a cet requête sur la ligne en rouge et je veux ajouter d'autre.
ce que je veux c passer un "param1" sur (c1.clas) ce param est sur un (sais_clas) par c que mon fichier contient des élèves de tous niveaux (1.2.3.4.5...)
au lieux de copier cet requête sur tous les BTN il v mieux passer un param si c possible.
voilà ma requête:

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
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
LOCAL
	sMaRequete est une chaîne
	sdRQ1 est une Source de Données
	sdRQ2 est une Source de Données
	
	nNb_col est un entier
	nNo_lig est un entier
	
	Enregistrement est une chaîne
	//	bResExec est un booléen
	i est un entier
	
sMaRequete = [
SELECT
Round(TRUNC( ( MONTHS_BETWEEN(SYSDATE ,DatNss )/ 12) ),0) AS Age
FROM
C1
WHERE 
c1.situat NOT LIKE 'Q'
AND	c1.situat NOT LIKE 'D'
AND	c1.situat NOT LIKE 'N'
AND  	C1  NOT LIKE '%4%'
AND	c1.CLas = 9
GROUP by Age 
ORDER by Age DESC
]
// exécution de la requête 1
SI PAS HExécuteRequêteSQL(sdRQ1,sMaRequete) ALORS Erreur(HErreurInfo); RETOUR

sMaRequete = [
SELECT
TL,
]
POUR TOUT sdRQ1
	sMaRequete += RC + "_" + sdRQ1.Age + ","		
FIN
sMaRequete += [
Genre,
Categ
FROM
(
SELECT
Sum(Total) AS TL,
]	
POUR TOUT sdRQ1
	sMaRequete += RC + "			Sum(Age_" + sdRQ1.Age + ") AS  _" + sdRQ1.Age + ","		
FIN
sMaRequete += RC + [
Categ,	
Genre
FROM
(
SELECT 
Categ,	
Genre,
]	
POUR TOUT sdRQ1
	sMaRequete += RC + "	Sum(CASE Age WHEN " + sdRQ1.Age + " THEN Compt_age ELSE 0 END) AS Age_" + sdRQ1.Age + ","		
FIN
sMaRequete += RC + [
Sum(Compt_age) AS Total
FROM
(
SELECT
CASE C1
WHEN 1 THEN 'Nouveaux'
	WHEN 2 THEN 'Redoublants'
		WHEN 3 THEN 'Triplants'
		END AS Categ,
		Genre,
		TRUNC( ( MONTHS_BETWEEN(SYSDATE ,DatNss )/ 12) ) AS Age,
		Count(*) AS Compt_age
		FROM
		C1
		WHERE 
		c1.situat NOT LIKE 'Q'
		AND	c1.situat NOT LIKE 'D'
		AND	c1.situat NOT LIKE 'N'
		AND  C1  NOT LIKE '%4%'
		AND	c1.CLas = 9
		GROUP by Categ,Genre,Age
		) AS A
		GROUP by Categ,Genre
		UNION
		SELECT DISTINCT
		'Nouveaux' AS Categ,
		'G' AS Genre,
		]	
		POUR TOUT sdRQ1
			sMaRequete += RC + "					0 AS Age_" + sdRQ1.Age + ","		
		FIN
		sMaRequete += RC + [
		0 AS Total
		FROM
		C1
		UNION
		SELECT DISTINCT
		'Nouveaux' AS Categ,
		'F' AS Genre,
		]	
		POUR TOUT sdRQ1
			sMaRequete += RC + "					0 AS Age_" + sdRQ1.Age + ","		
		FIN
		sMaRequete += RC + [
		0 AS Total
		FROM
		C1	
		UNION
		SELECT DISTINCT
		'Redoublants' AS Categ,
		'F' AS Genre,
		]	
		POUR TOUT sdRQ1
			sMaRequete += RC + "					0 AS Age_" + sdRQ1.Age + ","		
		FIN
		sMaRequete += RC + [
		0 AS Total
		FROM
		C1	
		UNION
		SELECT DISTINCT
		'Redoublants' AS Categ,
		'G' AS Genre,
		]	
		POUR TOUT sdRQ1
			sMaRequete += RC + "					0 AS Age_" + sdRQ1.Age + ","		
		FIN
		sMaRequete += RC + [
		0 AS Total
		FROM
		C1	
		UNION
		SELECT DISTINCT
		'Triplants' AS Categ,
		'F' AS Genre,
		]	
		POUR TOUT sdRQ1
			sMaRequete += RC + "					0 AS Age_" + sdRQ1.Age + ","		
		FIN
		sMaRequete += RC + [
		0 AS Total
		FROM
		C1
		UNION
		SELECT DISTINCT
		'Triplants' AS Categ,
		'G' AS Genre,
		]	
		POUR TOUT sdRQ1
			sMaRequete += RC + "					0 AS Age_" + sdRQ1.Age + ","		
		FIN
		sMaRequete += RC + [
		0 AS Total
		FROM
		C1
		)
		GROUP by Categ,Genre
		)
		ORDER by Categ,Genre
		]
		
		// exécution de la requête 2
		SI PAS HExécuteRequêteSQL(sdRQ2,sMaRequete) ALORS Erreur(HErreurInfo); RETOUR
		// rempli la table
		ConstruitTableFichier(Table1,sdRQ2,taRemplirTable)
		//TableAffiche(Table1,taCourantEnreg)
		
		// ajout de la ligne total
		sMaRequete = [
		SELECT 
		Sum(Compt_age) AS TL,
		]	
		POUR TOUT sdRQ1
			sMaRequete += RC + "	Sum(CASE Age WHEN " + sdRQ1.Age + " THEN Compt_age ELSE 0 END) AS  _" + sdRQ1.Age + ","		
		FIN
		sMaRequete += RC + [
		Genre2 AS Genre,
		Categ
		FROM
		(
		SELECT
		'TOTAL' AS Categ,
		'' AS Genre2,
		TRUNC( ( MONTHS_BETWEEN(SYSDATE ,DatNss )/ 12) ) AS Age,
		Count(*) AS Compt_age
		FROM
		C1
		WHERE 
		c1.situat NOT LIKE 'Q'
		AND	c1.situat NOT LIKE 'D'
		AND	c1.situat NOT LIKE 'N'
		AND  C1  NOT LIKE '%4%'
		AND	c1.CLas = 9
		GROUP by Categ,Genre2,Age
		) AS A
		GROUP by Categ,Genre
		]
		
		// exécution de la requête ligne Total
		SI PAS HExécuteRequêteSQL(sdRQ2,sMaRequete) ALORS Erreur(HErreurInfo); RETOUR
		
		TableAjouteLigne(Table1)
		nNo_lig = TableOccurrence(Table1)
		nNb_col = TableOccurrence(Table1,toColonne)
		Enregistrement = HRécupèreEnregistrement(sdRQ2)
		POUR i = 1 A nNb_col
			Table1[nNo_lig,i] = ExtraitChaîne(Enregistrement, i)
			
			{"TABLE1._COL"+i}..CadrageHorizontal=chCentre
			{"TABLE1._COL"+i}..Triable =Faux
			
FIN

**tatayo** · 30/05/2013, 09h50

Bonjour,
Avec Remplace(), ou ChaineConstruit(), par exemple.

Tatayo.

**michel.souris** · 30/05/2013, 10h04

Bonjour,

Tu peux également utiliser les requêtes paramétrées Windeviennes qui sont relativement pratiques (autocomplétion, réutilisabilité, construction dynamique de la clause WHERE en fonction du nombre de paramètre...)

**laurent30s** · 30/05/2013, 10h44

Pas sur d'avoir compris ta demande, mais si c'est de pouvoir extraire plusieurs C1.Clas en même temps

Par exemple pour les Clas 9,10 et 11

Code :

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

AND	c1.CLas IN (9,10,11)

**hadaf** · 30/05/2013, 11h04

merci à vous
Mr laurent30s Bonjour
entre parenthèse(j t envoyé un msg prv concernant un lien que tu ma envoyé pttr expirer)

-ce que je veux c passer un "param1" sur (c1.clas) ce param est sur un (sais_clas) par c que mon fichier contient des élèves de tous niveaux (1.2.3.4.5...)
au lieux de copier cet requête sur tous les BTN il v mieux passer un param si c possible.

**Nicolas_Jeanneau** · 30/05/2013, 12h19

Bonjour,

tout simplement en utilisant des + lors de la construction de la chaine :

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
[
SELECT
Round(TRUNC( ( MONTHS_BETWEEN(SYSDATE ,DatNss )/ 12) ),0) AS Age
FROM
C1
WHERE 
c1.situat NOT LIKE 'Q'
AND	c1.situat NOT LIKE 'D'
AND	c1.situat NOT LIKE 'N'
AND  	C1  NOT LIKE '%4%'
AND	c1.CLas = 
]
+ sais_clas +
[
GROUP by Age 
ORDER by Age DESC
]

passer des paramètres à une requete SQL [WD17]

WinDev

Vue hybride

Discussions similaires

Partager

Partager