HP、SQL、DLL模块化进销存开发框架

.子程序 事件_数据到达, 整数型
.参数 服务端句柄, 整数型
.参数 连接ID, 整数型
.参数 字节集数据指针, 整数型
.参数 数据长度, 整数型
.局部变量 收到数据, 字节集
.局部变量 实际数据, 字节集, , "0"
.局部变量 语句, 文本型
.局部变量 类型, 整数型
.局部变量 处理子程序指针, 字节集
.局部变量 记录集, 记录集类
.局部变量 执行结果, 整数型, , , 查询类： -1为查询成功 0为查询失败 执行类： 1为执行成功 0为执行失败
.局部变量 返回数据, 字节集, , "0"

收到数据 ＝ L_指针_到字节集2 (字节集数据指针, 数据长度) ' 客户端发过来的字节集数据
L_字节集数组_读取 (收到数据, 实际数据) ' 还原成字节集数组
' 通常排序为： 1处理子程序 2类型 3语句
' 服务端只需用到 1 2
处理子程序指针 ＝ 实际数据 [1]
类型 ＝ 取字节集数据 (实际数据 [2], #整数型, )
语句 ＝ 取字节集数据 (实际数据 [3], #文本型, )
调试输出 (类型, 语句)
.如果真 (类型 ＝ 1) ' 查询
记录集.置对象 (sql.执行SQL语句 (语句, ))
.判断开始 (sql.最后错误 () ＝ “”)
加入成员 (返回数据, 处理子程序指针)
加入成员 (返回数据, 记录集.保存到字节集 ())
.默认
加入成员 (返回数据, 到字节集 (sql.最后错误 ()))