project QadFinancials > class PMultiDB > method createConnectionRecordsbyParams


Parameters


icdomainCodeinputcharacter
icdomainNameinputcharacter
icdomainSNameinputcharacter
oiReturnStatusoutputintegerReturn status of the method.


Internal usage


QadFinancials
method BDomain.AdditionalUpdates


program code (program3/pmultidb.p)

if oiReturnStatus = 0 then oiReturnStatus = -98.

empty temp-table tMFGDomain.

create tMFGDomain.

assign
    tMFGDomain.tcDomainCode = icdomainCode
    tMFGDomain.tcDomainPropertyName = icdomainName
    tMFGDomain.tcDomainPropertySearchName = icdomainSName.

<M-2 run createConnectionRecords
   (input-output tMFGDomain (tMFGDomain), 
    output viFcReturnSuper (oiReturnStatus)) in PMultiDB>

if viFcReturnSuper <> 0 then 
    assign oiReturnStatus = viFcReturnSuper.

if oiReturnStatus = -98 then
    assign oiReturnStatus = 0.