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