Window mit MSGLIN

[CCAS400]

Hallo zusammen,

ich habe heute (hoffentlich) eine einfache Frage:

Ich habe ein ILE RPG was ein DSPF mit einem Window(kein SFL) beinhaltet.

Window lines . . . . . . . . . . . 22
Window position . . . . . . . . 68
Message line . . . . . . . . . . . Y
Restrict cursor to window . . Y

Ich möchte gerne jetzt Nachrichten in diesem Window anzeigen. In diesem ILE RPG rufe ich 2 Cl-PGMe auf.
1. RMVMSG PGMQ(*PRV) CLEAR(*ALL)

2. SNDPGMMSG MSGID(&MSGID) MSGF(&MSGF) TOPGMQ(*PRV)

Aus dem ILE PGM übergebe ich die MSGF und MSGID.

Ich sehe die Nachrichten nur in meinem Joblog und nicht im DSPF.

Hat jemand eine Idee?

Vielen Dank im voraus.

CCAS400

[AS400.lehrling]

Die zum Benutzer gehöhrende nachrichten warteschlange auf break umstellen.

Sollte so gehen CHGMSGQ, den Benutzer angeben und auf *break stellen.

Gruß AS400.lehrling

[CCAS400]

Hallo AS400.Lehrling,

vielen Dank für deine rasche Antwort. Leider war dies nicht die Lösung.

1400 - SNDPGMMSG MSGID(NET0002) MSGF(ADMSG) TOPGMQ(*PRV) Product Type not valid. Please enter a valid Product Type or press F4=List

Sehe ich leider immer nur im Joblog.

Gruss
CCAS400

[AS400.lehrling]

Hallo AS400.Lehrling,

vielen Dank für deine rasche Antwort. Leider war dies nicht die Lösung.

1400 - SNDPGMMSG MSGID(NET0002) MSGF(ADMSG) TOPGMQ(*PRV) Product Type not valid. Please enter a valid Product Type or press F4=List

Das würde ich so interpretieren das ADMSG falsch ist, ist den ADMSG auf den System vorhanden ?

Was hast du für eine Auswahl wenn du F4 drückst ?

Gruß AS400.lehrling

[CCAS400]

Ja, der MSGF und auch MSGID wird gefunden.

Product Type not valid....

Gruss
CCAS400

[AS400.lehrling]

Ja, der MSGF und auch MSGID wird gefunden.

Product Type not valid....

Gruss
CCAS400

Habe hier etwas gefunden eventuell hilft es dir weiter.

Retrieve Message (QMHRTVM) API

Denke ganz stark die hier ist das was du gesucht hast

11.2.1 "RPG/400 User's Guide" IBM Library Server

Stammt beides aus Beiträgen dieses Forums.

Dank kannst du an Herrn Fürchau richten.

Gruß AS400.lehrling

[kitvb1]

Ensure that you are not using the RMVWDW keyword. This keyword may suppress error messages.

[CCAS400]

Hi,

no, i don´t use the parameter RMVWDW.

Thx,

CCAS400

[Bogomil]

Hallo CCAS400,

Der Message line-Parameter bezieht sich auf die Systemnachrichtenzeile.
Wenn Du Nachrichten mit SNDPGMMSG oder Message-API anzeigen möchtest, dann brauchst Du eine Nachrichtensubdatei. Das gilt auch für ein WINDOW. Beispiel siehe unten.
Das Feld MSGPGM muss Dein Programmnamen enthalten.
Ausgabe:
write WINDOW;
write CTLMSG;
exfmt WIN1;

Mfg Bogomil



A DSPSIZ(24 80 *DS3)
A* Referenzfenster
A R WINDOW
A WINDOW(3 10 17 44 *NOMSGLIN)
A WDWBORDER((*COLOR BLU))
A* Nachrichtensubdatei
A R SFLMSG SFL
A SFLMSGRCD(17)
A MSGKEY SFLMSGKEY
A MSGPGM SFLPGMQ
A*
A R CTLMSG SFLCTL(SFLMSG)
A OVERLAY
A SFLDSP
A SFLDSPCTL
A SFLINZ
A SFLSIZ(0005)
A SFLPAG(0001)
A WINDOW(WINDOW)
A MSGPGM SFLPGMQ(10)
A* eigentlicher Bildschirm
A R WIN1
A WINDOW(WINDOW)
A OVERLAY
...

[Fuerchau]

Die Nachrichtenzeile betrifft nur Nachrichten, die per ERRMSGID/SFLMSGID und Bezugszahl beim Write ausgegeben werden.
*YES = in der letzten Zeile des Fensters
*NO = in der letzten Zeile des Bildschirms

Um Nachrichten des Joblogs anzuzeigen benötigst du tatsächlich die Message-Subfile wie oben beschrieben.

[CCAS400]

Hallo Bogomil, hallo Fuerchau,

vielen Dank für eure Antworten.

Bin wieder auf ERRMSGID zurück aufgrund
von erheblichen Zeitmangel.

Vielen Dank nochmal!

Gruss
CCAS400