Discussion :

[forzaxelah]

En effet, imaginez qu'une personne veuille calculer le cout sur un an!
Selon mon calcul, il faut donc modifier le champ "période_LCC" or celui-ci est dans la table Param_LCC...
Ce que je voudrais c'est insérer une variable dans le calcul afin que celui-ci prenne une valeur comprise entre [0;Periode_LCC];

J'essaye cela:

Code :

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

1
2
3
4
5
6
7
8
9
SELECT Module_N6,Pas_nominal,Periode_LCC,Nom_Pas_FK1,Nb_Km_Annuel,MOE_CostHour,Operation_M,Prix,
       Duree_Operation,Nb_MOE,Cout_Conso,X As Integer,
(Periode_LCC-->X *Nb_Km_Annuel/Pas_nominal)*(Duree_Operation*MOE_CostHour*Nb_MOE+Cout_Conso + Prix) As Cout_Total
FROM Arbo A
   FULL OUTER JOIN Param_LCC L       ON L.ID_Engin_FK1 = A.ID_Engin_FK3
   FULL OUTER JOIN ID_M M            ON M.Nom_Pas = A.Nom_Pas_FK1
WHERE Nom_Pas = 'GVG1'
AND Module_N4 = 'MODULE PANTOGRAPHE CONTINU 1,5 KV';

Sous delphi, on aurait:

Code :

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

X := StrToInt(Edit1.text);

Mais je suppose que c'est faux car il manque quelque chose....

Comment faire????

[forzaxelah]

Je pense avoir trouvé:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
T_expl := StrToInt(MPChoixAn_Edit.Text);
close;
Clear;
SQL.Add('SELECT Module_N6,Pas_nominal,Periode_LCC,Nom_Pas_FK1,Nb_Km_Annuel,MOE_CostHour,                           ');
SQL.Add('       Operation_M,Prix,Duree_Operation,Nb_MOE,Cout_Conso,'+ QuotedStr(T_expl)+' As Integer,                                   ');
SQL.Add('       ('+ QuotedStr(T_expl)+'*Nb_Km_Annuel/Pas_nominal)*(Duree_Operation*MOE_CostHour*Nb_MOE+Cout_Conso + Prix) As Cout_Total ');
SQL.Add('FROM Arbo A                                                                                               ');
SQL.Add('   FULL OUTER JOIN Param_LCC L       ON L.ID_Engin_FK1 = A.ID_Engin_FK3                                   ');
SQL.Add('   FULL OUTER JOIN ID_M M            ON M.Nom_Pas = A.Nom_Pas_FK1                                         ');
SQL.Add('WHERE Niveau_M <> '0'                                                                                     ');
SQL.Add('AND concat('+QuotedStr(Module_N)+','+QuotedStr(inttostr (SelectedLevel))+') = ' + QuotedStr(SelectedModule) );
F

[qi130]

Presque....


Sauf tu n'insères pas une variable pour "nourrir" la requète, tu cherches à récupérer quelque chose après exécution.

Il faut t'intéresser à FiedByName('zzz').AsInteger ou zzz est

• soit une colonne d'une table (select zzz from)
• soit une substitution (select count(*) as zzz)

lors de l'exploitation du résultat du query

A ne pas confondre avec l'utilisation de paramètre

Code :

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

select zzz from latable where colonne= :P1

suivi de

Code :

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

MonQuery.ParamByName('P1').AsInteger:=MonEntier;