Description
Stop instances that are started in AdditionalUpdates as part of current transaction
Parameters
oiReturnStatus | output | integer | Return status of the method. |
Internal usage
QadFinancials
program code (program/bdebtorenduser.p)
/* ==================================================================== *
* BMfgEndUser *
* ==================================================================== */
if viBMfgEndUserID <> ? and
viBMfgEndUserID <> 0 and
vlIsBMfgEndUserStartedHr
then do:
if valid-handle(vhBMfgEndUserInst)
then do:
<I-34 {bFcCloseAndStopInstance
&CLASS = "BMfgEndUser"}>
end.
else do:
<I-1 {bFcStopInstance
&CLASS = "BMfgEndUser"}>
end.
assign viBMfgEndUserID = 0
vlIsBMfgEndUserStartedHr = false
vlIsBMfgEndUserOpenedHr = false.
end.
/* ==================================================================== *
* BBusinessRelation *
* ==================================================================== */
if viBBusinessRelation6Id <> ? and
viBBusinessRelation6ID <> 0 and
vlIsBBusinessRelationStartedHr
then do:
if valid-handle(vhBBusinessRelation6Inst)
then do:
<I-17 {bFcCloseAndStopInstance
&CLASS = "BBusinessRelation"}>
end.
else do:
<I-2 {bFcStopInstance
&CLASS = "BBusinessRelation"}>
end.
assign viBBusinessRelation6Id = 0
vlIsBBusinessRelationStartedHr = false
vlIsBBusinessRelationOpenedHr = false.
end.
/* ==================================================================== *
* BMfgAddress *
* ==================================================================== */
if viBMfgAddress9ID <> ? and
viBMfgAddress9ID <> 0 and
vlIsBMfgAddressStartedHr
then do:
if valid-handle(vhBMfgAddress9Inst)
then do:
<I-73 {bFcCloseAndStopInstance
&CLASS = "BMfgAddress"}>
end.
else do:
<I-35 {bFcStopInstance
&CLASS = "BMfgAddress"}>
end.
assign viBMfgAddress9ID = 0
vlIsBMfgAddressStartedHr = false
vlIsBMfgAddressOpenedHr = false.
end.
/* ==================================================================== *
* BMfgAddressListDetail *
* ==================================================================== */
if viBMfgAddressListDetail8ID <> ? and
viBMfgAddressListDetail8ID <> 0 and
vlIsBMfgAddressListStartedHr
then do:
if valid-handle(vhBMfgAddressListDetail8Inst)
then do:
<I-16 {bFcCloseAndStopInstance
&CLASS = "BMfgAddressListDetail"}>
end.
else do:
<I-31 {bFcStopInstance
&CLASS = "BMfgAddressListDetail"}>
end.
assign viBMfgAddressListDetail8ID = 0
vlIsBMfgAddressListStartedHr = false
vlIsBMfgAddressListOpenedHr = false.
end.
<ANCESTOR-CODE>