Procedure

     DASWRI ( DAS, write record, integer )

     ENTRY DASWRI ( HANDLE, RECNO, RECI )

Abstract

     Write DAS integer physical records.

Required_Reading

     DAS

Keywords

     ASSIGNMENT
     DAS
     FILES

Declarations

    INTEGER               HANDLE
    INTEGER               RECNO
    INTEGER               RECI   ( NWI )

Brief_I/O

     VARIABLE  I/O  DESCRIPTION
     --------  ---  --------------------------------------------------
     HANDLE     I   Handle of DAS file.
     RECNO      I   Record number.
     RECI       I   Integer data to be written to record.
     BUFSZI     P   Number of records in the integer record buffer.
     NWI        P   Number of integers in a single DAS integer record.

Detailed_Input

     HANDLE   is the handle of a DAS file opened for writing.

     RECNO    is the number of a record in a DAS file.

     RECI     is an array of NWI integers. The contents of this
              array are to be written to the physical file
              record having number RECNO.

Detailed_Output

     None. See $Particulars for a description of the action of this
     routine.

Parameters

     NWI      is the number of integers in a single DAS record
              containing integers.

     BUFSZI   is the number of records in the integer record
              buffer.

Exceptions

     1)  If the input file handle is invalid, an error is signaled by a
         routine in the call tree of this routine. The DAS file
         designated by HANDLE will not be modified.

     2)  If a write operation attempted by this routine fails, an error
         is signaled by a routine in the call tree of this routine. The
         status of the DAS file written to is uncertain in this case.
         Note that the file written to may be different than the file
         designated by HANDLE if multiple DAS files are open for
         writing.

Files

     See the description of the argument HANDLE in $Detailed_Input.

Particulars

     Routines outside of SPICELIB will normally have no need to call
     this routine.

     This routine can be used to write to only DAS files that are open
     for writing. Records written via this routine will always be
     buffered immediately, but may not be written to the file until
     they are cleared from the integer buffer to make room for other
     records, or until they are explicitly forced to to be written via
     a call to DASWBR. In any case, at the moment this routine
     returns, the data supplied on input may be read back by DASRRI
     or updated by DASURI.

     Closing a DAS file via DASCLS forces any remaining updated data
     records buffered by this routine to be written to the file.

Examples

     1)  Write an array of NWI integers to the 9th record in a DAS
         file designated by HANDLE.

            INTEGER                RECI ( NWI )
                         .
                         .
                         .

            DO I = 1, NWI
               RECI(I) = I
            END DO

            CALL DASWRI ( HANDLE, 9, RECI )

Restrictions

     None.

Literature_References

     None.

Author_and_Institution

     N.J. Bachman       (JPL)
     J. Diaz del Rio    (ODC Space)
     K.R. Gehringer     (JPL)
     B.V. Semenov       (JPL)
     W.L. Taber         (JPL)

Version

    SPICELIB Version 2.0.1, 22-FEB-2021 (JDR)

        Edited the header to comply with NAIF standard.

    SPICELIB Version 2.0.0, 30-JUL-2014 (NJB)

        Upgraded to support handle manager integration.

    SPICELIB Version 1.0.3, 10-FEB-2014 (BVS)

        Added description of NWI to the $Parameters and $Brief_I/O
        sections of the header.

    SPICELIB Version 1.0.2, 03-NOV-1995 (NJB)

        Removed weird spaces from ENTRY statement.

    SPICELIB Version 1.0.1, 28-OCT-1993 (KRG)

        Removed references to specific DAS file open routines in the
        $Detailed_Input section of the header. This was done in order
        to minimize documentation changes if the DAS open routines ever
        change.

    SPICELIB Version 1.0.0, 30-JUN-1992 (NJB) (WLT)