method DeActivateInPool

Description

Finish unit test logging and make a report.

Internal usage

unused

program code (program1/componentpool.p)

run gipr_DeleteQueryProcedures.

if vhCacherInPool <> ?
then run gipr_DeleteQueryProcedures in vhCacherInPool.

<M-9 run SaveStateInPool  () in ComponentPool>

<M-24 run DeleteDSInPool  () in ComponentPool>

if vhPersistenceInPool <> ?
then run ReleaseAllQBuffers in vhPersistenceInPool.

if valid-handle(vhLoggerInPool)
and vhLoggerInPool:unique-id = viLoggerUID
then do:
    vhFcComponent = vhLoggerInPool.
    <M-1 run LogUnitTest  () in tLogger>
end.