Быстрый поиск документов по числовой составляющей номера.

20.07.06

Задачи пользователя - Поиск данных

+8 –
>
  • -
  • -
   Наверняка у многих бывает ситуация, когда нужно найти документ по номеру, но изобретательные пользователи (а иногда и программисты) вносят такое большое количество и разнообразие различных префиксов и прочего мусора, что на слух догадаться что такое, например, "АВ С5-1236пр" абсолютно невозможно.
   При использовании этой разработки необходимость "чтения мыслей" отпадает. Достаточно нажать кнопку поиск (или, при желании, функциональную клавишу), ввести "1236",и на экран выводится легкий для чтения список документов с этой числовой составляющей номера, сгрупированный по фирмам и видам документов. Список фильтруется по условиям отбора и периода журнала. Пара щелчков мышью, и нужный документ активизируется.
   При наличии FormEx.dll список выводится в виде дерева.
   Если в номере вообще нет цифр, то нужно искать номер 99999999 (восемь девяток).

Бесплатные

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Узнавайте о новых бесплатных решениях в нашей телеграм-группе Инфостарт БЕСПЛАТНО

Наименование Скачано Бесплатно
-
.zip 9,25Kb
450 Скачать бесплатно
ВНИМАНИЕ !!!!!!!!!!!!!!!!!!!!!!!
ВНИМАНИЕ !!!!!!!!!!!!!!!!!!!!!!!
ВНИМАНИЕ !!!!!!!!!!!!!!!!!!!!!!!
ВНИМАНИЕ !!!!!!!!!!!!!!!!!!!!!!!

При использовании УРБД документы, обработанные обработкой "Проставить номер для отбора.ert", будут считаться модифицированными и выгрузятся при следующем обмене.

При желании можно воспользоваться методом "РегистацияИзменений()" для исключения этого эффекта, но у меня это не реализовано.

!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

Вроде всё учел. Если чего-то не хватает - говорите.

Вступайте в нашу телеграмм-группу Инфостарт

+8 –

См. также

Универсальная обработка навигации по метаданным 1С:Предприятия 7.7 для пользователя (навигатор - органайзер открывает любые объекты в режиме 1С:Предприятия)

Поиск данных 1С v7.7 Абонемент ($m)

Если у пользователя конфигурации 1С 7.7 сложный интерфейс (или несколько интерфейсов), в котором проблематично найти нужный элемент метаданных - константу, справочник или документ (журнал документов), отчет или обработку, в этом случае поможет универсальный навигатор - органайзер по элементам метаданных, позволяющий легко найти нужный пользователю вид объекта метаданных в отсортированном по алфавитному порядку списке идентификаторов, синонимов или даже комментариев объектов метаданных. Данная универсальная обработка позволяет выбрать и открыть необходимую форму списка и форму элемента. Для доступа к нужному объекту в конфигурации у пользователя должно быть настроено разрешение в правах пользователя, а ссылка в его интерфейсе пользователя в конфигурации не обязательна.

1 стартмани

09.10.2021    5677    0    ksnik    1    

7
Поиск и исправление дублей штрихкодов для номенклатурных единиц измерения

Поиск данных Чистка данных Логистика, склад и ТМЦ Программист Оперативный учет 7.7 1С:Торговля и склад 7.7 Управленческий учет Абонемент ($m)

Простая и удобная обработка предназначена для поиска и исправления задублированных (повторяющихся) номенклатурных штрихкодов справочника Единицы. Также она даёт возможность посмотреть номенклатурные остатки. Полезна в случаях, когда номенклатура сопоставляется по штрихкоду с другими внешними источниками, а именно с модулем "Обмент ГИСМТ".

1 стартмани

19.11.2020    8842    1    Kuzya_brаtsk    4    

9
Вычленение из строки с набором букв и цифр номера сотового телефона

Поиск данных Программист 1С v7.7 1С v8.3 1C:Бухгалтерия 1C77 Россия Абонемент ($m)

Для 1с77 ТиС 9.2 отчет - выборка всех сотовых телефонов из справочника контрагенты для передачи в СМС рассылку. Для 1с8 Обработка с алгоритмом распознавания номера телефона из строки.

