SQLcha询,长语句会死机问题

KD飞飞

（请忽略IP地址等敏感信息）

长语句
cha询按下去，程序就自己退出了

  

如果真 (外部数据库1.打开SQL数据库 (“192.168.00.000”, “00”, “0000”, “0000”, , ) ＝ 假)
返回 ()
超级列表框29.全部删除 ()
语句 ＝ “WITH PriceComparison AS (SELECT TC.TC001 AS DBB, TC.TC002 AS DHH, TD.TD001 AS DBB2, TD.TD002 AS DHH2, TD.TD003 AS XHH, TD.TD004 AS PHH, TD.TD005 AS PMM, TD.TD006 AS GGG, TD.TD010 AS CGDJ, MB.MB011 AS SDCGDJ, MB.MB014 AS SXRQ, TD.CREATE_DATE AS CJRQ, (MB.MB011 - TD.TD010) AS CHAE FROM PURTC TC INNER JOIN PURTD TD ON TD.TD001 = TC.TC001 AND TD.TD002 = TC.TC002 INNER JOIN (SELECT MB001, MB011, MB014, ROW_NUMBER() OVER (PARTITION BY MB001 ORDER BY MB014 DESC) as rn FROM PURMB) MB ON MB.MB001 = TD.TD004 AND MB.rn = 1 WHERE TC.TC014 = 'N' AND TD.TD004 <> '9999') SELECT DBB, DHH, DBB2, DHH2, XHH, PHH, PMM, GGG, CGDJ, SDCGDJ, SXRQ, CJRQ, CHAE FROM PriceComparison WHERE COALESCE(CHAE, 0) <> 0 ORDER BY DBB, DHH, XHH”
sql语句 ＝ 外部数据库1.cha询 (语句)
调试输出 (“运行完了”)

i支持库列表	支持库注释
iext	扩展界面支持库一
spec	特殊功能支持库

.版本 2<br /> .支持库 iext<br /> .支持库 spec<br /> <br /> .如果真 (外部数据库1.打开SQL数据库 (“192.168.00.000”, “00”, “0000”, “0000”, , ) ＝ 假)<br />     返回 ()<br /> .如果真结束<br /> 超级列表框29.全部删除 ()<br /> 语句 ＝ “WITH PriceComparison AS (SELECT TC.TC001 AS DBB, TC.TC002 AS DHH, TD.TD001 AS DBB2, TD.TD002 AS DHH2, TD.TD003 AS XHH, TD.TD004 AS PHH, TD.TD005 AS PMM, TD.TD006 AS GGG, TD.TD010 AS CGDJ, MB.MB011 AS SDCGDJ, MB.MB014 AS SXRQ, TD.CREATE_DATE AS CJRQ, (MB.MB011 - TD.TD010) AS CHAE FROM PURTC TC INNER JOIN PURTD TD ON TD.TD001 = TC.TC001 AND TD.TD002 = TC.TC002 INNER JOIN (SELECT MB001, MB011, MB014, ROW_NUMBER() OVER (PARTITION BY MB001 ORDER BY MB014 DESC) as rn FROM PURMB) MB ON MB.MB001 = TD.TD004 AND MB.rn = 1 WHERE TC.TC014 = 'N' AND TD.TD004 <> '9999') SELECT DBB, DHH, DBB2, DHH2, XHH, PHH, PMM, GGG, CGDJ, SDCGDJ, SXRQ, CJRQ, CHAE FROM PriceComparison WHERE COALESCE(CHAE, 0) <> 0 ORDER BY DBB, DHH, XHH”<br /> sql语句 ＝ 外部数据库1.cha询 (语句)<br /> <br /> 调试输出 (“运行完了”)

短语句，cha询按下去一点事没有

  

如果真 (外部数据库1.打开SQL数据库 (“192.168.00.000”, “00”, “000”, “000”, , ) ＝ 假)
返回 ()
超级列表框29.全部删除 ()
语句 ＝ “SELECT *FROM PURTD WHERE SUBSTRING(CREATE_DATE, 1, 8) = '20251111';”
sql语句 ＝ 外部数据库1.cha询 (语句)
调试输出 (“运行完了”)

