XinYu_LZMES/WebRoot/WEB-INF/query/M/M01/UIM010110-query.xml

<?xml version="1.0" encoding="UTF-8"?>
<queryMap desc="原料库库存盘入盘出">
	<query id="UIM010110_01.SELECT" desc="查询钢卷状态">
		<![CDATA[
		SELECT A.COIL_NO,A.STL_GRD SPEC_STL_GRD,A.COIL_THK||'*'||A.COIL_WTH T_W,
        A.INSTR_COIL_THK||'*'||A.INSTR_COIL_WTH IT_IW,
        A.ORD_NO,A.ORD_SEQ,A.COIL_LEN,A.ACT_WGT,A.CAL_WGT,
        DECODE(A.CUR_PROG_CD,'PAB','原料库入库待机','PRC','原料库充当待机','PCA','酸轧指示待机','PCB','酸轧轧制待机','PCC','酸轧卷取待机',null) CUR_PROG_CD,   
         DECODE(A.TOT_DEC_GRD,'1','合格','2','不合格','3','次品','4','废品','','待判定') TOT_DEC_GRD,    
         DECODE(A.ORD_FL,'1','订单材','2','余材','','未判') ORD_FL,    
         DECODE(A.COIL_STAT,'1','未入库','2','在库','3','出库/结束',null) COIL_STAT,
         A.COIL_IN_REG
         ,C_PKG_UIM.GET_STDTIMESTR(A.COIL_IN_DTIME) COIL_IN_DTIME
         ,A.COIL_OUT_REG
         ,C_PKG_UIM.GET_STDTIMESTR(A.COIL_OUT_DTIME) COIL_OUT_DTIME
         FROM C_TBK02_COIL_COMM A  WHERE A.COIL_NO = ? 
		]]>
	</query>  
	<query id="UIM010110_02.SELECT" desc="查询垛位是否存在">
		<![CDATA[
		SELECT A.CLF_NO FROM C_TBK08_COIL_YARD A,C_TBK08_COIL_YARD_AREA B WHERE
		A.AREA_NO = B.AREA_NO AND B.AREA_TYPE = '1'
		AND CLF_NAME = substr(?,0,1) and CLF_COL = substr(?,3,2)
        and CLF_ROW = substr(?,7,2) and CLF_FL = DECODE(substr(?,5,1),'A','1','B','2','C','3','1')
		]]>  
	</query>
	<query id="UIM010110_11.UPDATE"  desc="更新原料公共表">
		<![CDATA[
		UPDATE C_TBK02_COIL_COMM A SET
		A.COIL_STAT = '3',A.CUR_LOAD_LOC = '',A.ORD_FL = '2',A.ORD_NO = '',A.ORD_SEQ = ''
		,A.TRNF_REG = ?,A.TRNF_SHIFT = ?,A.TRNF_GROUP = ?
		,A.TRNF_DTIME = ? ,A.TRNF_USE_TIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')
		,A.TRNF_REMARK = '盘出',A.OUT_YARD_KIND = '3'
		,A.COIL_OUT_REG = ?,A.COIL_OUT_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')
		WHERE A.OLD_SAMPL_NO = ?
		 ]]>   
	</query>
	<query id="UIM010110_12.UPDATE"  desc="更新原料公共表">
		<![CDATA[
		UPDATE C_TBK02_COIL_COMM A SET
		A.COIL_STAT = '3',A.CUR_LOAD_LOC = '',A.ORD_FL = '2',A.ORD_NO = '',A.ORD_SEQ = ''
		,A.TRNF_REG = ?,A.TRNF_SHIFT = ?,A.TRNF_GROUP = ?
		,A.TRNF_DTIME = ? ,A.TRNF_USE_TIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')
		,A.TRNF_REMARK = '废钢外卖盘出',A.OUT_YARD_KIND = '4'
		,A.COIL_OUT_REG = ?,A.wdlivno = ?,A.COIL_OUT_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')
		WHERE A.OLD_SAMPL_NO = ?
		 ]]>   
	</query>
	<query id="UIM010110_01.INSERT"  desc="插入移垛记录">
		<![CDATA[
		INSERT INTO C_TBK08_COIL_MOVE (ROLL_SEQ
            ,CUR_LOAD_LOC_F,CUR_LOAD_LOC_T,COIL_NO,REG_ID
            ,REG_SHIFT,REG_GROUP,REG_DTIME,REG_USE_DTIME,MOVE_TYPE)
            VALUES((SELECT MAX(ROLL_SEQ)+1 ROLL_SEQ FROM C_TBK08_COIL_MOVE)
            ,?,?,?,?
            ,?,?,TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')
            ,TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS'),?)
		 ]]>   
	</query>
</queryMap>