Creating dynamic LOV in form builder 6i

Question

Hi All,
I am new to form builder.
I want to create dynamic lov, means
Project type
Client
Work_type(thsi is also lov) ->> 1) Billable
Reason (this is also lov) ->> 1) Billable
Work_type(thsi is also lov) ->> 2) Non-Billable
Reason (this is also lov) ->> 1) Fresher
2) Project Manager
As shown above, Suppose the project type is client then I will select either "Billable" or "Non-Billable" value.
If I am selecting Work_type LOV as "Billable" then it should display "Billable" value in reason LOV
or if I am selecting Non-Billable value from Work_type LOV then reason LOV will display the list of value as Fresher and Project Manager.
Please help me, its very urgent.
Thanks in advance.
Regards,
Bluetooth

Answer 1

Bluetooth,
This can be accomplished by creating two seperate record groups; one for Billable and one for Non-Billable. Then - in the WORK_TYPE When-Validate-Item (WVI)trigger - when the value is "Billable" you assign the Billable Record Group to your LOV or if the value is Non-Billable, then you assign the Non-Billable record group to your LOV. Your Record Group queries must return the same number of columns and the column names must match. If your record groups need to have a different number of columns and column names, then I would just use two seperate LOV's and assign them to the item accordingly. For example:
/* Sample WVI trigger */
DECLARE
  lov_id    LOV;
  item_id   ITEM;
BEGIN
  lov_id := Find_LOV('YOUR_LOV_NAME');
  /* Option 1: Change Record Group of LOV */
  IF ( :YOUR_BLOCK.WORK_TYPE = 'BILLABLE' ) THEN
    IF ( Get_LOV_Property(lov_id, GROUP_NAME) != 'BILLABLE_RG' ) THEN
      Set_LOV_Property(lov_id, GROUP_NAME, 'BILLABLE_RG');
    END IF;
  ELSIF ( :YOUR_BLOCK.WORK_TYPE = 'NONBILLABLE' ) THEN
    IF ( Get_LOV_Property(lov_id, GROUP_NAME) != 'NONBILLABLE_RG' ) THEN
      Set_LOV_Property(lov_id, GROUP_NAME, 'NONBILLABLE_RG');
    END IF;
  END IF;
  item_id := Find_Item('YOUR_BLOCK.REASON');
  /* Option 2: Seperate LOV's */
  IF ( :YOUR_BLOCK.WORK_TYPE = 'BILLABLE' ) THEN
    IF ( Get_Item_Property(item_id, LOV_NAME) != 'BILLABLE_LOV' ) THEN
      Set_Item_Property(item_id, LOV_NAME, 'BILLABLE_LOV');
    END IF;
  ELSIF ( :YOUR_BLOCK.WORK_TYPE = 'NONBILLABLE' ) THEN
    IF ( Get_Item_Property(item_id, LOV_NAME) != 'NONBILLABLE_LOV' ) THEN
      Set_Item_Property(item_id, LOV_NAME, 'NONBILLABLE_LOV');
    END IF;
  END IF;Hope this helps,
Craig B-)
If someone's response is helpful or correct, please mark it accordingly.