Имя: Пароль:
1C
1С v8
Поиск документов по реквизитам
, ,
0 kotokent
 
28.01.14
07:37
В конфигурации 1С Управлений торговлей редакции 10.3 создать новую общую форму и разместить на ней реквизиты "Ответственный" и "Комментарий" по кнопке записать система ищет все документы с типом "реализация товаров и услуг" и если в документе значение реквизита "ответственный" или "комментарий" сообщать номер документа.
Я подумал что будет что то типо этого:
Процедура Записать(Команда)
    Документы.РеализацияТоваровУслуг.НайтиПоРеквизиту(Ответственный, "*");
    Документы.РеализацияТоваровУслуг.НайтиПоРеквизиту(Комментарий, "*");
    Сообщить(НомерДокумента);

КонецПроцедуры

Но что то никак. Помогите разобраться!!!
а и еще сделал форму: http://s020.radikal.ru/i721/1401/67/df00a0409849.png
250 Wobland
 
28.01.14
13:05
(248) Бого - наше всё
    while (!isSorted(r))
        randomShuffle(r);
251 kotokent
 
28.01.14
13:06
Теперь он мне выдает таблицу
я написал
Запрос.УстановитьПараметр("Ответственный",ЭтаФорма.Ответственный);

но без параметра ответственный
252 Любопытная
 
28.01.14
13:06
(249) ты что, просто скопировал эту строку из (230)?
253 kotokent
 
28.01.14
13:06
т.е всех выдает
254 catena
 
28.01.14
13:06
(251)Ты запросу не сказал, что ему фильтровать надо.
255 kotokent
 
28.01.14
13:07
(252) да я уже незнал как ее писать
256 Wobland
 
28.01.14
13:07
(251) вово. добавь условие про ответственного, только параметр не меняй пока
257 catena
 
28.01.14
13:08
(256)А это уже использование авторитета в личных целях.
258 Любопытная
 
28.01.14
13:08
(256) у него нет условий в запросе
259 Wobland
 
28.01.14
13:09
(257) ну не буду ж я сам элементы управления в запрос передавать. меня девушки засмеют
260 kotokent
 
28.01.14
13:10
(259) (258) (257) Так, теперь и фильтрует
261 Wobland
 
28.01.14
13:10
уже поздравлять?
262 kotokent
 
28.01.14
13:10
теперь про комментарий надо замутить
263 Любопытная
 
28.01.14
13:13
(259) исключительно чтобы тебя порадовать - ЭтаФорма.ПолеВвода - реквизит формы, а не элемент. А вот ЭтаФорма.ЭлементыФормы.ПолеВвода, вот это другое дело
264 Любопытная
 
28.01.14
13:13
(261) Неверные параметры в операции сравнения. Нельзя сравнивать поля
неограниченной длины и поля несовместимых типов.
РеализацияТоваровУслуг.Ответственный <<?>>= &Ответственный
265 Любопытная
 
28.01.14
13:14
+(264) Это если в параметр засунуть элемент формы)
266 kotokent
 
28.01.14
13:14
{ОбщаяФорма.Форма.Форма(24)}: Ошибка при вызове метода контекста (Выполнить)
    Результат = Запрос.Выполнить();
по причине:
{(9, 39)}: Неверные параметры в операции сравнения. Нельзя сравнивать поля
неограниченной длины и поля несовместимых типов.
И РеализацияТоваровУслуг.Комментарий <<?>>= &Комментарий
267 Wobland
 
28.01.14
13:14
(264) ай, спасибо, хорошо.
(263) действительно, не углядели
268 Wobland
 
28.01.14
13:14
(266) разрешаю поискать свой вопрос про 1024
269 Любопытная
 
28.01.14
13:15
(266) комментарий - строка неограниченной длины. Ее нельзя сравнивать просто так, надо привести к какой-нибудь длине. при помощи ВЫРАЗИТЬ
270 catena
 
28.01.14
13:15
(259)Он ругается на сравнение несовпадающих типов.
271 Любопытная
 
28.01.14
13:16
Вот так. Девушки сделали за Wobland всю грязную работу, чтобы его не засмеяли))
272 catena
 
28.01.14
13:16
(271)Умеет уговаривать, чертяка))
273 catena
 
28.01.14
13:22
В ходе обсуждения партизанского исправления очередного гoмнoкoда:
- Если ты правишь код, который написан через апож, означает ли это, что ты находишься в глубоком тылу противника?
(с)bash
274 kotokent
 
