ServiceMesToJh/WebRoot/WEB-INF/query/sqsql.xml

<?xml version="1.0" encoding='UTF-8'?>
<queryMap desc="生产规范实绩值获得及判定">
  
	<query id="UIB010180_01.INITSELECT" desc="">
		SELECT T.SM_CD VALUE , T.SM_CFNM LABEL FROM TBZ00_COMMCD T WHERE T.LG_CD = 'E01002'
	</query>
     <query id="UIB010180_01.SELECT" desc="获得有对应规范标准的钢卷" fetchSize="10">  
        <![CDATA[
		 SELECT A.COIL_NO,
       A.SLAB_NO,
       B.SM_CSNM CUR_PROG_CD,
       A.CUR_LOAD_LOC,
       A.STL_GRD SPEC_STL_GRD,
       A.COIL_THK,
       A.COIL_WTH,
       A.COIL_LEN,
       A.ACT_WGT,
       C.C_SPEC_STL_GRD,
       C.C_ORD_THK,
       C.C_ORD_WTH,
       C.C_ORD_LEN,
       C.C_PRODNM_CD PRODNM_CD,
       C.C_EXTSHAPE_REQ,
       F.SM_CFNM PACK_METHOD,
       C.ORD_NO,
       C.ORD_SEQ,
       C.ORD_UNIT_WGT_MIN,
       C.ORD_UNIT_WGT_MAX,
       C.DEL_TO_DATE,
       DECODE(C.ORD_PROG_CD, 'G', 0, C.ORD_REM_WGT) ORD_REM_WGT,
       C.ORD_WGT,
       D.CUST_NM ORDCUST_CD,
       E.SM_CFNM DEST_CD,
       ROUND(SYSDATE - TO_DATE(A.RECEIVE_TIME, 'YYYY-MM-DD HH24:MI:SS'), 1) COLDTIME,
       'FALSE' FLAG,
       C.PROD_LINE,
       C_PKG_UIF.F_FUN_GET_FACEBUG(CRK_CD1,
                                   CRK_CD2,
                                   CRK_CD3,
                                   CRK_CD4,
                                   CRK_CD5) BUG,
       DECODE(C.EDGE_PROC_YN, 'Y', '√', NULL) EDGE_PROC_YN,
       H.C_ORD_INDIA,
       DECODE((SELECT COUNT(COIL_NO)
                FROM C_TBK02_COIL_COMM_D
               WHERE COIL_NO = A.COIL_NO),
              '0',
              '',
              '1',
              '',
              '2','2','3','3','大于三') CUT,
       C.MK_CONTENT,
       a.LZREMARK,
        XB_PACKAGE.GF_COMNNAME_FIND('A01004', C.PRD_TY) CPLX,
        (SELECT T1.SPM_RMK FROM TBH02_COIL_COMM T1 WHERE T1.OLD_SAMPL_NO=A.OLD_SAMPL_NO AND ROWNUM=1) RZBZ,
        (SELECT T1.SLAB_DCS_DETAIL FROM TBG02_SLAB_COMM T1 WHERE T1.SLAB_NO=A.SLAB_NO AND ROWNUM=1) BPBZ
  FROM C_TBK02_COIL_COMM A,
       TBE02_ORD_PRC     C,
       TBZ00_COMMCD      B,
       TBZ00_CUSTOMER    D,
       TBZ00_COMMCD      E,
       TBZ00_COMMCD      F,
       TBA01_ORD_LINE    H
       
 WHERE A.ORD_NO = C.ORD_NO
   AND A.ORD_SEQ = C.ORD_SEQ
   AND A.ORD_NO = H.ORD_NO
   AND A.ORD_SEQ = H.ORD_SEQ
   AND A.CUR_PROG_CD = B.SM_CD
   AND C.ORDCUST_CD = D.CUST_CD
   AND C.DEST_CD = E.SM_CD(+)
   AND F.LG_CD = 'A01010'
   AND C.PACK_METHOD = F.SM_CD(+)
   AND A.COIL_STAT = '2'
   AND A.ORD_FL = '1'
   AND A.FL = '0'
   AND A.FB_YN='N'--20220314封闭卷不允许
   AND A.CUR_LOAD_LOC LIKE '1%'
   AND C.PROD_LINE IN ('C', 'P') 
        ]]>   
    </query>
	
	<query id="UIB010180_02.SELECT" desc="通过钢卷号获取对应的规范标准信息及实绩值">
	 	  SELECT C.OLD_SAMPL_NO, --钢卷号
       AA.DSN_KIND,
       AA.PROD_CD,
       AA.PROD_CD_CFNM,
       AA.PROD_TYPE,
       AA.DCS_SYM,
       AA.PROD_VAL,
       AA.PROD_VAL_EXP1,
       AA.PROD_VAL_EXP2,
       AA.PROD_VAL_EXP3,
       AA.MEMO
  FROM (SELECT  ORD.ORD_NO ORD_NO,
               ORD.ORD_SEQ ORD_SEQ,
               ORD.DSN_KIND DSN_KIND,
               ORD.PROD_CD PROD_CD,
               SP.PROD_CD_CFNM PROD_CD_CFNM,
               SP.DISPLAY_SEQ,
               SUBSTR(ORD.PROD_CD, 1, 4) PROD_CD_4,
               ORD.PROD_TYPE PROD_TYPE,
               ORD.DCS_SYM DCS_SYM,
               ORD.PROD_VAL PROD_VAL,
               ORD.PROD_VAL_EXP1 PROD_VAL_EXP1,
               ORD.PROD_VAL_EXP2 PROD_VAL_EXP2,
               ORD.PROD_VAL_EXP3 PROD_VAL_EXP3,
               ORD.MEMO MEMO
          FROM TBA01_ORD_LINE LIN,
               TBB01_ORD_TECH ORD,
               TBB01_ORD_HEAD OHD,
               TBB01_SEQ_PROD SP
         WHERE LIN.ORD_NO = ORD.ORD_NO
           AND LIN.ORD_SEQ = ORD.ORD_SEQ
           AND ORD.ORD_NO = OHD.ORD_NO
           AND ORD.ORD_SEQ = OHD.ORD_SEQ
           AND ORD.PROD_CD = SP.PROD_CD
           AND ORD.DSN_KIND = '2') AA,
           C_TBK02_COIL_COMM C
 WHERE AA.ORD_NO = C.ORD_NO
 AND AA.ORD_SEQ = C.ORD_SEQ
 AND C.OLD_SAMPL_NO = 
	</query>
	
	<query id="UIB010180_03.SELECT" desc="判断某钢卷项目是否存在">
			SELECT  *   FROM    TBB02_DCS_TECH     T 
						WHERE      T.COIL_NO   =   ? 
						AND        T.PROD_CD   =   ? 
	</query>
	
	<query id="UIB010180_01.INSERT" fetchSize="" desc="生产规范判定结果录入">
		INSERT   INTO   TBB02_DCS_TECH(  
    	                COIL_NO,
		                PROD_CD,
						PROD_DCS_RST,
						PROD_DCS_TP,
						PROD_DCS_DTIME,
						REG_ID,
						REG_DTIME  
		) VALUES(?,?,?,?,TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS'),?,TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS'))
	</query>
	<query id="UIB010180_01.UPDATE" fetchSize="" desc="生产规范判定结果修改">
		 UPDATE         TBB02_DCS_TECH SET 
		               	PROD_DCS_RST    = ?  --判定结果
		               ,PROD_DCS_TP     = ?  --判定类型
		               ,PROD_DCS_DTIME  = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')  --判定时间
					   ,REG_ID          = ?  --修改人
					   ,MOD_DTIME       =    TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')  --修改日期
		 WHERE          COIL_NO         = ?  --钢卷号
		 AND            PROD_CD         = ?  --规范代码
	</query>
	
	<query id="UIB010180_01.CALLSTATEMENT" desc="成分判定">
		{call ZL_HOST_DCS01.NIB028010(?,?,?,?,?,?,?)}
	</query>
	
	<query id="UIB010180_06.UPDATE" desc="更新ASK_TP">
	<![CDATA[
		UPDATE       TBG02_SLAB_COMM 	T
		SET          T.ASK_TP='0'
		WHERE        T.SLAB_NO=? AND (T.ASK_TP IS NULL OR T.ASK_TP!='1') AND T.SLAB_STAT='2'
	]]>
	</query>
	<query id="UIF023010.insertSCH_MILL" desc="查询配置的宽度组" fetchSize="10">
        <![CDATA[
/*************************************************************************************/
	
INSERT INTO TBF02_SCH_MILL M
SELECT      (SELECT NVL(MAX(SLAB_EDT_SEQ ),0) + 1 FROM TBF02_SCH_MILL ) SLAB_EDT_SEQ   --  板坯编制号
            ,A.SLAB_NO                                                                 --  板坯号
            ,''                                                                        --  钢卷号
            ,'A0001'                                                                   --  轧辊号
            ,(SELECT NVL(MAX(ROLL_SLAB_SEQ),0) + 1 FROM TBF02_SCH_MILL ) ROLL_SLAB_SEQ --  轧辊内顺序
            ,''                                                                        --  LOT号
            ,0                                                                         --  LOT内钢卷个数
            ,0                                                                         --  LOT内钢卷编号
            ,H.PRDNM_CD PRODNM_CD                                                     --  产品代码
            ,A.STL_GRD                                                                 --  钢号
            ,D.FAC_STL_GRP                                                             --  钢号组
            ,A.SLAB_THK                                                                --  板坯厚度
            ,A.SLAB_WTH                                                                --  板坯宽度
            ,A.SLAB_LEN                                                                --  板坯长度
            ,A.SLAB_WGT                                                                --  板坯重量
			,'0' SLAB_TAPER                                                            --    调宽有无代码
			, A.SLAB_WTH SLAB_WTH_HEAD                                               --    板坯HEAD 宽度
			, A.SLAB_WTH SLAB_WTH_TAIL                                               --    板坯TAIL 宽度
            ,0                                                                         --  宽度变更开始位置
            ,0                                                                         --  宽度变更部分长度
            ,C.THK_AIM                                                                 --  厚度目标
           ,(SELECT T.THK_GRP_CD FROM TBF02_ROLL_THK_GRP T                             --  厚度组代码
                WHERE T.PLT = 'H'
                  AND A.INSTR_COIL_THK >= T.MINI 
                  AND A.INSTR_COIL_THK  < T.MAXI )THK_GRP_CD
            ,C.HOT_THK_AIM                                                             --  热厚度AIM
            ,C.HOT_THK_MIN                                                             --  热厚度MIN
            ,C.HOT_THK_MAX                                                             --  热厚度MAX
            ,C.WTH_AIM                                                                 --  宽度AlM
            ,C.WTH_MIN                                                                 --  宽度MIN
            ,C.WTH_MAX                                                                 --  宽度MAX                                                
           ,(SELECT T.WTH_GRP_CD FROM TBF02_ROLL_WTH_GRP T                             --  宽度组代码
                WHERE T.PLT = 'H'
                  AND A.INSTR_COIL_WTH >= T.MINI 
                  AND A.INSTR_COIL_WTH  < T.MAXI )WTH_GRP_CD
			,B.ORD_LEN
			,B.ORD_WGT
            ,'C'                                                                       --  热送代号
            ,A.ORD_NO                                                                  --  合同号
            ,A.ORD_SEQ                                                                 --  订单号
            ,E.ORD_USEAGE_CD                                                           --  订单用途代码
            ,A.SPEC_ABBSYM                                                             --  标准号
            ,E.ORDCUST_CD                                                              --  客户代码
            ,E.CUST_CD                                                                 --  客户代码
            ,E.DEST_CD                                                                 --  目的地代码
            ,E.del_to_date                                                             --  交货期
            ,E.UST_CD                                                                  --  UST区分
            ,'H'                                                                       --  去向
            ,A.INSTR_COIL_THK                                                          --  订单厚度
            ,A.INSTR_COIL_WTH                                                          --  订单宽度
            ,A.INSTR_COIL_WGT                                                          --  订单重量
            ,E.ORD_UNIT_WGT_MIN                                                       --  订单单重下限
            ,E.ORD_UNIT_WGT_MAX                                                        --  订单单重上限
            ,A.INSTR_COIL_INDIA                                                        --  订单内径
            ,A.INSTR_COIL_OUTDIA                                                        --  订单外径
            ,E.PACK_METHOD                                                             --  包装方法
            ,''                                                                        --  轧制工艺流程
            ,E.SPM_PROC_YN                                                           --  平整分卷指定判断
            ,B.COIL_CUT_CNT                                                            --  刚卷分割数
            ,''                                                                        --  目标加热温度
            ,''                                                                        --  目标出炉温度
            ,(SELECT  NVL(F.FUR_TME,0)                                     
               FROM  TBF02_FUR_TIME F                                      
              WHERE  F.PLT = 'H'                                           
                AND  F.FUR_LINE = 1                                        
                AND  F.STL_GRD  =  A.STL_GRD                               
                AND  F.SLAB_THK_MIN <= A.SLAB_THK                         
                AND  F.SLAB_THK_MAX >  A.SLAB_THK                          
                AND  F.HCR_CLF      =  'C') FUR_TME           
            ,''                                                            --  轧制时间
            ,A.CUR_LOAD_LOC                                                --  堆置位置
            ,''                                                            --  计划加热炉装炉日期
            ,''                                                            --  计划轧制时间
            ,''                                                            --  错误
            ,'A'                                                           --  状态区分
            ,''                                                            --  标识
            ,''
			,''
			,''
			,A.SLAB_STOCK_TYPE
			,E.ORD_USEAGE_CD
	      ,E.C_SPEC_ABBSYM
	      ,E.C_ORD_THK
	      ,E.C_ORD_WTH
	      ,E.ORD_UNIT_WGT
	      ,E.ORD_UNIT_WGT_MIN
	      ,E.ORD_UNIT_WGT_MAX
	      ,E.C_ORD_INDIA
	      ,E.C_ORD_OUTDIA
	      ,E.C_SPEC_STL_GRD
	      ,E.PROD_LINE
 FROM       TBG02_SLAB_COMM  A,
            TBD00_STLGRD D,
            TBE02_ORD_PRC E,
			TBB01_ORD_HEAD H,
            --(SELECT SLAB_NO, COUNT(SLAB_CUT_SEQ) COIL_CUT_CNT, SUM(ORD_LEN) ORD_LEN, SUM(ORD_WGT) ORD_WGT FROM TBG02_SLAB_COMM_D GROUP BY SLAB_NO) B,
            (SELECT SLAB_NO,
               COUNT(SLAB_CUT_SEQ) COIL_CUT_CNT,
               SUM(ORD_LEN) ORD_LEN,
               SUM(ORD_WGT) ORD_WGT
          FROM TBG02_SLAB_COMM_D COMMD
         WHERE COMMD.SLAB_NO =
               (SELECT SUB_SLAB_NO
                  FROM TBG02_SLAB_COMM
                 WHERE SLAB_NO = ? AND ROWNUM=1)
         GROUP BY SLAB_NO) B,---优化查询，将传入值写在此处
            TBB01_ORD_PROD C
        -----------------------MODIFY BY WXY 100302---------------------------
        -----------------------DESC: 板坯号变更------------------------------
    WHERE   A.SUB_SLAB_NO = B.SLAB_NO
    	-------------------------------------------------------------------
       -- AND A.SLAB_NO = ?
        AND A.SLAB_NO NOT IN (SELECT SLAB_NO FROM  tbf02_sch_mill)
        AND A.STL_GRD = D.FAC_STL_GRD(+)
        AND A.ORD_NO  = C.ORD_NO(+)
        AND A.ORD_SEQ = C.ORD_SEQ(+)
		AND A.ORD_NO  = H.ORD_NO(+)
		AND A.ORD_SEQ = H.ORD_SEQ(+)
        AND E.ORD_NO  = A.ORD_NO
        AND E.ORD_SEQ = A.ORD_SEQ 
    --    AND A.CUR_PROG_CD           =     'RBA'
        AND   A.SLAB_STAT           =     '2'
        AND   A.ORD_FL              =     '1'
/*         AND   A.CUR_LOAD_LOC        LIKE  'Z%' */
    ORDER   BY  A.SLAB_WTH           DESC,
                A.SLAB_LEN           DESC,              
			    A.CUR_LOAD_LOC       DESC
 
 
			
/*************************************************************************************/
        ]]>
    </query> 
    <query id="UIF023010.insertSCH_MILL_d" desc="查询配置的宽度组" fetchSize="10">
        <![CDATA[
/*************************************************************************************/
	INSERT INTO TBF02_SCH_MILL_D
				(SLAB_EDT_SEQ,
				 COIL_CUT_SEQ,
				 ORD_THK,
				 ORD_WTH,
				 ORD_LEN,
				 ORD_WGT,
				 ORD_WGT_MIN,
				 ORD_WGT_MAX,
				 ORD_INDIA,
				 ORD_OUTDIA,
				 ORD_NO,
				 ORD_SEQ,
				 ORD_FL)
				 SELECT B.SLAB_EDT_SEQ,
       A.SLAB_CUT_SEQ,
       A.ORD_THK,
       A.ORD_WTH,
       A.ORD_LEN,
       A.ORD_WGT,
       C.ORD_UNIT_WGT_MIN,
       C.ORD_UNIT_WGT_MAX,
       A.COIL_INDIA,
       A.COIL_OUTDIA,
       A.ORD_NO,
       A.ORD_SEQ,
       A.ORD_FL
  FROM TBG02_SLAB_COMM_D A,
       (SELECT T.SLAB_NO, T.SLAB_EDT_SEQ
          FROM TBF02_SCH_MILL T
         WHERE T.SLAB_EDT_SEQ IN
               (SELECT T.SLAB_EDT_SEQ
                  FROM TBF02_SCH_MILL T
                 WHERE T.SLAB_EDT_SEQ NOT IN
                       (SELECT SLAB_EDT_SEQ FROM TBF02_SCH_MILL_D))) B,
       --------------------------MODIFY BY WXY 100303---------------------------
       --------------------------DESC:坯料号变更修改----------------------------          
       TBG02_SLAB_COMM D,
       --------------------------------------------------------------------------            
       TBE02_ORD_PRC C
 WHERE '1' = '1'
      --------------------------MODIFY BY WXY 100303---------------------------
      --------------------------DESC:坯料号变更修改----------------------------  
   AND A.SLAB_NO = D.SUB_SLAB_NO
   AND B.SLAB_NO = D.SLAB_NO
      --------------------------------------------------------------------------
   AND B.SLAB_NO = D.SLAB_NO
   AND A.ORD_NO = C.ORD_NO
   AND A.ORD_SEQ = C.ORD_SEQ
 ORDER BY B.SLAB_EDT_SEQ ASC
        ]]>
    </query> 
</queryMap>