JSON序列——主从表查询

客户端代码:

  1. procedure TForm1.Button4Click(Sender: TObject);
  2. // 主从表 查询
  3. begin
  4. var url: TynUrl := TynUrl.Create;
  5. var serial: TynJsonCross := TynJsonCross.Create;
  6. var send: TMemoryStream := TMemoryStream.Create;
  7. try
  8. url.url := Edit1.Text;
  9. url.command := 'query92'; // 命令
  10. url.params.Add('count=2'); // 查询几个表的数据
  11. url.params.Add('accountno=1'); // 帐套号
  12. url.params.Add('sql=select * from tgoods'); // 查询SQL
  13. url.params.Add('sql2=select * from tunit'); // 查询SQL2
  14. serial.Text := IdHTTP1.Post(url.text, send);
  15. Memo1.Text := serial.Text;
  16. // serial.ReadFDMemTable(0, FDMemTable1);
  17. // serial.ReadFDMemTable(1, FDMemTable2);
  18. finally
  19. serial.DisposeOf;
  20. send.DisposeOf;
  21. url.DisposeOf;
  22. end;
  23. end;

  服务端返回JSON:

  1. {
  2. "tables": [
  3. {
  4. "cols": [
  5. {
  6. "name": "goodsid",
  7. "size": 8,
  8. "type": "string"
  9. },
  10. {
  11. "name": "barcode",
  12. "size": 18,
  13. "type": "string"
  14. },
  15. {
  16. "name": "goodsname",
  17. "size": 50,
  18. "type": "string"
  19. },
  20. {
  21. "name": "pyjm",
  22. "size": 50,
  23. "type": "string"
  24. },
  25. {
  26. "name": "gg",
  27. "size": 30,
  28. "type": "string"
  29. },
  30. {
  31. "name": "kindid",
  32. "size": 8,
  33. "type": "string"
  34. },
  35. {
  36. "name": "jj",
  37. "size": 4,
  38. "type": "float"
  39. },
  40. {
  41. "name": "lsj",
  42. "size": 4,
  43. "type": "float"
  44. },
  45. {
  46. "name": "kcxx",
  47. "size": 4,
  48. "type": "float"
  49. },
  50. {
  51. "name": "kcsx",
  52. "size": 4,
  53. "type": "float"
  54. },
  55. {
  56. "name": "unitid",
  57. "size": 8,
  58. "type": "string"
  59. },
  60. {
  61. "name": "unitname",
  62. "size": 10,
  63. "type": "string"
  64. },
  65. {
  66. "name": "kindname",
  67. "size": 30,
  68. "type": "string"
  69. }
  70. ],
  71. "rows": [
  72. {
  73. "goodsid": "100036",
  74. "barcode": "100036",
  75. "goodsname": "秋冬四件套哦",
  76. "pyjm": "",
  77. "gg": "",
  78. "kindid": "12002",
  79. "jj": 100,
  80. "lsj": 430,
  81. "kcxx": 50,
  82. "kcsx": 5,
  83. "unitid": "15",
  84. "unitname": "箱套",
  85. "kindname": "床上用品"
  86. },
  87. {
  88. "goodsid": "100050",
  89. "barcode": "100050",
  90. "goodsname": "天堂伞",
  91. "pyjm": "wrth",
  92. "gg": "",
  93. "kindid": "1",
  94. "jj": 10,
  95. "lsj": 0,
  96. "kcxx": 0,
  97. "kcsx": 0,
  98. "unitid": "15",
  99. "unitname": "箱套",
  100. "kindname": "1111"
  101. },
  102. {
  103. "goodsid": "100054",
  104. "barcode": "100054",
  105. "goodsname": "我们的 哎",
  106. "pyjm": "WMD D7",
  107. "gg": "",
  108. "kindid": "11002",
  109. "jj": 0,
  110. "lsj": 0,
  111. "kcxx": 0,
  112. "kcsx": 0,
  113. "unitid": "18",
  114. "unitname": "公斤",
  115. "kindname": "饮料"
  116. },
  117. {
  118. "goodsid": "100055",
  119. "barcode": "100055",
  120. "goodsname": "娃哈哈纯净水500ML",
  121. "pyjm": "WHHCJS500ML",
  122. "gg": "",
  123. "kindid": "11001",
  124. "jj": 0,
  125. "lsj": 0,
  126. "kcxx": 0,
  127. "kcsx": 0,
  128. "unitid": "18",
  129. "unitname": "公斤",
  130. "kindname": "奶粉"
  131. }
  132. ]
  133. },
  134. {
  135. "cols": [
  136. {
  137. "name": "unitid",
  138. "size": 4,
  139. "type": "string"
  140. },
  141. {
  142. "name": "unitname",
  143. "size": 6,
  144. "type": "string"
  145. }
  146. ],
  147. "rows": [
  148. {
  149. "unitid": "11",
  150. "unitname": "个"
  151. },
  152. {
  153. "unitid": "12",
  154. "unitname": "双"
  155. }
  156. ]
  157. }
  158. ]
  159. }

  