28.01.14
13:24
(269) ВЫРАЗИТЬ через конструктор построю
а то я скопировал то что мне писали в разных вариантах, а оно не работает
275 Wobland
 
28.01.14
13:26
когда уже закончится эта вакханалия?
276 kotokent
 
28.01.14
13:26
(275) подскажи
277 Wobland
 
28.01.14
13:27
(276) пиши выразить руками. а то мы эту кнопку в конструкторе ещё 30 постов искать будем
278 George Wheels
 
28.01.14
13:27
(275) Когда он созреет прочитать что-нибудь или сходить на курсы. Кажется никогда.
279 kotokent
 
28.01.14
13:30
(277)

ГДЕ
        |    РеализацияТоваровУслуг.Ответственный = &Ответственный
        |    ИЛИ (ВЫРАЗИТЬ(РеализацияТоваровУслуг.Комментарий КАК СТРОКА(1024))) = &Комментарий";
280 kotokent
 
28.01.14
13:30
не работает
281 Любопытная
 
28.01.14
13:31
(280) что не работает?
282 Wobland
 
28.01.14
13:31
(280) как узнал?
283 kotokent
 
28.01.14
13:33
(281) (282) ща
284 kotokent
 
28.01.14
13:35
(282) (281) он как будто не видит то что я туда ввожу, а когда славлю заместо ИЛИ - И то ищет вместе чтобы был такой пользователь и комментарий
285 Wobland
 
28.01.14
13:36
&Ответственный какого типа?
286 Любопытная
 
28.01.14
13:36
(284) значение параметра указал?
287 kotokent
 
28.01.14
13:37
(285) СправочникСсылка.Пользователи
288 kotokent
 
28.01.14
13:37
(286)

Макет = ПолучитьОбщийМакет("Результат");
    Запрос = Новый Запрос;
    Запрос.УстановитьПараметр("Ответственный",ЭтаФорма.Ответственный);
    Запрос.УстановитьПараметр("Комментарий",ЭтаФорма.Комментарий);
    Запрос.Текст =
        "ВЫБРАТЬ
        |    РеализацияТоваровУслуг.Номер,
        |    РеализацияТоваровУслуг.Комментарий,
        |    РеализацияТоваровУслуг.Ответственный
        |ИЗ
        |    Документ.РеализацияТоваровУслуг КАК РеализацияТоваровУслуг
        |ГДЕ
        |    РеализацияТоваровУслуг.Ответственный = &Ответственный
        |    ИЛИ (ВЫРАЗИТЬ(РеализацияТоваровУслуг.Комментарий КАК СТРОКА(1024))) = &Комментарий";

    Результат = Запрос.Выполнить();
289 Wobland
 
28.01.14
13:39
и что тебя убеждает в том, что это не работает?
290 kotokent
 
28.01.14
13:40
(289) погоди, я в ответтственный делал тип СправочникСсылка.Пользователи, а здесь какой тип надо поставить
291 kotokent
 
28.01.14
13:41
ДокументСсылка.РеализацияТоваровУслуг
292 Wobland
 
28.01.14
13:41
(290) такой же, какой и в документе
293 kotokent
 
28.01.14
13:43
(292) строка походу
294 Wobland
 
28.01.14
13:43
(293) не верю
295 kotokent
 
28.01.14
13:45
(294) все равно не канает
296 kotokent
 
28.01.14
13:46
или когда ставлю у него вообще отбора нет, он всех показывает
297 George Wheels
 
28.01.14
13:47
(296) А при этом в поле комментарий на форме что нибудь есть?
298 Wobland
 
28.01.14
13:47
(296) условие на пустой комментарий проходит?
299 kotokent
 
28.01.14
13:51
(298) (297) в есть что то при ИЛИ - ему все равно, он всех выдает
В поле нет ничего при И - он выдает только тех у кого ничего нету в комментарии и которых мы по ответственному выбрали(Иван - все покажет с иваном, но если мы не заполнили поле комментарий, значит все с иван только без комментариев)
300 Wobland
 
28.01.14
13:51
дриста!
301 George Wheels
 
28.01.14
13:52
Запрос.Текст =
        "ВЫБРАТЬ
        |    РеализацияТоваровУслуг.Номер,
        |    РеализацияТоваровУслуг.Комментарий,
        |    РеализацияТоваровУслуг.Ответственный
        |ИЗ
        |    Документ.РеализацияТоваровУслуг КАК РеализацияТоваровУслуг";

ТекстУсловия = "";

Если ЗначениеЗаполнено(ЭтаФорма.Ответственный) Тогда
  ТекстУсловия =
        "ГДЕ
        |    РеализацияТоваровУслуг.Ответственный = &Ответственный"
