ＣＯＢＯＬで日本語のあいまい検索は出来ますか
1:ＣＯＢＯＬで日本語のあいまい検索は出来ますか
ぴぴ 03/31 16:05
ＲＤＢＱの検索で例えば会社名に「東」が入っているデータを検索する時は、!”東”!とすると「東京株式会社」、「株式会社東京」などが表示されます。

ＣＯＢＯＬのプログラムで同じ事が出来ますか？

１件データを読んで、会社名をワークに落として、

OCCURS 30 PIC N(01)などと定義して、ひとつひとつ比較するしかないのでしょうか？

ＳＥＬＥＣＴ命令では、あいまい検索が出来ないと思ったのですが、出来る方法はありますか？


2:Re:ＣＯＢＯＬで日本語のあいまい検索は出来ますか
温泉好きのうさぎ 03/31 17:25
INSPECT �U�堰�





INSPECT aaaa TALLYING nnnn FOR ALL xxxx.


aaaa :
nnnn : �y�� ()
xxxx :


aaaa xxxx PIC X ��PIC N ��
xxxx �� NC
���y


aaaa xxxx ��

()
INSPECT aaaa(bb:cc) TALLYING nnnn FOR ALL xxxx(1:yy).

()
aaaa bb �V cc �Vxxxx yy �V��


3:Re:ＣＯＢＯＬで日本語のあいまい検索は出来ますか
ぴぴ 04/01 11:17
温泉好きのうさぎ様、ありがとうございます。
２０年間、ＣＯＢＯＬの仕事をしていますが、
ＩＮＳＰＥＣＴ命令を使ったことがありませんでした。
これから、試してみたいと思います。

4:Re:ＣＯＢＯＬで日本語のあいまい検索は出来ますか
 04/01 19:57
http://otd10.jbbs.livedoor.jp/286441/bbs_reply?reply=521
あたりが参考になりませんか？


今回、SELECT命令に関して、
私も以下のコーディングで試して、
うまくできましたので、紹介します。


**** 部分一致 !”東”!
     SELECT  NCFTKC
         WHERE ( FTKC-KTNM   CHARACTERS NC”東” )
         COUNT IN WG-KAKUNIN .

**** 前方一致 ”東”!
     SELECT  NCFTKC
         WHERE ( FTKC-KTNM   CHARACTERS LEADING NC”東” )
         COUNT IN WG-KAKUNIN .

**** 後方一致 !”東”
     SELECT  NCFTKC
         WHERE ( FTKC-KTNM   CHARACTERS TRAILING NC”東” )
         COUNT IN WG-KAKUNIN .
     MOVE    NC”東”      TO      WG-N1 -----PIC N(01)


**** 部分一致 !”東”!
     SELECT  NCFTKC
         WHERE ( FTKC-KTNM   CHARACTERS WG-N1 )
         COUNT IN WG-KAKUNIN .


**** 前方一致 ”東”!
     SELECT  NCFTKC
         WHERE ( FTKC-KTNM   CHARACTERS LEADING WG-N1 )
         COUNT IN WG-KAKUNIN .


**** 後方一致 !”東”
     SELECT  NCFTKC
         WHERE ( FTKC-KTNM   CHARACTERS TRAILING WG-N1 )
         COUNT IN WG-KAKUNIN .


（注）検索文字列の桁数が複数ある場合（例:”東”,”東京”など）
　　　は、上記のコーディングの例ではWG-N1､WG-N2などを
　　　複数用意する必要があるかも。


参考になれば幸いです。




5:Re:ＣＯＢＯＬで日本語のあいまい検索は出来ますか
ぴぴ 04/02 13:52




**** !!

SELECT NCFTKC

WHERE ( FTKC-KTNM CHARACTERS WG-N1 )

COUNT IN WG-KAKUNIN .





������






前次1-新書板
BluesBB ©Sting_Band