6 9 1 VB Example

LANSA Open Guide

previous page next page

6.9.1 VB Example

iRet = LceSetCommitmentOn(iSession)

iRet = LceOpenSession(iSession) ' enable commit mode

...

if (bCommit) then

   iRet = LceCommitWork (iSession) 

else

   iRet = LceRollBackWork (iSession)

 

previous page start next page