>SELECT crsMLE >lcNotes = "" >SCAN WHILE crsMLE.PartNum = crsBomNotes.PartNum > lcNotes = m.lcNotes + IIF(EMPTY(m.lcNotes), "", " ") + ALLTRIM(crsBomNotes.Notes) >ENDSCAN >REPLACE Notes WITH m.lcNotes IN crsMLE >>
select crsBomNotes if seek(crsMLE.PartNum) scan while PartNum = crsMLE.PartNum ... endscan endif replace...