i支持库列表	支持库注释
iext	扩展界面支持库一
spec	特殊功能支持库

.版本 2<br /> .支持库 iext<br /> .支持库 spec<br /> <br /> .如果真 (外部数据库1.打开SQL数据库 (“192.168.00.000”, “00”, “000”, “000”, , ) ＝ 假)<br />     返回 ()<br /> .如果真结束<br /> 超级列表框29.全部删除 ()<br /> 语句 ＝ “SELECT *FROM PURTD WHERE SUBSTRING(CREATE_DATE, 1, 8) = '20251111';”<br /> sql语句 ＝ 外部数据库1.cha询 (语句)<br /> <br /> 调试输出 (“运行完了”)

可能是多表联查多了，我不清楚原因


补充内容 (2025-11-17 11:09):
完整语句在二楼

没事瞎琢磨

在数据管理软件执行下看有没有问题 先确定是哪个环节出问题

KD飞飞

完整语句

  

WITH PriceComparison AS (
SELECT
TC.TC001 AS DBB,
TC.TC002 AS DHH,
TD.TD001 AS DBB2,
TD.TD002 AS DHH2,
TD.TD003 AS XHH,
TD.TD004 AS PHH,
TD.TD005 AS PMM,
TD.TD006 AS GGG,
TD.TD010 AS CGDJ,
MB.MB011 AS SDCGDJ,
MB.MB014 AS SXRQ,
TD.CREATE_DATE AS CJRQ,
(MB.MB011 - TD.TD010) AS CHAE
FROM PURTC TC
INNER JOIN PURTD TD ON TD.TD001 = TC.TC001 AND TD.TD002 = TC.TC002
INNER JOIN (
SELECT
MB001,
MB011,
MB014,
ROW_NUMBER () OVER (PARTITION BY MB001 ORDER BY MB014 DESC) as rn
FROM PURMB
) MB ON MB.MB001 = TD.TD004 AND MB.rn = 1
WHERE TC.TC014 = ' N'
AND TD.TD004 <> ' 9999'
)
SELECT
DBB,
DHH,
DBB2,
DHH2,
XHH,
PHH,
PMM,
GGG,
CGDJ,
SDCGDJ,
SXRQ,
CJRQ,
CHAE
FROM PriceComparison
WHERE COALESCE (CHAE, 0) <> 0  
ORDER BY DBB, DHH, XHH

WITH PriceComparison AS (<br />     SELECT <br />         TC.TC001 AS DBB,<br />         TC.TC002 AS DHH,<br />         TD.TD001 AS DBB2,<br />         TD.TD002 AS DHH2,<br />         TD.TD003 AS XHH,<br />         TD.TD004 AS PHH,<br />         TD.TD005 AS PMM,<br />         TD.TD006 AS GGG,<br />         TD.TD010 AS CGDJ,<br />         MB.MB011 AS SDCGDJ,<br />         MB.MB014 AS SXRQ,<br />         TD.CREATE_DATE AS CJRQ,<br />         (MB.MB011 - TD.TD010) AS CHAE<br />     FROM PURTC TC<br />     INNER JOIN PURTD TD ON TD.TD001 = TC.TC001 AND TD.TD002 = TC.TC002<br />     INNER JOIN (<br />         SELECT <br />             MB001,<br />             MB011,<br />             MB014,<br />             ROW_NUMBER() OVER (PARTITION BY MB001 ORDER BY MB014 DESC) as rn<br />         FROM PURMB<br />     ) MB ON MB.MB001 = TD.TD004 AND MB.rn = 1<br />     WHERE TC.TC014 = 'N'<br />       AND TD.TD004 <> '9999'<br /> )<br /> SELECT <br />     DBB,<br />     DHH,<br />     DBB2,<br />     DHH2,<br />     XHH,<br />     PHH,<br />     PMM,<br />     GGG,<br />     CGDJ,<br />     SDCGDJ,<br />     SXRQ,<br />     CJRQ,<br />     CHAE<br /> FROM PriceComparison<br /> WHERE COALESCE(CHAE, 0) <> 0  <br /> ORDER BY DBB, DHH, XHH

