
{ Parameters sent from CLIENT to SERVER.

  TYPE
    pft$df_define_data_inp = record
      { Parameters supplied by caller.
      lfn: amt$local_file_name,
      mainframe_id: pmt$binary_mainframe_id,
      cycle_selector: pft$cycle_selector,
      update_cycle_statistics: boolean,
      password_selector: pft$password_selector,
      purge_cycle_options: pft$purge_cycle_options,
      replace_cycle_data: boolean,
      restore_selections: put$restore_data_selections,
      mandated_modification_time: pft$mandated_modification_time,
      path_length: pft$array_index,
      mass_storage_request_included: boolean,
      volume_list_length: integer,
      { Parameters supplied by ring 3 caller.
      validation_ring: ost$valid_ring,
    recend;

?? SKIP := 2 ??

{ Parameters received by CLIENT from SERVER.
{   buffer format
{   pft$df_define_data_outp
{   subfile array

  TYPE
    pft$df_define_data_outp = record
      mandated_modification_time: pft$mandated_modification_time,
      data_residence: pft$data_residence,
      authority: pft$authority,
      bytes_allocated: amt$file_byte_address,
    recend;

?? PUSH (LISTEXT := ON) ??
*copyc osd$virtual_address
*copyc amt$file_byte_address
*copyc amt$local_file_name
*copyc pft$array_index
*copyc pft$authority
*copyc pft$cycle_selector
*copyc pft$data_residence
*copyc pft$mandated_modification_time
*copyc pft$password_selector
*copyc pft$purge_cycle_options
*copyc pmt$binary_mainframe_id
*copyc put$restore_data_selections
*copyc rmt$recorded_vsn
?? POP ??
