BOOL          fOK;
     int           iSession;
     char          strDataType[FIELD_TYPE_LENGTH + 1];
     FLDLEN        length;
     int           iDecimal;
     wchar_t       *pwstrSurname;
     unsigned long ulFlags;
     long          lDataLen;

     fOK = LceGetFieldType(iSession, "SURNAME", strDataType, &length, &decimal);
     lDataLen = ( (lDataLen + 1) * sizeof(wchar_t) );
     pwstrSurname = malloc(lDataLen);
     fOK = LceGetDefaultValueU(iSession, "SURNAME", pwstrSurname, lDataLen, &ulFlags);