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

Возможно, так:
|Условие(Найти(СерийныйНомер,СерийныйНомерС)>0);

продам СП , дорого (с) группировка где ?

(2) ТС решает вопрос "в принципе", а бантики - потом :)

(1) а если нужно не подстроку а только точное совпадение.

.->?

(3) тоесть группировку он обходить собрался просто так )))), как бы пусть ))))

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

    Если (ПоСерийномуНомеру = 1) Тогда
        ТекстЗапроса = ТекстЗапроса + "
        |Условие (СерНомер в СерийныйНомер);";
    КонецЕсли;

чот Масяня седня выспалась не стой ноги, доброта прям и пышет ))))

(8) Не говори... Сама в шоке...

(4) Если нужно точное совпадение - тогда условие в сабже

Только надо учесть длину серийного номера и того, что ищется.
Ибо - пробелы - тоже символ.. А не пустота

Все перепробывал, ни один из вариантов не взлетел )
    ТекстЗапроса =
            "//{{ЗАПРОС(Сформировать)
            |Без итогов;
            |СерийныйНомер = Документ.ДокументСервиса.СерийныйНомер;
            |Картридж = Документ.ДокументСервиса.Картридж;
            |ТекущийДокумент = Документ.ДокументСервиса.ТекущийДокумент;
            |Группировка СерийныйНомер;
            |Условие(СерийныйНомер в СерийныйНомерС);
            |"//}}ЗАПРОС
            ;

(11) Не всё перепробовал...
День только начался...

(10) можно еще извратиться ))) выгрузить в ТЗ и свернуть и поиском, а вдруг там несколько )))))

У нас уже вечер, хэлп

(13) Я - за распечатку и ручками, ручками...

может вывод и перебор результатов запроса у меня неправильный. Гляньте, а ...

(14) не поверишь, в 7-ке есть конструктор запросов )_))
(15) это не наш метод, только методом пузырька, только хардкор )))

(11) Условие не перепутал? Что где ищешь то?
Может так надо:
|Условие(СерийныйНомерС в СерийныйНомер);

(16)            
            |СерийныйНомер = Документ.ДокументСервиса.СерийныйНомер;
            |Картридж = Документ.ДокументСервиса.Картридж;
            |ТекущийДокумент = Документ.ДокументСервиса.ТекущийДокумент;
            |Группировка ТекущийДокумент;
            |Группировка Картридж;
            |Условие(СерийныйНомер в СерийныйНомерС);
            |"//}}ЗАПРОС

Доброта уже на исходе....

(18) огонь )))))) батарея

(20) Агония.....

(19) "Спокойно, Ипполит, спокойно.." © :)

picom - СерийныйНомер - это что? строка? эл-т Справочника?

(22) строкааааа

(0)
|Условие(ВРЕГ(СокрЛП(СерийныйНомер)) = ВРЕГ(СокрЛП(СерийныйНомерС)));

(22) Тепленьку давайте!

навеяло, словарь эллочки людоедки )))))
http://forum.chuguev.net/index.php?showtopic=7536

(19) МасьАнька - твоё Условие(СерийныйНомер в СерийныйНомерС); - это для СпискаЗначений. А у него - это строка

(24) да, точно.

(24) ТС похоже вхождение ищет, так что условие В нормуль.

(27) С чего ты взял?

(23) тогда уж если пишешь В - то приравнивай к списку значений что ле

(30) для строки это условие тоже работает.

(28) Нет. Это 7-ка, "В" имеет ограниченное применение

(31) Сомнительно.. при случае - проверю

я вообще слабо представляю как можно обходить группировку без оной ))) ну если в начало смотреть

(33) Проверь - не поверишь :)

(33) Trust me :)

(23) Шурик! Вы - комсомолец? (С)

(29) - см. (30)

(36) Ladno :)

хеее, в 7-ке вообще много прикольного, особенно если писАть в запросе БЕЗ ИТОГОВ ())))

(38) Проверь. Сначала.

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

    // Подготовка к заполнению выходных форм данными запроса
    Таб = СоздатьОбъект("Таблица");
    Таб.ИсходнаяТаблица("Сформировать");
    // Заполнение полей "Заголовок"
    Таб.ВывестиСекцию("Заголовок");
    Состояние("Заполнение выходной таблицы...");
    Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);
    Пока Запрос.Группировка(1) = 1 Цикл
        // Заполнение полей ПоступлениеТоваров
        Таб.ВывестиСекцию("ПоступлениеТоваров");
    КонецЦикла;
    // Вывод заполненной формы
    Таб.ТолькоПросмотр(1);
    Таб.Показать("Сформировать", "");
КонецПроцедуры


ниработаит ))))))))))))

только по точному совпадению ))) так что это не В, это =

(41) и не лень тебе ? Это никогда для строк не работало

(41) Мда.. Глянул в СП:
В качестве включающего подмножества логического оператора принадлежности (второй параметр после слова ''в'') может выступать как простое значение, так и список значений.

(40) По-моему, в (41) убедительный пример :)

дата(4875) = 33.90.-69
уже кстати обсуждали такие приколы )

(44)  это если типизация совпадает, а так ))) фигвам, и кстати тоже не всегда , в случае с ТЗ вообще фантастика бывает

(45) Мужской шовинизм. В (7) работающий пример. Серийник - строка (реквизит ТЧ док-та). В обработке вводится в поле ввода (строка). :Р

(41)
   |Условие(НомерДок в ВыбНомерДок);
Будет искать номер документа в строке "1"
Найдет?

|Условие(ВыбНомерДок в СокрЛП(НомерДок));

(49) :)) точно :)

