mk
24-09-04, 19:25
Hallo zusammen, :cool:
ich habe eine kleine Sache die ich nicht verstehe. Vielleicht hat jemand einen Tipp.
Ich habe ein COMMAND mit folgender Anweisung
PARM KWD(SPUSER) TYPE(LISTOUT) CHOICE(*NONE) +
PMTCTL(OUTFMT) PROMPT('Dokumentangaben +
Benutzername')
LISTOUT: ELEM TYPE(*CHAR) LEN(4) RSTD(*YES) DFT(*YES) +
SPCVAL((*NO) (*YES)) PROMPT('Benutzername +
im Dokument')
Wenn ich den Befehl Aufrufe kann ich *YES oder *NO eingeben.
Das ist so gewollt.
In dem CL Programm das den Befehl verarbeitet erscheint kurioserweise folgender Wert im Debug:
&SPUSER = '*Y'
dabei sind anscheinend die ersten zwei Bytes Hex und die restlichen zwei Bytes der Anfang von *YES
Das Feld ist in dem CL Programm mit Char 4 definiert.
Hat jemand eine Idee ?
Gruss an *all
Michael
ich habe eine kleine Sache die ich nicht verstehe. Vielleicht hat jemand einen Tipp.
Ich habe ein COMMAND mit folgender Anweisung
PARM KWD(SPUSER) TYPE(LISTOUT) CHOICE(*NONE) +
PMTCTL(OUTFMT) PROMPT('Dokumentangaben +
Benutzername')
LISTOUT: ELEM TYPE(*CHAR) LEN(4) RSTD(*YES) DFT(*YES) +
SPCVAL((*NO) (*YES)) PROMPT('Benutzername +
im Dokument')
Wenn ich den Befehl Aufrufe kann ich *YES oder *NO eingeben.
Das ist so gewollt.
In dem CL Programm das den Befehl verarbeitet erscheint kurioserweise folgender Wert im Debug:
&SPUSER = '*Y'
dabei sind anscheinend die ersten zwei Bytes Hex und die restlichen zwei Bytes der Anfang von *YES
Das Feld ist in dem CL Programm mit Char 4 definiert.
Hat jemand eine Idee ?
Gruss an *all
Michael