Another DD list question

Question

I have 2 drop down lists (lets say DD1, DD2) in my custom (6i) form. The options in DD1 are 'NEW', 'RELOCATION' and 'CONVERSION'. What I am trying to do is populate DD2 dynamically with a query if DD1 is changed to 'RELOCATION'.
The DD2 is char type with max lenght 30. Since I want to populate it with code below, I don't have any values in the 'Elements in the list' property.
Below is the code that I am trying to use in the when-list-changed of DD1.
  DECLARE
  v_query varchar2(1000):=null;
  rg_name varchar2(40);
  rg_id RecordGroup;
  errcode NUMBER;
BEGIN
IF :<BLOCK_NAME>.<DD1> = 'RELOCATION' THEN   
    rg_name := 'RELO_LIST';
    rg_id := Find_Group(rg_name);
    IF ID_NULL(rg_id) THEN
    v_query :=    'SELECT DISTINCT TO_CHAR(NVL(STORE_NO,0))  FROM <TABLE>';     
   rg_id := Create_Group_From_Query( rg_name,v_query);
   END IF;
   errcode := Populate_Group( rg_id);
   CLEAR_LIST('<BLOCK_NAME>.<DD2>');
   SET_ITEM_PROPERTY('<BLOCK_NAME>.<DD2>',ENABLED,PROPERTY_TRUE);
   POPULATE_LIST('<BLOCK_NAME>.<DD2>','RELO_LIST');
   GO_ITEM('<BLOCK_NAME>.<DD2>');
ELSE
     :<BLOCK_NAME>.<DD2> :=NULL;
     SET_ITEM_PROPERTY('<BLOCK_NAME>.<DD2>',ENABLED,PROPERTY_FALSE);
     GO_ITEM('<BLOCK_NAME>.<TXT1>');
END IF;
END;
However, what is happening is, when I changed the DD1 values to 'RELOCATION' DD2 is getting disabled, but the cursor is navigating to it. If I run the select statement in the query in TOAD, I get back a list of store numbers (which is what I need).
Why is the DD2 getting dis-abled and not getting populated with values as it should? Any ideas/suggestions about whats missing the code above(Its probably something simple but I have looked at it till I am blue in the face ... cant seem to think)?
Thanks,
Chiru

Answer 1

I would recommend these changes:
CHANGE 1:
The addition of SYNCHRONIZE may help to ensure that the value seen in DD1 has been updated internally. For testing purposes, it might be helpful to replace the SYNCHRONIZE with a message that displays the value of DD1. If you find it to be NULL or other incorrect value, the SYNC should correct the problem.
BEGIN
SYNCHRONIZE;
IF :<BLOCK_NAME>.<DD1> = 'RELOCATION' THEN   
    rg_name := 'RELO_LIST';
    . . .CHANGE 2:
In this change the GO_ITEM is moved before the disabling of the item where the cursor was located. It is never a good idea to orphan the cursor. The same is true when opening a new canvas. You should not hide the current canvas until you have first displayed the destination canvas. This helps to ensure that the cursor does not become an orphan.
ELSE
     :<BLOCK_NAME>.<DD2> :=NULL;
     GO_ITEM('<BLOCK_NAME>.<TXT1>');
     SET_ITEM_PROPERTY('<BLOCK_NAME>.<DD2>',ENABLED,PROPERTY_FALSE);
END IF;One last tip....
Be sure to determine if case sensitivity is causing a problem. 'RELOCATION' is not the same as 'relocation'.