' set commit mode
iSession = LceGetSessionId(): 
If bCommit = True Then
    iRet = LceSetCommitmentOn(iSession)
Else
    iRet = LceSetCommitmentOff(iSession)
End If
iRet = LceOpenSession(iSession):