-
Wochentag mittels RPGIV ermitteln
Wie kann man mittels RPGIV den Wochentag, nach Eingabe eines Datums ermitteln? Wie heißt der Befehl?
Danke
-
Wir wärs mit SQLRPGLE
/free
EXEC SQL
Set : DayName = DAYNAME(: Date);
return DayName;
/end-free
-
Hallo,
ich würde eher die SQL Funktionen DayOfWeek oder DayOfWeek_ISO verwenden, mit dem Tagesnamen bekommst Du Probleme, sobald Du mit Mehrsprachigkeit und unterschiedlichen System-Sprachen handeln musst.
Beide Funktionen bringen den numerischen Wochentag zurück. DayOfWeek beginnt mit dem Sonntag, d.h. Sonntag=1 und Samstag = 7.
DayOfWeek_ISO beginnt mit dem Montag, d.h. Montag=1 und Sonntag = 7.
@AK1
Ich würde Dir raten die RPG-Referenz herunterzuladen, darin sind alle RPG OpCodes und Built-In-Funktionen beschrieben.
ILE RPG Language Reference - Version 6 Release 1
Birgitta
-
zum Beispiel
dCEEDYWK pr extproc('CEEDYWK')
d nDays 10i 0 const
d nRtnDayOfWeek 10i 0
d ioFeedBack 12a options(*OMIT)
d nRtnDayOfWeek s 10i 0
* 1 = Sonntag
* 2 = Montag
* usw
d DateDiff s 10i 0
d BaseDate s d datfmt(*ISO) inz(d'1582-10-14')
d Today s d
c eval Today = %Date()
c eval dateDiff = %diff(Today:BaseDate:*DAYS)
c callp CEEDYWK(DateDiff:nRtnDayOfWeek:*OMIT)
Similar Threads
-
By schatte in forum NEWSboard Programmierung
Antworten: 19
Letzter Beitrag: 10-01-07, 11:32
-
By Bratmaxxe in forum NEWSboard Programmierung
Antworten: 9
Letzter Beitrag: 08-01-07, 09:50
-
By ulbrecht in forum NEWSboard Programmierung
Antworten: 7
Letzter Beitrag: 06-12-06, 17:06
-
By M.Kasper in forum IBM i Hauptforum
Antworten: 6
Letzter Beitrag: 25-08-06, 07:32
-
By JonnyRico in forum NEWSboard Programmierung
Antworten: 14
Letzter Beitrag: 30-03-06, 12:33
Berechtigungen
- Neue Themen erstellen: Nein
- Themen beantworten: Nein
- You may not post attachments
- You may not edit your posts
-
Foren-Regeln
|
Erweiterte Foren Suche
Google Foren Suche
Forum & Artikel Update eMail
AS/400 / IBM i
Server Expert Gruppen
Unternehmens IT
|
Kategorien online Artikel
- Big Data, Analytics, BI, MIS
- Cloud, Social Media, Devices
- DMS, Archivierung, Druck
- ERP + Add-ons, Business Software
- Hochverfügbarkeit
- Human Resources, Personal
- IBM Announcements
- IT-Karikaturen
- Leitartikel
- Load`n`go
- Messen, Veranstaltungen
- NEWSolutions Dossiers
- Programmierung
- Security
- Software Development + Change Mgmt.
- Solutions & Provider
- Speicher – Storage
- Strategische Berichte
- Systemmanagement
- Tools, Hot-Tips
Auf dem Laufenden bleiben
|
Bookmarks