EXFMT

[DVE]

Also zuerst das MOVE des Übergabparameter in das Feld für die Bildschirmausgabe und dann EXFMT und anschließend die weiterverarbeitung im RPG-Programm.

das Feld in der DSPF kann dassselbe sein wie im RPG. Dann erspart man sich die Vorbelegegung und den MOVE für die Weiterverarbeitung.
Allerdings würde ich persönlich die Feldnamen von einander trennen.


Gruß
DVE

[schokonudel]

Also erstmal danke an alle jetzt hab ich des was ich vor hatte!

Aber zur Verbesserung hab ich mir was gedacht! Dieses FELD1 was der Benutzer eingibt, da soll immer das heutige Datum stehen (aber es kann geändert werden)und es soll geprüft werden ob die Datum eingabe richtig ist, wie funktioniert das?

[DVE]

Viele wege führen nach ROM.
Die SQL-Fraktion wird dir ein SQL-Statement nennen.
Dann könntest du ein CLP schreiben in dem du das Kommando CVTDAT verwendest und mit MONMSG abfängst. Geht der CVTDAT auf Fehler dann ist das Datum kein Datum.
Es gibt darüber hinaus noch API's usw.

Also such dir was aus.

Gruß
DVE

[schokonudel]

soso hab das mit dem Datumtest gemacht aber wie mach ich das in der DSPF das in meinem Eingabefeld schon das heutige datum steht???

Hab es mir so gedacht:

c move *date feld1
c exfmt DSPF...
c move feld1 feld2

also er soll das Datum in feld 1 schieben
dann soll die DSPF gelesen werden.
Aber leider steht das Datum nicht drin in der DSPF was muss ich den genau machen??

[B.Hauser]

Hallo,

kleine Anmerkung zu *DATE

*DATE und alle anderen Datums-Informationen mit * und U beziehen sich auf das Job-Datum und nicht das System-Datum.

Der Unterschied ist, dass im Job-Datum das Datum steht, an dem der Job gestartet wurde. Also wenn in der Fertigung ein Bildschirm steht, an dem sich der erste Mitarbeiter am Montag-Morgen anmeldet und der letzte am Freitag Abend den Job beendet, bzw. den Bildschirm ausmacht, liefert *DATE am Freitag immer noch das Datum vom Montag.

Um das System-Datum zu ermitteln muss entweder der OperationCode TIME oder die Built-In-Function %DATE() verwendet werden.

Auch wenn ich SQL liebe, würde ich in diesem Fall das System-Datum nicht damit ermitteln. Dennoch gibt es in SQL die Spezial-Werte CURRENT_DATE, CURRENT_TIME und CURRENT_TIMESTAMP, über die das Sytem-Datum bzw. -Zeit ermittelt werden kann.

Wie hast Du eigentlich Dein Eingabe-Feld definiert?
Als Input-Feld (I) oder Ein-/Ausgabe-Feld (B)?
Wenn das Feld als Input-Feld definiert ist, kannst Du es nicht vorbelegen.

Birgitta

Birgitta

[schokonudel]

ok war bis jetzt nur als input feld definiert hab es geändert. Wie müssen den die sätze ausschauen?

c move *date feld1
c exfmt DSPF...
c move feld1 feld2

so funktioniert es noch nicht!

[schokonudel]

ok war bis jetzt nur als input feld definiert hab es geändert. Wie müssen den die sätze ausschauen?

c move *date feld1
c exfmt DSPF...
c move feld1 feld2

so funktioniert es noch nicht!

[schokonudel]

ok war bis jetzt nur als input feld definiert hab es geändert. Wie müssen den die sätze ausschauen?

c move *date feld1
c exfmt DSPF...
c move feld1 feld2

so funktioniert es noch nicht!

[DVE]

Was funktioniert nicht ??

Gruß
DVE

[schokonudel]

ja das wenn ich das programm durchlaufen lasse und dann meine DSPF erscheint wo ich das Datum eingeben muss -> steht nichts drin ich will das da ein Datum schon drinsteht am besten des heutige! Des funz no net!

[DVE]

IFELD        DS                                       
I                                        1  140#JMT   
I                                        7  14 FELD1  
C                     TIME           #JMT   140       
C                     MOVELFELD1     FELD2   8 P      
C                     EXFMTDSPF                       
C                     MOVELFELD2     FELD3   8 P      
C                     SETON                     LR 

Mit obigem Code ermittelst du das Datum und schreibst es in Feld2. Feld2 ist deine Variable in der DSPF und ist ebenfalls 8 Stellig. Wenn du noch Punkte haben willst z.B. TT.MM.JJJJ musst du vorher noch ein bischen CODE einfügen.
Wenn im Feld in der DSPF nichts steht gibts mehrere Gründe einer davon, das Feld in der DSPF ist länger als in deinem RPG-Programm.

Gruß
DVE

[schokonudel]

Erstmal danke an alle hab alles erfolgreich hinbekommen werd sicher öfters fragen stellen hehe bin halt erst neu dabei...