东京热

优化说明:
增加第二层CTE:将过滤条件提取到独立的CTE中，使查询逻辑更清晰
详细注释:为每个字段和查询逻辑添加了中文注释，便于理解
查询结构优化:
将ROW NUMBER()子查询独立出来，提高可读性
将过滤条件分离到专门的CTE中
性能考虑:
保持了原有的索引友好JOIN条件
CTE结构便于数据库优化器进行优化
可维护性:清晰的分层结构便于后续修改和维护

  

-- 采购价格对比查询，用于分析采购单价格与市场参考价的差异[/size][/font]
[/b][/color]
-- 通过CTE结构化查询，提高可读性和性能
WITH PriceComparison AS (
-- 主查询：关联采购主表、明细表和市场参考表
SELECT
TC.TC001 AS DBB,          -- 采购单编号
TC.TC002 AS DHH,          -- 采购单号
TD.TD001 AS DBB2,         -- 明细单编号
TD.TD002 AS DHH2,         -- 明细单号
TD.TD003 AS XHH,          -- 序号
TD.TD004 AS PHH,          -- 品号
TD.TD005 AS PMM,          -- 品名
TD.TD006 AS GGG,          -- 规格
TD.TD010 AS CGDJ,         -- 采购单价
MB.MB011 AS SDCGDJ,       -- 市场参考单价
MB.MB014 AS SXRQ,         -- 生效日期
TD.CREATE_DATE AS CJRQ,   -- 创建日期
(MB.MB011 - TD.TD010) AS CHAE  -- 价格差异（市场价-采购价）
FROM PURTC TC
-- 内连接采购明细表，获取详细采购信息
INNER JOIN PURTD TD ON TD.TD001 = TC.TC001
AND TD.TD002 = TC.TC002
-- 内连接市场参考表，获取最新市场参考价
INNER JOIN (
-- 子查询：获取每个品号最新的市场参考价记录
SELECT
MB001,                    -- 品号
MB011,                    -- 市场参考单价
MB014,                    -- 生效日期
ROW_NUMBER () OVER (
PARTITION BY MB001   -- 按品号分组
ORDER BY MB014 DESC  -- 按生效日期降序排序
) as rn                   -- 行号，用于获取最新记录
FROM PURMB
) MB ON MB.MB001 = TD.TD004 AND MB.rn = 1  -- 关联最新市场参考价
-- 过滤条件：只处理未关闭的采购单，排除特殊品号 ' 9999'
WHERE TC.TC014 = ' N'      -- 采购单状态为未关闭
AND TD.TD004 <> ' 9999'  -- 排除特殊品号
),
FilteredResults AS (
-- 第二层CTE：过滤价格差异不为0的记录
SELECT
DBB, DHH, DBB2, DHH2, XHH, PHH, PMM, GGG,
CGDJ, SDCGDJ, SXRQ, CJRQ, CHAE
FROM PriceComparison
WHERE COALESCE (CHAE, 0) <> 0  -- 排除价格差异为0或NULL的记录
)
-- 最终结果：按采购单、明细单、序号排序
SELECT
DBB,     -- 采购单编号
DHH,     -- 采购单号
DBB2,    -- 明细单编号
DHH2,    -- 明细单号
XHH,     -- 序号
PHH,     -- 品号
PMM,     -- 品名
GGG,     -- 规格
CGDJ,    -- 采购单价
SDCGDJ,  -- 市场参考单价
SXRQ,    -- 生效日期
CJRQ,    -- 创建日期
CHAE     -- 价格差异
FROM FilteredResults
ORDER BY DBB, DHH, XHH;  -- 按采购单编号、单号、序号排序

