ブログトップ 記事一覧 ログイン 無料ブログ開設

babydaemonsの日記 このページをアンテナに追加 RSSフィード

2008-02-26

■[SQLServer][T-SQL]SQLServerでの文字列の半角文字から全角文字への変換

データの全角半角変換、、 − Database Expert − ＠ITでじゃんぬねっとさんが言及している関数を実装してみました。

＃この掲示板の議論で、じゃんぬねっとさんはtypoしてますねｗ

＃やはり、人間はtypoから逃れられないのかｗ

※超重要：私もtypoしてました。コメントでご指摘いただきました。ありがとうございます。m(_ _)m　レビューせずにコピペしてこのソースを流用した方は、修正をお願いします。m(_ _)m

CREATE FUNCTION dbo.ToWide(@s VARCHAR(512))
	RETURNS VARCHAR(512) AS
BEGIN
	/* ASCII文字はコード順に処理する */
	SET @s = REPLACE(@s COLLATE Japanese_BIN, ' ', '　')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '!', '！')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '"', '”')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '#', '＃')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '$', '＄')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '%', '％')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '&', '＆')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '''', '’')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '(', '（')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, ')', '）')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '*', '＊')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '+', '＋')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, ',', '，')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '-', '−')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '.', '．')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '/', '／')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '0', '０')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '1', '１')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '2', '２')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '3', '３')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '4', '４')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '5', '５')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '6', '６')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '7', '７')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '8', '８')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '9', '９')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, ':', '：')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, ';', '；')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '<', '＜')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '>', '＞')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '?', '？')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '@', '＠')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'A', 'Ａ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'B', 'Ｂ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'C', 'Ｃ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'D', 'Ｄ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'E', 'Ｅ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'F', 'Ｆ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'G', 'Ｇ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'H', 'Ｈ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'I', 'Ｉ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'J', 'Ｊ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'K', 'Ｋ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'L', 'Ｌ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'M', 'Ｍ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'N', 'Ｎ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'O', 'Ｏ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'P', 'Ｐ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Q', 'Ｑ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'R', 'Ｒ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'S', 'Ｓ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'T', 'Ｔ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'U', 'Ｕ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'V', 'Ｖ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'W', 'Ｗ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'X', 'Ｘ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Y', 'Ｙ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Z', 'Ｚ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '`', '｀')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'a', 'ａ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'b', 'ｂ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'c', 'ｃ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'd', 'ｄ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'e', 'ｅ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'f', 'ｆ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'g', 'ｇ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'h', 'ｈ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'i', 'ｉ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'j', 'ｊ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'k', 'ｋ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'l', 'ｌ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'm', 'ｍ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'n', 'ｎ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'o', 'ｏ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'p', 'ｐ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'q', 'ｑ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'r', 'ｒ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 's', 'ｓ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 't', 'ｔ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'u', 'ｕ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'v', 'ｖ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'w', 'ｗ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'x', 'ｘ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'y', 'ｙ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'z', 'ｚ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '{', '｛')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '|', '｜')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '}', '｝')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '~', '￣')

	/* 濁点・半濁点を先に処理する */
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｶﾞ', 'ガ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｷﾞ', 'ギ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｸﾞ', 'グ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｹﾞ', 'ゲ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｺﾞ', 'ゴ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｻﾞ', 'ザ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｼﾞ', 'ジ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｽﾞ', 'ズ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｾﾞ', 'ゼ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｿﾞ', 'ゾ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾀﾞ', 'ダ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾁﾞ', 'ヂ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾂﾞ', 'ヅ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾃﾞ', 'デ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾄﾞ', 'ド')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾊﾞ', 'バ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾋﾞ', 'ビ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾌﾞ', 'ブ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾍﾞ', 'ベ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾎﾞ', 'ボ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾊﾟ', 'パ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾋﾟ', 'ピ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾌﾟ', 'プ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾍﾟ', 'ペ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾎﾟ', 'ポ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｳﾞ', 'ヴ')
	/* 残りはコード順に処理する */
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '｡', '。')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '｢', '「')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '｣', '」')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, '､', '、')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｦ', 'ヲ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｧ', 'ァ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｨ', 'ィ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｩ', 'ゥ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｪ', 'ェ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｫ', 'ォ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｬ', 'ャ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｭ', 'ュ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｮ', 'ョ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｯ', 'ッ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｰ', 'ー')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｱ', 'ア')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｲ', 'イ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｳ', 'ウ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｴ', 'エ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｵ', 'オ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｶ', 'カ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｷ', 'キ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｸ', 'ク')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｹ', 'ケ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｺ', 'コ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｻ', 'サ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｼ', 'シ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｽ', 'ス')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｾ', 'セ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｿ', 'ソ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾀ', 'タ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾁ', 'チ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾂ', 'ツ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾃ', 'テ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾄ', 'ト')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾅ', 'ナ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾆ', 'ニ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾇ', 'ヌ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾈ', 'ネ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾉ', 'ノ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾊ', 'ハ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾋ', 'ヒ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾌ', 'フ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾍ', 'ヘ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾎ', 'ホ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾏ', 'マ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾐ', 'ミ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾑ', 'ム')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾒ', 'メ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾓ', 'モ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾔ', 'ヤ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾕ', 'ユ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾖ', 'ヨ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾗ', 'ラ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾘ', 'リ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾙ', 'ル')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾚ', 'レ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾛ', 'ロ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾜ', 'ワ')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾝ', 'ン')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾟ', '゜')
	SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ﾞ', '゛')
	RETURN @s
END

やさしいT-SQL入門 (DB SELECTION)

Permalink | コメント(5) | トラックバック(0) | 12:16 SQLServerでの文字列の半角文字から全角文字への変換を含むブックマーク SQLServerでの文字列の半角文字から全角文字への変換のブックマークコメント

4798115169
Book 達人に学ぶ SQL徹底指南書 (CodeZine BOOKS)
翔泳社 ミック
購入: 37人 クリック: 803回
4798112267
Book 現場で使えるSQL 第2版 (DB Magazine SELECTION)
翔泳社 小野哲 藤本亮
購入: 2人 クリック: 20回
コメントを書く

kurarakurara 2009/07/10 17:10 CREATE FUNCTION dbo.ToWide(@s VARCHAR(512),@flg VARCHAR(1))
RETURNS VARCHAR(512) AS
BEGIN
IF @flg = 0
BEGIN
SET @s = REPLACE(@s COLLATE Japanese_BIN, '　', ' ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '！', '!')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '”', '"')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '＃', '#')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '＄', '$')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '％', '%')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '＆', '&')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '’', '''')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '（', '(')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '）', ')')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '＊', '*')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '＋', '+')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '，', ',')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '−', '-')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '．', '.')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '／', '/')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '０', '0')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '１', '1')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '２', '2')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '３', '3')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '４', '4')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '５', '5')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '６', '6')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '７', '7')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '８', '8')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '９', '9')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '：', ':')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '；', ';')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '＜', '<')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '＞', '>')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '？', '?')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '＠', '@')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Ａ', 'A')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Ｂ', 'B')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Ｃ', 'C')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Ｄ', 'D')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Ｅ', 'E')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Ｆ', 'F')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Ｇ', 'G')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Ｈ', 'H')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Ｉ', 'I')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Ｊ', 'J')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Ｋ', 'K')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Ｌ', 'L')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Ｍ', 'M')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Ｎ', 'N')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Ｏ', 'O')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Ｐ', 'P')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Ｑ', 'Q')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Ｒ', 'R')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Ｓ', 'S')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Ｔ', 'T')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Ｕ', 'U')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Ｖ', 'V')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Ｗ', 'W')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Ｘ', 'X')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Ｙ', 'Y')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Ｚ', 'Z')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '｀', '`')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ａ', 'a')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｂ', 'b')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｃ', 'c')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｄ', 'd')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｅ', 'e')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｆ', 'f')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｇ', 'g')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｈ', 'h')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｉ', 'i')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｊ', 'j')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｋ', 'k')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｌ', 'l')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｍ', 'm')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｎ', 'n')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｏ', 'o')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｐ', 'p')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｑ', 'q')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｒ', 'r')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｓ', 's')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｔ', 't')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｕ', 'u')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｖ', 'v')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｗ', 'w')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｘ', 'x')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｙ', 'y')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ｚ', 'z')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '｛', '{')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '｜', '|')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '｝', '}')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '￣', '~')
/* 濁点・半濁点を先に処理する */
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ガ', 'ガ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ギ', 'ギ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'グ', 'グ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ゲ', 'ゲ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ゴ', 'ゴ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ザ', 'ザ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ジ', 'ジ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ズ', 'ズ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ゼ', 'ゼ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ゾ', 'ゾ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ダ', 'ダ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ヂ', 'ヂ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ヅ', 'ヅ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'デ', 'デ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ド', 'ド')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'バ', 'バ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ビ', 'ビ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ブ', 'ブ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ベ', 'ベ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ボ', 'ボ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'パ', 'パ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ピ', 'ピ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'プ', 'プ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ペ', 'ペ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ポ', 'ポ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ヴ', 'ヴ')
/* 残りはコード順に処理する */
SET @s = REPLACE(@s COLLATE Japanese_BIN, '。', '。')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '「', '「.')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '」', '」')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '、', '、')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ヲ', 'ヲ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ァ', 'ァ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ィ', 'ィ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ゥ', 'ゥ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ェ', 'ェ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ォ', 'ォ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ャ', 'ャ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ュ', 'ュ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ョ', 'ョ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ッ', 'ッ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ー', 'ー')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ア', 'ア')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'イ', 'イ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ウ', 'ウ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'エ', 'エ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'オ', 'オ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'カ', 'カ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'キ', 'キ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ク', 'ク')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ケ', 'ケ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'コ', 'コ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'サ', 'サ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'シ', 'シ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ス', 'ス')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'セ', 'セ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ソ', 'ソ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'タ', 'タ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'チ', 'チ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ツ', 'ツ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'テ', 'テ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ト', 'ト')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ナ', 'ナ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ニ', 'ニ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ヌ', 'ヌ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ネ', 'ネ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ノ', 'ノ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ハ', 'ハ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ヒ', 'ヒ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'フ', 'フ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ヘ', 'ヘ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ホ', 'ホ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'マ', 'マ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ミ', 'ミ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ム', 'ム')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'メ', 'メ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'モ', 'モ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ヤ', 'ヤ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ユ', 'ユ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ヨ', 'ヨ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ラ', 'ラ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'リ', 'リ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ル', 'ル')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'レ', 'レ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ロ', 'ロ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ワ', 'ワ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ン', 'ン')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '゜', '゜')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '゛', '゛')
END
ELSE IF @flg = 2
BEGIN
/* ASCII文字はコード順に処理する */
SET @s = REPLACE(@s COLLATE Japanese_BIN, ' ', '　')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '!', '！')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '"', '”')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '#', '＃')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '$', '＄')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '%', '％')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '&', '＆')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '''', '’')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '(', '（')
SET @s = REPLACE(@s COLLATE Japanese_BIN, ')', '）')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '*', '＊')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '+', '＋')
SET @s = REPLACE(@s COLLATE Japanese_BIN, ',', '，')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '-', '−')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '.', '．')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '/', '／')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '0', '０')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '1', '１')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '2', '２')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '3', '３')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '4', '４')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '5', '５')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '6', '６')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '7', '７')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '8', '８')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '9', '９')
SET @s = REPLACE(@s COLLATE Japanese_BIN, ':', '：')
SET @s = REPLACE(@s COLLATE Japanese_BIN, ';', '；')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '<', '＜')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '>', '＞')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '?', '？')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '@', '＠')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'A', 'Ａ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'B', 'Ｂ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'C', 'Ｃ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'D', 'Ｄ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'E', 'Ｅ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'F', 'Ｆ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'G', 'Ｇ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'H', 'Ｈ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'I', 'Ｉ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'J', 'Ｊ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'K', 'Ｋ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'L', 'Ｌ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'M', 'Ｍ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'N', 'Ｎ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'O', 'Ｏ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'P', 'Ｐ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Q', 'Ｑ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'R', 'Ｒ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'S', 'Ｓ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'T', 'Ｔ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'U', 'Ｕ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'V', 'Ｖ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'W', 'Ｗ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'X', 'Ｘ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Y', 'Ｙ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'Z', 'Ｚ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '`', '｀')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'a', 'ａ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'b', 'ｂ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'c', 'ｃ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'd', 'ｄ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'e', 'ｅ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'f', 'ｆ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'g', 'ｇ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'h', 'ｈ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'i', 'ｉ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'j', 'ｊ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'k', 'ｋ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'l', 'ｌ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'm', 'ｍ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'n', 'ｎ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'o', 'ｏ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'p', 'ｐ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'q', 'ｑ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'r', 'ｒ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 's', 'ｓ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 't', 'ｔ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'u', 'ｕ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'v', 'ｖ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'w', 'ｗ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'x', 'ｘ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'y', 'ｙ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'z', 'ｚ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '{', '｛')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '|', '｜')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '}', '｝')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '~', '￣')
/* 濁点・半濁点を先に処理する */
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ガ', 'ガ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ギ', 'ギ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'グ', 'グ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ゲ', 'ゲ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ゴ', 'ゴ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ザ', 'ザ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ジ', 'ジ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ズ', 'ズ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ゼ', 'ゼ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ゾ', 'ゾ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ダ', 'ダ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ヂ', 'ヂ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ヅ', 'ヅ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'デ', 'デ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ド', 'ド')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'バ', 'バ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ビ', 'ビ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ブ', 'ブ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ベ', 'ベ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ボ', 'ボ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'パ', 'パ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ピ', 'ピ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'プ', 'プ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ペ', 'ペ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ポ', 'ポ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ヴ', 'ヴ')
/* 残りはコード順に処理する */
SET @s = REPLACE(@s COLLATE Japanese_BIN, '。', '。')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '「.', '「')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '」', '」')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '、', '、')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ヲ', 'ヲ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ァ', 'ァ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ィ', 'ィ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ゥ', 'ゥ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ェ', 'ェ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ォ', 'ォ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ャ', 'ャ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ュ', 'ュ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ョ', 'ョ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ッ', 'ッ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ー', 'ー')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ア', 'ア')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'イ', 'イ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ウ', 'ウ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'エ', 'エ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'オ', 'オ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'カ', 'カ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'キ', 'キ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ク', 'ク')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ケ', 'ケ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'コ', 'コ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'サ', 'サ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'シ', 'シ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ス', 'ス')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'セ', 'セ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ソ', 'ソ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'タ', 'タ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'チ', 'チ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ツ', 'ツ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'テ', 'テ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ト', 'ト')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ナ', 'ナ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ニ', 'ニ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ヌ', 'ヌ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ネ', 'ネ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ノ', 'ノ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ハ', 'ハ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ヒ', 'ヒ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'フ', 'フ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ヘ', 'ヘ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ホ', 'ホ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'マ', 'マ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ミ', 'ミ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ム', 'ム')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'メ', 'メ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'モ', 'モ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ヤ', 'ヤ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ユ', 'ユ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ヨ', 'ヨ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ラ', 'ラ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'リ', 'リ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ル', 'ル')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'レ', 'レ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ロ', 'ロ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ワ', 'ワ')
SET @s = REPLACE(@s COLLATE Japanese_BIN, 'ン', 'ン')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '゜', '゜')
SET @s = REPLACE(@s COLLATE Japanese_BIN, '゛', '゛')
END
RETURN @s
END

