I see
But

CREATE CURSOR moo (i1 I)
APPEND BLANK
REPLACE i1 WITH BITSET(i1,31)

is a pain anyway.

Agnes

>I tnink you can get it to work with sign bit as well
>

>SELECT grp, CTOBIN(MAX(BitorSql(grp, bitfld)), "4S") AS BitField ;
>	FROM crsTest ;
>	GROUP BY grp
>RETURN
>
>FUNCTION BitorSql(tnGroup, tnVal)
>IF tnGroup <> pnGroup 
>	pnResult = 0
>	pnGroup = tnGroup
>ENDIF	
>pnResult = BITOR(pnResult, tnVal)
>RETURN BINTOC(pnResult, "4S")
>

>
>>Da
>>
>>>Correct but you know that I meant that, right? :).
>>>