-- 采购价格对比查询，用于分析采购单价格与市场参考价的差异</font></font><br /> </strong></font><br /> <br /> -- 通过CTE结构化查询，提高可读性和性能<br /> WITH PriceComparison AS (<br />     -- 主查询：关联采购主表、明细表和市场参考表<br />     SELECT <br />         TC.TC001 AS DBB,          -- 采购单编号<br />         TC.TC002 AS DHH,          -- 采购单号<br />         TD.TD001 AS DBB2,         -- 明细单编号<br />         TD.TD002 AS DHH2,         -- 明细单号<br />         TD.TD003 AS XHH,          -- 序号<br />         TD.TD004 AS PHH,          -- 品号<br />         TD.TD005 AS PMM,          -- 品名<br />         TD.TD006 AS GGG,          -- 规格<br />         TD.TD010 AS CGDJ,         -- 采购单价<br />         MB.MB011 AS SDCGDJ,       -- 市场参考单价<br />         MB.MB014 AS SXRQ,         -- 生效日期<br />         TD.CREATE_DATE AS CJRQ,   -- 创建日期<br />         (MB.MB011 - TD.TD010) AS CHAE  -- 价格差异（市场价-采购价）<br />     FROM PURTC TC<br />     -- 内连接采购明细表，获取详细采购信息<br />     INNER JOIN PURTD TD ON TD.TD001 = TC.TC001 <br />                         AND TD.TD002 = TC.TC002<br />     -- 内连接市场参考表，获取最新市场参考价<br />     INNER JOIN (<br />         -- 子查询：获取每个品号最新的市场参考价记录<br />         SELECT <br />             MB001,                    -- 品号<br />             MB011,                    -- 市场参考单价<br />             MB014,                    -- 生效日期<br />             ROW_NUMBER() OVER (<br />                 PARTITION BY MB001   -- 按品号分组<br />                 ORDER BY MB014 DESC  -- 按生效日期降序排序<br />             ) as rn                   -- 行号，用于获取最新记录<br />         FROM PURMB<br />     ) MB ON MB.MB001 = TD.TD004 AND MB.rn = 1  -- 关联最新市场参考价<br />     -- 过滤条件：只处理未关闭的采购单，排除特殊品号'9999'<br />     WHERE TC.TC014 = 'N'      -- 采购单状态为未关闭<br />       AND TD.TD004 <> '9999'  -- 排除特殊品号<br /> ),<br /> FilteredResults AS (<br />     -- 第二层CTE：过滤价格差异不为0的记录<br />     SELECT <br />         DBB, DHH, DBB2, DHH2, XHH, PHH, PMM, GGG,<br />         CGDJ, SDCGDJ, SXRQ, CJRQ, CHAE<br />     FROM PriceComparison<br />     WHERE COALESCE(CHAE, 0) <> 0  -- 排除价格差异为0或NULL的记录<br /> )<br /> -- 最终结果：按采购单、明细单、序号排序<br /> SELECT <br />     DBB,     -- 采购单编号<br />     DHH,     -- 采购单号<br />     DBB2,    -- 明细单编号<br />     DHH2,    -- 明细单号<br />     XHH,     -- 序号<br />     PHH,     -- 品号<br />     PMM,     -- 品名<br />     GGG,     -- 规格<br />     CGDJ,    -- 采购单价<br />     SDCGDJ,  -- 市场参考单价<br />     SXRQ,    -- 生效日期<br />     CJRQ,    -- 创建日期<br />     CHAE     -- 价格差异<br /> FROM FilteredResults<br /> ORDER BY DBB, DHH, XHH;  -- 按采购单编号、单号、序号排序

KD飞飞

没事瞎琢磨 发表于 2025-11-17 11:28
在数据管理软件执行下看有没有问题 先确定是哪个环节出问题

问题出在  就是后进行计算的嵌套，
这个指令易语言不支持
WITH PriceComparison AS (