Versions Compared

Key

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

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

...

BOOL fOK;
int  iSession;
int  iRet;
long lFlags;
BOOL fSQLNullEnab;
 
fOK = LceGetFieldAttributes(iSession, " SKILDESC ", &lFlags);
fSQLNullEnab = (lFlags & LCE_FLDATTR_SQLNULL);
 
iRet = LceSetFieldValue(iSession, "SKILCODE", strCode);
if (fSQLNullEnab && ( strcmp(strDesc, "") == 0 ) )
   iRet = LceSetFieldValue(iSession, "SKILDESC", Null);
else
   iRet = LceSetFieldValue(iSession, "SKILDESC", strDesc);
    
iRet = LceInsert(iSession, "SKILCODE,SKILDESC", "SKLTAB", False); 
[ Image Removed |../../index.htm#lansa/srvgudba_0685.htm]