Добрый вечер. Подскжите пж, а то я что-то торможу.
Мне нудно просмотреть вернее обработаь табличные части расходных накладных за заданый период. Подскажите пожалуйста, текст запроса...

что значит "обработаь" ?

ну просмотреть гурбо говоря - выдать на гора сколько товаров в накладной и на какую сумму

отчёт что ли ?

ну типа того

что за конфа ?

Бухгалтерия для Украины 7.7

запрос по документу умеешь делать? с группировками там, периодом и "Обрабатывать Проведенные"? Нет - ищем пример в инете или конфе

(7) попробую поискать... а может у кого есть под рукой что-то подобное?

(8): есть. в конфигураторе. называется "конструктор запросов".

(6) ОСВ по счету

(0) Docprint.ert

(10) Пардон, а что такое ОСВ по счету?

(12) это оборотно сальдовая ведомость по счёту. Может лучше "пригласить специалиста"?

(13) Может и так...

А вот объясните мне "неспециалисту"... Я взял готовую стандартную форму отчета из конфигурации. Сохранил ее внешним файлом и начал менять под требования задачи. Так вот вставляю код Таб = СоздатьОбъект("Таблица1"); причем таблица с именем "Таблица1" была сделана мною...
А 1с выдает: {\\SERVER12\VPKTEST$\EXTFORMS\РАСХОД0.ERT(104)}: Неудачная попытка создания объекта (Таблица1)
Здесь тоже специалист нужен?

(15) однозначно!!!!!

нет объекта "Таблица1". Есть объект "Таблица" у которого есть метод "ИсходнаяТаблица(ИмяТаблицы)"

(15) :))))))))))))))))))))

не, скорее к дохтуру

(18) к дохтуру нужно было 44 года назад матери ТС идти...

(19)    Таб = СоздатьОбъект("Таблица2"); - вот весь код и тут даже 50 лет назад к доктору обращайся не обращайся...

это клиника. автор - глянь типовые отчёты ЛЮБЫЕ как там объявляется объект "Таблица". ну ё маё. или это стёб?

(20) я дико извиняюсь. Что Вы 5 лет на форуме делали?

(21) ВОТ ИЗ КОНФЫ Таб = СоздатьОбъект("Таблица");

(23) Теперь мот, откроешь наконец пофигуратор, и поспрашаешь у мужика в кепке про методы объекта Таблица ?
Например, про метод ИсходнаяТаблица.

(24) ему сначала надо понять что такое объект, имхо

(23) читай 16 до просветления

авто ты кто по должности?

Мот он просто хитрит и у него уже есть свой класс Таблица2, который является наследником от Таблица и.. просто забыл его подключить ?
Загадка..

(0)
С ИТС uchoice-ом можно было сделать. Коли память мне не изменяет...
1CIts\EXE\EXTREPS\UNIPROCS
1CIts\EXE\EXTREPS\UNIREPS

(27) системный аръхитектор...

(30) ;)

они на свет ползут?

Всем спасибо! Я нконецто снялся с ручняка... :)

(32) Страна Ukrain - это муж Украины? Или брат? Или просто однофамилец?

(33) это англицизм переведённый с Украинского

даже у меня, известного "укра" не возникло мысли назвать страну мужским именем ;)

(34) просто "ты далек от мысли"© :-)))

(34) Во-первых, кому "известного"?

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

Как и писать про язык "Украинский" с большой буквы, кстати.

(36) "широко известного в узких кругах ограниченных людей"©
эх, в свое время тут такие укрогазосрачи зачетные были...

(36) забей, проехали. ЧЮ видать в камеру хранения ты сдал? бывает

(37) увы да уже....

И еще вопрос задаю Таб.ВывестиСекцию("Шапка"); ничего не выводит в екции шапка есть просто тестовое поле, почему не выводиться секция?

(40) а Таб.Показать() есть в коде?

(40) Таб.показать() отсутствует в коде.

эва как.. и вопрос и утверждение в одной минуте
:)

(41) я спрашиваю. Ты отвечаешь. Автор жжёт. идилия

тихо сам с собою... © пестня

(45) это не самое плохое качество. Иногда даже полезно ;)

(41) Таб.Показать("Расход","");

и чего? не показывает вообще? или показывает но пустой листик?

НИЧЕГО не показывает - остается окно формы ввода данных...

давай код от момента создания объекта до "показать"

больше кода

слова "отладчик" и "точка останова" знакомы?

Минутку

(49) и форма поди еще модальная, откуда Таб.Показать() делаешь, да ?
:()

Запр = СоздатьОбъект("Запрос");
   Таб = СоздатьОбъект("Таблица");
   Таб.ИсходнаяТаблица("Таблица");
