Имя: Пароль:
1C
1C 7.7
v7: отчет по регистрам, с КО и наименованием доков делающих движуху
,
0 Kapystin
 
02.09.15
13:04
Привет народ.
есть документы ПРИХОД и РАСХОД КПК, нужно сделать отчет по движению этих доков. В регистр Остатков вносится информация Агент и КПК,Кол-во(1).

условие получить отчет который предоставит АГЕНТА, КПК и док.

делаю две группировки по АГЕНТУ И ТекДоку.

если в запросе указываю только КО, то не получаю наименование доков.
при добавлении ПРИХОДА И РАСХОДА, получаю наименование, НО и все ДОКИ.

Знаний не хватает, подскажите.
1 Kapystin
 
02.09.15
15:34
наверное хрень написал)
2 vicof
 
02.09.15
15:35
не наверное, а точно. Давай еще раз, чо надо, чо сделал, чо не работает?
3 Kapystin
 
02.09.15
15:44
есть 2 дока приход и расход кпк
они делают движуху по регистру Остатки.

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


Запрос = СоздатьОбъект("Запрос");

    Дата1 = '01.01.10';
    Дата2 = ПолучитьТА();
    ТекстЗапроса = "
    |Период С Дата1 По Дата2;
    |КПК                 =     Регистр.ОстаткиКПК.КПК;
    |Количество         =     Регистр.ОстаткиКПК.ОстаткиКоличество;
    |Агент                 =     Регистр.ОстаткиКПК.Агент;
    |ТекДок             =     Регистр.ОстаткиКПК.ТекущийДокумент;

    |Функция КО =             КонОст(Количество);
    
    |Группировка Агент;
    |Группировка ТекДок;
    |
    |
    |";
    
    Если Запрос.Выполнить(ТекстЗапроса)=0 Тогда
        Возврат;
    КонецЕсли;
    
  ТЗ = СоздатьОбъект("ТаблицаЗначений");
  Запрос.Выгрузить(ТЗ, 1);
  ТЗ.ВыбратьСтроку();


как вывести еще и текущий документ?
4 Kapystin
 
02.09.15
15:45
Добавить Функцию Приход и Расход?
5 palpetrovich
 
02.09.15
15:46
КонОст - какое такое движение тут ??? :)
6 Kapystin
 
03.09.15
09:21
Утро вечера мудренее)
попробую по другому.
Подскажите как в запросе получить название документа?

Запрос = СоздатьОбъект("Запрос");

    Дата1 = '01.01.10';
    Дата2 = ПолучитьТА();
    ТекстЗапроса = "
    |Период С Дата1 По Дата2;
    |КПК                 =     Регистр.ОстаткиКПК.КПК;
    |Количество         =     Регистр.ОстаткиКПК.ОстаткиКоличество;
    |Агент                 =     Регистр.ОстаткиКПК.Агент;
    |ТекДок             =     Регистр.ОстаткиКПК.ТекущийДокумент;

    |Функция КО =             КонОст(Количество);
    
    |Группировка Агент;
    |Группировка ТекДок;
    |
    |
    |";
    
    Если Запрос.Выполнить(ТекстЗапроса)=0 Тогда
        Возврат;
    КонецЕсли;
    
  ТЗ = СоздатьОбъект("ТаблицаЗначений");
  Запрос.Выгрузить(ТЗ, 1);
  ТЗ.ВыбратьСтроку();
7 Kapystin
 
03.09.15
09:22
этот код выдает пустое значение ТекДок.
8 Смотрящий
 
03.09.15
09:23
|Функция КО =             КонОст(Количество);
9 Смотрящий
 
03.09.15
09:23
Под
|Функция КО =             КонОст(Количество);
добавь
|Функция КО =             КонОст(Количество);
|Функция Приход =             Приход(Количество);
|Функция Расход =             Расход(Количество);
10 Kapystin
 
03.09.15
09:28
Тогда отчет будет выдавать все доки, а мне нужны только КО.
11 Смотрящий
 
03.09.15
09:29
Допищи
|Условие(ТекДок.Вид() = "<ТвойВидДокументаКакПрописанВКонфигураторе>");