ISServiceLookupParam.CanBeLoaned

Description

This property is True, if lookup list contains lookup items for the services which can be loaned.

Syntax

object.CanBeLoaned

Part	Attribute	Type	Description
`object`	Required	ISServiceLookupParam	The `object` always implements the ISServiceLookupParam interface

Return Value

TSBooleanParamValue

Example

Display the number of the service lookup items, their descriptions, codes and IDs.

Dim aParam
Dim aLookupType
Dim aList
Dim aItem
Dim aMessage

Set aParam = Profile.MakeServiceLookupParam
aParam.Value = "AD"
aParam.CanBeLoaned = 1 'pvTrue 
aLookupType = 20
set aList = Profile.LoadLookupList2(aLookupType, aParam) 

aMessage = "Services Count = " & aList.Count & vbNewLine & vbNewLine
for each aItem in aList
  aMessage = aMessage & aItem.Id & vbTab & aItem.Code & vbTab & aItem.Description & vbNewLine
next

Profile.MsgBox(aMessage)

Note:

Version information

Added in v7.8.0