[Firebird] TimeStamp Problem

[Chemiker]

Hallo,

ich habe jetzt eine Lösung gefunden. Ist wahrscheinlich nicht die eleganteste Methode, aber bringt das gewünschte Ergebnis.

Eigentlich ziemlich Aufwendig nur um den TimeStamp auseinander zu nehmen und anschließend ohne Sekunden-Anteil wieder zusammenzusetzen.



Mit:

SQL-Code:

select cast(EXTRACT (DAY FROM MW_DATUMUHRZEIT) ||'.'||
            EXTRACT (Month FROM MW_DATUMUHRZEIT)||'.'||
            EXTRACT (year from MW_DATUMUHRZEIT) ||' '||
            EXTRACT (hour from MW_DATUMUHRZEIT) ||':'||
            EXTRACT (minute from MW_DATUMUHRZEIT)as timeStamp) as DatumUhrzeit,
       SUM (IIF (MW_MSID = 'K01T1', MW_MW,0)) as K01T1,
       SUM (IIF (MW_MSID = 'K01D1', MW_MW,0)) as K01D1
From mw_tabelle
where (MW_DatumUhrZeit between '14.08.2009' and '15.08.2009')
group by DatumUhrzeit

In Delphi wird die Abfrage dann so zusammengesetzt:

Delphi-Quellcode:

{
********************************************************************************
 SQL-String für die Pivot-Tabelle in einer Stringlist zusammenstellen
********************************************************************************
}
procedure TAbtfrageClass.SQLPrivoString;
var
  I: Integer;
begin
  FSQLPivot.Clear;
  with FSQLPivot do
  begin
   { Select Anweisung alt ersetzt am 05.11.2009
    Add('SELECT MW_DATUMUHRZEIT, ');
    for I := 0 to FMSListe.Count-1 do
    begin
      Add('   SUM (IIF (MW_MSID = ');
      Add(''''+FMSListe[i]+'''');
      Add(', MW_MW,0)) AS ');
      Add(FMSListe[i]);
      if i < FMSListe.Count-1 then
      begin
        Add(',');
      end;
    end;
    Add('FROM mw_tabelle  ');
    Add('WHERE (MW_MSID LIKE '); // :aMSId
    Add('''%''');
    Add(')');
    Add(' AND (MW_DATUMUHRZEIT between ');
    Add(' :aStartDatum');
    Add(' AND ');
    Add(' :aEndeDatum)');
    Add(' group by MW_DATUMUHRZEIT');
   }
   // Am 04.11.2009 überarbeitete Abfrage nun jede Minute in eine Zeile
    Add('SELECT cast (EXTRACT (DAY FROM MW_DATUMUHRZEIT) ');
    Add('||');
    Add('''.''');
    Add('||');
    Add(' EXTRACT (Month FROM MW_DATUMUHRZEIT) ');
    Add('||');
    Add('''.''');
    Add('||');
    Add(' EXTRACT (year FROM MW_DATUMUHRZEIT) ');
    Add('||');
    Add(''' ''');
    Add('||');
    Add(' EXTRACT (hour FROM MW_DATUMUHRZEIT) ');
    Add('||');
    Add(''':''');
    Add('|| ');
    Add(' EXTRACT (minute FROM MW_DATUMUHRZEIT)');
    Add('as TimeStamp) as DatumUhrzeit, ');
    for I := 0 to FMSListe.Count-1 do
    begin
      Add('   SUM (IIF (MW_MSID = ');
      Add(''''+FMSListe[i]+'''');
      Add(', MW_MW,0)) AS ');
      Add(FMSListe[i]);
      if i < FMSListe.Count-1 then
      begin
        Add(',');
      end;
    end;
    Add('FROM mw_tabelle  ');
    Add('WHERE (MW_DATUMUHRZEIT between ');
    Add(' :aStartDatum');
    Add(' AND ');
    Add(' :aEndeDatum)');
    Add(' group by DatumUhrzeit');
  end;
end;

Ich habe jetzt zwar eine Lösung, aber es ist immer noch unklar wodurch das Problem entstanden ist.

Trotzdem danke an alle für die Tipps.

Bis bald Chemiker