|
楼主 |
发表于 2023-4-7 11:35:29
|
显示全部楼层
广东省东莞市
窗口程序集名 | 保 留 | 保 留 | 备 注 | 窗口程序集_订单窗口 | | | | 变量名 | 类 型 | 数组 | 备 注 | 客户ID | 文本型 | | 客服ID | 文本型 | | 如果 (来源对象 = “修改”)修改订单初始化 ()新订单初始化 ()变量名 | 类 型 | 静态 | 数组 | 备 注 | 局_SQL | 文本型 | | | 产品ID | 文本型 | | | i | 整数型 | | | 删除按钮 | 表格按钮 | | | 文本 | 文本型 | | | 订单ID | 文本型 | | | 表格变量 | 高级表格 | | | 局记录集 | 记录集 | | |
局记录集 = 全局记录集 按钮新增.标题 = “修改”删除按钮.标题 = “删除”删除按钮.背景颜色 = #表格常量 .警告按钮 产品ID = 主窗口.表格订单. 取数据 (主窗口.表格订单. 取光标行号 (), 14 )局_SQL = “Select * from chanpinbiao where chanpingid='” + 产品ID + “'”局记录集. 打开 (局_SQL, 1, )高级表格产品.行数 = 局记录集.记录数量 + 1 计次循环首 (局记录集.记录数量, i )高级表格产品. 置数据 (i, 0, 1, 到文本 (i )) 高级表格产品. 置组件 (i, 1, 删除按钮 )局记录集. 读文本 (“chanpingid”, 文本 )高级表格产品. 置数据 (i, 2, 1, 文本 )局记录集. 读文本 (“chanpingming”, 文本 )高级表格产品. 置数据 (i, 3, 1, 文本 )局记录集. 读文本 (“yanse”, 文本 )高级表格产品. 置数据 (i, 4, 1, 文本 )局记录集. 读文本 (“chima”, 文本 )高级表格产品. 置数据 (i, 5, 1, 文本 )局记录集. 读文本 (“danjian”, 文本 )高级表格产品. 置数据 (i, 6, 1, 文本 )局记录集. 读文本 (“shuliang”, 文本 )高级表格产品. 置数据 (i, 7, 1, 文本 )局记录集. 读文本 (“zongjia”, 文本 )高级表格产品. 置数据 (i, 8, 1, 文本 )局记录集. 到下一条 ()i = i + 1 计次循环尾 ()局记录集. 关闭 () 客户ID = 主窗口.表格订单. 取数据 (主窗口.表格订单. 取光标行号 (), 16 )局_SQL = “Select * from kehubiao where kehuid=” + 客户ID 局记录集. 打开 (局_SQL, 1, )局记录集. 读文本 (“kehuming”, 文本 )编辑框客户VX.内容 = 文本 局记录集. 读文本 (“kehujibie”, 文本 )编辑框客户级别.内容 = 文本 局记录集. 读文本 (“beizhu”, 文本 )编辑框客户备注.内容 = 文本 局记录集. 读文本 (“xihao”, 文本 )编辑框客户喜好.内容 = 文本 局记录集. 关闭 () 主窗口.表格订单. 取数据 (主窗口.表格订单. 取光标行号 (), 14 )编辑框所属账号.内容 = 主窗口.表格订单. 取数据 (主窗口.表格订单. 取光标行号 (), 10 )编辑框订单备注.内容 = 主窗口.表格订单. 取数据 (主窗口.表格订单. 取光标行号 (), 8 )编辑框订单编号.内容 = 主窗口.表格订单. 取数据 (主窗口.表格订单. 取光标行号 (), 13 )编辑框快递单号.内容 = 主窗口.表格订单. 取数据 (主窗口.表格订单. 取光标行号 (), 3 )组合框快递选择. 选择 (主窗口.表格订单. 取数据 (主窗口.表格订单. 取光标行号 (), 2 )) 编辑框订单时间.内容 = 主窗口.表格订单. 取数据 (主窗口.表格订单. 取光标行号 (), 9 )组合框订单状态. 选择 (主窗口.表格订单. 取数据 (主窗口.表格订单. 取光标行号 (), 11 )) 订单ID = 主窗口.表格订单. 取数据 (主窗口.表格订单. 取光标行号 (), 13 )局_SQL = “Select * from dingdanbiao where dingdanid='” + 订单ID + “'”局记录集. 打开 (局_SQL, 1, )局记录集. 读文本 (“fajhuoren”, 文本 )编辑框发货人.内容 = 文本 局记录集. 读文本 (“fahuodianhua”, 文本 )编辑框发货电话.内容 = 文本 局记录集. 读文本 (“fahuosheng”, 文本 )编辑框发货省.内容 = 文本 局记录集. 读文本 (“fahuoshi”, 文本 )编辑框发货市.内容 = 文本 局记录集. 读文本 (“fahuoqu”, 文本 )编辑框发货区.内容 = 文本 局记录集. 读文本 (“fahuodizhi”, 文本 )编辑框发货详细地址.内容 = 文本 局记录集. 读文本 (“shoujianren”, 文本 )编辑框收件人.内容 = 文本 局记录集. 读文本 (“shoujiandianhua”, 文本 )编辑框收件电话.内容 = 文本 局记录集. 读文本 (“shoujiansheng”, 文本 )编辑框收件省.内容 = 文本 局记录集. 读文本 (“shoujianshi”, 文本 )编辑框收件市.内容 = 文本 局记录集. 读文本 (“shoujianqu”, 文本 )编辑框收件区.内容 = 文本 局记录集. 读文本 (“shoujiandizhi”, 文本 )编辑框收件详细地址.内容 = 文本 局记录集. 关闭 ()删除按钮.标题 = “删除”删除按钮.背景颜色 = #表格常量 .警告按钮 编辑框订单时间.内容 = 时间_格式化 (取现行时间 (), “yyyy/M/d”, “ hh:mm:ss”, 真, )编辑框订单编号.内容 = 文本替换 (文本_只取数字部分 (时间_取现行时间 (真)), 1, 2, “DD”)组合框订单状态. 选择 (“未打印”)高级表格产品. 置组件 (1, 1, 删除按钮 )高级表格产品. 置数据 (1, 0, 1, “1”)高级表格产品. 置数据 (1, 2, 1, 文本替换 (编辑框订单编号.内容, 1, 2, “CP”)) 变量名 | 类 型 | 静态 | 数组 | 备 注 | 时间 | 时间成员 | | | 年 | 文本型 | | | 月 | 文本型 | | | 日 | 文本型 | | | 时 | 文本型 | | | 分 | 文本型 | | | 秒 | 文本型 | | | 毫 | 文本型 | | | 系统时间到毫秒 (时间 )年 = 到文本 (时间.取年份 ) + “年”月 = 到文本 (时间.取月份 ) + “月”日 = 到文本 (时间.取日 ) + “日”日 = 到文本 (时间.取日 ) + “日”时 = 到文本 (时间.取时 ) + “日”分 = 到文本 (时间.取分 ) + “分”秒 = 到文本 (时间.取秒 ) + “秒”毫 = 到文本 (时间.取毫 ) + “毫秒”如果真 (取毫秒 )返回 (年 + 月 + 日 + 时 + 分 + 秒 + 毫 )返回 (年 + 月 + 日 + 时 + 分 + 秒)变量名 | 类 型 | 静态 | 数组 | 备 注 | 局_计次 | 整数型 | | | 局_结果文本 | 文本型 | | | 计次循环首 (取文本长度 (参_文本 ), 局_计次 )如果真 (寻找文本 (“1234567890”, 取文本中间 (参_文本, 局_计次, 1 ), , 假) ≠ -1 )局_结果文本 = 局_结果文本 + 取文本中间 (参_文本, 局_计次, 1 )计次循环尾 ()返回 (局_结果文本 )高级表格产品. 置计算公式 (6, 7, 3, 8 )|
_高级表格产品_按钮被点击 | | | |
行号 | 整数型 | | | | 列号 | 整数型 | | | | 按钮索引 | 整数型 | | | | 按钮ID | 整数型 | | | |
高级表格产品. 删除行 (行号 )删除按钮.标题 = “删除” 删除按钮.背景颜色 = #表格常量 .警告按钮 高级表格产品. 插入行 (到文本 (高级表格产品.行数 ), 高级表格产品.行数 + 1 )高级表格产品. 置数据 (高级表格产品.行数 - 1, 2, 1, 文本替换 (编辑框订单编号.内容, 1, 2, “CP”)) 高级表格产品. 置组件 (高级表格产品.行数 - 1, 1, 删除按钮 )载入 (窗口历史订单, , 真)变量名 | 类 型 | 静态 | 数组 | 备 注 | 文本 | 文本型 | | | 局记录集 | 记录集 | | |
局记录集 = 全局记录集 局记录集. 打开 (“morendizhi”, 2, )局记录集. 读文本 (“fahuoren”, 文本 )编辑框发货人.内容 = 文本 局记录集. 读文本 (“fahuodianhua”, 文本 )编辑框发货电话.内容 = 文本 局记录集. 读文本 (“fahuosheng”, 文本 )编辑框发货省.内容 = 文本 局记录集. 读文本 (“fahuoshi”, 文本 )编辑框发货市.内容 = 文本 局记录集. 读文本 (“fahuoqu”, 文本 )编辑框发货区.内容 = 文本 局记录集. 读文本 (“xiangxidizhi”, 文本 )编辑框发货详细地址.内容 = 文本 局记录集. 关闭 ()变量名 | 类 型 | 静态 | 数组 | 备 注 | method | 文本型 | | | app_id | 文本型 | | | api_key | 文本型 | | | ts | 文本型 | | | sign | 文本型 | | | agent_id | 文本型 | | | json | json对象 | | | 数据包 | 类_POST数据类 | | | 解析 | 类_json | | | 结果 | 文本型 | | | 文本 | 文本型 | | | 局记录集 | 记录集 | | |
局记录集 = 全局记录集 局记录集. 打开 (“dayin”, 2, )局记录集. 读文本 (“method”, 文本 )method = 文本 局记录集. 读文本 (“app_id”, 文本 )app_id = 文本 局记录集. 读文本 (“api_key”, 文本 )api_key = 文本 ts = 时间_到时间戳 (, , 真) sign = 校验_取md5_文本 (app_id + method + ts + api_key, 假, 假, )局记录集. 读文本 (“agent_id”, 文本 )agent_id = 文本 数据包. 添加 (“method”, method, )数据包. 添加 (“app_id”, app_id, )数据包. 添加 (“sign”, sign, )数据包. 添加 (“ts”, ts, )json. 置文本 (“text”, 编辑框识别.内容, )数据包. 添加 (“data”, json. 到JSON (), 真)结果 = 编码_URL解码 (网页_访问S (“https://kop.kuaidihelp.com/api”, 1, 数据包. 获取Post数据 (), , , , , , , , , , , , , , , , , , ), 真)解析. 解析 (结果, , )编辑框收件人.内容 = 解析. 取通用属性 (“data[0].name”, )编辑框收件电话.内容 = 解析. 取通用属性 (“data[0].mobile”, )编辑框收件省.内容 = 解析. 取通用属性 (“data[0].province_name”, )编辑框收件市.内容 = 解析. 取通用属性 (“data[0].city_name”, )编辑框收件区.内容 = 解析. 取通用属性 (“data[0].county_name”, )编辑框收件详细地址.内容 = 解析. 取通用属性 (“data[0].detail”, )局记录集. 关闭 ()销毁 ()载入 (客户选择窗口, , 真)如果 (订单校验 () = 假)返回 ()写数据库 ()如果真 (高级表格产品.行数 < 2 )信息框 (“产品栏不能为空”, 0, , )_按钮新增产品_被单击 ()返回 (假)如果真 (组合框快递选择.内容 = “” 或 编辑框发货人.内容 = “” 或 编辑框发货电话.内容 = “” 或 编辑框发货省.内容 = “” 或 编辑框发货市.内容 = “” 或 编辑框发货区.内容 = “” 或 编辑框发货详细地址.内容 = “” 或 编辑框客户VX.内容 = “” 或 编辑框收件人.内容 = “” 或 编辑框收件电话.内容 = “” 或 编辑框收件省.内容 = “” 或 编辑框收件市.内容 = “” 或 编辑框收件市.内容 = “” 或 编辑框收件区.内容 = “” 或 编辑框收件详细地址.内容 = “”)信息框 (“请完善订单录入”, 0, , )返回 (假)计次循环首 (高级表格产品.行数 - 1,
|
|