Parameters
| oiReturnStatus | output | integer | Return status of the method. |
Internal usage
QadFinancials
program code (program1/bdebtorenduser.p)
/* ====================================================================================== *
* Method : CloseExternalInstances *
* Description : This method is used to close opened instances of the related components *
* -------------------------------------------------------------------------------------- *
* Parameters : *
* ====================================================================================== */
MAIN_BLOCK:
do on error undo, return:
assign oiReturnStatus = -98
viLocalReturnStatus = 0.
/* ================================================================= *
* BBusinessRelation component *
* ================================================================= */
if vlIsBBusinessRelationOpenedHr and
valid-handle(vhBBusinessRelation6Inst)
then do:
<I-43 {bFcCloseInstance
&CLASS = "BBusinessRelation"}>
assign vlIsBBusinessRelationOpenedHr = false.
end.
/* ================================================================= *
* BMfgAddress component *
* ================================================================= */
if vlIsBMfgAddressOpenedHr and
valid-handle(vhBMfgAddress9Inst)
then do:
<I-36 {bFcCloseInstance
&CLASS = "BMfgAddress"}>
assign vlIsBMfgAddressOpenedHr = false.
end.
/* ================================================================= *
* BMfgAddress component *
* ================================================================= */
if vlIsBMfgAddressListOpenedHr and
valid-handle(vhBMfgAddressListDetail8Inst)
then do:
<I-68 {bFcCloseInstance
&CLASS = "BMfgAddressListDetail"}>
assign vlIsBMfgAddressListOpenedHr = false.
end.
/* ================================================================= *
* BMfgEndUser component *
* ================================================================= */
if vlIsBMfgEndUserOpenedHr and
valid-handle(vhBMfgEndUserInst)
then do:
<I-5 {bFcCloseInstance
&CLASS = "BMfgEndUser"}>
assign vlIsBMfgEndUserOpenedHr = false.
end.
end. /* MAIN_BLOCK */
assign oiReturnStatus = viLocalReturnStatus.