Documentum RPS DQL

DQL to return documents with retention policy details including retention policy name, phase, application date and disposition strategy.
DQL copied from: http://documentumgeek.magix.net/archive/cat_dql.html

 select  
   a.r_object_id,  
   s.object_name,  
   s.r_object_id as sysobject_id, a.phase_name,  
   a.disposition_status,  
   a.entry_date,  
   a.event_date,  
   a.qualification_date,  
   a.r_creation_date as application_date,  
   s.r_object_type,  
   a.retainer_root_id,  
   b.is_final_phase,  
   c.is_container_aging,  
   r.object_name as policy_name,  
   r.disposition_strategy_id,  
   d.object_name as disposition_strategy,  
   s.i_is_reference,  
   s.i_is_replica,  
   s.r_assembled_from_id,  
   s.r_has_frzn_assembly,  
   s.a_compound_architecture  
 from  
   dmc_rps_retainer a,  
   dm_sysobject (all) s,  
   dmc_rps_phase_rel b,  
   dmc_rps_retention_strategy c,  
   dmc_rps_retention_policy r,  
   dmc_rps_disp_strategy d  
 where  
   (a.retainer_root_id = s.r_object_id)  
   and (a.retainer_root_id in (select r_object_id from dm_sysobject (all)))  
   and (a.r_policy_id = b.parent_id)  
   and (a.retention_policy_id = b.child_id)  
   and (a.phase_name = b.phase_name)  
   and (a.retention_policy_id = r.r_object_id  
     and a.r_policy_id=r.retainer_lifecycle_id)  
   and (r.retention_strategy_id=c.r_object_id)  
   and (not(s.r_object_type in (select r_type_name from dmi_type_info where  
     any r_supertype='dm_folder') and c.is_container_aging=0))  
   and (r.disposition_strategy_id = d.r_object_id)  
 order by 2