SUBROUTINE

   Defines the beginning of a subroutine in a command procedure. The
   SUBROUTINE command must be the first executable statement in a
   subroutine.

   For more information about the SUBROUTINE command, see the
   description of the CALL command.

   Format

     SUBROUTINE