SELECT T.QLTY_CD , T.QLTY_CD_CFNM FROM TBB10_QLTY_CD T 0 AND DECODE(? , 'LX' , SUBSTR(T1.SEND_STAT , 1,1) , 'JX' , SUBSTR(T1.SEND_STAT , 2,1) ,'全部' ) = NVL(? , '全部') AND T1.WEITO_DTIME BETWEEN ? AND ? ]]> SELECT T1.SMP_NO ,T1.SMP_CUT_LOC ,T1.SMP_MOLD_TYPE ,T1.SMP_NO_TYPE ,T1.SMP_PICK_TYPE ,T1.MATERIAL_NO ,T1.SMP_STEEL_NO ,T1.EXAMORG_CD ,T1.SPEC_STL_GRD ,T1.WEITO_NO ,T1.WEITO_DTIME ,T1.MATERIAL_THK ,T1.SEND_STAT ,T1.SEND_ID ,T1.SEND_DTIME ,DECODE(T2.SMP_PROG_CD , 'C' , '试样检验待机' , 'D' , '试样判定待机' , 'E' , '试样判定完成' , 'ERROR' ) SMP_PROG_CD ,JHY_QLTY_BASE.F_GET_SMP_STATS(T1.SMP_NO , T1.SMP_CUT_LOC , T1.SMP_NO_TYPE , 'LX' ) WORK_STATS FROM TBB10_QLTY_MAT T1 ,TBB02_LOT_COM@XG3Q T2 WHERE T1.SMP_NO = T2.SMP_NO AND T1.SMP_CUT_LOC = T2.SMP_CUT_LOC AND T1.PROD_LINE = ? AND INSTR(T1.TRIAL_ADDRESS , ? ) > 0 AND DECODE(? , 'LX' , SUBSTR(T1.SEND_STAT , 1,1) , 'JX' , SUBSTR(T1.SEND_STAT , 2,1) ,'全部' ) = NVL(? , '全部') AND T1.WEITO_DTIME BETWEEN ? AND ? SELECT T.QLTY_OPE_CD ,T.QLTY_DIS_SEQ ,T.QLTY_OPE_CFNM FROM TBB10_QLTY_TMPL T WHERE T.QLTY_CD_2 LIKE ?||'%' ORDER BY T.QLTY_DIS_SEQ SELECT Q2.QLTY_CD_CFNM ,Q2.MATERIAL_NO ,Q2.MATERIAL_THK ,Q2.SMP_STEEL_NO ,Q2.QLTY_CD_3 ,Q2.QLTY_CD ,Q2.QLTY_MIN ,Q2.QLTY_MAX ,Q2.QLTY_VAL ,Q2.QLTY_DCS_RST ,Q1.* FROM (SELECT T1.SMP_NO ,T1.SMP_CUT_LOC ,T1.SMP_NO_TYPE ,T1.QLTY_CD_2 ,T2.SPEC_STL_GRD {1} FROM TBB10_QLTY_OPE T1 , TBB10_QLTY_MAT T2 WHERE T1.SMP_NO = T2.SMP_NO AND T1.SMP_CUT_LOC = T2.SMP_CUT_LOC AND T1.SMP_NO_TYPE = T2.SMP_NO_TYPE AND T2.WEITO_NO = ? AND T1.QLTY_CD_2 = ? GROUP BY T1.SMP_NO ,T1.SMP_CUT_LOC ,T1.SMP_NO_TYPE ,T1.QLTY_CD_2 ,T2.SPEC_STL_GRD ) Q1 ,(SELECT X1.* , X2.QLTY_CD_CFNM , X3.MATERIAL_NO , X3.MATERIAL_THK ,X3.SMP_STEEL_NO ,X2.QLTY_CD_3 FROM TBB10_QLTY_OPE X1 , TBB10_QLTY_CD X2 , TBB10_QLTY_MAT X3 WHERE X1.QLTY_CD_2 = X2.QLTY_CD_2 AND X1.QLTY_CD = X2.QLTY_CD AND X1.SMP_NO = X3.SMP_NO AND X1.SMP_CUT_LOC = X3.SMP_CUT_LOC AND X1.SMP_NO_TYPE = X3.SMP_NO_TYPE AND X3.WEITO_NO = ? AND X1.QLTY_CD_2 = ? AND X2.QLTY_CD_3 = ? AND X1.QLTY_CD = NVL(? , X1.QLTY_CD) ) Q2 WHERE Q1.SMP_NO = Q2.SMP_NO AND Q1.SMP_CUT_LOC = Q2.SMP_CUT_LOC AND Q1.SMP_NO_TYPE = Q2.SMP_NO_TYPE AND Q1.QLTY_CD_2 = Q2.QLTY_CD_2 ORDER BY Q2.SMP_STEEL_NO , Q2.MATERIAL_NO SELECT TT.* /* ,LEAD(TT.COMP_CAL , 1 , NULL) OVER(ORDER BY TT.QLTY_DIS_SEQ) NEXT_COMP_CAL ,LEAD(TT.QLTY_OPE_CD , 1 , NULL) OVER(ORDER BY TT.QLTY_DIS_SEQ) NEXT_OPE_CD ,LEAD(TT.QLTY_DIS_LEN , 1 , NULL) OVER(ORDER BY TT.QLTY_DIS_SEQ) NEXT_DIS_LEN ,LEAD(TT.CRCT_REG , 1 , NULL) OVER(ORDER BY TT.QLTY_DIS_SEQ) NEXT_CRCT_REG */ FROM ( SELECT DISTINCT T2.QLTY_OPE_CFNM ,T2.QLTY_OPE_CD ,DECODE(? , 'L' , '' , T2.COMP_CAL) COMP_CAL --连退和热轧区分 ,T2.QLTY_DIS_LEN ,T2.CRCT_REG ,T2.QLTY_DIS_SEQ ,T1.QLTY_VAL ,T1.EDIT_TP ,T1.QLTY_DCS_RST ,T1.QLTY_CD FROM TBB10_QLTY_OPE T1 ,TBB10_QLTY_TMPL T2 WHERE T1.QLTY_OPE_CD = T2.QLTY_OPE_CD AND T1.QLTY_CD_2 = T2.QLTY_CD_2 AND T1.SMP_NO = ? AND T1.SMP_CUT_LOC = ? AND T1.SMP_NO_TYPE = ? AND INSTR(T2.QLTY_OPE_GRP , NVL(? , T2.QLTY_OPE_GRP) ) > 0 AND T2.QLTY_CD_2 = ? ) TT ORDER BY TT.QLTY_DIS_SEQ SELECT T3.QLTY_CD_CFNM ,T3.QLTY_CD ,T3.QLTY_CD_2 ,T3.QLTY_CD_3 FROM TBB10_QLTY_OPE T1 , TBB10_QLTY_MAT T2 , TBB10_QLTY_CD T3 WHERE T1.SMP_NO = T2.SMP_NO AND T1.SMP_CUT_LOC = T2.SMP_CUT_LOC AND T1.SMP_NO_TYPE = T2.SMP_NO_TYPE AND T1.QLTY_CD = T3.QLTY_CD AND T1.QLTY_CD_2 = T3.QLTY_CD_2 AND T1.QLTY_CD_2 = ? AND T3.QLTY_CD_3 = ? AND T2.WEITO_NO = ? GROUP BY T3.QLTY_CD_CFNM ,T3.QLTY_CD_2 ,T3.QLTY_CD_3 ,T3.QLTY_CD 0 AND T.WEITO_NO = ? ]]> SELECT T2.SMP_STEEL_NO ,''''||T2.SPEC_STL_GRD SPEC_STL_GRD ,T2.MATERIAL_NO ,T2.MATERIAL_THK ,T2.SMP_NO_TYPE ,MAX(DECODE(T1.QLTY_OPE_CD , 'a' , T1.QLTY_VAL ,NULL )) LA ,MAX(DECODE(T1.QLTY_OPE_CD , 'b' , T1.QLTY_VAL ,NULL )) LB ,MAX(DECODE(T1.QLTY_OPE_CD , 'Fe' , T1.QLTY_VAL ,NULL )) FE ,MAX(DECODE(T1.QLTY_OPE_CD , 'Fm' , T1.QLTY_VAL ,NULL )) FM ,MAX(DECODE(T1.QLTY_OPE_CD , 'Lo' , T1.QLTY_VAL ,NULL )) LO ,MAX(DECODE(T1.QLTY_OPE_CD , 'Lu' , T1.QLTY_VAL ,NULL )) LU ,MAX(DECODE(T1.QLTY_OPE_CD , 'ZJ' , T1.QLTY_VAL ,NULL )) ZJ ,MAX(DECODE(T1.QLTY_OPE_CD , 'CB' , T1.QLTY_VAL ,NULL )) CB FROM TBB10_QLTY_OPE T1, TBB10_QLTY_MAT T2 WHERE T1.SMP_NO = T2.SMP_NO AND T1.SMP_CUT_LOC = T2.SMP_CUT_LOC AND T1.SMP_NO_TYPE = T2.SMP_NO_TYPE AND T1.QLTY_CD_2 IN( 'LL' , 'CB') AND INSTR(? , T2.MATERIAL_NO) > 0 AND INSTR(? , T2.WEITO_NO) > 0 GROUP BY T2.SMP_STEEL_NO ,T2.SPEC_STL_GRD ,T2.MATERIAL_NO ,T2.MATERIAL_THK ,T2.SMP_NO_TYPE ORDER BY T2.SMP_STEEL_NO SELECT T2.SMP_STEEL_NO ,T2.SPEC_STL_GRD ,T2.MATERIAL_NO ,T2.MATERIAL_THK ,MAX(DECODE(T1.QLTY_OPE_CD , 'A1' , T1.QLTY_VAL ,NULL )) A1 ,MAX(DECODE(T1.QLTY_OPE_CD , 'A2' , T1.QLTY_VAL ,NULL )) A2 ,MAX(DECODE(T1.QLTY_OPE_CD , 'A3' , T1.QLTY_VAL ,NULL )) A3 FROM TBB10_QLTY_OPE T1, TBB10_QLTY_MAT T2 WHERE T1.SMP_NO = T2.SMP_NO AND T1.SMP_CUT_LOC = T2.SMP_CUT_LOC AND T1.SMP_NO_TYPE = T2.SMP_NO_TYPE AND T1.QLTY_CD_2 IN ('PC' ,'SC') AND INSTR(? , T2.MATERIAL_NO) > 0 AND INSTR(? , T2.WEITO_NO) > 0 GROUP BY T2.SMP_STEEL_NO ,T2.SPEC_STL_GRD ,T2.MATERIAL_NO ,T2.MATERIAL_THK ORDER BY T2.SMP_STEEL_NO UPDATE TBB10_QLTY_MAT T SET T.WEITO_NO = ? WHERE T.WEITO_NO = ? {call JHY_QLTY_OPE.SAVE_WORK_VAL(?,?,?,?,?,?,?,?,?,?,?,?)} {call JHY_QLTY_OPE.SAVE_CHGE_CDS(?,?,?,?,?,?,?)} {call JHY_QLTY_OPE.SAVE_STEEL_NO(?,?,?,?,?,?)} {call JHY_QLTY_OPE.SEND_WORK_VAL(?,?,?,?,?,?)}