
  PROCEDURE [XREF] osp$write_emission_sets_r1
    (VAR emission_sets_copy: ARRAY [ost$emission_set_names] of ost$emission_set;
     VAR status: ost$status);

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

