cQIC	;Configure Cache ;cQIC;
	;
SQL	;S K=$$ROLE^dmSEC(role,cd)
	;role: rolename
	;cd: "" (open) or 1 (delete)
	S K=$$ROLE^dmSEC("ReadOnly","") W !,K
	;
	;S K=$$USER^dmSEC(user,pw,cd)
	;user: name
	;pw: password
	;cd: "" (open) or 1 (delete)
	S K=$$USER^dmSEC("DATAM","1421JGGJ","") W !,K
	;
	;S K=$$PWUSER^dmSEC(user,pw)
	;user: name
	;pw: password
	S K=$$PWUSER^dmSEC("_SYSTEM","1871JJMO") W !,K
	;
	;S K=$$RO2USR^dmSEC(role,user,cd)
	;role: name
	;user: username
	;cd: "" (open) or 1 (delete)
	S K=$$RO2USR^dmSEC("ReadOnly","DATAM","") W !,K
	;
	;S K=$$GRANTREV^dmSEC(class,gd,type,user,scr)	
	;class: classname (wildcard * allowed)
	;gd: "" (grant) or 1 (revoke)
	;type: s=select, i=insert, u=update, d=delete, r=reference, default 's', * = all
	;user: rolename or username (name1,name2), default 'ReadOnly'
	;scr: "" (non-verbose) or 1 (verbose)
	S K=$$GRANTREV^dmSEC("Main.*","","","ReadOnly",1)
SQLZ	Q
	;
TBK	;Users for TBK
	S K=$$ROLE^dmSEC("ReadOnly","") W !,K
	;
	;S K=$$USER^dmSEC(user,pw,cd)
	;user: name
	;pw: password
	;cd: "" (open) or 1 (delete)
	S K=$$USER^dmSEC("TBK","1174LOJG","") W !,K
	S K=$$USER^dmSEC("WINCC","3105wincc","") W !,K
	;
	;S K=$$RO2USR^dmSEC(role,user,cd)
	;role: name
	;user: username
	;cd: "" (open) or 1 (delete)
	S K=$$RO2USR^dmSEC("ReadOnly","TBK","") W !,K
	;
	;S K=$$GRANTREV^dmSEC(class,gd,type,user,scr)	
	;class: classname (wildcard * allowed)
	;gd: "" (grant) or 1 (revoke)
	;type: s=select, i=insert, u=update, d=delete, r=reference, default 's', * = all
	;user: rolename or username (name1,name2), default 'ReadOnly'
	;scr: "" (non-verbose) or 1 (verbose)
	S K=$$GRANTREV^dmSEC("E.ShopFloorControl.OEEStatusRegistrations","","si","WINCC",1)
TBKZ	Q
	;
YZ	Q
	;
ZZ	; 17.01.2012 - 15:58 * Cache-r6.4.9