ありがとうございました。

memo77memo77 2009/09/01 11:40 一般的に~と対応するのは￣なんでしょうかね。Excelでは〜と対応しているようです。

babydaemonsbabydaemons 2009/09/01 18:48 どうなんでしょう？個人的には"~"と"〜"が対応すると思うんですけどね。

thank youthank you 2009/09/29 12:17 ありがたく使わせていただきます。
お気づきかと思いますが、
SET @s = REPLACE(@s COLLATE Japanese_BIN, '「.', '「')
'.' が入ってます。

babydaemonsbabydaemons 2009/09/30 11:21 ご指摘ありがとうございました。m(_ _)m
修正させていただきました。

励みになりますので、よろしければlivedoor Readerでこのブログを購読してくれたり、はてなブックマークに登録してくれたりすると嬉しいです。

投稿したコメントは管理者が承認するまで公開されません。

スパム対策のためのダミーです。もし見えても何も入力しないでください
 ゲスト

画像認証

トラックバック - http://d.hatena.ne.jp/babydaemons/20080226/1210302971
リンク元
プロフィール

babydaemons

babydaemons はてなダイアリープラス利用中

雑食系PG/SEのbabydaemonsが書きなぐったcodeの備忘録的ブログ。エラーメッセージでググるとあなたのお役に立つことが75%くらいあるかも。

