
  PROCEDURE [XREF] jmp$get_application_record
    (    application_name: jmt$application_name;
     VAR application_record: jmt$application_attributes;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc jmt$application_attributes
*copyc jmt$application_name
*copyc ost$status
?? POP ??
