PDA

View Full Version : Werte in Displayfile vorbelegen



hs
29-09-08, 12:28
Möchte in einem Displayfile ein Eingabefeld mit einem sinnvollen Wert vorbelegen.

Das sollte doch eigentlich klappen mit:

CHGVAR VAR(&EINGABE) VALUE('MEINWERT')
SNDRCVF RCDFMT(SCREEN)

Im Displayfile wird dieser Wert aber nicht angezeigt.

Was mache ich falsch?

Danke für eure Antworten,
HS

tfroehlich
29-09-08, 12:38
Hallo,

vielleicht hast Du das Feld nicht in deinem CLP deklariert?

Gruss Thomas

hs
29-09-08, 12:46
Doch:

DCL VAR(&EINGABE) TYPE(*CHAR) LEN(10)

tfroehlich
29-09-08, 12:58
Hallo,

ich habe gerade in meinen CLP nachgeschaut.

Die Vorbelegung machen wir bei der Deklarierung:

Zum Beispiel:
DCL VAR(&BSTXUE) TYPE(*CHAR) LEN(30) +
VALUE('SICHERUNG: BIBLIOTHEKEN (VON:)')

Anschließend ein DCLF file(...../....)

SNDRCVF RCDFMT(.......)

Vielleicht hilft dieser Ansatz.

Gruss Thomas

Pikachu
29-09-08, 13:30
Das Feld müßte doch eigentlich durch das DCLF im CL-Programm definiert werden? Laß mal das separate DCL weg.

Sind Format und Feld vielleicht mit PUTOVR, OVRDTA, DFTVAL definiert?

hs
29-09-08, 13:47
Vorbelegung bringt leider nichts, weitere Optionen nutze ich nicht:

Hier mal ein CL und DSPF als Beispiel (funktioniert so nicht):

CLP:
PGM
DCLF FILE(TESTD)
CHGVAR VAR(&EINGABE) VALUE('XXX')
SNDRCVF RCDFMT(SCREEN)
ENDPGM

DSPF:
A R SCREEN
A EINGABE 10A I 07 20

RobertMack
29-09-08, 14:03
ersetze mal das I durch ein B:
A EINGABE 10A B 07 20

hs
29-09-08, 14:23
Super, das wars!

Danke nochmal
HS