Finding Concurrent Program Past Execution Details

If we need to find the Concurrent Program previous\past execution details then the below query will be useful.

Script:

select request_id, phase_code, status_code ,
to_char(requested_start_date, 'DD-MM-YY hh24:mi:ss') "Requested start date",
to_char(actual_start_date, 'DD-MM-YY hh24:mi:ss') "Actually started date",
to_char(actual_completion_date,'DD-MM-YY hh24:mi:ss') "Actually completed date",
substr(ARGUMENT_TEXT,1,100) Parameter_Passed ,
TRUNC (MOD ((nvl(cr.actual_completion_date,sysdate) - cr.actual_start_date) * 24,
                     24
                    )
               ) "Hr",
         TRUNC (MOD (  (nvl(cr.actual_completion_date,sysdate) - cr.actual_start_date)
                     * 24
                     * 60,
                     60
                    )
               ) "Mins",
         TRUNC (MOD (  (nvl(cr.actual_completion_date,sysdate) - cr.actual_start_date)
                     * 24
                     * 60
                     * 60,
                     60
                    )
               ) "Sec"
from fnd_concurrent_requests  cr where concurrent_program_id in
( select concurrent_program_id
  from fnd_concurrent_programs
  where concurrent_program_name = '&prog_short_name' )
and actual_start_date>sysdate - &noofdaysago
order by phase_code,actual_start_date asc

Thanks 
Srini