Description
This method can be used to close all opened external instances of the component.
Parameters
oiReturnStatus | output | integer | Return status of the method. |
Internal usage
QadFinancials
program code (program1/bdebtorshipto.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(vhBBusinessRelation1Inst)
then do:
<I-37 {bFcCloseInstance
&CLASS = "BBusinessRelation"}>
assign vlIsBBusinessRelationOpenedHr = false.
end.
/* ================================================================= *
* BMfgAddress component *
* ================================================================= */
if vlIsBMfgAddressOpenedHr and
valid-handle(vhBMfgAddress2Inst)
then do:
<I-80 {bFcCloseInstance
&CLASS = "BMfgAddress"}>
assign vlIsBMfgAddressOpenedHr = false.
end.
/* ================================================================= *
* BMfgAddress component *
* ================================================================= */
if vlIsBMfgAddressListOpenedHr and
valid-handle(vhBMfgAddressListDetail6Inst)
then do:
<I-90 {bFcCloseInstance
&CLASS = "BMfgAddressListDetail"}>
assign vlIsBMfgAddressListOpenedHr = false.
end.
end. /* MAIN_BLOCK */
assign oiReturnStatus = viLocalReturnStatus.