Begin;

Initialize;
InitializeSession "DefaultDB";

# 表を作成
Command "create table T (N int, C ntext array [no limit], L language array [no limit])";

#insert
Command "insert into T (N, C, L) values (?, ?, ?)"
	[0, [textsjisfile "..\\..\\doc\\introduction.txt",
	     textsjisfile "..\\..\\doc\\Teihon.txt"],
	     ["ja", "en"]];

Command "select N from T where C like ? language ? and C like ? language ?"
["%の%", "ja", "%the%", "en"];
Command "select N from T where C like ? language ? or C like ? language ?"
["%の%", "ja", "%the%", "en"];
CreatePreparedCommand "sel" "select N from T where C like ? language ?";
PreparedCommand "sel" ["%の%", "ja"];
PreparedCommand "sel" ["%the%", "en"];
PreparedCommand "sel" ["%主権%", "ja"];
PreparedCommand "sel" ["%主権%", "en"];
PreparedCommand "sel" ["%EU%", "en"];
PreparedCommand "sel" ["%EU%", "ja"];
ErasePreparedCommand "sel";

# 索引作成
Command "create fulltext index FTIndex on T(C) language column L hint 'sectionized, delayed, inverted=(normalized=true, indexing=ngram, tokenizer=DUAL:JAP:ALL:1 @NORMRSCID:1 @UNARSCID:1)'";

Command "select N, sectionized(C) from T where C like ? language ? and C like ? language ?"
["%の%", "ja", "%the%", "en"];
Command "select N, sectionized(C) from T where C like ? language ? or C like ? language ?"
["%の%", "ja", "%the%", "en"];
CreatePreparedCommand "sel" "select N, sectionized(C) from T where C like ? language ?";
PreparedCommand "sel" ["%の%", "ja"];
PreparedCommand "sel" ["%the%", "en"];
PreparedCommand "sel" ["%主権%", "ja"];
PreparedCommand "sel" ["%主権%", "en"];
PreparedCommand "sel" ["%EU%", "en"];
PreparedCommand "sel" ["%EU%", "ja"];
ErasePreparedCommand "sel";

# verify
Command "verify index FTIndex cascade continue";

# 全文ファイルテスト用の表を消去
Command "drop table T";

TerminateSession;
Terminate;
End;

