SetSecurityClassLabel

Changes the name of a security class in a Classic application.

Caution!

The method will fail if executed against an application created with Performance Management Architect.

Syntax

<HsvSecurityAccess>.SetSecurityClassLabel lSecurityClassID, bstrSecurityClass

Argument	Description
lSecurityClassID	Long (ByVal). The ID of the security class. You can get this ID by passing the security class name to GetSecurityClassID.
bstrSecurityClass	String (ByVal). The new name for the security class.

Example

The following method renames a given security class.

Sub renameSecClass(sName As String, sNewName As String)
Dim lSecClassID As Long, cSecurity As HsvSecurityAccess
'g_cSession is an HsvSession object reference
Set cSecurity = g_cSession.Security
cSecurity.GetSecurityClassID sName, lSecClassID
cSecurity.SetSecurityClassLabel lSecClassID, sNewName
End Sub