ТекстЗапроса =
       "//{{ЗАПРОС(Абр)
       |Период с ВыбНачПериода по ВыбКонПериода;
       |Количество = Документ.РасходнаяНакладная.Количество;
       |Код = Документ.ПоступлениеТоваров.МестоХранения.Код;
       |Товар = Документ.ПоступлениеТоваров.Товар.Наименование;
       |Кол = Сумма(Количество);
       |Группировка Товар;
       |Условие(Код = КодСК);
       |"//}}ЗАПРОС
;
   Если Запр.Выполнить(ТекстЗапр)=0 Тогда
       Возврат;                          
   Иначе
       Сообщить("Запрос выполнен");
   КонецЕсли;
   
   Таб.ВывестиСекцию("Проба");
   Таб.ВывестиСекцию("Шапка");
   Таб.ВывестиСекцию("Тело");        
Таб.Опции(0,0,Таб.ВысотаСекции("Шапка"),0);
   Таб.ТолькоПросмотр(1);
   Таб.Защита(Константа.ФлагЗащитыТаблиц);
   Таб.Показать("Расход","");

(54) а может он процедурку печати забыл на кнопку навесить?

и никаких ошибок при нажатии на кнопку "сформировать" в режиме предприятия не пишет?

запрос шедеврален

никаких ошибок выполняет обработку и т.д....

думаю именно запрос не выполняется ;)

(58) запрос этот скорре для примера...

и получается возврат ;)

(61) убери его нах и пробуй

(60) Ну а почему не выводит секцию?

(63) Запрос убрать?

автор ты выиграл на тебе пример запроса к документам

   Запрос=СоздатьОбъект("Запрос");
   ТекстЗапроса="
   |Период с ДатаНачала по ДатаКонца;  
   |ОбрабатыватьДокументы Все;
   |Обрабатывать НеПомеченныеНаУдаление;
   |ТекДок=Документ.Заявка.ТекущийДокумент;  
   |НомерДок=Документ.Заявка.НомерДок;
   |Клиент=Документ.Заявка.Контрагент;    
   |Агент=Документ.Заявка.Агент;
   |Группировка Агент без групп;
   |Группировка ТекДок Упорядочить по ТекДок.НомерДок;  
   |Группировка НомерДок;
   |Группировка Клиент Без Групп;
   |Условие (Агент в СписокАгентов);
   |Без Итогов;";

(65) закоменть

(65) нет .... программу 1С вообще нафик с компа стереть

(64) потому как у тебя стоит ВОзврат если запрос не выполняется

(69) Сейчас проверю...

Сообщить("Запрос выполнен");  Сообщение показывается?

(71) откуда ты на запрос посмотри. как он может выполниться?

(71) Выполняется

Для начала, так:

//Таб.Опции(0,0,Таб.ВысотаСекции("Шапка"),0);

ибо это не верно, при таком порядке вывода секций .

ну и.. секция там выводится, ты ползунок то сдвинь вверх, ну или home нажми

(74) Вот что выводит в окне просмотра сообщений:
Период с ДатаС по ДатаПо;
Дата конца отчета установлена после границы последовательности документов (28.12.03 12:00:00)
Данные отчета могут быть неактульными!
Запрос выполнен
Сообщить(Запр.Кол);  
{\\SERVER12\VPKTEST$\EXTFORMS\РАСХОД0.ERT(251)}: Поле агрегатного объекта не обнаружено (Кол)

ну и это, "Шапка" - горизонтальная или вертикальная секция в макете ?
:)

(75) Ок

(76) зачет..

(77) секция горизонтальная

из-за ошибки у тебя выполнение кода остановлено, чего ты еще хочешь тогда ?
:))))))))))))))))

(81) где?

ВОТ

{\\SERVER12\VPKTEST$\EXTFORMS\РАСХОД0.ERT(251)}: Поле агрегатного объекта не обнаружено (Кол)

ты запрос закомментируешь или будешь и дальше издеваться?

мин. сейчес эту строчку Сооющить закомментирую

После тоьго, как строчку сообщить закомментирорвал в окне просмотра сообщений такой текст:
Период с ДатаС по ДатаПо;
Дата конца отчета установлена после границы последовательности документов (28.12.03 12:00:00)
Данные отчета могут быть неактульными!
Запрос выполнен
Таб.ВывестиСекцию(Шапка) - сделано!
Таб.ВывестиСекцию(Тело) - сделано!
а вот таблици и соответственно никаких секций не видно1

Сейчас закомментирую сам запрос и посмотрю...

(86) дай ВЕСЬ код с твоими "Сообщить"

