Многие спрашивают: Как вывести структуру на печать?

Путем простого перебора и вывода в табличный документ, вот пример:

 	ТабДок = Новый ТабличныйДокумент;	

	Макет = Справочники.Контрагенты.ПолучитьМакет("ПечатьСтруктуры");

	ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");

	ОбластьПодвал = Макет.ПолучитьОбласть("Подвал");

	ОбластьДетальныхЗаписей = Макет.ПолучитьОбласть("Детали");

	

	ТабДок.Очистить();

	ТабДок.Вывести(ОбластьЗаголовок);

	//Перебор СТРУКТУРЫ и вывод в Табличный документ. РК - Структура с данными

	Для Каждого Элемент из РК Цикл           

		//Сообщить(Элемент.Ключ + ": " + Элемент.Значение);

		Если ТипЗнч(Элемент.Значение) = Тип("Структура") Тогда

			Для Каждого ЭлементВ из Элемент.Значение Цикл 

				ОбластьДетальныхЗаписей.Параметры.Заполнить(ЭлементВ); ТабДок.Вывести(ОбластьДетальныхЗаписей);

			КонецЦикла;	

		Иначе

		ОбластьДетальныхЗаписей.Параметры.Заполнить(Элемент); ТабДок.Вывести(ОбластьДетальныхЗаписей);

		КонецЕсли;	

	КонецЦикла; 	

	ТабДок.Вывести(ОбластьПодвал);

	УниверсальныеМеханизмы.НапечататьДокумент(ТабДок); // или ТабДок.Показать();   

Табличный документ

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

Например, ваша конфигурация разработана для платформы 1С 8.3, а в настройках подключения прописано 1С 8.2 или наоборот.

Жизненный опыт решения проблемы "несовместимая версия файла базы данных 1cv8.1cd".

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

И так, при открытии базы, появляется сообщение следующего вида: "Ошибка при выполнении операции с базой данных

Несовместимая версия файла базы данных 'D:\путь к файлу/1Cv8.1CD' по причине:

Несовместимая версия файла базы данных 'D:\путь к файлу/1Cv8.1CD'"

Скажу сходу, что утилита chdbfl.exe здесь не может помочь, Вы станете получать ошибку "Произошло неожиданное прерывание выполнения проверки или исправления файла БД. Несовместимая версия файла базы данных 'D:\путь к файлу/1Cv8.1CD'"

Покопавшись чуть-чуть в гугле, я обнаружил причину данной проблемы (кстати, причина обычная) & не был схожим файл базы и версия платформы. Т.е. я открывал файл базы, сделанный в 8.2, платформой 8.3.

Для решения данной проблемы выполните следующие манипуляции: откройте базу конфигуратором; дальше, конфигуратор обязан конвертировать Вашу базу под ту версию платформы, на которой Вы на этот момент работаете.

А если, по каким-то причинам это не поможет - Вам понадобиться поставить ту версию платформы, в какой был вначале создан файл БД.

Иногда, при попутке открыть программу 1С, вылетает сообщение: "Выполняется ожидание возможности запуска..." При нажатии на клавишу "Выполнить запуск" никаких изменений не происходит и эта табличка висит на экране и идет отсчет времени. И так по кругу до бесконечности.

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

Решение: Перезапустить службу сервера агента 1С или перезапуск всего сервера / компьютера с программой 1С

Еще бывает при обновлении конфигурации

При попытке входа пользователя в базу появляется сообщение: "Ожидание запуска информационной базы. Установка соединения с информационной базой запрещена. Администратор просит вас самостоятельно завершить работу системы, в связи с необходимостью обновления конфигурации. Выполняется ожидание возможности запуска..." При нажатии на клавишу "Выполнить запуск" никаких изменений не происходит и эта табличка висит на экране и идет отсчет времени. Что делать?

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

Действия по решению проблемы зависят от варианты режима работы:

1) Файл-серверный режим работы базы. Для того, чтобы снять блокировку - удалите файл 1Cv8.cdn, который лежит в каталоге ИБ. После снятия блокировки, повторите попытку обновления.

2) Клиент-серверный режим. Снимите блокировку в консоли серверов в свойствах ИБ. После снятия блокировки, повторите попытку обновления.

Допустим, есть внешняя обработка, написанная для версии 8.1. Можно ли запустить ее в версии 8.2 так, чтобы работать с ее старой, неуправляемой формой? Обработка нужна всего один раз, для переноса данных, и создавать для нее управляемую форму ради одного раза не хочется...

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

Обычные (неуправляемые) формы могут работать только в толстом клиенте. Тонкий и веб-клиенты поддерживают работу только с управляемыми формами.

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

Проще всего запустить толстого клиента в режиме управляемого приложения из конфигуратора, указав это в параметрах: Сервис - Параметры - Запуск 1С:Предприятия - Основные - Толстый клиент (управляемое приложение).

При этом нужно помнить, что запуск клиентов в управляемом режиме возможен только в том случае, если у конфигурации отключена совместимость в версией 8.1 (свойство РежимСовместимости).

