DAT_NEW - Create component

Description:

Create a new component in a structure.

Invocation:

CALL DAT_NEW( LOC, NAME, TYPE, NDIM, DIM, STATUS )

Arguments:

LOC = CHARACTER * ( DAT__SZLOC ) (Given)

Structure locator.

NAME = CHARACTER * ( DAT__SZNAM ) (Given)

Component name.

TYPE = CHARACTER * ( DAT__SZTYP ) (Given)

Data type.

NDIM = INTEGER (Given)

Number of dimensions.

DIM = INTEGER( NDIM ) (Given)

Component dimensions.

STATUS = INTEGER (Given and Returned)

The global status.

Notes:

If type matches one of the primitive type names a primitive of the appropriate type is created, otherwise the object is assumed to be a structure. The new object can subsequently be located by DAT_FIND. The operation will fail if a component of the same name already exists.