XinYu_LZMES/.svn/pristine/9a/9a6adf21982817f5b78b776dc17ff9f6d8df5e15.svn-base

<?xml version="1.0" encoding='UTF-8'?>

<queryMap desc="重卷计划下发">

<query id="UIF061020_01.SELECT" desc="查询未生产重卷计划">
	
	SELECT 'FALSE' CHK,
	       T.C_COIL_NO L_COIL_NO,
	       T.R_COIL_NO R_COIL_NO,
	       T.COIL_EDT_SEQ,
	       C.SPEC_STL_GRD,
	       C.COIL_THK,
	       C.COIL_WTH,
	       C.COIL_LEN,
	       C.ACT_WGT,
	       C.COIL_INDIA,
	       C.COIL_OUTDIA,
	       C.PACKAGE_LEVEL,
	       DECODE(C.CUR_PROG_CD,
	              'DRC',
	              '连退卷充当待机',
	              'DBA',
	              '重卷指示待机',
	              'DBB',
	              '重卷作业待机',
	              'DCA',
	              '包装指示待机',
	              'DCB',
	              '包装作业待机',
	              'DED',
	              '综合判定待机',
	              'DFA',
	              '发货指示待机',
	              'DFB',
	              '发货待机',
	              'CCA',
	              '连退作业指示待机',
	              'CCB',
	              '连退作业待机',
	              'CCC',
	              '连退卷取待机') CUR_PROG_CD,
	       O.C_ORD_THK ORD_THK,
	       O.C_ORD_WTH ORD_WTH,
	       O.ORD_WGT,
	       O.DEL_TO_DATE,
	       E.SM_CFNM PACK_METHOD,
	       DECODE(C.EXTSHAPE_DEC_GRD,
	              '1',
	              '合格',
	              '2',
	              '订单外合格',
	              '3',
	              '次品',
	              '4',
	              '废品',
	              '待判') EXTSHAPE_DEC_GRD,
	       (SELECT TO_CHAR(wmsys.wm_concat(XB_PACKAGE.GF_COMNNAME_FIND('F02004',
                                                                   COLUMN_VALUE)))
          FROM TABLE(XB_PACKAGE.GF_TABSTR(REEL_CODE, ','))) REEL_CODE,       
	       DECODE(C.MATLQLTY_DEC_GRD,
	              '0',
	              '无性能要求',
	              '1',
	              '合格',
	              '2',
	              '不合格') MATLQLTY_DEC_GRD,
	       DECODE(T.SLEEVE, '', NULL, '√') SLEEVE,
	       DECODE(T.PULL, '1', '√', NULL) PULL,
	       T.CAL_MEMO REEL_MEMO,
	       DECODE(T.L2_SEND, 'Y', '已下发', '未下发') L2_SEND,
	       T.STATUS_CD
	  FROM L_TBF03_SPEC_REEL T,
	       C_TBC02_COIL_COMM C,
	       TBE02_ORD_PRC     O,
	       TBZ00_COMMCD      E
	 WHERE T.C_COIL_NO = C.OLD_SAMPL_NO
	   AND T.ORD_NO = O.ORD_NO
	   AND T.ORD_SEQ = O.ORD_SEQ
	   AND O.PACK_METHOD = E.SM_CD(+)
	   AND E.LG_CD = 'A01010'
	   AND T.STATUS_CD IN ('A')
	   order by t.COIL_EDT_SEQ 
