Discussion :

[PhilLU]

Bonjour,
je sèche sur la syntaxe de WHERE imbriqués dans une requête Delphi
Je dois mettre un champ 'Flag' à '-2SD' dans la table QC_Res_Temp
quand la valeur du champ de cette même table est inférieure à la valeur MEAN de la table QC_Val
de l'enregistrement dont le champ TEST est égal à PLT
et le champ QCLot est égal à 40971102
dont voici le

Code :

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

1
2
3
4
5
6
7
8
 Query2.Active:=False;
               Query2.SQL.Clear;
               Query2.SQL.Text:='UPDATE QC_Res_temp SET FLAG= '+quotedStr('-2SD') +
               ' WHERE RESULT < '  +
               ' SELECT (QC_VAl.MEAN' +
               ' WHERE TEST = PLT'+
               ' AND QCLOT = 40971102)';
               Query2.ExecSQL();

Qui a une idée???

d'avance

[punkoff]

bonjour,


et quel est le probleme ?

[PhilLU]

Bonjour Punkoff et merci pour ta réponse!
En fait après de nombreuses tentatives pour imbriquer deux Query et deux WHERE ce

Code :

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

1
2
3
4
5
6
7
8
9
 
UPDATE QC_RES_TEMP
SET FLAG='-2SD'
WHERE RESULT < (SELECT MEAN
-2* ETCALC FROM QC_VAL
WHERE TEST='PLT'
AND QCLOT='40971102'
) AND QC_RES_TEMP.TEST='PLT'
AND QC_RES_TEMP.QC_LOT='40971102'

fonctionne
et celui-ci (Delphi)

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
 
 for i:=1 to Query.FieldByName('nombre').AsInteger-1 do
        begin
                Query.Active:=False;
                Query.SQL.Clear;
                Query.SQL.Add('SELECT Test, Result, QC_Lot, Flag FROM qc_res_temp LIMIT '+(intToStr(i))+',1');
                Query.Active:=true;
                testtemp:=Query.FieldByName('test').AsString;
                QC_lottemp:=Query.FieldByName('QC_Lot').AsString ;
 
                Query2.Active:=False;
                Query2.SQL.Clear;
                Query2.SQL.Text:='UPDATE QC_RES_TEMP' +
                ' SET FLAG= '+quotedStr('-2SD') +
                ' WHERE RESULT < (SELECT MEAN -2* ETCALC' +
                ' FROM QC_VAL' +
                ' WHERE TEST=' +quotedStr(testtemp)+
                ' AND QCLOT='+quotedStr(QC_lottemp)+
                ' ) AND QC_RES_TEMP.TEST=' +quotedStr(testtemp)+
                ' AND QC_RES_TEMP.QC_LOT='+quotedStr(QC_lottemp);
                Query2.ExecSQL();
           end;

aussi
J'ai sué sur l'imbrication et la ponctuation
Merci pour ton aide
A+