Hi Tariq,

You forgot to paramater...
2- Form1.getlist.method has following codes

LPARAM ldDate
LOCAL lii,lcc
LOCAL ARRAY laPom(1)
*ldFDATE=THISform.text1.value

SELECT GNO;
FROM WEIGHTS;
WHERE FDATE=ldFDATE ;
ORDER BY PCODE;
GROUP BY PCODE;
INTO ARRAY laPom

lcc=""
FOR lii=1 TO ALEN(laPom,1)
    lcc=lcc+laPom(lii)+","
NEXT

RETURN IIF(LEN(lcc)=0,SPACE(150),LEFT(lcc,LEN(lcc)-1))

OR remove parameter from 1) SQL

SELECT FDATE,thisform.GetList() AS PARTY;
FROM WEIGHTS;
WHERE FDATE=THISform.text1.value ;
ORDER BY PCODE;
GROUP BY PCODE;
INTO cursor fix

MartiJ

>Dear Sir,
>
>1- Command1 has following codes
>
>SELECT FDATE,thisform.GetList(FDATE) AS PARTY;
>FROM WEIGHTS;
>WHERE FDATE=THISform.text1.value ;
>ORDER BY PCODE;
>GROUP BY PCODE;
>INTO cursor fix
>
>2- Form1.getlist.method has following codes
>
>LOCAL lii,lcc
>LOCAL ARRAY laPom(1)
>ldFDATE=THISform.text1.value
>
>SELECT GNO;
>FROM WEIGHTS;
>WHERE FDATE=ldFDATE ;
>ORDER BY PCODE;
>GROUP BY PCODE;
>INTO ARRAY laPom
>
>lcc=""
>FOR lii=1 TO ALEN(laPom,1)
> lcc=lcc+laPom(lii)+","
>NEXT
>
>RETURN IIF(LEN(lcc)=0,SPACE(150),LEFT(lcc,LEN(lcc)-1))
>
>When I press Command1 it shows following error message
>
>NO PARAMETER statment found
>
>What is wrong?
>
>Please help