$Sclass

From m204wiki
Revision as of 13:18, 20 April 2013 by Alex (talk | contribs) (Automatically generated page update)
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to navigation Jump to search

$SCLASS returns a variable length character string equal to the current user's subsystem user class (SCLASS). $SCLASS returns a null string if the user is not running in a subsystem. For more information on user classes and subsystems, refer to Application Subsystem Development.

The $SCLASS function typically is used when designing applications through the Subsystem Management facility. $SCLASS can be used to determine the user class of the current user. Control can then be transferred depending upon the user's privileges. The $SCLASS function takes no arguments.

Example

GET.OPTION: JUMP TO (ADD.REC,VIEW.REC,UPD.REC) - %MAIN.MENU:SELECTION . . . UPD.REC: IF $SCLASS = 'UPDATE' THEN IF $SETG('NEXT','PRE-MAINT.PGM') THEN PRINT 'GLOBAL TABLE FULL' END IF . . .