1 Frage zu Clarion

Um in Clarion immer das Datum des nächsten 20. eines Monats zu berechnen, kannst du das aktuelle Datum mit der SYSTEMDATE()-Funktion holen und dann prüfen, ob der aktuelle Tag kleiner als 20 ist. Falls ja, ist der nächste 20. im aktuellen Monat, andernfalls im Folgemonat. Hier ein Beispiel in Pseudocode, das du an Clarion anpassen kannst: ```clarion INCLUDE('equates.clw') Next20Date DATE Today DATE Year SHORT Month SHORT Day SHORT Today = SYSTEMDATE() Year = DATE:Year(Today) Month = DATE:Month(Today) Day = DATE:Day(Today) IF Day < 20 Next20Date = DATE(Year, Month, 20) ELSE IF Month = 12 Year += 1 Month = 1 ELSE Month += 1 END Next20Date = DATE(Year, Month, 20) END ! Next20Date enthält jetzt das gewünschte Datum ``` **Hinweise:** - `DATE:Year`, `DATE:Month`, `DATE:Day` sind Standardfunktionen in Clarion, um Jahr, Monat und Tag aus einem Datum zu extrahieren. - Die Funktion `DATE(Jahr, Monat, Tag)` baut ein Datum aus den Einzelwerten zusammen. - `SYSTEMDATE()` liefert das aktuelle Datum. Weitere Infos zu Clarion findest du auf der offiziellen Seite: [https://www.softvelocity.com/](https://www.softvelocity.com/)