XinYu_RZMES/.svn/pristine/c9/c982654ad337e526daee000567415ff0d642010a.svn-base

<?xml version="1.0" encoding='UTF-8'?>
<queryMap desc="钢卷缺陷录入与措施">
	
	<query  id="UIB020230_01.INITSELECT" desc="初始化外观缺陷代码表 BugResult">
	   SELECT 
       'N' CHK
      , SM_CFNM
      , SM_CD
        FROM  TBZ00_COMMCD T   WHERE   LG_CD='H02001'
        AND   T.USED_YN        =       'Y'
	</query>
	
	<query  id="UIB020230_02.INITSELECT" desc="初始化外观缺陷代码表 BugResult">
	   SELECT 
       'N' CHK
      , SM_CFNM
      , SM_CD
        FROM  TBZ00_COMMCD T   WHERE   LG_CD='H02002'
        AND   T.USED_YN        =       'Y'
	</query>
	
	
	<query id="UIB020230_011.SELECT" desc="尺寸、外观未判定钢卷过滤">
	
      
      SELECT    
        'N' CHK
      , ''   EXT_FLAG   
      , ''   SMP_FLAG  
      , ''   SIZE_FLAG
      , ROW_NUMBER() OVER (ORDER BY  A.OLD_SAMPL_NO ) SEQ
      , A.COIL_NO           --钢卷号
      , A.OLD_SAMPL_NO      --成分钢卷号
      , A.SLAB_NO
      , A.INSTR_COIL_THK           
      , A.INSTR_COIL_WTH         
      , B.DEL_TOL_THK_MIN
      , B.DEL_TOL_THK_MAX
      , B.DEL_TOL_WTH_MIN
      , B.DEL_TOL_WTH_MAX  
      , TO_CHAR( A.INSTR_COIL_WGT/0.95*0.98    ,'99999999999'  )      INSTR_COIL_WGT
      , A.COIL_THK
      , A.COIL_WTH
      , A.ACT_WGT
      , A.L2_COIL_WEIGHT
      , A.COIL_END_DTIME    --卷取时间
      , A.SMP_DIR_PIC_YN    --是否需要取样（指示）
      , A.SAMPL_PICK_YN     --是否已取样（实绩）
      , A.SPEC_ABBSYM       --标准号
      , A.SPEC_STL_GRD      --标准钢号
      , A.EXTSHAPE_DEC_GRD  --外观判定等级
      , A.CRK_CD1           --外观缺陷缺陷1
      , A.CRK_CD2           --外观缺陷缺陷2
      , A.CRK_CD3           --外观缺陷缺陷3
      , A.CRK_CD4           --外观缺陷缺陷4
      , A.CRK_CD5           --外观缺陷缺陷5
      , A.SPM_YN            --SMP是否作业
      , A.MISSNO_CLF_CD     --有无却号
      , A.SAMPL_NO          SMP_NO
      , A.SAMPL_CUT_LOC     SMP_CUT_LOC
      , A.DCS_WTH           --判定宽度
      , A.DCS_THK           --判定厚度
      --新加的两个字段 ZMZ
      , A.ORD_NO            --合同号
      , A.ORD_SEQ           --订单号
      
      --新加两个字段 ZMZ 2021.4.15
      ,A.ORG_ORD_NO         --原合同号
      ,A.ORG_ORD_SEQ        --原订单号
      
      , A.COIL_THK_OS
      , A.COIL_THK_CL
      , A.COIL_THK_DS
      , A.COIL_STAT 
      , A.SIZE_DEC_RST
      , A.SPM_RMK
      ,A.CJ_REMARK
      ,A.CPCJ_REMARK
      ,A.DEAL_REMARK
      ,A.FB_REASON,A.FB_YN,A.SPM_EMP_ID
      , A.CUR_PROG_CD 
      ,A.CUR_LOAD_LOC,A.YZCS_DTIME,
      C.ORD_DEVLMT_DATE 
      FROM        TBH02_COIL_COMM   A  , TBB01_ORD_DEL B,TBA01_ORD_LINE C
      WHERE       
      --AND       NVL(A.CUR_PROG_CD,'NULLCD') != 'SFF'--徐工要求去掉运送完成，金工需要数据(商议中)
                  A.ORD_NO            =  C.ORD_NO(+)
      AND         A.ORD_SEQ           =  C.ORD_SEQ(+)
      AND         A.ORD_NO            =  B.ORD_NO(+)
      AND         A.ORD_SEQ           =  B.ORD_SEQ(+)
      AND       (A.SIZE_DEC_RST IS NULL OR A.EXTSHAPE_DEC_GRD IS NULL)
      AND         A.MISSNO_CLF_CD     IS NULL     
      AND         A.COIL_STAT         =  '2'
      AND         B.DSN_KIND          =  (SELECT MIN(O.DSN_KIND) FROM TBB01_ORD_DEL O WHERE O.ORD_NO = A.ORD_NO AND O.ORD_SEQ = A.ORD_SEQ )
	</query>
			
	<query id="UIB020230_012.SELECT" desc="钢卷信息查询，过滤取样钢卷">
	
	  SELECT 'N' CHK,
       '' EXT_FLAG,
       '' SMP_FLAG,
       '' SIZE_FLAG,
       ROW_NUMBER() OVER(ORDER BY A.OLD_SAMPL_NO) SEQ,
       A.COIL_NO --钢卷号
      ,
       A.OLD_SAMPL_NO --成分钢卷号
      ,
       A.INSTR_COIL_THK,
       A.INSTR_COIL_WTH,
       TO_CHAR(A.INSTR_COIL_WGT / 0.95 * 0.98, '99999999999') INSTR_COIL_WGT,
       A.COIL_THK,
       A.COIL_WTH,
       A.ACT_WGT,
       A.L2_COIL_WEIGHT,
       A.COIL_END_DTIME --卷取时间
      ,
       A.SMP_DIR_PIC_YN --是否需要取样（指示）
      ,
       A.SAMPL_PICK_YN --是否已取样（实绩）
      ,
       A.SPEC_ABBSYM --标准号
      ,
       A.SPEC_STL_GRD --标准钢号
      ,
       A.EXTSHAPE_DEC_GRD --外观判定等级
      ,
       A.CRK_CD1 --外观缺陷缺陷1
      ,
       A.CRK_CD2 --外观缺陷缺陷2
      ,
       A.CRK_CD3 --外观缺陷缺陷3
      ,
       A.CRK_CD4 --外观缺陷缺陷4
      ,
       A.CRK_CD5 --外观缺陷缺陷5
      ,
       A.SPM_YN --SMP是否作业
      ,
       A.MISSNO_CLF_CD --有无却号
      ,
       A.SAMPL_NO SMP_NO,
       A.SAMPL_CUT_LOC SMP_CUT_LOC,
       A.DCS_WTH --判定宽度
      ,
       A.DCS_THK --判定厚度
      ,
       A.COIL_THK_OS,
       A.COIL_THK_CL,
       A.COIL_THK_DS,
       A.COIL_STAT,
       
       --新加两个字段 ZMZ 2021.4.15
      A.ORG_ORD_NO,         --原合同号
      A.ORG_ORD_SEQ,        --原订单号
      
       A.SIZE_DEC_RST,
       A.CUR_PROG_CD,
       A.SPM_RMK,
       A.CJ_REMARK,A.CPCJ_REMARK,A.DEAL_REMARK,A.FB_REASON,A.FB_YN,A.SPM_EMP_ID,
       A.CUR_LOAD_LOC,A.YZCS_DTIME,
       B.ORD_DEVLMT_DATE
  FROM TBH02_COIL_COMM A,TBA01_ORD_LINE B
 WHERE A.ORD_NO=B.ORD_NO(+)
   AND A.ORD_SEQ=B.ORD_SEQ(+)
   AND SMP_DIR_PIC_YN = 'Y'
   AND A.SAMPL_PICK_YN IS NULL
