SELECT T.SM_CD VALUE , T.SM_CFNM LABEL FROM TBZ00_COMMCD T WHERE T.LG_CD = 'E01002' 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 = SELECT * FROM TBB02_DCS_TECH T WHERE T.COIL_NO = ? AND T.PROD_CD = ? 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')) 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 = ? --规范代码 {call ZL_HOST_DCS01.NIB028010(?,?,?,?,?,?,?)} = 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 /*************************************************************************************/ ]]>