hi all,

i need help to correct this code,
i try to use this code not work


CLOSE ALL
Local lnOffice

USE salah2
SELECT DISTINCT no from salah2 INTO CURSOR junk

SCAN
lnoffice = junk.no
.
.

endscan




i need to correct this code with another way

CLOSE ALL
USE salah2
SET FILTER TO no=20&&lnoffice = junk.no
COUNT TO s
*brow
SELECT DISTINCT no,dept  FROM salah2 WHERE no=20  INTO CURSOR mycur
*brow
m.dept=dept
m.no=no
*? dept,no
COUNT TO k
*? k, s,dept,no

 USE mytable
 APPEND BLANK
 replace no WITH m.no
 replace nam WITH m.dept
 
 replace dis WITH k
 replace all WITH s
 *****************************************************************
CLOSE ALL
USE salah2
SET FILTER TO no=42
COUNT TO s
brow
SELECT DISTINCT no,dept  FROM salah2 WHERE no=42  INTO CURSOR mycur
brow
m.dept=dept
m.no=no
*? dept,no
COUNT TO k
*? k, s,dept,no
 USE mytable
 APPEND BLANK
 replace no WITH m.no
 replace nam WITH m.dept
 
 replace dis WITH k
 replace all WITH s
***********************
CLOSE ALL
USE salah2
SET FILTER TO no=...etc
.
.
.