ветка твитер напоминает ;)

вот это закоменть:

   Если Запр.Выполнить(ТекстЗапр)=0 Тогда
       Возврат;                          
   Иначе
       Сообщить("Запрос выполнен");
   КонецЕсли

(88) сейчас... Только там я начал комментировать лишнее...
Вот текст всей процйедуры:
Процедура Сформировать(Режим)          
   Если ДатаПо<ДатаС Тогда                  
       Сигнал();
       Предупреждение("Дата кінця періоду не може бути меншою за дату початку періоду!");
       Возврат;
   КонецЕсли;
   Если (сВидУчета.ПолучитьЗначение(сВидУчета.ТекущаяСтрока())="Бухгалтерия")
       и (выбФирма.Выбран()=0) Тогда
       Предупреждение("Выберите фирму!");
       Возврат;
   КонецЕсли;

   Запр = СоздатьОбъект("Запрос");
   Таб = СоздатьОбъект("Таблица");
   Таб.ИсходнаяТаблица("Таблица");
   //Таб = СоздатьОбъект("МояТ");
   ТекстЗапр = "";
   Заг = "";
   Заг1 = "";
   Заг2 = "";

   ПозицияОтчета = ДатаПо;

//    Если ДатаПо>=ПолучитьДатуТА() Тогда
//        ПозицияОтчета = ПолучитьПозициюТА();
//        ДатаПо = ПолучитьДатуТА();
//        ТекстЗапр = "
//        |Период с ДатаС ;";
//    Иначе
//        ТекстЗапр = "
//        |Период с ДатаС по ДатаПо;";
//    КонецЕсли;  
//    сообщить(ТекстЗапр);
//    ТекстЗапр = ТекстЗапр+"
//    |Фир = Регистр.Остатки.Фирма;
//    |Скл = Регистр.Остатки.Склад;
//    |ТМЦ = Регистр.Остатки.ТМЦ;";
//    Если (Режим = "Партия") или (Режим = "Документ") Тогда
//        ТекстЗапр = ТекстЗапр+"
//        |Пар = Регистр.Остатки.Партия;";
//    КонецЕсли;
//    Если (Режим = "Документ") Тогда
//        ТекстЗапр = ТекстЗапр+"
//        |Док = Регистр.Остатки.ТекущийДокумент;";
//    КонецЕсли;
//    ТекстЗапр = ТекстЗапр+"
//    |Кво = Регистр.Остатки.Кво;
//    |СуммаГрн = Регистр.Остатки.СуммаГрн;
//    |СуммаБезНДС = Регистр.Остатки.СуммаБезНДС;
//    |СуммаОсн = Регистр.Остатки.СуммаОсн;
//    |Наценка = Регистр.Остатки.Наценка;";
//    Если (сВидУчета.ПолучитьЗначение(сВидУчета.ТекущаяСтрока())="Бухгалтерия") Тогда
//        ТекстЗапр = ТекстЗапр+"
//        |Условие (Фир = выбФирма);";
//        Заг = Заг+"По бухгалтерским данным. По фирме "+выбФирма+". ";
//    Иначе
//        ТекстЗапр = ТекстЗапр+"
//        |Условие (Фир.Выбран()=0);";
//        Заг = Заг+"По торговым данным. ";
//    КонецЕсли;
//    ТекстЗапр = ТекстЗапр+"
//    |Условие (Скл в выбСклад);
//    |Условие (ТМЦ в выбТМЦ);
//    |Группировка Скл;
//    |Группировка ТМЦ;";
//
//    Если (Режим = "Партия") или (Режим = "Документ") Тогда
//        ТекстЗапр = ТекстЗапр+"
//        |Группировка Пар;";
//    КонецЕсли;
//    Если (Режим = "Документ") Тогда
//        ТекстЗапр = ТекстЗапр+"
//        |Группировка Док;";
//    КонецЕсли;
//    Если чГрн = 1 Тогда
//        ТекстЗапр = ТекстЗапр+"
//        |Функция КОСуммаГрн = КонОст(СуммаГрн);
//        |Функция НОСуммаГрн = НачОст(СуммаГрн);
//        |Функция ПСуммаГрн = Приход(СуммаГрн);
//        |Функция РСуммаГрн = Расход(СуммаГрн);";
//        Заг2 = Заг2+"Учетные суммы с НДС. ";
//    КонецЕсли;
//    Если чБезНДС = 1 Тогда
//        ТекстЗапр = ТекстЗапр+"
//        |Функция КОСуммаБезНДС = КонОст(СуммаБезНДС);
//        |Функция НОСуммаБезНДС = НачОст(СуммаБезНДС);
//        |Функция ПСуммаБезНДС = Приход(СуммаБезНДС);
//        |Функция РСуммаБезНДС = Расход(СуммаБезНДС);";
//        Заг2 = Заг2+"Учетные суммы без НДС. ";
//    КонецЕсли;
//    Если чОсн = 1 Тогда
//        ТекстЗапр = ТекстЗапр+"
//        |Функция КОСуммаОсн = КонОст(СуммаОсн);
//        |Функция НОСуммаОсн = НачОст(СуммаОсн);
//        |Функция ПСуммаОсн = Приход(СуммаОсн);
//        |Функция РСуммаОсн = Расход(СуммаОсн);";
//        Заг2 = Заг2+"Учетные суммы в основной валюте. ";
//    КонецЕсли;
//    Если чПрод = 1 Тогда
//        ТекстЗапр = ТекстЗапр+"
//        |Функция КОСуммаГрн = КонОст(СуммаГрн);
//        |Функция НОСуммаГрн = НачОст(СуммаГрн);
//        |Функция ПСуммаГрн = Приход(СуммаГрн);
//        |Функция РСуммаГрн = Расход(СуммаГрн);
//        |Функция КОНаценка = КонОст(Наценка);
//        |Функция НОНаценка = НачОст(Наценка);
//        |Функция ПНаценка = Приход(Наценка);
//        |Функция РНаценка = Расход(Наценка);";
//        Заг2 = Заг2+"Продажные суммы в гривнях. ";
//    КонецЕсли;
//    ТекстЗапр = ТекстЗапр+"
//    |Функция КОКво = КонОст(Кво);
//    |Функция НОКво = НачОст(Кво);
//    |Функция ПКво = Приход(Кво);
//    |Функция РКво = Расход(Кво);";
//
//    Если Последовательность.СписаниеПартий.Проверить(ПозицияОтчета) = 0 Тогда
//        Сообщить("Дата конца отчета установлена после границы последовательности документов ("+Последовательность.СписаниеПартий.Получить()+")");
//        Сообщить("Данные отчета могут быть неактульными!","!");
//    КонецЕсли;
//
//    Заг = Заг + "Граница последовательности документов:"+Последовательность.СписаниеПартий.Получить()+". ";
//    Если ВыбТМЦ.РазмерСписка()=0 Тогда
//        Заг1 = Заг1 + "По всем ТМЦ. ";
//    Иначе
//        Заг1 = Заг1 + "По ТМЦ из списка: "+ВыбТМЦ.ВСтрокуСРазделителями()+". ";
//    КонецЕсли;
//    Если ВыбСклад.Выбран() = 0 Тогда
//        Заг1 = Заг1 + "По всем складам.";
//    Иначе
//        Заг1 = Заг1 + "По складу " + ВыбСклад.Наименование+".";
//    КонецЕсли;
//
//    ТекстЗапроса =
//        "//{{ЗАПРОС(Абр)
//        ||Период с ДатаНачала по ДатаКонца;  
//    |ОбрабатыватьДокументы Все;
//    |Обрабатывать НеПомеченныеНаУдаление;
//    |ТекДок=Документ.Заявка.ТекущийДокумент;  
//    |НомерДок=Документ.Заявка.НомерДок;
//    |Клиент=Документ.Заявка.Контрагент;    
//    |Агент=Документ.Заявка.Агент;
//    |Группировка Агент без групп;
//    |Группировка ТекДок Упорядочить по ТекДок.НомерДок;  
//    |Группировка НомерДок;
//    |Группировка Клиент Без Групп;
//    |Условие (Агент в СписокАгентов);
//    |Без Итогов;";
;
   Если Запр.Выполнить(ТекстЗапр)=0 Тогда
       Возврат;                          
   Иначе
       Сообщить("Запрос выполнен");
   КонецЕсли;
   
   Таб.ВывестиСекцию("Проба");
   Таб.ВывестиСекцию("Шапка");
   Таб.ВывестиСекцию("Тело");                      
   //Сообщить(Запр.Кол);  
   ////Сообщить(Кол);
   //Сообщить(Запр.Код);  
   ////Сообщить(Код);
   //Сообщить(Запр.Количество);  
   ////Сообщить(Количество);
   Сообщить("Таб.ВывестиСекцию(Шапка) - сделано!");
   Сообщить("Таб.ВывестиСекцию(Тело) - сделано!");
   Возврат;

   Пока Запр.Группировка("Скл")=1 Цикл
       Таб.ВывестиСекцию("Скл");
       Пока Запр.Группировка("ТМЦ")=1 Цикл
           Если Запр.ТМЦ.Выбран()=0 Тогда
               Продолжить;
           КонецЕсли;
           Если Запр.ТМЦ.ЭтоГруппа()=1 Тогда
               Обработать("ГруппаТМЦ");
           Иначе
               Обработать("ТМЦ");
           КонецЕсли;
           Если (Режим = "Партия") или (Режим = "Документ") Тогда
               Пока Запр.Группировка("Пар")=1 Цикл
                   Обработать("Пар");
                   Если Режим = "Документ" Тогда
                       ВнКво=Запр.НОКво;
                       Пока Запр.Группировка("Док")=1 Цикл
                           Если Запр.Док.Выбран()=0 Тогда
                               Продолжить;
                           КонецЕсли;
                           Обработать("Док");
                       КонецЦикла;
                   КонецЕсли;
               КонецЦикла;
           КонецЕсли;
       КонецЦикла;
   КонецЦикла;
   Обработать("Итог");

   Таб.Опции(0,0,Таб.ВысотаСекции("Шапка"),0);
   Таб.ТолькоПросмотр(1);
   Таб.Защита(Константа.ФлагЗащитыТаблиц);
   Таб.Показать("Расход","");
