* New line characters lcCrLf = CHR(13) + CHR(10) lcMemo = mytable.memo * Eliminate empty lines at the beginning DO WHILE LEFT(lcMemo,2) == lcCrLf lcMemo = ALLTRIM(SUBSTR(lcMemo,3)) ENDDO * Eliminate empty lines at the end DO WHILE RIGHT(lcMemo,2) == lcCrLf lcMemo = ALLTRIM(LEFT(lcMemo, LEN(lcMemo)-2)) ENDDO REPLACE mytable.memo WITH lcMemo