hi all,
here is code to convet 'A' to 65.
How to convet 65 to 'A'!?
data : c.
field-symbols : <n> type x.
data : rn type i.
c = 'A'.
assign c to <n> casting.
move <n> to rn.
write rn.