http请求之of_ordering_getmiditem
//Public function of_ordering_getmiditem (string as_instr,string as_key) returns string
//string as_instr
//string as_key
long ll_pos
long ll_find
string ls_pos
string ls_midright
string ls_item
string ls_col
string ls_temp
string ls_ret
datastore lds_unicode
ls_pos = "~"" + as_key + "~"" + ":"
ll_pos = pos(as_instr,ls_pos)
IF ll_pos > 0 THEN
ls_midright = mid(as_instr,ll_pos + len(ls_pos))
IF mid(ls_midright,2,1) = "[" THEN
ll_pos = pos(ls_midright,"]")
ELSE
ll_pos = pos(ls_midright,",")
IF ll_pos > 0 THEN
ELSE
ll_pos = pos(ls_midright,"}")
END IF
END IF
IF ll_pos > 0 THEN
ls_temp = left(ls_midright,ll_pos - 1)
IF left(ls_temp,1) = "~"" THEN
ls_temp = mid(ls_temp,2)
END IF
IF right(ls_temp,1) = "~"" THEN
ls_temp = left(ls_temp,len(ls_temp) - 1)
END IF
ls_ret = ls_temp
ELSE
IF left(ls_midright,1) = "~"" THEN
ls_midright = mid(ls_midright,2)
END IF
IF right(ls_midright,1) = "~"" THEN
ls_midright = left(ls_midright,len(ls_midright) - 1)
END IF
ls_ret = ls_midright
END IF
ELSE
ls_ret = ""
END IF
ll_pos = pos(lower(ls_ret),"\u")
IF ll_pos > 0 THEN
lds_unicode = CREATE datastore
lds_unicode.dataobject = "dw_unicode"
DO WHILE ll_pos > 0
ls_temp = upper(mid(ls_ret,ll_pos + 2,4))
ll_find = lds_unicode.find("Left(unicode_no,3) = '" + left(ls_temp,3) + "'",1,lds_unicode.rowcount())
IF ll_find > 0 THEN
ls_item = lds_unicode.object.unicode_item[ll_find]
ls_col = upper(right(ls_temp,1))
CHOOSE CASE ls_col
CASE "A","B","C","D","E","F"
ls_item = mid(ls_item,(asc(ls_col) * 2 - 110) + 1,2)
CASE ELSE
ls_item = mid(ls_item,(long(ls_col) * 2) + 1,2)
END CHOOSE
ls_ret = replace(ls_ret,ll_pos,6,ls_item)
END IF
ll_pos = pos(lower(ls_ret),"\u")
LOOP
DESTROY lds_unicode
END IF
RETURN ls_ret
最新文章
- 软件工程(FZU2015)助教总结
- PullToRefreshListView加载更多定位的解决方法
- phpcms V9 数据模型基类
- Android使用BLE(低功耗蓝牙,Bluetooth Low Energy)
- Job类
- 视频处理控件TVideoGrabber如何重新编码视频
- Java中如何在另一个类里面使用运行类中的对象,举例说明了一下。
- CKeditor3.6.2 配置与精简
- sql之left join、right join、inner join的区别(转)
- JQuery笔记(二)jq常用方法animate()
- event对应的各种坐标
- Spring Boot + Dubbo 可运行的例子源码-实现服务注册和远程调用
- 关于Django字段类型中 blank和null的区别
- [Swift]LeetCode848. 字母移位 | Shifting Letters
- Linux(DeepInOS) 下 mysql 的安装与基本配置
- Selenium自动化Chrome浏览器 在windows下窗口最大化
- Programming Series 1.0 — C Programming
- GUI学习之七——单选框QRadioButton和QButtonGroup的学习总结
- angular上传获取图片的directive指令
- 【C#数据结构系列】查找
热门文章
- deep sort
- Error creating bean with name 'persistenceExceptionTranslationPostProcessor' defined in class path resource [org/springframework/boot/autoconfigure/dao/PersistenceExceptionTranslationAutoConfiguration
- L1-049 天梯赛座位分配 (20 分)
- ubuntu进行apt-get时候出现Package ssh is not available, but is referred to by another package 错误
- ansible-playbook的YAML语法学习
- Spring数据分析思维课
- 动态绑定v-model
- coursera 视频总是缓冲或者无法观看的解决办法(Windows 和 Linux 系统 环境)
- centos6里面装zabbix(五)
- 青岛和深圳,两座条件相似的城市,为何GDP相差这么大