dputl$ (6) --- put a line on a disk file                 03/25/82


            _C_a_l_l_i_n_g _I_n_f_o_r_m_a_t_i_o_n

                 integer function dputl$ (line, fd)
                 character line (ARB)
                 file_descriptor_struct fd

                 Library:  vswtlb (standard Subsystem library)


            _F_u_n_c_t_i_o_n

                 'Dputl$'  is  called  by  'putlin' to write a line on a disk
                 file.  The first argument is an EOS-terminated string to  be
                 placed  on  the  disk  file; the second argument is the file
                 descriptor of the file on which the string is to be written.
                 The function return is OK for a successful call, ERR  other-
                 wise.   'Dputl$'  is  not  protected from user error, and so
                 should not be used except as it is called by 'putlin'.


            _I_m_p_l_e_m_e_n_t_a_t_i_o_n

                 'Dputl$' maintains a count of blanks to  be  used  for  file
                 compression.   When  a non-blank character is encountered in
                 the string, any  blanks  accumulated  are  translated  to  a
                 relative  horizontal  tab  (RHT)  and a blank count, and the
                 non-blank character is output.   Characters  placed  in  the
                 disk  buffer are output by a shortcalled routine internal to
                 'dputl$'; this routine calls the Primos routine PRWF$$ to do
                 the actual data transfer.


            _C_a_l_l_s

                 Primos prwf$$


            _S_e_e _A_l_s_o

                 putlin (2), dgetl$ (6), tputl$ (6)


















            dputl$ (6)                    - 1 -                    dputl$ (6)