Description
This empty method allows to do additional updates on class temp-tables after records were received (and validated) from outside, using method SetPublicTables.
You can start instances of other business classes to do those updates.
Parameters
oiReturnStatus | output | integer | |
Internal usage
BLF
program code (program/bbusinesscomponent.p)
<ANCESTOR-CODE>
empty temp-table tMenuURICaller.
for each tBusComponent:
for each tBusActivity where
tBusActivity.tc_ParentRowid = tBusComponent.tc_Rowid:
if tBusActivity.tc_Status = 'D':U or
tBusComponent.tc_Status = 'D':U
then do:
/*delete mnd_det*/
create tMenuURICaller.
assign tMenuURICaller.tcResourceURI = "urn:cbf:":U + tBusComponent.BusComponentCode + ".":U + tBusActivity.BusActivityCode.
end.
end. /*for each tBusActivity:*/
end. /*for each tBusComponent*/
if can-find (first tMenuURICaller)
then do:
if viBMfgMenu7ID = 0 or
viBMfgMenu7ID = ?
then do:
<I-1 {bFcStartAndOpenInstance
&ADD-TO-TRANSACTION = "true"
&CLASS = "BMfgMenu"}>
end.
else do:
<I-2 {bFcOpenInstance
&CLASS = "BMfgMenu"}>
end.
<M-4 run DeleteMenuFromResource
(input tMenuURICaller (tMenuURI),
output viLocalReturnStatus (oiReturnStatus)) in BMfgMenu>
<I-3 {bFcCloseInstance
&CLASS = "BMfgMenu"}>
if viLocalReturnStatus <> 0
then assign oiReturnStatus = viLocalReturnStatus.
if viLocalReturnStatus < 0
then do:
<M-5 run StopExternalInstances
(output viFcReturnSuper (oiReturnStatus)) in BBusinessComponent>
return.
end.
end. /*if can-find (first tMenuURICaller)*/