method XmlObjectDetail

Description

This method is called from within the generic code to create an XML representation of a component instance.

Parameters

oiReturnStatus

output

integer

Return status of the method.

Internal usage

unused

program code (program/bstoredsearch.p)

<ANCESTOR-CODE>

<M-1 run StartPersistence
   (output vhFcComponent (ohPersistence), 
    output viFcReturnSuper (oiReturnStatus)) in BStoredSearch>

for each tContextInfo:
    assign tContextInfo.tcCompanyCode = "999 - SysAdm"
           tContextInfo.tcInvolvedCompanyCodes = "999 -  SysAdm"
           tContextInfo.tcComment = string(now) + " " + vcUserLogin + " " + <M-2 GetDatabaseName  () in persistence>.
end.