Paramètres dans la requête avec la clause in?

Pour qui jamais s'est toujours intéressée. Je l'ai fait dans Firebird 2.5 à l'aide d'une autre procédure stockée inspiré par ce post.

Comment diviser séparées par des virgules chaîne à l'intérieur d'une procédure stockée?

CREATE OR ALTER PROCEDURE SPLIT_STRING (
    ainput varchar(8192))
RETURNS (
    result varchar(255))
AS
DECLARE variable lastpos integer;
DECLARE variable nextpos integer;
DECLARE variable tempstr varchar(8192);
BEGIN
  AINPUT = :AINPUT || ',';
  LASTPOS = 1;
  NEXTPOS = position(',', :AINPUT, LASTPOS);
  WHILE (:NEXTPOS > 1) do
  BEGIN
    TEMPSTR = substring(:AINPUT from :LASTPOS for :NEXTPOS - :LASTPOS);

    RESULT = :TEMPSTR;
    LASTPOS = :NEXTPOS + 1;
    NEXTPOS = position(',', :AINPUT, LASTPOS);
    suspend;
  END

END

Lorsque vous passez le PS, la liste suivante

CommaSeperatedList = 1,2,3,4

et appel

SELECT * FROM SPLIT_STRING(:CommaSeperatedList)

le résultat sera :

RESULT
1
2
3
4

Et peut être utilisé comme suit:

SELECT * FROM MyTable where MyKeyField in ( SELECT * FROM SPLIT_STRING(:CommaSeperatedList) )

Je ne pense pas que c'est quelque chose qui peut être fait. Il y a aucune raison particulière pour laquelle vous ne voulez pas construire la requête, vous-même?

J'ai utilisé cette méthode une couple de fois, il n'utilise pas les paramètres. Il utilise une stringlist et c'est bien DelimitedText. Vous créez un IDList et de le remplir avec vos Identifiants.

Query.SQL.Add(Format('MT_ID IN (%s)', [IDList.DelimitedText]));

Paramètres sont des espaces réservés pour des valeurs uniques, ce qui signifie qu'une clause qui accepte une liste délimitée par des virgules de valeurs, ne peut pas être utilisé avec des paramètres.

Pensez-y de cette façon: chaque fois que je place une valeur, je peux utiliser un paramètre.

Donc, dans une clause comme: (: param)

Je peux lier la variable à une valeur, mais seulement 1 valeur, par exemple: (4)

Maintenant, si vous considérez qu'une "clause de la valeur de l'expression", vous obtenez une chaîne de valeurs: (1, 4, 6) -> c'est 3 les valeurs par des virgules entre eux. Cela fait partie de la chaîne SQL, ne fait pas partie de la valeur, ce qui est pourquoi il ne peut être lié par un paramètre.

Évidemment, ce n'est pas ce que vous voulez, mais c'est la seule chose possible avec des paramètres.

SELECT * FROM MATABLE
OÙ MT_ID (:MYPARAM) au lieu d'utiliser MYPARAM avec :, utiliser le paramètre nom.

comme SELECT * from MATABLE
OÙ MT_ID DANS (SÉLECTIONNEZ REGEXP_SUBSTR(**MYPARAM,'[^,]+', 1, NIVEAU)
DE DOUBLE
SE CONNECTER PAR REGEXP_SUBSTR(MYPARAM, '[^,]+', 1, NIVEAU) N'EST PAS NULL))**

MYPARAM- '368134,181956'

Ici est une technique que j'ai utilisé dans le passé pour obtenir autour de cette 'DANS' énoncé de problème. Il construit un " OU " liste en fonction de la quantité de valeurs spécifié avec des paramètres (unique). Ensuite, tout ce que j'avais à faire était d'ajouter les paramètres dans l'ordre où elles apparaissent dans la liste de valeurs.

var  
  FilterValues: TStringList;
  i: Integer;
  FilterList: String;
  Values: String;
  FieldName: String;
begin
  Query.SQL.Text := 'SELECT * FROM table WHERE '; //set base sql
  FieldName := 'some_id'; //field to filter on
  Values := '1,4,97'; //list of supplied values in delimited format
  FilterList := '';
  FilterValues := TStringList.Create; //will get the supplied values so we can loop
  try
    FilterValues.CommaText := Values;

    for i := 0 to FilterValues.Count - 1 do
    begin
      if FilterList = '' then
        FilterList := Format('%s=:param%u', [FieldName, i]) //build the filter list
      else
        FilterList := Format('%s OR %s=:param%u', [FilterList, FieldName, i]); //and an OR
    end;
    Query.SQL.Text := Query.SQL.Text + FilterList; //append the OR list to the base sql

    //ShowMessage(FilterList); //see what the list looks like. 
    if Query.ParamCount <> FilterValues.Count then
      raise Exception.Create('Param count and Value count differs.'); //check to make sure the supplied values have parameters built for them

    for i := 0 to FilterValues.Count - 1 do
    begin
      Query.Params[i].Value := FilterValues[i]; //now add the values
    end;

    Query.Open;  
finally
  FilterValues.Free;  
end;

Espère que cette aide.

CREATE PROCEDURE TRY_LIST (PARAM_LIST VARCHAR(255)) RETURNS (FIELD1....) 
AS 
BEGIN
 /* Check if :PARAM_LIST begins with colon "," and ands with colon "," 
    the list should look like this --> eg. **",1,3,4,66,778,33,"**          
    if the format of list is right then GO if not just add then colons
 */
 IF (NOT SUBSTRING(:PARAM_LIST FROM 1 FOR 1)=',') THEN PARAM_LIST=','||PARAM_LIST;
 IF (NOT SUBSTRING(:PARAM_LIST FROM CHAR_LENGTH(:PARAM_LIST) FOR 1)=',') THEN PARAM_LIST=PARAM_LIST||',';

/* Now you are shure thet :PARAM_LIST format is correct */
/ * NOW ! */
FOR SELECT * FROM MY_TABLE WHERE POSITION(','||MY_FIELD||',' in :PARAM_LIST)>0 
INTO :FIELD1, :FIELD2 etc... DO
BEGIN
  SUSPEND;
END

END

How to use it.

SELECT * FROM TRY_LIST('3,4,544,87,66,23')
or SELECT * FROM TRY_LIST(',3,4,544,87,66,23,') 
if the list have to be longer then 255 characters then just change the part of header f.eg. like PARAM_LIST VARCHAR(4000)