-
Systemdatum nach String
Hallo Forum,
ich möchte das Systemdatum im Free RPG in einen String wandeln. Das Ergebnis soll JJJJMMTT ohne Trennzeichen sein. Ich finde aber nur Funktionen, um einen numerischen oder Alphawert in ein Datum zu wandeln.
Wer hat die Lösung?
-
mhh... hab isch noch nich gemacht nicht, aber laut Handbuch! (chapter 20 seite 407) soll das so gehen..
PHP-Code:
[left]/FREE
D_10 = %DATE (CHR_8a: *YMD);
//
// Move the 10-character date to an 8-character field CHR_8b.
// It will contain the date that was just moved to D_10, but with
// a 2-digit year and the default separator indicated by the *YMD
// format.
//
CHR_8b = %CHAR (D_10: *YMD);
//
// Move the 10-character date to an 8-character date D_8a.
// It will contain the date that * was just moved to D_10, but
// with a 2-digit year and a . separator since D_8a was defined
// with the (*YMD.) format.
//
D_8a = D_10;
//
// Move the 8-character date to a 10-character date D_10
// It will contain the date that * D_8b was initialized to,
// but with a 4-digit year, 1995-07-31.
//
D_10 = D_8b;
//
// After the last move, the fields will contain
// CHR_8b: 95/05/21
// D_8a: 95.05.21
// D_10: 1995-07-31
//
*INLR = *ON;
/END-FREE[/left]
geht bestimmt aber auch einfacher?
gruss kuempi
-
*YMD0 ist dann auch ohne Trennzeichen.
Also:
MyDate = %char(%date():*YMD0);
-
*YMD hat nur ein 2-stelliges Jahr.
Wird ein 4-stelliges Jahr benötigt, ist *ISO erforderlich.
Birgitta
-
*CYMD0 heißt hier das Zauberwort.
-
So gehts:
MyDate = %char(%date():*ISO0);
*CYMD liefert nur 1060704 (1 für'S Jahrhundert)
Similar Threads
-
By SchWellE in forum IBM i Hauptforum
Antworten: 15
Letzter Beitrag: 05-01-07, 11:56
-
By e_sichert in forum IBM i Hauptforum
Antworten: 4
Letzter Beitrag: 07-11-06, 15:25
-
By edig in forum NEWSboard Programmierung
Antworten: 5
Letzter Beitrag: 07-07-06, 10:51
-
By cheffe1008 in forum NEWSboard Programmierung
Antworten: 7
Letzter Beitrag: 16-05-06, 07:45
-
By hoeppe in forum IBM i Hauptforum
Antworten: 9
Letzter Beitrag: 22-07-05, 09:46
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