strIndicator = ""
IF NOT LceGetFieldIndicator(iSession, "SURNAME", strIndicator)
         / return error /
ENDIF
IF strIndicator = "Y"
         / field uses DBCS /
ELSE
         / single byte character /
ENDIF