выполнены » Поиск

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

Право на изменение и право на редактирование - в чем отличие? Категория: Пользователь, роль доступа, интерфейс

Особенности работы с хранилищем конфигурации Категория: Администрирование

Как установить ставки страховых взносов в 1С Бухгалтерии 8?

Ставки страховых взносов на 2013 год в 1С Бухгалтерии 8.2 можно установить самостоятельно.
Для установки ставок страховых взносов нужно выполнить:

Меню Зарплата — Учет НДФЛ и налогов (взносов) с ФОТ — Тариф страховых взносов. Далее внимательно заполняем регистр сведений «Тарифы страховых взносов» на 2013 год для своего налогового режима.

Отдельно устанавливается ставка страхования от несчастных случаев в ФСС по каждой организации: Меню Зарплата — Учет НДФЛ и налогов (взносов) с ФОТ - в открывшейся группе – пункт «Ставка взносов на страхование от несчастных случаев» .

Действующая ставка страховых взносов из регистра «Тарифы страховых взносов» для каждой организации программы 1С Бухгалтерия 8 задается в учетной политике на вкладке «Страховые взносы».

Если произошли изменения в методике исчисления страховых взносов (к примеру, с 2013 года перешли на пониженный тариф), то нужно обязательно завести новую строчку учетной политики с 01.01.2013 г.

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

Категория: 1С Бухгалтерия 2.0

Набор функций для работы с разделителями в строке

Код 1C v 8.х

 // Функция разбивает строку разделителем.

// 

// Параметры:

//  пСтрока      - Строка - которую разбиваем;

//  *пРазделитель - Строка, "." - символ-разделитель;

//  *ОбрезатьНепечатныеСимволы - Булево, *Ложь.

//

// Возвращаемое значение:

//  Массив - фрагментов.

//

Функция ПолучитьМассивИзСтрокиСРазделителем(Знач Стр, Разделитель = ".", ОбрезатьНепечатныеСимволы = Ложь) Экспорт

	

	МассивСтрок = Новый Массив;

	

	Если Разделитель = " " Тогда

		Стр = СокрЛП(Стр);

		Пока 1=1 Цикл

			Поз = Найти(Стр,Разделитель);

			Если Поз=0 Тогда

				МассивСтрок.Добавить(Стр);

				Возврат МассивСтрок;

			КонецЕсли;

			МассивСтрок.Добавить(Лев(Стр,Поз-1));

			Стр = СокрЛ(Сред(Стр,Поз));

		КонецЦикла;

	Иначе

		ДлинаРазделителя = СтрДлина(Разделитель);

		Пока 1=1 Цикл

			Поз = Найти(Стр,Разделитель);

			Если Поз=0 Тогда

				Фрагмент = Стр;

				Если ОбрезатьНепечатныеСимволы Тогда

					Фрагмент = СокрЛП(Фрагмент);

				КонецЕсли;

				МассивСтрок.Добавить(Фрагмент);

				Возврат МассивСтрок;

			КонецЕсли;

			Фрагмент = Лев(Стр,Поз-1);

			Если ОбрезатьНепечатныеСимволы Тогда

				Фрагмент = СокрЛП(Фрагмент);

			КонецЕсли;

			МассивСтрок.Добавить(Фрагмент);

			Стр = Сред(Стр,Поз+ДлинаРазделителя);

		КонецЦикла;

	КонецЕсли;



	Возврат МассивСтрок;

		

КонецФункции // ПолучитьМассивИзСтрокиСРазделителем()



// Функция собирает строку из элементов массива с разделителем.

// 

// Параметры:

//  пМассив      - Массив - из которого формируем строку;

//  *пРазделитель - Строка - символ-разделитель.

//

// Возвращаемое значение:

//  Строка.

//

Функция ПолучитьСтрокуСРазделителемИзМассива(пМассив, пРазделитель = ", ") Экспорт

	

	Результат = "";

	Для Каждого Элемент Из пМассив Цикл

		Результат = Результат + пРазделитель + Строка(Элемент);

	КонецЦикла;

	Возврат Сред(Результат, СтрДлина(пРазделитель) + 1);

		