Однако этого недостаточно для того, чтобы платформа откорыла старую, неуправляемую форму обработки.

Возможность использования обычных форм в управляемом режиме регулируется специальным свойством конфигурации - ИспользоватьОбычныеФормыВУправляемомПриложении. Это свойство нужно установить.

В палитре свойств конфигурации это свойство отображается не всегда, а только в случае, если в параметрах конфигуратора выбран режим редактирования конфигурации Управляемое приложение и обычное приложение (Сервис - Параметры - Общие).

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

В других случаях (если у объекта нет ни одной основной формы или у объекта есть управляемая основная форма) платформой будет по умолчанию генерироваться или открываться (если она есть) управляемая форма.

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

Откройте Конфигуратор - Администрирование - Пользователи:

1. Если Пользователей нет, то создайте пользователя, введите имя, пароль и на закладке прочее установите Полные права

2. Если пользователи есть, то отройте проблемного пользователя и на закладке Прочее установите галки напротив нужных прав:

И отметьте галками права на запуск толстого и тонкого клиента:

Если у вас нет в списке Запуск толстого клиента или Запуск тонкого клиента, то нужно через конфигурацию открыть назначенную роль пользователю:

В окне редактирования роли отметить галками требуемые клиенты

Сохранить конфигурацию и все запустится

При попытке удалить запись из регистра сведений - получаю ошибку: она заблокирована, ошибка блокировок и т.д.

Отключил всех пользователей, перезапустил сервер, пробую удалить - опять ошибка блокировки

Путем тестов было вяснено, что проблема не в коде, а происходит это на этапе обращения платформы к SQL серверу... после долгих поисков решений, в интернете была найдена статья, которая помогла в решении данной проблемы:

Кто что блокирует, MS SQL + 1C

В повседневной работе достаточно задействовать только первый блок "/*кто кого*/". Открываем MS SQL Server Management Studio, правой на корень - "new query" - вставляем код запроса (только верхнюю часть до "Кто что блокирует", остальное - для детального анализа), выполняем запрос (вверху есть кнопочка выполнения запроса).

Выполнив запрос, запоминаем "ID виновника", быстренько идем в консоль сервера 1С, заходим в ветку "Сеансы" нашей базы. Видим все соединения с 1С-сервером, ищем там колонку "Соединение с СУБД", чтобы увидеть соединения 1С-сервера с MSSQL-сервером. В колонке будет всего несколько заполненных значений, среди них и будет "ID виновника".

Что делать если его там нет, тут 3 варианта:

1. Вернитесь в MSSQL и сделайте запрос еще несколько раз подряд, если значения меняются или таблица вообще пуста - постоянной блокировки нет, у вас (уже) все в порядке.

2. Сеанс который блокирует MSSQL находится в другой базе т.е. блокировка не в той базе (можно попробовать задействовать ветку всех сеансов в консоли 1С-сервера) - вернитесь в MSSQL и внимательно посмотрите в колонку DB в ней находится название базы.

3. Бывает что ID процесса в 1С-консоли вообще отсутствует, такое тоже бывает если у вас есть какие-то внешние программы подключенные напрямую в базу 1С, если пускаете кого-то в MSSQL напрямую, то вариант не исключен.

Код SQL-запроса:

 SET TRANSACTION ISOLATION LEVEL READ UNCOMMITTED





DECLARE @dbid AS smallint;

use [ВАШАБАЗА];

SET @dbid=DB_ID();





/*кто кого*/

SELECT DB_NAME(pr1.dbid) AS 'DB'

      ,pr1.spid AS 'ID жертвы'

      ,RTRIM(pr1.loginame) AS 'Login жертвы'

      ,pr2.spid AS 'ID виновника'

      ,RTRIM(pr2.loginame) AS 'Login виновника'

      ,pr1.program_name AS 'программа жертвы'

      ,pr2.program_name AS 'программа виновника'

      ,txt.[text] AS 'Запрос виновника'

FROM   MASTER.dbo.sysprocesses pr1(NOLOCK)

       JOIN MASTER.dbo.sysprocesses pr2(NOLOCK)

            ON  (pr2.spid = pr1.blocked)

       OUTER APPLY sys.[dm_exec_sql_text](pr2.[sql_handle]) AS txt

WHERE  pr1.blocked <> 0





/* Кто что блокирует */

SELECT s.[nt_username]

      ,request_session_id

      ,tran_locks.[request_status]

      ,rd.[Description] + ' (' + tran_locks.resource_type + ' ' + tran_locks.request_mode + ')' [Object]

      ,txt_blocked.[text]

      ,COUNT(*) [COUNT]

