NDF_COPY - Copy an NDF to a new location

Description:

The routine copies an NDF to a new location and returns an identifier for the resulting new base NDF.

Invocation:

CALL NDF_COPY( INDF1, PLACE, INDF2, STATUS )

Arguments:

INDF1 = INTEGER (Given)

Identifier for the NDF (or NDF section) to be copied.

PLACE = INTEGER (Given and Returned)

An NDF placeholder (e.g. generated by the NDF_PLACE routine) which indicates the position in the data system where the new NDF will reside. The placeholder is annulled by this routine, and a value of NDF__NOPL will be returned (as defined in the include file NDF_PAR).

INDF2 = INTEGER (Returned)

Identifier for the new NDF.

STATUS = INTEGER (Given and Returned)

The global status.

Notes:

• If this routine is called with STATUS set, then a value of NDF__NOID will be returned for the INDF2 argument, although no further processing will occur. The same value will also be returned if the routine should fail for any reason. In either event the placeholder will still be annulled. The NDF__NOID constant is defined in the include file NDF_PAR.