  PROCEDURE [inline] jmp$get_ijle_p (ijl_ordinal: jmt$ijl_ordinal;
    VAR ijle_p: ^jmt$initiated_job_list_entry);

?? PUSH (LISTEXT := ON) ??
    ijle_p := ^jmv$ijl_p.block_p^ [ijl_ordinal.block_number].index_p^ [ijl_ordinal.block_index];

  PROCEND jmp$get_ijle_p;

{* * * requires deck jmv$ijl_p * * *}
*copyc jmt$initiated_job_list_entry
*copyc jmt$ijl_ordinal
?? POP ??
