Versions Compared

Old Version 1

changes.mady.by.user user-2c621

Saved on

compared with

New Version 2

changes.mady.by.user user-2c621

Saved on

Key

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

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

...

' set Surname column headings using LANSA Repository information
' 
dim sBuff as string
sBuff =  String(FIELD_HEADING_LENGTH, Chr(0)) 
iRet = LceGetFieldHeading(iSession, "SURNAME", 1, sBuff)
lbHead1.Caption = sTrim (sBuff)
iRet = LceGetFieldHeading(iSession, "SURNAME", 2, sBuff)
lbHead2.Caption = sTrim (sBuff)
iRet = LceGetFieldHeading(iSession, "SURNAME", 3, sBuff)
lbHead3.Caption = sTrim (sBuff)
 
[ Image Removed |../../index.htm#lansa/srvgudba_0170.htm]