(urgent) Dynamic record groups and LOV

Question

I have to create a record group and then add 2 rows to it manually.Following is the code.There are no values displayed in the lov.Please help.
PROCEDURE create_record_group IS
BEGIN
DECLARE
rg varchar2(40) := 'test_fips';
rg_id RECORDGROUP;
lov_id Lov;
err NUMBER;
gc_id1 GROUPCOLUMN;
gc_id2 GROUPCOLUMN;
counter number;
BEGIN
rg_id := FIND_GROUP(rg);
lov_id := FIND_LOV('LOV_FIPS');
IF NOT ID_NULL(rg_id) THEN
DELETE_GROUP(rg_id);
END IF;
IF ID_NULL(rg_id) THEN
rg_id := CREATE_GROUP(rg);
gc_id1 := add_group_column (rg_id,'col1',number_column);
gc_id2 := add_group_column(rg_id,'col2',char_column,40);
END IF;
/* adding static content to LOV */
ADD_GROUP_ROW( rg_id,1);
SET_GROUP_NUMBER_CELL(gc_id1,1,997);
SET_GROUP_CHAR_CELL(gc_id2,1,'MLAB');
counter := get_group_row_count(rg_id);
/* adding dynamic content */
FOR rec in (SELECT FIPS_CD COL1, LOCNAME COL2 FROM FIPS) LOOP
counter := counter +1 ;
ADD_GROUP_ROW( rg_id, counter);
SET_GROUP_NUMBER_CELL(gc_id1,counter,rec.col1);
SET_GROUP_CHAR_CELL(gc_id2,counter,rec.col2);
END LOOP;
SET_LOV_PROPERTY('LOV_FIPS',GROUP_NAME, rg);
END;
END;

Answer 1

I tried creating the group the way you suggested but it does not seem to work because of 'UNION' in the query.It says unable to create rcord group.Did you anytime use the 'UNION' option while creating record group.
While creating record group at design time also you cannot use UNION with dual.
This how I modified :
PROCEDURE create_record_group IS
BEGIN
DECLARE
V_RG_ID RECORDGROUP;
RG_NAME VARCHAR2(20) := 'TEST_FIPS';
V_ERRCODE NUMBER;
BEGIN
V_RG_ID := FIND_GROUP('TEST_FIPS');
IF ID_NULL(V_RG_ID) THEN
V_RG_ID := CREATE_GROUP_FROM_QUERY('TEST_FIPS', 'SELECT FIPS_CD, LOCNAME FROM FIPS
UNION SELECT 997,'MLAB' FROM DUAL');
END IF;
V_ERRCODE := POPULATE_GROUP(V_RG_ID);
MESSAGE('CREATED '|| V_ERRCODE);
SET_LOV_PROPERTY('LOV_FIPS',GROUP_NAME, RG_NAME);
END;
END;
Notice here 'MLAB' is char and I get compilation error if I use these quotes with MLAB.But is I remove the quotes the it compiles.
Thanks