Domino 9 und frühere Versionen > ND9: Entwicklung

Nächste Wochentage ausgehend von heute berechnen

(1/4) > >>

theBastian:
Hallo allerseits,

ich muss die nächsten Wochentage berechnen, habe mir dazu schon einige Threads durchgelesen, allein mir fehlt das Verständnis, wie man sowas berechnet.
Klingt für mich alles sehr nach Mathematik und da war ich schon immer schlecht.  :(

Ausgehend von Heute (@Today) muss ich die nächsten Wochentage berechnen und einzeln ausgeben, also

NächsterMontag : NächsterDienstag : NächsterMittwoch : ....

Mit @Weekday kriege ich den aktuellen Tag aber wie komme ich auf die anderen?  ???

Danke Euch schon mal.
Sebastian

Peter Klett:
Mal so hingewürfelt, vielleicht hilft Dir das


--- Code: ---_liste := "Sonntag" : "Montag" : "Dienstag" : "Mittwoch" : "Donnerstag" : "Freitag" : "Samstag";
_n := @Prompt ([OKCancelList] : [NoSort]; "Nächster"; "Wählen Sie bitte den Tag aus"; ""; _liste);
@If (_n = ""; @Return (""); "");
_n1 := @If (_n = "Sonntag"; 1; _n = "Montag"; 2; _n = "Dienstag"; 3; _n = "Mittwoch"; 4; _n = "Donnerstag"; 5; _n ="Freitag"; 6; _n ="Samstag"; 7; 0);
_n2 := _n1 - @Weekday (@Today);
_n3 := @If (_n2 <= 0; _n2 + 7; _n2);

@Prompt ([OK]; "Nächster" + _n; @Text (@Adjust (@Today; 0; 0; _n3; 0; 0; 0)))

--- Ende Code ---

Peter Klett:
oder meinst Du die Liste der nächsten Wochentage ab heute im Klartext?


--- Code: ---_liste := "Sonntag" : "Montag" : "Dienstag" : "Mittwoch" : "Donnerstag" : "Freitag" : "Samstag";
_w := @Weekday (@Today);
_n := @If (_w = 7; _liste; @Subset (_liste; _w - 7) : @Subset (_liste; _w));

@Prompt ([Ok]; "Nächste Tage"; @Implode (_n; ", "))

--- Ende Code ---

ascabg:
Hallo,

Und was ist mit @Adjust?


Andreas

theBastian:
Danke erst mal Peter:

Würde also bedeuten:


--- Code: ---NächsterMontagTmp := @If(2 - @Weekday (@Today) <= 0 ; @Weekday (@Today) + 7 ; @Weekday (@Today))
NächsterMontag := (@Adjust (@Today; 0; 0; NächsterMontagTmp ; 0; 0; 0)))

NächsterDienstagTmp := @If(3 - @Weekday (@Today) <= 0 ; @Weekday (@Today) + 7 ; @Weekday (@Today))
NächsterDienstag := (@Adjust (@Today; 0; 0; NächsterMontagTmp ; 0; 0; 0)))

usw...

--- Ende Code ---


@Andreas: @Adjust ist doch da drin, oder?

Navigation

[0] Themen-Index

[#] Nächste Seite

Zur normalen Ansicht wechseln