This is a seedwork sample. The SORT OUTPUT PROCEDURE could manipulate the sorted records before they are returned to the write portion of the internal COBOL sort algorithm. In this case, no transformation is done, work-rec is directly moved to out-rec.
GCobol >>SOURCE FORMAT IS FIXED
...