Skip to content

Instantly share code, notes, and snippets.

View a-sitnikov's full-sized avatar

Anatoliy Sitnikov a-sitnikov

  • Russia, Moscow
View GitHub Profile
@echo off
SET v8="C:\1CData\8.3.9.2170_x64\bin\1cv8.exe"
SET cf="C:\1CData\release\1Cv8_2017-05-10.cf"
SET db=gr-rphost-01\PLPK_K3_ERP
SET logFile="N:\gr\dok\Users\AppData\sitnikov.a\1CData\update.log"
SET sqlServer=gr-sql
SET backup_sql="\\uniservice.local\net\gr\dok\Users\Desktops\sitnikov.a\Рабочий стол\scripts\backup_erp.sql"
if not exist %cf% goto filenotfound
@a-sitnikov
a-sitnikov / file.bsl
Created April 21, 2017 10:01
Печать внешней печ формы
Функция Печать(Ссылка, Идентификатор)
ИсточникДанных = ПолучитьИсточникДанных(Идентификатор);
ОбъектыНазначения = Новый Массив;
ОбъектыНазначения.Добавить(Ссылка);
ПараметрыИсточника = Новый Структура;
ПараметрыИсточника.Вставить("ИдентификаторКоманды", Идентификатор);
ПараметрыИсточника.Вставить("ОбъектыНазначения", ОбъектыНазначения);
@a-sitnikov
a-sitnikov / module.bsl
Created March 2, 2017 08:33
СКД, формирование отчета по внешним данным
Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка)
СтандартнаяОбработка = Ложь;
ДокументРезультат.Очистить();
ВнешниеНаборыДанных = Новый Структура;
ВнешниеНаборыДанных.Вставить("Данные", ПолучитьТаблицуДанных());
КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных;
МакетКомпоновки = КомпоновщикМакета.Выполнить(СхемаКомпоновкиДанных, КомпоновщикНастроек.ПолучитьНастройки(), ДанныеРасшифровки);
@a-sitnikov
a-sitnikov / FormModule.bsl
Created March 1, 2017 07:52
Новый документ, обработчики, форма списка
#Область ОбработчикиСобытийФормы
&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
Если Параметры.Свойство("АвтоТест") Тогда // Возврат при получении формы для анализа.
Возврат;
КонецЕсли;
@a-sitnikov
a-sitnikov / FormModule.bsl
Last active March 1, 2017 07:48
Новый документ, обработчики, модуль формы
#Область ОбработчикиСобытийФормы
&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
Если Параметры.Свойство("АвтоТест") Тогда
Возврат;
КонецЕсли;