Discussion :

[freud]

Bonsoir à tous,

La requête suivante s’exécute sans problème mais sans qu'elle ne me renvoie des enregistrements pourtant bien existants.

Code :

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

1
2
3
4
5
6
 
Qry.SQL.Clear;
Qry.SQL.Text:='SELECT * FROM VW_STOCK_CONTROL_ENTREE WHERE (DATE_ENTREE BETWEEN :FROM_DATE AND :TO_DATE)';
Qry.Params.ByNameAsDateTime['FROM_DATE']:= edFrom.Date;
Qry.Params.ByNameAsDateTime['TO_DATE']:= edTO.Date;
Qry.Open

Je soupçonne qu'il faut donner le bon format de date pour Firebird mais ne sais quel est le bon. Les champs du between sont de type date.
J'utilise Firebird et UIB. Ou bien y-a-t-il S.V.P. une autre façon de construire cette requête ? En vous remerciant de votre aide.

[freud]

Le problème est résolu . C'etait une affaire de format de date :

Code :

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

1
2
3
4
5
6
 
Qry.SQL.Clear;
Qry.SQL.Text:='SELECT * FROM VW_STOCK_CONTROL_ENTREE WHERE (DATE_ENTREE BETWEEN '+QuotedStr(FormatDateTime('mm/dd/yyyy',edFrom.Date))+' AND '+QuotedStr(FormatDateTime('mm/dd/yyyy',edTO.Date))+')' ;
Qry.Params.ByNameAsDateTime['FROM_DATE']:= edFrom.Date;
Qry.Params.ByNameAsDateTime['TO_DATE']:= edTO.Date;
Qry.Open

[alheuredudejeuner]

sauf que

Code :

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

1
2
Qry.Params.ByNameAsDateTime['FROM_DATE']:= edFrom.Date;
Qry.Params.ByNameAsDateTime['TO_DATE']:= edTO.Date;

Ne sert plus à rien, et tu risques une injection sql.

Code :

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

1
2
Qry.Params.ByNameAsDateTime['FROM_DATE']:= Trunc(edFrom.Date);
Qry.Params.ByNameAsDateTime['TO_DATE']:=Trunc(edTO.Date);

sur ta première solution aurait été mieux

cordialement

[SergioMaster]

Je soupçonne qu'il faut donner le bon format de date pour Firebird mais ne sais quel est le bon. Les champs du between sont de type date
j'utilise Firebird et UIB. Ou bien y-a-t-il S.V.P. une autre façon de construire cette requête.

Pour le soupçon, ce n'est pas Firebird le coupable, plutôt peut-être UIB qui transformerait mal la date avec son Param.ByNameAsDateTime['FROM_DATE'] mais j'ai quand même un doute.
j'utilise régulièrement les BETWEEN entre deux dates avec Firebird et des requêtes paramétrées et n'ai jamais eu ce problème, évidemment cela fait un moment que je n'ai plus utilisé UIB !
une remarque cependant, si la colonne est de type date pourquoi utilisé un ByNameAsDateTime alors que à ma connaissance il existe un ByNameAsDate ?
(retrouvé dans uibcodegen.pas ligne 77 et +)

[freud]

Bonjour tout le monde,

Ne sert plus à rien, et tu risques une injection sql.

Non je n'ai pas utiliser les paramétres j'ai juste fait un copier/coller depuis mon 1ere post en insérant les formats dates en oubliant de supprimer le reste

une remarque cependant, si la colonne est de type date pourquoi utilisé un ByNameAsDateTime alors que à ma connaissance il existe un ByNameAsDate ?

Parce que ca me donne ceci à la compilation avec le ByNameAsDate :

Code :

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

1
2
3
 
[Error] UControlStock.pas(250): Incompatible types: 'Integer' and 'TDateTime'
[Error] UControlStock.pas(251): Incompatible types: 'Integer' and 'TDateTime'

Merci à vous

[freud]

Pardon alheuredudejeuner, j'avais mal compris j'ai pas vu le Trunc de date en effet c'est bon pour la 1ere solution qui règle le problème et en plus avec le ByNameAsDate

Code :

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

1
2
3
4
5
6
 