КонецФункции // ПолучитьСтрокуСРазделителемИзМассива()



// Получает первый фрагмент, отделяемый разделителем от строки.

// Написана для оптимизации по скорости.

// 

// Параметры:

//  пСтрока      - Строка - которую разбиваем;

//  *пРазделитель - Строка, "." - символ-разделитель;

//  *пЛиИспользоватьГраницуЕслиМаркерНеНайден - Булево, *Истина.

//

// Возвращаемое значение:

//               - Строка - первый фрагмент строки;

//  Неопределено - в строке не обнаружен разделитель.

//

Функция ПолучитьПервыйФрагмент(пСтрока, пРазделитель = ".",

	пЛиИспользоватьГраницуЕслиМаркерНеНайден = Истина) Экспорт



	Позиция = Найти(пСтрока, пРазделитель);

	Если Позиция > 0 Тогда

		Возврат Лев(пСтрока, Позиция - 1);

	Иначе

		Если пЛиИспользоватьГраницуЕслиМаркерНеНайден Тогда 

			Возврат пСтрока;

		Иначе

			Возврат пСтрока;

		КонецЕсли;

	КонецЕсли;



КонецФункции // ПолучитьПервыйФрагмент()

                                                           

// Получает последний фрагмент, отделяемый разделителем от строки.

//

// Параметры:

//  пСтрока      - Строка - в которой ищем;

//  *пМаркер     – Строка, "." – отсекающий маркер;

//  *пЛиИспользоватьГраницуЕслиМаркерНеНайден - Булево, *Истина - разрешение использования границ строки

//               в случае, если маркер не найден.

//

// Возвращаемое значение:

//  Неопределено - маркер не найден;

//               – Число – позиция маркера.

//

Функция ПолучитьПоследнийФрагмент(пСтрока, пМаркер = ".",

	пЛиИспользоватьГраницуЕслиМаркерНеНайден = Истина) Экспорт



	Подстрока = пСтрока;

	МаркерНайден = Ложь;

	Пока пМаркер <> "" Цикл

		Позиция = Найти(Подстрока, пМаркер);

		Если Позиция = 0 Тогда 

			Прервать;

		КонецЕсли;

		МаркерНайден = Истина;

		Подстрока = Сред(Подстрока, Позиция + СтрДлина(пМаркер));

	КонецЦикла;

	Если Истина

		И Не МаркерНайден

		И пЛиИспользоватьГраницуЕслиМаркерНеНайден

	Тогда

		Возврат пСтрока;

	ИначеЕсли МаркерНайден Тогда 

		Возврат Подстрока;

	Иначе

		Возврат "";

	КонецЕсли;

	

КонецФункции // ПолучитьПоследнийФрагмент()



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

// в правой части конечного маркера. Сами маркеры не включаются в результат. Опционально - если

// маркер не найден, то границей считается граница строки.

//

// Параметры:

//  пСтрока      - Строка - в которой ищем;

//  *пНачальныйМаркер - Строка, *Неопределено - начальный маркер подстроки;

//  *пКонечныйМаркер - Строка, *Неопределено - конечный маркер подстроки;

//  *пЛиИспользоватьГраницуЕслиМаркерНеНайден - Булево, *Истина - разрешение использования границ строки

//               в случае, если маркер не найден;

//  *пЛиВключатьМаркеры - Булево, *Ложь - включение маркеров в результат.

//

// Возвращаемое значение:

//  Неопределено - обязательные условия не выполнены;

//  Строка – найденная подстрока.

//

