fpd

  usage: Format COBOL Procedure Division Source Code
 syntax: fpd [-c] SourceInFile [SourceOutFile]
  where: - '-c' Don't Check for text in columns > 72
         - SourceInFile is Source File to be Formatted
         - (Optional) SourceOutFile is Formatted Output File