tmtmさん、こんばんは。

半角カナ限定ですが．．．
前回のAPIを応用して関数を作りました。
あと、デフォルトロケールIDは0でもOKでした。
0を指定すると自動でデフォルトロケールIDとなります。

即興で作成したので、いろいろ検証してみてください。
関数：string kanatozen(string p_s)

constant long LCMAP_FULLWIDTH   = 8388608 //0x00800000  半角→全角
string rtn //戻り値
string l_char,l_next,l_cchar //変換用文字
int i //ループカウンタ
string l_dest
do until i = lenw(p_s)
　i ++
　l_dest = space(4)　//初期化、バッファ確保
　l_char = midw(p_s,i,1)
　if (l_char>=\'~hA0\' and l_char <=\'~hDF\') then　//半角カナの場合
　　//（半）濁音処理
　　l_next = midw(p_s,i + 1,1)
　　if  l_next = \'ﾞ\' or l_next = \'ﾟ\' then
　　　l_cchar = midw(p_s,i,2)
　　　i ++
　　else
　　　l_cchar = l_char
　　end if
　　LCMapStringA(0,LCMAP_FULLWIDTH,l_cchar,len(l_cchar) + 1,l_dest,4)
　　rtn += l_dest
　else
　　rtn += l_char
　end if
loop
return rtn