Gedemin TLB.IgsQueryList.AddMasterDetail
Материал из GedeminWiki
From Gedemin TLB.pas
procedure AddMasterDetail(const MasterTable: WideString; const MasterField: WideString; const DetailTable: WideString; const DetailField: WideString); safecall;
Unit: Gedemin TLB
Type: procedure
Visibility: public
Member Of: IgsQueryList
Описание
Устанавливает отношение Master-Detail между двумя gsQuery.
set qMaster = BaseQueryList.Query(BaseQueryList.Add("Doc", 0))
qMaster.SQL = " SELECT doc.ID, " & _
"……" & _
" FROM GD_DOCUMENT doc " & _
" ……"
set qDetail = BaseQueryList.Query(BaseQueryList.Add("DocLine", 0))
qDetail.SQL = " SELECT doc.PARENT AS MASTERKEY, " & _
"……" & _
" FROM GD_DOCUMENT doc " & _
" ……"
" ORDER BY doc.DOCUMENTDATE"
qMaster.Open
qDetail.Open
call BaseQueryList.AddMasterDetail("Doc", "ID", "DocLine", "MASTERKEY;DOCUMENTDATE")
Оба Query должны быть открыты. В параметре DetailField после поля, по которому идет связка (MASTERKEY), через «;» перечисляются поля, по которым идет сортировка.