JSON序列——主从表查询的更多相关文章

  1. C#主从表查询

    软件的使用必然涉及到主表和子表的操作,我们先在SQLite中创建子表.比如 创建一学生信息表做主表,再创建一个学生成绩表做子表.然后我们在程序中成绩 方法来连接子表. 判断bindingsource中 ...

  2. 咏南中间件JSON序列类

    咏南中间件JSON序列类 1)支持跨平台.跨语言 2)支持主从表数据序列.还原,支持任意数量的表 主从表数据序列为JSON字符串样式: { "rows": [ { "FD ...

  3. Django模板及表查询笔记

    模板层 后端朝html页面传递数据 两种给html页面传递数据的方式 第一种: render(request,'index.html',{'user_list':user_list}) 第二种 ren ...

  4. 【mysql】 mybatis实现 主从表 left join 1:n 一对多 分页查询 主表从表都有查询条件 【mybatis】count 统计+JSON查询

    mybatis实现 主从表 left join  1:n 一对多 分页查询   主表从表都有查询条件+count 需求: ======================================= ...

  5. Oracle组函数、多表查询、集合运算、数据库对象(序列、视图、约束、索引、同义词)等

    count组函数:(过滤掉空的字段) select count(address),count(*) from b_user max() avg() min(),sum() select sum(age ...

  6. mysql中,创建包含json数据类型的表?创建json表时候的注意事项?查询json字段中某个key的值?

    需求描述: 在mysql数据库中,创建包含json数据类型的表.记录下,在创建的过程中,需要注意的问题. 操作过程: 1.通过以下的语句,创建包含json数据类型的表 mysql> create ...

  7. Asp.Net MVC +EntityFramework主从表新增编辑操作的实现(删除操作怎么实现?)

    Asp.Net MVC +EntityFramework主从表新增编辑操作的实现 对于MVC中同时对主从表的表单操作在网上现有的解决很少,而这样的操作在做业务系统中是经常为遇到的.我在网上搜索了很久都 ...

  8. django(3) 一对多跨表查询、ajax、多对多

    1.一对多跨表查询获取数据的三种形式:对象.字典.元组 例:有host与business两张表,host与business的id字段关联,business在host表中的对象名是b,  通过查询hos ...

  9. Web框架之Django_05 模型层了解(单表查询、多表查询、聚合查询、分组查询)

    摘要: 单表查询 多表查询 聚合查询 分组查询 一.Django ORM 常用字段和参数: 常用字段:#AutoFieldint自增列,必须填入参数primary_key = True,当model中 ...

随机推荐

  1. Day5----------------------文件合并与文件归档

    一.文件合并 1.命令: >:覆盖式 >>:追加式 例如:cat /etc/passwd > a.txt      把/etc/passwd下的内容合并到a.txt内,若没有文 ...

  2. IntelliJ IDEA创建JavaWeb工程及配置Tomcat部署

    步骤: 在WEB-INF 下创建classes 和 lib 两个文件夹 右上角一个蓝色的按钮... Modules选项卡,Paths下的配置...输出路径选择classes Dependencies选 ...

  3. 搭建ssh框架项目(四)

    一.创建控制层 (1)创建VO值对象,对应页面表单的属性值 package com.cppdy.ssh.web.form; /** * VO值对象,对应页面表单的属性值 * VO对象与PO对象的关系: ...

  4. Spark的HA部署

    一.安装JDK.Scala 二.安装zookeeper 三.安装Hadoop 四.安装Spark 1.修改spark/conf/spark-env.sh export JAVA_HOME=/usr/j ...

  5. (一)什么是webservice?

    第一节: 第一节:Webservice 简介 第二节: 第二节:CXF 简介 webservice 有的人一看到这个,估计会认为这个是一种新技术,一种新框架. 其实不是,严格的说,webservice ...

  6. 性能测试二十六:环境部署之Mysql+Redis+Tomcat环境整合

    系统中使用了缓存+数据库,通用读取数据规则1.先从缓存读数据,如果有,直接返回数据:2.如果没有,去数据库中读,然后再插入到缓存中,再返回数据 Mysql+Redis+Tomcat环境整合 1.修改P ...

  7. 算法-----python实现

    斐波那契数列 def f(n): if n == 1: return 1 elif n == 2: return 1 else: return f(n-1)+f(n-2) print(f(8)) 用普 ...

  8. 【noip模拟赛9】123法典

    描述 很久很久以前,有个叫123的国家,这个国家的国王很喜欢颁布各种法令,并把这些法令记录在一部<123法典>中.最近这部法典终于被发掘了出来,专家们经过研究发现法典中的法令是按颁布的时间 ...

  9. mac 回车键、空格键失灵(非物理原因)解决方法

    1.关机2.按住shift+control+option+开关机键,大概10秒左右,观察键盘电源灯是否变色,确定是否硬件故障,不变色表正常.3.先按下开关机键后,放开.然后同时按住option+com ...

  10. CSS之文本溢出隐藏,不定宽高元素垂直水平居中、禁止页面文本复制

    1.如何让不固定元素宽高的元素垂直水平居中 .center { position: absolute; top: 50%; left: 50%; background-color: #000; wid ...