IF tnGroup <> pnGroup
pnGroup = tnGroup
...
and it is o.k.>CREATE CURSOR crsTest (pk i autoinc, grp i, bitfld i) > >FOR i=1 TO 5 > FOR j= 1 TO 4 > INSERT INTO crsTest (grp, bitfld) VALUES (i,j* 10^i) > ENDFOR >ENDFOR > >pnResult = 0 >pnGroup = 0 > >SELECT grp, MAX(BitorSql(grp, bitfld)) AS BitField ; > FROM crsTest ; > GROUP BY grp >RETURN > > >FUNCTION BitorSql(tnGroup, tnVal) >IF tnGroup <> pnGroup > pnResult = 0 >ENDIF >pnResult = BITOR(pnResult, tnVal) >RETURN pnResult >