FROM   sys.dm_tran_locks AS tran_locks WITH (NOLOCK)

       JOIN sys.sysprocesses AS s WITH (NOLOCK)

            ON  tran_locks.request_session_id = s.[spid]

       JOIN (

                SELECT 'KEY' AS sResource_type

                      ,p.[hobt_id] AS [id]

                      ,QUOTENAME(o.name) + '.' + QUOTENAME(i.name) AS [Description]

                FROM   sys.partitions p

                       JOIN sys.objects o

                            ON  p.object_id = o.object_id

                       JOIN sys.indexes i

                            ON  p.object_id = i.object_id

                            AND p.index_id = i.index_id

                UNION ALL

                SELECT 'RID' AS sResource_type

                      ,p.[hobt_id] AS [id]

                      ,QUOTENAME(o.name) + '.' + QUOTENAME(i.name) AS [Description]

                FROM   sys.partitions p

                       JOIN sys.objects o

                            ON  p.object_id = o.object_id

                       JOIN sys.indexes i

                            ON  p.object_id = i.object_id

                            AND p.index_id = i.index_id

                UNION ALL

                SELECT 'PAGE'

                      ,p.[hobt_id]

                      ,QUOTENAME(o.name) + '.' + QUOTENAME(i.name)

                FROM   sys.partitions p

                       JOIN sys.objects o

                            ON  p.object_id = o.object_id

                       JOIN sys.indexes i

                            ON  p.object_id = i.object_id

                            AND p.index_id = i.index_id

               

                UNION ALL

                SELECT 'OBJECT'

                      ,o.[object_id]

                      ,QUOTENAME(o.name)

                FROM   sys.objects o

            ) AS RD

            ON  RD.[sResource_type] = tran_locks.resource_type

            AND RD.[id] = tran_locks.resource_associated_entity_id

       OUTER APPLY sys.[dm_exec_sql_text](s.[sql_handle]) AS txt_Blocked

WHERE  (

           tran_locks.request_mode = 'X'

           AND tran_locks.resource_type = 'OBJECT'

       )

       OR  tran_locks.[request_status] = 'WAIT'

GROUP BY

       s.[nt_username]

      ,request_session_id

      ,tran_locks.[request_status]

      ,rd.[Description] + ' (' + tran_locks.resource_type + ' ' + tran_locks.request_mode + ')'

      ,txt_blocked.[text]

ORDER BY

       6 DESC

       





IF EXISTS ( SELECT  Name





            FROM    tempdb..sysobjects





            WHERE   name LIKE '#LOCK_01_01%' )

    DROP TABLE #LOCK_01_01









CREATE TABLE #LOCK_01_01





    (





      spid INT,





      dbid INT,





      ObjId INT,





      IndId SMALLINT,





      Type VARCHAR(20),





      Resource VARCHAR(50),





      Mode VARCHAR(20),





      Status VARCHAR(20)





    )





INSERT  INTO #LOCK_01_01





EXEC sp_lock









select OBJECT_NAME(ObjId) as [Имя объекта], Mode [Тип блокировки (код)],





CASE

     WHEN Mode='Sch-S' THEN 'Блокировка стабильности схемы. Гарантирует, что элемент схемы, такой как таблица или индекс, не будет удален до тех пор, пока сеанс связи удерживает блокировку стабильности схемы на данный элемент схемы;'





 WHEN Mode='Sch-М' THEN '= Блокировка изменения схемы. Должен поддерживаться любым сеансом связи, во время которого предполагается изменить схему данного ресурса. Гарантирует, что другие сеансы не имеют ссылок на обозначенный объект;'





 WHEN Mode='S' THEN 'S = Коллективная блокировка. Удерживающему сеансу предоставлен коллективный доступ к ресурсу;'





 WHEN Mode='U' THEN 'U = Блокировка обновления. Указывает блокировку обновления, полученную на ресурсы, которые со временем могут быть обновлены. Используется для предотвращения общей формы взаимоблокировки, которая возникает, когда множество сеансов блокируют ресурсы для потенциального обновления в последующее время;'





 WHEN Mode='X' THEN 'X = Монопольная блокировка. Удерживающему сеансу предоставлен исключительный доступ к ресурсу;'





 WHEN Mode='IS' THEN 'IS = Блокировка с намерением коллективного доступа. Указывает намерение поместить S блокировки на некоторые подчиненные ресурсы в иерархии блокировок;'





 WHEN Mode='IU' THEN 'IU = Блокировка с намерением обновления. Указывает намерение поместить U блокировки на некоторые подчиненные ресурсы в иерархии блокировок;'





 WHEN Mode='IX' THEN 'IX = Блокировка с намерением монопольного доступа. Указывает намерение поместить X блокировки на некоторые подчиненные ресурсы в иерархии блокировок;'





 WHEN Mode='SIU' THEN 'SIU = Коллективная блокировка с намерением обновления. Указывает коллективный доступ к ресурсу с намерением получения блокировок обновления на подчиненные ресурсы в иерархии блокировок;'





 WHEN Mode='SIX' THEN 'SIX = Коллективная блокировка с намерением монопольного доступа. Указывает коллективный доступ к ресурсу с намерением получения монопольных блокировок на подчиненные ресурсы в иерархии блокировок;'





 WHEN Mode='UIX' THEN 'UIX = Блокировка обновления с намерением монопольного доступа. Указывает блокировку обновления ресурса с намерением получения монопольных блокировок на подчиненные ресурсы в иерархии блокировок;'





 WHEN Mode='BU' THEN 'BU = Блокировка массового обновления. Используется для массовых операций;'

     --[ ELSE else_result_expression ]

