   PROCEDURE[xref] jmp$rb_initiate_mon_call ( kjl_ord: jmt$kjl_ordinal;
     xcb_p: ^ost$execution_control_block;
     VAR status: ost$status);

*copyc JMT$KJL_ORDINAL
*copyc OST$EXECUTION_CONTROL_BLOCK
*copyc OST$STATUS
