Gibt es ein gegenstück zum SQL BEFEHL EXTRACT? IB6.0

CenBells · Beiträge: 1547 Win 7 Delphi XE5 Pro

Hallo Leute,

ich habe ein großes Problem. Ich habe eine Stored Procedure (A), die ein start und ein enddatum als PArameter benötigt. Diese Funktion liefert immer alle daten aus einem monat.
Nun soll aber eine Statistik daten von mehreren Monaten in einem Chart anzeigen. JEtzt möchte ich das ganze in eine weitere Stored Procedure (B)kapseln.
Das heißt, ICh übergebe B das anfangsdatum eines Quartals und das enddatum eines Quartal, möchte aber immer nur die daten eines Monats für die drei Monate zurückgeliefert bekommen. (Geht über suspend in while schleife).
Also, nehm ich das ANfangsdatum und zähle in jedem durchlauf einen Monat hoch, aber wie zähle ich hoch?
ich habe nach einer Methode gesucht, um das Datum in die einzelnen BEstandteile zu zerlegen. Das geht mit extract, aber wenn ich das datum zerlegt habe, muss ich das ja auch wieder zusammenfügen. Wie geht das?

Server IB6.0

Gruß
KEn

/edit titel geändert

_________________
Eine Klasse beschreibt die Struktur und das Verhalten einer Menge gleichartiger Objekte.

M. Raab · Beiträge: 334 Erhaltene Danke: 1 WIN 7 Delphi XE

Salute,

hilft Dir das ?

markieren

Quelltext

1:
2:

datumzeit:=formatdatetime('yyyyddmm',date())+
                                           formatdatetime('hhnnsszzz',time());

So zerlege ich das immer ... das Monat ist also an den Stellen 7 und 8.

oder mit

markieren

Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:

Die Funktion konvertiert einen TDateTime-Wert in ein Datum des Julianischen Kalenders.

Unit

DateUtils

Kategorie

Einheitenkonvertierung

Delphi-Syntax:

function DateTimeToJulianDate(const AValue: TDateTime): Double;

kannst Du eine julianische Tageszahl erstellen und die anschließend wieder umwandeln. Zähle 30 hinzu und Du bist einen Monat später. Später wandelst Du mit

markieren

Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:

Die Funktion konvertiert ein julianisches Datum in einen TDateTime-Wert.

Unit

DateUtils

Kategorie

Einheitenkonvertierung

Delphi-Syntax:

function JulianDateToDateTime(const AValue: Double): TDateTime;

das Datum wieder zurück.

Ist vielleicht umständlich aber funzt !!! :wink:

Gruss

Markus

_________________
Das Leben besteht aus Bits und Bytes - nur: wo laufen sie denn ????
Super ... Du kannst das zwar lesen, toll..... aber: völlig zwecklos !!!

CenBells · Beiträge: 1547 Win 7 Delphi XE5 Pro

hallo,

danke, aber das kenn ich schon,

ich meinte, ob es ein gegenstück für den SQL-BEFEHL EXTRACT gibt?

Gruß
KEn

_________________
Eine Klasse beschreibt die Struktur und das Verhalten einer Menge gleichartiger Objekte.

M. Raab · Beiträge: 334 Erhaltene Danke: 1 WIN 7 Delphi XE

Hallo,

sorry

da kann ich Dir auch nich weiter helfen.....

Gruss

Markus

_________________
Das Leben besteht aus Bits und Bytes - nur: wo laufen sie denn ????
Super ... Du kannst das zwar lesen, toll..... aber: völlig zwecklos !!!

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme