method ExitProgram

Description

This method can be extended with code to execute when a business component is stopped.

PreCondition

This method is run when the r-code of this component or a descendant component is removed from memory. It is not to be confused with ExitInstance, which is run when an instance is stopped.

Parameters

oiReturnStatus

output

integer

Internal usage

unused

program code (program1/business.p)

viFcCount2 = vhFcStateDataSet:num-buffers.

do viFcCount1 = 1 to viFcCount2:
    vhDBuffer[viFcCount1] = vhFcStateDataSet:get-buffer-handle(viFcCount1).
end.

delete object vhFcStateDataSet.
do viFcCount1 = 1 to viFcCount2:
    delete object vhDBuffer[viFcCount1].
end.