Функция ПолучитьСтрокуМеждуМаркерами(пСтрока, пНачальныйМаркер = Неопределено, пКонечныйМаркер = Неопределено,

	пЛиИспользоватьГраницуЕслиМаркерНеНайден = Истина, пЛиВключатьМаркеры = Ложь) Экспорт



	ПозицияНачальногоМаркера = Найти(пСтрока, пНачальныйМаркер);

	Если Истина

		И ПозицияНачальногоМаркера = 0

		И пЛиИспользоватьГраницуЕслиМаркерНеНайден = Ложь

	Тогда

		Возврат Неопределено;

	КонецЕсли;

	Если Ложь

		ИЛИ пНачальныйМаркер = Неопределено

		ИЛИ ПозицияНачальногоМаркера = 0 

	Тогда

		ПозицияНачальногоМаркера = - СтрДлина(пНачальныйМаркер);

	КонецЕсли;

	Стр = Сред(пСтрока, ПозицияНачальногоМаркера + СтрДлина(пНачальныйМаркер));

	ПозицияКонечногоМаркера  = Найти(Стр, пКонечныйМаркер);

	Если Истина

		И ПозицияКонечногоМаркера = 0

		И пЛиИспользоватьГраницуЕслиМаркерНеНайден = Ложь

	Тогда

		Возврат Неопределено;

	КонецЕсли;

	Если Ложь

		ИЛИ пКонечныйМаркер = Неопределено

		ИЛИ ПозицияКонечногоМаркера = 0 

	Тогда

		ПозицияКонечногоМаркера = СтрДлина(Стр) + 1;

	КонецЕсли;

	Результат = Лев(Стр, ПозицияКонечногоМаркера - 1);

	Если пЛиВключатьМаркеры Тогда

		Если пНачальныйМаркер <> Неопределено Тогда

			Результат = пНачальныйМаркер + Результат;

		КонецЕсли; 

		Если пКонечныйМаркер <> Неопределено Тогда

			Результат = Результат + пКонечныйМаркер;

		КонецЕсли; 

	КонецЕсли;

	Возврат Результат;

	

КонецФункции // ПолучитьСтрокуМеждуМаркерами()

Категория: Работа с Текстом (Строкой)

Как принудительно завершить бизнес-процесс и задачи?

Стандартная механика обеспечивает автоматическое завершение бизнес-процесса, когда он достигает точки завершения и все задачи по нему выполнены.
Однако иногда может потребоваться принудительно завершить бизнес-процесс, не дожидаясь, пока он дойдет до точки завершения.
Для этого необходимо установить свойство Завершен бизнес-процесса равным Истина:

Код 1C v 8.х

     БизнесПроцесс.Завершен = Истина;

    БизнесПроцесс.Записать();

Далее нужно отметить все задачи по этому бизнес-процессу как выполненные.
1. Отобрать задачи по бизнес-процессу можно с помощью запроса вида:
2. После чего каждой из отобранных задач нужно установить свойство Выполнена равным Истина:

Код 1C v 8.х

 ТекущаяЗадача.Выполнена = Истина;

ТекущаяЗадача.Записать();

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

Код 1C v 8.х

 Запрос = Новый Запрос;

Запрос.Текст =

"ВЫБРАТЬ

|	ОСН_Задача.Ссылка,

|	ОСН_Задача.Дата,

|	ОСН_Задача.БизнесПроцесс,

|	ОСН_Задача.ТочкаМаршрута,

|	ОСН_Задача.Пользователь,

|	ОСН_Задача.Подразделение,

|	ОСН_Задача.БизнесПроцесс.ДокументДоставки

|ИЗ

|	Задача.ОСН_Задача КАК ОСН_Задача

|ГДЕ

|	ОСН_Задача.БизнесПроцесс.ДокументДоставки = &ДокументДоставки";

Запрос.УстановитьПараметр("ДокументДоставки", ВыбранныйДокумент);



Результат = Запрос.Выполнить();

Выборка = Результат.Выгрузить();



ТекПозиция = 0;	

Для каждого СтрокаЗапроса из Выборка Цикл

	ОбработкаПрерыванияПользователя();

	ТекПозиция = ТекПозиция + 1;

	Состояние("Выполнено " + Окр(ТекПозиция / РезультатТаблица.Количество() * 100) + "%");



//Завешим Задачу

	ОбъектЗадача = СтрокаЗапроса.Ссылка.ПолучитьОбъект();

	ОбъектЗадача.Выполнена = Истина;

	ОбъектЗадача.Записать();

	

