SELECT T.SM_CD SM_CD , T.SM_CFNM FROM TBZ00_COMMCD T WHERE T.LG_CD = 'E01002'
SELECT
OP.C_ORD_THK
,OP.C_ORD_WTH
,OP.C_ORD_THK_MIN
,OP.C_ORD_THK_MAX
,OP.C_ORD_WTH_MIN
,OP.C_ORD_WTH_MAX
,t10.RSEPON_UNIT
,t10.DETAINFO
,CL.EXTSHAPE_DEC_GRD EXTSHAPE_DEC_GRD_H, --原料卷卷外观判定结果
ZL_NORM_COMM.FZ00_COMM('H02001', CL.CRK_CD1) CRK_CD1_H, --原料卷缺陷1
ZL_NORM_COMM.FZ00_COMM('H02001', CL.CRK_CD2) CRK_CD2_H --原料卷缺陷2
,CS.*
FROM TBE02_ORD_PRC OP , C_TBK02_COIL_COMM CL ,JB_RSEPON_UNIT t10,(SELECT
T2.ROLL_COIL_SEQ
,T1.COIL_NO
,T1.H_COIL_NO1
,T1.SLAB_NO
,T1.ORD_NO
,T1.PRODNM_CD
,XB_PACKAGE.GF_CUSTOMER_FIND(T1.CUST_CD) CUST_CD -- 客户代码
,T1.ORD_SEQ
,T1.SPEC_ABBSYM
,T1.SPEC_STL_GRD
,T1.COIL_THK
,T1.COIL_WTH
,'' L2_COIL_WTH
,'' L2_COIL_THK
,T1.DCS_THK
,T1.DCS_WTH
,T1.ACT_WGT
,T1.MISSNO_CLF_CD
,T1.SMP_DIR_PIC_YN
,T1.SMP_PICK_YN
,T1.SMP_NO
,T1.SMP_CUT_LOC
,T1.FB_YN
,T1.WGT_DEC_RST
,T1.EXTSHAPE_DEC_GRD
,T1.EXTSHAPE_QUALITY
,T1.CUR_PROG_CD
,DECODE(T1.CAL_TYPE,'2','返修卷','3','过渡卷','正常酸轧卷') CAL_TYPE
,DECODE(T1.CAL_TYPE,'2','Y','') FAN_XIU
,DECODE(T1.CAL_TYPE,'3','Y','') RCAL_YN
,T1.RCAL_CNT
,T1.CRK_CD1
,T1.CRK_CD2
,T1.CRK_CD3
,T1.CRK_CD4
,T1.CRK_CD5
,T1.CRK_CD1_TYPE
,T1.CRK_CD2_TYPE
,T1.CRK_CD3_TYPE
,T1.CRK_CD4_TYPE
,T1.CRK_CD5_TYPE
,T1.MILL_DTIME
,T1.FB_REASON
,T1.EXTSHAPE_DEC_ID
,T1.EXTSHAPE_DEC_DTIME
,T1.L3_ROUGH CU_CAO_DU --20151223添加粗糙度
FROM C_TBL02_COIL_COMM T1 , C_TBF03_SPEC_MILL T2
WHERE SUBSTR(T1.COIL_NO , 1,9) = SUBSTR( T2.C_COIL_NO , 1,9)
AND T2.ROLL_MANA_NO = NVL(? ,T2.ROLL_MANA_NO)
AND T1.MILL_DTIME BETWEEN NVL(? , T1.MILL_DTIME) AND NVL(? , T1.MILL_DTIME)
AND T1.COIL_NO LIKE ?||'%'
) CS
WHERE CS.ORD_NO = OP.ORD_NO(+)
AND CS.ORD_SEQ = OP.ORD_SEQ(+)
and cs.COIL_NO = t10.OLD_SAMPL_NO(+)
AND CS.H_COIL_NO1 = CL.COIL_NO(+)
ORDER BY CS.ROLL_COIL_SEQ
SELECT
OP.C_ORD_THK
,OP.C_ORD_WTH
,OP.C_ORD_THK_MIN
,OP.C_ORD_THK_MAX
,OP.C_ORD_WTH_MIN
,OP.C_ORD_WTH_MAX
,CL.EXTSHAPE_DEC_GRD EXTSHAPE_DEC_GRD_H, --原料卷卷外观判定结果
ZL_NORM_COMM.FZ00_COMM('H02001', CL.CRK_CD1) CRK_CD1_H, --原料卷缺陷1
ZL_NORM_COMM.FZ00_COMM('H02001', CL.CRK_CD2) CRK_CD2_H --原料卷缺陷2
,CS.*
FROM TBE02_ORD_PRC OP , C_TBK02_COIL_COMM CL ,(SELECT
T2.ROLL_COIL_SEQ
,T1.COIL_NO
,T1.H_COIL_NO1
,T1.SLAB_NO
,T1.ORD_NO
,T1.PRODNM_CD
,XB_PACKAGE.GF_CUSTOMER_FIND(T1.CUST_CD) CUST_CD -- 客户代码
,T1.ORD_SEQ
,T1.SPEC_ABBSYM
,T1.SPEC_STL_GRD
,T1.COIL_THK
,T1.COIL_WTH
,'' L2_COIL_WTH
,'' L2_COIL_THK
,T1.DCS_THK
,T1.DCS_WTH
,T1.ACT_WGT
,T1.MISSNO_CLF_CD
,T1.SMP_DIR_PIC_YN
,T1.SMP_PICK_YN
,T1.SMP_NO
,T1.SMP_CUT_LOC
,T1.FB_YN
,T1.WGT_DEC_RST
,T1.EXTSHAPE_DEC_GRD
,T1.EXTSHAPE_QUALITY
,T1.CUR_PROG_CD
,DECODE(T1.CAL_TYPE,'2','返修卷','3','过渡卷','正常酸洗卷') CAL_TYPE
,DECODE(T1.CAL_TYPE,'2','Y','') FAN_XIU
,DECODE(T1.CAL_TYPE,'3','Y','') RCAL_YN
,T1.RCAL_CNT
,T1.CRK_CD1
,T1.CRK_CD2
,T1.CRK_CD3
,T1.CRK_CD4
,T1.CRK_CD5
,T1.CRK_CD1_TYPE
,T1.CRK_CD2_TYPE
,T1.CRK_CD3_TYPE
,T1.CRK_CD4_TYPE
,T1.CRK_CD5_TYPE
,T1.MILL_DTIME
,T1.FB_REASON
,T1.EXTSHAPE_DEC_ID
,T1.EXTSHAPE_DEC_DTIME
,T1.L3_ROUGH CU_CAO_DU --20151223添加粗糙度
FROM C_TBL02_COIL_COMM T1 , S_TBF03_SPEC_MILL T2
WHERE SUBSTR(T1.COIL_NO , 1,9) = T2.C_COIL_NO(+)
AND T1.OLD_SAMPL_NO like ? ||'%'
AND T1.MILL_DTIME BETWEEN NVL(? , T1.MILL_DTIME) AND NVL(? , T1.MILL_DTIME)
AND T1.COIL_NO LIKE ?||'%'
) CS
WHERE CS.ORD_NO = OP.ORD_NO(+)
AND CS.ORD_SEQ = OP.ORD_SEQ(+)
AND CS.H_COIL_NO1 = CL.COIL_NO(+)
ORDER BY CS.ROLL_COIL_SEQ
SELECT T.SM_CD SM_CD , T.SM_CFNM FROM TBZ00_COMMCD T WHERE T.LG_CD = 'B02001'
select T.SM_CD SM_CD , T.SM_CFNM from TBZ00_COMMCD t where t.LG_CD = 'H02001'
select DEFECT_CODE SM_CD,DEFECT_DESC SM_CFNM from QCM_BASE_DEFECT a where a.validflag = '1' AND PLINE_CODE = 'RZ1'
select DEFECT_CODE SM_CD,DEFECT_DESC SM_CFNM from QCM_BASE_DEFECT a
where a.validflag = '1' AND PLINE_CODE = 'RZ1' and a.defect_type_desc = ?
SELECT T.SM_CD SM_CD , T.SM_CFNM FROM TBZ00_COMMCD T WHERE T.LG_CD = 'B02001'
union
select DEFECT_CODE SM_CD,DEFECT_DESC SM_CFNM from QCM_BASE_DEFECT a where a.validflag = '1' AND PLINE_CODE IN ('LT1','SZ1','RZ1')
SELECT T.EXTSHAPE_CD , T.MIAN_DESC FROM TBB01_SEQ_EXTSHAPE T WHERE T.MIAN_DESC IS NOT NULL ORDER BY T.EXTSHAPE_CD
SELECT T.EXTSHAPE_CD , T.CE_DESC FROM TBB01_SEQ_EXTSHAPE T WHERE T.CE_DESC IS NOT NULL ORDER BY T.EXTSHAPE_CD
SELECT T.EXTSHAPE_CD , T.TOU_DESC FROM TBB01_SEQ_EXTSHAPE T WHERE T.TOU_DESC IS NOT NULL ORDER BY T.EXTSHAPE_CD
SELECT T.EXTSHAPE_CD , T.DAXIAO_DESC FROM TBB01_SEQ_EXTSHAPE T WHERE T.DAXIAO_DESC IS NOT NULL ORDER BY T.EXTSHAPE_CD
SELECT T.EXTSHAPE_CD , T.DUOSHAO_DESC FROM TBB01_SEQ_EXTSHAPE T WHERE T.DUOSHAO_DESC IS NOT NULL ORDER BY T.EXTSHAPE_CD
SELECT T.EXTSHAPE_CD , T.SHOUGAN_DESC FROM TBB01_SEQ_EXTSHAPE T WHERE T.SHOUGAN_DESC IS NOT NULL ORDER BY T.EXTSHAPE_CD
SELECT T.EXTSHAPE_CD , T.SHIJUE_DESC FROM TBB01_SEQ_EXTSHAPE T WHERE T.SHIJUE_DESC IS NOT NULL ORDER BY T.EXTSHAPE_CD
SELECT T.EXTSHAPE_CD , T.QITA_DESC FROM TBB01_SEQ_EXTSHAPE T WHERE T.QITA_DESC IS NOT NULL ORDER BY T.EXTSHAPE_CD
SELECT T2.QLTY_CD_CFNM , T1.QLTY_MIN , T1.QLTY_MAX
FROM TBB02_INS_QLTY T1 , TBB01_SEQ_QLTY T2
WHERE T1.QLTY_CD = T2.QLTY_CD
AND T1.SMP_NO = ?
AND T1.SMP_CUT_LOC = ?
select distinct t3.phy_name_s || t3.phy_unit || '[' || t3.item_name_d ||
decode(t3.item_name_s, '', '', ',' || t3.item_name_s) || ']' QLTY_CD_CFNM,
t3.stdmin QLTY_MIN,
t3.stdmax QLTY_MAX
from qcm_jhy_sample_consign_d t1,
qcm_jhy_sample_consign_d_item t3
where t1.specimen_no = t3.specimen_no
and t1.inspection_lot = ?
/*UNION ALL
SELECT T2.QLTY_CD_CFNM , T1.QLTY_MIN , T1.QLTY_MAX
FROM TBB02_INS_QLTY T1 , TBB01_SEQ_QLTY T2
WHERE T1.QLTY_CD = T2.QLTY_CD
AND T1.SMP_NO = ?
AND T1.SMP_CUT_LOC = ?*/
select distinct t3.phy_code_s QLTY_CD,
t3.phy_name_s || t3.phy_unit || '[' || t3.item_name_d ||
decode(t3.item_name_s, '', '', ',' || t3.item_name_s) || ']' QLTY_CD_CFNM,
t3.seq QLTY_SEQ,
t3.stdmin QLTY_MIN,
t3.stdmax QLTY_MAX,
t2.val1 QLTY_VAL_WK,
t2.val2 QLTY_VAL_WKX,
t2.val3 QLTY_VAL_WK1,
t2.val4 QLTY_VAL_WK2,
'' QLTY_DEC_CD
from qcm_jhy_sample_consign_d t1,
qcm_jhy_insp_physics t2,
qcm_jhy_sample_consign_d_item t3
where t1.specimen_no = t3.specimen_no
and t1.specimen_no = t2.specimen_no
and t2.seq = t3.seq
and t1.inspection_lot = ?
SELECT
CC.COIL_NO
,CC.H_COIL_NO1
,CC.ORD_NO
,XB_PACKAGE.GF_CUSTOMER_FIND(CC.CUST_CD) CUST_CD -- 客户代码
,CC.ORD_SEQ
,CC.SPEC_ABBSYM
,CC.SPEC_STL_GRD
,CC.COIL_THK
,CC.COIL_WTH
,CC.DCS_THK
,CC.DCS_WTH
,CC.ACT_WGT
,CC.MISSNO_CLF_CD
,CC.SMP_DIR_PIC_YN
,CC.SMP_PICK_YN
,CC.SMP_NO
,CC.SMP_CUT_LOC
,CC.FB_YN
,CC.WGT_DEC_RST
,CC.EXTSHAPE_DEC_GRD
,CC.EXTSHAPE_QUALITY
,CC.CUR_PROG_CD
,DECODE(CC.CAL_TYPE,'2','返修卷','3','过渡卷','正常酸轧卷') CAL_TYPE
,DECODE(CC.CAL_TYPE,'2','Y','') FAN_XIU
,DECODE(CC.CAL_TYPE,'3','Y','') RCAL_YN
,CC.RCAL_CNT
,CC.CRK_CD1
,CC.CRK_CD2
,CC.CRK_CD3
,CC.CRK_CD4
,CC.CRK_CD5
,CC.CRK_CD1_TYPE
,CC.CRK_CD2_TYPE
,CC.CRK_CD3_TYPE
,CC.CRK_CD4_TYPE
,CC.CRK_CD5_TYPE
,OP.C_ORD_THK
,OP.C_ORD_WTH
,OP.C_ORD_THK_MIN
,OP.C_ORD_THK_MAX
,OP.C_ORD_WTH_MIN
,OP.C_ORD_WTH_MAX
,CC.MILL_DTIME
,CC.L3_ROUGH CU_CAO_DU --20151223添加粗糙度
FROM TBE02_ORD_PRC OP , C_TBL02_COIL_COMM CC
WHERE CC.ORD_NO = OP.ORD_NO(+)
AND CC.ORD_SEQ = OP.ORD_SEQ(+)
AND CC.EXTSHAPE_QUALITY IS NULL
AND CC.COIL_STAT = '2'
ORDER BY CC.COIL_NO
UPDATE C_TBL02_COIL_COMM T
SET T.SMP_PICK_YN = ?
WHERE T.COIL_NO = ?
AND T.COIL_STAT IN ('1' , '2')
AND T.MATLQLTY_DEC_GRD IS NULL
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'
UPDATE C_TBL02_COIL_COMM T
SET T.CRK_CD1 = ?
,T.CRK_CD1_TYPE = ?
,T.CRK_CD2 = ?
,T.CRK_CD2_TYPE = ?
,T.CRK_CD3 = ?
,T.CRK_CD3_TYPE = ?
,T.CRK_CD4 = ?
,T.CRK_CD4_TYPE = ?
,T.CRK_CD5 = ?
,T.CRK_CD5_TYPE = ?
WHERE T.COIL_NO = ?
AND T.COIL_STAT IN ('1' , '2')
AND T.TOT_DEC_GRD IS NULL
UPDATE C_TBL02_COIL_COMM T
SET T.EXTSHAPE_QUALITY = ?
,T.EXTSHAPE_DEC_DTIME = TO_CHAR(SYSDATE , 'YYYYMMDDHH24MISS')
,T.EXTSHAPE_DEC_ID = ?
,T.EXTSHAPE_DEC_GRD = '1'
WHERE T.COIL_NO = ?
AND T.COIL_STAT IN ('1' , '2')
AND T.TOT_DEC_GRD IS NULL
UPDATE C_TBL02_COIL_COMM T
SET T.DCS_THK = ?
,T.DCS_WTH = ?
WHERE T.COIL_NO = ?
AND T.COIL_STAT IN ('1' , '2')
-- AND T.TOT_DEC_GRD IS NULL
{call ZL_SUAN_DCS01.COIL_FAN_XIU(?,?,?,?,?)}
{call WGPDGX(?,?,?,?,?)}
{call RZQXLR(?,?,?,?,?,?,?,?)}
{call ZL_HOST_DCS02.SMP_SPM_CHECK(?,?,?,?,?)}
{call LTWDDJGG(?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)}
{call RZSJGX(?,?,?,?,?,?,?)}
SELECT
CC.OLD_SAMPL_NO COIL_NO
,CC.ORD_NO
,XB_PACKAGE.GF_CUSTOMER_FIND(CC.CUST_CD) CUST_CD
,CC.ORD_SEQ
,CC.SPEC_ABBSYM
,CC.SPEC_STL_GRD
,CC.COIL_THK
,CC.COIL_WTH
,CC.DCS_THK
,CC.DCS_WTH
,CC.YUAN_COIL_THK
,CC.YUAN_COIL_WTH
,CC.ACT_WGT
,CC.MISSNO_CLF_CD
,CC.SMP_DIR_PIC_YN
,CC.SMP_PICK_YN
,CC.SMP_NO
,CC.SMP_CUT_LOC
,CC.WGT_DEC_RST
,CC.EXTSHAPE_DEC_GRD
,CC.EXTSHAPE_QUALITY
,CC.CUR_PROG_CD
,CC.CRK_CD1
,CC.CRK_CD2
,CC.CRK_CD3
,CC.CRK_CD4
,CC.CRK_CD5
,CC.CRK_CD1_TYPE
,CC.CRK_CD2_TYPE
,CC.CRK_CD3_TYPE
,CC.CRK_CD4_TYPE
,CC.CRK_CD5_TYPE
,SM.ORD_THK C_ORD_THK --订单计划规格
,SM.ORD_WTH C_ORD_WTH --订单计划规格
,SM.THK_MIN C_ORD_THK_MIN --订单最小厚度
,SM.THK_MAX C_ORD_THK_MAX --订单最大厚度
,SM.WTH_MIN C_ORD_WTH_MIN --订单最小宽度
,SM.WTH_MAX C_ORD_WTH_MAX --订单最大宽度
,CC.MILL_DTIME
,CL.MANU_COIL_THK YUAN_COIL_THK
,CL.MANU_COIL_WTH YUAN_COIL_WTH
,SM.COIL_THK S_COIL_THK
,SM.COIL_WTH S_COIL_WTH
,CC.ELONGATION_SPM --平整机延伸率
,CC.CU_CAO_DU --粗糙度
,CC.CAL_TYPE_TEMP --返修温度
,DECODE(CC.CAL_TYPE,'2','返修卷','3','过渡卷','正常连退卷') CAL_TYPE ---1正常卷,2返修卷,3过渡卷
,DECODE(CC.CAL_TYPE,'2','Y','') FAN_XIU
,DECODE(CC.CAL_TYPE,'3','Y','') RCAL_YN --是否过渡
,CC.RCAL_CNT
,CASE WHEN CC.RCAL_CNT >0 THEN CC.RCAL_CNT||'次过渡' ELSE NULL END RCAL_CNT_1
,CC.EXTSHAPE_DEC_ID
,CC.EXTSHAPE_DEC_DTIME
,CC.COIL_RT
,CC.FB_YN
,CL.H_COIL_NO1
,CL.EXTSHAPE_DEC_GRD EXTSHAPE_DEC_GRD_S, --酸轧卷外观判定结果
CL.EXTSHAPE_QUALITY EXTSHAPE_QUALITY_S, --酸轧卷外观判定等级
--ZL_NORM_COMM.FZ00_COMM('B02001',CL.CRK_CD1) CRK_CD1_S, --酸轧卷缺陷1
CL.CRK_CD1 CRK_CD1_S,
CL.CRK_CD1_TYPE CRK_CD1_TYPE_S, --酸轧卷缺陷1类型
--ZL_NORM_COMM.FZ00_COMM('B02001',CL.CRK_CD2) CRK_CD2_S, --酸轧卷缺陷2
CL.CRK_CD2 CRK_CD2_S,
CL.CRK_CD2_TYPE CRK_CD2_TYPE_S, --酸轧卷缺陷2类型
CK.EXTSHAPE_DEC_GRD EXTSHAPE_DEC_GRD_H, --热轧卷外观判定结果
--ZL_NORM_COMM.FZ00_COMM('H02001', CK.CRK_CD1) CRK_CD1_H, --热轧卷缺陷1
--ZL_NORM_COMM.FZ00_COMM('H02001', CK.CRK_CD2) CRK_CD2_H --热轧卷缺陷2
(SELECT TC3.SM_CFNM FROM TBZ00_COMMCD TC3 WHERE TC3.LG_CD = 'H02001' AND TC3.SM_CD = CK.CRK_CD1) CRK_CD1_H,
(SELECT TC4.SM_CFNM FROM TBZ00_COMMCD TC4 WHERE TC4.LG_CD = 'H02001' AND TC4.SM_CD = CK.CRK_CD2) CRK_CD2_H
FROM L_TBF03_SPEC_MILL SM
,C_TBL02_COIL_COMM CL
,C_TBK02_COIL_COMM CK
,(SELECT T1.COIL_NO COIL_ID --母卷ID
,T2.* --子卷信息
FROM C_TBC02_COIL_COMM T1
,C_TBC02_COIL_COMM T2
WHERE T1.SLAB_NO = T2.SLAB_NO
AND T1.LINE_TP = 'L'
AND T2.LINE_TP = 'L'
AND LENGTH(T1.COIL_NO) = 12
AND T2.DIVIDE_YN = 'N'
AND T2.CUR_PROG_CD IS NOT NULL
AND T2.MILL_DTIME BETWEEN NVL(? , T2.MILL_DTIME) AND NVL(? , T2.MILL_DTIME)
AND T2.OLD_SAMPL_NO LIKE ?||'%'
) CC
WHERE CC.COIL_ID = SM.L_COIL_ID
AND CC.LINE_TP = 'L'
AND CC.DIVIDE_YN = 'N'
AND CL.H_COIL_NO1 = CK.COIL_NO(+)
AND CL.COIL_NO = CC.ORI_OLD_SAMPL_NO
AND CL.COIL_NO = SM.C_COIL_NO
AND CC.CUR_PROG_CD IS NOT NULL
--AND CC.MILL_DTIME BETWEEN NVL(? , CC.MILL_DTIME) AND NVL(? , CC.MILL_DTIME)
--AND CC.OLD_SAMPL_NO LIKE ?||'%'
ORDER BY CC.OLD_SAMPL_NO
SELECT
CC.OLD_SAMPL_NO COIL_NO
,CC.ORD_NO
,CC.PRODNM_CD
,XB_PACKAGE.GF_CUSTOMER_FIND(CC.CUST_CD) CUST_CD
,CC.ORD_SEQ
,CC.SPEC_ABBSYM
,CC.SPEC_STL_GRD
,CC.COIL_THK
,CC.COIL_WTH
,CC.L2_COIL_WTH
,CC.L2_COIL_THK
,CC.DCS_THK
,CC.DCS_WTH
,CC.YUAN_COIL_THK
,CC.YUAN_COIL_WTH
,CC.ACT_WGT
,CC.MISSNO_CLF_CD
,CC.SMP_DIR_PIC_YN
,CC.SMP_PICK_YN
,CC.SMP_NO
,CC.SMP_CUT_LOC
,CC.WGT_DEC_RST
,CC.EXTSHAPE_DEC_GRD
,CC.EXTSHAPE_QUALITY
,CC.CUR_PROG_CD
,CC.CRK_CD1
,CC.CRK_CD2
,CC.CRK_CD3
,CC.CRK_CD4
,CC.CRK_CD5
,CC.CRK_CD1_TYPE
,CC.CRK_CD2_TYPE
,CC.CRK_CD3_TYPE
,CC.CRK_CD4_TYPE
,CC.CRK_CD5_TYPE
,t10.RSEPON_UNIT
,t10.DETAINFO
,decode(CC.MAOCI,'N','不合格','Y','合格') MAOCI
,CC.FB_REASON
,SM.ORD_THK C_ORD_THK --订单计划规格
,SM.ORD_WTH C_ORD_WTH --订单计划规格
,SM.THK_MIN C_ORD_THK_MIN --订单最小厚度
,SM.THK_MAX C_ORD_THK_MAX --订单最大厚度
,SM.WTH_MIN C_ORD_WTH_MIN --订单最小宽度
,SM.WTH_MAX C_ORD_WTH_MAX --订单最大宽度
,CC.MILL_DTIME
,CL.MANU_COIL_THK YUAN_COIL_THK
,CL.MANU_COIL_WTH YUAN_COIL_WTH
,SM.COIL_THK S_COIL_THK
,SM.COIL_WTH S_COIL_WTH
,CC.ELONGATION_SPM --平整机延伸率
,CC.CU_CAO_DU --粗糙度
,CC.CAL_TYPE_TEMP --返修温度
,DECODE(CC.CAL_TYPE,'2','返修卷','3','过渡卷','正常连退卷') CAL_TYPE ---1正常卷,2返修卷,3过渡卷
,DECODE(CC.CAL_TYPE,'2','Y','') FAN_XIU
,DECODE(CC.CAL_TYPE,'3','Y','') RCAL_YN --是否过渡
,CC.RCAL_CNT
,CASE WHEN CC.RCAL_CNT >0 THEN CC.RCAL_CNT||'次过渡' ELSE NULL END RCAL_CNT_1
,CC.EXTSHAPE_DEC_ID
,CC.EXTSHAPE_DEC_DTIME
,CC.COIL_RT
,CC.FB_YN
,CL.H_COIL_NO1
,CL.SLAB_NO
,CL.EXTSHAPE_DEC_GRD EXTSHAPE_DEC_GRD_S, --酸轧卷外观判定结果
CL.EXTSHAPE_QUALITY EXTSHAPE_QUALITY_S, --酸轧卷外观判定等级
--ZL_NORM_COMM.FZ00_COMM('B02001',CL.CRK_CD1) CRK_CD1_S, --酸轧卷缺陷1
CL.CRK_CD1 CRK_CD1_S,
CL.CRK_CD1_TYPE CRK_CD1_TYPE_S, --酸轧卷缺陷1类型
--ZL_NORM_COMM.FZ00_COMM('B02001',CL.CRK_CD2) CRK_CD2_S, --酸轧卷缺陷2
CL.CRK_CD2 CRK_CD2_S,
CL.CRK_CD2_TYPE CRK_CD2_TYPE_S, --酸轧卷缺陷2类型
CK.EXTSHAPE_DEC_GRD EXTSHAPE_DEC_GRD_H, --热轧卷外观判定结果
--ZL_NORM_COMM.FZ00_COMM('H02001', CK.CRK_CD1) CRK_CD1_H, --热轧卷缺陷1
--ZL_NORM_COMM.FZ00_COMM('H02001', CK.CRK_CD2) CRK_CD2_H --热轧卷缺陷2
(SELECT TC3.SM_CFNM FROM TBZ00_COMMCD TC3 WHERE TC3.LG_CD = 'H02001' AND TC3.SM_CD = CK.CRK_CD1) CRK_CD1_H,
(SELECT TC4.SM_CFNM FROM TBZ00_COMMCD TC4 WHERE TC4.LG_CD = 'H02001' AND TC4.SM_CD = CK.CRK_CD2) CRK_CD2_H
FROM L_TBF03_SPEC_MILL SM
,C_TBL02_COIL_COMM CL
,C_TBK02_COIL_COMM CK
,C_TBC02_COIL_COMM CC
,JB_RSEPON_UNIT t10
WHERE SUBSTR(CC.COIL_NO,1,12) = SM.L_COIL_ID
AND CC.LINE_TP = 'L'
AND CC.DIVIDE_YN = 'N'
AND CL.H_COIL_NO1 = CK.COIL_NO(+)
AND CL.COIL_NO = SM.C_COIL_NO
and CC.OLD_SAMPL_NO = t10.OLD_SAMPL_NO(+)
AND CC.CUR_PROG_CD IS NOT NULL
AND CC.MILL_DTIME BETWEEN NVL(?, CC.MILL_DTIME) AND NVL(? , CC.MILL_DTIME)
AND CC.OLD_SAMPL_NO LIKE ?||'%'
--AND CL.COIL_NO = CC.ORI_OLD_SAMPL_NO
ORDER BY CC.OLD_SAMPL_NO
SELECT
CC.OLD_SAMPL_NO COIL_NO
,CC.ORD_NO
,XB_PACKAGE.GF_CUSTOMER_FIND(CC.CUST_CD) CUST_CD -- 客户代码
,CC.ORD_SEQ
,CC.SPEC_ABBSYM
,CC.SPEC_STL_GRD
,CC.COIL_THK
,CC.COIL_WTH
,CC.DCS_THK
,CC.DCS_WTH
,CC.YUAN_COIL_THK
,CC.YUAN_COIL_WTH
,CC.ACT_WGT
,CC.MISSNO_CLF_CD
,CC.SMP_DIR_PIC_YN
,CC.SMP_PICK_YN
,CC.SMP_NO
,CC.SMP_CUT_LOC
,CC.EXTSHAPE_DEC_GRD
,CC.EXTSHAPE_QUALITY
,CC.CUR_PROG_CD
,CC.CRK_CD1
,CC.CRK_CD2
,CC.CRK_CD3
,CC.CRK_CD4
,CC.CRK_CD5
,CC.CRK_CD1_TYPE
,CC.CRK_CD2_TYPE
,CC.CRK_CD3_TYPE
,CC.CRK_CD4_TYPE
,CC.CRK_CD5_TYPE
,SM.ORD_THK C_ORD_THK --订单计划规格
,SM.ORD_WTH C_ORD_WTH --订单计划规格
,SM.THK_MIN C_ORD_THK_MIN --订单最小厚度
,SM.THK_MAX C_ORD_THK_MAX --订单最大厚度
,SM.WTH_MIN C_ORD_WTH_MIN --订单最小宽度
,SM.WTH_MAX C_ORD_WTH_MAX --订单最大宽度
,CC.MILL_DTIME
,CL.MANU_COIL_THK YUAN_COIL_THK
,CL.MANU_COIL_WTH YUAN_COIL_WTH
,SM.COIL_THK S_COIL_THK
,SM.COIL_WTH S_COIL_WTH
,CC.ELONGATION_SPM --平整机延伸率
,CC.CU_CAO_DU --粗糙度
,CC.CAL_TYPE_TEMP --返修温度
,DECODE(CC.CAL_TYPE,'2','Y','') FAN_XIU
,DECODE(CC.CAL_TYPE,'3','Y','') RCAL_YN --是否过渡
,CC.RCAL_CNT
,DECODE(CC.CAL_TYPE,'2','返修卷','3','过渡卷','正常连退卷') CAL_TYPE
,CASE WHEN CC.RCAL_CNT >0 THEN CC.RCAL_CNT||'次过渡' ELSE NULL END RCAL_CNT_1
,CC.EXTSHAPE_DEC_ID
,CC.EXTSHAPE_DEC_DTIME
,CC.COIL_RT
,CC.FB_YN
,CL.H_COIL_NO1
FROM L_TBF03_SPEC_MILL SM
,C_TBL02_COIL_COMM CL
,(SELECT T1.COIL_NO COIL_ID
,T2.*
FROM C_TBC02_COIL_COMM T1
,C_TBC02_COIL_COMM T2
WHERE T1.SLAB_NO = T2.SLAB_NO
AND T1.LINE_TP = 'L'
AND T2.LINE_TP = 'L'
AND LENGTH(T1.COIL_NO) = 12
) CC
WHERE CC.COIL_ID = SM.L_COIL_ID
AND CC.LINE_TP = 'L'
AND CC.DIVIDE_YN = 'N'
AND CL.COIL_NO = CC.ORI_OLD_SAMPL_NO
AND CL.COIL_NO = SM.C_COIL_NO
AND (CC.EXTSHAPE_QUALITY IS NULL OR (CC.SMP_DIR_PIC_YN = 'Y' AND CC.SMP_PICK_YN IS NULL ))
AND CC.COIL_STAT IN ('1', '2')
ORDER BY CC.OLD_SAMPL_NO
SELECT
CC.OLD_SAMPL_NO COIL_NO
,CC.ORD_NO
,XB_PACKAGE.GF_CUSTOMER_FIND(CC.CUST_CD) CUST_CD -- 客户代码
,CC.ORD_SEQ
,CC.SPEC_ABBSYM
,CC.SPEC_STL_GRD
,CC.COIL_THK
,CC.COIL_WTH
,CC.DCS_THK
,CC.DCS_WTH
,CC.YUAN_COIL_THK
,CC.YUAN_COIL_WTH
,CC.ACT_WGT
,CC.MISSNO_CLF_CD
,CC.SMP_DIR_PIC_YN
,CC.SMP_PICK_YN
,CC.SMP_NO
,CC.SMP_CUT_LOC
,CC.EXTSHAPE_DEC_GRD
,CC.EXTSHAPE_QUALITY
,CC.CUR_PROG_CD
,CC.CRK_CD1
,CC.CRK_CD2
,CC.CRK_CD3
,CC.CRK_CD4
,CC.CRK_CD5
,CC.CRK_CD1_TYPE
,CC.CRK_CD2_TYPE
,CC.CRK_CD3_TYPE
,CC.CRK_CD4_TYPE
,CC.CRK_CD5_TYPE
,SM.ORD_THK C_ORD_THK --订单计划规格
,SM.ORD_WTH C_ORD_WTH --订单计划规格
,SM.THK_MIN C_ORD_THK_MIN --订单最小厚度
,SM.THK_MAX C_ORD_THK_MAX --订单最大厚度
,SM.WTH_MIN C_ORD_WTH_MIN --订单最小宽度
,SM.WTH_MAX C_ORD_WTH_MAX --订单最大宽度
,CC.MILL_DTIME
,CC.ELONGATION_SPM --平整机延伸率
,CC.CU_CAO_DU --粗糙度
,CC.CAL_TYPE_TEMP --返修温度
,DECODE(CC.CAL_TYPE,'2','返修卷','3','过渡卷','正常连退卷') CAL_TYPE
,DECODE(CC.CAL_TYPE,'2','Y','') FAN_XIU
,DECODE(CC.CAL_TYPE,'3','Y','') RCAL_YN --是否过渡
,CC.RCAL_CNT
,CASE WHEN CC.RCAL_CNT >0 THEN CC.RCAL_CNT||'次过渡' ELSE NULL END RCAL_CNT_1
,CC.EXTSHAPE_DEC_ID
,CC.EXTSHAPE_DEC_DTIME
,CC.COIL_RT
,CC.FB_YN
,CC.H_COIL_NO1
FROM L_TBF03_SPEC_MILL SM , C_TBC02_COIL_COMM CC
WHERE CC.COIL_NO = SM.L_COIL_ID
AND CC.LINE_TP = 'L'
AND CC.DIVIDE_YN = 'N'
AND CC.COIL_STAT = '2'
AND CC.FAN_XIU = 'A'
ORDER BY CC.OLD_SAMPL_NO
UPDATE C_TBC02_COIL_COMM T
SET T.CRK_CD1 = ?
,T.CRK_CD1_TYPE = ?
,T.CRK_CD2 = ?
,T.CRK_CD2_TYPE = ?
,T.CRK_CD3 = ?
,T.CRK_CD3_TYPE = ?
,T.CRK_CD4 = ?
,T.CRK_CD4_TYPE = ?
,T.CRK_CD5 = ?
,T.CRK_CD5_TYPE = ?
WHERE T.OLD_SAMPL_NO = ?
AND T.COIL_STAT IN ('1' , '2')
AND T.TOT_DEC_GRD IS NULL
UPDATE C_TBC02_COIL_COMM T
SET T.COIL_RT = ?
,T.EXTSHAPE_QUALITY = ?
,T.EXTSHAPE_DEC_DTIME = TO_CHAR(SYSDATE , 'YYYYMMDDHH24MISS')
,T.EXTSHAPE_DEC_ID = ?
,T.EXTSHAPE_DEC_GRD = '1'
WHERE T.OLD_SAMPL_NO = ?
AND T.COIL_STAT IN ('1' , '2')
AND T.TOT_DEC_GRD IS NULL
UPDATE C_TBC02_COIL_COMM T
SET T.COIL_THK = ?
,T.COIL_WTH = ?
,T.CAL_TYPE_TEMP = ?
,T.CU_CAO_DU = ?
,T.YUAN_COIL_THK = ?
,T.YUAN_COIL_WTH = ?
WHERE T.OLD_SAMPL_NO = ?
AND T.COIL_STAT IN ('1' , '2')
AND T.TOT_DEC_GRD IS NULL
UPDATE C_TBC02_COIL_COMM T
SET T.SMP_PICK_YN = ?
WHERE T.OLD_SAMPL_NO = ?
AND T.COIL_STAT IN ('1' , '2')
AND T.SMP_DIR_PIC_YN = 'Y'
-- AND T.MATLQLTY_DEC_GRD IS NULL
{call ZL_LIANT_DCS01.COIL_FAN_XIU(?,?,?,?,?)}
SELECT
CC.OLD_SAMPL_NO COIL_NO
,CC.ORD_NO
,CC.PRODNM_CD
,XB_PACKAGE.GF_CUSTOMER_FIND(CC.CUST_CD) CUST_CD
,CC.ORD_SEQ
,CC.SPEC_ABBSYM
,CC.SPEC_STL_GRD
,CC.COIL_THK
,CC.COIL_WTH
,CC.DCS_THK
,CC.DCS_WTH
,CC.L2_COIL_WTH
,CC.L2_COIL_THK
,CC.YUAN_COIL_THK
,CC.YUAN_COIL_WTH
,CC.ACT_WGT
,CC.MISSNO_CLF_CD
,CC.SMP_DIR_PIC_YN
,CC.SMP_PICK_YN
,CC.SMP_NO
,CC.SMP_CUT_LOC
,CC.WGT_DEC_RST
,CC.EXTSHAPE_DEC_GRD
,CC.EXTSHAPE_QUALITY
,CC.CUR_PROG_CD
,CC.CRK_CD1
,CC.CRK_CD2
,CC.CRK_CD3
,CC.CRK_CD4
,CC.CRK_CD5
,CC.FB_REASON
,CC.CRK_CD1_TYPE
,CC.CRK_CD2_TYPE
,CC.CRK_CD3_TYPE
,CC.CRK_CD4_TYPE
,CC.CRK_CD5_TYPE
,t10.RSEPON_UNIT
,t10.DETAINFO
,decode(CC.MAOCI,'N','不合格','Y','合格') MAOCI
,SM.ORD_THK C_ORD_THK --订单计划规格
,SM.ORD_WTH C_ORD_WTH --订单计划规格
,SM.THK_MIN C_ORD_THK_MIN --订单最小厚度
,SM.THK_MAX C_ORD_THK_MAX --订单最大厚度
,SM.WTH_MIN C_ORD_WTH_MIN --订单最小宽度
,SM.WTH_MAX C_ORD_WTH_MAX --订单最大宽度
,CC.MILL_DTIME
,CL.MANU_COIL_THK YUAN_COIL_THK
,CL.MANU_COIL_WTH YUAN_COIL_WTH
,SM.COIL_THK S_COIL_THK
,SM.COIL_WTH S_COIL_WTH
,CC.ELONGATION_SPM --平整机延伸率
,CC.CU_CAO_DU --粗糙度
,CC.CAL_TYPE_TEMP --返修温度
,DECODE(CC.CAL_TYPE,'2','Y','') FAN_XIU
,DECODE(CC.CAL_TYPE,'3','Y','') RCAL_YN --是否过渡
,CC.RCAL_CNT
,DECODE(CC.CAL_TYPE,'2','返修卷','3','过渡卷','正常重卷') CAL_TYPE
,CASE WHEN CC.RCAL_CNT >0 THEN CC.RCAL_CNT||'次过渡' ELSE NULL END RCAL_CNT_1
,CC.EXTSHAPE_DEC_ID
,CC.EXTSHAPE_DEC_DTIME
,CC.COIL_RT
,CC.FB_YN
,CL.H_COIL_NO1
,CL.SLAB_NO
,CL.EXTSHAPE_DEC_GRD EXTSHAPE_DEC_GRD_S, --酸轧卷外观判定结果
CL.EXTSHAPE_QUALITY EXTSHAPE_QUALITY_S, --酸轧卷外观判定等级
--ZL_NORM_COMM.FZ00_COMM('B02001',CL.CRK_CD1) CRK_CD1_S, --酸轧卷缺陷1
CL.CRK_CD1 CRK_CD1_S,
CL.CRK_CD1_TYPE CRK_CD1_TYPE_S, --酸轧卷缺陷1类型
--ZL_NORM_COMM.FZ00_COMM('B02001',CL.CRK_CD2) CRK_CD2_S, --酸轧卷缺陷2
CL.CRK_CD2 CRK_CD2_S,
CL.CRK_CD2_TYPE CRK_CD2_TYPE_S, --酸轧卷缺陷2类型
CK.EXTSHAPE_DEC_GRD EXTSHAPE_DEC_GRD_H, --热轧卷外观判定结果
--ZL_NORM_COMM.FZ00_COMM('H02001', CK.CRK_CD1) CRK_CD1_H, --热轧卷缺陷1
(SELECT TC3.SM_CFNM FROM TBZ00_COMMCD TC3 WHERE TC3.LG_CD = 'H02001' AND TC3.SM_CD = CK.CRK_CD1) CRK_CD1_H,
--ZL_NORM_COMM.FZ00_COMM('H02001', CK.CRK_CD2) CRK_CD2_H, --热轧卷缺陷2
(SELECT TC4.SM_CFNM FROM TBZ00_COMMCD TC4 WHERE TC4.LG_CD = 'H02001' AND TC4.SM_CD = CK.CRK_CD2) CRK_CD2_H,
CC.EXTSHAPE_DEC_GRD_L, --连退卷外观判定结果
CC.EXTSHAPE_QUALITY_L, --连退卷外观判定等级
--ZL_NORM_COMM.FZ00_COMM('B02001',CC.CRK_CD1_L) CRK_CD1_L, --连退卷缺陷1
CC.CRK_CD1_L CRK_CD1_L,
CC.CRK_CD1_TYPE_L, --连退卷缺陷1类型
--ZL_NORM_COMM.FZ00_COMM('B02001',CC.CRK_CD2_L) CRK_CD2_L, --连退卷缺陷2
CC.CRK_CD2_L CRK_CD2_L,
CC.CRK_CD2_TYPE_L --连退卷缺陷2类型
FROM L_TBF03_SPEC_MILL SM
,C_TBL02_COIL_COMM CL
,C_TBK02_COIL_COMM CK
,JB_RSEPON_UNIT t10
,(SELECT T1.COIL_NO COIL_ID
,T1.ORI_OLD_SAMPL_NO SUAN_COIL_NO
,T1.EXTSHAPE_DEC_GRD EXTSHAPE_DEC_GRD_L, --外观判定结果
T1.EXTSHAPE_QUALITY EXTSHAPE_QUALITY_L, --外观判定等级
T1.CRK_CD1 CRK_CD1_L, --缺陷1
T1.CRK_CD1_TYPE CRK_CD1_TYPE_L, --缺陷1类型
T1.CRK_CD2 CRK_CD2_L, --缺陷2
T1.CRK_CD2_TYPE CRK_CD2_TYPE_L --缺陷2类型
,T2.*
FROM C_TBC02_COIL_COMM T1
,C_TBC02_COIL_COMM T2
WHERE T1.SLAB_NO = T2.SLAB_NO
AND T1.LINE_TP = 'L'
AND T2.LINE_TP = 'C'
AND LENGTH(T1.COIL_NO) = 12
AND SUBSTR(T2.MILL_DTIME,1,8) BETWEEN ? AND ?
AND T2.OLD_SAMPL_NO LIKE ?||'%'
) CC
WHERE CC.COIL_ID = SM.L_COIL_ID
AND CC.LINE_TP = 'C'
AND CC.DIVIDE_YN = 'N'
AND CL.H_COIL_NO1 = CK.COIL_NO(+)
and CC.OLD_SAMPL_NO = t10.OLD_SAMPL_NO(+)
AND CL.COIL_NO = SUBSTR(CC.OLD_SAMPL_NO , 1,12)
--AND CL.COIL_NO = SM.C_COIL_NO
--AND CC.MILL_DTIME BETWEEN NVL(? , CC.MILL_DTIME) AND NVL(? , CC.MILL_DTIME)
--AND CC.OLD_SAMPL_NO LIKE ?||'%'
ORDER BY CC.OLD_SAMPL_NO
SELECT
CC.OLD_SAMPL_NO COIL_NO
,CC.ORD_NO
,XB_PACKAGE.GF_CUSTOMER_FIND(CC.CUST_CD) CUST_CD
,CC.ORD_SEQ
,CC.SPEC_ABBSYM
,CC.SPEC_STL_GRD
,CC.COIL_THK
,CC.COIL_WTH
,CC.DCS_THK
,CC.DCS_WTH
,CC.YUAN_COIL_THK
,CC.YUAN_COIL_WTH
,CC.ACT_WGT
,CC.MISSNO_CLF_CD
,CC.SMP_DIR_PIC_YN
,CC.SMP_PICK_YN
,CC.SMP_NO
,CC.SMP_CUT_LOC
,CC.WGT_DEC_RST
,CC.EXTSHAPE_DEC_GRD
,CC.EXTSHAPE_QUALITY
,CC.CUR_PROG_CD
,CC.CRK_CD1
,CC.CRK_CD2
,CC.CRK_CD3
,CC.CRK_CD4
,CC.CRK_CD5
,CC.CRK_CD1_TYPE
,CC.CRK_CD2_TYPE
,CC.CRK_CD3_TYPE
,CC.CRK_CD4_TYPE
,CC.CRK_CD5_TYPE
,SM.ORD_THK C_ORD_THK --订单计划规格
,SM.ORD_WTH C_ORD_WTH --订单计划规格
,SM.THK_MIN C_ORD_THK_MIN --订单最小厚度
,SM.THK_MAX C_ORD_THK_MAX --订单最大厚度
,SM.WTH_MIN C_ORD_WTH_MIN --订单最小宽度
,SM.WTH_MAX C_ORD_WTH_MAX --订单最大宽度
,CC.MILL_DTIME
,CL.MANU_COIL_THK YUAN_COIL_THK
,CL.MANU_COIL_WTH YUAN_COIL_WTH
,SM.COIL_THK S_COIL_THK
,SM.COIL_WTH S_COIL_WTH
,CC.ELONGATION_SPM --平整机延伸率
,CC.CU_CAO_DU --粗糙度
,CC.CAL_TYPE_TEMP --返修温度
,DECODE(CC.CAL_TYPE,'2','Y','') FAN_XIU
,DECODE(CC.CAL_TYPE,'3','Y','') RCAL_YN --是否过渡
,CC.RCAL_CNT
,DECODE(CC.CAL_TYPE,'2','返修卷','3','过渡卷','正常重卷') CAL_TYPE
,CASE WHEN CC.RCAL_CNT >0 THEN CC.RCAL_CNT||'次过渡' ELSE NULL END RCAL_CNT_1
,CC.EXTSHAPE_DEC_ID
,CC.EXTSHAPE_DEC_DTIME
,CC.COIL_RT
,CC.FB_YN
,CL.H_COIL_NO1
,CL.EXTSHAPE_DEC_GRD EXTSHAPE_DEC_GRD_S, --酸轧卷外观判定结果
CL.EXTSHAPE_QUALITY EXTSHAPE_QUALITY_S, --酸轧卷外观判定等级
--ZL_NORM_COMM.FZ00_COMM('B02001',CL.CRK_CD1) CRK_CD1_S, --酸轧卷缺陷1
CL.CRK_CD1 CRK_CD1_S,
CL.CRK_CD1_TYPE CRK_CD1_TYPE_S, --酸轧卷缺陷1类型
--ZL_NORM_COMM.FZ00_COMM('B02001',CL.CRK_CD2) CRK_CD2_S, --酸轧卷缺陷2
CL.CRK_CD2 CRK_CD2_S,
CL.CRK_CD2_TYPE CRK_CD2_TYPE_S, --酸轧卷缺陷2类型
CK.EXTSHAPE_DEC_GRD EXTSHAPE_DEC_GRD_H, --热轧卷外观判定结果
--ZL_NORM_COMM.FZ00_COMM('H02001', CK.CRK_CD1) CRK_CD1_H, --热轧卷缺陷1
(SELECT TC3.SM_CFNM FROM TBZ00_COMMCD TC3 WHERE TC3.LG_CD = 'H02001' AND TC3.SM_CD = CK.CRK_CD1) CRK_CD1_H,
--ZL_NORM_COMM.FZ00_COMM('H02001', CK.CRK_CD2) CRK_CD2_H, --热轧卷缺陷2
(SELECT TC4.SM_CFNM FROM TBZ00_COMMCD TC4 WHERE TC4.LG_CD = 'H02001' AND TC4.SM_CD = CK.CRK_CD2) CRK_CD2_H,
CC.EXTSHAPE_DEC_GRD_L, --连退卷外观判定结果
CC.EXTSHAPE_QUALITY_L, --连退卷外观判定等级
--ZL_NORM_COMM.FZ00_COMM('B02001',CC.CRK_CD1_L) CRK_CD1_L, --连退卷缺陷1
CC.CRK_CD1_L CRK_CD1_L,
CC.CRK_CD1_TYPE_L, --连退卷缺陷1类型
--ZL_NORM_COMM.FZ00_COMM('B02001',CC.CRK_CD2_L) CRK_CD2_L, --连退卷缺陷2
CC.CRK_CD2_L CRK_CD2_L,
CC.CRK_CD2_TYPE_L --连退卷缺陷2类型
FROM L_TBF03_SPEC_MILL SM
,C_TBL02_COIL_COMM CL
,C_TBK02_COIL_COMM CK
,(SELECT SUBSTR(T1.COIL_NO,1,12) COIL_ID
,T1.ORI_OLD_SAMPL_NO SUAN_COIL_NO
,T1.EXTSHAPE_DEC_GRD EXTSHAPE_DEC_GRD_L, --外观判定结果
T1.EXTSHAPE_QUALITY EXTSHAPE_QUALITY_L, --外观判定等级
T1.CRK_CD1 CRK_CD1_L, --缺陷1
T1.CRK_CD1_TYPE CRK_CD1_TYPE_L, --缺陷1类型
T1.CRK_CD2 CRK_CD2_L, --缺陷2
T1.CRK_CD2_TYPE CRK_CD2_TYPE_L --缺陷2类型
,T2.*
FROM C_TBC02_COIL_COMM T1
,C_TBC02_COIL_COMM T2
WHERE T1.OLD_SAMPL_NO = T2.ORI_OLD_SAMPL_NO
AND T1.LINE_TP = 'L'
AND T2.LINE_TP = 'C'
AND LENGTH(T1.COIL_NO) >= 12
AND T2.MILL_DTIME BETWEEN NVL(? , T2.MILL_DTIME) AND NVL(? , T2.MILL_DTIME)
AND T2.OLD_SAMPL_NO LIKE ?||'%'
) CC
WHERE CC.COIL_ID = SM.L_COIL_ID
AND CC.LINE_TP = 'C'
AND CC.DIVIDE_YN = 'N'
AND CL.H_COIL_NO1 = CK.COIL_NO(+)
AND CL.COIL_NO = SM.C_COIL_NO
--AND CL.COIL_NO = SUBSTR(CC.OLD_SAMPL_NO , 1,12)
--AND CC.MILL_DTIME BETWEEN NVL(? , CC.MILL_DTIME) AND NVL(? , CC.MILL_DTIME)
--AND CC.OLD_SAMPL_NO LIKE ?||'%'
ORDER BY CC.OLD_SAMPL_NO
SELECT
CC.OLD_SAMPL_NO COIL_NO
,CC.ORD_NO
,XB_PACKAGE.GF_CUSTOMER_FIND(CC.CUST_CD) CUST_CD -- 客户代码
,CC.ORD_SEQ
,CC.SPEC_ABBSYM
,CC.SPEC_STL_GRD
,CC.COIL_THK
,CC.COIL_WTH
,CC.DCS_THK
,CC.DCS_WTH
,CC.YUAN_COIL_THK
,CC.YUAN_COIL_WTH
,CC.ACT_WGT
,CC.MISSNO_CLF_CD
,CC.SMP_DIR_PIC_YN
,CC.SMP_PICK_YN
,CC.SMP_NO
,CC.SMP_CUT_LOC
,CC.EXTSHAPE_DEC_GRD
,CC.EXTSHAPE_QUALITY
,CC.CUR_PROG_CD
,CC.CRK_CD1
,CC.CRK_CD2
,CC.CRK_CD3
,CC.CRK_CD4
,CC.CRK_CD5
,CC.CRK_CD1_TYPE
,CC.CRK_CD2_TYPE
,CC.CRK_CD3_TYPE
,CC.CRK_CD4_TYPE
,CC.CRK_CD5_TYPE
,SM.ORD_THK C_ORD_THK --订单计划规格
,SM.ORD_WTH C_ORD_WTH --订单计划规格
,SM.THK_MIN C_ORD_THK_MIN --订单最小厚度
,SM.THK_MAX C_ORD_THK_MAX --订单最大厚度
,SM.WTH_MIN C_ORD_WTH_MIN --订单最小宽度
,SM.WTH_MAX C_ORD_WTH_MAX --订单最大宽度
,CC.MILL_DTIME
,CL.MANU_COIL_THK YUAN_COIL_THK
,CL.MANU_COIL_WTH YUAN_COIL_WTH
,SM.COIL_THK S_COIL_THK
,SM.COIL_WTH S_COIL_WTH
,CC.ELONGATION_SPM --平整机延伸率
,CC.CU_CAO_DU --粗糙度
,CC.CAL_TYPE_TEMP --返修温度
,DECODE(CC.CAL_TYPE,'2','Y','') FAN_XIU
,DECODE(CC.CAL_TYPE,'3','Y','') RCAL_YN --是否过渡
,DECODE(CC.CAL_TYPE,'2','返修卷','3','过渡卷','正常重卷') CAL_TYPE
,CC.RCAL_CNT
,CASE WHEN CC.RCAL_CNT >0 THEN CC.RCAL_CNT||'次过渡' ELSE NULL END RCAL_CNT_1
,CC.EXTSHAPE_DEC_ID
,CC.EXTSHAPE_DEC_DTIME
,CC.COIL_RT
,CC.FB_YN
,CL.H_COIL_NO1
FROM L_TBF03_SPEC_MILL SM
,C_TBL02_COIL_COMM CL
,(SELECT T1.COIL_NO COIL_ID
,T1.ORI_OLD_SAMPL_NO SUAN_COIL_NO
,T2.*
FROM C_TBC02_COIL_COMM T1
,C_TBC02_COIL_COMM T2
WHERE T1.SLAB_NO = T2.SLAB_NO
AND T1.LINE_TP = 'L'
AND T2.LINE_TP = 'C'
AND LENGTH(T1.COIL_NO) = 12
) CC
WHERE CC.COIL_ID = SM.L_COIL_ID
AND CC.LINE_TP = 'C'
AND CC.DIVIDE_YN = 'N'
AND CL.COIL_NO = SUBSTR(CC.OLD_SAMPL_NO , 1,12)
AND CL.COIL_NO = SM.C_COIL_NO
AND (CC.EXTSHAPE_QUALITY IS NULL OR (CC.SMP_DIR_PIC_YN = 'Y' AND CC.SMP_PICK_YN IS NULL ))
AND CC.COIL_STAT IN ('1' , '2')
ORDER BY CC.OLD_SAMPL_NO
SELECT
CC.OLD_SAMPL_NO COIL_NO
,CC.ORD_NO
,CC.PRODNM_CD
,XB_PACKAGE.GF_CUSTOMER_FIND(CC.CUST_CD) CUST_CD
,CC.ORD_SEQ
,CC.SPEC_ABBSYM
,CC.SPEC_STL_GRD
,CC.COIL_THK
,CC.COIL_WTH
,CC.DCS_THK
,CC.DCS_WTH
,CC.L2_COIL_WTH
,CC.L2_COIL_THK
,CC.YUAN_COIL_THK
,CC.YUAN_COIL_WTH
,CC.ACT_WGT
,CC.MISSNO_CLF_CD
,CC.SMP_DIR_PIC_YN
,CC.SMP_PICK_YN
,CC.SMP_NO
,CC.SMP_CUT_LOC
,CC.WGT_DEC_RST
,CC.EXTSHAPE_DEC_GRD
,CC.EXTSHAPE_QUALITY
,CC.CUR_PROG_CD
,CC.CRK_CD1
,CC.CRK_CD2
,CC.CRK_CD3
,CC.CRK_CD4
,CC.CRK_CD5
,CC.FB_REASON
,CC.CRK_CD1_TYPE
,CC.CRK_CD2_TYPE
,CC.CRK_CD3_TYPE
,CC.CRK_CD4_TYPE
,CC.CRK_CD5_TYPE
,t10.RSEPON_UNIT
,t10.DETAINFO
,decode(CC.MAOCI,'N','不合格','Y','合格') MAOCI
,SM.ORD_THK C_ORD_THK --订单计划规格
,SM.ORD_WTH C_ORD_WTH --订单计划规格
,SM.THK_MIN C_ORD_THK_MIN --订单最小厚度
,SM.THK_MAX C_ORD_THK_MAX --订单最大厚度
,SM.WTH_MIN C_ORD_WTH_MIN --订单最小宽度
,SM.WTH_MAX C_ORD_WTH_MAX --订单最大宽度
,CC.MILL_DTIME
,CL.MANU_COIL_THK YUAN_COIL_THK
,CL.MANU_COIL_WTH YUAN_COIL_WTH
,SM.COIL_THK S_COIL_THK
,SM.COIL_WTH S_COIL_WTH
,CC.ELONGATION_SPM --平整机延伸率
,CC.CU_CAO_DU --粗糙度
,CC.CAL_TYPE_TEMP --返修温度
,DECODE(CC.CAL_TYPE,'2','Y','') FAN_XIU
,DECODE(CC.CAL_TYPE,'3','Y','') RCAL_YN --是否过渡
,CC.RCAL_CNT
,DECODE(CC.CAL_TYPE,'2','返修卷','3','过渡卷','正常重卷') CAL_TYPE
,CASE WHEN CC.RCAL_CNT >0 THEN CC.RCAL_CNT||'次过渡' ELSE NULL END RCAL_CNT_1
,CC.EXTSHAPE_DEC_ID
,CC.EXTSHAPE_DEC_DTIME
,CC.COIL_RT
,CC.FB_YN
,CL.H_COIL_NO1
,CL.SLAB_NO
,CL.EXTSHAPE_DEC_GRD EXTSHAPE_DEC_GRD_S, --酸轧卷外观判定结果
CL.EXTSHAPE_QUALITY EXTSHAPE_QUALITY_S, --酸轧卷外观判定等级
--ZL_NORM_COMM.FZ00_COMM('B02001',CL.CRK_CD1) CRK_CD1_S, --酸轧卷缺陷1
CL.CRK_CD1 CRK_CD1_S,
CL.CRK_CD1_TYPE CRK_CD1_TYPE_S, --酸轧卷缺陷1类型
--ZL_NORM_COMM.FZ00_COMM('B02001',CL.CRK_CD2) CRK_CD2_S, --酸轧卷缺陷2
CL.CRK_CD2 CRK_CD2_S,
CL.CRK_CD2_TYPE CRK_CD2_TYPE_S, --酸轧卷缺陷2类型
CK.EXTSHAPE_DEC_GRD EXTSHAPE_DEC_GRD_H, --热轧卷外观判定结果
--ZL_NORM_COMM.FZ00_COMM('H02001', CK.CRK_CD1) CRK_CD1_H, --热轧卷缺陷1
(SELECT TC3.SM_CFNM FROM TBZ00_COMMCD TC3 WHERE TC3.LG_CD = 'H02001' AND TC3.SM_CD = CK.CRK_CD1) CRK_CD1_H,
--ZL_NORM_COMM.FZ00_COMM('H02001', CK.CRK_CD2) CRK_CD2_H, --热轧卷缺陷2
(SELECT TC4.SM_CFNM FROM TBZ00_COMMCD TC4 WHERE TC4.LG_CD = 'H02001' AND TC4.SM_CD = CK.CRK_CD2) CRK_CD2_H,
CC.EXTSHAPE_DEC_GRD_L, --连退卷外观判定结果
CC.EXTSHAPE_QUALITY_L, --连退卷外观判定等级
--ZL_NORM_COMM.FZ00_COMM('B02001',CC.CRK_CD1_L) CRK_CD1_L, --连退卷缺陷1
CC.CRK_CD1_L CRK_CD1_L,
CC.CRK_CD1_TYPE_L, --连退卷缺陷1类型
--ZL_NORM_COMM.FZ00_COMM('B02001',CC.CRK_CD2_L) CRK_CD2_L, --连退卷缺陷2
CC.CRK_CD2_L CRK_CD2_L,
CC.CRK_CD2_TYPE_L --连退卷缺陷2类型
FROM L_TBF03_SPEC_MILL SM
,C_TBL02_COIL_COMM CL
,C_TBK02_COIL_COMM CK
,JB_RSEPON_UNIT t10
,(SELECT T1.COIL_NO COIL_ID
,T1.ORI_OLD_SAMPL_NO SUAN_COIL_NO
,T1.EXTSHAPE_DEC_GRD EXTSHAPE_DEC_GRD_L, --外观判定结果
T1.EXTSHAPE_QUALITY EXTSHAPE_QUALITY_L, --外观判定等级
T1.CRK_CD1 CRK_CD1_L, --缺陷1
T1.CRK_CD1_TYPE CRK_CD1_TYPE_L, --缺陷1类型
T1.CRK_CD2 CRK_CD2_L, --缺陷2
T1.CRK_CD2_TYPE CRK_CD2_TYPE_L --缺陷2类型
,T2.*
FROM C_TBC02_COIL_COMM T1
,C_TBC02_COIL_COMM T2
WHERE T1.SLAB_NO = T2.SLAB_NO
AND T1.LINE_TP = 'L'
AND T2.LINE_TP = 'C'
AND LENGTH(T1.COIL_NO) = 12
--AND T2.MILL_DTIME BETWEEN NVL(? , T2.MILL_DTIME) AND NVL(? , T2.MILL_DTIME)
AND T2.OLD_SAMPL_NO LIKE ?||'%'
) CC
WHERE CC.COIL_ID = SM.L_COIL_ID
AND CC.LINE_TP = 'C'
AND CC.DIVIDE_YN = 'N'
AND CL.H_COIL_NO1 = CK.COIL_NO(+)
--AND CL.COIL_NO = SUBSTR(CC.OLD_SAMPL_NO , 1,12)
and CC.OLD_SAMPL_NO = t10.OLD_SAMPL_NO(+)
AND CL.COIL_NO = SM.C_COIL_NO
--AND CC.MILL_DTIME BETWEEN NVL(? , CC.MILL_DTIME) AND NVL(? , CC.MILL_DTIME)
--AND CC.OLD_SAMPL_NO LIKE ?||'%'
ORDER BY CC.OLD_SAMPL_NO
{call ZL_LIANT_DCS01.SAVE_COIL_SMPNO(?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)}