Defines templates for a routine contained within a subroutine
    package.

    Format

      DEFINE ROUTINE   routine-name [parameter, . . . ]