Dynamically to Create the Record Group in Oracle Apps Forms
DECLARE
rg_name VARCHAR2(40) := 'OU_RG';
rg_id RecordGroup;
gc_id GroupColumn;
errcode NUMBER;
BEGIN
rg_id := Find_Group(rg_name);
IF Id_Null(rg_id) THEN
rg_id := Create_Group(rg_name);
gc_id := Add_Group_Column(rg_id, 'organization_id', NUMBER_COLUMN);
gc_id := Add_Group_Column(rg_id, 'organization_code', CHAR_COLUMN);
END IF;
errcode := Populate_Group_With_Query( rg_id, 'SELECT ORGANIZATION_ID,ORGANIZATION_CODE' ||'FROM ORG_ORGANIZATION_DEFINITIONS ' ||'ORDER BY 1');
END;
Dynamically to set the LOV in Oracle Apps Forms
Declare
lov_id LOV;
rg_name VARCHAR2(50):='';
BEGIN
lov_id := Find_LOV('My_LOV_1');
IF NOT ID_NULL(lov_id ) THEN
rg_name := Get_LOV_Property(lov_id,GROUP_NAME);
END IF;
IF Get_LOV_Property(lov_id,GROUP_NAME) = rg_name THEN
Set_LOV_Property(lov_id,GROUP_NAME,'GROUP2');
END IF;
END;
DECLARE
rg_name VARCHAR2(40) := 'OU_RG';
rg_id RecordGroup;
gc_id GroupColumn;
errcode NUMBER;
BEGIN
rg_id := Find_Group(rg_name);
IF Id_Null(rg_id) THEN
rg_id := Create_Group(rg_name);
gc_id := Add_Group_Column(rg_id, 'organization_id', NUMBER_COLUMN);
gc_id := Add_Group_Column(rg_id, 'organization_code', CHAR_COLUMN);
END IF;
errcode := Populate_Group_With_Query( rg_id, 'SELECT ORGANIZATION_ID,ORGANIZATION_CODE' ||'FROM ORG_ORGANIZATION_DEFINITIONS ' ||'ORDER BY 1');
END;
Dynamically to set the LOV in Oracle Apps Forms
Declare
lov_id LOV;
rg_name VARCHAR2(50):='';
BEGIN
lov_id := Find_LOV('My_LOV_1');
IF NOT ID_NULL(lov_id ) THEN
rg_name := Get_LOV_Property(lov_id,GROUP_NAME);
END IF;
IF Get_LOV_Property(lov_id,GROUP_NAME) = rg_name THEN
Set_LOV_Property(lov_id,GROUP_NAME,'GROUP2');
END IF;
END;
No comments:
Post a Comment