PDA

View Full Version : CL - Programm Message ausgeben



pabloesco
19-12-19, 11:00
Hallo Forum,

Ich suche nach einem Befehl um in einem CL - Programm eine Meldung/Message ausgeben zu lassen, wenn die Verarbeitung abgeschlossen ist. Ich habe dies schon öfters in anderen Programmen gesehen, da wurde dann unten links im Bildschirm, eine Meldung ausgegeben.

malzusrex
19-12-19, 11:40
Meinst du vielleicht
sndpgmmsg
?

Gruß
Ronald

pabloesco
19-12-19, 11:49
Hab es jetzt mal so ausprobiert. Leider tut sich da nichts.

SNDPGMMSG MSG('VORGANG WAR ERFOLGREICH')

prsbrc
19-12-19, 11:59
Ohne zu wissen wo dein SNDPGMMSG aufgerufen wird versuch mal die Option MSGTYPE(*COMP) hinzu zu fügen.

pabloesco
19-12-19, 13:02
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
19-12-19, 13:57
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
19-12-19, 15:56
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
19-12-19, 17:35
https://www.ibm.com/support/knowledgecenter/ssw_ibm_i_72/cl/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.