Über Datumswert Kalenderwoche zuordnen

GMKai · 13. Juni 2006

Hallo,
angenommen ich habe einen Datumswert,
wie kann ich diesen einer Kalenderwoche zuordnen?

LN4ever · 13. Juni 2006

Schau auf deinen Kalender. Wenn es ein guter Kalender ist, steht meist am Ende der Zeile hinter den Einzeltagen die Kalenderwoche. Schon hast du sie. Sonst mußt du dir einen guten Kalender zulegen.

So: Quatsch beiseite.

Schau einmal bei OpenNTF.ORG Dort gibt es dafür DIN und ISO-kompatible Lösungen in Formelsprache und Script.

Diali · 13. Juni 2006

ist nicht so kompliziert.

die Vorjahresberechnung wird benötigt, falls das Datum noch in der letzten KW des vorhergehenden Jahre liegt.

Gruß
Dirk

Code

_Temp:=@Date(EingangDatum);


REM {#####Berechnungen Vorjahr'#####};
erster_Tag_im_Vorjahr := @TextToTime("01.01." + @Text(@Integer(@Year(_Temp))-1));
Rest_Tage_Vorjahr := @Select(@Weekday(erster_Tag_im_Vorjahr);6;7;8;9;10;4;5);
KW_VorJahr := @Integer((_Temp - erster_Tag_im_Vorjahr + Rest_Tage_Vorjahr * 86400) /  604800);


REM {#####ersten Tag im Jahr berechnen'#####};
erster_Tag_im_Jahr := @TextToTime("01.01." + @Text(@Year(_Temp)));
Rest_Tage := @Select(@Weekday(erster_Tag_im_Jahr);6;7;8;9;10;4;5);
KW := @Integer((_Temp - erster_Tag_im_Jahr + Rest_Tage * 86400) /  604800);


@If(_Temp = ""; "";@Text(KW) = "0";KW_VorJahr; KW )

Alles anzeigen

Teilen