7.7 Отчет в 7.7

Тема в разделе "Конфигурирование на платформе "1С:Предприятие 7.7"", создана пользователем serg_buz, 2 мар 2018.

  1. TopicStarter Overlay
    serg_buz
    Offline

    serg_buz Опытный в 1С

    Регистрация:
    21 дек 2011
    Сообщения:
    123
    Симпатии:
    1
    Баллы:
    29
    Доброго времени, Уважаемые коллеги! Помогите пожалуйста создать отчет на платформе 7.7 (т.к. с ней я почти ни когда не работал. Задача такая - у документа Заказ поставщику есть реквизит Внутренний номер, а так же есть документ основание. Нужно сделать очень банально, нужно что бы по списку внутренних документов в отчет попадали документ основания этих Заказов. Я написал так -
    Код:
    Процедура Сформировать()
        Перем Запрос, ТекстЗапроса, Таб;
        //Создание объекта типа Запрос
        ВыбПроект = СоздатьОбъект("СписокЗначений");
        ВыбПроект.ДобавитьЗначение("УТД000000903");
        ВыбПроект.ДобавитьЗначение("УТД000004523");
        ВыбПроект.ДобавитьЗначение("OVB0223830");
        Запрос = СоздатьОбъект("Запрос");
        ТекстЗапроса =
        "//{{ЗАПРОС(Сформировать)
        |Период с ВыбНачПериода по ВыбКонПериода;
        |Проект = Документ.ЗаказПоставщику.НомерДокВходящий;
        |ТекущийДокумент = Документ.ЗаказПоставщику.ТекущийДокумент, Документ.ЗаказПоставщику.ТекущийДокумент.ДокОснование;
        |Группировка Проект без групп;
        |Группировка ТекущийДокумент;
        |Условие(Проект в ВыбПроект);
        |"//}}ЗАПРОС
        ;
        // Если ошибка в запросе, то выход из процедуры
        Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
            Возврат;
        КонецЕсли;
      
        // Подготовка к заполнению выходных форм данными запроса
        Таб = СоздатьОбъект("Таблица");
        Таб.ИсходнаяТаблица("Сформировать");
        // Заполнение полей "Заголовок"
        Таб.ВывестиСекцию("Заголовок");
        Состояние("Заполнение выходной таблицы...");
        Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);
        Пока Запрос.Группировка(1) = 1 Цикл
            // Заполнение полей Проект
            Таб.ВывестиСекцию("Проект");
            Пока Запрос.Группировка(2) = 1 Цикл
                // Заполнение полей ТекущийДокумент
                Таб.ВывестиСекцию("ТекущийДокумент");
            КонецЦикла;
        КонецЦикла;
        // Вывод заполненной формы
        Таб.ТолькоПросмотр(1);
        Таб.Показать("Сформировать", "");
    КонецПроцедуры
    
    Но мне ни чего не выходит в отчет... Хотя такие номера точно есть в базе. Помогите, пожалуйста
    Последнее редактирование: 2 мар 2018
  2. Хряк
    Offline

    Хряк Профессионал в 1С

    Регистрация:
    26 сен 2007
    Сообщения:
    1.556
    Симпатии:
    59
    Баллы:
    54
    убери для начала условие, выводит что-нибудь?
    попробуй
    |Проект = СокрЛП(Документ.ЗаказПоставщику.НомерДокВходящий);
  3. ТехБухПривет
    Offline

    ТехБухПривет Профессионал в 1С Команда форума

    Регистрация:
    25 июн 2013
    Сообщения:
    827
    Симпатии:
    89
    Баллы:
    54
    Не знаю как в оригинальных запросах 7.7,но в sql запросе к базе 7.7
    Документ.ЗаказПоставщику.ТекущийДокумент.ДокОснование не пройдет - максимум ОДНА ,чтоб её, точка....
    надо получить дальше - соединяй документы.. а тут ещё и через запятую два документа..
    З.Ы. с оригинальными 7.7 запросами вообще не работаю и даже их не понимаю, но мне кажется стоит посмотреть в этом направлении..
  4. Бухгалтерский угодник
    Offline

    Бухгалтерский угодник Администраторы Команда форума Администратор

    Регистрация:
    29 дек 2008
    Сообщения:
    22.628
    Симпатии:
    542
    Баллы:
    204
    правильно..
    1) отдели мухи от колет.... документ и основание отдельно для удобства группировки
    2) длина реквизита НомерДокВходящий скорее всего не совпадает со значением СЗ... Условие В не сработает....
  5. TopicStarter Overlay
    serg_buz
    Offline

    serg_buz Опытный в 1С

    Регистрация:
    21 дек 2011
    Сообщения:
    123
    Симпатии:
    1
    Баллы:
    29
    Как раз второе условие, по моему, и не срабатывает. Подскажите пожалуйста, какое условие прописать что бы заработало. У реквизита НомерДокВходящий длина = 50. СокрЛП не помогло...
  6. Бухгалтерский угодник
    Offline

    Бухгалтерский угодник Администраторы Команда форума Администратор

    Регистрация:
    29 дек 2008
    Сообщения:
    22.628
    Симпатии:
    542
    Баллы:
    204
    Стр="123456";
    Пока СтрДлина(Стр)<50 Цикл Стр=Стр=" "; КонецЦикла;
    ВыбПроект.ДобавитьЗначение(Стр);
  7. TopicStarter Overlay
    serg_buz
    Offline

    serg_buz Опытный в 1С

    Регистрация:
    21 дек 2011
    Сообщения:
    123
    Симпатии:
    1
    Баллы:
    29
    Помогло! Спасибо большое!
  8. TopicStarter Overlay
    serg_buz
    Offline

    serg_buz Опытный в 1С

    Регистрация:
    21 дек 2011
    Сообщения:
    123
    Симпатии:
    1
    Баллы:
    29
    Опять встал в ступр... Помогите еще разок пожалуйста. Структура подчиненности оказалась сложнее. Т.е. У меня есть номера входящих документов Поступлений ТМЦ. У документа ТМЦ есть реквизит Документ основание. Документом основания является Заказ Поставщику, и у заказа поставщика есть Основание - Заказ покупателя. Как запросом получить документ основание для документа основания? На текущий момент запрос выглядет так
    Код:
     "//{{ЗАПРОС(Сформировать)
        |Период с ВыбНачПериода по ВыбКонПериода;
        |Проект = Документ.ПоступлениеТМЦ.НомерДокВходящий;
        |ТекущийДокумент = Документ.ПоступлениеТМЦ.ТекущийДокумент.ДокОснование;
        |Группировка Проект без групп;
        |Группировка ТекущийДокумент;
        |Условие(Проект в ВыбПроект);
        |"//}}ЗАПРОС
    Как туда включить еще один реквизит. В 8.х это бы выглядело как то так
    Код:
    Документ.ПоступлениеТМЦ.ДокОснование.ДокОснование
  9. Бухгалтерский угодник
    Offline

    Бухгалтерский угодник Администраторы Команда форума Администратор

    Регистрация:
    29 дек 2008
    Сообщения:
    22.628
    Симпатии:
    542
    Баллы:
    204
    Также как написали... в вопросе
  10. TopicStarter Overlay
    serg_buz
    Offline

    serg_buz Опытный в 1С

    Регистрация:
    21 дек 2011
    Сообщения:
    123
    Симпатии:
    1
    Баллы:
    29
    Большое спасибо, закончил ) Торжественно клянусь подтянуть свои знания в 7.7, что бы не задавать больше таких дурацких вопросов )
  11. Бухгалтерский угодник
    Offline

    Бухгалтерский угодник Администраторы Команда форума Администратор

    Регистрация:
    29 дек 2008
    Сообщения:
    22.628
    Симпатии:
    542
    Баллы:
    204
    Не за что... Обращайтесь - поможем