//定义参数
String ls_arr[]//把返回的json串截取后放置此数组
String ls_str //按逗号截取的单个值,方便遍历的时候取值
String ls_get_value[]//返回的json串里面的key的value的值
String ls_check_filed[]={"idNo","ecQrCode","ecToken","userName","outBizNo","ecIndexNo","insuOrg"}//要取json字符串里面的key
String outinfo='{"code":0,"data":{"bizNo":"20200707172823063632","ecQrCode":"4243681263916863590400000000","ecToken":"4300001eckatckg4kqfabc160a00005170fb08","extra":{"ecIndexNo":"5ABCD88B1C4C3605AC8F6C398D919ACC","ecToken":"4300001eckatckg4kqfabc160a00005170fb08","idNo":"430203********0026","idType":"01","insuOrg":"430199","userName":"孙某某"},"gainWay":"MOBILE","idNo":"430203********0026","insuOrg":null,"outBizNo":"2020070717282043990023003","phone":"","userName":"孙某某"},"extra":{"ecIndexNo":"5ABCD88B1C4C3605AC8F6C398D919ACC","ecToken":"4300001eckatckg4kqfabc160a00005170fb08","idNo":"430203195909240026","idType":"01","insuOrg":"430199","userName":"孙鹏"},"message":"处理成功","orgId":"43990023003"}'//PB中的json字符串//开始切割outinfof_split(outinfo,",",ls_arr)for ll_ii=1 to upperbound(ls_arr)
ls_str = ls_arr[ll_ii]for li_count =1 to upperbound(ls_check_filed)
ll_pos =pos(ls_str,ls_check_filed[li_count],1)if ll_pos >0 then
ifpos(ls_str,"{",1)>0 then
ls_get_temp =uf_conver_char2list(ls_str,"{")
ls_str = ls_get_temp[2]
end ififpos(ls_str,"}",1)>0 then
ls_get_temp =uf_conver_char2list(ls_str,"}")
ls_str = ls_get_temp[1]
end if
ls_get_temp =uf_conver_char2list(ls_str,":")
ls_get_value[li_count]=mid(ls_get_temp[2],2,len(ls_get_temp[2])-2)
end if
next
next
//返回的格式是ls_get_value数组//取值的方式是idNo= ls_get_value[1]、is_qrcode = ls_get_value[2]等等return ls_get_value