|
v7: Номенклатура без RLP 1C 7.7 | ☑ | ||
---|---|---|---|---|
0
nvhost
29.05.14
✎
22:05
|
1C 7.7 комплексная в некоторой номеклатуре присутсвтует слово "RLP"
Например так "Зажигалка 0.25 мл синия RLP" есть код который выбирает все Реализации, как его отредоктирвоать чтоб выбирал только те реализации где нет номенклатуры с RLP??ПОмиогите!! Док = Создатьобъект("Документ.Реализация"); Док.ВыбратьДокументы(Дата1, Дата2); Пока Док.ПолучитьДокумент() = 1 Цикл Если Док.Фирма = Фирма Тогда Иначе Продолжить; КонецЕсли; Если Откл=1 тогда Если (Лев(""+Док.НомерДок,1)="У") тогда ПРОДОЛЖИТЬ; конецесли; конецесли; СФ = глНайтиСчетФактуру(Док.ТекущийДокумент(),"СчетФактураВыданный"); Если СФ = "" Тогда Сообщить(глПредставлениеДокумента(Док.ТекущийДокумент()) + " нет счета-фактуры"); КонецЕсли; КонецЦикла; |
|||
1
KUBIK
29.05.14
✎
22:26
|
(0) Тут запрос треба
|
|||
2
Мигало
29.05.14
✎
22:26
|
Функция НетРЛП(ТекДок)
Результат = 0; ТекДок.ВыбратьСтроки(); Пока ТекДок.ПолучитьСТроку() = 1 Цикл Если Найти(НРЕг(ТекДок.Номенулатура.Наименование), "RLP) > 0 Тогда Результат = 1; Прервать; КонецЕсли; КонецЦИкла; Возврат Результат; КОнецФункции ---- || ---- Док = Создатьобъект("Документ.Реализация"); Док.ВыбратьДокументы(Дата1, Дата2); Пока Док.ПолучитьДокумент() = 1 Цикл Если Док.Фирма = Фирма Тогда Иначе Продолжить; КонецЕсли; Если Откл=1 тогда Если (Лев(""+Док.НомерДок,1)="У") тогда ПРОДОЛЖИТЬ; конецесли; конецесли; Если НетРЛП(ТекДок) <> 1 Тогда СФ = глНайтиСчетФактуру(Док.ТекущийДокумент(),"СчетФактураВыданный"); Если СФ = "" Тогда Сообщить(глПредставлениеДокумента(Док.ТекущийДокумент()) + " нет счета-фактуры"); КонецЕсли; КонецЕсли; КонецЦикла; |
|||
3
Мигало
29.05.14
✎
22:27
|
Если НетРЛП(ТекДок) <> 1 Тогда
Заменить на Если НетРЛП(Док.ТекущийДокумент()) <> 1 Тогда |
|||
4
KUBIK
29.05.14
✎
22:30
|
(0) + пол смени в учетке и фотку выложи
|
|||
5
Мигало
29.05.14
✎
22:30
|
(4) Она страшная
|
|||
6
KUBIK
29.05.14
✎
22:32
|
(5) типа: с бородой? :)))
|
|||
7
Мигало
29.05.14
✎
22:37
|
(6) Понятия не имею, я ее никогда не видел
|
|||
8
nvhost
29.05.14
✎
23:01
|
Ребят чего то не работает есть строка
ТекДок.Номенклатура.Наименование = "Донской табак светлый (500*1) МРЦ 44,00 RLP" а он не дает результат = 1 |
|||
9
Мигало
29.05.14
✎
23:02
|
P - аглицкая или русская ?
|
|||
10
Шурик71
29.05.14
✎
23:03
|
нрег на врег в функции поменяй :)
|
|||
11
Мигало
29.05.14
✎
23:04
|
Йоптоваюмать )))) Ошибся
|
|||
12
nvhost
29.05.14
✎
23:21
|
ага посмотрел я справочник по синтаксису уже, поменял на "rlp"
пасибо вам огромное ребят все работает! |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |