NAME:  BlockWrite

     USE:  Procedure to Write one or more records from a variable.

     DEPENDENCY: None

     SYNTAX:  BlockRead(FileVariable, Buffer, RecSize, NumWritten);
              BlockRead(File, untyped, word, word);