The PROGRAM-ID paragraph identifies a program.

  Format -

   PROGRAM-ID. program-name [IS {| INITIAL |} PROGRAM ][WITH IDENT id-str].
                            [   {| COMMON  |}         ]