Алексей, в первую очередь нужно уточнить версию софта. При переходе с 3.4.0 на 3.4.1 было добавлено много возможностей со шрифтами. Проверьте, может, получится и то, что хотите.

Если же делать что-то совсем нестандартное, может подойти компонент веб-браузера и программное создание HTML-файла. Именно так для продавцов квартир делалась «шахматка» — схема дома с проданными и непроданными квартирами разных цветов с возможностью открыть карточку квартиры по гиперссылке.

Алексей, в 3.Х на карточке есть возможность добавить невизуальный компонент «Таймер». Можно задать в дизайнере или программно ему длительность, включить и добавить в обработчик нужную логику.

Спасибо за подсказку. Нашел решение здесь: https://community.terrasoft.ru/articles/obnovlenie-reestra-zapisei-s-op…

Задачу решил так :

function PacientEmailForm(Window) {
    //Создание дополнительных компонентов для вывода массива данных для пациентов   
    try {
        var PacientLabel = null;
        var PacientName = null;
        var PacientDate = null;
        var PacientTest = null;
        var PacientText = null;
        var PacientNumber = 0;
        for (var i = 0; i < 2; i++) {
            //Создание метки для структуризации компонентов - ЗАГОЛОВОК
            PacientLabel = EmailFormWindowValue.CreateComponent('Label','lbPacient'+i);
            fgPacient.Add(PacientLabel);
            PacientLabel.AlignHorizontal = alhCenter;
            PacientLabel.AutoSize = true;
            PacientNumber = i+1;
            PacientLabel.Caption = 'Пациент № '+PacientNumber;
            //Создание поля вывода для имени пациента
            PacientName = EmailFormWindowValue.CreateComponent('Edit','edtPacientName'+i);
            fgPacient.Add(PacientName);
            PacientName.AlignHorizontal = alhClient;
            PacientName.Caption = 'ФИО';
            //Создание поля вывода для даты рождения пациента
            PacientDate = EmailFormWindowValue.CreateComponent('Edit','edtPacientDate'+i);
            fgPacient.Add(PacientDate);
            PacientDate.AlignHorizontal = alhClient;
            PacientDate.EditMask = '99.99.9999';
            PacientDate.Caption = 'Дата рождения';
            //Создание поля вывода для тестов
            PacientTest = EmailFormWindowValue.CreateComponent('Edit','edtPacientTest'+i);
            fgPacient.Add(PacientTest);
            PacientTest.AlignHorizontal = alhClient;
            PacientTest.Caption = 'Тесты и услуги';
            //Создание поля вывода для инвалидности
            PacientText = EmailFormWindowValue.CreateComponent('Edit','edtPacientText'+i);
            fgPacient.Add(PacientText);
            PacientText.AlignHorizontal = alhClient;
            PacientText.Caption = 'Инвалидности';
            //Скрыть все элементы и использовать по надобности
            PacientLabel.isVisible = false;
            PacientName.isVisible = false; 
            PacientDate.isVisible = false; 
            PacientTest.isVisible = false; 
            PacientText.isVisible = false;
        }        
        //var Pacient = Window.CreateComponent('Label','PacientLabel');
        //fgPacient.Add(Pacient); 
        //Pacient.Caption = 'Проверка!';
    } catch(E) {
        Log.Write(mdtError, '[PacientEmailForm] ' + E.message+' ['+E.number+']');
    } finally {}
}

Теперь возник вопрос, как удалить элемент созданный таким образом?

Алексей, если добавляли при помощи CreateComponent, то удалить, соответственно, можно по RemoveComponent. См. примеры в теме.

Зверев Александр,

Спасибо. Так и сделал. Правда со 2 попытки. Первая была DeleteComponent. А не подскажете, как событие присвоить Edit

.OnChange ?

Присваивают обработчики так, см. src_Main:

var MenuItem = Window.CreateComponent('ActionMenuItem', Name);
MenuItem.Caption = CaptionDataField.ValAsStr;
MenuItem.Tag = ParentIDDataField.ValAsStr;
SetObjectEventDispatcher(Window, MenuItem, MenuItem.Name, 'OnExecute',
	'DictionaryMenuItemOnExecute');

Если компонентов будет произвольное количество, можно обработчик сделать один и тот же, а в нём считывать значение свойства Tag, которое перед этим присвоить каждому разное.

Алексей, такое возможно, так работают гиперссылки на разные сущности системы в почте. Ссылки стандартно есть на открытие карточки (open) и на переход в раздел с нужной записью (goto). Увидеть их обе можно, в реестре нажав правую кнопку и выбрав пункт «Копировать ссылку», они скопируются в буфер.

Чтобы сделать другие обработчики, нужно вносить правки в сервис scr_HyperlinkUtils, добавить в функции RunHyperlink дополнительное ветвление к тем двум, что там есть:

