Sub ShowDialogLOV
Private dialog As B4XDialog
Private p As B4XView = xui.CreatePanel("")
p.SetLayoutAnimated(0, 0, 0, 300dip, 300dip)
p.LoadLayout("fListOfValues")
dialog.Initialize(Main.MainForm)
dialog.BlurBackground = True
dialog.PutAtTop = True
dialog.ShowCustom(p, "OK", "", "EXIT")
LoadDataLOV
End Sub