Domino 9 und frühere Versionen > Entwicklung

Erster Werkag des Monats ermitteln?

<< < (2/2)

Glombi:
Hi Bernhard,
Deine Formal versteh ich nicht richtig  ???
Es ist doch
@Weekday(Sonntag) = 1
@Weekday(Samstag) = 6

also muesste es doch so sein:
_Diff :=
@If(
 @Weekday(Monatserster) = 1;1;
 @Weekday(Monatserster) = 1;2;
  0
)

_ErsterWerktag := @Adjust(Monatserster;0;0;_Diff;0;0;0)

Andreas

koehlerbv:
Oh Mann, was hab' ich da für einen Schmarrn geschrieben... Wenn Montag = 1 WÄRE (sondern der Sonntag, was schon mal der erste Schwachfug von mir war), dann berechnet mein Blödsinn den ersten MONTAG im Monat.
Wollte aber gar keiner wissen - selbst ich nicht.

Völlig ohne Häme: Andreas' Formel muß noch an einer Stelle geändert werden.
_Diff :=
@If(
@Weekday(Monatserster) = 1;1;
@Weekday(Monatserster) = 2;2;
  0
)

_ErsterWerktag := @Adjust(Monatserster;0;0;_Diff;0;0;0)

Ich geh' jetzt in die Ecke und schäme mich ;-(

Bernhard

yes2002:
Hallo,

Danke für die Tipps - ich werde wohl diese Variante verwenden:

If Day(Today) < 4 Then
      'Überprüfung läuft nur, zwischen 1. und 3. eines Monats
      If Day(Today) = 1 Then
         If Weekday(Today) > 1 And Weekday(Today) < 7 Then
            'Prüfen, ob der 1. ein Wochentag ist
            'Aktion
         End If
      Else
         If Weekday(Today) = 2 Then
            'Prüfen, ob der 2. oder 3. ein Montag ist
            'Aktion
         End If   
      End If
   End If

Grüße

Glombi:
Hi Bernhard,
danke für die Korrektur - mal wieder Copy-Paste.
Dadurch werden wohl 90% aller Fehler in Programmen erzeugt.

Andreas

Navigation

[0] Themen-Index

[*] Vorherige Sete