#系统# #程序员#

前言

浙江客户的ERP系统，ORACLE数据库从32位升级64位，不知为何查询一下子很慢，但在32位上没有这个现像，郁闷。

没有问题不正常，否则不付款给我

实现功能

传入一个物料参数查询全局物料共用表中有那些物料同它是有共用关系。

表结构如下

键值(RKEY),物料1(INVT_PTR_1)，物料2(INVT_PTR_2)，物料3(INVT_PTR_3)，物料4(INVT_PTR_1)

只有1063条记录

————————————————

解决思路

没有优化前的代码，有多个同一表重复链接，因此要把它分离出来实现单表查询。

老板，马上解决哈

未优化的代码

1. sql.add('SELECT C.INV_PART_DESCRIPTION_C,SUM(A.QTY_BOM) QTY,C.INV_PART_NUMBER');
2. sql.add('FROM DATA0026 A,DATA0017 B,DATA0017 C'); ---DATA0026(BOM明细表148057条记录)，DATA0017(物料表21963)
3. sql.add('WHERE A.INVENTORY_PTR=B.RKEY');
4. sql.add('AND A.SOURCE_PTR=C.RKEY');
5. sql.add('AND C.TTYPE<>1');
6. sql.add('AND C.STATUS=1');
7. sql.add('AND ((B.RKEY='+Floattostr(minv)+')');--含传入物料参数本身
8. SQL.ADD('OR (B.RKEY IN (');
9. SQL.ADD('SELECT B.RKEY');
10. sql.add('FROM DATA0026_SHARE A,DATA0017 B'); --DATA0026_HARE(全局共用的料明细表1063条记录)
11. sql.add('WHERE (A.INVT_PTR_1=B.RKEY');
12. sql.add('OR A.INVT_PTR_2=B.RKEY');
13. sql.add('OR A.INVT_PTR_3=B.RKEY');
14. sql.add('OR A.INVT_PTR_4=B.RKEY');
15. sql.add(')');
16. sql.add('AND (A.INVT_PTR_1='+Floattostr(minv));--传入物料参数
17. sql.add('OR A.INVT_PTR_2='+Floattostr(minv));--传入物料参数
18. sql.add('OR A.INVT_PTR_3='+Floattostr(minv));-传入物料参数
19. sql.add('OR A.INVT_PTR_4='+Floattostr(minv)+')');-传入物料参数
20. SQL.add(')))');
21. Sql.add('GROUP BY C.INV_PART_DESCRIPTION_C,C.INV_PART_NUMBER')

从前面看，工程师写的代码是否有问题，你说没有问题(32位上OK)，但又觉得他有问题(64位上慢),叫DBA排查半天也不知所以然，干脆对代码动手术了。

优化后代码

1：先将共用物料的键值取出

with dmdatapublic.qrypublic do

begin

Close;

sql.clear;

sql.add('SELECT B.INVT_PTR_1,B.INVT_PTR_2,B.INVT_PTR_3,B.INVT_PTR_4');

sql.add('FROM DATA0026_SHARE B');

sql.add('WHERE B.INVT_PTR_1='+Floattostr(minv)+' OR B.INVT_PTR_2='+Floattostr(minv)+' OR B.INVT_PTR_3='+Floattostr(minv)+' OR B.INVT_PTR_4='+Floattostr(minv));

open;

minv1:=Fieldbyname('INVT_PTR_1').AsFloat;//查到变量1

minv2:=Fieldbyname('INVT_PTR_2').AsFloat;//查到变量2

minv3:=Fieldbyname('INVT_PTR_3').AsFloat;//查到变量3

minv4:=Fieldbyname('INVT_PTR_4').AsFloat;//查到变量4

close;

2：然后直接传递到

sql.add('SELECT C.INV_PART_DESCRIPTION_C,A.QTY_BOM QTY,C.INV_PART_NUMBER');

sql.add('FROM DATA0026 A,DATA0017 C');

sql.add('WHERE A.SOURCE_PTR=C.RKEY');

sql.add('AND C.TTYPE>1');

sql.add('AND ((A.INVENTORY_PTR='+Floattostr(minv)+')');

sql.add('OR (A.ALTER_INVENTORY_PTR>0 AND A.ALTER_INVENTORY_PTR='+Floattostr(minv)+')');

sql.add('OR (A.ALTER_INVENTORY_PTR_1>0 AND A.ALTER_INVENTORY_PTR_1='+Floattostr(minv)+')');

if minv1>0 then

SQL.ADD('OR (A.INVENTORY_PTR='+Floattostr(minv1)+')');

if minv2>0 then

SQL.ADD('OR (A.INVENTORY_PTR='+Floattostr(minv2)+')');

if minv3>0 then

SQL.ADD('OR (A.INVENTORY_PTR='+Floattostr(minv3)+')');

if minv4>0 then

SQL.ADD('OR (A.INVENTORY_PTR='+Floattostr(minv4)+')');

sql.add(')');

Sql.add('ORDER BY C.INV_PART_DESCRIPTION_C');