Ich weiß, meine Antwort kommt schon zu spät, möchte sie aber trotzdem los werden. Vielleicht dient sie jemand anderem als Idee.

Ich habe dieses Problem folgendermaßen gelöst:
1. Einen Fabrikskalender erstellt:
Datei FBRKLD
Felder: JAHR JJJJ
Monat MM
Tag TT
Woche JJWW
Wochentag T (1-7)
Feiertag F (J/N)

2. Dazu habe ich ein Programm geschrieben, welches mit diese Datei automatisch aufbaut, wobei das besondere Problem die generierung der Kalenderwoche war.
3. Weiter logische Dateien nach Woche, JMT, JM erstellt

Diese Datei verwende ich nun zur Datumberechnung. In Ihrem Fall CHAIN mit heutigem Datum in den Kalender dann
Do 10
Read FBRKLD
end
Sollen Samstage, Son- und Feiertage übersprungen werde, so ist das ebenfalls leicht realisierbar. Ebenso kann ich mit dieser Datei leicht den ersten bzw. letzten Tag einer Kalenderwoche feststellen.

Dazu braucht man außerdem keine Zeile in einem ILE-RPG (ist meine Meinung nach nur für Vielschreiber).

Das RPG-Programm zum Erstellen der Fabrikskalender-Datei veröffentliche ich gerne auf Wunsch.

Interesse: zehetner@ins.at