КонецПроцедуры

охтыжёбтвоюмать!

а это что за изврат?
.
   |Группировка ТекДок Упорядочить по ТекДок.НомерДок;  
   |Группировка НомерДок;

о майн год!!!!!!

(92) во во

После того как закомментировыал выполнение запроса в окне сооб\щений:
Таб.ВывестиСекцию(Шапка) - сделано!
Таб.ВывестиСекцию(Тело) - сделано!
а сама таблца - НЕТУ

ты нормальной? это что?

Сообщить("Таб.ВывестиСекцию(Шапка) - сделано!");
   Сообщить("Таб.ВывестиСекцию(Тело) - сделано!");
   Возврат;

блин.....

а это что?
.
       Пока Запр.Группировка("ТМЦ")=1 Цикл
           Если Запр.ТМЦ.Выбран()=0 Тогда
               Продолжить;
           КонецЕсли;

Оставь ТОЛЬКО это


   Таб = СоздатьОбъект("Таблица");
   Таб.ИсходнаяТаблица("Таблица");

   
   Таб.ВывестиСекцию("Проба");
   Таб.ВывестиСекцию("Шапка");
   Таб.ВывестиСекцию("Тело");        

   Таб.ТолькоПросмотр(1);
   Таб.Защита(Константа.ФлагЗащитыТаблиц);
   Таб.Показать("Расход","");

