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/bsodcategoryexclusion.p)
<ANCESTOR-CODE>
/* ================================================================= */
/* Update SOD violations when exclusions are created. */
/* ================================================================= */
if viSODCategoryIDToCheck <> -1
then do:
<I-90 {bFcStartAndOpenInstance
&CLASS = "BSODViolationRule1"}>
<M-49 run CheckRule1
(input 0 (iiRoleID),
input viSODCategoryIDToCheck (iiSODCategoryID),
output viFcReturnSuper (oiReturnStatus)) in BSODViolationRule1>
<I-70 {bFcCloseAndStopInstance
&CLASS = "BSODViolationRule1"}>
if viFcReturnSuper <> 0
then oiReturnStatus = viFcReturnSuper.
if viFcReturnSuper < 0
then return.
<I-34 {bFcStartAndOpenInstance
&CLASS = "BSODViolationRule2"}>
<M-7 run CheckRule2
(input 0 (iiUsrID),
input 0 (iiRoleID),
input viSODCategoryIDToCheck (iiSODCategoryID),
input '' (icUsrLogin),
output viFcReturnSuper (oiReturnStatus)) in BSODViolationRule2>
<I-5 {bFcCloseAndStopInstance
&CLASS = "BSODViolationRule2"}>
if viFcReturnSuper <> 0
then oiReturnStatus = viFcReturnSuper.
if viFcReturnSuper < 0
then return.
viSODCategoryIDToCheck = -1.
end.