Versions Compared

Key

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

...

               ' remove any previous select results not read. 
          ' If any exist, the next select will fail.
iRet = LceDeleteSelect(iSession, "SECTAB")
 

...

     ' get the new data 
iRet = LceSetSelectOptions(iSession,

...

 "*RECEIVEIMMED")

...

     iRet = LceRequestSelect(iSession,

...

 "SKILCODE,SKILDESC",

...

 "SKLTAB",

...

 _
        "",

...

 False)

...