project BLF > class BRole > method PostTransaction
Description
Actions to take after final commit of the transaction.
Parameters
oiReturnStatus | output | integer | Return status of the method. |
Internal usage
unused
program code (program/brole.p)
<ANCESTOR-CODE>
/* ================================================================= */
/* Update SOD violations when resources are added to a role */
/* or when a role is no longer excluded from SOD. */
/* ================================================================= */
if vcRolesForSODViolationCheck <> ""
then do viRCount = 1 to num-entries(vcRolesForSODViolationCheck):
<I-11 {bFcStartAndOpenInstance
&CLASS = "BSODViolationRule1"}>
<M-75 run CheckRule1
(input integer (entry(vircount,vcrolesForSODViolationCheck)) (iiRoleID),
input 0 (iiSODCategoryID),
output viFcReturnSuper (oiReturnStatus)) in BSODViolationRule1>
<I-55 {bFcCloseAndStopInstance
&CLASS = "BSODViolationRule1"}>
if viFcReturnSuper <> 0
then oiReturnStatus = viFcReturnSuper.
if viFcReturnSuper < 0
then return.
<I-5 {bFcStartAndOpenInstance
&CLASS = "BSODViolationRule2"}>
<M-6 run CheckRule2
(input 0 (iiUsrID),
input integer (entry(vircount,vcrolesForSODViolationCheck)) (iiRoleID),
input 0 (iiSODCategoryID),
input '' (icUsrLogin),
output viFcReturnSuper (oiReturnStatus)) in BSODViolationRule2>
<I-7 {bFcCloseAndStopInstance
&CLASS = "BSODViolationRule2"}>
if viFcReturnSuper <> 0
then oiReturnStatus = viFcReturnSuper.
if viFcReturnSuper < 0
then return.
end.
vcRolesForSODViolationCheck = "".