The Program-ID paragraph gives the name by which a program is identified and assigns selected program attributes to that program.
The Program-ID paragraph specifies the name by which a
program prototype is identified.
The Program-ID paragraph specifies the name by which a call
prototype is identified.
Program-name-1 can be the
same as another user-defined word.
If a hyphen is used in characters 2 through 8 of program-name-1 in a program that is not contained in another program, it is changed to zero (0).
The MAPNAME Compiler
directive controls this behavior.
For programs that are contained
in another program, program-name-1 can be any valid user-defined COBOL word, up
to 30 characters long. The first eight characters need not be unique, and they
will not be converted as described above. Lower-case letters are valid, but
such program-names will be handled in a case-insensitive manner.
or
RECURSIVE
must be specified.
Any programs contained
within a recursive program are recursive.
A program in which
the Local-Storage Section is specified is recursive.
A recursive program may be called while it is active and may call itself.