{
{  The purpose of this request is to write a partial record to the specified
{        file.
{
{
{        CYP$PUT_PARTIAL_RECORD (RECORD_FILE, POINTER_TO_SOURCE,
{              LAST_PART_OF_RECORD, STATUS)
{
{
{  RECORD_FILE: (input) This parameter specifies the file to be written to.
{
{  POINTER_TO_SOURCE: (input) This parameter specifies the data to be written.
{
{  LAST_PART_OF_RECORD: (input) This parameter specifies whether or not more
{        data can be appended to the current record.
{
{  STATUS: (output) This parameter specifies the request status.
{        CONDITIONS:
{              cye$file_not_open
{              cye$illegal_output_request
{              cye$illegal_operation
{
