• Created by user-2c621, last updated by user-eb51a on Jul 25, 2023 1 minute read 
     dim sDescription as String 
 
     ' get the LANSA Repository Description to use in list label
 
     sDescription = string (FILE_DESC_LENGTH + 1 ,chr(0))
     iRet = LceGetFileDesc(iSession, "PSLMST", sDescription)
     lbFileList.caption = sTrim (sDescription)
  • No labels