желтый » Поиск

Результаты по ключевому слову: желтый

Установка программной лицензии 1С

Программная защита привязывается к железу и к установленной операционной системе:

В коробке с программой вы найдете желтый листочек. Вверху будет написан регистрационный номер программы, а внизу даны пин-коды от программных ключей. Как его установить подробно написано на этом же листке.

Виды программных лицензий

Все программные лицензии делятся на клиентские и серверные. Клиентские лицензии бывают трех типов:
Однопользовательские - позволяют запускать неограниченное число приложений в режиме тонкого и толстого клиентов, а также Конфигуратора на одном ПК.
Многопользовательские - позволяют запускать указанное в номинале лицензии количество приложений в режиме толстого, тонкого и веб-клиентов, а также конфигуратора на произвольном количестве ПК. Выдачей клиентам многопользовательских лицензий занимается сервер 1С:Предприятия или модуль расширения веб-сервера.

Комбинированная - содержит лицензии обоих видов, но активирован при этом может быть только один, если из такого набора первым был активирован однопользовательский пин-код, то в дальнейшем использовать эту лицензию как многопользовательскую уже не получится.

Серверная лицензия позволяет запускать неограниченное число рабочих процессов сервера 1С:Предприятия (rphost) на одном сервере, делится на 32-х и 64-х разрядную, при этом 64-х разрядная лицензия позволяет запускать и 32-разрядную версию сервера.

Однопользовательская лицензия поставляется с основной поставкой или в виде лицензии на одно рабочее место. Может быть установлена на компьютер, сервер 1С:Предприятия, модуль расширения веб-сервера или сервер терминалов. В случае установки на сервер складывается с другими активированными на сервере лицензиями и используется, кроме сервера терминалов, как многопользовательская.

Многопользовательские лицензии поставляются в комплектах на 50, 100, 300 и 500 лицензий и могут быть установлены только на сервер 1С:Предприятия, модуль расширения веб-сервера или сервер терминалов, в последнем случае используются как однопользовательские.

Комплекты на 5, 10 и 20 пользователей являются комбинированными, тип лицензии выбирается в момент активации первого пин-кода.

Для однопользовательской версии пин-коды выглядят примерно так:

111-111-111-111-111
222-222-222-222-222
333-333-333-333-333

Первый пин-код для первичной установки лицензии. Остальные два & запасные. При активации запасного ключа & деактивируется первый. Рекомендую помечать имя компьютера на котором активирован ключ, а также сохранять в файл данные об организации запрашиваемые при активации и распечатывать их и хранить как зеницу ока, так как при замене компьютера и активации запасной лицензии их надо вводить точно такие же как в первый раз.

Сетевые (многопользовательские) версии:

Для сетевых версий даются два вида пин-кодов & однопользовательские и многопользовательские. У каждого вида есть основные и запасные ключи.

Допустим у 5-ти пользовательской версии будет: 5 основных однопользовательских и к ним 2 запасных или 1 многопользовательский и к нему 2 запасных.

Возникает вопрос: в каких случаях использовать те или другие?

Допустим базу вы положили на сервер в файловом варианте, а пользователи будут заходить по сети и у каждого будет установлена платформа локально, в таком случае активируем однопользовательские лицензии. Есть одно неудобство в этом случае. Сейчас у платформы 8.2 часто выходят новые релизы и нужно периодически обновлять ее на всех компьютерах с которых заходят в 1С. Чтобы Информационная база не повредилась, нельзя запускать ее с разных компов разными релизами платформы. После такого запуска могут повредиться внутренние таблицы, а также архивные копии созданные при такой эксплуатации программы не будут открываться.

Если пользователи будут заходить на серевер через терминальный доступ, RITMIX и другое, т.е. работать непосредственно на сервере, тогда активируем многопользовательскую лицензию. В этом случае обновление платформы производим на сервере.

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

Категория: Администрирование

Обновление базы (конфигурации) 1С 7.7 Категория: 1С Общие вопросы - Обычные формы

Заполним диаграмму Ганта данными

Код 1C v 8.х

 ДГ = ЭлементыФормы.ДГ; 



// Установить заголовок диаграммы. 

ДГ.ОбластьЗаголовка.Текст = "График дежурств"; 



// Интервал будем определять самостоятельно. 