--AND         NVL(A.CUR_PROG_CD,'NULLCD') != 'SFF'--徐工要求去掉运送完成 ，金工需要数据(商议中)
  ORDER BY A.OLD_SAMPL_NO DESC
	  
	</query>
	
	<query id="UIB020230_013.SELECT" desc="按轧辊单元查询">
	<![CDATA[
	
   
SELECT BB.*,
       AA.DEL_TOL_THK_MIN,
       AA.DEL_TOL_THK_MAX,
       (AA.DEL_TOL_THK_MAX + AA.DEL_TOL_THK_MIN) / 2 DEL_TOL_THK_AVG,
       AA.DEL_TOL_WTH_MIN,
       AA.DEL_TOL_WTH_MAX,
       (AA.DEL_TOL_WTH_MIN + AA.DEL_TOL_WTH_MAX) / 2 DEL_TOL_WTH_AVG,
       AA.CUST_SPEC_NO,
       AA.ORD_DEVLMT_DATE,
       DECODE(AA.DLIV_TP,'C','汽运','T','火运') DLIV_TP
  FROM (SELECT LIN.ORD_DEVLMT_DATE ORD_DEVLMT_DATE,
               ORD.DEL_TOL_THK_MIN DEL_TOL_THK_MIN,
               ORD.DEL_TOL_THK_MAX DEL_TOL_THK_MAX,
               ORD.DEL_TOL_WTH_MIN DEL_TOL_WTH_MIN,
               ORD.DEL_TOL_WTH_MAX DEL_TOL_WTH_MAX,
               ORD.ORD_NO ORD_NO,
               ORD.ORD_SEQ ORD_SEQ,
               DECODE(OHD.CUST_SPEC_NO, NULL, 'N', 'Y') CUST_SPEC_NO,
               LIN.DLIV_TP
          FROM TBA01_ORD_LINE LIN, TBB01_ORD_DEL ORD, TBB01_ORD_HEAD OHD
         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.DSN_KIND =
               (SELECT MIN(DEL.DSN_KIND)
                   FROM TBB01_ORD_DEL DEL
                  WHERE DEL.ORD_NO = ORD.ORD_NO
                    AND DEL.ORD_SEQ = ORD.ORD_SEQ))) AA,
       (SELECT 'N' CHK,
                '' EXT_FLAG,
                '' SMP_FLAG,
                '' SIZE_FLAG,
                C.ROLL_SLAB_SEQ SEQ,
                A.COIL_NO --钢卷号
               ,
                A.OLD_SAMPL_NO --成分钢卷号
               ,
                A.INSTR_COIL_THK,
                A.INSTR_COIL_WTH,
                TO_CHAR(A.INSTR_COIL_WGT / 0.95 * 0.98, '99999999999') INSTR_COIL_WGT,
                A.COIL_LEN,
                A.COIL_THK,
                A.COIL_WTH,
                A.ACT_WGT,
                A.L2_COIL_WEIGHT,
                A.COIL_END_DTIME --卷取时间
               ,
                A.SMP_DIR_PIC_YN --是否需要取样（指示）
               ,
                A.SAMPL_PICK_YN --是否已取样（实绩）
               ,
                A.SPEC_ABBSYM --标准号
               ,
                A.SPEC_STL_GRD --标准钢号
               ,
                A.EXTSHAPE_DEC_GRD --外观判定等级
               ,
                A.CRK_CD1 --外观缺陷缺陷1
               ,
                A.CRK_CD2 --外观缺陷缺陷2
               ,
                A.CRK_CD3 --外观缺陷缺陷3
               ,
                A.CRK_CD4 --外观缺陷缺陷4
               ,
                A.CRK_CD5 --外观缺陷缺陷5
               ,
                A.SPM_RMK,
                A.CJ_REMARK,
                A.CPCJ_REMARK,
                A.DEAL_REMARK,
                A.FB_REASON,
                A.FB_YN,A.SPM_EMP_ID,
                RETURN_COILTIME(a.SPEC_STL_GRD,a.INSTR_COIL_THK) COLDTIME,--缓冷时间
                SPM_CRK_CD1,
                SPM_CRK_CD2,
                SPM_CRK_CD3,
                SPM_CRK_CD4,
                SPM_CRK_CD5,
                A.SPM_YN --SMP是否作业
               ,
                A.MISSNO_CLF_CD --有无却号
               ,
                A.SAMPL_NO SMP_NO,
                A.SAMPL_CUT_LOC SMP_CUT_LOC,
                A.DCS_WTH --判定宽度
               ,
                A.DCS_THK --判定厚度
               ,
                A.COIL_THK_OS,
                A.COIL_THK_CL,
                A.COIL_THK_DS,
                A.COIL_STAT,
                A.SIZE_DEC_RST,
                A.CUR_PROG_CD,
                c.SLAB_NO,
                C.ROLL_MANA_NO,
                C.ROLL_SLAB_SEQ,
                B.FM_STRIP_WDG_AVG --楔形
               ,
                B.FM_STRIP_WDG_MAX --楔形
               ,
                B.FM_STRIP_WDG_MIN --楔形
               ,
                TO_CHAR(DECODE(A.COIL_LEN,
                               '0',
                               '0',
                               '',
                               '0',
                               ROUND((B.FM_STRIP_WDG_OUT_OF_RANGE / A.COIL_LEN) * 100,
                                     2)),
                        '0.00') FM_STRIP_WDG_OUT_OF_RANGE --楔形出口不在范围
               ,
                B.FM_EXT_STRIP_CROWN --FM出口凸度?定
               ,
                B.FM_EXT_STRIP_CROWN_AVG --FM出口凸度平均
               ,
                B.FM_EXT_STRIP_CROWN_MIN --FM出口凸度最小
               ,
                B.FM_EXT_STRIP_CROWN_MAX --FM出口凸度最大
               ,
                TO_CHAR(DECODE(A.COIL_LEN,
                               '0',
                               '0',
                               '',
                               '0',
                               ROUND((B.FM_EXT_STRIP_CROWN_OUT_OF_LEN /
                                     A.COIL_LEN) * 100,
                                     2)),
                        '0.00') FM_EXT_STRIP_CROWN_OUT_OF_LEN --FM出口凸度不在范?
               ,
                B.RHF_DESCAL_YN --除?机是否加??后
               ,
                B.RM_ENT_DESCAL_YN --除?机是否RM入口
               ,
                B.RM_EXT_DESCAL_YN --除?机是否RM出口
               ,
                (B.RHF_DESCAL_YN + B.RM_ENT_DESCAL_YN + B.RM_EXT_DESCAL_YN) ZONG_DESCAL_YN --总除磷次数
               ,
                B.R2_EXT_TEMP --RT2温度
               ,
                B.FM_EXT_STRIP_THK --FM出口厚度?定
               ,
                B.FM_EXT_STRIP_THK_AVG --FM出口厚度平均
               ,
                B.FM_EXT_STRIP_THK_MIN --FM出口厚度最
               ,
                B.FM_EXT_STRIP_THK_MAX --FM出口厚度最大
               ,
                TO_CHAR(DECODE(A.COIL_LEN,
                               '0',
                               '0',
                               '',
                               '0',
                               ROUND((B.FM_EXT_STRIP_THK_OUT_OF_LEN /
                                     NVL(A.COIL_LEN, 0)) * 100,
                                     2)),
                        '0.00') FM_EXT_STRIP_THK_OUT_OF_LEN --FM出口厚度不在范?
               ,
                B.FM_SYM_STRIP_FLATNESS_AVG --对称平直度平均?
               ,
                B.FM_SYM_STRIP_FLATNESS_MAX --对称平直度最大
               ,
                B.FM_SYM_STRIP_FLATNESS_MIN --对称平直度最小
               ,
                TO_CHAR(DECODE(A.COIL_LEN,
                               '0',
                               '0',
                               '',
                               '0',
                               ROUND((B.FM_SYM_STRIP_OUT_OF_RANGE / A.COIL_LEN) * 100,
                                     2)),
                        '0.00') FM_SYM_STRIP_OUT_OF_RANGE --对称平直度不在范围
               ,
                B.DC_TEMP --温定卷取额度
               ,
                B.DC_TEMP_AVG --卷取温度平均?
               ,
                B.DC_TEMP_MIN --卷取温度最小?
               ,
                B.DC_TEMP_MAX --卷取温度最大?
               ,
                TO_CHAR(DECODE(A.COIL_LEN,
                               '0',
                               '0',
                               '',
                               '0',
                               ROUND((B.DC_TEMP_OUT_OF_RANGE / A.COIL_LEN) * 100,
                                     2)),
                        '0.00') DC_TEMP_OUT_OF_RANGE --卷取温度不在范?
               ,
                B.FM_EXT_STRIP_TEMP --FM出口温度额定
               ,
                B.FM_EXT_STRIP_TEMP_AVG --FM出口温度平均
               ,
                B.FM_EXT_STRIP_TEMP_MIN --FM出口温度最小
               ,
                B.FM_EXT_STRIP_TEMP_MAX --FM出口温度最大
               ,
                DECODE(A.COIL_LEN,
                       '0',
                       '0',
                       '',
                       '0',
                       ROUND((B.STRIP_OUT_OF_RANGE / A.COIL_LEN) * 100, 2)) STRIP_OUT_OF_RANGE,
                A.ORD_NO,
                A.ORD_SEQ,
                --新加两个字段 ZMZ 2021.4.15
      			A.ORG_ORD_NO,			--原合同号
      			A.ORG_ORD_SEQ,			--原订单号
      			B.DC_NO,				--卷取机号		
                A.CUR_LOAD_LOC,
                D.QLTY_QF,
                D.QLTY_KL,
                D.QLTY_YS,
                D.QLTY_GY,
                A.YZCS_DTIME,
                DECODE(A.SAMPL_PICK_YN,'R','是','否') SAMPL_BKD_YN,
                checkqlty(D.COIL_NO) CHQLTY,
                C.MIXROLL ,--虚拟组批号
                A.EXTSHAPE_DEC_DTIME,
                A.EXTSHAPE_DEC_EMP_ID,
                DECODE(A.SPEC_STL_GRD,
                       'Q235B',
                       GETMAXMIXROLL(C.ROLL_MANA_NO, C.MIXROLL, C.COIL_NO),
                        'Q355B',
                       GETMAXMIXROLL(C.ROLL_MANA_NO, C.MIXROLL, C.COIL_NO),
                       '0') MIXFLAG
           FROM TBH02_COIL_COMM A, TBH02_MILL_RESULT B, TBF02_SPEC_MILL C,( SELECT * FROM get_autolx_bkd T WHERE T.ISAVIALD='1') d
          WHERE --SUBSTR(A.COIL_NO ,1,12 )        =    SUBSTR( C.COIL_NO , 1,12)
         --AND         A.COIL_NO                       =    B.COIL_NO(+)
          C.COIL_NO = B.COIL_NO(+)
       AND SUBSTR(A.COIL_NO, 1, 12) = SUBSTR(C.COIL_NO, 1, 12)
       AND A.OLD_SAMPL_NO=D.COIL_NO(+)
       AND ('Trues' = NVL(?, 'False') OR C.ROLL_MANA_NO = ?)
         --AND ROLL_MANA_NO = ?   
       AND A.OLD_SAMPL_NO like ? || '%'
       AND ('True' <> ? OR A.COIL_END_DTIME BETWEEN ? AND ?)
       --新加判断条件 ZMZ
       AND nvl(A.ORG_ORD_NO,'null') like ? || '%'
       AND nvl(A.ORG_ORD_SEQ, 'null') like ? || '%'
       AND rownum < 8000) BB
 WHERE AA.ORD_NO(+) = BB.ORD_NO
   AND AA.ORD_SEQ(+) = BB.ORD_SEQ
--AND  NVL(BB.CUR_PROG_CD,'NULLCD') != 'SFF'--徐工要求去掉运送完成 ，金工需要数据(商议中)     
 ORDER BY /*BB.MIXROLL ASC,BB.INSTR_COIL_THK desc,*/BB.ROLL_MANA_NO ASC, BB.ROLL_SLAB_SEQ ASC
    
    ]]>
    
	</query>
	
	<query id="UIB020230_014.SELECT" desc="">
		SELECT        SQ.QLTY_CD_CFNM 
		             ,IQ.QLTY_MIN 
		             ,IQ.QLTY_MAX
		FROM          TBB02_INS_QLTY IQ , TBB01_SEQ_QLTY SQ
		WHERE         IQ.SMP_NO     =  ?
		AND           IQ.QLTY_CD    =  SQ.QLTY_CD
	</query>
	
	<query id="UIB020230_015.SELECT" desc="查询平整">
	<![CDATA[
	
   SELECT BB.*,
       AA.DEL_TOL_THK_MIN,
       AA.DEL_TOL_THK_MAX,
       (AA.DEL_TOL_THK_MAX + AA.DEL_TOL_THK_MIN) / 2 DEL_TOL_THK_AVG,
       AA.DEL_TOL_WTH_MIN,
       AA.DEL_TOL_WTH_MAX,
       (AA.DEL_TOL_WTH_MIN + AA.DEL_TOL_WTH_MAX) / 2 DEL_TOL_WTH_AVG,
       AA.CUST_SPEC_NO,
       AA.ORD_DEVLMT_DATE
  FROM (SELECT LIN.ORD_DEVLMT_DATE ORD_DEVLMT_DATE,
               ORD.DEL_TOL_THK_MIN DEL_TOL_THK_MIN,
               ORD.DEL_TOL_THK_MAX DEL_TOL_THK_MAX,
               ORD.DEL_TOL_WTH_MIN DEL_TOL_WTH_MIN,
               ORD.DEL_TOL_WTH_MAX DEL_TOL_WTH_MAX,
               ORD.ORD_NO ORD_NO,
               ORD.ORD_SEQ ORD_SEQ,
               DECODE(OHD.CUST_SPEC_NO, NULL, 'N', 'Y') CUST_SPEC_NO
          FROM TBA01_ORD_LINE LIN, TBB01_ORD_DEL ORD, TBB01_ORD_HEAD OHD
         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.DSN_KIND =
               (SELECT MIN(DEL.DSN_KIND)
                   FROM TBB01_ORD_DEL DEL
                  WHERE DEL.ORD_NO = ORD.ORD_NO
                    AND DEL.ORD_SEQ = ORD.ORD_SEQ))) AA,
       (SELECT 'N' CHK,
                '' EXT_FLAG,
                '' SMP_FLAG,
                '' SIZE_FLAG,
                C.ROLL_SLAB_SEQ SEQ,
                A.COIL_NO --钢卷号
               ,
                A.OLD_SAMPL_NO --成分钢卷号
               ,
                A.INSTR_COIL_THK,
                A.INSTR_COIL_WTH,
                TO_CHAR(A.INSTR_COIL_WGT / 0.95 * 0.98, '99999999999') INSTR_COIL_WGT,
                A.COIL_LEN,
                A.COIL_THK,
                A.COIL_WTH,
                A.ACT_WGT,
                A.L2_COIL_WEIGHT,
                A.COIL_END_DTIME --卷取时间
               ,
                A.SMP_DIR_PIC_YN --是否需要取样（指示）
               ,
                A.SAMPL_PICK_YN --是否已取样（实绩）
               ,
                A.SPEC_ABBSYM --标准号
               ,
                A.SPEC_STL_GRD --标准钢号
               ,
                A.EXTSHAPE_DEC_GRD --外观判定等级
               ,
                A.CRK_CD1 --外观缺陷缺陷1
               ,
                A.CRK_CD2 --外观缺陷缺陷2
               ,
                A.CRK_CD3 --外观缺陷缺陷3
               ,
                A.CRK_CD4 --外观缺陷缺陷4
               ,
                A.CRK_CD5 --外观缺陷缺陷5
               ,
                A.SPM_RMK,
                A.CJ_REMARK,
                A.CPCJ_REMARK,
                A.DEAL_REMARK,
                A.FB_REASON,
                A.FB_YN,
                A.SPM_EMP_ID,
                RETURN_COILTIME(a.SPEC_STL_GRD, a.INSTR_COIL_THK) COLDTIME, --缓冷时间
                SPM_CRK_CD1,
                SPM_CRK_CD2,
                SPM_CRK_CD3,
                SPM_CRK_CD4,
                SPM_CRK_CD5,
                A.SPM_YN --SMP是否作业
               ,
                A.MISSNO_CLF_CD --有无却号
               ,
                A.SAMPL_NO SMP_NO,
                A.SAMPL_CUT_LOC SMP_CUT_LOC,
                A.DCS_WTH --判定宽度
               ,
                A.DCS_THK --判定厚度
               ,
                A.COIL_THK_OS,
                A.COIL_THK_CL,
                A.COIL_THK_DS,
                A.COIL_STAT,
                A.SIZE_DEC_RST,
                A.CUR_PROG_CD,
                c.SLAB_NO,
                C.ROLL_MANA_NO,
                C.ROLL_SLAB_SEQ,
                B.FM_STRIP_WDG_AVG --楔形
               ,
                B.FM_STRIP_WDG_MAX --楔形
               ,
                B.FM_STRIP_WDG_MIN --楔形
               ,
                TO_CHAR(DECODE(A.COIL_LEN,
                               '0',
                               '0',
                               '',
                               '0',
                               ROUND((B.FM_STRIP_WDG_OUT_OF_RANGE / A.COIL_LEN) * 100,
                                     2)),
                        '0.00') FM_STRIP_WDG_OUT_OF_RANGE --楔形出口不在范围
               ,
                B.FM_EXT_STRIP_CROWN --FM出口凸度?定
               ,
                B.FM_EXT_STRIP_CROWN_AVG --FM出口凸度平均
               ,
                B.FM_EXT_STRIP_CROWN_MIN --FM出口凸度最小
               ,
                B.FM_EXT_STRIP_CROWN_MAX --FM出口凸度最大
               ,
                TO_CHAR(DECODE(A.COIL_LEN,
                               '0',
                               '0',
                               '',
                               '0',
                               ROUND((B.FM_EXT_STRIP_CROWN_OUT_OF_LEN /
                                     A.COIL_LEN) * 100,
                                     2)),
                        '0.00') FM_EXT_STRIP_CROWN_OUT_OF_LEN --FM出口凸度不在范?
               ,
                B.RHF_DESCAL_YN --除?机是否加??后
               ,
                B.RM_ENT_DESCAL_YN --除?机是否RM入口
               ,
                B.RM_EXT_DESCAL_YN --除?机是否RM出口
               ,
                (B.RHF_DESCAL_YN + B.RM_ENT_DESCAL_YN + B.RM_EXT_DESCAL_YN) ZONG_DESCAL_YN --总除磷次数
               ,
                B.R2_EXT_TEMP --RT2温度
               ,
                B.FM_EXT_STRIP_THK --FM出口厚度?定
               ,
                B.FM_EXT_STRIP_THK_AVG --FM出口厚度平均
               ,
                B.FM_EXT_STRIP_THK_MIN --FM出口厚度最
               ,
                B.FM_EXT_STRIP_THK_MAX --FM出口厚度最大
               ,
                TO_CHAR(DECODE(A.COIL_LEN,
                               '0',
                               '0',
                               '',
                               '0',
                               ROUND((B.FM_EXT_STRIP_THK_OUT_OF_LEN /
                                     NVL(A.COIL_LEN, 0)) * 100,
                                     2)),
                        '0.00') FM_EXT_STRIP_THK_OUT_OF_LEN --FM出口厚度不在范?
               ,
                B.FM_SYM_STRIP_FLATNESS_AVG --对称平直度平均?
               ,
                B.FM_SYM_STRIP_FLATNESS_MAX --对称平直度最大
               ,
                B.FM_SYM_STRIP_FLATNESS_MIN --对称平直度最小
               ,
                TO_CHAR(DECODE(A.COIL_LEN,
                               '0',
                               '0',
                               '',
                               '0',
                               ROUND((B.FM_SYM_STRIP_OUT_OF_RANGE / A.COIL_LEN) * 100,
                                     2)),
                        '0.00') FM_SYM_STRIP_OUT_OF_RANGE --对称平直度不在范围
               ,
                B.DC_TEMP --温定卷取额度
               ,
                B.DC_TEMP_AVG --卷取温度平均?
               ,
                B.DC_TEMP_MIN --卷取温度最小?
               ,
                B.DC_TEMP_MAX --卷取温度最大?
               ,
                TO_CHAR(DECODE(A.COIL_LEN,
                               '0',
                               '0',
                               '',
                               '0',
                               ROUND((B.DC_TEMP_OUT_OF_RANGE / A.COIL_LEN) * 100,
                                     2)),
                        '0.00') DC_TEMP_OUT_OF_RANGE --卷取温度不在范?
               ,
                B.FM_EXT_STRIP_TEMP --FM出口温度额定
               ,
                B.FM_EXT_STRIP_TEMP_AVG --FM出口温度平均
               ,
                B.FM_EXT_STRIP_TEMP_MIN --FM出口温度最小
               ,
                B.FM_EXT_STRIP_TEMP_MAX --FM出口温度最大
               ,
                DECODE(A.COIL_LEN,
                       '0',
                       '0',
                       '',
                       '0',
                       ROUND((B.STRIP_OUT_OF_RANGE / A.COIL_LEN) * 100, 2)) STRIP_OUT_OF_RANGE,
                A.ORD_NO,
                A.ORD_SEQ,
                --新加两个字段 ZMZ 2021.4.15
                A.ORG_ORD_NO, --原合同号
                A.ORG_ORD_SEQ, --原订单号
                B.DC_NO, --卷取机号    
                A.CUR_LOAD_LOC,
                D.QLTY_QF,
                D.QLTY_KL,
                D.QLTY_YS,
                D.QLTY_GY,
                DECODE(A.SAMPL_PICK_YN, 'R', '是', '否') SAMPL_BKD_YN,
                checkqlty(D.COIL_NO) CHQLTY,
                C.MIXROLL, --虚拟组批号
                A.EXTSHAPE_DEC_DTIME,
                A.EXTSHAPE_DEC_EMP_ID,
                DECODE(A.SPEC_STL_GRD,
                       'Q235B',
                       GETMAXMIXROLL(C.ROLL_MANA_NO, C.MIXROLL, C.COIL_NO),
                       'Q355B',
                       GETMAXMIXROLL(C.ROLL_MANA_NO, C.MIXROLL, C.COIL_NO),
                       '0') MIXFLAG
           FROM TBH02_COIL_COMM A,
                TBH02_MILL_RESULT B,
                TBF02_SPEC_MILL C,
                (SELECT * FROM get_autolx_bkd T WHERE T.ISAVIALD = '1') d
          WHERE --SUBSTR(A.COIL_NO ,1,12 )        =    SUBSTR( C.COIL_NO , 1,12)
         --AND         A.COIL_NO                       =    B.COIL_NO(+)
          C.COIL_NO = B.COIL_NO(+)
       AND SUBSTR(A.COIL_NO, 1, 12) = SUBSTR(C.COIL_NO, 1, 12)
       AND A.OLD_SAMPL_NO = D.COIL_NO(+)
       AND A.SPM_YN IN('1','2','3','4','5')
        AND A.COIL_END_DTIME > '20221001' ) BB
 WHERE AA.ORD_NO(+) = BB.ORD_NO
   AND AA.ORD_SEQ(+) = BB.ORD_SEQ
--AND  NVL(BB.CUR_PROG_CD,'NULLCD') != 'SFF'--徐工要求去掉运送完成 ，金工需要数据(商议中)     
 ORDER BY /*BB.MIXROLL ASC,BB.INSTR_COIL_THK desc,*/ BB.ROLL_MANA_NO  ASC,
          BB.ROLL_SLAB_SEQ ASC

    
    ]]>
    
	</query>
	<query id="UIB020230_01.UPDATE" desc="更新">
		  UPDATE TBH02_COIL_COMM    SET
		  CRK_CD1              =  ?    --缺陷
		 ,CRK_CD2              =  ?
		 ,CRK_CD3              =  ?
		 ,CRK_CD4              =  ?
		 ,CRK_CD5              =  ?
		 ,SPM_YN               =  ?    --SPM是否作业
		 ,DCS_THK              =  ?    --判定厚度
		 ,DCS_WTH              =  ?    --判定宽度
		  WHERE    COIL_NO     =  ?    --钢卷号
	 --	  AND      COIL_STAT   =  '2'
	 --	  AND      CUR_PROG_CD =  'SED'
	</query>
	
	<query id="UIB020230_02.UPDATE" desc="当有取样时候，更新试样号的进程状态为B">
		UPDATE    TBB02_LOT_COM
		SET       SMP_PROG_CD      =   ?  --为B
		        , SMP_GET_DTIME    =   TO_CHAR(SYSDATE , 'YYYYMMDDHH24MISS')
		WHERE     SMP_NO           =   ?
		AND       SMP_CUT_LOC      =   ?
		AND       SMP_PROG_CD      =   'A'
	</query>
	
	<query id="UIB020230_03.UPDATE" desc="外观判定信息记录">
		UPDATE    TBH02_COIL_COMM  CCM
		SET       CCM.EXTSHAPE_DEC_GRD        =     ?
		         ,CCM.EXTSHAPE_DEC_EMP_ID     =     ?
		         ,CCM.CUR_PROG_CD_DTIME       =     TO_CHAR(SYSDATE , 'YYYYMMDDHH24MISS')
		         ,CCM.EXTSHAPE_DEC_DTIME      =     TO_CHAR(SYSDATE , 'YYYYMMDDHH24MISS')
		WHERE     CCM.COIL_NO                 =     ?
		----modify by wxy  冷轧移送完成 不能保存
		--AND       CCM.COIL_STAT               =     '2'
		
		--AND       CCM.CUR_PROG_CD             =     'SED'
		-----------------------------------------------------
	</query>
	
	<query id="UIB020230_04.UPDATE" desc="取样操作">
		UPDATE     TBH02_COIL_COMM              CCM
        SET        CCM.SAMPL_PICK_YN            =        ?
        WHERE      CCM.COIL_NO                  =        ? 
        AND        CCM.SMP_DIR_PIC_YN           =       'Y'
	</query>
	
	<query id="UIB020230_05.UPDATE" desc="">
		UPDATE    TBH02_COIL_COMM  CCM
		SET       CCM.SIZE_DEC_RST            =     ?
		         ,CCM.CUR_PROG_CD_DTIME       =     TO_CHAR(SYSDATE , 'YYYYMMDDHH24MISS')
		         ,CCM.EXTSHAPE_DEC_DTIME      =     TO_CHAR(SYSDATE , 'YYYYMMDDHH24MISS')
		WHERE     CCM.COIL_NO                 =     ?
		----modify by wxy  冷轧移送完成 不能保存
		--AND       CCM.COIL_STAT               =     '2'  
		
		--AND       CCM.CUR_PROG_CD             =     'SED'
		------------------------------------------
	</query>
	
	<query id="UIB020230_01.CALL" desc="取样钢卷更改">
		{call NIB020231(?,?,?)}
	</query>
	
	<query id="UIB020230_02.CALL" desc="平整分卷">
		{call ZL_HOST_DCS02.SMP_SPM_CHECK(?,?,?,?,?)}
	</query>
	
	<query id="UIB020230_03.CALL">
		{call ZL_HOST_DCS02.SMP_PICK_SAVES(?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)}
	</query>
</queryMap>