КонецЕсли;
Если ЗначениеЗаполнено(ЭтаФорма.Ответственный) Тогда
  Если ТекстУсловия = "" Тогда
  ТекстУсловия =
        "ГДЕ (ВЫРАЗИТЬ(РеализацияТоваровУслуг.Комментарий КАК СТРОКА(1024))) = &Комментарий";
  Иначе
  ТекстУсловия = ТекстУсловия +
        "    ИЛИ (ВЫРАЗИТЬ(РеализацияТоваровУслуг.Комментарий КАК СТРОКА(1024))) = &Комментарий";
  КонецЕсли;
КонецЕсли;

Запрос.Текст = Запрос.Текст + ТекстУсловия;
302 Wobland
 
28.01.14
13:52
(299) всех или всех с пустыми комментариями?
303 George Wheels
 
28.01.14
13:54
(301) Во втором если поторопился
Если ЗначениеЗаполнено(ЭтаФорма.Ответственный) Тогда

читать как

Если ЗначениеЗаполнено(ЭтаФорма.Комментарий) Тогда
304 kotokent
 
28.01.14
13:54
305 Wobland
 
28.01.14
13:56
(304) вижу справа равенство комментария тому, что введено на форме. на Анашкина уже плевать
306 Wobland
 
28.01.14
13:58
думаю, можно поздравлять, задача сделана. поздравлять?
307 George Wheels
 
28.01.14
14:00
(306) Сейчас будем разбирать, что за ТекстУсловия и доберёмся до 400.
308 kotokent
 
28.01.14
14:02
(305) (307) ну вы понимаете что он по комментарию не ищет
309 Wobland
 
28.01.14
14:03
(308) мы понимаем обратное
310 Wobland
 
28.01.14
14:04
(РеализацияТоваровУслуг.Ответственный = &Ответственный ИЛИ &Ответственный=ЗНАЧЕНИЕ(Справочник.Пользователи.ПустаяСсылка))
ИЛИ ((ВЫРАЗИТЬ(РеализацияТоваровУслуг.Комментарий КАК СТРОКА(1024))) = &Комментарий ИЛИ &Комментарий="")

не?
311 kotokent
 
28.01.14
14:09
(310) не
312 kotokent
 
28.01.14
14:13
(310) ковычку требует в конце
313 kotokent
 
28.01.14
14:13
(310) а когда ставлю то синтаксическая ошибка
314 Wobland
 
28.01.14
14:18
ИЛИ &Комментарий=""""
315 kotokent
 
28.01.14
14:19
(314) ща
316 kotokent
 
28.01.14
14:20
317 Wobland
 
28.01.14
14:21
мне не сложно и повторить: ИЛИ &Комментарий=""""
318 kotokent
 
28.01.14
14:22
(317) извини затупил
319 Wobland
 
28.01.14
14:22
ну? когда поздравлять?
320 MSII
 
28.01.14
14:23
(76) До двухсот, говоришь? :)
321 kotokent
 
28.01.14
14:23
(319) блин, теперь по ответственному не сортирует
322 George Wheels
 
28.01.14
14:23
(321) Не сортирует или не отбирает?
323 Wobland
 
28.01.14
14:24
(320) дотянули же! ;)
324 kotokent
 
28.01.14
14:25
(322) он тупо всех воводит кого бы не выбрать, но если любой комментарий написать то выводит Ответственного кого выбрали
325 kotokent
 
28.01.14
14:26
если в комментарий ничего не писать он всех выводит
326 Wobland
 
28.01.14
14:27
(324) а попробуй второе ИЛИ на И заменить
327 kotokent
 
28.01.14
14:28
(326) ща
328 George Wheels
 
28.01.14
14:29
(310) (РеализацияТоваровУслуг.Ответственный = &Ответственный ИЛИ &Ответственный=ЗНАЧЕНИЕ(Справочник.Пользователи.ПустаяСсылка))
И ((ВЫРАЗИТЬ(РеализацияТоваровУслуг.Комментарий КАК СТРОКА(1024))) = &Комментарий ИЛИ &Комментарий="")
329 ICWiner
 
28.01.14
14:30
(327) А что год рождения не заполнен? А то появилось пару мыслей...
330 kotokent
 
28.01.14
14:31
(326) (328) (320) (286) (273)

я понял получилось... Аплодисменты и авиации в вашу честь кто помоглал

))))))))))))))))))
331 kotokent
 
