SELECT cArtCode, UPPER(cArtGrp) AS cArtgrp, cArtNaam, ; SUM(iAantal*IIF(factuur.lCredNota,-1,1)) AS iTotAant, ; SUM(iAantal*nArtInkPrs*IIF(Factuur.lcrednota,-1,1)) As nTotInk, ; SUM(iAantal*nArtPrs*IIF(factuur.lCredNota,-1,1)) AS nTotVerk ; FROM FacRegels,Factuur ; WHERE Between(Factuur.dFacDatum,dDatVan,dDatTot) ; AND YEAR(facregels.dFacdatum)+FacRegels.iFactuurnr = ; YEAR(Factuur.dFacdatum)+ Factuur.iFactuurnr ; UNION ; SELECT cArtCode, UPPER(cArtGrp) AS cArtGrp, cArtNaam, ; SUM(iAantal*IIF(fac.lCredNota,-1,1)) AS iTotAant, ; SUM(iAantal*nArtInkPrs*IIF(Fac.lCrednota,-1,1)) As nTotInk, ; SUM(iAantal*nArtPrs*IIF(fac.lCredNota,-1,1)) AS nTotVerk, ; SUM(iAantal*(nartPrs*IIF(facrg.iArttype=1,fac.nKortPerc1/100, ; fac.nKortperc2/100) ) )as nKort ; FROM FacRg,Fac ; WHERE Between(Fac.dFacDatum,dDatVan,dDatTot) ; AND YEAR(facrg.dFacdatum) + Facrg.iFactuurnr = ; YEAR(Fac.dFacdatum) + Fac.iFactuurnr ; GROUP BY 1 ; ORDER BY 2,1 ; INTO CURSOR crVerk