Have you considerd using TSO service routinesm e.g., IKJEFF02? See <https://www-40.ibm.com/servers/resourcelink/svc00100.nsf/pages/zOSV2R5sa320973/$file/ikjb700_v2r5.pdf>
________________________________________ 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 **************** ***************
