Also consider putting all LPA modules into a single function pack load module so that the SETPROG LPA is always for the same module name (if a contained CSECT is updated by maintenance). CSVQUERY SEARCH=LPA can be used to locate your function pack when server/client starts.
You need a header structure that is a vector table of the included CSECTs at the start of the LPA load module. Your server/client code just need a mapping of the vector table so that it can slice-and-dice the LPA load module to find the service entry points. Rob Scott Rocket Software From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of Ed Jaffe Sent: 05 April 2022 04:04 To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: LPA EXTERNAL EMAIL On 4/4/2022 5:13 PM, Rob Schramm wrote: > I am feeling particularly annoyed. I don't want to use LPALSTxx for > products. I want to be able to upgrade a product with a minimum of fuss. > I would like to use PROGXX and manage LPA dynamically. But the PROGxx and > SETPROG seem woefully under-powered for such a thing. This is more pointed > when systems have infrequent IPLs. SETPROG LPA,ADD,MASK=*,DSN=data.set.name -- Phoenix Software International Edward E. Jaffe 831 Parkview Drive North El Segundo, CA 90245 https://www.phoenixsoftware.com/<https://www.phoenixsoftware.com> -------------------------------------------------------------------------------- This e-mail message, including any attachments, appended messages and the information contained therein, is for the sole use of the intended recipient(s). If you are not an intended recipient or have otherwise received this email message in error, any use, dissemination, distribution, review, storage or copying of this e-mail message and the information contained therein is strictly prohibited. If you are not an intended recipient, please contact the sender by reply e-mail and destroy all copies of this email message and do not otherwise utilize or retain this email message or any or all of the information contained therein. Although this email message and any attachments or appended messages are believed to be free of any virus or other defect that might affect any computer system into which it is received and opened, it is the responsibility of the recipient to ensure that it is virus free and no responsibility is accepted by the sender for any loss or damage arising in any way from its opening or use. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu<mailto:lists...@listserv.ua.edu> with the message: INFO IBM-MAIN ================================ Rocket Software, Inc. and subsidiaries ■ 77 Fourth Avenue, Waltham MA 02451 ■ Main Office Toll Free Number: +1 855.577.4323 Contact Customer Support: https://my.rocketsoftware.com/RocketCommunity/RCEmailSupport Unsubscribe from Marketing Messages/Manage Your Subscription Preferences - http://www.rocketsoftware.com/manage-your-email-preferences Privacy Policy - http://www.rocketsoftware.com/company/legal/privacy-policy ================================ This communication and any attachments may contain confidential information of Rocket Software, Inc. All unauthorized use, disclosure or distribution is prohibited. If you are not the intended recipient, please notify Rocket Software immediately and destroy all copies of this communication. Thank you. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
