NEWSboard Internet-Museum für das Schwarze Brett der AS/400
Frage: Feldinhalt von DSPF-Feld anonym füllen (über RTNCSRLOC)?
[
Follow Ups ] [
Neuen Beitrag verfassen!
] [ Schwarzes Brett ] [
FAQ ]
Posted ByJürgen Heilig on June 21, 1999 at 15:09:55:
Hallo,
folgendes Beispiel:
Maske mit vier Feldern:
Name 30A
Str 30A
PLZ 10A
Ort 30A
Der Anwender sollte über F4 bie PLZ ein Window bekommen und einen Wert auswählen.
Über ein PositionsanzeigerFeld(RTNCSRLOC = #FELD 10A) bekommt das Programm den Wert #FELD="PLZ".
Mit diesem Wert startet ein Unterprogramm USRF4 und gibt ans aufrufende Programm
einen Wert (ReturnWert max. 20A) zurück.
Das Aufrufprogramm sollte jetzt variabel einen MOVEL machen können (wie in C)
also: MOVEL ReturnWert %Addr(#FELD)
statt: SELECT
WHEN #FELD='Name'
EVAL Name=ReturnWert
WHEN #FELD='PLZ'
EVAL PLZ=ReturnWert
...
ENDSL
ILE-RPG nimmt hier aber für #FELD nur die Adresse von eben diesem Feld und nicht den Inhalt als Feld!
Vielleicht gibt es ja ein API für diese Funktion?
Vielen Dank für Ihre Mühe
J. Heilig
Follow Ups
Neuen Beitrag verfassen!