[ 
|../../index.htm#lansa/srvgudba_0675.htm]
You are here:
6.17.3 Psuedocode Example
strValue = spaces(FIELD_DATA_SIZE + 1)
iValue = 0
lFlags = 0
IF LceGetDefaultValueX(iSession, "EMPNO", strValue, lFlags)
IF NOT lFlags = 1
iValue = ConvertStringToInteger (strValue)
ENDIF
ELSE
/ return error /
ENDIF
[ |../../index.htm#lansa/srvgudba_0675.htm]