Синтаксис:
function DelJoin( ID: Integer); |
Параметры:
ID – идентификатор соединения.
Описание:
Метод удаляет соединение из запроса.
Пример:
// Показать все справочники, в которых используется определенный реквизит
RequisiteCode = 'ISBEDocStrg'
Reference = References.SYSREF_REFERENCE_TYPES.GetComponent
Reference.ComponentForm.View.ViewMode = vmNavigation
RequisitesDataSet = Reference.DataSet.DetailDataSet(1)
ReferenceTable = Reference.TableName
RequisitesTable = RequisitesDataSet.TableName
// Установить связь между реквизитами и справочниками,
// которые их используют.
AddJoin1 = Reference.AddJoin(RequisitesTable; jtInner;
Format("%0:s.%1:s = %2:s.%3:s";
ArrayOf(ReferenceTable; Reference.Requisites(SYSREQ_ID).FieldName;
RequisitesTable; RequisitesDataSet.Requisites(
SYSREQ_MAIN_RECORD_ID).FieldName)); apEnd)
// Задать реквизит.
AddJoin2 = Reference.AddJoin(RequisitesTable; jtInner;
Format("%0:s.%1:s = '%2:s'";
ArrayOf(RequisitesTable; RequisitesDataSet.Requisites(
SYSREQ_REF_TYPE_REQ_CODE).FieldName; RequisiteCode)); apEnd)
// Исключить действия с кодом равным RequisiteCode,
// т.к. действия хранятся в той же таблице, что и реквизиты.
AddJoin3 = Reference.AddJoin(RequisitesTable; jtInner;
Format("%0:s.%1:s <> 'K'";
ArrayOf(RequisitesTable; RequisitesDataSet.Requisites(
SYSREQ_REF_TYPE_REQ_SECTION).FieldName)); apEnd)
Reference.ComponentForm.Show
Reference.DelJoin(AddJoin1)
Reference.DelJoin(AddJoin2)
Reference.DelJoin(AddJoin3)
Метод AddJoin |
© Компания DIRECTUM, 2018 | Сообщество пользователей DIRECTUM |