HDS_STATE - Enquire the current state of HDS

Description:

This routine returns a logical value indicating whether HDS is currently active or inactive.

Invocation:

CALL HDS_STATE( STATE, STATUS )

Arguments:

STATE = LOGICAL (Returned)

The current state of HDS: .TRUE. for active, .FALSE. for inactive.

STATUS = INTEGER (Given and Returned)

The global status.