Вывести все типы ссылок на Документы, существующие в конфигурации.
|
1 2 3 4 5 6 7 |
Массив = Документы.ТипВсеСсылки().Типы(); Для каждого ОчереднойТип Из Массив Цикл Сообщить(ОчереднойТип); КонецЦикла; |
Получить макет для печати документа.
|
1 |
Макет = Документы.Распоряжение.ПолучитьМакет("Печать"); |
Получить ссылку на каждый из документов, существующих в конфигурации.
|
1 2 3 4 5 |
Для каждого СледДокум Из Документы Цикл Ссылка = СледДокум.ПолучитьСсылку(); КонецЦикла; |
Проверить, проведен ли документ с номером 78.
|
1 2 3 4 5 |
Если Документы.Распоряжение.НайтиПоНомеру(78).Проведен Тогда Сообщить("Документ с номером 78 проведен"); КонецЕсли; |
Проверить, что во всех документах заполнен реквизит.
|
1 2 3 4 5 6 7 |
ПустаяСсылкаОтветственный = Справочники. Ответственные.ПустаяСсылка(); Если Не Документы.Распоряжение.НайтиПоРеквизиту("Ответственный", ПустаяСсылкаОтветственный).Пустая() Тогда Сообщить("Есть документы, у которых не заполнен реквизит ""Ответственный"""); КонецЕсли; |
Выбрать все документы за текущий месяц.
|
1 2 3 4 5 6 7 |
Выборка = Документы.Распоряжение.Выбрать(НачалоМесяца(ТекущаяДата()),КонецМесяца(ТекущаяДата())); Пока Выборка.Следующий() Цикл Сообщить(Выборка); КонецЦикла; |
Создать новый документ.
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 |
НовыйДокумент = Документы.Распоряжение.СоздатьДокумент(); НовыйДокумент.Дата = ТекущаяДата(); НовыйДокумент.Ответственный = Справочники.Ответственные.Основной; // Заполнение табличной части: НовСтрТЧ = НовыйДокумент.СписокРаспоряжений.Добавить(); НовСтрТЧ.ВидРаспоряжения = Справочники.ВидыРаспоряжений.НайтиПоКоду(2); НовСтрТЧ.ОценкаБаллов = 26; НовСтрТЧ.ПроцентВыполнения = 87; НовСтрТЧ.КакоеТоЧисло = 98798798; НовыйДокумент.Записать(); |
Вызвать процедуру проверки заполнения реквизитов документа в модуле объекта.
|
1 2 3 4 5 |
Если НЕ ПроверитьЗаполнениеРеквизитов(ЭтотОбъект.Ссылка) Тогда Сообщить("Реквизиты документа не заполнены"); КонецЕсли; |
Пометить документ на удаление.
|
1 2 3 |
ВКорзину = Документы.Распоряжение.НайтиПоНомеру(63).ПолучитьОбъект(); ВКорзину.УстановитьПометкуУдаления(Истина); |
Получить список ссылок на документ за текущий месяц.
|
1 2 3 4 5 6 7 8 9 |
СписокРаспоряжений = Новый СписокЗначений; Выборка = Документы.Распоряжение.Выбрать(НачалоМесяца(ТекущаяДата()),КонецМесяца(ТекущаяДата())); Пока Выборка.Следующий() Цикл СписокРаспоряжений.Добавить(Выборка.Ссылка); КонецЦикла; |
Удалить все документы Распоряжение.
|
1 2 3 4 5 6 7 |
Выборка = Документы.Распоряжение.Выбрать(); Пока Выборка.Следующий() Цикл Выборка.ПолучитьОбъект().Удалить(); КонецЦикла; |