END as [Тип блокировки]





,syspr.spid, syspr.dbid, syspr.open_tran, syspr.status, syspr.hostprocess, syspr.loginame, syspr.hostname





 From

#LOCK_01_01





inner join master.dbo.sysprocesses as syspr

on syspr.spid = #LOCK_01_01.spid and syspr.dbid = #LOCK_01_01.dbid





where

#LOCK_01_01.Type = 'TAB'

and

#LOCK_01_01.dbid = @dbid     





/* Чем занят сервер*/

SELECT s.[spid]

      ,s.[loginame]

      ,s.[open_tran]

      ,s.[blocked]

      ,s.[waittime]

      ,s.[cpu]

      ,s.[physical_io]

      ,s.[memusage]

       INTO #sysprocesses

FROM   sys.[sysprocesses] s





WAITFOR DELAY '00:00:01'





SELECT txt.[text]

      ,s.[spid]

      ,s.[loginame]

      ,s.[hostname]

      ,DB_NAME(s.[dbid]) [db_name]

      ,SUM(s.[waittime] -ts.[waittime]) [waittime]

      ,SUM(s.[cpu] -ts.[cpu]) [cpu]

      ,SUM(s.[physical_io] -ts.[physical_io]) [physical_io]

      ,s.[program_name]

FROM   sys.[sysprocesses] s

       JOIN #sysprocesses ts

            ON  s.[spid] = ts.[spid]

            AND s.[loginame] = ts.[loginame]

       OUTER APPLY sys.[dm_exec_sql_text](s.[sql_handle]) AS txt

WHERE  s.[cpu] -ts.[cpu]

       + s.[physical_io] -ts.[physical_io]

       > 500

       OR  (s.[waittime] -ts.[waittime]) > 3000

GROUP BY

       txt.[text]

      ,s.[spid]

      ,s.[loginame]

      ,s.[hostname]

      ,DB_NAME(s.[dbid])

      ,s.[program_name]

ORDER BY

       [physical_io] DESC

       

DROP TABLE #sysprocesses

   

В универсальном отчете понадобилось отключить вывод итого по некоторым полям, но в универсальном отчете, созданном через построитель, к сожалению это невозможно

Многие скажут - что давно пора использовать СКД и там все есть! - согласен на все 100% но есть клиенты у которых стоит программа УТ с 2012 года, их все устраивает и ничего не хотят менять, кроме отчетов. Вот один мой знакомы попросил отключить итоги в универсальном отчете - сделал это добавив следующий код в процедуру формирования отчета:

 // Процедура формирования отчета

//

Процедура СформироватьОтчет(ТабличныйДокумент) Экспорт

	

	Если НЕ ЗначениеЗаполнено(УниверсальныйОтчет.ДатаКон) Тогда 

		УниверсальныйОтчет.ДатаКон = ТекущаяДата();

	КонецЕсли;

	

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

	УниверсальныйОтчет.ПостроительОтчета.Параметры.Вставить("ДатаОтчета", КонецДня(УниверсальныйОтчет.ДатаКон));

	УниверсальныйОтчет.ПостроительОтчета.Параметры.Вставить("ДатаНеделяНазад", УниверсальныйОтчет.ДатаКон-(86400*7));





	//УстановитьИнтервалыЗапроса();

	

	УниверсальныйОтчет.СформироватьОтчет(ТабличныйДокумент);

	

	// ДОБАВЛЕННЫЙ КОД - чистит итоги в нужных ячейках

	Для а = 11 по ТабличныйДокумент.ВысотаТаблицы Цикл

		//Ячейка = ТабличныйДокумент.Область(а,1,а,1).Текст; 

		текстЯчейка = ТабличныйДокумент.Область("R"+а+"C2").Текст; 

		Если Строка(ТабличныйДокумент.Область("R"+а+"C2").ЦветФона)="стиль: Фон кнопки" Тогда

			ТабличныйДокумент.Область("R"+а+"C7").Текст="";

			ТабличныйДокумент.Область("R"+а+"C11").Текст="";	

			ТабличныйДокумент.Область("R"+а+"C8").Текст=""; 		

			ТабличныйДокумент.Область("R"+а+"C9").Текст=""; 		

			ТабличныйДокумент.Область("R"+а+"C10").Текст=""; 			

		КонецЕсли;		

	КонецЦикла;

КонецПроцедуры // СформироватьОтчет()   

Для наглядности покажу на примере:

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

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

Пример: Пользователи ежедневно добавляют в документ строки с данными, нужно чтобы позже они не могли изменять уже введенные данные.

