Dieser Abschnitt behandelt verschiedene Aspekte der Behandlung von Datumsinformationen in Ihren Natural-Anwendungen.
Folgende Themen werden behandelt:
Datumsformat für alphanumerische Darstellung - der DF-Parameter
Datumsformat für Standard-Seitenüberschriften - der DFTITLE-Parameter
Wenn Sie den Wert eines Datumsfeldes in einer bestimmten Form ausgeben möchten, geben Sie normalerweise für das Feld eine Editiermaske an. Mit der Editiermaske bestimmen Sie Zeichen für Zeichen, wie die Ausgabe aussehen soll.
Falls Sie das aktuelle Datum in einer bestimmten Form verwenden möchten, brauchen Sie hierfür kein Datumsfeld mit einer entsprechenden Editiermaske zu definieren; stattdessen können Sie einfach eine Datumssystemvariable verwenden. Natural bietet verschiedene Datumssystemvariablen, die alle das aktuelle Datum in unterschiedlichen Darstellungsformen enthalten. Bei manchen dieser Darstellungsformen ist die Jahreszahl zweistellig, bei manchen vierstellig.
Weitere Informationen sowie eine Liste aller Datumssystemvariablen finden Sie in der Systemvariablen-Dokumentation.
Der Profilparameter DTFORM bestimmt das Standardformat, das für
Datumsangaben als Teil von Natural-Standard-Reporttiteln, für Datumskonstanten und für
Datumseingaben gilt.
Dieses Datumsformat bestimmt die Reihenfolge der Angaben für Tag, Monat und Jahr sowie die Trennzeichen, die zwischen diesen Angaben stehen müssen.
Mögliche DTFORM-Einstellungen sind:
| Setting | Datumsformat1 | Beispiel2 |
|---|---|---|
DTFORM=I
|
yyyy-mm-dd
|
2014-01-31 |
DTFORM=G
|
dd.mm.yyyy
|
31.01.2014 |
DTFORM=E
|
dd/mm/yyyy
|
31/01/2014 |
DTFORM=U
|
mm/dd/yyyy
|
01/31/2014 |
1
dd = day/Tag,
mm = month/Monat,
yyyy = year/Jahr
2 Es wird angenommen, dass DF oder DFTITLE auf L gesetzt ist.
Der DTFORM-Parameter kann im Natural-Parametermodul oder dynamisch
beim Aufruf von Natural gesetzt werden. Standardmäßig gilt DTFORM=I.
Wenn eine Editiermaske angegeben ist, wird die Darstellung des Feldwertes durch die
Editiermaske bestimmt. Wenn keine Editiermaske angegeben ist, wird die Darstellung des
Feldwertes durch den Session-Parameter DF in Kombination mit dem DTFORM-Profilparameter
bestimmt.
Mit dem DF-Parameter können Sie eine der folgenden
Datumsdarstellungen wählen:
Bei jeder Darstellung wird die Reihenfolge von Tag, Monat und Jahr sowie die zu
verwendenden Begrenzungszeichen durch den DTFORM-Parameter bestimmt.
Standardmäßig gilt DF=S (außer bei INPUT-Statements; siehe
unten).
Der DF-Parameter
wird bei der Kompilierung ausgewertet.
Der DF-Parameter gilt bei folgenden Statements und in folgenden
Situationen:
INPUT, DISPLAY, WRITE und PRINT auf Statement- und
Elementebene (Feldebene)
MOVE, COMPRESS, STACK, RUN und FETCH auf Elementebene (Feldebene)
Bei Angabe in einem dieser Statements hat der DF-Parameter folgende Auswirkung:
| Statement | Auswirkung des DF-Parameters |
|---|---|
DISPLAY, WRITE, PRINT
|
Wenn der Wert einer Datumsvariablen mit einem dieser Statements ausgegeben
wird, wird der Wert in alphanumerische Darstellung umgesetzt, bevor er ausgegeben
wird. Der DF-Parameter bestimmt, welche Darstellung dafür
verwendet wird.
|
MOVE, COMPRESS
|
Wenn der Wert einer Datumsvariablen mit einem MOVE- oder
COMPRESS-Statement in ein alphanumerisches Feld übertragen wird,
wird der Wert in alphanumerische Darstellung umgesetzt, bevor er übertragen wird.
Der DF-Parameter bestimmt, welche Darstellung dafür
verwendet wird.
|
STACK, RUN, FETCH
|
Wenn der Wert einer Datumsvariablen auf dem Natural-Stack abgelegt wird,
wird er in alphanumerische Darstellung umgesetzt, bevor er auf dem Stack abgelegt
wird. Der DF-Parameter bestimmt, welche Darstellung dafür verwendet
wird.
Dasselbe gilt, wenn eine Datumsvariable als Parameter in einem
|
INPUT
|
Wenn eine Datumsvariable in einem INPUT-Statement verwendet
wird, bestimmt der DF-Parameter, in welcher Form ein Wert
in dieses Feld eingegeben werden muss.
Wenn dagegen eine Datumsvariable, für
die kein |
Anmerkung
Bei DF=S stehen nur zwei Stellen für die Jahresangabe zur Verfügung;
d.h. selbst wenn der Datumswert das Jahrhundert enthielte, ginge diese Information bei der
Umsetzung verloren. Um die Jahrhundertinformation zu behalten, müssen Sie
DF=I oder DF=L setzen.
Diese Beispiele basieren auf der Annahme, dass DTFORM=G.
/* DF=S (default) WRITE *DATX /* Output has this format: dd.mm.yy END
FORMAT DF=I WRITE *DATX /* Output has this format: ddmmyyyy END
FORMAT DF=L WRITE *DATX /* Output has this format: dd.mm.yyyy END
Dieses Beispiel basiert auf der Annahme, dass DTFORM=E.
DEFINE DATA LOCAL 1 #DATE (D) INIT <D'31/01/2014'> 1 #ALPHA (A10) END-DEFINE ... MOVE #DATE TO #ALPHA /* Result: #ALPHA contains 31/01/14 MOVE #DATE (DF=I) TO #ALPHA /* Result: #ALPHA contains 31012014 MOVE #DATE (DF=L) TO #ALPHA /* Result: #ALPHA contains 31/01/2014 ...
Dieses Beispiel basiert auf der Annahme, dass DTFORM=I.
DEFINE DATA LOCAL 1 #DATE (D) INIT <D'2014-01-31'> 1 #ALPHA1(A10) 1 #ALPHA2(A10) 1 #ALPHA3(A10) END-DEFINE ... STACK TOP DATA #DATE (DF=S) #DATE (DF=I) #DATE (DF=L) ... INPUT #ALPHA1 #ALPHA2 #ALPHA3 ... /* Result: #ALPHA1 contains 14-01-31 /* #ALPHA2 contains 20140131 /* #ALPHA3 contains 2014-01-31 ...
Dieses Beispiel basiert auf der Annahme, dass DTFORM=I.
DEFINE DATA LOCAL
1 #DATE1 (D)
1 #DATE2 (D)
1 #DATE3 (D)
1 #DATE4 (D)
END-DEFINE
...
INPUT #DATE1 (DF=S) /* Input must have this format: yy-mm-dd
#DATE2 (DF=I) /* Input must have this format: yyyymmdd
#DATE3 (DF=L) /* Input must have this format: yyyy-mm-dd
#DATE4 /* Input must have this format: yy-mm-dd or yyyymmdd
...
Der Session- bzw. Profilparameter DFOUT gilt nur für Datumsfelder in INPUT-, DISPLAY-, PRINT- und WRITE-Statements, für die keine Editiermaske angegeben ist und
für die kein DF-Parameter gilt.
Bei Datumsfeldern, die mit einem INPUT-, DISPLAY-,
PRINT- oder WRITE-Statement ausgegeben werden und für die
weder eine Editiermaske angegeben noch ein DF-Parameter gesetzt ist, bestimmt der
Profil/Session-Parameter DFOUT die Form, in der die Feldwerte
angezeigt werden.
Mit dem DFOUT-Parameter können Sie eine der folgenden
Datumsdarstellungsarten wählen:
DFOUT=S |
Datumsvariablen werden mit zweistelligem Jahr und mit durch den
DTFORM-Parameter bestimmten Begrenzungszeichen angezeigt:
Beispiel: |
|---|---|
DFOUT=I |
Datumsvariablen werden mit mit vierstelligem Jahr und ohne Begrenzungszeichen
angezeigt:
Beispiel:
|
Standardmäßig gilt DFOUT=S.
Bei beiden DFOUT-Einstellungen wird die Reihenfolge von Tag,
Monat und Jahr in den Datumswerten durch den DTFORM-Parameter bestimmt.
Die Länge eines Datumsfeldes wird durch die DFOUT-Einstellung
nicht beeinflusst, da jede der beiden Datumswertdarstellungen in ein 8 Byte langes Feld
passt.
Der DFOUT-Parameter kann im Natural-Parametermodul dynamisch beim
Aufrufen von Natural oder mit dem Systemkommando GLOBALS
gesetzt werden. Er wird zur Laufzeit ausgewertet.
Dieses Beispiel basiert auf der Annahme, dass DTFORM=I.
DEFINE DATA LOCAL
1 #DATE (D) INIT <D'2014-01-31'>
END-DEFINE
...
WRITE #DATE /* Output if DFOUT=S is set ...: 14-01-31
/* Output if DFOUT=I is set ...: 20140131
WRITE #DATE (DF=L) /* Output (regardless of DFOUT): 2014-01-31
...
Der Session- bzw. Profilparameter DFSTACK gilt nur für Datumsfelder, die in STACK-, FETCH- und RUN-Statements verwendet werden und für die kein DF-Parameter angegeben
ist.
Der DFSTACK-Parameter bestimmt die Form, in der die Werte von
Datumsvariablen mit einem STACK-, RUN- oder
RUN-Statement auf dem Natural-Stack abgelegt werden.
Mögliche DFSTACK-Einstellungen sind:
DFSTACK=S
|
8-Byte-Datumsvariablen werden mit zweistelligem Jahr und mit durch den
DTFORM-Parameter bestimmten Begrenzungszeichen auf dem
Natural-Stack abgelegt:
Beispiel: Diese Einstellung bewirkt, dass die Jahrhundert-Informationen nicht mit
abgelegt werden (und verlorengehen), wenn ein Datumswert auf dem Stack abgelegt
wird. Wenn dann der Wert vom Natural-Stack gelesen und in einer anderen Datumsvariable abgelegt
wird, wird entweder als Jahrhundert das aktuelle Jahrhundert genommen oder das
Jahrhundert durch die Einstellung des |
|---|---|
DFSTACK=C
|
Wie bei DFSTACK=S, aber mit folgendem Unterschied:
Natural gibt einen Laufzeitfehler aus, wenn der auf dem Natural-Stack abzulegende
Datumswert nicht mit dem des ursprünglichen Datumswerts identisch ist (entweder
aufgrund des |
DFSTACK=I
|
8-Byte-Datumsvariablen werden mit vierstelligem Jahr und ohne
Begrenzungszeichen auf dem Natural-Stack abgelegt:
Beispiel:
|
Standardmäßig gilt DFSTACK=S.
Bei jeder Datumsdarstellung werden die Reihenfolge von Tag, Monat und Jahr und die
Begrenzungszeichen (falls vorhanden) in den Datumswerten durch den DTFORM-Parameter
bestimmt.
Dieses Beispiel basiert auf der Annahme, dass DTFORM=I und YSLW=0.
DEFINE DATA LOCAL 1 #DATE (D) INIT <D'2014-01-31'> 1 #ALPHA1(A8) 1 #ALPHA2(A10) END-DEFINE ... STACK TOP DATA #DATE #DATE (DF=L) ... INPUT #ALPHA1 #ALPHA2 ... /* Result if DFSTACK=S or =C is set: #ALPHA1 contains 14-01-31 /* Result if DFSTACK=I is set .....: #ALPHA1 contains 20140131 /* Result (regardless of DFSTACK) .: #ALPHA2 contains 2014-01-31 ...
Mit dem Profilparameter YSLW können Sie das Jahrhundert eines zweistelligen
Jahr-Wertes bestimmen.
Der YSLW-Parameter kann im Natural-Parametermodul oder dynamisch beim Aufrufen von Natural gesetzt werden. Er wird zur Laufzeit ausgewertet, wenn ein alphanumerischer Datumswert mit einem zweistelligen Jahr in eine Datumsvariable übertragen wird. Dies betrifft Datumswerte, die:
mit der mathematischen
Funktion
VAL(field) verwendet
werden,
mit der Option IS(D) in einer logischen Bedingung verwendet werden,
vom Natural-Stack als Eingabedaten gelesen werden,
in ein Feld als Eingabedaten eingegeben werden.
Der YSLW-Parameter bestimmt den Bereich von Jahren, der von einem
sogenannten "gleitenden Jahr-Fenster" abgedeckt wird. Dieser Mechanismus geht
davon aus, dass ein Datum mit einem zweistelligen Jahr innerhalb eines
"Fensters" von 100 Jahren liegt. Innerhalb dieser 100 Jahre kann jeder
zweistellige Jahr-Wert eindeutig einem bestimmten Jahrhundert zugeordnet werden.
Mit dem YSLW-Parameter legen Sie fest, mit wie vielen Jahren in
der Vergangenheit der 100-Jahre-Bereich anfangen soll: das erste Jahr des Fensterbereichs
ergibt sich aus dem aktuellen Jahr minus dem YSLW-Wert.
Mögliche Werte des YSLW-Parameters sind 0 bis 99. Der Standardwert
ist YSLW=0, d.h. der "gleitende Jahr-Fenster"-Mechanismus ist
nicht aktiv; bei einem zweistelligen Jahr wird dann angenommen, dass es im aktuellen
Jahrhundert liegt.
Wenn das aktuelle Jahr 2014 ist und Sie YSLW=40 angeben, deckt das
"gleitende Jahr-Fenster" die Jahre 1974 bis 2072 ab. Ein zweistelliger
Jahr-Wert nn von 74 bis
99 wird dementsprechend als 19nn
interpretiert, während ein zweistelliger Jahr-Wert
nn von 00 bis 73 als
20nn interpretiert wird.
Wenn das aktuelle Jahr 2014 ist und Sie YSLW=20 angeben, deckt das
"gleitende Jahr-Fenster" die Jahre 1994 bis 2093 ab. Ein zweistelliger
Jahr-Wert nn von 94 bis
99 wird dementsprechend als 19nn interpretiert,
während ein zweistelliger Jahr-Wert nn von
00 bis 93 als 20nn interpretiert
wird.
Die folgenden Beispiele veranschaulichen die Auswirkung verschiedener Kombinationen der
Parameter DFSTACK
und YSLW.
Anmerkung
Alle diese Beispiele basieren auf der Annahme, dass DTFORM=I.
Dieses Beispiel geht vom aktuellen Jahr 2014 und folgenden Parametereinstellungen aus:
DFSTACK=S (Standardeinstellung)
und YSLW=20
DEFINE DATA LOCAL 1 #DATE1 (D) INIT <D'1956-12-31'> 1 #DATE2 (D) END-DEFINE ... STACK TOP DATA #DATE1 /* century information is lost (year 56 is stacked) ... INPUT #DATE2 /* year sliding window determines 56 to be 1956 ... /* Result: #DATE2 contains 1956-12-31
In diesem Fall ist das "gleitende Jahr-Fenster" unpassend gesetzt, so dass die Jahrhundert-Informationen sich (unbeabsichtigt) ändern.
Dieses Beispiel geht vom aktuellen Jahr 2014 und folgenden Parametereinstellungen aus:
DFSTACK=S (Standardeinstellung)
und YSLW=60
DEFINE DATA LOCAL 1 #DATE1 (D) INIT <D'1956-12-31'> 1 #DATE2 (D) END-DEFINE ... STACK TOP DATA #DATE1 /* century information is lost (year 56 is stacked) ... INPUT #DATE2 /* year sliding window determines 56 to be 1956 ... /* Result: #DATE2 contains 1956-12-31
In diesem Fall ist das "gleitende Jahr-Fenster" passend gesetzt, so dass die ursprünglichen Jahrhundert-Informationen korrekt wiederhergestellt werden.
Dieses Beispiel geht vom aktuellen Jahr 2014 und folgenden Parametereinstellungen aus:
DFSTACK=C und
YSLW=0 (Standardeinstellung)
DEFINE DATA LOCAL 1 #DATE1 (D) INIT <D'1956-12-31'> 1 #DATE2 (D) END-DEFINE ... STACK TOP DATA #DATE1 /* century information is lost (year 56 is stacked) ... INPUT #DATE2 /* 56 is assumed to be in current century -> 2056 ... /* Result: NAT1130 runtime error (Unintended century switch...)
In diesem Fall ändern sich (unbeabsichtigt) die Jahrhundert-Informationen. Allerdings
wird diese Änderung durch die Parametereinstellung DFSTACK=C abgefangen.
Dieses Beispiel geht vom aktuellen Jahr 2014 und folgenden Parametereinstellungen aus:
DFSTACK=C und
YSLW=60
DEFINE DATA LOCAL 1 #DATE1 (D) INIT <D'2056-12-31'> 1 #DATE2 (D) END-DEFINE ... STACK TOP DATA #DATE1 /* century information is lost (year 56 is stacked) ... INPUT #DATE2 /* year sliding window determines 56 to be 1956 ... /* Result: NAT1130 runtime error (Unintended century switch...)
In diesem Fall ändern sich die Jahrhundert-Informationen aufgrund des "gleitenden
Jahr-Fensters". Allerdings wird diese Änderung durch die Parametereinstellung
DFSTACK=C abgefangen.
Informationen zu diesem Thema entnehmen Sie der Beschreibung des Profilparameters
YSLW.
Der Session- bzw. Profilparameter DFTITLE bestimmt die Form des Datums in einer
Standard-Seitenüberschrift (wie sie mit
einem DISPLAY-, WRITE- oder PRINT-Statement ausgegeben wird).
Mit dem DFTITLE-Parameter können Sie eine der folgenden
Datumsdarstellungsarten wählen:
DFTITLE=S |
8-Byte-Datumsdarstellung mit zweistelligem Jahr und Begrenzungszeichen.
Beispiel: |
|---|---|
DFTITLE=L
|
10-Byte-Datumsdarstellung mit vierstelligem Jahr und Begrenzungszeichen.
Beispiel: |
DFTITLE=I |
8-Byte-Datumsdarstellung mit vierstelligem Jahr ohne Begrenzungszeichen.
Beispiel: |
Bei jeder dieser Ausgabeformen werden die Reihenfolge der Tages-, Monats- und
Jahreskomponenten sowie die verwendeten Begrenzungszeichen durch den DTFORM-Parameter
bestimmt.
Der DFTITLE-Parameter kann im Natural-Parametermodul dynamisch
beim Aufrufen von Natural oder mit dem Systemkommando GLOBALS gesetzt
werden. Er wird zur Laufzeit ausgewertet.
Dieses Beispiel geht von DTFORM=I aus.
WRITE 'HELLO' END /* /* Date in page title if DFTITLE=S is set ...: 14-01-31 /* Date in page title if DFTITLE=L is set ...: 2014-01-31 /* Date in page title if DFTITLE=I is set ...: 20140131
Anmerkung
Der DFTITLE-Parameter hat keine Auswirkungen auf
benutzerdefinierte Seitenüberschriften, wie sie mit einem WRITE
TITLE-Statement angegeben werden.