Архивы 1C - Страница 35 из 41

Переполнение длинны строки в запросе 1С

18.06.2013 Павел Грибов 1C

В одном из запросов участвовала строка вида КонтактнаяИнформация.Поле1 + «,» + КонтактнаяИнформация.Поле2 + » » + КонтактнаяИнформация.Поле3 + …….

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

ВЫРАЗИТЬ(КонтактнаяИнформация.Поле1 + "," + КонтактнаяИнформация.Поле2 + " " + КонтактнаяИнформация.Поле3 + "," + КонтактнаяИнформация.Поле4 + " " + КонтактнаяИнформация.Поле5 + "," + КонтактнаяИнформация.Поле6 + " " + КонтактнаяИнформация.Поле7 + " " + КонтактнаяИнформация.Поле8 КАК СТРОКА(100))

1	ВЫРАЗИТЬ(КонтактнаяИнформация.Поле1 + "," + КонтактнаяИнформация.Поле2 + " " + КонтактнаяИнформация.Поле3 + "," + КонтактнаяИнформация.Поле4 + " " + КонтактнаяИнформация.Поле5 + "," + КонтактнаяИнформация.Поле6 + " " + КонтактнаяИнформация.Поле7 + " " + КонтактнаяИнформация.Поле8 КАК СТРОКА(100))

и все чудесным образом заработало.

Оставить комментарий 1с, переполнение результата запроса

Перестали выполнятся фоновые задания в 1С

17.06.2013 Павел Грибов 1C

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

2 комментария 1с, регламентные задания

Работа с базами и выполнение запросов MSSQL на прямую, посредством встроенного языка 1С

16.04.2013 Павел Грибов 1C

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

Решение: 1С умеет работать с COM соединениями. Их и используем.

Сначала напишем процедуру отвечающую за подключение к MSSQL, и выдающее на выходе ссылку на полученное соединение: » Читать далее

Один комментарий 1c, работа из 1с с MSSQL

Отчет по статистике «Раздел 1. Производство и отгрузка по видам продукции»

01.04.2013 Павел Грибов 1C

Формируется на основании документов «Реализация товаров и услуг», «Отчет производства за смену» и регистров «Остатки и обороты товаров на складах». Применимо к УПП 8.2 конфигурации «КТ-Алкоголь»

Скачать можно здесь

Оставить комментарий 1с, отгрузка, по видам, производство, статистика

Выгрузка списка сотрудников организации в XML. 1С УПП 8.2

21.03.2013 Павел Грибов 1C

Использую данный скрипт, поместив его в регламентированные заданиях (в рамках доработки проекта «Учет оргтехники в организации» — разработка модуля контроля прохода работников через турникет).Поставщик данных — регистр РаботникиОрганизацийСрезПоследних. Период — задаем например текущую дату. На выходе получаем текущую фазу работника («Работает», «В отпуске и т.п.), и если есть дата выхода из этой «Фазы» (например дата выхода из отпуска), то пишется и она.

Процедура СохранитьВXMLСписокСотрудников();
 Запрос = Новый Запрос;
 Запрос.Текст = 
"ВЫБРАТЬ
|	РаботникиОрганизацийСрезПоследних.Сотрудник,
|	РаботникиОрганизацийСрезПоследних.Сотрудник.Физлицо.Код КАК кодфиз,
|	РаботникиОрганизацийСрезПоследних.Сотрудник.Должность КАК должн,
|	ВЫБОР
|		КОГДА СостояниеРаботниковОрганизацийСрезПоследних.ПериодЗавершения >= &Период
|			ТОГДА СостояниеРаботниковОрганизацийСрезПоследних.Состояние
|		ИНАЧЕ ""Работает""
|	КОНЕЦ КАК Состояние,
|	ВЫБОР
|		КОГДА СостояниеРаботниковОрганизацийСрезПоследних.ПериодЗавершения >= &Период
|			ТОГДА СостояниеРаботниковОрганизацийСрезПоследних.ПериодЗавершения
|		ИНАЧЕ ДАТАВРЕМЯ(1, 1, 1, 0, 0, 0)
|	КОНЕЦ КАК КонецФазы
|ИЗ
|	РегистрСведений.РаботникиОрганизаций.СрезПоследних(&Период, ) КАК РаботникиОрганизацийСрезПоследних
|		ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.СостояниеРаботниковОрганизаций.СрезПоследних(&Период, ) КАК СостояниеРаботниковОрганизацийСрезПоследних
|		ПО РаботникиОрганизацийСрезПоследних.Сотрудник = СостояниеРаботниковОрганизацийСрезПоследних.Сотрудник
|ГДЕ
|	РаботникиОрганизацийСрезПоследних.ЗанимаемыхСтавок <> 0";

  Запрос.УстановитьПараметр("Период", Период);

  Результат = Запрос.Выполнить().Выбрать();  
  ЗаписьXML = Новый ЗаписьXML;
  ЗаписьXML.ОткрытьФайл("\\10.80.16.34\Documents\employees.xml","UTF-8");
  ЗаписьXML.ЗаписатьОбъявлениеXML();

  ЗаписьXML.ЗаписатьНачалоЭлемента("export");
  пока  Результат.Следующий() цикл
   	 ЗаписьXML.ЗаписатьНачалоЭлемента("employees");
	 ЗаписьXML.ЗаписатьБезОбработки("<faza>"+СокрЛП(Результат.Состояние)+"</faza>");
	 ЗаписьXML.ЗаписатьБезОбработки("<fio>"+СокрЛП(Результат.Сотрудник)+"</fio>");
	 ЗаписьXML.ЗаписатьБезОбработки("<code>"+СокрЛП(Результат.кодфиз)+"</code>");
	 ЗаписьXML.ЗаписатьБезОбработки("<enddate>"+СокрЛП(Результат.КонецФазы)+"</enddate>");
	 ЗаписьXML.ЗаписатьБезОбработки("<post>"+СокрЛП(Результат.должн)+"</post>");
	 ЗаписьXML.ЗаписатьКонецЭлемента();

  конеццикла;
  ЗаписьXML.ЗаписатьКонецЭлемента();

