//-----------------------------------------------------------------------------
// wnd_SubContactEditScript
//-----------------------------------------------------------------------------
var SubContactEdit = new Object(); //по сути здесь ds_SubContact
 
function wnd_SubContactEditOnPrepare(Window) {
	Initialize();
    wnd_BaseDBEditOnPrepare(Window); 
}
 
// initialization
function InitializeGlobalVariables() {
    SubContactEdit.ParentItemFieldName = 'ContactID';
    SubContactEdit.ParentItemID = GetAttribute(Self, 'ParentItemID');
    BaseDBEdit.RecordID = GetAttribute(Self, 'RecordID');                          
    BaseDBEdit.RefreshedDataset = GetAttribute(Self, 'RefreshedDataset');
}
function InitializeDataset() {
    SubContactEdit.Dataset = dlData.Dataset; 
}
function Initialize() {
    InitializeGlobalVariables();
    InitializeDataset();
}  
 
 
function SetParentItemID() {
    var ContactIDField = SubContactEdit.Dataset.DataFields.ItemsByName('SubContactID');
    ContactIDField.Value = SubContactEdit.ParentItemID;
}
 
function dlDataOnDatasetAfterAppend(Dataset) {
    SetParentItemID();
}
 
function dlDataOnDatasetAfterPost(Dataset) {
    if (!Assigned(SubContactEdit.ContactDataset)) {
        SubContactEdit.ContactDataset = Services.GetNewItemByUSI('ds_SubContact');
        }
    var ContactDataset = SubContactEdit.ContactDataset;
    ContactDataset.Open();
    ContactDataset.Locate('ID', SubContactEdit.ParentItemID);
    ContactDataset.Edit();
    ContactDataset.DisableEvents();
    ContactDataset.Post();
    ContactDataset.EnableEvents();     
}

//-----------------------------------------------------------------------------
// wnd_SubContactEditScript
//-----------------------------------------------------------------------------
var SubContactEdit = new Object(); //по сути здесь ds_SubContact
 
function wnd_SubContactEditOnPrepare(Window) {
	Initialize();
    wnd_BaseDBEditOnPrepare(Window); 
}
 
// initialization
function InitializeGlobalVariables() {
    SubContactEdit.ParentItemFieldName = 'ContactID';
    SubContactEdit.ParentItemID = GetAttribute(Self, 'ParentItemID');
    BaseDBEdit.RecordID = GetAttribute(Self, 'RecordID');                          
    BaseDBEdit.RefreshedDataset = GetAttribute(Self, 'RefreshedDataset');
}
function InitializeDataset() {
    SubContactEdit.Dataset = dlData.Dataset; 
}
function Initialize() {
	InitializeDataset();
    InitializeGlobalVariables();
}  
 
//           
function SetParentItemID() {
    var ContactIDField = SubContactEdit.Dataset.DataFields.ItemsByName('ContactID');
    ContactIDField.Value = SubContactEdit.ParentItemID;
}
 
function dlDataOnDatasetAfterAppend(Dataset) {
    SetParentItemID();
}
 
function dlDataOnDatasetAfterPost(Dataset) {
    if (!Assigned(SubContactEdit.ContactDataset)) {
        SubContactEdit.ContactDataset = Services.GetNewItemByUSI('ds_SubContact');
        }
    var ContactDataset = SubContactEdit.ContactDataset;
    ContactDataset.Open();
    ContactDataset.Locate('ID', SubContactEdit.ParentItemID);
    ContactDataset.Edit();
    ContactDataset.DisableEvents();
    ContactDataset.Post();
    ContactDataset.EnableEvents();     
}

//-----------------------------------------------------------------------------
// wnd_SubContactGridAreaScript
//-----------------------------------------------------------------------------
 
function Initialize(Window) {
    SetAttribute(Window, 'EditWindowUSI', 'wnd_SubContactEdit');
    SetAttribute(Window, 'ParentItemFieldName', 'ContactID'); // id of main grid
}
 
//-----------------------------------------------------------------------------
// Event handlers
//-----------------------------------------------------------------------------
 
function wnd_SubContactGridAreaOnPrepare(Window) {
    Initialize(Window); 
    wnd_BaseGridAreaOnPrepare(Window);
}
 
function btnAddOnClick(Control) { //
    var Attributes = GetAddDataAttributes(Self, BaseGridArea);
    var DefaultValues = GetNewDictionary();
    ShowEditWindowEx('wnd_SubContactEdit', Attributes, DefaultValues);
}

//-----------------------------------------------------------------------------
// wnd_SubContactEditScript
//-----------------------------------------------------------------------------
var SubContactEdit = new Object(); //по сути здесь ds_SubContact
 
