Function:     GDSA_RCREAL

Purpose:      Reads real items from a column in a GDS table.

Category:     TABLES

File:         gdsa_table.c

Author:       K.G. Begeman

Use:          CALL GDSA_RCREAL( SET,      Input    CHARACTER*(*)
                                SUBSET,   Input    INTEGER
                                TNAME,    Input    CHARACTER*8
                                CNAME,    Input    CHARACTER*8
                                RDATA,    Output   REAL ARRAY
                                ITEM,     Input    INTEGER
                                NITEMS,   Input    INTEGER
                                ERROR )   Output   INTEGER

              SET         Name of GDS set
              SUBSET      Subset where table is to be found
              TNAME       Name of table
              CNAME       Name of column
              RDATA       Array to recieve the data from column.
              ITEM        Row number where to start reading
              NITEMS      Number of rows to read
              ERROR       Error return code

Updates:      Feb 18, 1989: KGB  document created.
              Nov 13, 1990: KGB Converted to C.