.. |_| unicode:: 0xA0
   :trim:

.. role:: small-caps
   :class: small-caps

.. include:: <isonum.txt>


.. index:: single:IDENTIFICATION DIVISION Syntax



.. _IDENTIFICATIONADIVISIONASyntax:

2 IDENTIFICATION DIVISION Syntax
================================

.. index:: single:IDENTIFICATION DIVISION Syntax



IDENTIFICATION DIVISION Syntax
------------------------------
::
  
  [{ IDENTIFICATION } DIVISION. ]
   { ~~~~~~~~~~~~~~ } ~~~~~~~~
   { ID             }
     ~~
   { PROGRAM-ID.  } { program name } .
   { ~~~~~~~~~~   } { literal-1    } [ AS { literal-2 } ] [ Type-clause ] .
   { FUNCTION-ID. } { literal-3 } [ AS literal-4 ] .
     ~~~~~~~~~~~    { function-name } .
   { OPTIONS. }
     ~~~~~~~
   [ DEFAULT ROUNDED MODE IS {AWAY-FROM-ZERO         }
     ~~~~~~~ ~~~~~~~         {NEAREST-AWAY-FROM-ZERO }
                             {NEAREST-EVEN           }
                             {NEAREST-TOWARDS-ZERO   }
                             {PROHIBITED             }
                             {TOWARDS-GREATER        }
                             {TOWARDS-LESSER         }
                             {TRUNCATION             }]
   [ ENTRY-CONVENTION IS {COBOL   }
     ~~~~~~~~~~~~~~~~    {EXTERN  }
                         {STDCALL }]
   [ AUTHOR.        comment-1. ]
     ~~~~~~
   [ DATE-COMPILED. comment-2. ]
     ~~~~~~~~~~~~~
   [ DATE-MODIFIED. comment-3. ]
     ~~~~~~~~~~~~~
   [ DATE-WRITTEN.  comment-4. ]
     ~~~~~~~~~~~~
   [ INSTALLATION.  comment-5. ]
     ~~~~~~~~~~~~
   [ REMARKS.       comment-6. ]
     ~~~~~~~
   [ SECURITY.      comment-7. ]
     ~~~~~~~~



.. index:: single:SECURITY
.. index:: single:REMARKS
.. index:: single:INSTALLATION
.. index:: single:DATE-WRITTEN
.. index:: single:DATE-MODIFIED
.. index:: single:DATE-COMPILED
.. index:: single:AUTHOR

The
\ \ :code:`AUTHOR`\ ,
\ \ :code:`DATE-COMPILED`\ ,
\ \ :code:`DATE-MODIFIED`\ ,
\ \ :code:`DATE-WRITTEN`\ ,
\ \ :code:`INSTALLATION`\ ,
\ \ :code:`REMARKS`\  and
\ \ :code:`SECURITY`\ 
paragraphs are supported by GnuCOBOL only to provide compatibility with programs written for the ANS1974 (or earlier) standards.  As of the ANS1985 standard, these clauses have become obsolete and should not be used in new programs.

.. index:: single:PROGRAM-ID Type Clause Syntax



PROGRAM-ID Type Clause Syntax
-----------------------------
::
  
   IS [ COMMON ] [ INITIAL|RECURSIVE PROGRAM ]
        ~~~~~~     ~~~~~~~ ~~~~~~~~~