%SBTTL 'Dummy - '
ROUTINE dummy =

!++
!
! FUNCTIONAL DESCRIPTION:
!
! ENVIRONMENT:
!
!	All access modes, AST reentrant.
!
! CALLING SEQUENCE:
!
!	DUMMY ()
!
! LINKAGE:
!
!	CALL
!
! FORMAL PARAMETERS:
!
!	None.
!
! IMPLICIT INPUTS:
!
!	None.
!
! IMPLICIT OUTPUTS:
!
!	None.
!
! COMPLETION CODES:
!
!	SS$_NORMAL	Normal successful completion.
!
! SIDE EFFECTS:
!
!	None.
!
!--

    BEGIN
    RETURN (ss$_normal);
    END;					! End of routine DUMMY