|
v7: Сравнение двух документов
| ☑ |
0
pavilion
08.04.15
✎
13:15
|
Сижу ломаю голову, как реализовать, по сути ничего сложного, но тем не менее, не знаю правильно ли я делаю...
Нужно сравнить два документа "Расходную накладную" с "Приходно кассовым ордером", методом перебором документа.
Если не совпадают то вывести в таблицу, если совпадают то ничего.
Процедура Сформировать()
ДокРН = СоздатьОбъект("Документ.РасходнаяНакладная");
ДокПКО = СоздатьОбъект("Документ.ПриходныйКассовый");
ДокРН.ВыбратьДокументы(НачДата,КонДата);
ДокРН.ВыбратьПодчиненныеДокументы(ДокПКО);
Пока ДокРН.ПолучитьДокумент()=1 Цикл
Если ДокРН.Вид()<>"ПриходныйКассовый" Тогда
Продолжить
КонецЕсли;
КонецЦикла;
//заполнение
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Сравнение");
Таб.ВывестиСекцию("Шапка");
КонецПроцедуры
Хотя бы знать, правильно я начал делать
|
|
1
DmitriyDI
08.04.15
✎
13:17
|
(0) запросом !
|
|
4
viktor_vv
08.04.15
✎
13:22
|
Ошибку выдаст. Для перебора полчиненых надо документ общего вида. Да и ты один и тот же объект пытаешься перебирать
|
|
5
aka AMIGO
08.04.15
✎
13:22
|
(4) +1.. и я сижу, не допонимаю :)
|
|
6
viktor_vv
08.04.15
✎
13:23
|
ДокПодч = СолатьОбъект(«Документ");
|
|
7
Builder
08.04.15
✎
13:25
|
ДокРН.ВыбратьДокументы(НачДата,КонДата);
Пока ДокРН.ПолучитьДокумент()=1 Цикл
ДокПодч.ВыбратьПодчиненныеДокументы(,,ДокРН);
Если ДокПодч.Вид()="ПриходныйКассовый" Тогда
// Тут делай что надо
КонецЕсли;
КонецЦикла;
|
|
8
Builder
08.04.15
✎
13:27
|
(7) Ой, блин, цикл забыл по подчиненным.
ДокРН.ВыбратьДокументы(НачДата,КонДата);
Пока ДокРН.ПолучитьДокумент()=1 Цикл
ДокПодч.ВыбратьПодчиненныеДокументы(,,ДокРН);
Пока ДокПодч.ПолучитьДокумент()=1
Если ДокПодч.Вид()="ПриходныйКассовый" Тогда
// Тут делай что надо
КонецЦикла;
КонецЕсли;
КонецЦикла;
|
|
9
сестрица аленушка
08.04.15
✎
13:32
|
создание таблицы и вывод шапки над перебором документов.
таб.вывестисекцию("мое сравнение") непосредственно в цикле
|
|
10
pavilion
08.04.15
✎
14:02
|
Спасибо большое, буду пробовать.
|
|
Глупец, лишенный способности посмеяться над собой вместе с другими, не сможет долго выносить программирование. Фредерик Брукс-младший