VPF::Выбор конкретного документа в отчете

Loser

Дата 25.11.2008, 19:36 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 28
Регистрация: 17.10.2007

Репутация: нет
Всего: нет

Всем привет!
Я делаю отчет. В отчете есть поле, в которое нужно вписывать номер ПКО и дату. Хочу сделать чтобы это поле заполнялось автоматически.
Этот документ (ПКО), данные которого нужно записывать в отчет формируется на основании документа продажа в розницу. В нем стоит флажок "розничная выручка" и в поле основание написанно "из магазина".
Как можно выбрать данный документ, что бы потом можно было получить значения его реквизитов, манипулировать ими.

Я делаю вот так:

Код


    ПКО=СоздатьОбъект("Документ.ПриходныйОрдер");
    ПКО.ВыбратьПоЗначению(ВыбДата,ВыбДата,"РозничнаяВыручка","1");
    Пока ПКО.ПолучитьДокумент()>0 Цикл  
        ТекДок=ПКО.ТекущийДокумент();        
    КонецЦикла;

но пишет "Объект - документ определенного вида!"

В чем ошибка? Можно будет внутри этого цикла сделать еще один выбор по значению реквизита "основание"? Или есть другие более оптимальные способы?

Itsys

Дата 25.11.2008, 22:23 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1338
Регистрация: 21.1.2008
Где: г. Москва

Репутация: 7
Всего: 34

Код


    ПКО=СоздатьОбъект("Документ");
    ПКО.ВыбратьПоЗначению(ВыбДата,ВыбДата,"РозничнаяВыручка","1");
    Пока ПКО.ПолучитьДокумент()>0 Цикл  
        Если ПКО.Вид() = "ПриходныйОрдер" Тогда
            ТекДок=ПКО.ТекущийДокумент();
        КонецЕсли;
    КонецЦикла;

Loser

Дата 26.11.2008, 18:17 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 28
Регистрация: 17.10.2007

Репутация: нет
Всего: нет

Такой вариант тоже не работает
Сделал вот так

Код


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

Это сообщение отредактировал(а) Loser - 26.11.2008, 18:18

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| 1C: Предприятие, SAP, ERP и учётные системы \| Следующая тема »