Для реализации этого, необходимо в ранее добавленных ячейках установить ТолькоПросмотр=Истина

 	Если ЗначениеЗаполнено(ДанныеСтроки.Дата) и Не НачалоДня(ДанныеСтроки.Дата) = НачалоДня(ТекущаяДата()) Тогда

		Для Каждого стр из ОформлениеСтроки.Ячейки Цикл

			стр.ТолькоПросмотр = Истина;

		КонецЦикла;	

	КонецЕсли;   

Пример табличного поля:

При добавлении новой строки нужно заполнить дату добавления и имя пользователя!

Добавлена строка может быть или кнопкой INS (добавление) или кнопкой F9 (дублирование).

При добавлении последовательность событий такая:

* ПередНачаломДобавления - строка еще не доступна

При дублировании последовательность событий такая:

* ПередНачаломДобавления - строка еще не доступна

* ПриАктивизацииЯчейки - строка уже доступна, но строка пустая.

* Повторная ПриАктивизацииЯчейки - строка уже заполнена. 

Как быть?

Для решения данной задачи необходимо использовать ПриНачалеРедактирования:

 Процедура ОтчетПриНачалеРедактирования(Элемент, НоваяСтрока, Копирование)

	Если НоваяСтрока Тогда

	Элемент.ТекущиеДанные.Дата = ТекущаяДата();

	Элемент.ТекущиеДанные.Менеджер = ПараметрыСеанса.ТекущийПользователь;

	КонецЕсли;

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

В реалии это выглядит так, нажали добавить и получили:

При работе в 1С, особенно когда много документов или номера редактируются ручками, можно получить ошибки вида:

Значение поля "Код" не уникально или Значение поля "Номер" не уникально 

Что делать? Перенумеровывать

Нужно восстановить нумерацию документов или элементов справочника:

Пользователю

Посмотрите: Перенумерация документов, справочников, и сама Обработка Универсальные подбор и обработка объектов

 Сбилась автонумерация у документа или справочника с текстовым кодом, что делать?

Программисту:

Посмотрите примеры выше и дополнительно: Как сбросить счётчик нумерации документов или справочников

В модуле ПередЗаписью() дописать функционал проверки:

 …

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

Если НомерЗанят(Номер) Тогда

УстановитьНовыйНомер();

КонецЕсли;



//функция НомерЗанят() по функционалу очень проста

// в вашей ситуации возможно ее придется изменить

Функция НомерЗанят(НомерДока)

Результат = Ложь;

Попытка

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

Запрос.Текст = «ВЫБРАТЬ

| Документ_.Номер

|ИЗ

| Документ.Документ КАК Документ_

|ГДЕ

| Документ_.Номер =НомерДока

| И Не Документ_.Ссылка =ТекДок»;

Запрос.УстановитьПараметр(«НомерДока», НомерДока);

Запрос.УстановитьПараметр(«ТекДок», Ссылка);

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

Исключение

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

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

КонецФункции //НомерЗанят()   

Клиент попросил настроить автоматическую архивацию баз 1С раз в три дня и выгрузку архивов на Dropbox и на FTP Сервер. Кроме 1С нужно архивировать папку с рабочими документами. Хочет - так хочет, делаем:

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

Из платных могу посоветовать handy backup, версия expert умеет работать с 1С, но цена ~ 5 300 немного останавливает - поэтому мы используем бесплатный Cobian Backup - респект разработчику!

Установка Cobian Backup

Скачиваем с оф. сайта

и запускаем установщик:

Устанавливаем службу, используя учетку от 1С

Далее идет установка, ОК по завершении.

Настройка автоархивирования 1С

У нас в арсенале 3 базы 1С:

• 1 - файловая
• 2 - серверных

Для создания архивов 1С мы будем использовать типовой механиз, для этого создана папка Backup1C и в ней bat файлы выполняющие архивацию баз:

Для файловых баз код bat файла следующий (zup.bat):

 echo ************************************************************ 

echo Setup param: 

echo ************************************************************ 

set __1c_path=C:\Program Files (x86)\1cv82\common\1cestart.exe

set __base_name=zup_msk

set __base_path=E:\Accounting\Staff\zup_msk

set __upload_path=D:\Backup1C

set __username=Backup

set __password=123420

echo ******************

echo Create folder:

echo ******************

md "%__upload_path%\%__base_name%" 

echo ************************************************************ 

echo Create backup: 

echo ************************************************************ 

"%__1c_path%" config /Out"%__upload_path%\%__base_name%\%__base_name%.log" /F"%__base_path%" /N"%__username%" /P"%__password%" /DumpIB"%__upload_path%\%__base_name%\%__base_name%-%date%.dt"    

Для серверных (crm.bat):

 echo ************************************************************ 

echo Setup param: 

echo ************************************************************ 

set __1c_path=C:\Program Files (x86)\1cv82\common\1cestart.exe

set __base_name=crm

set __base_path=server1C\db_crm

set __upload_path=D:\Backup1C

set __username=Backup

set __password=123420

echo ******************

echo Create folder:

echo ******************

md "%__upload_path%\%__base_name%" 

echo ************************************************************ 

echo Create backup: 