как-то я с трудом могу представить себе группировку с невыбранным значением...

(93) (99) - это все из конфигурации

(99) да пох. самого запроса нет вообще....

похоже чел методом научного тыка программирует. Ткнёт палкой и смотрит чего будет

Сообщить("Таб.ВывестиСекцию(Тело) - сделано!");
   Возврат;

п......ц

(104) ну хоть какашками не кидается "вы тупые" как архитектор систем

автора срочно отдать в рарус, на воспитание!
:)

(106) может не надо? а то ещё один архитектор британский получится...

Рпебята, я понимаю что явно где-то туплю, но вот где не могу понять...
Оставил такой код:
Процедура Сформировать(Режим)          
   Если ДатаПо<ДатаС Тогда                  
       Сигнал();
       Предупреждение("Дата кінця періоду не може бути меншою за дату початку періоду!");
       Возврат;
   КонецЕсли;
   Если (сВидУчета.ПолучитьЗначение(сВидУчета.ТекущаяСтрока())="Бухгалтерия")
       и (выбФирма.Выбран()=0) Тогда
       Предупреждение("Выберите фирму!");
       Возврат;
   КонецЕсли;

   Запр = СоздатьОбъект("Запрос");
   Таб = СоздатьОбъект("Таблица");
   Таб.ИсходнаяТаблица("Проба");
   ТекстЗапр = "";
   Заг = "";
   Заг1 = "";
   Заг2 = "";

   ПозицияОтчета = ДатаПо;


   ТекстЗапроса = "Период с ДатаС по ДатаПо;
                   |ОбрабатыватьДокументы Проведенные;
                   |Количество = Документ.РасходнаяНакладная.Кво;
                   |Функция Колво = Сумма(Количество);";
   Если Запр.Выполнить(ТекстЗапроса)=0 Тогда
       Возврат;                          
   Иначе
       Сообщить("Запрос выполнен");
   КонецЕсли;
   
   Таб.ВывестиСекцию("Шапка");
                       
   Сообщить("Таб.ВывестиСекцию(Шапка) - сделано!");
   Сообщить("Таб.ВывестиСекцию(Тело) - сделано!");
   Возврат;

   Таб.Опции(0,0,Таб.ВысотаСекции("Шапка"),0);
   Таб.ТолькоПросмотр(1);
   Таб.Защита(Константа.ФлагЗащитыТаблиц);
   Таб.Показать("Расход","");
