
  PROCEDURE [XREF] syp$crack_command (pdt: array [1 .. * ] OF syt$parameter_descriptor;
        text: string ( * );
    VAR pvt: array [1 .. * ] OF syt$parameter_value;
    VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc SYT$VALUE_KINDS
*copyc OST$STATUS
?? POP ??