//Если необходимо то Завершим и Бизнес Процесс

	БизнесПроцесс = СтрокаЗапроса.БизнесПроцесс.ПолучитьОбъект();

	БизнесПроцесс.Завершен = Истина;

	БизнесПроцесс.Записать();

КонецЦикла;

Код 1C v 8.х

 Запрос = Новый Запрос;

Запрос.Текст =

"ВЫБРАТЬ

|	CRM_Задача.Ссылка,

|	CRM_Задача.Дата,

|	CRM_Задача.БизнесПроцесс,

|	CRM_Задача.ТочкаМаршрута,

|	CRM_Задача.Пользователь,

|	CRM_Задача.Подразделение,

|	CRM_Задача.БизнесПроцесс.ДокументДоставки

|ИЗ

|	Задача.CRM_Задача КАК CRM_Задача

|ГДЕ

|	CRM_Задача.Выполнена = ЛОЖЬ

|	И CRM_Задача.Дата < &Дата";

Запрос.УстановитьПараметр("Дата", Дата("07.09.2012 0:00:00"));



Результат = Запрос.Выполнить();

Выборка = Результат.Выгрузить();



ТекПозиция = 0;	

Для каждого СтрокаЗапроса из Выборка Цикл

	ОбработкаПрерыванияПользователя();

	ТекПозиция = ТекПозиция + 1;

	Состояние("Выполнено " + Окр(ТекПозиция / РезультатТаблица.Количество() * 100) + "%");



//Завешим Задачу

ОбъектЗадача = СтрокаЗапроса.Ссылка.ПолучитьОбъект();

ОбъектЗадача.ВыполнитьЗадачу();

	

	//Если необходимо то Завершим и Бизнес Процесс

	Если НЕ СтрокаЗапроса.Ссылка.БизнесПроцесс.Завершен Тогда 

	БизнесПроцесс = СтрокаЗапроса.Ссылка.БизнесПроцесс.ПолучитьОбъект();

	БизнесПроцесс.Завершен = Истина;

	БизнесПроцесс.Записать();

	КонецЕсли;

КонецЦикла;

Категория: Бизнес-процессы

Особенности настройки кластера серверов 1С

Для того, чтобы процессы кластера серверов 1С:Предприятия соединялись друг с другом, используются адреса, которые определены в качестве значений свойства "Компьютер" диалога свойств рабочих серверов. Для кластера необходимо, чтобы значением свойства "Компьютер" был либо IP-адрес в точечной нотации, либо такой символический адрес, по которому может быть определен IP адрес при помощи функции gethostbyname. Эта функция определена в программном интерфейсе протокола TCP. Определение IP-адреса может выполнятся на основании локальной таблицы символических адресов (C:\WINNT\system32\drivers\etc\hosts) и по таблицам адресов в доступных DNS серверах. Кластер не будет работать, если по символическому адресу рабочего сервера его IP-адрес не определяется или определяется неправильно. Важным пунктом является то, чтобы имена компьютеров и их адреса, которые определены в Windws, не противоречили их именам в DNS.

Процессы кластера могут использовать следующие порты на каждом из рабочих серверов:
— IP порт рабочего сервера (обычно 1540);
— IP порты из диапазонов IP портов рабочего процесса (обычно 1560-1591);
— порт кластера (обычно 1541) - для центрального сервера.

Если не хотите разрешать передачу данных портам, можно разрешить ее процессам кластера (ragent, rmngr, rphost).

Необходимо два этапа для соединение клиентского приложения 1С:Предприятия 8.1 с сервером:

1. установка соединения с менеджером кластера. Для этого используется адрес центрального сервера и порт кластера.

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

Также хотелось бы напомнить, что для доступа к серверу 1С:Предприятие 8.1 с других компьютеров он должен быть в сети. Поэтому должны быть выполнены необходимые настройки.

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

Механизм распределенных информационных баз Категория: Конвертация данных, Обмен, Перенос

Установка и настройка 1C:Предприятия 8.х в варианте “клиент-сервер” Категория: Администрирование

Параметры, ключи запуска 1Сv7 из командной строки Категория: Администрирование