перебор документов по дате

[Stim]

Подскажите пож-та алгоритм перебора документов по дате.. Как подступиться к проблеме этой7 нужно чтобы программа сверяла дату документа с заданым интервалов времени(например с 1.01.07 по 31.02.07). как задать этот интервал можно? если кто нибудь знает, подскажите, а то идей пока конкретных нету..

 

[Zab]

Посмотри метод ВыбратьДокументы(<Дата1>,<Дата2>) помоему тут понятно и без пояснений.

 

[Stim]

спасибо, сейчас попробую

вопрос только, как эти документы перебрать?

ВыбратьДокументы(дата1,дата2);
Пока Док.ПолучитьДокумент()=1 Цикл
//тело программы
КонецЦикла;
будет открываться вся выборка в заданых датах?что-то легко прям..

 

[Stim]

Процедура ОК()
Перем ДатаДок;
ы=0;
Док=СоздатьОбъект("Документ"); 
Док.ВыбратьДокументы(НачДата,КонДата);
Пока Док.ПолучитьДокумент() > 0 Цикл
ТекДок=Док.ТекущийДокумент();
ы=ы+1;
Сообщить("датадок" +ТекДок.ДатаДок +ы +ТекДок.Модифицированность);

КонецЦикла;	
КонецПроцедуры;

Выдает ошибку
Сообщить("датадок" +ТекДок.ДатаДок +ы +ТекДок.Модифицированность);
{D:\1C\EXTFORMS\СЧЕТФАКТУРА.ERT(16)}: Поле агрегатного объекта не обнаружено (Модифицированность)
Не подскажите в чем дело?

 

[Pro]

Модифицированность работает только непосредственно из формы документа... imho

 

[jj_mail]

к тому же - это еще и функция Модифицированность() B)

 

[Stim]

блин а еще 1 проблемка возникла, которую ввиду своей неопытности немогу решить :
как закрыть форму ? т.е ее можно открыть строчкой:

ОткрытьФорму("Документ." + "СчетФактура", , Док.ТекущийДокумент());
//тек.док берется из выборки док-ов по датам

когда открывается форма, она создаёт счетфактуру для каждого док-та, и после этого ее нужно закрыть и сохранить док-т, который она создаёт. как это можно сделать ?

 

[jj_mail]

а для чего его вобще открывать ?

 

[Stim]

суть работы программы:
перебор документов по заданым датам, для каждого док-та создается счетфактура или открывается если она создана. все это делается формой, которую я немогу закрыть програмно.

и еще обьясните кому нетрудно разницу между открыть форму и открытьформумодально

 

[Zab]

Форму документа открывать не обязательно, для того, чтобы изменить или создать документ. Хуже того, 1С не позволяет программно заполнить табличную часть документа, ч-з контекст формы. (извращения в счет не берем.)
Модально, открытая форма останавливает выполнение модуля, который ее открыл.
Не модальная открывается, и выполнение идет дальше.
Я надеюсь, ты в курсе, что при открытой модальной форме, ты не сможешь переключиться на другое окошко.

Для закрытия формы, смотри Форма.Закрыть(<ЗапрСохр>) или атрибут СтрокаДействийФормы

 

[Stim]

как же тогда решить проблему : Есть документ, который создает счетфактуру для документа реализация товара...нужен внешнией отчет, который будет перебериать документы в заданых датах,и создавать счетфактуру для них, если а.Это документ "реализация товара". б.счетфактура для тек.док-та несоздана.



Что смог сделать я :
Проверка названия док-та "реализация товара"
Проверка на существование счетфакуты для текдока есть
Перебор док-ов есть


как видно это совсем, мало..пытаюсь разобраться, рад всем советам...
Нужен метод, совет, как использовать уже готовый док-т , который создает счетфактуру эту...а потом в цикл перебора док-та вставить и все... свиду просто, а не получается, или подход к решению этой проблемы неправильный?

 

[Zab]

Процедура СоздатьСФ()
Док=СоздатьОбъект("Документ.СчетФактура"); 
Док.Новый();
// заполнение реквизитов дока.
Док.Записать(); 
КонецПроцедуры

помогло?

 

[Stim]

ага. )) а вот вопрос еще 1. если это все мне нужно реализовать во внешнем отчете, что изменится в синтаксисе или еще в чем-нибудь. ?

 

[Stim]

вот непонятно например, в реквизитах шапки документа есть такой реквизит : тип , имеющий значение перечисление.типысчетов фактур.. так же в модуле этого же документа есть строчка

Если Тип = Перечисление.ТипыСчетовФактур.Отгрузка Тогда

как эта же строчка будет выглядеть во внешнемочтете(обработке)

 

[jj_mail]

Если Док.Тип = Перечисление.ТипыСчетовФактур.Отгрузка Тогда

 

[Stim]

Ура. Программа сделал. Спасибо всем, кто помог.