
  PROCEDURE [XREF] clp$append_status_string
    (    delimiter: char;
         text: string ( * );
     VAR status {input, output} : ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc osc$status_parameter_delimiter
*copyc ost$status
?? POP ??
