method CrossCompanyEntries

Description

Calculate how many companies are selected in the filter.

Parameters

oiReturnStatus

output

integer

Return status of the method.

Internal usage

QadFinancials

method BAPMatchingReport.SetDataItemsBasedOnFilterTT

program code (program1/bapmatchingreport.p)

/* ========================== */
/* Cross-Company operations   */
/* Pre cache system companies */
/* ========================== */

<Q-1 run CompanyPrim (all) (Read) (NoCache)
   (input ?, (LookupCompanyId)
    input ?, (CompanyCode)
    output dataset tqCompanyPrim) in BCompany >

/* Assign cross- company values (how many companies are selected) */
IF vcCompanyFilter = ? or vcCompanyFilter = "":U THEN
    viAPCompanyEntries = 1.
ELSE
    viAPCompanyEntries = num-entries(vcCompanyFilter,",":U).