echo ************************************************************ 

"%__1c_path%" config /Out"%__upload_path%\%__base_name%\%__base_name%.log" /S"%__base_path%" /N"%__username%" /P"%__password%" /DumpIB"%__upload_path%\%__base_name%\%__base_name%-%date%.dt"    

Отроем Cobian Backup, для создания заданий

Настроим архивацию файловой базы:

Добавляем создание, снимаем галки внизу, т.к. у нас не будет прямого копирования:

на закладке Файлы устанавливаем копирование каталога на FTP:

Расписание:

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

Доп. действия:

Выполнить и ждать закрытия bat файл и добавим паузу в 180 секунд (этого времени хватает чтобы выполнить выгрузку базы ЗУП)

На закладке Дополнительно, я  поставил только одну галку - Синхронизация

Итог настройки:

Запускаем задание для проверки работоспособности, и через ~ 3 минуты:

Архив успешно создан, FTP сервер я пока не настроил, поэтому он вызвал ошибку - Но главное мы получили дамп базы 1С для дальнейшего копирования на сервера ftp, при верных настройках ftp, все отлично копируется - проверено уже не раз 

Настраиваем архивацию серверной базы

Тут все тоже как и в файловой, только добавим перезапуск агента сервера 1С(для перезапуска процессов 1С и отключения пользователей)

и базы на SQL большие - поэтому после выполнения bat файла добавим паузу 3000 секунд

Результат тестового выполнения:

Архив сделался за 8 минут, т.е. паузы 600 секунд вполне хватит.

Выгрузка на Dropbox

Для выгрузки на DropBox использовал резервное копирование от Антивируса Касперского. Он быстро подключился к хранилищу, правда пришлось на нем оплатить место до 1 ТБ) 

В итоге: 

все работает как часики: архивы создаются 2 раза в неделю и заливаются на облачные сервера

Частенько пользователи просят упростить ввод данных в программу используя копирование таблиц из Excel. Ниже я приведу пример как загрузить данные скопированные из Excel:

Создаем форму для загрузки данных:

внутри пишем код:

 // Функция ПолучитьТЗИзМакета(ТабДок, КолонкаИндекса = 1)     

    ТаблицаДанных = Новый ТаблицаЗначений;

    НомерКолонки = 0;

    Пока Истина Цикл

        НомерКолонки = НомерКолонки + 1;

        ИмяКолонки = ТабДок.Область(1, НомерКолонки).Текст;

        Если ПустаяСтрока(ИмяКолонки) Тогда

            Прервать;

        КонецЕсли;        

        ТаблицаДанных.Колонки.Добавить("К"+Строка(НомерКолонки));

    КонецЦикла;

    

    СчетчикКолонок = НомерКолонки - 1;

    

    НомерСтроки = 1; ФлагПрерывания = Ложь;

    Пока Истина Цикл

        НомерСтроки = НомерСтроки + 1;

        Стр = ТаблицаДанных.Добавить();

        

        Для А = 1 ПО СчетчикКолонок Цикл

            ТекстКолонки = ТабДок.Область(НомерСтроки, А).Текст;

            Если ПустаяСтрока(ТекстКолонки) Тогда

                Если А = КолонкаИндекса Тогда

                    Флагпрерывания = Истина;

                    ТаблицаДанных.Удалить(Стр);

                КонецЕсли;

            Иначе

                Стр[А - 1] = ТекстКолонки

            КонецЕсли;

            

            Если Флагпрерывания Тогда

                Прервать

            КонецЕсли;

        КонецЦикла;

        

        Если Флагпрерывания Тогда

            Прервать

        КонецЕсли;

    КонецЦикла;

    

    Возврат ТаблицаДанных

КонецФункции



Процедура ОсновныеДействияФормыЗагрузить(Кнопка)

	тзДанных=ПолучитьТЗИзМакета(ЭлементыФормы.ПолеТД);

	Закрыть(тзДанных);

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

В документ добавлена кнопка  - Загрузка из Excel ее код:

  //Функция преобразует строку вида 31.01.2015 в дату

Функция РазобратьДату(ИзмДата);

	Возврат Дата(Сред(ИзмДата,7,4)+Сред(ИзмДата,4,2)+Сред(ИзмДата,0,2));	       	

КонецФункции



Процедура ЗагрузитьИзЕкселНажатие(Элемент)

тзДанных = ПолучитьФорму("ФормаЗагрузкиИзExcel").ОткрытьМодально();	

//ТЗ получили, загружаем:

ГрафикПлатежейКлиент.Очистить();

Для Каждого стр из тзДанных Цикл 

	 нСтр = ГрафикПлатежейКлиент.Добавить();

	 нСтр.Дата = РазобратьДату(стр.К1);

	 нСтр.Сумма = стр.К2;

	 нСтр.СуммаАкта = стр.К3;

КонецЦикла;



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

Смысл в том что из Excel копируют таблицу:

Жмут на кнопку загрузить и в документе Табличная часть заполняется автоматически:

