General information
Title:
extraneous browse window
Related thread: SELECT ... WHERE process in ?lcProcess
Being unable to pass a parameterized list to a view I'm
attempting a different approach.
Given:
Grid with
RecordSource:
SELECT Itmlayer.thickness, Itmlayer.color, Itmlayer.process FROM glass!itmlayer
WHERE Itmlayer.process in (select Process from Process_cursor)
RecordSourceType: SQL
Form.Load:
CREATE CURSOR Process_cursor (Process C(2))
Form.lstProcess:
*** lstProcess.Click
*** Created: 08/14/96
*** Purpose: keep track of selected items in this box.
FOR nCnt = 1 TO This.ListCount
IF This.Selected(nCnt)
insert into Process_cursor (Process) values (THIS.List(nCnt,2))
ELSE
delete from Process_cursor where process = THIS.List(nCnt,2)
ENDIF
ENDFOR
With this code:
wait window "Command1.Click begin"
THISFORM.Grid1.RecordSource = "SELECT Itmlayer.thickness, Itmlayer.color, Itmlayer.process;
FROM glass!itmlayer WHERE Itmlayer.process in (select Process from Process_cursor)"
wait window "Command1.Click end"
the CORRECT results are showing up in Grid1, but a browse window is also showing up. Can this be suppressed? How?
Thanks, Kim
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only