</query>
<query id="UIF061020_02.SELECT" desc="查询未生产酸轧下重卷计划">
	SELECT 'FALSE' CHK,
	       T.C_COIL_NO L_COIL_NO,
	       T.R_COIL_NO R_COIL_NO,
	       C.SPEC_STL_GRD,
	       C.COIL_THK,
	       C.COIL_WTH,
	       C.COIL_LEN,
	       C.ACT_WGT,
	       C.COIL_INDIA,
	       C.COIL_OUTDIA,
	       C.PACKAGE_LEVEL,
	       DECODE(C.CUR_PROG_CD,
	              'DRC',
	              '连退卷充当待机',
	              'DBA',
	              '重卷指示待机',
	              'DBB',
	              '重卷作业待机',
	              'DCA',
	              '包装指示待机',
	              'DCB',
	              '包装作业待机',
	              'DED',
	              '综合判定待机',
	              'DFA',
	              '发货指示待机',
	              'DFB',
	              '发货待机',
	              'CCA',
	              '连退作业指示待机',
	              'CCB',
	              '连退作业待机',
	              'CCC',
	              '连退卷取待机') CUR_PROG_CD,
	       O.C_ORD_THK ORD_THK,
	       O.C_ORD_WTH ORD_WTH,
	       O.ORD_WGT,
	       E.SM_CFNM PACK_METHOD,
	       DECODE(C.EXTSHAPE_DEC_GRD,
	              '1',
	              '合格',
	              '2',
	              '订单外合格',
	              '3',
	              '次品',
	              '4',
	              '废品',
	              '待判') EXTSHAPE_DEC_GRD,
	       (SELECT TO_CHAR(wmsys.wm_concat(XB_PACKAGE.GF_COMNNAME_FIND('F02004',
                                                                   COLUMN_VALUE)))
          FROM TABLE(XB_PACKAGE.GF_TABSTR(REEL_CODE, ','))) REEL_CODE,       
	       DECODE(C.MATLQLTY_DEC_GRD,
	              '0',
	              '无性能要求',
	              '1',
	              '合格',
	              '2',
	              '不合格') MATLQLTY_DEC_GRD,
	       DECODE(T.SLEEVE, '', NULL, '√') SLEEVE,
	       DECODE(T.PULL, '1', '√', NULL) PULL,
	       T.CAL_MEMO REEL_MEMO,
	       DECODE(T.L2_SEND, 'Y', '已下发', '未下发') L2_SEND,
	       T.STATUS_CD
	  FROM L_TBF03_SPEC_REEL T,
	       C_TBL02_COIL_COMM C,
	       TBE02_ORD_PRC     O,
	       TBZ00_COMMCD      E
	 WHERE T.C_COIL_NO = C.OLD_SAMPL_NO
	   AND T.ORD_NO = O.ORD_NO
	   AND T.ORD_SEQ = O.ORD_SEQ
	   AND O.PACK_METHOD = E.SM_CD(+)
	   AND E.LG_CD = 'A01010'
	   AND T.STATUS_CD IN ('A')
</query>
<query id="UIF061020_03.SELECT" desc="查询未生产酸轧下重卷计划">
	SELECT 'FALSE' CHK,
       T.COIL_NO L_COIL_NO,
       T.c_COIL_NO R_COIL_NO,
       C.SPEC_STL_GRD,
       C.COIL_THK,
       C.COIL_WTH,
       C.COIL_LEN,
       C.ACT_WGT,
       C.COIL_INDIA,
       C.COIL_OUTDIA,
       DECODE(C.CUR_PROG_CD,
              'PRC',
              '连退卷充当待机',
              'PCA',
              '包装指示待机',
              'DCB',
              '包装作业待机',
              'DED',
              '综合判定待机',
              'DFA',
              '发货指示待机',
              'DFB',
              '发货待机',
              'CCA',
              '连退作业指示待机',
              'CCB',
              '连退作业待机',
              'CCC',
              '连退卷取待机') CUR_PROG_CD,
       O.C_ORD_THK ORD_THK,
       O.C_ORD_WTH ORD_WTH,
       O.ORD_WGT,
       E.SM_CFNM PACK_METHOD,
       DECODE(C.EXTSHAPE_DEC_GRD,
              '1',
              '合格',
              '2',
              '订单外合格',
              '3',
              '次品',
              '4',
              '废品',
              '待判') EXTSHAPE_DEC_GRD,
       
       DECODE(C.MATLQLTY_DEC_GRD,
              '0',
              '无性能要求',
              '1',
              '合格',
              '2',
              '不合格') MATLQLTY_DEC_GRD,     
       DECODE(T.L2_SEND, 'Y', '已下发', '未下发') L2_SEND,
       T.STATUS_CD
  FROM C_TBF03_SPEC_mill T,
       C_TBk02_COIL_COMM C,
       TBE02_ORD_PRC     O,
       TBZ00_COMMCD      E
 WHERE T.COIL_NO = C.OLD_SAMPL_NO
   AND T.ORD_NO = O.ORD_NO
   AND T.ORD_SEQ = O.ORD_SEQ
   AND O.PACK_METHOD = E.SM_CD(+)
   AND E.LG_CD = 'A01010'
   and t.ROLL_MANA_NO is null
   AND T.STATUS_CD IN ('A')
