ABAP取汉字的拼音

我们是否遇到过这样的问题? 根据汉字运算出拼音: 那么这个怎么来实现呢? 请参考如下:  

    代码附件: 取汉字拼音_code