[AP] 透過系統設定文件比對使用權限

'//透過系統設定文件比對使用權限

tCode := "Form-SystemSetup";
tUserDept := @DbLookup ("";@Subset(@DbName;1):"ap\\sys\\sys0001.nsf";"EngView";@V3UserName ;"Dept_No");
tAllowDept := @DbLookup ("";@DbName;"View-SystemSetup";tCode;"Dept_FQC");
tUserID := @V3UserName;
@If(@IsMember(tUserDept;tAllowDept) | @IsMember(tUserID;tAllowDept) | @Contains(@UserRoles; "[ITM OP.]":"[Admin]");
(@SetTargetFrame("Main") :@Command([OpenFrameset]; "SP.JWFFS_FQC"));

@Prompt ([Ok];@DbTitle ;"您不允許進入此系統 !!"))