>>243
01 ATOM-1 PIC X(2).
01 ATOM-2 REDEFINES ATOM-1.
02 ATOM-3 PIC 9(4) USAGE COMUTATIONAL.
01 TABLE-1 PIC X(16) VALUE "0123456789ABCDEF".
01 TABLE-2 REDEFINES TABLE-1.
02 X-0 PIC X OCCURS 16 TIMES.

のようなWORKING-SECTIONの定義はいりますよね。
あとは、ATOM-3を256で割り、
その答えと剰余をまた16で割ってとやっていけばいいんでしょう。
そこで出てきた4つの解からX-0[KAI]でHex文字を引けばよい。