>>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 >>>