В документе «Регистрация разовых начислений» введены начисления Компенсация питания (офис) и Компенсация бесплатной выдачи молока на данный момент и их считаю вручную и заношу по каждому сотруднику отдельно. Надбавки считаются таким образом: 1-я считается фикс.сумма * кол-во отработанных дней по табелю; 2-я считается фикс.сумма (меняется ежемесячно) * кол-во отработ. дней по табелю / 2. Нам нужнои это автоматизировать и прописать это как-то формулой автоматического расчета.

Для Автоматизации этого я создал в Основных начислениях 2 вида расчета:

Для Питания

Для Молока

В результате настройки были добавлены 2 показателя:

ФиксСуммаПитание и ФиксСуммаМолоко

Как я понял из описания, их вы устанавливаете ежемесячно, для установки зайдите: в меню Расчет зарплаты - Показатели начислений

В открывшемся окне Укажите Месяц и значения на текущий месяц для организации

Расчет компенсаций

Создайте Регистрация разовых начислений, при выборе расчета автоматом подставляется заданное на месяц значение

Укажите Дату начала и Дат окончания и нажмите вверху Рассчитать

Поступил ко мне запрос: Можно ли сделать, чтобы автоматически считало Компенсацию питания в зависимости от количества отработанных дней по табелю?

Компенсация питания

Стоимость питания, полученного работником от работодателя или оплаченного работодателем за работника, является доходом сотрудника и облагается НДФЛ (Письмо Минфина России от 31.03.2011 N 03-03-06/4/26).

В соответствии с п. 2 ст. 211 Налогового кодекса РФ, стоимость полученного питания признается доходом работника в натуральной форме. Налогом на доходы физических лиц будут облагаться следующие выплаты:

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

стоимость услуг специализированных организаций, если работодатель заключил договор на оказание услуг общественного питания своим работникам. Стоимость данных услуг по предоставлению питания должна включать НДС, в соответствии с п. 1 ст. 211 Налогового Кодекса РФ.

Создадим новое основное начисление.

Откроем меню «Расчет зарплаты по организациям» далее выбираем «Настройка расчета зарплаты» документ «Основные начисления организаций».

Нажмем на кнопку «Добавить» и заполним поля документа:

1. поле «Последовательность расчета» - выбираем «Первичное начисление».
2. поле «Способ расчета» - необходимо указать каким образом будет производиться данное начисление в программе, для этого настроим формулу расчета и выберем значение «Произвольная формула расчета», далее нажимаем «Редактировать формулу расчета».

Оплату питания сотрудников организации будем производить пропорционально отработанным дням, поэтому в формуле расчета необходимо указать «Стоимость обеда * время в днях».

Необходимо добавить новый показатель «Стоимость обеда» он будет имеет следующие значения:

• вид показателя – денежный.
• назначение показателя – для всей компании (организации) или для подразделения
• порядок ввода показателя – периодически.

Перейдем на закладку «Время».

Установим флажок в поле «Дополнительное начисление за уже оплаченное время».

В реквизите «Вид времени по классификатору использования рабочего времени» установим значение из классификатора – «Явка».

Перейдем на закладку «Использование».

Все значения в данной закладке оставляем по умолчанию и ничего не меняем.

Перейдем на закладку «Бухучет и ЕНВД».

Галку - является натуральным доходом

В данной закладке необходимо указать способ отражения начисления в регламентированном учете.

В том случае, если оплата стоимости питания предусмотрена системой оплаты труда организации, то необходимо выставить значение – «По данным о сотруднике и его плановых начислениях».

В том случае, если оплата питания не предусмотрена трудовым или коллективным договором, то расходы по начислению не могут быть приняты для целей налогового учета. Данные расходы необходимо учитывать по статье затрат с установленным видом расходов НУ «Не учитываемые в целях налогообложения».

Перейдем на закладку «Налоги».

В первом реквизите «НДФЛ» установим значение «Облагается, код дохода» выберем из всплывающего списка код дохода «4800».

Далее переходим к реквизиту «Налог на прибыль, вид расхода по ст.255 НК РФ» в данном поле необходимо установить флажок из двух вариантов:

ставим флажок в поле «Учитывать в расходах на оплату труда по:» - в том случае, если оплата стоимости питания предусмотрена системой оплаты труда организации, из списка выставляем «пп.25, ст.255 НК РФ».

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

Перейдем на закладку «Взносы».

Перейдем к реквизиту «Страховые взносы в ПФР, ФСС и ФОМС» выставим в поле «Вид дохода» выбираем из всплывающего списка «Доходы, целиком облагаемые страховыми взносами».

Далее в поле «ФСС, страхование от несчастных случаев (до 2011 года)» устанавливаем флажок в поле «Облагается».

Следующее поле в данной закладке «ЕСН (до 2010г.)» выбираем вид дохода «Облагается ЕСН, взносами в ПФР целиком».

Перейдем на закладку «Прочее».

В данной закладке необходимо указать все вытесняющие виды расчета, в период действия которых оплата стоимости питания не будет начисляться.