</query>
<query id="UIF061020_04.SELECT" desc="查询未生产酸轧下重卷计划">
	SELECT 'FALSE' CHK,
       T.COIL_NO L_COIL_NO,
       T.c_COIL_NO R_COIL_NO,
       C.SPEC_STL_GRD,
       C.COIL_THK,
       C.COIL_WTH,
       C.COIL_LEN,
       C.ACT_WGT,
       C.COIL_INDIA,
       C.COIL_OUTDIA,
       DECODE(C.CUR_PROG_CD,
              'PRC',
              '连退卷充当待机',
              'PCA',
              '包装指示待机',
              'DCB',
              '包装作业待机',
              'DED',
              '综合判定待机',
              'DFA',
              '发货指示待机',
              'DFB',
              '发货待机',
              'CCA',
              '连退作业指示待机',
              'CCB',
              '连退作业待机',
              'CCC',
              '连退卷取待机') CUR_PROG_CD,
       O.C_ORD_THK ORD_THK,
       O.C_ORD_WTH ORD_WTH,
       O.ORD_WGT,
       E.SM_CFNM PACK_METHOD,
       DECODE(C.EXTSHAPE_DEC_GRD,
              '1',
              '合格',
              '2',
              '订单外合格',
              '3',
              '次品',
              '4',
              '废品',
              '待判') EXTSHAPE_DEC_GRD,
       
       DECODE(C.MATLQLTY_DEC_GRD,
              '0',
              '无性能要求',
              '1',
              '合格',
              '2',
              '不合格') MATLQLTY_DEC_GRD,     
       DECODE(T.L2_SEND, 'Y', '已下发', '未下发') L2_SEND,
       T.STATUS_CD
  FROM C_TBF03_SPEC_mill T,
       C_TBL02_COIL_COMM C,
       TBE02_ORD_PRC     O,
       TBZ00_COMMCD      E
 WHERE T.COIL_NO = C.OLD_SAMPL_NO
   AND T.ORD_NO = O.ORD_NO
   AND T.ORD_SEQ = O.ORD_SEQ
   AND O.PACK_METHOD = E.SM_CD(+)
   AND E.LG_CD = 'A01010'
   and t.ROLL_MANA_NO is null
   AND T.STATUS_CD IN ('A')
</query>
<query id="UIF061020.Send_ReelPan" desc="下发重卷计划" >
		<![CDATA[
			{call C_PKG_UIF_REEL.P_PRD_CHK_REELPLAN_SND(?,?,?,?)}
		]]>
</query>
<query id="UIF061020.Send_pltcmReelPan" desc="下发重卷计划" >
		<![CDATA[
			{call C_PKG_UIF_REEL.P_PLTCM_REELPLAN_SND(?,?,?,?)}
		]]>
</query>
<query id="UIF061020.Send_HotPan" desc="下发酸洗计划" >
		<![CDATA[
			{call C_PKG_UIF.P_PRD_CHK_PLTPLAN_SND(?,?,?,?)}
		]]>
</query>
<query id="UIF061020.Usd_ReelPlan" desc="撤销下发重卷计划" >
		<![CDATA[
			{call C_PKG_UIF_REEL.P_PRD_CHK_REELPLAN_USD(?,?,?,?)}
		]]>
</query>
<query id="UIF061020.Usd_pltcmReelPlan" desc="撤销酸轧下发重卷计划" >
		<![CDATA[
			{call C_PKG_UIF_REEL.P_PRD_PLTCM_REELPLAN_USD(?,?,?,?)}
		]]>
</query>

</queryMap>