
  PROCEDURE [XREF] nap$send_command
    (    command: ^string ( * );
         system: string ( * <= nac$system_title_size);
         command_id: nat$command_identifier;
         retain_connection: boolean;
     VAR many_systems_specified: boolean;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc nat$command_interface
*copyc nat$system_title
*copyc ost$status
?? POP ??
