EXFMT

[schokonudel]

Hallo ich bin hier ganz neu! Unzwar ich hab ein funktionierendes RPG Programm mit dazugehöriger Printerfile geschrieben. Jetzt möcht ich ein Bildschirm (SDA) in mein RPG-Programm verknüpfen. Ich weiß das ich den Befehl "exfmt" benutzen muss aber hab noch nie damit gearbeitet!
Wie muss ich den das machen bzw wie sieht der Befehl aus? Vielleicht irgendwo wo ich es nachlesen kann hilft mir auch weiter!

Also wie schon gesagt ich --> newbie

[hgdieterle]

Hallo
anbei ein kleines Programm:

Ftestca cf e workstn
C exfmt fmt001
C eval *inlr = *on


Displayfile:

A DSPSIZ(24 80 *DS3)
A R FMT001

A CF04(04)
A 5 4'vvvvvvvvvvvvvvv'
A FELD1 10 B 5 23

[schokonudel]

Danke für die Antwort, so wie ich das verstehe muss das ganze so ausschauen:

C exfmt dlav016t
C eval *inlr = *on

C MOVE FELD1 P#FLD1

Wird jetzt das FELD1 von der DSPF gelesen und in meinem RPG-Programm in das Feld "P#FLD1" umgeschrieben???

[DVE]

Kommt darauf an:

Soll das Feld für die BS Ausgabe vorbelegt werden muss der MOVE vor dem EXFMT kommen.
Willst du lesen was eingegeben wurde .. nach dem EXFMT.

Oder eben beides

Gruß
DVE

[schokonudel]

Hmm, also das RPG-Programm ist ja so aufgebaut gewesen, das er beim aufrufen noch einen Parameter gebraucht hat also so:
call 'Programm' 'Parameter(z.B Datum)'

Die Eingabe in der DSPF bzw das FELD1 soll das Datum sein, was der Benutzer eingibt. Und des soll gelesen werden und im Im RPG-Prog weiterverarbeitet werden.

[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!