1 стартмани

20.03.2020    6178    5    AlexHelmer    1    

2
Поиск дублей в любом справочнике для 1С 7.7

Поиск данных 1С v7.7 1C77 Россия Абонемент ($m)

Внешняя обработка предназначена для поиска и подробного анализа дублей.

2 стартмани

29.04.2015    19739    56    Pirat-37    1    

0
Поиск автозапчастей по каталожному номеру

WEB-интеграция Поиск данных 1С v7.7 1С:Торговля и склад 7.7 Автомобили, автосервисы Абонемент ($m)

Внешняя обработка для поиска автозапчастей по каталожному номеру

1 стартмани

26.01.2015    15758    11    kras_71    6    

2
Поиск контрагентов по списку ИНН, переноса в группу и формирования оборотов

Поиск данных Бухгалтер Бухгалтерский учет 7.7 1С:Бухгалтерия 7.7 Абонемент ($m)

Поиск контрагентов по списку ИНН, переноса в группу и формирования оборотов по счетам с субконто "Контрагенты"

10 стартмани

16.08.2014    17759    2    GSoft    1    

1
Контекстный поиск в 7.7

Поиск данных Программист 1С v7.7 1C77 Бесплатно (free)

Процедура контекстного поиска в журнале документов.

18.04.2014    12523    cushe    3    

5
Быстрый умный поиск с выпадающим списком

Поиск данных Программист 1С v7.7 Абонемент ($m)

Обработка + консольная утилита (exe). Работает с использованием FormEx.dll (Алексей Фёдоров aka АЛьФ), strmatch (Ракунов Александр aka skorp) и 1sqlite (Александр Орефков). Выполняет быстрый нечеткий поиск по справочнику (по умолчанию - номенклатуры) с выводом наиболее похожих позиций в выпадающий список. Работает на 1с 7.7. Тестировалось на server 2003 в терминалах, в файловой БД. Предполагаемые достоинства: пример (более) «адекватного» (по меркам автора на данный момент) поведения поисковой строки (реализовано при помощи консольной утилиты, работающей через winapi – исходники прилагаются (писалось в lazarus)) и удобной навигации по списку, во время ввода. Является, скорее, примером для реализаций собственных адаптированных поисковых решений.

1 стартмани

30.12.2013    23005    34    Jill    13    

