INPUT TRANSFORM: S DIC("S")="I $D(^XUSEC(""XUMGR"",DUZ))!$S($D(^VA(200,DUZ,52,+Y,0)):$P(^(0),U,4),1:0)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: SEP 30, 1992
HELP-PROMPT: A cluster of keys to allow easier key assignment.
DESCRIPTION:
Subordinate authorization is "given" at the same time the "master" authorization is "given". This permits more efficient and easier delegation of authority.
SCREEN: S DIC("S")="I $D(^XUSEC(""XUMGR"",DUZ))!$S($D(^VA(200,DUZ,52,+Y,0)):$P(^(0),U,4),1:0)"
EXPLANATION: The person clustering authorizations must have the authority not only to delegate but also the authority to give others the authority to delegate.