Yes, that works (with minor exception to the StorageCO function, but I managed it).
Thank you all who helped! -- Radoslaw Skorupka Lodz, Poland W dniu 20.09.2023 o 21:28, Charles Mills pisze:
Does this help? /* Point to the RMF data */ CVT_addr = Storage('10', 4) RMCT_addr = StorageCO(CVT_addr, 604, 4) RCT_addr = StorageCO(RMCT_addr, 228, 4) MSUString: /* Return either "(R4HA=nn, CAPPED!)" or "(R4HA=nn, not capped)" */ RCTIMGWU = C2D(StorageCO(RCT_addr, 28, 4)) RCTLACS = C2D(StorageCO(RCT_addr, 196, 4)) RetData = "(R4HA=" || RCTLACS || ", " If RCTLACS >= RCTIMGWU Then RetData = RetData || "CAPPED!)" Else RetData = RetData || "not capped)" Return RetData Charles On Wed, 20 Sep 2023 20:53:11 +0200, Radoslaw Skorupka <[email protected]> wrote:I'm looking how to find out (programatically) the LPAR is being softcapped. AFAIK it was quite easy in CMF, however RMF does not show it explicitly. I also tried BCPii with no result.
---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
