Попытка
RecordSet = Новый COMОбъект("ADODB.RecordSet");
RecordSet.ActiveConnection = Connection;
RecordSet.CursorType = 3;
RecordSet.LockType = 1;
RecordSet.Open("SELECT ID, F, I, O, BR_DT, BR_PL, DG_DT, DG_N, DG_POR_N FROM OPS;");
Исключение
Сообщить("Не могу открыть сессию!");
КонецПопытки;
Пока Не RecordSet.EOF() Цикл
Если Число(RecordSet.Fields("DG_N").Value) = 0 Тогда
КонецЕсли;
RecordSet.MoveNext();
КонецЦикла;
Вот так