//-----------------------------------------------------------------------------
// Файл IServiceInfoExample.js
//-----------------------------------------------------------------------------
// В данном примере рассмотрено использование интерфейса IServiceInfo. 
//-----------------------------------------------------------------------------
//@ Start Example

// Функция вывода сообщения 
function ShowMessage(Str) {
    for (var i = 1; i < arguments.length; i++ ) {
        Str = Str.replace(new RegExp('%' + i), arguments[i]);
    }
    WScript.Echo(Str);
}

// Функция формирования информации о сервисе для вывода
function GetServiceInfo(ServiceInfo, Value) {

	// Переменная для формирования строк информации 
	var TotalString = new String();
	
	// Начальная очистка значения результата 
	Value.Value.Clear();	
	
	// Поочередное добавление информации о сервисе в хранилище
	TotalString = "Заголовок сервиса: " + ServiceInfo.Caption; 
	Value.Value.Add(TotalString);

	TotalString = "Идентификатор пользователя, создавшего сервис: " + 
	    ServiceInfo.CreatedByID; 
	Value.Value.Add(TotalString);
	
	TotalString = "Дата создания сервиса: " + ServiceInfo.CreatedOn; 
	Value.Value.Add(TotalString);

	TotalString = "Идентификатор базы данных: " + ServiceInfo.DatabaseID; 
	Value.Value.Add(TotalString);

	TotalString = "Описание сервиса: " + ServiceInfo.Description; 
	Value.Value.Add(TotalString);

	TotalString = "Идентификатор сервиса: " + ServiceInfo.ID; 
	Value.Value.Add(TotalString);

	TotalString = "Идентификатор пользователя, заблокировавшего сервис: " + 
	    ServiceInfo.LockedByUserID; 
	Value.Value.Add(TotalString);

	TotalString = "Идентификатор пользователя, который изменил сервис: " + 
	    ServiceInfo.ModifiedByID; 
	Value.Value.Add(TotalString);

	TotalString = "Дата последнего изменения: " + ServiceInfo.ModifiedByOn; 
	Value.Value.Add(TotalString);

	TotalString = "Код типа сервиса: " + ServiceInfo.ServiceTypeCode; 
	Value.Value.Add(TotalString);

	TotalString = "USI: " + ServiceInfo.USI; 
	Value.Value.Add(TotalString);

	TotalString = "Версия сервиса: " + ServiceInfo.Version; 
	Value.Value.Add(TotalString); 
}

// Создание соединения с базой данных и объектов для хранения данных
var Connector = new ActiveXObject('TSDskObjectLibrary.DskConnector');
var Value = new ActiveXObject('TSObjectLibrary.Value');
Value.Value = new ActiveXObject('TSObjectLibrary.StringsList');

if (Connector.Login("Пример использования объекта IServiceInfo")) {

	// Считывание информации о севисе 
	// В функцию InformationsByUSI как параметр можно передавать 
	// не полный USI, а только код
	var ServiceInfo = Connector.Services.InformationsByUSI('scr_Account');

	// Формирование и вывод информации о сервисе 'scr_Account'
	GetServiceInfo(ServiceInfo, Value);
	ShowMessage("Информация о сервисе 'scr_Account':\n" + Value.Value.Text);  

	// Считывание информации о севисе по полному USI
	var USI = 'X15\\Workspaces\\Accounts\\General\\Main Grid\\tbl_Account';
	ServiceInfo = Connector.Services.InformationsByUSI(USI);

	// Формирование и вывод информации о сервисе 'tbl_Account'
	GetServiceInfo(ServiceInfo, Value);
	ShowMessage("Информация о сервисе 'tbl_Account':\n" + Value.Value.Text); 

	WScript.Echo("Информация о пяти первых сервисах в коллекции\n"); 
		
	// Формирование и вывод информации о пяти первых сервисах в коллекции
	for (i = 0; i<5; i++) {
		ServiceInfo  = Connector.Services.Informations(i);
		GetServiceInfo(ServiceInfo, Value);
		WScript.Echo(Value.Value.Text);
	}
	
}
//@ End Example