Try using the X2C REXX builtin function. For example,
String = X2c(PRK)
If the value of PRK will ever have a length different than 4 (which seems to
be required by your logic), check the X2c documentation for the length
operand.
-
From: The IBM z/VM Operating
It's been awhile since I've done this. But isn't SYSPROF EXEC in the
CMSINST segment also? So you should re-gen that segment when you change any
EXEC in it. You should also place the latest SYSPROF EXEC on the 490 disk
so you don't lose your mod during a maintenance upgrade.
Good luck.