Добрый день! С пятницей!
Поставила меня в тупик ошибка, посмотрите, пожалуйста!

Access2003. Таблица "Договоры". На форме в шапке есть свободное поле, которое при двойном нажатии склеивает данные из каждой записи по договорам. Например:
"ООО Айболит,22/к,14.01.2017,в полном объёме;Стройканава ОАО,345/л,01.01.2018, частично...."
И таких записей для склеивания, например, 8 штук.

склеивает записи запрос и модуль

Public Function unic12(fild, tabl, nam)
Dim db As DAO.Database
Dim rst1 As DAO.Recordset
Set db = CurrentDb
Set rst1 = db.OpenRecordset("select [" & fild & "] from [" & tabl & "] where Cstr(код_плана)='" & nam & "' ;")
If rst1.RecordCount <> 0 Then
    rst1.MoveFirst
    Do While Not rst1.EOF
        r = r & "=" & rst1.Fields(fild)
        rst1.MoveNext
    Loop
    unic12 = Trim(r)
Else
    unic12 = ""
End If
rst1.Close
Set rst1 = Nothing
End Function

Промежуточная табличка, куда пишется результат, содержит поле memo, но данные "обкусываются" функцией unic12 ещё на подходе! То есть, в результате запроса

в запросе:
все_дог: Last(unic12("рекв";"ПолеД1";CStr([код_плана])))

как только длина выводимого в запросе поля достигает 255 знаков, он отбрасывает остаток!
Как быть?
HELP!

http://www.sql.ru/forum/1289859/konkatenaciya-strok