13
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. antonrost 656 20.07.06 12:58 Сейчас в теме
Если не у всех есть глРазложить:
//******************************************************************************
// глРазложить(Стр,Разделитель)
//
// Параметры:
// Стр - строка, которую необходимо разложить на подстроки.
// Параметр передается по значению.
// Разделитель - строка-разделитель, по умолчанию - запятая.
//
//
// Возвращаемое значение:
// список значений, элементы которого - подстроки
//
// Описание:
// Функция "расщепляет" строку на подстроки, используя заданный
// разделитель. Разделитель может иметь любую длину.
// Если в качестве разделителя задан пробел, рядом стоящие пробелы
// считаются одним разделителем, а ведущие и хвостовые пробелы параметра Стр
// игнорируются.
// Например,
// глРазложить(",ку,,,му", ",") возвратит список значений из пяти элементов,
// три из которых - пустые строки, а
// глРазложить(" ку му", " ") возвратит список значений из двух элементов
//
Функция глРазложить(Знач Стр, Разделитель = ",", нижрег = 0) Экспорт
СЗ = СоздатьОбъект("СписокЗначений");
Если ПустоеЗначение(Стр) = 1 Тогда
Возврат СЗ;
КонецЕсли;
Если Разделитель = " " Тогда
Стр = СокрЛП(Стр);
Пока 1=1 Цикл
Поз = Найти(Стр,Разделитель);
Если Поз=0 Тогда
Если НижРег = 1 Тогда
СЗ.ДобавитьЗначение(Нрег(Стр));
Иначе
СЗ.ДобавитьЗначение(Стр);
КонецЕсли;
Возврат СЗ;
КонецЕсли;
Если НижРег = 1 Тогда
СЗ.ДобавитьЗначение(Нрег(Лев(Стр,Поз-1)));
Иначе
СЗ.ДобавитьЗначение(Лев(Стр,Поз-1));
КонецЕсли;
Стр = СокрЛ(Сред(Стр,Поз));
КонецЦикла;
Иначе
ДлинаРазделителя = СтрДлина(Разделитель);
Пока 1=1 Цикл
Поз = Найти(Стр,Разделитель);
Если Поз=0 Тогда
Если НижРег = 1 Тогда
СЗ.ДобавитьЗначение(Нрег(Стр));
Иначе
СЗ.ДобавитьЗначение(Стр);
КонецЕсли;
Возврат СЗ;
КонецЕсли;
Если НижРег = 1 Тогда
СЗ.ДобавитьЗначение(Нрег(Лев(Стр,Поз-1)));
Иначе
СЗ.ДобавитьЗначение(Лев(Стр,Поз-1));
КонецЕсли;
Стр = Сред(Стр,Поз+ДлинаРазделителя);
КонецЦикла;
КонецЕсли;
КонецФункции // глРазложить
+ – Ответить
2. Abadonna 3976 20.07.06 16:55 Сейчас в теме
Ни фига себе глРазложить !!!
СтрЗаменить(Стр,Разделитель,РазделительСтрок);
Получаем многострочную строку - и делай с ней, что хошь!
Вроде покороче получается ;)
+ – Ответить
3. antonrost 656 20.07.06 16:59 Сейчас в теме
глРазложить() - функция из типовой "Торговли..." и "Бухгалтерии". Но почему-то не у всех есть.
+ – Ответить
4. Abadonna 3976 20.07.06 17:18 Сейчас в теме
Я над этой глРазложить() еще в 2000-м году смеялся.
Наверняка студент-недоучка писал. У них там ляпов много, например
справочник ДоговорА, нет такого слова в нормальном русском, ДоговорЫ
есть ;)
+ – Ответить
5. antonrost 656 20.07.06 17:24 Сейчас в теме
Со списком значений работать удобнее, чем с текстом, и если есть готовая процедура, то почему бы ею не воспользоваться ?
+ – Ответить
6. Abadonna 3976 20.07.06 17:32 Сейчас в теме
Смотри:
Стр=СтрЗаменить(Стр,","РазделительСтрок);
Для А=1 По СтрКоличествоСтрок(Стр) Цикл
Список.ДобавитьЗначение(СтрПолучитьСтроку(А));
КонецЦикла;
Вот тебе и список, но короче же!
+ – Ответить
7. Abadonna 3976 20.07.06 17:36 Сейчас в теме
Поторопился в наборе:
СтрЗаменить(Стр,",",РазделительСтрок)
СтрПолучитьСтроку(Стр,А)
так...
+ – Ответить
8. antonrost 656 20.07.06 17:38 Сейчас в теме
Можно еще короче: ИзСтрокиСРазделителями(), но если сидеть и оптимизировать каждую функцию в типовой, то на все остальное времени просто не хватит.
+ – Ответить
9. Abadonna 3976 20.07.06 17:52 Сейчас в теме
ИзСтрокиСРазделителями() годится только для запятых, а мой вариант - для чего хочешь, хоть по матершинному слову разделяй
+ – Ответить
10. antonrost 656 21.07.06 07:54 Сейчас в теме
Стр = """"+СтрЗаменить(Стр, "матерщинное слово", """,""")+"""";
СЗ.ИзСтрокиСРазделителями(Стр);
;-)
+ – Ответить
11. Abadonna 3976 21.07.06 13:55 Сейчас в теме
О чем спорим, не пойму!
Тем более не ТВОЮ же я функцию поругал.. ;)
+ – Ответить
12. antonrost 656 21.07.06 13:57 Сейчас в теме
В споре рождается истина... (с)
;)
+ – Ответить
13. пользователь 14.12.11 20:30
Сообщение было скрыто модератором.
...
Для отправки сообщения требуется регистрация/авторизация