NDF_XPT0x - Write a scalar value to a component within a named NDF extension

Description:

The routine writes a scalar value to a component within a named NDF extension. The extension must already exist, although the component within the extension need not exist and will be created if necessary.

Invocation:

CALL NDF_XPT0x( VALUE, INDF, XNAME, CMPT, STATUS )

Arguments:

VALUE = ? (Given)

The value to be written to the extension component. Its type is determined by the name of the routine called (see the Notes section).

INDF = INTEGER (Given)

NDF identifier.

XNAME = CHARACTER $*$ ( $*$ ) (Given)

Name of the NDF extension.

CMPT = CHARACTER $*$ ( $*$ ) (Given)

Name of the component within the extension whose value is to be assigned.

STATUS = INTEGER (Given and Returned)

The global status.

Notes:

• There is a routine for writing values with each of the standard Fortran data types: integer, real, double precision, logical and character. Replace the (lower case) "x" in the routine name by I, R, D, L or C as appropriate.

• The value given for the CMPT argument may be an HDS path name, consisting of several fields separated by '.', so that an object can be accessed in a sub-component (or a sub-sub-component...) of an NDF extension. Array subscripts may also be included. Thus a string such as 'CALIB.FILTER(3).WAVELENGTH' could be used as a valid CMPT value.

• All HDS structures which lie above the specified component within the extension must already exist, otherwise an error will result.

• If the specified extension component does not already exist, then it will be created by this routine. If it already exits, but does not have the correct type or shape, then it will be deleted and a new scalar component with the appropriate type will be created in its place.