0
Neros
24.05.13
✎
17:33
|
Добрый день.Столкнулся с проблемой при подключении по Com из 7.7 к 8.2 предприятие не знаю как правильно преобразовать дату и время отчёта.
v8=СоздатьОбъект("V82.ComConnector");
База= v8.Connect("Srvr=sdserver:"";Ref="";Usr="";Pwd ="");
Если v8=0 Тогда
Сообщить("Ошибка открытия базы!", "!");
СтатусВозврата(0);
Иначе
Сообщить("Соединение выполнено успешно Союз-Юг");
КонецЕсли;
ДатаНачПередаваемая=Строка(ДатаОтчета)+" 00:00:00";
ДатаКонПередаваемая=Строка(ДатаОтчета)+" 23:59:59";
ЗапросПоДокументам=База.NewObject("Запрос");
ЗапросПоДокументам.Текст=" Выбрать
|ВзаиморасчетыСКонтрагентамиОбороты.Организация.Наименование,
|ВзаиморасчетыСКонтрагентамиОбороты.Регистратор.Ответственный КАК РегистраторОтветственный,
|СУММА(ВзаиморасчетыСКонтрагентамиОбороты.Регистратор.СуммаДокумента) КАК РегистраторСуммаДокумента
|ИЗ
|РегистрНакопления.ВзаиморасчетыСКонтрагентами.Обороты(&ДатаНач, &ДатаКон, Регистратор, ) КАК ВзаиморасчетыСКонтрагентамиОбороты
|ГДЕ
|ВзаиморасчетыСКонтрагентамиОбороты.Регистратор.Ответственный = "+Автор.Наименование+"
|И
|ВзаиморасчетыСКонтрагентамиОбороты.Регистратор.Дата > '"+ДатаНачПередаваемая+"'
|И
|ВзаиморасчетыСКонтрагентамиОбороты.Регистратор.Дата < '"+ДатаКонПередаваемая+"'
|И
|ВзаиморасчетыСКонтрагентамиОбороты.Регистратор.Проведен = ИСТИНА
|СГРУППИРОВАТЬ ПО
|ВзаиморасчетыСКонтрагентамиОбороты.Регистратор.Ответственный,
|ВзаиморасчетыСКонтрагентамиОбороты.Организация.Наименование
|УПОРЯДОЧИТЬ ПО
|РегистраторОтветственный
|";
ЗапросПоДокументам=ЗапросПоДокументам.Выполнить();
ЗапросПоДокументам.Выгрузить(ТаблПКО);
ТаблПКО.Свернуть("Автор,Фирма","Сумма");
ЗаписатьВЭксель(ТаблПко);
|
|