The WRITE statement releases a logical record to an output or
input-output file. It can also position lines vertically on a logical
page.
Format 2 -
WRITE rec-name [ FROM src-item ] [ ALLOWING NO OTHERS ]
[ INVALID KEY stment ] [ NOT INVALID KEY stment ]
[ END-WRITE ]
Additional Information:
explode
extract