XinYu_LZMES/WebRoot/WEB-INF/query/E01/UIE041040-query.xml

<?xml version="1.0" encoding='UTF-8'?>

<queryMap desc="">
    <query id="UIE041040.OrdPrc.Select" desc="it's query from TBE02_ORDSTS Table" fetchSize="10">
        <![CDATA[
        
SELECT A.ORD_NO -- 合同号  
      ,
       'false' CHK,
       A.ORD_SEQ -- 订单号     
      ,
       XB_PACKAGE.GF_CUSTOMER_FIND(A.CUST_CD) CUST_CD -- 客户代码                                                                    
      ,
       XB_PACKAGE.GF_COMNNAME_FIND('E01001', A.ORD_PROG_CD) ORD_PROG_CD -- 订单进度代码         
      ,
       XB_PACKAGE.GF_COMNNAME_FIND('A01004', A.PRD_TY) PRODNM_CD -- 交货状态 
       
      ,
       A.H_SPEC_STL_GRD,
       A.C_SPEC_STL_GRD --冷轧牌号            
      ,
       A.C_SPEC_ABBSYM -- 冷轧标准号 
       
      ,
       B.MK_CONTENT --订单备注    
      ,
       B.ORD_PLAN_DATA --订单预排期  
      ,
       A.MILL_DUE_DATE --热轧交货期
      ,
       A.DEL_TO_DATE -- 交货日期（到达）   
       
      ,
       A.C_ORD_THK,
       A.C_ORD_WTH,
       A.C_ORD_LEN,
       A.C_ORD_WTH_MIN,
       A.C_ORD_WTH_MAX,
       A.C_ORD_THK_MIN,
       A.C_ORD_THK_MAX
       
      ,
       A.ORD_THK -- 订单厚度                                                                    
      ,
       A.ORD_WTH -- 订单宽度 
       /*,SUMORDWGT(A.ORD_NO,A.ORD_SEQ,'H') HOTORDWGT
                                 ,SUMORDWGT(A.ORD_NO,A.ORD_SEQ,'S') SUANORDWGT
                                 ,SUMORDWGT(A.ORD_NO,A.ORD_SEQ,'C') LTORDWGT*/,
       to_char(PKG_QUALITY_COMM.FID070010(A.ORD_NO, A.ORD_SEQ), '99999999') HOTORDWGT,
       to_char(PKG_QUALITY_COMM.FID070011(A.ORD_NO, A.ORD_SEQ), '99999999') SUANORDWGT,
       to_char(PKG_QUALITY_COMM.FID070012(A.ORD_NO, A.ORD_SEQ), '99999999') LTORDWGT,
       to_char(PKG_QUALITY_COMM.FID0700111(A.ORD_NO, A.ORD_SEQ), '99999999') SXORDWGT,
       A.ORD_UNIT_WGT_MIN -- 订单单重量下限                                                     
      ,
       A.ORD_UNIT_WGT_MAX -- 订单单重量上限
       
      ,
       to_char(A.ORD_WGT,'99999999') ORD_WGT -- 订单重量                                                                    
      ,
       A.WGT_ACVAL_MIN -- 交付允许误差最小                                                      
      ,
       A.WGT_ACVAL_MAX -- 交付允许误差最大
       
       --PKG_QUALITY_COMM.FID070010(A.ORD_NO, A.ORD_SEQ) SUM_WGT,  --生产量  
      ,
       to_char(NVL(A.ORD_PRC_WGT, 0) + NVL(A.PROD_END_WGT, 0) +
               NVL(A.SHIP_END_WGT, 0),
               '99999999') SUM_WGT --生产量
      ,
       to_char(A.HOT_ROLL_END_WGT, '99999999') HOT_ROLL_END_WGT --热轧转运量                              
      ,
       to_char(DECODE(A.ORD_PROG_CD, 'G', 0, A.ORD_REM_WGT), '99999999') ORD_REM_WGT -- 订单未生产量    
       
      ,
       CASE
         WHEN DECODE(A.ORD_PROG_CD, 'G', 0, A.ORD_REM_WGT) >= 0 THEN
          DECODE(A.ORD_PROG_CD, 'G', 0, A.ORD_REM_WGT)
         WHEN DECODE(A.ORD_PROG_CD, 'G', 0, A.ORD_REM_WGT) < 0 THEN
          0
       END ORD_REM_WGT2
       
      ,
       (SELECT SUM(TOT_WGT)
          FROM TBE02_ORD_PRC_DET
         WHERE ORD_NO = A.ORD_NO
           AND ORD_SEQ = A.ORD_SEQ
           AND PROC_CD IN ('JB', 'JR', 'JC', 'JL')) LG -- 炼钢                                  
      ,
       (SELECT SUM(TOT_WGT)
          FROM TBE02_ORD_PRC_DET
         WHERE ORD_NO = A.ORD_NO
           AND ORD_SEQ = A.ORD_SEQ
           AND PROC_CD = 'JJ') LZ -- 连铸                                                       
      ,
       (SELECT SUM(TOT_WGT)
          FROM TBE02_ORD_PRC_DET
         WHERE ORD_NO = A.ORD_NO
           AND ORD_SEQ = A.ORD_SEQ
           AND PROC_CD IN ('RA', 'RB', 'RC')) ZG -- 轧钢 
      ,
       (SELECT SUM(WRK_WGT)
          FROM TBE02_ORD_PRC_DET
         WHERE ORD_NO = A.ORD_NO
           AND ORD_SEQ = A.ORD_SEQ
           AND PROC_CD = 'PA') JZ,
       (SELECT SUM(TOT_WGT)
          FROM TBE02_ORD_PRC_DET
         WHERE ORD_NO = A.ORD_NO
           AND ORD_SEQ = A.ORD_SEQ
           AND PROC_CD IN ('SB', 'SD', 'SE')) RZZH -- 综合判定 
           
           ,(SELECT SUM(TOT_WGT)
          FROM TBE02_ORD_PRC_DET
         WHERE ORD_NO = A.ORD_NO
           AND ORD_SEQ = A.ORD_SEQ
           AND PROC_CD IN ('SP')) PZ -- 平整 
      ,
       (SELECT SUM(TOT_WGT)
          FROM TBE02_ORD_PRC_DET
         WHERE ORD_NO = A.ORD_NO
           AND ORD_SEQ = A.ORD_SEQ
           AND PROC_CD IN ('DE')) LZZH -- 冷轧综合判定      
      ,
       (SELECT SUM(INS_WGT + WRK_WGT)
          FROM TBE02_ORD_PRC_DET
         WHERE ORD_NO = A.ORD_NO
           AND ORD_SEQ = A.ORD_SEQ
           AND PROC_CD IN ('SG', 'SF')) RZYS -- 热轧移送   
      ,
       (SELECT SUM(TOT_WGT)
          FROM TBE02_ORD_PRC_DET
         WHERE ORD_NO = A.ORD_NO
           AND ORD_SEQ = A.ORD_SEQ
           AND PROC_CD = 'PC') SZ -- 酸轧 
      ,
       (SELECT SUM(TOT_WGT)
          FROM TBE02_ORD_PRC_DET
         WHERE ORD_NO = A.ORD_NO
           AND ORD_SEQ = A.ORD_SEQ
           AND PROC_CD = 'CC') LT -- 连退
      ,
       (SELECT SUM(TOT_WGT)
          FROM TBE02_ORD_PRC_DET
         WHERE ORD_NO = A.ORD_NO
           AND ORD_SEQ = A.ORD_SEQ
           AND PROC_CD = 'DB') CJ --  重卷   
      ,
       (SELECT SUM(TOT_WGT)
          FROM TBE02_ORD_PRC_DET
         WHERE ORD_NO = A.ORD_NO
           AND ORD_SEQ = A.ORD_SEQ
           AND PROC_CD = 'DC') BZ -- 包装   
      ,
       to_char(C_PKG_OS_COMM.GET_COIL_WGT_DF(A.ORD_NO, A.ORD_SEQ, 'DFA'),
               '99999999') DDA -- 发货指示
      ,
       to_char(C_PKG_OS_COMM.GET_COIL_WGT_DF(A.ORD_NO, A.ORD_SEQ, 'DFB'), 
       '99999999') DDB -- 发货作业
      , to_char(A.SHIP_END_WGT, '99999999') SHIP_END_WGT -- 发货完重量                                                             
      , K.DSN_CMT_DATE DSN_DATE, A.SMS_DUE_DATE --炼钢完成期限                                                          
      , A.MILL_DUE_DATE --热轧完成期限                                                          
      , A.PLTCM_DUE_DATE --酸轧完成期限                                                          
      , A.CAL_DUE_DATE --连退完成期限                                                          
      , A.PROD_END_DATE --生产结束时间    
      , A.SHIP_END_DATE --发货结束时间                                                 
      , XB_PACKAGE.GF_COMNNAME_FIND('A01012', B.DLIV_TP) DLIV_TP --运输方式                                                      
      , B.XSQY --销售区域
      , B.TRTMTH_TP --冷轧交货状态    
      ,CASE
         WHEN A.CUST_SPEC_NO_INGR IS NOT NULL OR
              A.CUST_SPEC_NO_QLTY IS NOT NULL OR
              A.CUST_SPEC_NO_DEL IS NOT NULL THEN
          'Y'
         WHEN A.CUST_SPEC_NO_INGR IS NULL AND A.CUST_SPEC_NO_QLTY IS NULL AND
              A.CUST_SPEC_NO_DEL IS NULL THEN
          'N'
       END INGR_YN --特殊要求                                                                
      , XB_PACKAGE.GF_COMNNAME_FIND('B01004', A.PROD_LINE) PROD_LINE -- 产线                           
      , (SELECT TO_CHAR(WMSYS.WM_CONCAT(XB_PACKAGE.GF_COMNNAME_FIND('E04002',
                                                                     COLUMN_VALUE)))
            FROM TABLE(XB_PACKAGE.GF_TABSTR(A.ORD_PRC_LOCK, '|'))) ORD_PRC_LOCK, B.C_ORD_INDIA, --冷轧卷内径  
       A.C_EXTSHAPE_REQ, --外观
       PKG_QUALITY_COMM.FZ00_COMM('A01010', B.PAKMTH_TP) PAKMTH_TP, --包装  
     --  DECODE(K.EDGE_PROC_YN, NULL, 'N', K.EDGE_PROC_YN) EDGE_PROC_YN --切边  
       DECODE(A.EDGE_PROC_YN, NULL, 'N', A.EDGE_PROC_YN) EDGE_PROC_YN --切边 
       ,A.ANNOITA_YN   --涂油                                                     
       FROM TBE02_ORD_PRC A, TBA01_ORD_LINE B -- 订单进程表                                                            
      , TBZ00_CUSTOMER C --客户公共表    
      , TBB01_ORD_HEAD K --品质设计结果                                         
      , (SELECT A.ORD_NO, A.ORD_SEQ, SUM(A.ACT_WGT) WGT_IN_DEL
            FROM TBH02_COIL_COMM A, TBE02_ORD_PRC B
           WHERE A.ORD_NO = B.ORD_NO
             AND A.ORD_SEQ = B.ORD_SEQ
             AND A.ORD_FL = '1'
             AND A.TRNF_DTIME > B.DEL_TO_DATE
           GROUP BY (A.ORD_NO, A.ORD_SEQ)) M WHERE '1' = '1' AND A.ORD_NO = B.ORD_NO(+) AND A.ORD_SEQ = B.ORD_SEQ(+) AND A.ORD_NO = K.ORD_NO(+) AND A.ORD_SEQ = K.ORD_SEQ(+) AND A.ORD_NO = M.ORD_NO(+) AND A.ORD_SEQ = M.ORD_SEQ(+) AND A.CUST_CD = C.CUST_CD(+) AND A.PROD_LINE = 'C' AND A.ORD_NO LIKE :1 || '%' -- 参数：合同号                                                     
       AND A.ORD_SEQ LIKE :2 || '%' -- 参数：订单号                                                   
       AND A.PRD_TY LIKE :3 || '%' -- 参数：产品代码                                              
       AND (:4 IS NULL OR A.ORD_PROG_CD IN (SELECT COLUMN_VALUE
                                        FROM TABLE(CAST(XB_PACKAGE.GF_TABSTR(:5) AS
                                                        TABSTR_T)))) AND A.ABNOR_ORD_CD || '&' LIKE :6 || '%' -- 参数：异常订单类型代码                            
       AND C.CUST_NM LIKE '%' || :7 || '%' --参数：客户名称                                          
       AND A.H_SPEC_STL_GRD || '&' LIKE :8 || '%' -- 参数：钢号                                      
       AND A.C_SPEC_STL_GRD || '&' LIKE :9 || '%' -- 参数：钢号                                      
       AND A.DEL_TO_DATE BETWEEN :10 AND :11 -- 参数：交货日期（到达）                               
       AND (:12 IS NULL OR A.RCVORD_CLF IN (SELECT COLUMN_VALUE
                                        FROM TABLE(CAST(XB_PACKAGE.GF_TABSTR(:13) AS
                                                        TABSTR_T))))
       --AND               NVL(B.ORD_PLAN_DATA, A.DEL_TO_DATE) BETWEEN NVL(:14, '0000000') AND NVL(:15, '99999999')                                                                      
       AND B.DLIV_TP || '&' LIKE :14 || '%' --运输方式，查询条件TL 091209                            
       --AND               A.ORD_WTH BETWEEN NVL(:15, 0) AND NVL(:16, 99999999)                                      
       --AND               A.ORD_THK BETWEEN NVL(:17, 0) AND NVL(:18, 99999999)                                      
       --AND               A.C_ORD_WTH BETWEEN NVL(:19, 0) AND NVL(:20, 99999999)                                    
       --AND               A.C_ORD_THK BETWEEN NVL(:21, 0) AND NVL(:22, 99999999)                                    
       AND B.XSQY || '&' LIKE :23 || '%' AND NVL(:24, 'NULL') IN (SELECT *
                                                              FROM TABLE(XB_PACKAGE.GF_TABSTR(A.ORD_PRC_LOCK,
                                                                                              '|'))
                                                            UNION ALL
                                                            SELECT 'NULL'
                                                              FROM DUAL) ORDER BY A.ORD_NO, A.ORD_SEQ     
        ]]>
    </query>
</queryMap>