I'm actually working with LE messages right now.  Not CEEMSG specifically, but 
a combination of:
1) Custom LE conditions and messages
2) CEECMI to add an "insert" to a message represented by a condition token
3) CEEMGET to retrieve the formatted message from a condition token

Best place to start is probably "Using and handling messages" in the LE 
Programming Guide.
https://www.ibm.com/docs/en/zos/2.5.0?topic=models-using-handling-messages

-----Original Message-----
From: IBM Mainframe Assembler List <[email protected]> On Behalf 
Of Farley, Peter
Sent: Tuesday, April 18, 2023 8:24 AM
To: [email protected]
Subject: [EXTERNAL] Re: Automatic Variable Insertion

Requiring the entire TSO environment to use its message processing subroutine 
seems like overkill to me if the program that needs the variable message 
processing is not already using a TSO environment.

I wonder if LE's CEEMSG can substitute fields in a message?  I haven't 
investigated that service myself, but it may be worth a look.

Peter

-----Original Message-----
From: IBM Mainframe Assembler List <[email protected]> On Behalf 
Of Seymour J Metz
Sent: Tuesday, April 18, 2023 8:40 AM
To: [email protected]
Subject: Re: Automatic Variable Insertion

Have you considerd using TSO service routinesm e.g., IKJEFF02? See 
<https://urldefense.com/v3/__https://www-40.ibm.com/servers/resourcelink/svc00100.nsf/pages/zOSV2R5sa320973/$file/ikjb700_v2r5.pdf__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!KErM8cAQjkGTJhhY0BiVSOgFv5pE3ctkGC_BEW_ZAh3yfsbXiwXbsigkm-1rUc6ovfOHPOBe6DLyktncimJshg$
 >

________________________________________
From: IBM Mainframe Assembler List <[email protected]> on behalf 
of [email protected] <[email protected]>
Sent: Monday, April 17, 2023 6:44 PM
To: [email protected]
Subject: Automatic Variable Insertion

Hello
.
I have many messages, where one or more variables need to be inserted into a 
WTO with MF=L

For Example:
MB$015   WTO  'MB$015 - Locating Subsystem .... ',MF=L
MB$016   WTO  'MB$016 - SubSystem .... Not Found ',MF=L
.
I typically code something like this:
MVC   MB$015+32(04),SSINAME

For Example:
MB$015   WTO  'MB$015 - Locating Subsystem .... ',MF=L
MB$016   WTO  'MB$016 - SubSystem .... Not Found ',MF=L
.
I'm looking to develope a macro which automatically inserts.
one or more variables into a WTO without having any prior knowledge as to the 
offset into the WTO text ?
.
The Specific WTO MF=L would not be part of this macro but moreover a parameter 
passed to the macro along with the symbolic variables.
FOR EXAMPLE:
      NEWWTO MB$015,P1=CSQ6
.
In other words the Specific WTO MF=L (MB$015) is not part of the NEWWTO macro.
The NEWWTO Macro should generate the proper instructions to insert several 
VARIABLES into a WTO.
.
The Macro expansion should know how to insert the value of &P1 (CSQ6) into the 
MB$015 WTO MF=L.
.
Any suggestions/recommendations as to how to accomplish this ...
.
Some Basic code samples would be appreciated.
.
Paul D'Angelo
--

This message and any attachments are intended only for the use of the addressee 
and may contain information that is privileged and confidential. If the reader 
of the message is not the intended recipient or an authorized representative of 
the intended recipient, you are hereby notified that any dissemination of this 
communication is strictly prohibited. If you have received this communication 
in error, please notify us immediately by e-mail and delete the message and any 
attachments from your system.

The information contained in this electronic communication and any document 
attached hereto or transmitted herewith is confidential and intended for the 
exclusive use of the individual or entity named above. If the reader of this 
message is not the intended recipient or the employee or agent responsible for 
delivering it to the intended recipient, you are hereby notified that any 
examination, use, dissemination, distribution or copying of this communication 
or any part thereof is strictly prohibited. If you have received this 
communication in error, please immediately notify the sender by reply e-mail 
and destroy this communication. Thank you.

Reply via email to