Firebird - Select, hledání bez ohledu na diakritiku

[Petr P.]

Potřeboval bych hledat v Selectu v podmínce Where bez ohledu na diakritiku (a  je jako á apod). Jde to nějak ?

[pf1957]

Potřeboval bych hledat v Selectu v podmínce Where bez ohledu na diakritiku (a  je jako á apod). Jde to nějak ?

My na to mame nadefinovanou UDF funkci na strane Firebirdu a analogickou funkci na strane klienta a obe pouzijeme na prislusnych strana vyrazu ve where klauzuli.

[vandrovnik]

Také UDF funkce a tatáž funkce na klientovi. Navíc pokud je prohledávaných záznamů hodně (miliony apod.), míváme kromě např. pole Prijmeni jeste indexované pole Prijmeni2, do kterého v triggeru ukládáme tu hodnotu bez diakritiky a pro vyhledávání se pak používá to pole Prijmeni2.

[Zmiják]

Od FireBirdu v. 2.1 existuje přímé řešení bez potřeby UDF, speciálních sloupečků apod.

Hledejte "WIN_CZ_CI_AI" zde:
https://firebirdsql.org/file/documentation/reference_manuals/fblangref25-en/html/fblangref25-appx06-charsets.html#fblangref25-appx06-tbl-charsets

U těch sloupečků, kde to chcete využít je třeba definovat znakovou sadu a řazení.
Můžete to udělat např. pomocí domény a tu potom použít při CREATE TABLE.
CREATE DOMAIN   D_JMENO         VARCHAR(50)   CHARACTER SET WIN1250 COLLATE WIN_CZ_CI_AI;
CREATE DOMAIN   D_PRIJMENI      VARCHAR(70)   CHARACTER SET WIN1250 COLLATE WIN_CZ_CI_AI;

[vandrovnik]

Od FireBirdu v. 2.1 existuje přímé řešení bez potřeby UDF, speciálních sloupečků apod.

To se mi bohužel nějak nepovedlo přimět ke správnému řazení písmene "ch" - vždycky mi ho to dávalo pod "c", zatímco uživatelé očekávali, že ho najdou až za "h".

[Petr P.]

Ta UDF funkce je někde dostupná ?

[pf1957]

Ta UDF funkce je někde dostupná ?

Ta nase neni, protoze k ni nevlastnime dispozicni prava, ale je to funkce v DLL, ktera se da napsat v Delphi viz treba https://delphi.cz/post/64-bitove-UDF-v-RAD-Studio-XE2-pro-FireBird.aspx a v ni vyprasit nejakou funkci napr. ANSI kodovou stranku Win1250, v principu jako je tahle neoptimalizovana:

Kód: Delphi [Vybrat]

1. function CzOff(CStr: PChar): PChar; cdecl; export;
2.  const
3.    CZ='ÁÄÂÉĚËÉÍÝÓÔÖŮÚÜŘŤŠŽĽĹŇČĎ';
4.    US='AAAEEEEIYOOOUUURTSZLLNCD';
5.  var
6.    i,j:integer;  
7. begin
8.   CharUpperBuff(CStr, length(CStr));
9.   for i:=0 to StrLen(CStr)-1 do
10.   begin
11.     for j:=1 to length(CZ) do
12.       if CStr[i]=CZ[j] then
13.       begin
14.         CStr[i]:=US[j];
15.         break;
16.       end;
17.    end;  
18.   end;
19.   Result:=CStr;
20.  end;
21.  

[pf1957]

Jeste jsem zapomel poslat tu deklaraci UDF na strane SQL:

Kód: SQL [Vybrat]

1. DECLARE EXTERNAL FUNCTION CZOFF
2.     CSTRING(255)
3.     RETURNS CSTRING(255)
4.     ENTRY_POINT 'CzOff' MODULE_NAME 'xxxUDF.DLL';
5.  

[Petr P.]

Díky

[Jirka]

Ahoj
Pouzivam toto :   

function VyhledejPodleNazvu(AText: String): integer;
    var
    Razeni,  ASql:string;
    begin
     if CheckboxDiakritika.Checked then
      Razeni:='COLLATE WIN_CZ_CI_AI' else Razeni:='';


     if  (Length(Trim(AText))>0) then
     ASQL:=Format('SELECT * FROM  VIEW_SKLAD_KARTA_KMEN WHERE (NAZEV_SKLPOL %s) CONTAINING %s ',[Razeni, (PridejUvozovkyAVrat(AText))])
    else
     ASQL:=Format('SELECT * FROM  VIEW_SKLAD_KARTA_KMEN ',[ ]);


    end;

[Petr P.]

Díky, tohle mi připadá jako lepší řešení než UDF.  Myslel jsem si před tím, že  COLLATE WIN_CZ_CI_A musí být nastavené u jednotlivých údajů v datábázi.

[pepak]

Oprav mě, jestli se mýlím, ale podle mě když COLLATION zadáš za běhu, tak se nebudou moci použít indexy.

[Jirka]

IMHO
Pole kde vyhledávím podle diakritiky (např. název produktu) nejsou ve většině případů stejně zaindexované (alespoň u mě :-) )

[Palino]

Pozdravujem vsetkych,

len pre zaujimavost aj ked takto neskoro: firebird umoznuje definovat indexy typu  COMPUTED BY definovane vyrazom napr. pre znakovu sadu WIN1250:

CREATE INDEX ADRESAR_IDX8 ON ADRESAR COMPUTED BY (nazov collate PXW_SLOV);
CREATE INDEX ADRESAR_IDX9 ON ADRESAR COMPUTED BY (nazov collate WIN_CZ_CI_AI);

ak zadate podmienku v tvare zadaneho vyrazu pouzije prislusny index :

select * from adresar a where a.nazov collate pxw_slov = 'peter' collate pxw_slov
select * from  adresar a where a.nazov collate WIN_CZ_CI_AI = 'peter' collate WIN_CZ_CI_AI


taktiez dobre vyuzitelne na hladanie napr cisel ktore maju byt pri porovnani orezanena zaciatocne nuly:

CREATE INDEX ADRESAR_IDX7 ON ADRESAR COMPUTED BY (trim (leading '0' from (upper(replace(ICO,' ', '')))));

select * from adresar a where trim (leading '0' from (upper(replace(a. ICO,' ', ''))))  = trim (leading '0' from (upper(replace(:ICO,' ', ''))))