BOOL fOK;
     int  iSession;
     char *pstrSurname;
     long lFlags;
     long lDataLen;
 
     fOK = LceGetFieldDataLength(iSession, "SURNAME", &lDataLen);
     pstrSurname = malloc(lDataLen + 1);
     fOK = LceGetFieldValueX(iSession, "SURNAME", (char far *) pstrSurname, &lFlags);