project QadFinancials > class PMultiDB > method updateActiveFlagByParams
Parameters
icdomainCode | input | character | |
ildomainIsActive | input | logical | |
oiReturnStatus | output | integer | Return status of the method. |
Internal usage
QadFinancials
program code (program3/pmultidb.p)
if oiReturnStatus = 0 then oiReturnStatus = -98.
empty temp-table tMFGDomain.
create tMFGDomain.
assign
tMFGDomain.tcDomainCode = icdomainCode
tMFGDomain.tlDomainIsActive = ildomainIsActive.
<M-3 run UpdateActiveFlag
(input-output tMFGDomain (tMFGDomain),
output viFcReturnSuper (oiReturnStatus)) in PMultiDB>
if viFcReturnSuper <> 0 then
assign oiReturnStatus = viFcReturnSuper.
if oiReturnStatus = -98 then
assign oiReturnStatus = 0.