Установка сумму показателей

Далее перейдем в меню «Расчет зарплаты по организациям» выберем подменю «Показатели расчета заработной платы».

Перейдем на закладку «Постоянные».

Пример установки значения для определенного подразделения:

Если нужно в целом по компании, то Выберем «Данные по организации» для все организации в целом и в правой колонке таблицы введем дату и сумму размера оплаты питания сотрудников.

Вводим плановое начисление

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

Для создания документа необходимо перейти в меню на панели инструментов «Расчет зарплаты по организациям» далее выбираем «Плановые начисления» документ «Ввод постоянного начисления или удержания организаций».

Нажмем «Добавить».

поле «Номер» выставляем дату формирования операции в программе.

поле «Действие» выставим значение «Внести или изменить начисление».

поле «Вид расчета» выставим из справочника «Основные начисления организации» новое начисление, добавленное в шаге №1 – «Компенсация питания».

поле «Период» выставляем период с которого применяется данное начисление.

Заполняем табличную часть «Сотрудники и показатели для расчета».

В данном поле выставляем сотрудников которым производится оплата питания, из справочника «Сотрудники».

Записываем документ и проводим в программе.

Теперь данное начисление будет автоматически рассчитываться при Начислении ЗП

Если у вас возникаем ошибка вида:

Не найдено ни одного сервера с размещенным сервисом serviceName = DebugService

или

Не найдено ни одного сервера с размещенным сервисом serviceName = JobService

то для исправления этой ошибки - серверу необходимо назначить функциональность:

1. Откройте Панель Администрирования серверов и перейдите в раздел Требования назначения функциональности

2. Добавите общую функциональность с типом требования Назначить

3. Примените требования

4. Все должно работать

Я указал общие требования, т.к. баз на сервере мало, нагрузки практически нет, Но требования назначения функциональности имеют более глубокий смысл:

Требование назначение функциональности определяет:

Для какого объекта требования создается требование. В качестве объекта требования могут выступать некоторые сервисы 1 кластера, клиентские соединения и произвольный объект требования. В качестве объекта требования могут выступать следующие сервисы кластера:

• Блокировок объектов.
• Времени.
• Журналов регистрации.
• Заданий.
• Нумерации.
• Полнотекстового поиска.
• Пользовательских настроек.
• Сеансовых данных.
• Транзакционных блокировок.
• Работы с внешними источниками данных через ODBC.
• Работы с внешними источниками данных через XMLA.
• Сервис лицензирования.
• Сервис фонового обновления конфигурации базы1 данных.
• Сервис тестирования.
• Сервис внешнего управления сеансами.

Определяет тип требования. Тип требования определяет, каким образом будет выполняться использование рабочего сервера:

Не назначать - означает, что рабочий сервер, для которого создано данное требование, не будет назначен для обслуживания объекта требования, подходящего под условия, заданные в требовании.

Назначать - означает, что рабочий сервер, для которого создано данное требование, будет являться одним из кандидатов на обслуживание данного объекта требования (если рабочих серверов будет несколько).

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

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

Дополнительные параметры, необходимые кластеру серверов для принятия решения в ряде случаев:

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

Дополнительные параметры. Используются для уточнения требований при размещении клиентского соединения или сервиса сеансовых данных. Дополнительный параметр проверяется на совпадение с началом соответствующего параметра объекта требования. Дополнительный параметр может принимать одно из следующих значений:

Для указания конкретного фонового задания:

• BackgroundJob.CommonModule.<Имя модуля>.<Имя метода?.
• Для указания всех фоновых заданий: BackgroundJob. CommonModule .
• Для указания конкретного отчета: BackgroundJob.Report.<Имя отчета;.
• Для указания всех отчетов: BackgroundJob.Report.
• Для указания фоновой реструктуризации: SystemBackgroundJot.
• Для клиентского приложения:
• 1CV - толстый клиент.
• 1CV8CDirect- тонкий клиент в случае прямого подключения к серверу «1С:Предприятия».
• Designer - конфигуратор.
• COMConnectior - COM-соединение.
• WebServerExtensior- соединение с информационной базой через веб-сервер: веб-клиент, тонкий клиент в случае подключения через веб-сервер, Web-сервис.

Рассмотрим, как работает кластер серверов при обработке требований.

В случае необходимости выполнить размещение объекта требования, кластер выполняет следующие действия:

1. На всех серверах, входящих в состав кластера, выполняется обработка заданных для этих серверов требований назначения функциональности. Обход серверов и требований выполняется в порядке следования этих объектов в консоли кластера.2. 

2. В каждом списке требований определяется первое требование, которое удовлетворяет размещаемому объекту: по собственно объекту, информационной базе и дополнительному параметру.

3. Затем полученный список рабочих серверов сортируется по признаку типа требования так, что первыми оказываются рабочие сервера с явным указанием использования. Рабочие сервера, для которых подходящее требование содержит явный запрет на использование - исключаются из списка доступных рабочих серверов. При этом назначение выполняется следующим образом:

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