BDI1_CFIND

Locate HDS component for a given item, creating/deleting if required

Invocation

CALL BDI1_CFIND( MID, HID, ITEM, CREATE, DELETE, CLOC, CNDIM, CDIMS, STATUS

Description

Locate HDS component for a given item, creating if required. If the object does not exist and creation is not allowed then CLOC is set to a flag value. The routine returns the shape of the object, whether or not it is created, which is defined by the NDF data model.

Arguments

• MID = INTEGER (given)
  Model data object
• HID = INTEGER (given)
  HDSfile data object
• ITEM = CHARACTER*(*) (given)
  BDI data item
• CREATE = LOGICAL (given)
  Create structures if they don't exist?
• DELETE = LOGICAL (given)
  Delete named item?
• CLOC = CHARACTER*(DAT__SZLOC) (returned)
  Locator to object matching item. If the item does not exist the CLOC is set to the symbolic value DAT__NOLOC
• CNDIM = INTEGER (returned)
  The dimensionality of the object according to the data model. Note that this not necessarily the dimensionality of the actual HDS component
• CDIMS[] = INTEGER (returned)
  The dimensions of the object according to the data model. Note that these are not necessarily the dimensions of the actual HDS component
• STATUS = INTEGER (given and returned)
  The global status.

References

• BDI Subroutine Guide

BDI1_CFIND0

Copy dimensions array and dimensionality

Invocation

CALL BDI1_CFIND0( NDIM, DIMS, CNDIM, CDIMS )

Description

Locate HDS component for a given item, creating if required. If the object does not exist and creation is not allowed then CLOC is set to a flag value.

Arguments

• NDIM = INTEGER (given)
  The dimensionality
• DIMS[] = INTEGER (given)
  The dimensions
• CNDIM = INTEGER (returned)
  Exported copy of NDIM
• CDIMS[] = INTEGER (returned)
  Exported copy of DIMS

References

• BDI Subroutine Guide

BDI1_CFIND1

Locate HDS component for a given item, creating if required

Invocation

CALL BDI1_CFIND1( LOC, NAME, CREATE, DELETE, TYPE, NDIM, DIMS, THERE,

Description

Locate HDS component for a given item, creating if required. If the object does not exist and creation is not allowed then CLOC is set to a flag value.

Arguments

• CLOC = CHARACTER*(DAT__SZLOC) (given)
  The HDS object containing the component we're interested in
• NAME = CHARACTER*(*) (given)
  The name of the component
• CREATE = LOGICAL (given)
  Create component if it doesn't exist?
• DELETE = LOGICAL (given)
  Delete component if it exists?
• TYPE = CHARACTER*(*) (given)
  The type of the component if we have to create it
• NDIM = INTEGER (given)
  The dimensionality of the component if we have to create it
• DIMS[] = INTEGER (given)
  The dimensions of the component if we have to create it
• THERE = LOGICAL (returned)
  Object exists?
• CLOC = CHARACTER*(DAT__SZLOC) (returned)
  Locator to component, if THERE is true
• STATUS = INTEGER (given and returned)
  The global status.

References

• BDI Subroutine Guide