DECLARE
v_concat_desc_smry VARCHAR2(4000) DEFAULT ' ';
v_latest_desc_smry VARCHAR2(2000) DEFAULT ' ';
CURSOR c_concat_desc_smry IS
SELECT *
  FROM concat_desc_smry
ORDER BY INDIVIDUAL_ID ASC, first_row_by_id ASC;
BEGIN
FOR cv_concat_desc_smry IN c_concat_desc_smry
LOOP
       /* FIRST.INDIVIDUAL_id */
--   v_latest_desc_smry := 
   IF cv_concat_desc_smry.first_row_by_id = 'Y' 
   THEN
   	   v_concat_desc_smry := substr(v_concat_desc_smry ||
                                    cv_concat_desc_smry.desc_smry,1,4000);
       v_latest_desc_smry := substr(v_latest_desc_smry || 
                                    cv_concat_desc_smry.desc_smry,1,2000);
   END IF;
   IF cv_concat_desc_smry.first_row_by_id IS NULL
   THEN
       v_concat_desc_smry := '(1)' || v_concat_desc_smry || ', (2) ' || cv_concat_desc_smry.desc_smry;
   END IF;
   IF cv_concat_desc_smry.last_row_by_id = 'Y' 
   THEN
   	   UPDATE concat_desc_smry
		  SET concat_desc_smry.concat_desc_smry = substr(v_concat_desc_smry, 1, 4000),
		      concat_desc_smry.latest_desc_smry = v_latest_desc_smry
		WHERE Individual_ID = cv_concat_desc_smry.Individual_ID;
	   COMMIT;
--	   v_concat_desc_smry := '';
	   
   END IF;
END LOOP;
END;
/