ДГ.АвтоОпределениеПолногоИнтервала = Ложь; 



// Установить интервал. 

ДГ.УстановитьПолныйИнтервал(НачалоМесяца(ТекущаяДата()), КонецМесяца(ТекущаяДата())); 



// В диаграмме будет две точки - сотрудники Петров и Сидоров... 

ТочкаП = ДГ.УстановитьТочку("Петров"); 

ТочкаС = ДГ.УстановитьТочку("Сидоров"); 



// и две серии - дежурство на вахте и дежурство в центральном офисе. 

СерияНаВахте = ДГ.УстановитьСерию("На вахте"); 

СерияВЦентре = ДГ.УстановитьСерию("В центральном офисе"); 



// Задать цвета серий, отличные от цвета по умолчанию. 

СерияНаВахте.Цвет = WebЦвета.Синий; 

СерияВЦентре.Цвет = WebЦвета.СветлоЖелтый; 

ПервыйДень = НачалоМесяца(ТекущаяДата()); 



// Получить значение диаграммы - дежурство Петрова на вахте. 

Значение = ДГ.ПолучитьЗначение(ТочкаП, СерияНаВахте); 



// В значении определить новый интервал. 

Интервал = Значение.Добавить(); 

Интервал.Текст = "Работает на вахте"; 



// Определить границы интервала. 

Интервал.Начало = ПервыйДень; 

Интервал.Конец = ПервыйДень + 10 * 24 * 60 * 60; 



// Получить значение диаграммы - дежурство Петрова в центральном офисе. 

Значение = ДГ.ПолучитьЗначение(ТочкаП, СерияВЦентре); 

Интервал = Значение.Добавить(); 

Интервал.Текст = "Работает в центральном офисе"; 

Интервал.Начало = ПервыйДень + 14 * 24 * 60 * 60; 

Интервал.Конец = ПервыйДень + 24 * 24 * 60 * 60; 



// Получить значение диаграммы - дежурство Сидорова на вахте. 

Значение = ДГ.ПолучитьЗначение(ТочкаС, СерияНаВахте); 

Интервал = Значение.Добавить(); 

Интервал.Текст = "Работает на вахте"; 

Интервал.Начало = ПервыйДень + 5 * 24 * 60 * 60; 

Интервал.Конец = ПервыйДень + 15 * 24 * 60 * 60; 



// Получить значение диаграммы - дежурство Сидорова в центральном офисе. 

Значение = ДГ.ПолучитьЗначение(ТочкаС, СерияВЦентре); 

Интервал = Значение.Добавить(); 

Интервал.Текст = "Работает в центральном офисе"; 

Интервал.Начало = ПервыйДень + 21 * 24 * 60 * 60; 

Интервал.Конец = ПервыйДень + 25 * 24 * 60 * 60;

Категория: Диаграмма

Заполнить данными измерительную диаграмму

Код 1C v 8.х

 // Настроить свойства диаграммы. 

Диаграмма = ЭлементыФормы.ДиаграммаПродажи; 

Диаграмма.ТипДиаграммы = ТипДиаграммы.Измерительная; 

Диаграмма.АвтоМаксимальноеЗначение = Ложь; 

Диаграмма.МаксимальноеЗначение = 20000; 

Диаграмма.АвтоМинимальноеЗначение = Ложь; 

Диаграмма.МинимальноеЗначение = 0; 



// Создать три полосы. 

Полосы = Диаграмма.ПолосыИзмерительнойДиаграммы; 

НоваяПолоса = Полосы.Добавить(); 

НоваяПолоса.Начало = 0; 

НоваяПолоса.Конец = 1000; 

НоваяПолоса.ЦветФона = WebЦвета.Красный; 



НоваяПолоса = Полосы.Добавить(); 

НоваяПолоса.Начало = 1000; 

НоваяПолоса.Конец = 5000; 

НоваяПолоса.ЦветФона = WebЦвета.Желтый; 



НоваяПолоса = Полосы.Добавить(); 

НоваяПолоса.Начало = 5000; 

НоваяПолоса.Конец = 20000; 

НоваяПолоса.ЦветФона = WebЦвета.Зеленый; 



