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