Процедура СохранитьВXMLСписокСотрудников();

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

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

"ВЫБРАТЬ

| РаботникиОрганизацийСрезПоследних.Сотрудник,

| РаботникиОрганизацийСрезПоследних.Сотрудник.Физлицо.Код КАК кодфиз,

| РаботникиОрганизацийСрезПоследних.Сотрудник.Должность КАК должн,

| ВЫБОР

| КОГДА СостояниеРаботниковОрганизацийСрезПоследних.ПериодЗавершения >= &Период

| ТОГДА СостояниеРаботниковОрганизацийСрезПоследних.Состояние

| ИНАЧЕ ""Работает""

| КОНЕЦ КАК Состояние,

| ВЫБОР

| КОГДА СостояниеРаботниковОрганизацийСрезПоследних.ПериодЗавершения >= &Период

| ТОГДА СостояниеРаботниковОрганизацийСрезПоследних.ПериодЗавершения

| ИНАЧЕ ДАТАВРЕМЯ(1, 1, 1, 0, 0, 0)

| КОНЕЦ КАК КонецФазы

|ИЗ

| РегистрСведений.РаботникиОрганизаций.СрезПоследних(&Период, ) КАК РаботникиОрганизацийСрезПоследних

| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.СостояниеРаботниковОрганизаций.СрезПоследних(&Период, ) КАК СостояниеРаботниковОрганизацийСрезПоследних

| ПО РаботникиОрганизацийСрезПоследних.Сотрудник = СостояниеРаботниковОрганизацийСрезПоследних.Сотрудник

|ГДЕ

| РаботникиОрганизацийСрезПоследних.ЗанимаемыхСтавок <> 0";

Запрос.УстановитьПараметр("Период", Период);

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

ЗаписьXML = Новый ЗаписьXML;

ЗаписьXML.ОткрытьФайл("\\10.80.16.34\Documents\employees.xml","UTF-8");

ЗаписьXML.ЗаписатьОбъявлениеXML();

ЗаписьXML.ЗаписатьНачалоЭлемента("export");

пока Результат.Следующий() цикл

ЗаписьXML.ЗаписатьНачалоЭлемента("employees");

ЗаписьXML.ЗаписатьБезОбработки("<faza>"+СокрЛП(Результат.Состояние)+"</faza>");

ЗаписьXML.ЗаписатьБезОбработки("<fio>"+СокрЛП(Результат.Сотрудник)+"</fio>");

ЗаписьXML.ЗаписатьБезОбработки("<code>"+СокрЛП(Результат.кодфиз)+"</code>");

ЗаписьXML.ЗаписатьБезОбработки("<enddate>"+СокрЛП(Результат.КонецФазы)+"</enddate>");

ЗаписьXML.ЗаписатьБезОбработки("<post>"+СокрЛП(Результат.должн)+"</post>");

ЗаписьXML.ЗаписатьКонецЭлемента();

конеццикла;

ЗаписьXML.ЗаписатьКонецЭлемента();

Оставить комментарий 1с, выгрузка xml, список сотрудников

« 1 … 33 34 35 36 37 … 41 »

Пн	Вт	Ср	Чт	Пт	Сб	Вс
1	2	3	4	5	6	7
8	9	10	11	12	13	14
15	16	17	18	19	20	21
22	23	24	25	26	27	28
29	30