Subroutine:    GDSD_WRITEC

Purpose:       Write CHARACTER-typed descriptor item

Category:      GDS

File:          gdsd_basic.c

Author:        J.P. Terlouw

Use:           CALL GDSD_WRITEC( SET ,         Input    CHARACTER*(*)
                                 KEY ,         Input    CHARACTER*20
                                 LEVEL ,       Input    INTEGER
                                 BUFFER ,      Output   CHARACTER*(*)
                                 NBYTES ,      Input    INTEGER
                                 POSITION ,    Input    INTEGER
                                 DONE ,        Output,  INTEGER
                                 ERROR )       Output,  INTEGER
               
               SET      =  Name or handle of set.
               KEY      =  Name of descriptor item.
               LEVEL    =  Coordinate word specifying the substructure to
                           which the descriptor belongs.
               BUFFER   =  Variable or array of containing the data to be
                           written.
               NBYTES   =  Number of bytes to be written.
               POSITION =  Relative position, starting at 1, to which will
                           be written. If zero (0) is specified, writing is done
                           at the end of the descriptor item. Optional argument.
                           If it is omitted, the default 1 is assumed.
               DONE     =  The number of bytes which have actually been written.
                           Optional argument. If it is omitted and the number 
                           of bytes which have been transferred is not equal
                           to the requested length of the transfer, an error
                           condition exists.
               ERROR    =  Error return code. In case of success, it will 
                           contain the level where the item has been found.
                           Optional argument.

Updates:       14-Dec-89   --  original document
               24-Mar-94   --  modified for GDS server