ISProfile.LoadShortCodes

Description

This function returns short codes by their types and Org Structure ID.

Syntax

object.LoadShortCodes(aType[, aOrgStructureID = 0])

Part Attribute Type Description
object Required
The object always implements the ISProfile interface
aType In, Required
object
The type of the short code
aOrgStructureID In, Optional
Default value is 0
int
ID of organisational structure

Return Value

ISShortCodes

Returns short codes by their types and Org Structure ID.

Example

Display the number of the short codes and their descriptions.

Dim aShortCodes
Dim aShortCode
Dim aMessage

Set aShortCodes = Profile.LoadShortCodes("Life Stage",0)

aMessage = "Short Codes Count = " & aShortCodes.Count
for i = 0 to aShortCodes.Count - 1
  set aShortCode = aShortCodes.Item(i)
  aMessage = aMessage & vbNewLine & aShortCode.Description
next      

Profile.MsgBox(aMessage) 
Note:

In Profile Client v8 on User Interface Short Codes can be found in Maintain > Short Codes.

Version information

Added in v7.8.0
parameter aOrgStructureID added in v8.3.0