
  PROCEDURE [XREF] jmp$validate_paired_connection
    (    unvalidated_connection_data_p: ^SEQ ( * );
     VAR login_family: ost$name;
     VAR login_user: ost$name;
     VAR system_job_name: jmt$system_supplied_name;
     VAR connection_request_kind: jmt$paired_connection_request;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc jme$invalid_paired_connection
*copyc jmt$system_supplied_name
*copyc jmt$paired_connection_data
*copyc ost$name
*copyc ost$status
?? POP ??
