next up previous 372
Next: NBS_END_DEFINITION - End the definition of a noticeboard and then create the noticeboard, save the definition in a file, or
Up: Description of Individual NBS Routines
Previous: NBS_DEFINE_PRIMITIVE - Define a new entry for a primitive item within another structured item and return a static identifier to


NBS_DEFINE_SHAPE - Define an initial shape for a primitive item

Description:
Check that we are currently in the middle of defining a noticeboard.
Check that the environment static ID is not NIL and pertains to a primitive item.
Check that the requested number of dimensions is not too large.
Copy the shape information to the relevant parts of the item information.

Invocation:
(Int) = NBS_DEFINE_SHAPE (SID,NDIMS,DIMS,STATUS)

Arguments:

SID = INTEGER (Given)
Static identifier of the item in the noticeboard which is to be given an initial shape.
NDIM = INTEGER (Given)
Number of dimensions.
DIMS = INTEGER(*) (Given)
Dimensions.
STATUS = INTEGER (Given and returned)
The global status. Possible return values are,

NBS__NOTDEFINING 		 Not currently defining a noticeboard 

NBS__NILSID NIL static ID
NBS__PRIMITIVE Prospective parent is primitive
NBS__TOOMANYDIMS Too many dimensions



next up previous 372
Next: NBS_END_DEFINITION - End the definition of a noticeboard and then create the noticeboard, save the definition in a file, or
Up: Description of Individual NBS Routines
Previous: NBS_DEFINE_PRIMITIVE - Define a new entry for a primitive item within another structured item and return a static identifier to

NBS The Noticeboard System
Starlink User Note 77
D.J. Allan
11 September 1995
E-mail:ussc@star.rl.ac.uk