КонецПроцедуры
В окне сообщений выдает:
Запрос выполнен
Таб.ВывестиСекцию(Шапка) - сделано!
Таб.ВывестиСекцию(Тело) - сделано!
а таблицы НЕТ!!!

(108)утомил

  Сообщить("Таб.ВывестиСекцию(Шапка) - сделано!");
   Сообщить("Таб.ВывестиСекцию(Тело) - сделано!");
 //  Возврат;
//Чего, совсем не видно ?!!!!!!!!!!!!!!

ВОЗВРАТ УБЕРИ В СТРОКАХ

Сообщить("Таб.ВывестиСекцию(Шапка) - сделано!");
   Сообщить("Таб.ВывестиСекцию(Тело) - сделано!");
   Возврат;

про Возврат ещё не сказали?

(110) Спасибо!

(109) видишь - ты мелко написал - он не увидел - спасибо мне сказал ;)

(102) я понимаю, откуда это.
я спрашиваю - это что?
.
а это что за изврат?
.
   |Группировка ТекДок Упорядочить по ТекДок.НомерДок;  
   |Группировка НомерДок;
.
какой смысл группировать по документам (то понятно!) а внутри ОДНОГО документа ГРУППИРОВАТЬ по номерам ОДНОГО документа..????

(114) вот ты реально щас придираешься :)
это уже так, мелочь

(115) Скажи "нет" быдлокоду! ;-)

(116) по сравнению с тем, что у бананана хоть что-то забанананило, группировки - мелочь...

(114) Єто все из конфигурации...

(118) http://www.poraduy.ru/item/?id=3902

(118) я так понял - конфигурация не твоя и ты здесь не при чем? ;-0

Ребята, еще такой вопрос вот помню что номер документа зарезервированое поле в 1с, но как оно называется?

(120) а конфигурации - точно - не моя

Док.НомерДок
Док.ДатаДок
- предопределенные реквизиты

(121) и СП у тебя украли....

Еще вопрос в запросе мне надо обрабатывать/просматривать два вида документов: РасходнаяНакладная и НакладнаяН.
Как это описать в запросе?

(125) может, ваша контора найдет таки себе программиста?

(126) Ищут пока. А даный запрос нужно сделать сйчас... :(

Фирма=Документ.Расходная.Фирма,Документ.Приходная.Фирма

и так по всем совпадающим реквизитам

(128) Спасибо сейчас попробую

(128) выдает: Количество = Документ.РасходнаяНакладная.Кво,  <<?>> , Документ.РасходнаяНакладнаяН.Кво;

Т.е. не понимает 1С такого синтаксиса пишет: "Неожиданное выражение2

(128) Извините, я лишнюю запятую поставил - потому и неожиданное выражение :)

Ребяята. еще вопрос (что-то я сэтим концом света торможу):
код простой :
   ЕдИ = Создатьобъект("Справочник.ЕдИзм");
   ЕдИ.НайтиПоНаименованию("бл.");
Пишу Сообщить(": "+ЕдИ.Наименование);
в окне вывода только :
что здесь не так?

(133) не знаток незалежних конфигураций, но опасаюсь, что 1)единицы подчинены номенклатуре 2)у единиц нет наименования

(133) не нашел он ничего

+ единицы, скорее всего подчиненный справочник..и там есть один ньюанс
:)

(136) Точно! Спасибо.

Все-равно что-то у меня не получается. Справочник ЕДИзм в данном случае подчинен справочнику ТМЦ. Нужно сначала выбрать ээлемент ТМЦ потом указать что он Владелец для ЕдИзм или как?

код дал такой:
ЕдИ = Создатьобъект("Справочник.ЕдИзм");
   ЕдИ.ИспользоватьВладельца("ТМЦ");
   ЕдИ.НайтиПоНаименованию("бл.");
   ЕдИ.ВыбратьЭлементы();
   Сообщить("Текущий: "+ЕдИ.ТекущийЭлемент());
   Сообщить(": "+ЕдИ.Наименование);
