Dears,
I fill list item according to user.
here my code:
Cursor vc_found_group (vv_user Varchar2) Is
Select Count(A.Group_Id)
From Sec_Groups A
Where Exists (Select 1
From Sec_User_App_Groups B
Where B.Group_Id = A.Group_Id
and B.User_Id = vv_user);
Begin
:Login.Group_Id := Null;
Open vc_found_group (:Global.User);
Fetch vc_found_group Into vn_found;
Close vc_found_group;
If vn_found > 0 Then
--Set_Item_Property('Login.Group_Id', Enabled, Property_True);
Go_Item('Login.Group_Id');
vn_dummy := Populate_Group ('GROUPS');
Populate_List ('GROUP_ID','GROUPS');
Else
Set_Item_Property('Login.Group_Id', Enabled, Property_False);
End If;
vn_dummy := Populate_Group ('GROUPS');
Populate_List ('GROUP_ID','GROUPS');
End;
and it filled well, but i need to get an intail value in the list ? hows that ?
I tried to change the list into TList and filled auto. but i shull choose the value to continue !!!