Our stat exit uses the CSADCVID to determine the time frames that we use to write statistics.
Production uses System 100 thru 108 and writes stats between 9:30 and 10 and 2:30 and 3. Clone uses 1400 thru 1408 and writes stats all the time.
We would like to use the LPAR name as opposed to the CSADCVID if possible.
Do any IDMS control blocks contain the LPAR name? If not, is there a way to get it?
LPAR name is not contained in any IDMS control block.
The following code snippet will get the LPARNAME.
CVT DSECT=YES,LIST=NO TELL MVS THIS IS A DSECT
L R15,CVTPTR @Absolute address X'10'
L R15,CVTECVT R15 -> ECVT
DROP R15 CVT no longer needed
Using ECVT,R15 R15 -> ECVT
MVC WKLPNM,ECVTLPNM Move LPAR name to Work Field