XinYu_RZMES/WebContents/WEB-INF/classes/query/H/UIH052402-query.xml

<?xml version="1.0" encoding='UTF-8'?>
<queryMap desc="STEEL MAKING QUERY ">
	<query id="UIH052402_01.select" desc="冷轧转运量查询-订单材">
        <![CDATA[
			SELECT 'N' CHK,
       H.CUR_PROG_CD,
       H.OLD_SAMPL_NO,
       H.STL_GRD,
       H.ORD_NO,
       H.ORD_SEQ,
       H.COIL_WTH,
       H.COIL_THK,
       H.COIL_LEN,
       H.ACT_WGT,
       H.CUR_LOAD_LOC,
       H.CR_PLANT_TRS_SEQ,
       H.COIL_NO,
       DECODE(H.CUR_PROG_CD,
              'SGB',
              '移送待机',
              'SFA',
              '发货指示待机',
              'SED',
              '综合判定待机',
              'SRC',
              '充当待机') CUR_PROG_CD_NM,
       H.CUR_PROG_CD,
       SUBSTR(H.SLAB_NO, 1, 10) CHARGE_NO,
       H.INSTR_COIL_THK,
       H.INSTR_COIL_WTH,
       H.COIL_INDIA,
       H.COIL_OUTDIA,
       decode(H.EXTSHAPE_DEC_GRD,
              '1',
              '合格',
              '2',
              '订单外合格',
              '3',
              '次品',
              '4',
              '废品') EXTSHAPE_DEC_GRD
  FROM TBH02_COIL_COMM H, TBA01_ORD_LINE A
 WHERE A.ORD_NO = H.ORD_NO
   AND A.ORD_SEQ = H.ORD_SEQ
   AND H.COIL_STAT = '2'
   AND H.EXTSHAPE_DEC_GRD = '1'
   AND H.SIZE_DEC_RST = '1'
   AND NVL(H.FB_YN, 'N') = 'N' --封闭卷无法移送 20200720
   AND  H.CUR_PROG_CD = 'SGB'
   and A.RZHQX='Z'
   AND H.ORD_NO || '&' like ? || '%'
   AND H.ORD_SEQ || '&' like ? || '%'
   AND H.OLD_SAMPL_NO || '&' LIKE ? || '%'
		]]>
    </query>
    <query id="UIH052402_01.CALL" desc="把明细发送结束数据保存到中冶新材接口表">
		   {call CK_RZ_COMM.SEND_ZY(?)}
	</query>
	 
	<query id="UIH052402_04.select" desc="冷轧移送实绩查询">
		<![CDATA[
			select 'N' CHK,
       h.old_sampl_no,
       h.SPEC_STL_GRD stl_grd,
       h.ord_no,
       h.ord_seq,
       h.coil_wth,
       h.coil_thk,
       h.coil_len,
       h.act_wgt,
       DECODE(h.cr_plant_trs_clf, 'B', '冷轧厂', 'Z','常化','C', '其他转运') cr_plant_trs_clf,
       h.cr_plant_trs_no,
       H.CR_PLANT_TRS_SEQ cr_plant_trs_cd,
       h.cur_load_loc,
       TO_CHAR(TO_DATE(h.cr_plant_trs_dtime, 'YYYYMMDD'), 'YYYY-MM-DD') AS cr_plant_trs_dtime,
       '' receive_reg,
       '' receive_time,
       '' trnf_reg,
       '' trnf_dtime
  from tbh02_coil_comm h
 where  h.coil_stat = '3'
   and h.cur_prog_cd = 'SGF'
   and cr_plant_trs_clf='Z'
   and h.cr_plant_trs_dtime like '%' || trim(?) || '%'
   and h.cr_plant_trs_no like '%' || trim(?) || '%'
 order by h.cr_plant_trs_dtime desc, H.CR_PLANT_TRS_SEQ desc
		]]>
	</query>
	<query id="UIH052402_03.update" desc="更新热轧库移送出库状态">
		<![CDATA[
			UPDATE TBH02_COIL_COMM H SET H.COIL_STAT = '3',H.BEF_PROG_CD = H.CUR_PROG_CD,
			H.BEF_PROG_CD_DTIME = H.CUR_PROG_CD_DTIME,H.BEF_PROG_CD_PGM = H.CUR_PROG_CD_PGM,
			H.CUR_PROG_CD = 'SGF', H.CUR_PROG_CD_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS'), 
			H.CUR_PROG_CD_PGM = 'UIH052402',H.BEF_LOAD_LOC = H.CUR_LOAD_LOC,
			 H.TRNF_SHIFT = ?, H.TRNF_GROUP = ?, H.TRNF_REG = ?,H.CUR_LOAD_LOC = 'L',
			 H.TRNF_DTIME = ?, H.TRNF_USE_TIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS'), 
			 H.CR_PLANT_TRS_CLF = ?, H.CR_PLANT_TRS_NO = ?, H.CR_PLANT_TRS_DTIME = ?
			 ,H.DLIV_TP = 'L',H.CR_PLANT_TRS_SEQ = ?,H.CR_PLANT_TRS_FLAG = ?
			 WHERE H.OLD_SAMPL_NO = ?	
		]]>
	</query>
</queryMap>