The routine NDF_CGET may be used to obtain the values of NDF character components. For instance:
CHARACTER * ( 80 ) VALUE ... VALUE = 'Default label' CALL NDF_CGET( INDF, 'Label', VALUE, STATUS )
will obtain the value of the label component, if defined, and return it via the VALUE argument. If the component is undefined, then no value will be returned so the default value established before the subroutine call would be used instead.
If the value of a character component is needed as part of a message, then it may be assigned directly to an MSG_ message token using the NDF_CMSG routine. Thus an application might generate a message about the title of an NDF as follows:
CALL NDF_CMSG( 'TITLE', INDF, 'Title', STATUS ) CALL MSG_OUT( 'PROG_TITLE', 'NDF title: ^TITLE', STATUS )
Here, `TITLE' is the name of a message token (see