× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.

I haven't seen that one before, so I experimented and found the OPM
translator down in SLIC blocks RETSTHLS from compiling.

Looking over the QPARIXEN program I see RETSTHLS receives one machine space
pointer operand, TCBPOINTER.  Look in the DCL's for things based on this
pointer, and I see a structure, which at position 81, has a pointer to
another structure, and the DCL's based on that second structure sure look a
lot to me like the Name Resolution List, I mean the bit-and-pointer
structure in PCO that contains the library list + product library + current
library, and such.

With my MI explorer program on V5R2 I noticed my job's PCO at offset
H"10E0" has the string "WTCB", and 96 bytes beyond that is a pointer to my
job's Name Resolution List.  So my wild guess is that RETSTHLS returns a
pointer set to 16 bytes into this "WTCB" structure in the current job's
PCO, and that IBM is using RETSTHLS as a means to resolve the QPARIXEN's
incoming parameter from "*CURLIB".

I haven't tried this, but to verify, you could run the program and set OPM
breakpoint after all the RETSTHLS's, then DSPPGMVAR the TCBPOINTER and look
at the address, then find an address in System Service Tools that matches.

Confidential:  This electronic message and all contents contain information
from ReviewWorks which may be privileged, confidential or otherwise
protected from disclosure.  The information is intended to be for the
addressee only.  If you are not the addressee; disclosure, copy,
distribution or use of the contents of this message is prohibited.  If you
have received this electronic message in error, please notify us
immediately 1.800.443.1320  and destroy the original message and all

As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2022 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.