livedoor Readerで購読! にほんブログ村 ＩＴ技術ブログへ
ブログセンター 人気ブログランキングへ
▲クリックをお願いします。
日記の検索

ページビュー
730328

follow babydaemons at http://twitter.com
babydaemons’ Tweets
twilog.org
favotter
me*you
twitipic
Chrome Counter
無料アクセス解析
最近言及したキーワード
カレンダー
<< 2008/02 >>
日 月 火 水 木 金 土
1 2
3 4 5 6 7 8 9
10 11 12 13 14 15 16
17 18 19 20 21 22 23
24 25 26 27 28 29
最近のトラックバック
最新タイトル
カテゴリー
最近書いたコメント
最近のコメント
言及ISBN/ASIN
  • K-GARAGE SLP-180/BLK スピーカー内蔵ミニギター
  • CASIO 電子キーボード 61標準鍵盤 ベーシックタイプ CTK‐4200
  • WEB+DB PRESS Vol.54
  • Ext JS入門―リッチUIなWebサイトをつくるAjaxフレームワーク
  • WEB+DB PRESS Vol.54
  • 小学１年のかん字 (毎日のドリル)
  • 小学１年のことばと文 (毎日のドリル)
  • 小学１年の文章読解 (毎日のドリル)
  • 小学１年のたしざん (毎日のドリル)
  • 小学１年のひきざん (毎日のドリル)
  • 小学１年のすう・りょう・ずけい (毎日のドリル　算数２５)
  • 小学１年のもっとけいさん力　 (毎日のドリル　算数１６)