der DCL-SUBF ist eine der wichtigsten Deklarationsarten und wird gebraucht, damit man in einer Datenstruktur, auch im Freeformat, Felder deklarieren kann, die man dann nur im fixed Format verwenden kann.
Ich habe da mal ein Beispiel aus einer offiziösen Doku:

Example 13. Data structure with the DCL-SUBF keyword

DCL-DS record_one;
buffer CHAR(25);
DCL-SUBF read INT(3);
END-DS;