
  VAR
    rav$step_title: [READ] array [rat$steps] of string (34) := [
          'INITIALIZING FOR INSTALLATION', 'RECONCILING CYCLE CONFLICTS',
          'LOADING THE SUBPRODUCTS', 'CORRECTING THE SUBPRODUCTS',
          'STAGING THE SUBPRODUCTS', 'ACTIVATING THE SUBPRODUCTS',
          'EXECUTING THE INSTALLER PROCEDURES', 'UPDATING THE IDB DIRECTORY',
          'DELETING PREVIOUS CYCLES'];

?? PUSH (LISTEXT := ON) ??
*copyc rat$processing_summary_types
?? POP ??
