In the following code, an encoding of 1208 is incorrect; for national items, the encoding should be 1200.
$set nsymbol(national) 01 i1. 05 x1 pic x. 01 i2 pic n(200). move n'{"i1":{"x1":"£"}}' to i2. json parse i2 into i1 encoding 1208.