*>>SOURCE FORMAT IS FIXED *> *************************************************************** *> Author: *> Date: *> Purpose: *> Tectonics: cobc *> *************************************************************** identification division. program-id. . environment division. configuration section. input-output section. *> file-control. *> select *> assign to *> organization is *> . data division. *> file section. *> fd . *> 01 . working-storage section. local-storage section. linkage section. screen section. *> *************************************************************** procedure division. goback. end program .