Выдает после текста в кавычках пустое место :(

т.е. в окне сообщений:
Текущий:
:

(139) про ньюанс (136) ты так и не понял

(141) А какой ньюанс?

(141) "он не острый, он хронический..."©

(143) Смешно.. Просто видно ты сам того ньюанса не знаешь...

(144) читай (134), и СП

(145) У едениц есть наименования! Это точно, ну и они подчененцы номенклатуре

>>>ЕдИ.ИспользоватьВладельца("ТМЦ");

вот тут лажа, в НайтиПоНаименованию есть еще параметры

(147) пля, я даж не обратил внимание, чего он надолбил в параметре ИспользоватьВладельца....

НРаписал так:
ЕдИ = Создатьобъект("Справочник.ЕдИзм");
   ЕдИ.ИспользоватьВладельца("ТМЦ");
   ЕдИ.НайтиПоНаименованию("бл.", 1);
   ЕдИ.ВыбратьЭлементы();
   Сообщить("Текущий: "+ЕдИ.ТекущийЭлемент());
   Сообщить(": "+ЕдИ.Наименование);
В олкне сообщений:
Текущий:
:
Текущий:
:

(148) ага, дальше еще интереснее.. выборка после поиска
:)

клиника, куле...

Всю ветку не осилила.
Вот это что?!

Запр = СоздатьОбъект("Запрос");
...
ТекстЗапроса=
...
Если Запр.Выполнить(ТекстЗапр)=0 Тогда
Что содержит переменная "ТекстЗапр"?

(150)(151)Вы подсказать можете?

(152) ТекстЗапроса = " Период с ДатаС по ДатаПо;
                   |ОбрабатыватьДокументы Проведенные;
                   |Един = Документ.РасходнаяНакладная.Ед, Документ.РасходнаяНакладнаяН.Ед;
                   |Количество = Документ.РасходнаяНакладная.Кво, Документ.РасходнаяНакладнаяН.Кво;
                   |ТМЦ = Документ.РасходнаяНакладная.ТМЦ, Документ.РасходнаяНакладнаяН.ТМЦ;
                   |Функция Колво = Сумма(Количество);
                   |Группировка Документ;
                   |Группировка ТМЦ;
                   |Условие (ТМЦ в выбТМЦ);";

(153) дык спрои у мужика в кепке в пофигураторе, про параметры в применяемых тобой методов, например, в

ИспользоватьВладельца

+ НайтиПоНаименованию,  и если че, она возвращает результат, найден, али нет..

(156) Возвращает 0

т.е. не найден

(149) Конфы нет под рукой чтобы проверить.
Есть версия, что нужно "НайтиПоРеквизиту()".
А "ВыбратьЭлементы" зачем?

(157) см (155)

ЕдИ.ИспользоватьВладельца() - в качестве параметра совать элемент справочника номенклатура.
А реквизита БазоваяЕдиница или т.п. в товарах нет?

(161) есть такое реквезит но он в данном случае НЕ нужен мне надо для данного товара узнать коэффициент для еденицы измерения ящ.
Сепйчас такой код:
ЕдИ = Создатьобъект("Справочник.ЕдИзм");
   ТМЦ = Создатьобъект("Справочник.ТМЦ");
   Найд=ТМЦ.НайтиПоНаименованию("товар кг", 1);
   ТМЦ.ВыбратьЭлементы();
   ЕдИ.ИспользоватьВладельца(ТМЦ);
   Найд2=ЕдИ.НайтиПоНаименованию("бл.", 1);
   Сообщить("ТМЦ="+Найд+" "+Найд2);
Выдает:
ТМЦ=0 0

:-))

т.е. выходит она зараза и ТМЦ "товар кг" не находит. а такое ТМЦ есть!

У вас в конфе есть товар с наименованием "товар кг"? :)))

что-то это напоминает известную задачку про обезъян за пишущей машинкой...

(165) Есть такой товр, когда задал тМЦ найти по коду ТМЦ он нашел

(166) Да ладно, забавно :).
Найд=ТМЦ.НайтиПоНаименованию("товар кг", 1);
единица зачем?

(167) Попробуй с ноликом поискать :).
Либо таки неправильно указано наименование.

т.е. по колдду ТМЦ нашел (по наименованию не хочет... явно какай то ощибка в наименовании) по коду тмц находит, а подчинеый этому ТМЦ ЕдИзм не находит

Да не сцы, к новому году найдется всё..

(171) а что, у них конца света не будет, чтоль?

и если че, в ИспользоватьВладельца у тебя опять лажа, даже если ТМЦ и найден будет.

Попробуй ТМЦ.НайтиПоНаименованию("товар кг", 0);
Если возвращает 0 - стопудово нет ТМЦ с таким наименованием :).

(172) не, у них ребрендеринг, заменят наименование на АД и всё..

(173) и перед Использовать владельца - тоже лажа...

(171) Наименование ТМЦ скопировал - все-равно не нходит1, Наименование ТМЦ скопировал из справочника!

