In the following example, you need to remove either the REDEFINES clause or the CONSTANT keyword from the definition of B-REDEF.
01 B. 02 B-1 PIC 9(4) value 1234. 02 B-2 PIC 9(4) value 4321. 01 B-REDEF REDEFINES B PIC X(8) CONSTANT. *> cannot define as CONSTANT