
{ Parameters sent from CLIENT to SERVER:

  TYPE
    pft$df_put_archive_entry_inp = record
      cycle_selector: pft$cycle_selector,
      archive_identification: pft$archive_identification,
      archive_array_entry: pft$archive_array_entry,
      path_length: pft$array_index,
      amd_size: integer,
    recend;
{ PATH follows in the buffer.
{ ARCHIVE_MEDIA_DESCRIPTOR record follows in the buffer if small enough,
{ otherwise ARCHIVE_MEDIA_DESCRIPTOR will be found in the data buffer.

?? SKIP := 2 ??

{ Parameters received by CLIENT from SERVER:
{   status

*copyc pft$archive_array_entry
*copyc pft$archive_identification
*copyc pft$array_index
*copyc pft$cycle_selector
