sekosЕсть строки типа
ez548-sek1
UZ53310SK20
БД с серийниками некого оборудования. Серийники могут быть любыми. Данных порядка 70 млн. Пользователь вводит запросв и надо что бы ему вывелось всё оборудование серийники которых содержат данный запрос. Запрос минимум 2 символа.
Вот такая вот задача.
ну вот, скажем, решение для M-системы:
^table(idx)=серийник
^index(pos,smb,idx)=
pos - позиция символа в серийнике
smb - символ
idx - индекс, под которым записан серийник в массиве ^table
алгоритм поиска:
1.
2.
3.
4.
5.
6.
7.
set smb=$extract(Query) ;берем первый символ
for q= 1 : 1 : 65 -$length(Query) do ;
. set idx="" for set idx=$order(^index(q,smb,idx)) quit:idx="" do ;
.. set cnt= 0
.. for t= 2 : 1 :$length(Query) s smb2=$extract(Query,t) if $data(^index(q+t- 1 ,smb2,idx)) set cnt=cnt+ 1
.. if cnt'=($length(Query)- 1 ) quit
.. write !,^table(idx)
последовательно перемещаем первый символ запроса по позициям 1-(65-длина запроса), выбирая все соответствующие этому индексы.
далее в цикле до конца запроса проверяем наличие этого индекса под следующим символом запроса в позиции следующей за проверяемой.
совпадение всех условий дает нам нужный индекс
несколько громоздко, зато достаточно эффективно
для 70 млн. записей по 64 байта все это удовольствие займет ~60Gb
С уважением. Сергей
