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

<?xml version="1.0" encoding="UTF-8"?>
<queryMap desc="中间库废次品数据查询">
	<query id="UIM010320_01.SELECT"  desc="中间库废次品数据查询">
		<![CDATA[
SELECT 'FALSE' CHK,
       A.OLD_SAMPL_NO,
       A.SPEC_STL_GRD,
       A.COIL_THK,
       A.COIL_WTH,
       A.INSTR_COIL_THK,
       A.INSTR_COIL_WTH,
       A.ACT_WGT,
      (SELECT T.SM_CFNM
          FROM tbz00_commcd t
         WHERE t.LG_CD = 'E01010'
           AND t.SM_CD = a.NONORD_CAUSE_CD) NONORD_CAUSE_CD,
       DECODE(A.ORD_FL, '1', '订单材', '2', '余材', '', '未判') ORD_FL,
       A.ORD_NO,
       A.ORG_ORD_NO,
       A.ORG_ORD_SEQ,
       A.ORD_SEQ,
       A.CUR_LOAD_LOC,
       DECODE(A.TOT_DEC_GRD,
              '1',
              '合格',
              '2',
              '不合格',
              '3',
              '次品',
              '4',
              '废品') TOT_DEC_GRD,
       C_PKG_UIM.GET_STDDATESTR(A.YARD_ENTRY_DTIME) YARD_ENTRY_DTIME,
       C_PKG_UIM.GET_STDTIMESTR(A.YARD_ENTRY_USE_TIME) YARD_ENTRY_USE_TIME,
       (SELECT USERNAME
          FROM CORE_APP_USER U
         WHERE U.USERID = A.YARD_ENTRY_REG) YARD_ENTRY_REG,
       DECODE(A.YARD_ENTRY_SHIFT,
              '0',
              '常白班',
              '1',
              '早班',
              '2',
              '中班',
              '3',
              '晚班') YARD_ENTRY_SHIFT,
       DECODE(A.YARD_ENTRY_GROUP,
              '0',
              '常白班',
              '1',
              '甲班',
              '2',
              '乙班',
              '3',
              '丙班',
              '4',
              '丁班') YARD_ENTRY_GROUP,
       (case
         when XB_PACKAGE.GF_COMNNAME_FIND('E01002', A.CUR_PROG_CD) =
              '酸轧成品充当待机' and a.DEFECTIVE = 'Y' then
          '二级库存'
         else
          XB_PACKAGE.GF_COMNNAME_FIND('E01002', a.CUR_PROG_CD)
       end) CUR_PROG_CD,
       C_PKG_UIM.GET_STDTIMESTR(A.MILL_DTIME) MILL_DTIME
FROM 
      C_TBL02_COIL_COMM A 
WHERE 
      '1' = '1'
     AND A.OLD_SAMPL_NO || '&' LIKE ? || '%'
     AND SUBSTR(NVL(A.YARD_ENTRY_DTIME, 99999999999999), 1, 8) >= NVL(?, 0)
     AND SUBSTR(NVL(A.YARD_ENTRY_DTIME, 0), 1, 8) <= NVL(?, 99999999999999)
     AND A.COIL_STAT = '2'
     AND  A.EXTSHAPE_QUALITY IN('FP','CP')
     AND A.CUR_LOAD_LOC IS NOT NULL
		

		 ]]>
	</query>
	<query id="UIM010320_01.UPDATE"  desc="出库后修改公共表信息">
		<![CDATA[
		   update c_tbl02_coil_comm k set 
			 k.coil_stat = '3' --钢卷在库状态
			,k.trnf_reg = :1 --出库人
			,k.trnf_shift=:2 --出库班次
			,k.trnf_group=:3 --出库班组
			,k.trnf_use_time=TO_CHAR(SYSDATE,'YYYYMMDDHH24MIDD') --出库操作时间
			,k.trnf_dtime=:4  --出库时间
			,k.BEF_LOAD_LOC = k.CUR_LOAD_LOC
			,k.BEF_LOAD_LOC_DTIME = k.CUR_LOAD_LOC_DTIME
			,k.CUR_LOAD_LOC = ''
			,k.CUR_LOAD_LOC_DTIME = ''
			,k.OUT_YARD_KIND = '8'--废次品出库
			where coil_no = :5 --钢卷号
			 ]]>
	</query>
</queryMap>