1С 8.x : Найти и открыть документ

 

// Найти и открыть документ

Результат = Документы.РасходнаяНакладная.НайтиПоНомеру(НомерДок, РабочаяДата);

Если Результат.Пустая() Тогда

    Предупреждение("Документ не найден!");

Иначе

    Результат.ПолучитьФорму().Открыть();

КонецЕсли;



//Найти документ и обработать

ИскомыйДокумент = Документы.РеализацияТоваровУслуг.НайтиПоНомеру(НомерДок, Дата(2005, 1, 1)); 

Если НЕ ИскомыйДокумент.Пустая() Тогда 

// Выполнить действия в случае обнаружения такого документа. … 

КонецЕсли; 





//Выборка запросом

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

Запрос.Текст = "ВЫБРАТЬ 

|	РеализацияТоваровУслуг.Ссылка 

|ИЗ 

|	Документ. РеализацияТоваровУслуг КАК РеализацияТоваровУслуг 

|ГДЕ 

|	РеализацияТоваровУслуг.Контрагент = &Контрагент 

|	И 

|	(РеализацияТоваровУслуг.Номер < 100 ИЛИ РеализацияТоваровУслуг.Дата < ДАТАВРЕМЯ(2005, 1, 1)) 

|	И 

|	РеализацияТоваровУслуг.Товары.Номенклатура В ИЕРАРХИИ(&Номенклатура)";

	

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

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

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

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

Для Каждого ТекущаяСтрока Из Результат Цикл 

	// Выполнить действия...

КонецЦикла;