DAT_SHAPE - Enquire object shape

Description:

Enquire the shape of an object.

Invocation:

CALL DAT_SHAPE( LOC, NDIMX, DIM, NDIM, STATUS )

Arguments:

LOC = CHARACTER * ( DAT__SZLOC ) (Given)

Object locator.

NDIMX = INTEGER (Given)

Size of dim.

DIM = INTEGER( NDIMX ) (Returned)

Object dimensions.

NDIM = INTEGER (Returned)

Number of dimensions.

STATUS = INTEGER (Given and Returned)

The global status.