+52    |Условие(ВыбНомерДок в НомерДок);

(53) Так не сработает, в (51) рабочий код!
|Условие(ВыбНомерДок в СокрЛП(НомерДок));

(49) не будет 1 искать !!!!, от слова совсем, будет искать равно 1 ))) тоисть не вхождение - напесал жи в (42)

(55) Будет, только что проверил, нашел все номера в которых есть "1".

(55) В твоем условии - ошибка, подстрока поиска должна быть до "В"

нда , видимо там где Масянька выспалась )))))) кто то точно не выспался

(58) Просто вы шовинисты :)

(59) Мы хорошие..

(60)Хорошие шовинисты, кто ж спорит.

Пятничное собрание староверов-любителей 7.7 :)

А ТС-то где?

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

(63) А зачем нам ТС? Нам ТС не нужен :)

(60) Все хорошие... Когда спят зубами к стенке (С) :)))))

(62) иногда от осьмушки- чесслово, подташнивает )))

(64) Помочь погуглить? :))))

(65) Согласна.
Продолжаем разговор :)

(67) Не-на-чи-най.....

(70) ага , дохтур, а я умру ?
- обязательно
а от чего ?
- вскрытие покажет (с) ))))
ЗЫ мне больше нравится в восьмерке непередаваемый интерфейс ))) особенно если нужно нарисовать для тачпада с соразмерностями и рельефностью ))))

(71) А мне в восьмерке не нравится контекстная подсказка... Бесит, блин...

(71)
Вскрытие показало что больной умер от вскрытия (с)

.....
а тем временем код так и не работает )

(74) Опа, ТС нашелся...
Ладно, держи условие.
|Условие(СерийныйНомерС в СокрЛП(СерийныйНомер));

Не работает и без условия
может проблема в (16) ?

(76) Выкладывай последний вариант

(76) Ну, таки выложи полностью Процедуру, что не работает

Во.. хором выступление.. :)

(76) 1. Полный код (который не работает).
2. Документ.ДокументСервиса.СерийныйНомер - тип, длина.
3. СерийныйНомерС - тип, длина.

Похоже мы теряем ТС ....

(81) Интубируем? :))))))

(82) Фууу, как некрасиво....
ТС пусть сам тогда интубирует....

Вот без условия тоже ничего не находит
Серийный номер = строка на 20
            СерийныйНомерС = "123" ;
            Запрос = СоздатьОбъект("Запрос");
            ТекстЗапроса =
            "//{{ЗАПРОС(Сформировать)
            |Без итогов;
            |СерийныйНомер = Документ.ДокументСервиса.СерийныйНомер;
            |Картридж = Документ.ДокументСервиса.Картридж;
            |ТекущийДокумент = Документ.ДокументСервиса.ТекущийДокумент;
            |Группировка Картридж без Групп;
//            |Условие(СерийныйНомерС в СокрЛП(СерийныйНомер));
            |"//}}ЗАПРОС
            ;
            Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
                Возврат;
            КонецЕсли;
            Пока Запрос.Группировка() = 1 Цикл
            Сообщить("КЖ "+Запрос.Картридж); //ничего не выводит и не заходит
            КонецЦикла;

(84) Шурик! Вы комсомолец? (С)
Тебе очень трудно вставить:
            |ТекущийДокумент = Документ.ДокументСервиса.ТекущийДокумент;
            |Группировка ТекущийДокумент;
            |Группировка Картридж без Групп;
?

(84)
Нет проведенных документов ДокументСервиса

(85)(86)
пробывал, ничего вообще не выводит, даже без условия
            ТекстЗапроса =
            "//{{ЗАПРОС(Сформировать)  
            |ОбрабатыватьДокументы все;
            |СерийныйНомер2 = Документ.ДокументСервиса.СерийныйНомер;
            |Картридж2 = Документ.ДокументСервиса.Картридж;
            |ТекущийДокумент2 = Документ.ДокументСервиса.ТекущийДокумент;
            |Группировка ТекущийДокумент2;
            |Группировка Картридж2 без Групп;
//            |Условие(СерийныйНомерС в СокрЛП(СерийныйНомер));
            |"//}}ЗАПРОС
            ;      
            
            Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
                Возврат;
            КонецЕсли;
            
            Пока Запрос.Группировка() = 1 Цикл
                // Заполнение полей Сформировать
                Сообщить("КЖ "+Запрос.Картридж2);
            КонецЦикла;

Пля, нет же условия по датам.
  |Период с ВыбНачПериода по ВыбКонПериода;

(87) Теперь это:
            Пока Запрос.Группировка() = 1 Цикл
                // Заполнение полей Сформировать

                Сообщить("КЖ "+Запрос.Картридж2);
            КонецЦикла;
меняешь на это:
            Пока Запрос.Группировка("ТекущийДокумент2") = 1 Цикл
            Пока Запрос.Группировка("Картридж2") = 1 Цикл
                // Заполнение полей Сформировать

                Сообщить("КЖ "+Запрос.Картридж2);
            КонецЦикла;
            КонецЦикла;
И да - (88)?!

(88) спасибо, все заработало

(90) Фухххх...
Мы спасли его :)

(90) Пилять... В (7) написано же...
(88) И куда смотрел раньше?

(92) Ну так сразу не интересно же.
А поговорить ? :)

(92) Есть градация - читатель/писатель :)

Расходимся или доведем до 100?

(93) (94) Я же сказала - шовинисты :))))

(96) А я сказал - неправда ваша, мы - хорошие :)

Спасибо всем, победа.
Про период проглядел, каюсь, хотя мастер запросов спрашивал все документы или по периоду )

Держите :)

100 и заканчиваем :)