project QadFinancials > class BCompany > business logic query CompanyBySharedSetUsrRole


Parameters


iiCompanyIdintegerCompany id
iiShareSetIdinteger
icUserCodecharacter


query condition


  each CompanySharedSet where
CompanySharedSet.Company_Id = iiCompanyId AND
CompanySharedSet.SharedSet_ID = iiShareSetId

      first Company (inner-join) where
Company.Company_Id = iiCompanyId AND
Company.Company_ID = CompanySharedSet.Company_ID AND

          each UsrCompany (inner-join) where
UsrCompany.Company_Id = iiCompanyId AND
UsrCompany.Company_ID = Company.Company_ID AND

              first Usr (inner-join) where
Usr.Usr_ID = UsrCompany.Usr_ID AND
Usr.UsrLogin = icUserCode


query resultset tqCompanyBySharedSetUsrRole


field namedata typedb fielddescription
tiCompany_IDintegerCompany.Company_IDRecord ID
tcCompanyCodecharacterCompany.CompanyCodeEntity Code
tcCompanyDescriptioncharacterCompany.CompanyDescriptionEntity Description
tlCompanyIsActivelogicalCompany.CompanyIsActiveActive
tiCompanySharedSet_IDintegerCompanySharedSet.CompanySharedSet_IDRecord ID
tiUsr_IDintegerUsr.Usr_IDRecord ID
tiUsrCompany_IDintegerUsrCompany.UsrCompany_IDRecord ID
tlUsrIsActivelogicalUsr.UsrIsActiveActive
tcUsrLogincharacterUsr.UsrLoginLogin
tcUsrNamecharacterUsr.UsrNameUser Name


Internal usage


QadFinancials
method BDebtorReport.GetBusinessFields3