strEdit = spaces(FIELD_EDIT_LENGTH + 1)
     strFlag = ""
 
     IF NOT LceGetFieldEdit(iSession, "SURNAME", strEdit, strFlag)
              / return error /
     ENDIF
     IF strFlag = "E"
              / field edit is code /
     ELSE
              IF strFlag = "W"
                       / field edit is word /
              ELSE
                      / no field edits /
     ENDIF