* Preparing test data CREATE CURSOR Table1 (Column1 C(5), Column2 C(5), Column3 C(20)) INSERT INTO Table1 VALUES("T001", "L001", "TEXT1") INSERT INTO Table1 VALUES("T002", "L001", "TEXT2") INSERT INTO Table1 VALUES("T003", "L001", "TEXT3") INSERT INTO Table1 VALUES("T004", "L001", "TEXT4") INSERT INTO Table1 VALUES("T005", "L002", "TEXT5") INSERT INTO Table1 VALUES("T006", "L003", "TEXT6") INSERT INTO Table1 VALUES("T007", "L003", "TEXT7") INSERT INTO Table1 VALUES("T008", "L004", "TEXT8") INSERT INTO Table1 VALUES("T009", "L004", "TEXT9") CREATE CURSOR Table2 (Column1 C(5), Column2 M) INSERT INTO Table2 (Column1) SELECT DISTINCT Column2 FROM Table1 *----- Update code starts here ----- UPDATE Table2 SET Column2 = "" SELECT Table1 SCAN REPLACE Table2.Column2 WITH TRIM(Table2.Column2) + TRIM(Table1.Column1) + CHR(13) + CHR(10)+ ; TRIM(Table1.Column3) + CHR(13) + CHR(10) ; FOR Table2.Column1 = Table1.Column2 ; IN Table2 ENDSCAN SELECT Table2 BROWSE LAST NOWAIT