Запрос = Новый Запрос(" 

|ВЫБРАТЬ 

|	ПродажиОбороты.Период, 

|	ПродажиОбороты.СтоимостьОборот 

|ИЗ 

|	РегистрНакопления.Продажи.Обороты(&ДатаНачала, &ДатаОкончания, День, ) КАК ПродажиОбороты"); 



Запрос.УстановитьПараметр("ДатаНачала", '2004.08.10 00:00:00'); 

Запрос.УстановитьПараметр("ДатаОкончания", '2004.08.30 23:59:59'); 



ЭлементыФормы.ДиаграммаПродажи.ИсточникДанных = Запрос.Выполнить().Выгрузить();

Категория: Диаграмма

Копирование данных из одного созданного экселя в другой и открытие excel (с сохранением форматов)

Копирование данных из одного созданного экселя в другой и открытие excel (с сохранением шрифта, рамки положения текста) и с созданием закладки на которую как раз копируются данные:

Код 1C v 8.х

 // Данный код создает эксель, с одним листом и открывает в нем файл

	// далее тут же создается второй лист с нужным нам наименованием

	// и в созданный второй лист копируем данные из другого экселя, с сохранением всех атрибутов текста

	

Процедура КопируемЕксел()	

	ДокExcel = Новый COMОбъект("Excel.Application");

	

	// этот кусок отвечает за создание чистого листа

	//ДокExcel.Application.Workbooks.Application.Workbooks.Add(1);

	//ДокExcel.Application.Workbooks.Application.ActiveSheet.Application.Workbooks.Open("d:\temp\file.xls");

	

	// а здесь мы просто открываем любой указанный файл

	ДокExcel.Application.Workbooks.Application.Workbooks.Open("d:\temp\file.xls");

	ДокExcel.Application.Workbooks.Application.ActiveSheet.Name = "Отчет Общий";

	

	// создаем второй лист с наименованием "Отчет Региональный"

	ДокExcel.Application.Workbooks.Application.ActiveWorkbook.Worksheets.Add();

	ДокExcel.ActiveWorkbook.Sheets.Application.ActiveSheet.Name = "Отчет Региональный";

	

	

	xlLastCell = 11;

	Попытка

		Excel = Новый COMОбъект("Excel.Application");

		Excel.WorkBooks.Open("d:\temp\Региональный.xls");

		Состояние("Обработка файла Microsoft Excel...");

		ExcelЛист = Excel.Sheets(1);

	Исключение

		Сообщить("Ошибка. Возможно неверно указан номер листа книги Excel.");

	КонецПопытки;



	ActiveCell = Excel.ActiveCell.SpecialCells(xlLastCell);

	RowCount = ActiveCell.Row; // количество строк 

	ColumnCount = ActiveCell.Column; // колиество колонок

	

	Для Column = 1 По ColumnCount Цикл

		// Выставляем ширину колонок

		ДокExcel.Columns(Column).ColumnWidth = ExcelЛист.Columns(Column).ColumnWidth;

	КонецЦикла;



	Для Row = 1 По RowCount Цикл

		Для Column = 1 По ColumnCount Цикл

			

			// переносим значение ячейки

			ДокExcel.Cells(Row,Column).Value = ExcelЛист.Cells(Row,Column).Value;

			

			// Устанавливаем шрифт

			ДокExcel.Cells(Row,Column).Font.Size = ExcelЛист.Cells(Row,Column).Font.Size;

			ДокExcel.Cells(Row,Column).Font.Bold = ExcelЛист.Cells(Row,Column).Font.Bold; 

			

			// объединяем ячейки

			ДокExcel.Range(ExcelЛист.Cells(Row,Column).MergeArea.Address).Select(); 

			ДокExcel.Selection.Merge(); 

			

			// обводим ячейки рамкой

			ДокExcel.Range(ExcelЛист.Cells(Row,Column).MergeArea.Address).Borders.LineStyle = ExcelЛист.Cells(Row,Column).MergeArea.Borders.LineStyle; // рисуем рамку для одной ячейки или даипазона ячеек

			ДокExcel.Range(ДокExcel.Cells(Row,Column), ДокExcel.Cells(Row,Column)).Borders.LineStyle = ExcelЛист.Cells(Row,Column).MergeArea.Borders.LineStyle; // рисуем рамку для одной ячейки или даипазона ячеек

			ДокExcel.Range(ДокExcel.Cells(Row,Column), ДокExcel.Cells(Row,Column)).WrapText = Истина; // автоматический перенос больших строк  

			ДокExcel.Range(ДокExcel.Cells(Row,Column), ДокExcel.Cells(Row,Column)).VerticalAlignment = -4108; // Выравнивание по вертикали по центру  //ExcelЛист.Cells(Row,Column).VerticalAlignment;

			ДокExcel.Range(ДокExcel.Cells(Row,Column), ДокExcel.Cells(Row,Column)).HorizontalAlignment = - 4108; // Выравнивание по горизонтали по центру

			

		КонецЦикла;

	КонецЦикла;

	

	Excel.WorkBooks.Close();

	Excel = 0;

	ДокExcel.Visible=1; //Делаем Ексель видимым

	

	// Дополнительные параметры

	//Exel.WorkBooks(1).WorkSheets(1).Cells(1,1).Interior.ColorIndex=1;    //1= белый  фон

	//Exel.WorkBooks(1).WorkSheets(1).Cells(1,1).Font.ColorIndex=2;   //2= черный цвет шрифта

	//Exel.WorkBooks(1).WorkSheets(1).Cells(1,1).Font.Name= "Courier";   // указывает какой шрифт

	//Exel.WorkBooks(1).WorkSheets(1).Cells(1,1).Font.Size=12;     //размер шрифта

	//Exel.WorkBooks(1).WorkSheets(1).Cells(1,1).Font.Bold=1; либо (0); //т.е. истина либо лож - ?(обычный, жирный)

	//Exel.WorkBooks(1).WorkSheets(1).Cells(1,1).InsertIndent(2); //устанавливаем отступ (в данном случае на 2 символа)

	//Exel.WorkBooks(1).WorkSheets(1).Cells(1,1).ColumnWidth= 10;   // ширина колонки

	//Exel.WorkBooks(1).WorkSheets(1).Cells(1,1).Borders(5).LineStyle = -4142;   //очищаем все границы

	//Exel.WorkBooks(1).WorkSheets(1).Cells(1,1).Borders(7).LineStyle=1;   //добавили левую границу (7 - левая, 8 - верхняя, 9 - нижняя, 10 - правая )

	//Exel.WorkBooks(1).WorkSheets(1).Cells(1,1).VerticalAlignment = -4160; //выравнивание по левому краю

	//Exel.WorkBooks(1).WorkSheets(1).Cells(1,1).WrapText=1 (истина)   //устанавливаем перенос слов

	

	//Всего 56 цветов:

	//1- белый

	//2-черный

	//3-красный

	//5-синий

	//6-желтый

	//7-лиловый

	//10-зеленый

	//33-голубой

	//39-сиреневый

	//46-оранжевый

	

	//адрес ячейки:

	//.Address

	

	//Прямоугольная область ячеек:

	//Exel.WorkBooks(1).WorkSheets(2).Range("a1:b2");

	//Exel.WorkBooks(1).WorkSheets(2).Range("a1:b2").Copy();

	//Exel.WorkBooks(1).WorkSheets(2).Range("a11:b12").Select();

	//Exel.WorkBooks(1).WorkSheets(2).Paste();



	

	//Про Диаграммы:



	//Два варианта: 1-й если Диаграмма будет распологаться непосредственно на листе с данными, 2-й на отдельном листе.

	

	//Если Диаграмма распологается на листе с данными:

	//в скобках параметры определения левого верхнего угла и размеры.

	

	//Chart = Excel.WorkBooks(1).WorkSheets(2).ChartObjects.Add(,,,);

	

	//Если все же на отдельном листе, то добавим Sheets наш элемент: *(СОДЕРЖИТ ЛИСТЫ ВСЕХ ТИПОВ)*

		

	//Excel.WorkBooks(1).Sheets.Add(,,1,-4109);

	//где:Add(ПЕРВЫЙ,ВТОРОЙ,1,-4109);

	//ПЕРВЫЙ- номер листа, перед которым будет НАШ лист;

	//ВТОРОЙ-номер листа, после которого будет НАШ лист;

	//1- количество создоваемых листов;

	//-4109 - рабочий лист ( -4109 = с диаграммой, -4167 = лист с данными)



КонецПроцедуры

Категория: Работа с Microsoft Office и OpenOffice