Discussion :

[Zatoobux]

Bonjour,

Est-il possible d'utiliser array DML dans une requête "select" par exemple avec l'opérateur "IN" :

Code :

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

1
2
3
4
5
6
7
8
9
 
  FDQuery1.SQL.Add('select * ');
  FDQuery1.SQL.Add('from maTable');
  FDQuery1.SQL.Add('where mon_id in (:p)');
  FDQuery1.Params.ArraySize := 3;
  FDQuery1.params[0].AsStrings[0] := '1';
  FDQuery1.params[0].AsStrings[1] := '3';
  FDQuery1.params[0].AsStrings[2] := '6';
  Open;

Avec MS SQL ça ne retourne pas d'erreur... mais pas de données non plus !

Pour le SGBD, nous utilisons indifféremment mySQL, MS-SQL et Oracle.

Merci d'avance

[Paul TOTH]

non ce n'est pas possible

[solilog]

Bonsoir,
Vous pouvez aussi faire une proc qui reçoit un tableau de valeurs et crée la requête SQL, par 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
procedure tForm2.MySelectArray(ArrValues: array of string);
var vSql : string;
    i : integer;
begin
  vSql := 'select * from DEFOPE where DOCOD2 in (';
  for i := Low(ArrValues) to High(ArrValues) do
  begin
    vSql := vSql + '''' + ArrValues[i] + '''';
    if i<High(ArrValues) then vSql := vSql + ',';
  end;
  vSql := vSql + ')';
  FDQuery1.SQL.Text := vSql;
  // FDQuery1.params[0].AsString := Values;
  FDQuery1.Open;
end;
 
procedure TForm2.Button1Click(Sender: TObject);
begin
  MySelectArray(['DON','FAC']);
end;

solilog

[Zatoobux]

non ce n'est pas possible

Merci

Bonsoir,
Vous pouvez aussi faire une proc qui reçoit un tableau de valeurs et crée la requête SQL, par exemple:

Code :

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

1
2
3
4
procedure tForm2.MySelectArray(ArrValues: array of string);
...
    vSql := vSql + '''' + ArrValues[i] + '''';
...

solilog

Merci, un avantage des paramètre est de très peu se préoccuper du type de données et de la syntaxe SQL, par exemple les guillemets dans ton exemple.

[SergioMaster]

non ce n'est pas possible

Les array DML ne semblent être que pour les clauses Insert, Update et, peut-être, Delete, en gros toute requête ne retournant pas de données

[Zatoobux]

On s'en passera, c’était pour le confort.

Merci.