DAT_RCERA - Recursive erase

Description:

Recursively delete a component of a structure.

Invocation:

CALL DAT_RCERA( LOC, NAME, STATUS )

Arguments:

LOC = CHARACTER * ( DAT__SZLOC ) (Given)

Object locator.

NAME = CHARACTER * ( DAT__SZNAM ) (Given)

Component name.

STATUS = INTEGER (Given and Returned)

The global status.

Notes:

This routine is obsolete; its action is now performed by DAT_ERASE.