Procedura-SetPointMasks

Popis:

Nastaví oprávnění k funkci

Parametry:

Název	Popis	Datový typ
IN_ClassID		Char(26)
IN_Role_ID		Char(10)
IN_GrantedMask		Integer
IN_DeniedMask		Integer

Tělo:

BEGIN
  Select Count(Role_ID) from SecurityPointRights where ClassID=:IN_ClassID and
    Role_ID=:IN_Role_ID into mCount;
  if (mCount<1) then
    INSERT INTO SecurityPointRights (ClassID, Role_ID, GrantedMask, DeniedMask)
      VALUES (:IN_ClassID, :IN_Role_ID, :IN_GrantedMask, :IN_DeniedMask);
  else
    UPDATE SecurityPointRights SET GrantedMask=:IN_GrantedMask, DeniedMask=:IN_DeniedMask where ClassID=:IN_ClassID and
      Role_ID=:IN_Role_ID;
END;

Generated by ABRA Software a.s. 27.10.2021 16:34:17