(173) Пущай найдет вначале.
(162)
ВыбратьЭлементы - убрать нафиг.
ЕдИ.ИспользоватьВладельца(ТМЦ); - точный синтаксис не помню, возможно нужно ТМЦ.ТекущийЭлемент().

ЕдИ.ИспользоватьВладельца(ТМЦ.ТекущийЭлемент);
выдает:
Поле агрегатного объекта не обнаружено (ТекущийЭлемент)

(177) С ноликом находит? Частенько по коду ищет, а по наименованию приходится принудительно нолик указывать, ну или родителя явно указывать.

(179) Скобки в конце забыл :). Это функция.

(180) А как родителя явно указать?

(181) ДА! Поставилскобки - работает нормально

(182) Если знаешь в какой папке находится товар, то ТМЦ.ИспользоватьРодителя(Родитель).
Но Родитель должен быть типа Справочник.ТМЦ и его тоже нужно вначале найти :))).

(184) Нашел единицу измерения? :)

Короче забей и ищи по коду :).
С ноликом должен найти, исключение - несколько товаров с одинаковым наименованием.

(182) В какой папке - не знаю

(187) Тогда точно забей на родителя и ищи по коду. Долго объяснять.
Кстати, с ноликом ищет по наименованию? Мне просто интересно :).

по коду ищет задал
Найд=ТМЦ.НайтиПоНаименованию("товар кг", 0);
тоже ищет - все нормально!
Всем - спасибо

Кстати, а нафига искать по наименованию, если ты запросом данные получаешь?

(190) не знаю как начал искать - так и ищу :)

А код откуда?

код , в данном слдучае я сам посмотрел в справочнике

Опять неонятка какая-то (там в коде есть служебные ссообщить):
ЕдИ = Создатьобъект("Справочник.ЕдИзм");
   ТМЦ = Создатьобъект("Справочник.ТМЦ");
   Тов = Запр.ТМЦ;
   Сообщить("Тов="+Тов);
   Найд=ТМЦ.НайтиПоНаименованию(Тов, 0);
   Сообщить(Найд+" Товар="+Тов);
выдает:
0
Тов=товар ящ
0
Тов=товар шт
0
Тов=товар ящ
0
Тов=товар кг
0
Тов=товар шт
0
Тов=товар шт
0
Тов=товар кг
0
Тов=товар ящ
0
Тов=товар ящ
0

Как такое может быть?

и в чем здесь глюк?

а если в запросе пытаюсь определить код ТМЦ
(|Кд = Документ.РасходнаяНакладная.Код, Документ.РасходнаяНакладнаяН.Код;) - выдает:
Если Запр.Выполнить(ТекстЗапроса)=0 Тогда
{\\SERVER12\VPKTEST$\EXTFORMS\РАС.ERT(93)}: Кд = Документ.РасходнаяНакладная. <<?>> Код, Документ.РасходнаяНакладнаяН.Код;
Запрос[4] : Неверно заданный путь 'Код'
Если Запр.Выполнить(ТекстЗапроса)=0 Тогда
{\\SERVER12\VPKTEST$\EXTFORMS\РАС.ERT(93)}: Кд = Документ.РасходнаяНакладная.Код, Документ.РасходнаяНакладнаяН. <<?>> Код;
Запрос[4] : Неверно заданный путь 'Код'
Если Запр.Выполнить(ТекстЗапроса)=0 Тогда
{\\SERVER12\VPKTEST$\EXTFORMS\РАС.ERT(93)}: Условие (ТМЦ в выбТМЦ <<?>> );
Запрос[9] : Ошибка в условии

Что за фигня? Вроде все правильно пишщу.... или я где-то не так что делаю?

ЛЮДИ!!! Подскажите, я уже почти сошел с ума!!!

зачем искать найденную сылку по представлению справочника ?
Не, тут не лечат

(0) Читай справку в синтаксис-помощнике, нахрапом не осилишь. Сам время убьешь и людей замучаешь насмерть)

для просмотра накладных - 3и страницы это много

походу в 2-х ветках

Непонятка с запросом...

Всех отвечающих с чем-то имеют


С Новым по майскому календарю)

(203) Если учесть, что вопрос пор подчиненные справочники он задавал еще в 2008 году, а про запрос по документам - в 2008, 2009 и 2011, то либо это суперталантливый тролль, либо супертупой гиперидиот

(204) так далеко в сучность я не залезал
я вижу 2-е ветки, где явно троллят
) привет модераторам и волшебнику)

(194) Поиск в цикле.
(197) Не код, а НомерДок. Код - у справочника.