If the user presses OK, we want to confirm some checks if a correct selection has been made and if so, assign the value to the table buffer entry "F-deviceNumber.Device". We set the Variable "accept" to "True" so we know on the lower level that the user pressed "OK".
IF G-deviceNumber.Search = "*" ERROR "Please enter a valid Device number." RETURN ENDIF IF CLIP(G-deviceNumber.Search) = "" ERROR "Please enter a valid Device Number." RETURN ENDIF LET F-deviceNumber.Device = G-deviceNumber.Search LET V-accept = TRUE() CONTROL cancel
The ProLinga "CONTROL" commands destroys the screen "DeviceSearch" and processing resumes in the logic calling this screen (dialog).
|<< Logic: DeviceSearchSelect||Search Screen At Run-Time >>|