The CODE-SET clause can be used to equate a sequential or line sequential file with an alphabet-name like ASCII or EBCDIC which contains non-DISPLAY data by using the Micro Focus extension of the CODE-SET clause which is the FOR phrase as follows:
alphabet EBC is EBCDIC.
select test-file assign to "testfile.dat"
organization is line sequential.
code-set is EBC FOR test-name test-company test-address test-comment.
05 test-name pic x(30).
05 test-company pic x(30).
05 test-address pic x(30).
05 test-amount pic 9(9) comp.
05 test-comment pic x(30).
Fields defined as non-DISPLAY like test-amount are left out of the list and therefore will not be converted.
The FOR can also specify group items and all elementary items of the group will be ignored.