01 PREFIX-RECORD.
           05 PREFIX-CODE           PIC X(10).
           05 PREFIX-NAME           PIC X(30).