  PROCEDURE [INLINE] dfp$convert_list_pointer
    (    p_data_rma_list: dft$p_data_rma_list;
     VAR p_rma_list: ^mmt$rma_list);

    TYPE
      converter = record
        CASE (mm_rma_list, data_rma_list) OF
        = mm_rma_list =
          p_rma_list: ^mmt$rma_list,
        = data_rma_list =
          p_data_rma_list: dft$p_data_rma_list,
        CASEND,
      recend;

    VAR
      converter_variable: converter;

    converter_variable.p_data_rma_list := p_data_rma_list;
    p_rma_list := converter_variable.p_rma_list;

  PROCEND dfp$convert_list_pointer;

?? PUSH (LISTEXT := ON) ??
*copyc dft$cpu_queue
?? POP ??