Qry.SQL.Clear;
Qry.SQL.Text:='SELECT * FROM VW_STOCK_CONTROL_ENTREE WHERE (DATE_ENTREE BETWEEN :FROM_DATE AND :TO_DATE)';
Qry.Params.ByNameAsDate['FROM_DATE']:= Trunc(edFrom.Date);
Qry.Params.ByNameAsDate['TO_DATE']:=Trunc(edTO.Date);
Qry.Open

Merci alheuredudejeuner

[freud]

Bonjour,

Je reviens à ce topic pour une petite question si vous permettez.
Y a t-il une différence importante en vitesse d’exécution entre ces deux requêtes sachant que c'est un SELECT depuis une vue créee dans une BDD ?

Code :

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

1
2
3
4
 
Qry.SQL.Text:='SELECT * FROM VW_STOCK_CONTROL_ENTREE WHERE (DATE_ENTREE BETWEEN :FROM_DATE AND :TO_DATE)';
Qry.Params.ByNameAsDateTime['FROM_DATE']:= Trunc(edFrom.Date);
Qry.Params.ByNameAsDateTime['TO_DATE']:=Trunc(edTO.Date);

Code :

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

1
2
 
Qry.SQL.Text:='SELECT * FROM VW_STOCK_CONTROL_ENTREE WHERE (DATE_ENTREE BETWEEN '+QuotedStr(FormatDateTime('mm/dd/yyyy',edFrom.Date))+' AND '+QuotedStr(FormatDateTime('mm/dd/yyyy',edTO.Date))+')' ;

En vous remerciant.

[alheuredudejeuner]

bonjour

pour mesurer le temps sur des temps très cours,
j'exécute 1000, 10000 ou plus de fois le nombre de requêtes.
Je relève le temps alors mesurable et je compare.

Je reproduit plusieurs fois les mesures et je fais une moyenne quand la base est encours d'exécution, les résultats peuvent être faussé par une grosse requête sur la base ou un OS ralenti pour tout autre chose.

Cordialement.

[freud]

Non dans mon cas il ne s'agit pas de tester de grosses ou de petites requetes juste savoir la différence de l'utilisation des paramètres :FROM_DATE et QuotedStr(FormatDateTime('mm/dd/yyyy',edFrom.Date)) dans la requête. Je veux dire si cette différence d'ecriture des paramètres affecte le plan d'execution des requetes sur le serveur. Merci.

[alheuredudejeuner]

Bonjour,

Pour la sécurité, il faut mieux faire des requêtes avec paramètres ( je radote ), même si faire de l'injection SQL dans un between ne me vient pas à l'esprit.

Pour le temps d'exécution, je ne sais pas, et quand je ne sais pas je teste. ( Ca évite les préjugés ).

Cordialement

André

[freud]

Merci alheuredudejeuner,
Je modifie le post pour précisez que je dois recourir à cette méthode de l'injection et pas dans toutes les situations sauf dans cette requete paramétrer qui ne marche pas pour moi:

Code :

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

1
2
3
4
5
6
 
V1:='SELECT FIRST :NBROW * FROM VW_LIVRAISION_FOURNISSEUR WHERE (LIVRAISON_ID>= :NextRow AND LIVRAISON_ID<=:NextRow';
Qry.SQL.Text:=V1;
Qry.Params.ByNameAsInteger['NBROW']:=NbRow;
Qry.Params.ByNameAsInteger['NEXTROW']:=NextRow;
Qry.Params.ByNameAsInteger['ENDROW']:=EndRow;

Au début ca marche mais lorsque je demande l'enregistrement suivant ca ne marche pas. Par contre, avec l'injection avec le code suivant ca marche.

Code :

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

1
2
3
 
V1:='SELECT FIRST '+IntToStr(NBROW)+' * FROM VW_LIVRAISION_FOURNISSEUR WHERE (LIVRAISON_ID>='+IntToStr(NextRow)+ ' AND LIVRAISON_ID<='+IntToStr(EndRow)+')';
Qry.SQL.Text:=V1;

C'est une chaine SQL que je constuit suivant des critères de recherches et à la fin je rajoute le tri ASC/DESC selon le choix.