以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  json如何转化为文本  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=189115)

--  作者:cnsjroom
--  发布时间:2023/11/10 18:27:00
--  json如何转化为文本
目前代码:
Dim json As String = ja.ToString
Dim ja12 As JArray = Jarray.Parse(json)
Dim ssss As String
For i As Integer = 0 To ja12.Count - 1
    ssss = "在" & ja12(i)("评查活动id").ToString() & "活动中,对"
    ssss &= ja12(i)("评查案件id").ToString() & "等案件进行评查打分,其中:审查调查阶段得分" & ja12(i)("审查调查得分").ToString() & "分,审理阶段得分" & ja12(i)("审理得分").ToString() & "分,加分" & ja12(i)("加分").ToString() & "分,加倍扣分" & ja12(i)("加倍扣分").ToString() & "分,总分为:" & ja12(i)("最终得分").ToString() & "分,评为:" & ja12(i)("评查等次").ToString() & "案件。" & Chr(13) & Chr(10)
    ssss &= "分值明细为:" 
    Dim ja121 As JArray = Jarray.Parse(ja12(i)("children").ToString())
    For i121 As Integer = 0 To ja121.Count - 1
        ssss &= i121 + 1 & "、" & ja121(i121)("卷宗名称").ToString() & "卷中" & ja121(i121)("资料名称").ToString().Replace(".pdf", "").Replace(".png", "") & "的材料因" & ja121(i121)("参考规则").ToString() & "(" & ja121(i121)("分值类型").ToString().Replace("分", "") & ja121(i121)("评分").ToString() & "分);"
    Next
    OutPut.Show(ssss & Chr(13) & Chr(10))
Next

输出得到:
    在3a71a95f-dcba-4752-b57a-fbe5bb86f78a活动中,对fe686d2b-9d8c-4a99-bafc-0cf0a48ca328等案件进行评查打分,其中:审查调查阶段得分43.5分,审理阶段得分50分,加分0分,加倍扣分0分,总分为:93.5分,评为:优秀案件。
    分值明细为:1、证据卷中20231101问题的材料因证据存在瑕疵(扣0.5分);2、证据卷中20231101问题的材料因未按规定履行审查调查程序(扣1分);3、证据卷中20231101问题的材料因事实认定错误 审理部门指出后不予纠正(扣5分);
    在86e31265-1817-4b78-a976-967c1071bec8活动中,对fe686d2b-9d8c-4a99-bafc-0cf0a48ca328等案件进行评查打分,其中:审查调查阶段得分37.5分,审理阶段得分50分,加分0分,加倍扣分0分,总分为:87.5分,评为:合格案件。
    分值明细为:1、证据卷中的材料因遗漏应当认定的违纪违法事实且未作出合理说明(扣2.5分);2、证据卷中的材料因基本事实不清楚(扣2.5分);3、证据卷中20231101问题的材料因主要证据不到位 审理部门指出后不予纠正(扣5分);4、材料卷中的材料因事实认定错误 审理部门未予纠正(扣2.5分);

想实现:如何转化成为文本。输出格式为:蓝色部分为求助部分,目前尚未实现。
一、遍历活动名称节点,然后按活动输出如下数据
{活动名称}中,经过对{案件名称}的评查打分。主要是一次活动中,会有多个案件名称出现,如在某某活动中,对案件名称1,名称2,……共计n件,进行评查评分。
二、遍历{案件名称}节点,然后名称进行遍历,逐案输出如下数据
经查{案件名称},评分总计{评分总分},其中审查调查{审查调查得分}分,审理{审理得分}分,加分{加分}分,加倍扣{加倍扣分}分,总分{最终得分}分,结论为:{评查等次}。
三、遍历带【标准】【项目】【细则】节点的内容循环输出
其中:标准合计{标准}分,项目合计{项目}分,细则合计{细则}分。其中某某标准共计分,项目1共计分,项目1下的细则1为1分,细则2为2分,项目2下的细则3为1分,标准1共计分,项目3下的……遍历到的就输出,
四、遍历具体的{卷宗名称}{材料名称}{评分}节点循环输出
具体为:(循环children中的数据隔行输出)
1、{卷宗名称}卷中的{材料名称},因{参考规则}得{评分}。
2、{卷宗名称}卷中的{材料名称},因{参考规则}得{评分}。
3、{卷宗名称}卷中的{材料名称},因{参考规则}得{评分}。
……