// initialization
function InitializeDataset() {
    SubContactEdit.Dataset = dlData.Dataset; // ds_SubContact
}
function InitializeGlobalVariables() {
    SubContactEdit.ParentItemFieldName = 'ContactID'; // для группы
    SubContactEdit.ParentItemID = GetAttribute(Self, 'ParentItemID'); // ParentItemID - выбранный в реестре id
    BaseDBEdit.RecordID = GetAttribute(Self, 'RecordID');                          
    BaseDBEdit.RefreshedDataset = GetAttribute(Self, 'RefreshedDataset');
}
function Initialize() {
	InitializeDataset();
    InitializeGlobalVariables();
}  
 
function SetParentItemID() {  
    var ContactIDField = SubContactEdit.Dataset.DataFields.ItemsByName('ContactID');
    ContactIDField.Value = SubContactEdit.ParentItemID; // ParentItemID - выбранный в реестре id   
}
 
//-----------------------------------------------------------------------------
// Event handlers
//-----------------------------------------------------------------------------
 
function wnd_SubContactEditOnPrepare(Window) {
	Initialize();
    wnd_BaseDBEditOnPrepare(Window); 
}  
 
function dlDataOnDatasetAfterAppend(Dataset) {
    SetParentItemID();
}
function dlDataOnDatasetBeforePost(Dataset, DoPost) {
    Dataset.DataFields.ItemsByName('ManagerID').Value = SubContactEdit.ParentItemID;
	Dataset.DataFields.ItemsByName('SubContactID').Value = '8C6AE091-B24D-42B2-BD2B-4AE2B72EDB8E'; //dlData.Dataset.DataFields.ItemsByName('ID').Value;
 
    debugger;
}

---------------- SelectQuery ----------------
SELECT
	[tbl_Contact].[ID] AS [ContactID],
	[tbl_Contact].[Name] AS [Name],
	[tbl_Account].[ID] AS [AccountID],
	[tbl_Contact].[Communication1] AS [Communication1],
	[tbl_Contact].[ManagerPercent] AS [ManagerPercent],
	[tbl_Contact].[SubContactPercent] AS [SubContactPercent],
	[tbl_Account].[Name] AS [AccountName],
	[tbl_SubContact].[WorkFrom] AS [WorkFrom],
	[tbl_SubContact].[WorkTo] AS [WorkTo],
	[tbl_SubContact].[ID] AS [ID],
	[tbl_SubContact].[ManagerID] AS [ManagerID],
	[tbl_SubContact].[SubContactID] AS [SubContactID]
FROM
	[dbo].[tbl_SubContact] AS [tbl_SubContact]
LEFT OUTER JOIN
	[dbo].[tbl_Account] AS [tbl_Account] ON [tbl_Account].[ID] = [tbl_SubContact].[SubContactID]
INNER JOIN
	[dbo].[tbl_Contact] AS [tbl_Contact] ON [tbl_Contact].[ID] = [tbl_SubContact].[SubContactID]
WHERE([tbl_SubContact].[ManagerID] = :ContactID);
 
---------------- InsertQuery ----------------
INSERT INTO [dbo].[tbl_SubContact] ([WorkFrom], [WorkTo], [ID], [ManagerID], [SubContactID])
VALUES (:WorkFrom, :WorkTo, :ID, :ManagerID, :SubContactID);
 
---------------- UpdateQuery ----------------
UPDATE [dbo].[tbl_SubContact]
	SET [WorkFrom] = :WorkFrom,
	[WorkTo] = :WorkTo,
	[ManagerID] = :ManagerID,
	[SubContactID] = :SubContactID
WHERE([tbl_SubContact].[ID] = :ID);
 
---------------- DeleteQuery ----------------
DELETE FROM [dbo].[tbl_SubContact]
WHERE([tbl_SubContact].[ID] = :ID);

// ### debug
 
в ходе отладки события вызова окна редактирования:
в ф-и ShowEditWindowEx:
 
EditWindow.Prepare();
wnd_SubContactPeriodsEditOnPrepare
   wnd_BaseDBEditOnPrepare
      ProcessBaseDBEditOnPrepare
         InitializeDBEdit() в строке 
	 BaseDBEdit.WorkflowDataFields = Attributes('WorkflowDataFields'); 
	 значение WorkflowDataFields = null - нормально ли это?
 
