View Full Version : SNDBRKMSG mit Wert einer Variablen
Hallo
Ich hab mir zur schnelleren Fehlersuche ein CL mit SNDBRKMSG gebaut, daß bei Bedarf im Programm aufgerufen wird. Kann man im Text auch Werte von Variablen ausgeben, um die richtige Funktion von Berechnungen zu testen, ohne jedesmal ein Printfile zu generieren.
Vielleicht denke ich ja auch zu umständlich und einer hat mir nen besseren Weg, meine "Programmierkünste" zu überprüfen.
Danke schon mal.
Marc
In den Nachrichten kann man Felder definieren, die dann mi &1, &2 usw. im Text referiert werden.
Beim SNDxxxMSG ... MSGDTA(&FELD) wird der Text dann mit den Inhalten ergänzt.
Die CPF9897/CPF9898 in der QCPFMSG enthält genau 1 Feld, dass man für solche Zwecke schnell mal verwenden kann.
DSPMSGD RANGE(CPF9897)
Habs noch nicht ganz kapiert, kommt aber auf einen Versuch an. Danke für die schnelle Antwort.
Gruß
Marc
Warum machst du keinen DMPCLPGM im CL,
es werden dir dann alle Programmvariablen genau an dieser Stelle in einem Spool angezeigt.
Du kannst auch mehrere DMPCLPGM angeben
Gruß Margot
Hallo
Übergib die Felder als Parameter. diese dann im msgtext mit *cat oder *bcat verknüpfen und ausgeben.
Klaus
Naja, kleine Fehler große Wirkung:
Mittels SNDBRKMSG können natürlich keine Variablen eingebaut werden !
Hierfür gibts den SNDPGMMSG und dort werden Variablen mit MSGDTA(&myvar) übergeben.
Möchte man unbedingt SNDBRKMSG verwenden, so muss man sich per RTVMSG ... MSGDTA(&myvar) den Text erst aufbereiten lassen um ihn dann per SNDBRKMSG MSG(&mytext) dann tatsächlich zu senden.
Natürlich kann ich den Text zusammenbauen.
Hier ein beispiel mit SNDMSG geht auber auch bei SNDBRKMSG
Nur die Hochkomma beachten :)
PGM PARM(&KDKDGR)
DCL VAR(&KDKDGR) TYPE(*CHAR) LEN(3)
SNDMSG MSG('LS-Schreibung xxx gestartet ' *CAT +
&KDKDGR) TOUSR(TIPPMANN)
DLYJOB DLY(02)
ENDPGM
@Tippi
Ich meine Ersatzvariablen in einer Nachrichtenbeschreibung (&1 &2 ...) !
Nur damit bin ich dann auch mehrsprachig durch vorschalten/überschreiben der MSGF.