Class SecurityTutorial.AuthorizationExample
{
ClassMethod CreateTestData()
{
Set ^TestData = "MyInitialData"
}
ClassMethod HelloUser()
{
Write "User ", $Username
}
ClassMethod UpdateTestData()
{
Set ^TestData = "MyUpdatedData"
}
ClassMethod ReadTestData() As %String
{
Return ^TestData
}
ClassMethod ProtectedMethod() As %String
{
If ($System.Security.Check("ProtectedMethod","U"))
{
Return $Username
}
Else
{
Return "Error: Insufficient Privileges"
}
}
}