>SELECT CODEMED,NOINTERNE,NAM,NOM,DATENAISS,CODEDIAG,HONOTOTAL,DATEMAJ; > from factcur; > WHERE ((FACTCUR.STATUSFACT = "F") .AND.; > (AT("B",FACTCUR.CONSSPECIA)<>0) .AND.; > !EMPTY(FACTCUR.DATEMAJ) .AND.; > BETWEEN(FACTCUR.DATEMAJ,M_DATDEB,M_DATFIN)) .AND.; > BETWEEN(FACTCUR.CODEMED, M_MEDDEB, M_MEDFIN); >union ; >select CODEMED,NOINTERNE,NAM,NOM,DATENAISS,CODEDIAG,HONOTOTAL,DATEMAJ; > from facthisto ; > WHERE ((FACTHISTO.STATUSFACT = "F") .AND.; > (AT("B",FACTHISTO.CONSSPECIA)<>0) .AND.; > !EMPTY(FACTHISTO.DATEMAJ) .AND.; > BETWEEN(FACTHISTO.DATEMAJ,M_DATDEB,M_DATFIN)) .AND.; > BETWEEN(FACTHISTO.CODEMED, M_MEDDEB, M_MEDFIN) ; >order by codemed,DTOCdatemaj ; >INTO CURSOR facttmp >
GROUP BY CODEMED,NOINTERNE,NAM,NOM,DATENAISS,CODEDIAG,HONOTOTAL,DATEMAJ