Convert from hexadecimal string to (B8)

Hello, i have a natural string containig an hexadecimal value in character-pair, i mean:

DEFINE DATA LOCAL
#A (A16)
#B (B8)
END-DEFINE
#A := ‘D0A86BD3431C6000’
MOVE EDITED #A (EM=H(16)) TO #B < don’t work

As you can see I would like to restore this hexadecimal string into a B8 field.

When i try move edited above this doesn’t work, how could i handle this?
Thanks kind regards
Diego Gazzo

You were so close.

MOVE EDITED #A TO #B (EM=H(8))