powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / [игнор отключен] [закрыт для гостей] / Отчёт на основе данных из ComОбъекта
4 сообщений из 4, страница 1 из 1
Отчёт на основе данных из ComОбъекта
    #37041284
Турист
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В 1С 8.2 есть подключение к базе данных SQL Server через COMОбъект.
Как построить отчёт на основе данных запроса к этой базе данных?
...
Рейтинг: 0 / 0
Отчёт на основе данных из ComОбъекта
    #37069124
dvasilev
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Пишешь запрос на языке SQLSERVER и обрабатываешь его программно...
...
Рейтинг: 0 / 0
Отчёт на основе данных из ComОбъекта
    #37069218
Фотография Deosfen
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
лучше stored procedure.
...
Рейтинг: 0 / 0
Отчёт на основе данных из ComОбъекта
    #37072161
Paulpit
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Как пример могу дать.
Соединение = Новый COMОбъект("ADODB.Connection");
Соединение.ConnectionString = "DSN=Delivery;Driver=SQL Server;Dbname=Delivery;UID=sa;";
Попытка
Соединение.open();
Исключение
Сообщить("Не удалось соедениться с ...");
Возврат;
КонецПопытки;

БДСИТИ = Новый COMОбъект("ADODB.Command");
БДСИТИ.ActiveConnection = Соединение;

БДСИТИ.CommandText =
"SELECT
| num,
| duration,
| starttime,
| fuelconsumption as fuel,
| points,
| returnedat,
| category,
| driver,
| length
| from Reis
| where 1=OperatorId and '" +
Формат(ДатаВыезда,"ДФ=yyyy-MM-dd")+"' = datereis ";


МЛСИТИ = Новый COMОбъект("ADODB.RecordSet");
МЛСИТИ = БДСИТИ.Execute();
Если МЛСИТИ.eof() Тогда
Сообщить("Не найдены записи!!!");
Возврат;
КонецЕсли;

МЛСИТИ.moveFirst();
Пока Не МЛСИТИ.eof() Цикл
,,,,,,,
МЛ.НомерЛиста = МЛСИТИ.Fields("num").Value;
//МЛ.ВремяВыездаПлан = МЛСИТИ.Fields("starttime").Value;
МЛ.ВремяПрибытия = МЛСИТИ.Fields("starttime").Value - 4500;
//МЛ.ВремяНачалоЗагрузкиПлан = МЛ.ВремяВыездаПлан - 4500;
МЛ.ДлинаПробега = МЛСИТИ.Fields("length").Value;
МЛ.РасходТоплива = МЛСИТИ.Fields("fuel").Value;
МЛСИТИ.moveNext();
КонецЦикла;

МЛСИТИ.Close();
Соединение.Close();
...
Рейтинг: 0 / 0
4 сообщений из 4, страница 1 из 1
Форумы / [игнор отключен] [закрыт для гостей] / Отчёт на основе данных из ComОбъекта
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]