Berechnung von Anfang der Monats / Ende des Monats

[HolgerCW]

Hallo zusammen,

ich fülle in einem Trigger auf der ORACLE - Datenbank eine Datumsvariable.

Jetzt möchte ich in dem Trigger zu dem Datum einmal den Anfang des Monats und einmal das Ende des Monats bestimmen. Soll heissen:

17.09.2008 -> Anfang: 01.09.2008 Ende: 30.09.2008

Wie mache ich das ?

Delphi-Quellcode:

DECLARE
 my_naechste_uw DATE;
 my_naechster_alarm DATE;
 my_alarm varchar2(100);

BEGIN
 
 ...

 If my_alarm = 'Anfang des Monats' THEN 
  my_naechster_alarm := my_naechste_uw - ???;
 END IF;

END;
/

Gruss

Holger

[mkinzler]

Schau dir mal die Unit DateUtils an

[HolgerCW]

In Delphi könnte ich das ...

... nur weiss ich nicht wie ich das in einem Trigger auf der ORACLE-Datenbank umsetze ?

[DeddyH]

Der erste Tag des Monats ist ja immer der 1., zum letzten kannst Du die Oracle-Funktion LAST_DAY benutzen.

[GroHae]

Ich bin mir nicht sicher ob ich dich verstanden habe, aber:

Datum kannst du mit :

Delphi-Quellcode:

var Year, Month, Day: word;
begin
  DecodeDate(Date, Year, Month, Day);
  .....
end;

zerlegen


Letzte Tage des Monats etwa so:

Delphi-Quellcode:

  result := IncMonth(StrToDate('01.' + IntToStr(iMonat) + '.' + IntToStr(iJahr)),1) - 1;

Erste Tag mit

Delphi-Quellcode:

  result := EncodeDate(Year, Month, Day);
Day = 01

[DeddyH]

Öhm, wenn ich das richtig verstanden habe, geht es nicht um Delphi, sondern um PL/SQL.

[HolgerCW]

Richtig,

es geht um Oracle. Das mit dem LAST_DAY hat schon super geklappt.

Wie kann ich denn in ORACLE das Datum zerpflücken und dann den Tag auf "01" setzen ?

Gruss

Holger

[DeddyH]

Das müsste mit TRUNC gehen.

[HolgerCW]

Bin da auf dem Holzweg. Gib mir mal einen Anstoss ...

So gehts nicht:

Delphi-Quellcode:

my_naechster_alarm := TRUNC(my_naechste_uw, '01-MM-YYYY');

[DeddyH]

SQL-Code:

my_naechster_alarm := TRUNC(my_naechste_uw,'MONTH');

Ungetestet.

[edit] beim C&P zuviel dringelassen [/edit]

[HolgerCW]

... wenn Du mir jetzt noch von die Berechnung für:

- Ende des Jahres
-> Lösung:

Delphi-Quellcode:

 
TRUNC(TRUNC(TRUNC(my_naechste_uw + 366), 'YEAR') - 1)

- Ende des Quartals
-> Lösung

Delphi-Quellcode:

TRUNC(TRUNC(TRUNC(my_naechste_uw + 92), 'Q') - 1);

von dem Monat ausgehend, verraten kannst, dann habe ich alles. Schon mal danke.

-> habe es glaube ich selber raus gefunden, wie oben zu sehen. Wenn Du eine eleganterere Lösung kennst kannst Sie ja noch posten.

Gruss

Holger

[DeddyH]

Für das Jahresende solltest Du Dir mal diesen Thread durchlesen. Quartalsende dürfte etwas schwieriger werden, das kann ich hier ohne Oracle schlecht ausprobieren.

[HolgerCW]

Vielen dank für all Deine Hilfen.

[DeddyH]

Gern geschehen :cheers: