
  PROCEDURE [XREF] uop$create_device_connection
    (    device_title: nat$title_pattern;
         terminal_file_name: fst$file_reference;
         application_name: ost$name;
         translation_wait_time: integer;
         connection_wait_time: integer;
         service_data: ^SEQ ( * );
     VAR network_file_name: fst$temporary_file_path;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc fst$file_reference
*copyc fst$temporary_file_path
*copyc nat$title_pattern
*copyc ost$name
*copyc ost$status
*copyc uoe$credc_condition_codes
?? POP ??