function RunHyperlink(Action, Params) {
	Action = Action.toLowerCase();
	switch (Action) {
		case 'goto':
			HyperlinkGotoWorkspace(Params);
			break;
		case 'open':
			HyperlinkOpenCard(Params);
			break;
	}
}

А затем написать аналогичную упомянутым функцию, выполняющую нужные действия в зависимости от параметров. Пример с запуском так БП есть тут.

Алексей, в свойствах колонки в Dataset такое свойство настраивается, но оно предназначено для другого, общего заголовка для нескольких колонок:

Заголовок у меня есть

Но в Grid он не многострочный

Эта настройка для другого: если нескольким полям там вписать одинаковое до черты, то они сгруппируются с общей «шапкой». Пример настройки из этой темы:

Немного не то, но за это спасибо. Буду иметь ввиду функционал с |

Алексей, нашёл тему именно по тому, что Вы хотели. Увы, такого не прредумотрено.

Добрый день.

Вы можете реализовать представление (view) и использовать его в Вашем гриде.

Посмотрите похожая тема обсуждается здесь.

Возможно ли это функциями Террасофта провернуть без использования Dataset?

Сделал так

var ds = Services.GetNewItemByUSI('mds_KsCallInvitroApiTestAdds');
            ApplyDatasetFilter(ds, 'pricecode', Item['pricecode'], true); 
            var IsBlock = '';
            var IsDay = '';
            var IsStop = '';
            ds.Open();                
            IsBlock = ds.ValAsStr('is_block');
            IsDay = ds.ValAsStr('is_day');
            IsStop = ds.ValAsStr('is_stop');            
            ds.close();
            Dataset.ValAsStr('is_block') = IsBlock;                
            Dataset.ValAsStr('is_day') = IsDay;                
            Dataset.ValAsStr('is_stop') = IsStop;

Для тех кто хочет получить данные из другого dataset это прост отлично подходит

Алексей, кроме предложенного Аллой варианта есть и более простой штатный способ: можно в дизайнере sq настроить колонку-подзапрос или колонку с произвольным SQL-кодом, где и реализовать вычисление нужного значения или вызов SQL-функции.

Спасибо. Но для моей задачи подошел мой вариант. Так как основной dataset формируется не по sql, а с выборки в api и мне нужно было к нему приплюсовать еще и sq.

Алексей, сразу не заметил, что Вам нужно обязательно через программное наполнение полей MemoryDataset.

Если оба источника данных, и основной, и вспомогательный типа MemoryDataset, то так, как Вы написали.

А если вспомогательный — обычный Dataset, считывающий из базы по sq и ds, то его при желании тоже можно программно создать, наложить фильтр, открыть и считать значения полей.

Алексей, почему сразу неверно? В коде написали CreateLikeFilter, вот он и применяется. А у фильтра параметр типа равен ltContain, означающий поиск по вхождению. Эта константа, как и другие, определена в скрипте scr_SysEnums:

// Constants for enum _LikeTypeEnum
ltEqual = 0x00000000;
ltContain = 0x00000001;
ltStartsWith = 0x00000002;
ltEndsWith = 0x00000003;

Попробуйте для начала заменить ltContain на ltEqual.

Спасибо, помогли.

Алексей, вся логика фильтрации задана в сервисе sq для этого справочника. Проверьте, корректно ли заданы там условия фильтров IsVisibleIsTrue и ListID.

Порождаемый при открытии окна выбора из справочника запрос в базу можно увидеть в профайлере, внешнем или встроенном.

В sq_

SELECT
    [tbl_KsCallInvitroDictEnum].[ID] AS [ID],
    [tbl_KsCallInvitroDictEnum].[Name] AS [Name],
    [tbl_KsCallInvitroDictEnum].[Position] AS [Position]
FROM
    [dbo].[tbl_KsCallInvitroDictEnum] AS [tbl_KsCallInvitroDictEnum]
LEFT OUTER JOIN
    [dbo].[tbl_KsCallInvitroDictList] AS [tbl_KsCallInvitroDictList] ON [tbl_KsCallInvitroDictList].[ID] = [tbl_KsCallInvitroDictEnum].[ListID]
WHERE([tbl_KsCallInvitroDictList].[CampaignID] = :CampaignID AND
    [tbl_KsCallInvitroDictEnum].[ListID] = :ListID)
ORDER BY
    3 ASC,
    2 ASC

А фильтр с названием IsVisibleIsTrue, похоже, так и не включился. Возможно, дело в этом. Не видя всех настроек условий фильтрации в сервисе и без пояснения, что тут означает «хаос», сложно сказать.

Добрый день. Вы были правы. Внес в sq значение и все заработало. Спасибо

Елена, да, можно, через базу. Я писал об этом статью: Как сменить логин в Terrasoft 3.X.