MID_UP_TABLE

       Open and update data from a MIDAS table.

       MID_UP_TABLE,table,ncol,nrow,data

       Table =  file name of MIDAS table or Logical Unit Number.
               * If a filename is given, the file will be opened and closed
               using a local LUN.  An extension -- not to be
               supplied -- of .TBL is assumed.  No version number is
               allowed: the most recent version is used.
               * If an LUN is given, the file associated with that LUN will be
               used.
       Ncol =   number of columns in the array to be written into the
               MIDAS table.  Long integer (I*4).  Must be less than or
               equal to the number of columns in the MIDAS table.
               "Ncol" and "nrow" are checked for consistency only.
       Nrow =   number of rows in the array to be written into the MIDAS
               table. Long integer (I*4).  Must be less than or equal to
               the number of rows in the MIDAS table.
               "Ncol" and "nrow" are checked for consistency only.
       Data =   array of data to be written into the MIDAS table.  Floating
               (R*4).  Data is of dimensions nrow*ncol.  The select column
               in the MIDAS table is disregarded.

       Dimensions of the array to be written into the MIDAS table must be
       less than or equal to the corresponding dimensions of the latter.
       Note that in the case of smaller dimensions, only part of the given
       MIDAS table in altered (i.e. the 'upper left hand corner').
       No changes in the MIDAS table descriptors are carried out.  No
       changes in the MIDAS table 'select' are carried out.
       Real data handled only.
       Midas extensions (.tbl) in lower case.

       None.

       We first consider the File Control Block of the MIDAS table file
       to determine the start of descriptor information and the start of
       the data.
       Next we consider the Descriptor Directory Entry for `tblcontr' (the
       number of columns and rows allocated; followed by the number of
       columns and rows in the actual table).
       We check consistency between input array dimensions and the dimensions
       of the MIDAS table into which the array is to be written.
       Finally we carry out the writing of the data values.

       Given two MIDAS tables, PSF.TBL and PSF2.TBL, of the same dimensions;
       we wish to overwrite PSF2 with the contents of PSF.
       MID_RD_TABLE,'PSF',NC,NR,DAT
       DATTR = TRANSPOSE(DAT)
       MID_UP_TABLE,'PSF2',NC,NR,DATTR

       FM - Fionn Murtagh, ST-ECF, Munich.

       OCT 1988  FM  Initial programming and decoding of MIDAS files.
       MAY 1989  FM  Name of routine changed; allowance made for LUN instead
               of table name; bug fixes.
       FEB 1991  FM  Conversion to V. 2, IDL, Unix.
       Converted to IDL V5.0   W. Landsman   September 1997

[Home Page] [Software, Documentation] [IDL Documentation] [Quick Reference] [Feedback]