28.01.14
14:32
Процедура ЗаписатьНажатие(Элемент)
    ТабДок = Новый ТабличныйДокумент;
    //{{КОНСТРУКТОР_ЗАПРОСА_С_ОБРАБОТКОЙ_РЕЗУЛЬТАТА
    // Данный фрагмент построен конструктором.
    // При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!

    Макет = ПолучитьОбщийМакет("Результат");
    Запрос = Новый Запрос;
    Запрос.УстановитьПараметр("Ответственный",ЭтаФорма.Ответственный);
    Запрос.УстановитьПараметр("Комментарий",ЭтаФорма.Комментарий);
    Запрос.Текст =
        "ВЫБРАТЬ
        |    РеализацияТоваровУслуг.Номер,
        |    РеализацияТоваровУслуг.Комментарий,
        |    РеализацияТоваровУслуг.Ответственный
        |ИЗ
        |    Документ.РеализацияТоваровУслуг КАК РеализацияТоваровУслуг
        |ГДЕ
        |    (РеализацияТоваровУслуг.Ответственный = &Ответственный
        |    ИЛИ &Ответственный=ЗНАЧЕНИЕ(Справочник.Пользователи.ПустаяСсылка))
        |    И ((ВЫРАЗИТЬ(РеализацияТоваровУслуг.Комментарий КАК СТРОКА(1024))) = &Комментарий
        |    ИЛИ &Комментарий="""")" ;

    Результат = Запрос.Выполнить();

    ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");
    ОбластьПодвал = Макет.ПолучитьОбласть("Подвал");
    ОбластьШапкаТаблицы = Макет.ПолучитьОбласть("ШапкаТаблицы");
    ОбластьПодвалТаблицы = Макет.ПолучитьОбласть("ПодвалТаблицы");
    ОбластьДетальныхЗаписей = Макет.ПолучитьОбласть("Детали");

    ТабДок.Очистить();
    ТабДок.Вывести(ОбластьЗаголовок);
    ТабДок.Вывести(ОбластьШапкаТаблицы);

    ВыборкаДетальныеЗаписи = Результат.Выбрать();

    Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
        ОбластьДетальныхЗаписей.Параметры.Заполнить(ВыборкаДетальныеЗаписи);
        ТабДок.Вывести(ОбластьДетальныхЗаписей);
    КонецЦикла;
    
    

    ТабДок.Вывести(ОбластьПодвалТаблицы);
    ТабДок.Вывести(ОбластьПодвал);
    
    ТабДок.Показать();
    //}}КОНСТРУКТОР_ЗАПРОСА_С_ОБРАБОТКОЙ_РЕЗУЛЬТАТА
КонецПроцедуры
332 Kri26S
 
28.01.14
14:33
(330) Вот это счастье хвала богам и повелителям 1С.
333 kotokent
 
28.01.14
14:33
(332) вы крутые
334 George Wheels
 
28.01.14
14:33
Wobland поздравляй!
335 kotokent
 
28.01.14
14:34
я тоже скоро таким буду
(334) я его поздравил
336 kotokent
 
28.01.14
14:34
скоро еще спишумся
337 Kri26S
 
28.01.14
14:52
(336) Почитай какую-нить литературу например Радченко 1С:Предприятие 8.2. Практическое пособие разработчика для начала. Для более обширного знакомства можно "Профессиональная разработка в системе 1С:Предприятие 8", кинуть ссылки?
338 kotokent
 
28.01.14
14:55
(337) ну если не сложно!!
339 Kri26S
 
28.01.14
15:03
340 Wobland
 
28.01.14
15:34
АЛИЛУЙЯ!
поздравляю! я так долго к этому шёл
341 Kri26S
 
28.01.14
15:46
342 Wobland
 
28.01.14
15:53
(341) Том_1.7z - талмуд штоль?
343 Kri26S
 
28.01.14
16:03
344 Kri26S
 
28.01.14
16:03
(342) Ты в реале эту книгу видел?
345 Wobland
 
28.01.14
16:05
(344) на столе держу
346 Kri26S
 
28.01.14
16:08
(345)Тогда зачем спрашиваешь талмуд или нет, или я чего-то не понимаю.
347 Wobland
 
28.01.14
16:10
(346) чтобы понять, чего ты автору предлагаешь. талмуд - штука хорошая, но ТС не осилит
348 Kri26S
 
28.01.14
16:14
(347) Ну тут дело каждого силить или нет, может быть и осилит, не сразу, позже.
349 Kri26S
 
28.01.14
16:16
Лучше конечно начать с простой литературы.