project QadFinancials > class BMfgDBConnections > method IsMultiDB


Parameters


olisMultiDBoutputlogical
oiReturnStatusoutputintegerReturn status of the method.


Internal usage


QadFinancials
method BCompany.ValidateCompanyCode
method BDomain.AdditionalUpdates
method BDomain.ValDomainCode
method BDomain.ValidateComponent


program code (program3/bmfgdbconnections.p)

assign oiReturnStatus = -98.

/* Check if there are multiple database connection records*/
<Q-1 assign vlFcQueryRecordsAvailable = MfgDBConnectionsByDBName (NoCache)  () in BMfgDBConnections >
if vlFcQueryRecordsAvailable = ?
then
   olisMultiDB = true.
else
   olisMultiDB = false.

if oiReturnStatus = -98
then
   assign oiReturnStatus = 0.