project QadFinancials > class BBusinessRelation > method StopExternalInstances

Description

Stop instances that are started in AdditionalUpdates as part of current transaction


Parameters


oiReturnStatusoutputintegerReturn status of the method.


Internal usage


QadFinancials
method BBusinessRelation.AdditionalUpdates
method BBusinessRelation.ValidateComponent


program code (program/bbusinessrelation.p)

if viBMfgAddress6ID <> 0 and
   viBMfgAddress6ID <> ?
then do :
    <I-1 {bFcStopInstance
            &CLASS           = "BMfgAddress"}>
    
    assign viBMfgAddress6ID = 0.
end.
if viBMfgEndUserBusinessRelationID <> 0 and
   viBMfgEndUserBusinessRelationID <> ?
then do :
    <I-2 {bFcStopInstance
         &CLASS           = "BMfgEndUser"}>
    
    assign viBMfgEndUserBusinessRelationID = 0.
end.

if viBMfgSupplierFromBBusRelID <> 0 and
   viBMfgSupplierFromBBusRelID <> ?
then do :
    <I-3 {bFcStopInstance
         &CLASS           = "BMfgSupplier"}>
    
    assign viBMfgSupplierFromBBusRelID = 0.
end.

if viBMfgCustomerFromBBusRelID <> 0 and
   viBMfgCustomerFromBBusRelID <> ?
then do :
    <I-4 {bFcStopInstance
         &CLASS           = "BMfgCustomer"}>
    
    assign viBMfgCustomerFromBBusRelID = 0.
end.

<ANCESTOR-CODE>