global updating procedure TestRn(record RcVc RepSpec) begin StartReportJob("Test"); EndHeader; EndJob; return; end;