  PROCEDURE [XREF] ocp$end ALIAS 'ocpend' (parameter_list: clt$parameter_list;
    VAR status: ost$status);

