.版本 2

.子程序 方法_查询, 整数型, 公开
.参数 参_查询语句, 文本型
.参数 参_获取的数据, 类_json, 参考
.局部变量 i, 整数型
.局部变量 局_Json行数据, 类_json
.局部变量 局_Json段数据, 类_json
.局部变量 n, 整数型

操作记录集.打开 (参_查询语句, 数据库连接, 真)
参_获取的数据.置属性 (“记录数量”, 到文本 (操作记录集.记录数量 ()))
.计次循环首 (操作记录集.记录数量 (), i)
    局_Json段数据.清除 ()
    .计次循环首 (操作记录集.字段数量 (), n)
        局_Json段数据.置属性 (操作记录集.取字段名 (n － 1), 操作记录集.读入字段名记录 (操作记录集.取字段名 (n － 1)).取文本 ())
    .计次循环尾 ()
    局_Json行数据.加成员 (局_Json段数据.取数据文本 (), , 真)
    操作记录集.到下一条 ()
.计次循环尾 ()
参_获取的数据.置属性 (“数据”, 局_Json行数据.取数据文本 (), 真)
操作记录集.关闭 ()
返回 (1)