
{ parameters received by client from server

  TYPE
    pft$df_attach_out = record
      authority: pft$authority,
      cycle_damage_symptoms: fst$cycle_damage_symptoms,
      device_class: rmt$device_class,
      global_file_name: ost$binary_unique_name,
      file_label_size: pft$file_label_size,
      status_included: boolean,
    recend;

    { status from server pfp$r2_attach
    { IF status.normal
    {   pft$df_attach_outp
    {   server_file_output
    {   subfile array
    {   file label
    { ELSEIF status.condition = pfe$cycle_busy
    {   cycle number

    { server_file_output follows in buffer.
    { subfile array follows in buffer.
    { file label follows in buffer if space permits,
    {   otherwise file label in data area.
    { fmd for removable media device in data area.

*copyc fst$cycle_damage_symptoms
*copyc ost$binary_unique_name
*copyc pft$authority
*copyc pft$file_label_size
*copyc rmt$device_class