最终效果:
    待实现:在3a71a95f-dcba-4752-b57a-fbe5bb86f78a活动中,共对{案件名称1}{案件名称2}{案件名称3}{案件名称4}……进行评查。其中优秀多少  合格多少  ……
    在3a71a95f-dcba-4752-b57a-fbe5bb86f78a活动中,对fe686d2b-9d8c-4a99-bafc-0cf0a48ca328等案件进行评查打分,其中:审查调查阶段得分43.5分,审理阶段得分50分,加分0分,加倍扣分0分,总分为:93.5分,评为:优秀案件。
     待实现:其中,某某标准多少分,某某项目多少分,某某细则多少分……某某标准共计分,项目1共计分,项目1下的细则1为1分,细则2为2分,项目2下的细则3为1分,标准1共计分,项目3下的……遍历到的就输出
    分值明细为:1、证据卷中20231101问题的材料因证据存在瑕疵(扣0.5分);2、证据卷中20231101问题的材料因未按规定履行审查调查程序(扣1分);3、证据卷中20231101问题的材料因事实认定错误 审理部门指出后不予纠正(扣5分);
    在86e31265-1817-4b78-a976-967c1071bec8活动中,对fe686d2b-9d8c-4a99-bafc-0cf0a48ca328等案件进行评查打分,其中:审查调查阶段得分37.5分,审理阶段得分50分,加分0分,加倍扣分0分,总分为:87.5分,评为:合格案件。
    待实现:其中,某某标准多少分,某某项目多少分,某某细则多少分……某某标准共计分,项目1共计分,项目1下的细则1为1分,细则2为2分,项目2下的细则3为1分,标准1共计分,项目3下的……遍历到的就输出
    分值明细为:1、证据卷中的材料因遗漏应当认定的违纪违法事实且未作出合理说明(扣2.5分);2、证据卷中的材料因基本事实不清楚(扣2.5分);3、证据卷中20231101问题的材料因主要证据不到位 审理部门指出后不予纠正(扣5分);4、材料卷中的材料因事实认定错误 审理部门未予纠正(扣2.5分);

当前json格式如下:【省略了部分数据】
[
  {
    "评查活动id": "3a71a95f-dcba-4752-b57a-fbe5bb86f78a",
    "活动名称": "",
    "评查案件id": "fe686d2b-9d8c-4a99-bafc-0cf0a48ca328",
    "案件名称": "",
    "一票否决数": 0,
    "【标准】程序合规、手续完备查得分": 1.0,
    "【项目】审查调查程序得分": 1.0,
    "【细则】未按规定履行审查调查程序得分": 1.0,
    "【标准】事实清楚、证据确凿得分": 5.5,
    "【项目】事实证据得分": 5.5,
    "【细则】事实认定错误 审理部门指出后不予纠正得分": 5.0,
    "【细则】证据存在瑕疵得分": 0.5,
    "评分总分": 6.5,
    "审查调查总分": 6.5,
    "审查调查得分": 43.5,
    "审理总分": 0.0,
    "审理得分": 50.0,
    "加分": 0.0,
    "加倍扣分": 0.0,
    "最终得分": 93.5,
    "评查等次": "优秀",
    "children": [
      {
        "卷宗id": "bdcebda0-397c-440a-b3a3-ab3470b87857",
        "卷宗名称": "证据",
        "材料id": "4660e5f2-6dcc-4067-9fdd-68097b20169c",
        "资料名称": "20231101问题.pdf",
        "扣分id": "92995b6c-87be-4aa7-a6ad-92b58a33daa8",
        "一票否决": "否",
        "案件阶段": "审查调查阶段",
        "参考规则": "证据存在瑕疵",
        "评分": "0.5"
      },
      {
        "卷宗id": "bdcebda0-397c-440a-b3a3-ab3470b87857",
        "卷宗名称": "证据",
        "材料id": "4660e5f2-6dcc-4067-9fdd-68097b20169c",
        "资料名称": "20231101问题.pdf",
        "扣分id": "3a46258b-1824-4eb5-8136-910d13a34d58",
        "一票否决": "否",
        "案件阶段": "审查调查阶段",
        "参考规则": "未按规定履行审查调查程序",
        "评分": "1"
      },
    ]
  },
……………………
……………………
……………………省略若干,后续部分格式都如上一样…………



[此贴子已经被作者于2023/11/10 21:31:13编辑过]

--  作者:有点蓝
--  发布时间:2023/11/11 8:34:00
--  
没看懂,请举例说明一下:原始数据是怎么样的?现在输出的结果是怎么样的?最终需要的结果是怎么样的?