PDA

View Full Version : Hilfe bei Variablenbestimmung



MadBrain
09-01-04, 20:29
Nabend,
also ich poste euch erst mal den bescheidenen Quellcode :P

FMT FX FDateiname+IPEASF.....L.....A.E/AEinh.Schlüsselwörter++++++++++++++++++
***************** Datenanfang *****************************************
0001.00 fadrepf uf a e k disk
0002.00 fdsp cf e workstn
0002.01 d
0003.00 c dow *in12 = *off
0004.00 c exfmt dsp01
0005.00 c enddo
0006.00 c eval *inlr = *on
******************Datenende *******************************************

Also wie ihr sicher lich bemerkt fehlt da noch was und zwar meine Variablen. Ich möchte nun dieses Display solange anzeigen lassen bis der User die Taste F12 betätig. Nun weiß ich leider nicht so recht wie ich die D-Bestimmung da eingeben muss.
Also ich muss doch die Taste vorher definieren?!?

MfG
MadBrain

PS: Bin noch Azubi bitte um Nachsicht, "programmiere" erst 2 Tage

Thimi
10-01-04, 07:24
Hi Madbrain,
ja mußt du, aber in deine Bildschirmdatei.
Entweder Global (ganz am Anfang der Datei)
oder Satzformatbezogen

A CF12
oder
A CA12

einfügen. Bildschirmdatei umwandeln, dann RPG umwandeln.

Gruss
Thierry

Fuerchau
10-01-04, 13:31
1. Die Tasten in der DSPF definieren, wie oben beschrieben.
CA01-CA24 = F1 bis F24 ohne Datenübergabe
CF01-CF24 = F1 bis F24 mit Datenübergabe

2. In RPG/LE können die Tasten mittels *INKx abgefragt werden
*INKA = F1
*INKB = F2
usw.

also:

c dou *inkl = *on
c exfmt dsp01
c enddo

B.Hauser
10-01-04, 15:19
Hallo,

wenn man schon mit *INKx arbeitet, sollte man vielleicht auch noch erwähnen, dass *INKO nicht existiert.

Allerdings ist diese Variante m.E. die unübersichtlichste.
(was ist jetzt F17? *INKR oder *INKS?)

Eine andere Möglichkeit wäre, die Funktions-Tasten mit Bezugszahl zu verwenden z.B. CA12(12).
Allerdings sind dadurch bereits 24 Bezugszahlen reserviert.
Dafür kann man im Programm dann auf *IN12 abfragen.
Bei dieser Variante muss das Schlüssel-Wort INDARA im DDS angegeben werden.

Zusätzlich kann man in RPGIV über das Schlüssel-Wort INDDS in den F-Bestimmungen eine Datenstruktur definieren, in der die einzelnen Indikatoren umbenannt werden können.
(Indicator Datastructure)

Die eleganteste Art Funktions-Tasten abzufragen ist, die Hex-Werte in der Datei-Status-Datenstruktur (Stelle 369) zu vergleichen.
Mit dieser Methode können nicht nur die Funktions-Taste 1-24 sondern auch z.B. Enter gezielt abgefragt werden.

Die Hex-Werte werden einmalig hinterlegt, z.B.:
1. in einer Copy-Strecke
(Definition von Konstanten in den D-Bestimmungen)
2. in einer Datei mit genau einem Satz
3. in einer eigenen Funktion

Im DDS müssen nur die Funktions-Tasten mit CAxx oder CFxx ohne zusätzliche Bezugszahl definiert werden.
Das Schlüssel-Wort INDARA ist nicht erforderlich.

Die Hex-Werte und ein Beispiel sind unter folgendem Link hinterlegt:

RPGIV ohne Bezugszahlen
(http://www.common-d.de/pdf03/rpg_ohne_bezugszahlen.pdf)

Birgitta