If the object has been activated more than once, the oldest RunID is returned.
:SET &me_runid = SYS_ACT_ME_NR()
:PRINT "RunID is &me_runid"
:IF SYS_ACT_RESTART() = "Y"
: SET &me_re_runid = SYS_ACT_RESTART_ME_NR()
: PRINT " and the restart RunID is &me_re_runid"
! Store RunID in a Variable object as needed.
:SET &me_name = SYS_ACT_ME_NAME()
:SET &pid = PREP_PROCESS_STATISTICS(&me_name)
: SET &me_runid = GET_PROCESS_LINE(&pid)
: SET &the_end = GET_STATISTIC_DETAIL(&me_runid,END_TIME)
: PRINT "&me_name(&me_runid) ended at &the_end"