далее вызов EditRecord:
  OpenDatasetWithRecordID
    ApplyDatasetIDFilter(Dataset, ID, true); значения подаются норм
      ApplyDatasetFilter(Dataset, 'ID', IDValue, Enabled); значения ok
	ApplySelectQueryFilter(SelectQuery, FilterName, ParamValue, Enabled); значения ok
          EnableSelectQueryFilters(SelectQuery, Enabled, FilterCodes);
            цикл для EnableFilters (SelectQuery.Count = 1)
              EnableFilter
              if (FiltersNode.Code == FilterCode) { 
              //значение Code = ""
 
              после рекурсивного вызова 
              if (FiltersNode.Code == FilterCode) { 
              //FiltersNode.Code = "SubContactPeriods.ManagerID = Contact.ID", FilterCode = "ID"
 
              далее условие 
              if ((Assigned(FiltersNode.TestExpression)) && 
		(FiltersNode.TestExpression.ExpressionType == fetSelect)) {
              // TestExpression = "", ExpressionType = 1, fetSelect = 2
              по условию не срабатывает
              EnableSelectQueryFilters(
			FiltersNode.TestExpression.ExpressionSelectQuery, Enabled, 
			new Array(FilterCode));
 
              в итоге ф-я EnableFilter возвращает false
 
 
          SetParameterValue(SelectQuery.Parameters, FilterName, ParamValue); 
            var Parameter = Parameters.ItemsByName(ParamName);
            // после присваивания Parameter = null
            далее вываливаемся на CheckAssigned(Parameter, 'Parameter');
 
// ### code
 
вызов окна редактирования:
function btnEditOnClick(Control) {
    var Attributes = GetEditDataAttributes(Self, BaseGridArea);
    //var DefaultValues = GetNewDictionary();   
    ShowEditWindowEx('wnd_SubContactPeriodsEdit', Attributes/*, DefaultValues*/);
}
 
и: 
function wnd_SubContactPeriodsEditOnPrepare(Window) {
	Initialize();
	debugger;
    wnd_BaseDBEditOnPrepare(Window); // fail 
	edtSubContactPercent.DataField.ValAsFloat = 100;  // default value
} 

//-----------------------------------------------------------------------------
// wnd_SubContactPeriodsGridAreaScript
//-----------------------------------------------------------------------------
 
var SubContactPeriodsGridArea = new Object();
 
function InitializeSubContactPeriodsDetail(Window) {
	debugger
    // Имя поля кода элемента, входящего в группу. (например для контактов ContactID); - название родительского поля
    SetAttribute(Window, 'ParentItemFieldName', 'ManagerID');  //ContactID
    SetAttribute(Window, 'EditWindowUSI', 'wnd_SubContactPeriodsEdit');
	SetAttribute(Window, 'DatasetUSI', 'ds_SubContactPeriods');
    SetAttribute(Window, 'WorkspaceDataset', BaseWorkspace.GridDataset); // <- 2 атрибута остаются без значений
    SetAttribute(Window, 'ParentItemID', BaseWorkspace.GridDataset.ValAsStr('ID'));
    /*SetAttribute(Window, 'WorkspaceDataset', 'ds_Contact');
    SetAttribute(Window, 'ParentItemID', 'ID');*/
}
 
function Initialize(Window) {    
    SubContactPeriodsGridArea.DatasetUSI = GetAttribute(Window, 'DatasetUSI');
	SubContactPeriodsGridArea.WorkspaceDataset = GetAttribute(Window, 'WorkspaceDataset');
}
 
function EditData() {
	var Attributes = GetEditDataAttributes(Self, BaseGridArea);		
	Attributes.Add('DatasetUSI', SubContactPeriodsGridArea.DatasetUSI);
	Attributes.Add('WorkspaceDataset', SubContactPeriodsGridArea.WorkspaceDataset);
	ShowEditWindowEx(BaseGridArea.EditWindowUSI, Attributes);	
}
 
function AddData() {
	var Attributes = GetAddDataAttributes(Self, BaseGridArea);
    var DefaultValues = GetNewDictionary();   
    ShowEditWindowEx('wnd_SubContactPeriodsEdit', Attributes, DefaultValues);	
}
 
//-----------------------------------------------------------------------------
// Event handlers
//-----------------------------------------------------------------------------
 
function btnAddOnClick(Control) { 	
	AddData();
}
 
function btnEditOnClick(Control) { //bad
    EditData();
}
 
function wnd_SubContactPeriodsGridAreaOnPrepare(Window) {
	InitializeSubContactPeriodsDetail(Window);
	Initialize(Window); 
	wnd_BaseGridAreaOnPrepare(Window);
}
 
function wnd_SubContactPeriodsGridAreaOnNotify(ScriptableService, Sender, Message, Data) {
    if ((Message == MSG_OK) && (Sender.Name == Self.Attributes('EditWindowUSI'))) {
        var WorkspaceWindow = Self.Attributes('WorkspaceWindow');
        WorkspaceWindow.Notify(Self, MSG_REFRESHDETAIL, System.EmptyValue);
    }; 
    wnd_BaseGridAreaOnNotify(ScriptableService, Sender, Message, Data); 
}