Esempio n. 1
0
        internal static SUserRow LoadUser(String AUserID, out TPetraPrincipal APetraPrincipal, TDBTransaction ATransaction)
        {
            SUserRow ReturnValue = LoadUser(AUserID, ATransaction);

            APetraPrincipal = new TPetraPrincipal(AUserID, TGroupManager.LoadUserGroups(
                                                      AUserID, ATransaction), TModuleAccessManager.LoadUserModules(AUserID, ATransaction));
            if (!ReturnValue.IsPartnerKeyNull())
            {
                APetraPrincipal.PartnerKey = ReturnValue.PartnerKey;
            }

/*
 *          TLogging.LogAtLevel (8, "APetraPrincipal.IsTableAccessOK(tapMODIFY, 'p_person'): " +
 *                  APetraPrincipal.IsTableAccessOK(TTableAccessPermission.tapMODIFY, "p_person").ToString());
 */
            return(ReturnValue);
        }
Esempio n. 2
0
        internal static SUserRow LoadUser(String AUserID, out TPetraPrincipal APetraPrincipal, TDBTransaction ATransaction)
        {
            SUserRow ReturnValue;

            TPetraIdentity PetraIdentity;

            ReturnValue = LoadUser(AUserID, out PetraIdentity, ATransaction);

            APetraPrincipal = new TPetraPrincipal(PetraIdentity, TGroupManager.LoadUserGroups(
                                                      AUserID, ATransaction), TTableAccessPermissionManager.LoadTableAccessPermissions(
                                                      AUserID, ATransaction), TModuleAccessManager.LoadUserModules(AUserID, ATransaction));

/*
 *          TLogging.LogAtLevel (8, "APetraPrincipal.IsTableAccessOK(tapMODIFY, 'p_person'): " +
 *                  APetraPrincipal.IsTableAccessOK(TTableAccessPermission.tapMODIFY, "p_person").ToString());
 */
            return(ReturnValue);
        }
Esempio n. 3
0
        public static SUserRow LoadUser(String AUserID, out TPetraPrincipal APetraPrincipal)
        {
            SUserRow ReturnValue;

            Ict.Petra.Shared.Security.TPetraIdentity PetraIdentity;

            ReturnValue = LoadUser(AUserID, out PetraIdentity);

            APetraPrincipal = new TPetraPrincipal(PetraIdentity, TGroupManager.LoadUserGroups(
                                                      AUserID), TTableAccessPermissionManager.LoadTableAccessPermissions(
                                                      AUserID), TModuleAccessManager.LoadUserModules(AUserID));

/*
 *          TLogging.LogAtLevel (8, "APetraPrincipal.IsTableAccessOK(tapMODIFY, 'p_person'): " +
 *                  APetraPrincipal.IsTableAccessOK(TTableAccessPermission.tapMODIFY, "p_person").ToString());
 */
            return(ReturnValue);
        }