>I want to reduce all CHR(13) + CHR(10) to only one between lines. However, using
>
>lcNotes = STRTRAN(field, CHR(13) + CHR(10) + CHR(13) + CHR(10),CHR(13) + CHR(10))
>
>is not working for me.
>


(1) you have to repeat the operation n times
(2) of course, you have to replace the memo field

#define CRLF chr(13) + Chr(10)

local lcNotes
lcNotes = FieldNameNotes

do while !empty(at(CRLF+CRLF, m.lcNotes))
     lcNotes = strtran(strtran(m.lcNotes, CRLF+CRLF, CRLF), CRLF+CRLF, CRLF)
enddo

repl FieldNameNotes with m.lcNotes in TheCursorName