CL - Programm Message ausgeben

[malzusrex]

Meinst du vielleicht
sndpgmmsg
?

Gruß
Ronald

[pabloesco]

Hab es jetzt mal so ausprobiert. Leider tut sich da nichts.

SNDPGMMSG MSG('VORGANG WAR ERFOLGREICH')

[prsbrc]

Ohne zu wissen wo dein SNDPGMMSG aufgerufen wird versuch mal die Option MSGTYPE(*COMP) hinzu zu fügen.

[pabloesco]

Hallo,
gesagt und getan. Tut sich leider trotzdem nichts. Eventuell ist es ja auch der falsche Befehl oder es gibt einen anderen ?

Edit: Mit folgendem Befehl tut sich was.
SNDPGMMSG MSG(&MSG) TOPGMQ(*EXT)

Aber es öffnet sich quasi ein neues Fenster wo mir die Nachricht angezeigt wird. Ich würd gern die Nachricht nur als kleine Statusmeldung haben.

[prsbrc]

Je nachdem was du brauchst solltest du die Typen probieren.
Wenn die Meldung angezeigt werden soll nachdem dein programm beendet wurde dann funktioniert das folgendermaßen:

PGM                                            
SNDPGMMSG  MSG('Test alles gut') TOPGMQ(*PRV) +
             MSGTYPE(*COMP)                    
ENDPGM

Hab es getestet... läuft wunderbar

Vielleicht postest ja den betreffenden Teil deines Codes dann sieht man mehr.

[hel400]

nicht zu vergessen: Es kommt ja auch darauf an, WO das Pgm aufgerufen wird,
also in einer Cmdline oder in einem SDA-Menü oder ein "programmiertes" Menü usw..!

[Fuerchau]

https://www.ibm.com/support/knowledg.../sndpgmmsg.htm

SNDPGMMSG MSGID(CPF9798) MSGDTA('Meine Nachricht') TOPGMQ(*EXT) MSGTYPE(*STATUS)

Die Id CPF9798 sowie CPF9797 enthalten nur 1 Feld und werden halt so angezeigt.