noreport = 19
SELECT Resident
SCAN
  REPLACE NoitelephoneIdReportActif ;
     WITH IIF(LOOKUP(cFiltre.ireport,itelephoneid,cFiltre.itelephoneid)=m.noreport,m.noreport,0)
ENDSCAN
* OR
  REPLACE IN Resident ALL ;
     NoitelephoneIdReportActif ;
        WITH IIF(LOOKUP(cFiltre.ireport,itelephoneid,cFiltre.itelephoneid)=m.noreport,m.noreport,0)
* OR if supported
UPDATE Resident ;
   SET  NoitelephoneIdReportActif ;
     = NVL((SELECT F.ireport FROM cFiltre F WHERE F.itelephoneid=Resident.itelephoneid AND F.ireport = m.noreport),0)
* OR if F.itelephoneid,F.ireport  is primary
UPDATE R SET  NoitelephoneIdReportActif = NVL((F.ireport,0);
	FROM Resident R LEFT JOIN cFiltre F WHERE F.itelephoneid=R.itelephoneid AND F.ireport = m.noreport