
  PROCEDURE [XREF] nap$get_server_attributes
    (    server: nat$application_name;
     VAR server_status: nat$application_status;
     VAR selected_title_count: nat$max_titles;
         selected_titles: ^nat$selected_titles_list;
     VAR server_managed_title_count: nat$max_titles;
         server_managed_titles: ^nat$title_pattern_list;
     VAR max_connections: nat$number_of_connections;
     VAR connection_priority: nat$network_message_priority;
     VAR server_capability: ost$name;
     VAR server_ring: ost$ring;
     VAR server_system_privilege: boolean;
     VAR accept_connection: boolean;
     VAR client_validation_capability: ost$name;
     VAR client_info_source: nat$client_info_source;
     VAR client_address_count: integer;
         client_addresses: ^array [1 .. * ] of nat$client_address;
     VAR reserved_application_id: boolean;
     VAR application_id: nat$internet_sap_identifier;
     VAR protocol: nat$protocol;
     VAR nam_initiated_server: boolean;
     VAR server_job_validation_source: nat$server_validation_source;
     VAR server_job_max_connections: nat$number_of_connections;
     VAR server_job_specified: boolean;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc nat$application_name
*copyc nat$application_status
*copyc nat$internet_sap_identifier
*copyc nat$network_message_priority
*copyc nat$number_of_connections
*copyc nat$protocol
*copyc nat$server_attributes
*copyc nat$title_pattern_list
*copyc ost$status
?? POP ??

