"Formatierten" Text mit SNDDST ausgeben

[bettina_martin]

Hallo Bettina, ich verwende auch das SNDDST für formatierte Textausgaben per Mail mit den zu verfügung stehenden Parametern :N + :P. Ich nutze die Option *LMSG im SNDDST

Definition &NA + &NZ :

DCL VAR(&NZ) TYPE(*CHAR) LEN(3) VALUE(':/N')
DCL VAR(&NA) TYPE(*CHAR) LEN(3) VALUE(':/P')

Code für das zusammenbasteln der Meldung :

CHGVAR VAR(&LMSG) VALUE(' Jobinformation +
' *BCAT &NZ *BCAT +
'---------------------------------------' +
*BCAT &NA *BCAT 'System :' *BCAT +
&SYSSYS *BCAT &NA *BCAT 'Objekt :' +
*BCAT &SYSOBJ *BCAT &NZ *BCAT '-Art +
:' *BCAT &SYSART *BCAT &NZ *BCAT +
'Benutzer :' *BCAT &SYSUSR *BCAT &NZ +
*BCAT 'Zeitüberw.:' *BCAT &SYSTIC *BCAT +
&NZ *BCAT 'Von :' *BCAT &SYSTIV +
*BCAT &NZ *BCAT 'Bis :' *BCAT +
&SYSTIB *BCAT &NZ *BCAT 'Restart :' +
*BCAT &SYSACN *BCAT &NZ *BCAT 'Befehl +
:' *BCAT &SYSAC1 *BCAT &NZ *BCAT +
'Param.-1 :' *BCAT &SYSAC2 *BCAT &NZ +
*BCAT 'Param.-2 :' *BCAT &SYSAC3 *BCAT +
&NZ *BCAT 'Fehler :' *BCAT &SYSMTX +
*BCAT &NZ *BCAT &NZ *BCAT 'Aktion ! :' +
*BCAT &AKTION)

Vielleicht hilft Dir das ja weiter.

Gruss aus HH, Andreas

Super, das funktioniert jetzt so !

Nur habe ich noch ein Problem: ich zeige in diesem Text die Variable an, welche aus dem Parameter SECLVL aus dem Befehl RCVMSG kommt.

Dieser Text schaut in der Email so aus:

&N Ursache . . . . : Das CL-Programm TESTXXX in Bibliothek CMSMS1 hat einen Fehler bei Anweisung 200 festgestellt. Der Nachrichtentext für CPF0001 ist: Fehler in Befehl CALL gefunden.. &N Fehlerbeseitigung: Das Anzeigen der Anfragenachricht kann durch Ändern des Programms ausgeschlossen werden. Fehler überwachen (Befehl MONMSG) und die Fehlerbeseitigung innerhalb des Programms durchführen. Um fortzufahren, einen Antwortwert eingeben. &N Auswahlmöglichkeiten . . . . . . . . . . . . . . . . . . . . . . . . : &B C -- CL-Programm abbrechen. &B D -- Speicherauszug der CL-Programmvariablen erstellen und Programm abbrechen. &B I -- Fehlgeschlagenen Befehl ignorieren. &B R -- Fehlgeschlagenen Befehl wiederholen.

D.h. auch hier habe ich das &N und &B drinnen, auf das ich hier ja keinen Einfluss habe, weil es ja schon so angeliefert wird.

Sonst funktioniert das ganze sehr schön wie du mir es geschildert hast wenn ich mit DCL die Variablen anlege.

lg