manipulate the HEX value of a variable in COBOL

Question

Using a constant does work: MOVE X "41" TO HEXSTRING-WRK.
Value of HEXSTRING-WRK = \'A

But the hex-value "41" should be variable,