DAT_CCOPY - Copy one structure level

Description:

Copy an object into a structure and give the new component the specified name. If the source object is a structure, a new structure of the same type and shape is created but the content of the original structure is not copied.

Invocation:

CALL DAT_CCOPY( LOC1, LOC2, NAME, LOC3, STATUS )

Arguments:

LOC1 = CHARACTER * ( DAT__SZLOC ) (Given)

Object locator.

LOC2 = CHARACTER * ( DAT__SZLOC ) (Given)

Structure locator.

NAME = CHARACTER * ( DAT__SZNAM ) (Given)

Component name.

LOC3 = CHARACTER * ( DAT__SZLOC ) (Returned)

Component locator.

STATUS = INTEGER (Given and Returned)

The global status.