Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

[ Image Removed |../../index.htm#lansa/srvgudba_0165.htm]
You are here:

...

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
 
[ Image Removed |../../index.htm#lansa/srvgudba_0165.htm]