DECLARE     
	group_id		RecordGroup;     
	query_ok		NUMBER;  
	BEGIN  
	/* create the group rc_se and assign its id to the  
	** variable group_id  */     
	group_id := Create_Group_From_Query ('rc_se', 
	'SELECT s.session_no,      
	FROM sesion s, class_code c       
	WHERE c.class = data.class AND c.session_id = s.session_id');  
	/* now execute the new group's query, using the variable  
	** group_id to identify the group */     
	query_ok := Populate_Group(group_id);    
	/* if the query failed, abort this trigger by raising a  
	** predefined exception */     
	IF query_ok <> 0 THEN       
		RAISE Form_Trigger_Failure;     
	END IF;
		POPULATE_LIST('data.SESSION',group_id);
  END;

list_values(restrict);