XinYu_LZMES/.svn/pristine/67/67be9079332b7c63a5642131bb51417f2589831f.svn-base

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

<queryMap desc="连退作业对象选取">

<query id="UIF052040_01.SELECT" desc="选取对象查询">
	SELECT A.COIL_NO,
       A.SLAB_NO,
       A.CUR_PROG_CD,
       A.SPEC_STL_GRD,
       A.COIL_THK,
       A.COIL_WTH,
       A.COIL_LEN,
       A.COIL_INDIA,
       A.COIL_OUTDIA,
       A.ACT_WGT,
       DECODE(A.TOT_DEC_GRD, '1', '合格', '2', '不合格', '未判') TOT_DEC_GRD,
       C_PKG_UIF_CAL.F_FUN_GET_FACEBUG(A.CRK_CD1,
                                       A.CRK_CD2,
                                       A.CRK_CD3,
                                       A.CRK_CD4,
                                       A.CRK_CD5) BUG,
       A.CUR_LOAD_LOC,
       B.C_SPEC_STL_GRD,
       B.C_ORD_THK,
       B.C_ORD_THK_MIN,
       B.C_ORD_THK_MAX,
       B.C_ORD_WTH,
       B.C_ORD_WTH_MIN,
       B.C_ORD_WTH_MAX,
       B.C_ORD_LEN,
       B.C_ORD_LEN_MIN,
       B.C_ORD_LEN_MAX,
       B.ORD_UNIT_WGT,
       B.ORD_UNIT_WGT_MIN,
       B.ORD_UNIT_WGT_MAX,
       B.L_ORD_INDIA,
       B.C_EXTSHAPE_REQ,
       C.SM_CFNM L_ORD_USEAGE_CD,
       D.CUST_NM ORDCUST_CD,
       E.SM_CFNM PACK_METHOD,
       B.C_SPEC_ABBSYM,
       B.ANNOITA_YN,
       B.PLY_REQUEST,
       'FALSE' FLAG,
       B.ORD_NO,
       B.ORD_SEQ,
       B.DEL_TO_DATE,
       decode(A.CAL_TYPE, '1', '正常退火', '2', '返修', '3', '过渡') CAL_TYPE,
       (nvl(A.RCAL_CNT, 0) + 1) CAL_CNT
  FROM C_TBL02_COIL_COMM A,
       TBE02_ORD_PRC     B,
       TBZ00_COMMCD      C,
       TBZ00_CUSTOMER    D,
       TBZ00_COMMCD      E
 WHERE A.COIL_STAT = '2'
   AND A.ORD_NO = B.ORD_NO
   AND A.ORD_SEQ = B.ORD_SEQ
   AND A.CUR_PROG_CD = 'CCA'
   AND A.FL = '0'
   AND B.L_ORD_USEAGE_CD = C.SM_CD(+)
   AND B.ORDCUST_CD = D.CUST_CD(+)
   AND B.PACK_METHOD = E.SM_CD(+)
   AND E.LG_CD(+) = 'A01010'
   and A.CAL_TYPE = '3'
</query>
<query id="UIF052040_02.SELECT" desc="CAL计划汇总查询">
	SELECT 'CAL计划号' TYPE_,MAX(CAL_NO) CAPTION FROM L_TBF03_SCH_CAL
	UNION 
	SELECT '个数(个)' TYPE_,TO_CHAR(MAX(CAL_COIL_CNT)) CAPTION FROM L_TBF03_SCH_CAL
	UNION 
	SELECT '重量(Ton)' TYPE_,TO_CHAR(MAX(CAL_COIL_WGT)) CAPTION FROM L_TBF03_SCH_CAL
</query>
<query id="UIF052040_03.SELECT" desc="CAL计划明细查询">
	SELECT A.C_COIL_NO,
	       A.COIL_NO,
	       F.SLAB_NO,
	       F.CUR_PROG_CD,
	       A.STL_GRD,
	       A.COIL_THK,
	       A.COIL_WTH,
	       A.COIL_LEN,
	       A.COIL_INDIA,
	       A.COIL_OUTDIA,
	       A.COIL_WGT,
	       DECODE(F.TOT_DEC_GRD, '1', '合格', '2', '不合格', '未判') TOT_DEC_GRD,
	       NULL BUG,
	       A.CUR_LOAD_LOC,
	       B.C_SPEC_STL_GRD,
	       B.C_ORD_THK,
	       B.C_ORD_THK_MIN,
	       B.C_ORD_THK_MAX,
	       B.C_ORD_WTH,
	       B.C_ORD_WTH_MIN,
	       B.C_ORD_WTH_MAX,
	       B.C_ORD_LEN,
	       B.C_ORD_LEN_MIN,
	       B.C_ORD_LEN_MAX,
	       B.ORD_UNIT_WGT,
	       B.ORD_UNIT_WGT_MIN,
	       B.ORD_UNIT_WGT_MAX,
	       B.L_ORD_INDIA,
	       B.C_EXTSHAPE_REQ,
	       C.SM_CFNM L_ORD_USEAGE_CD,
	       D.CUST_NM ORDCUST_CD,
	       E.SM_CFNM PACK_METHOD,
	       B.C_SPEC_ABBSYM,
	       B.ANNOITA_YN,
	       B.PLY_REQUEST,
	       LPAD(TO_CHAR(A.COIL_EDT_SEQ), 3, '0') COIL_EDT_SEQ,
	       B.ORD_NO,
	       B.ORD_SEQ,
	       B.DEL_TO_DATE,
	       DECODE(A.SLEEVE, '', NULL, '√') SLEEVE,
	       S.NAME_ SLEEVE_CODE,
	       M.NAME_ SPM_MODE,
	       W.NAME_ SPM_WET,
	       DECODE(A.PULL, '1', '√', NULL) PULL,
	       A.CAL_MEMO,
	       A.CAL_NO,
	       A.MERGE_FL,
	       decode(A.CAL_TYPE,'1','正常退火','2','返修','3','过渡') CAL_TYPE,
	       (nvl(A.CAL_ID,0)+1) CAL_CNT
	  FROM L_TBF03_SCH_MILL A,
	       TBE02_ORD_PRC B,
	       TBZ00_COMMCD C,
	       TBZ00_CUSTOMER D,
	       TBZ00_COMMCD E,
	       C_TBL02_COIL_COMM F,
	       (SELECT SLEEVE_GRP_CD ID_,
	               TO_CHAR(SLEEVE_INDIA) || '/' ||
	               TO_CHAR(SLEEVE_INDIA + SLEEVE_THK) NAME_
	          FROM TBF03_SLEEVE_GRP) S,
	       (SELECT SM_CD ID_, SM_CFNM NAME_
	          FROM TBZ00_COMMCD
	         WHERE LG_CD = 'F02002'
	         ORDER BY CD_SEQ) M,
	       (SELECT SM_CD ID_, SM_CFNM NAME_
	          FROM TBZ00_COMMCD
	         WHERE LG_CD = 'F02003'
	         ORDER BY CD_SEQ) W
	 WHERE A.ORD_NO = B.ORD_NO
	   AND A.ORD_SEQ = B.ORD_SEQ
	   AND A.C_COIL_NO = F.COIL_NO
	   AND B.L_ORD_USEAGE_CD = C.SM_CD(+)
	   AND B.ORDCUST_CD = D.CUST_CD(+)
	   AND B.PACK_METHOD = E.SM_CD(+)
	   AND A.SLEEVE = S.ID_(+)
	   AND A.SPM_MODE = M.ID_(+)
	   AND A.SPM_WET = W.ID_(+)
	   AND E.LG_CD(+) = 'A01010'
	 ORDER BY LPAD(TO_CHAR(A.COIL_EDT_SEQ), 3, '0')
</query>
<query id="UIF052040_04.SELECT" desc="交货状态查询">
	SELECT 'FALSE' FLAG, SM_CD, SM_CFNM
	  FROM TBZ00_COMMCD
	 WHERE LG_CD = 'B01118'
	   AND CD_DESC = 'C'
</query>
<query id="UIF052040_05.SELECT" desc="表面要求查询">
	SELECT 'FALSE' FLAG, SM_CD, SM_CFNM
	  FROM TBZ00_COMMCD
	 WHERE LG_CD = 'B01016'
</query>
<query id="UIF052040_06.SELECT" desc="套筒类型查询">
	SELECT SLEEVE_GRP_CD ID_,
	       TO_CHAR(SLEEVE_INDIA) || '/' || TO_CHAR(SLEEVE_INDIA + SLEEVE_THK) NAME_
	  FROM TBF03_SLEEVE_GRP
</query>
<query id="UIF052040_07.SELECT" desc="平整模式">
	SELECT  SM_CD ID_, SM_CFNM NAME_
	  FROM TBZ00_COMMCD
	 WHERE LG_CD = 'F02002' ORDER BY CD_SEQ
</query>
<query id="UIF052040_08.SELECT" desc="湿平标识">
	SELECT  SM_CD ID_, SM_CFNM NAME_
	  FROM TBZ00_COMMCD
	 WHERE LG_CD = 'F02003' ORDER BY CD_SEQ
</query> 
<query id="UIF052040_.Add_CalPlan" desc="新增连退计划信息" >
		<![CDATA[
			{call C_PKG_UIF_CAL.C_PRD_CALPLAN_ADD(?,?,?,?,?)}
		]]>
</query>
<query id="UIF052040_.Del_CalPlan" desc="删除未确认连退计划信息" >
		<![CDATA[
			{call C_PKG_UIF_CAL.C_PRD_CALPLAN_DEL(?,?,?)}
		]]>
</query>
<query id="UIF052040_.Adj_CalPlan" desc="调整未确认连退计划顺序" >
		<![CDATA[
			{call C_PKG_UIF_CAL.C_PRD_CALPLAN_ADJ(?,?,?,?,?,?)}
		]]>
</query>
<query id="UIF052040_.Merge_CalPlan" desc="连退指示并卷" >
		<![CDATA[
			{call C_PKG_UIF_CAL.C_PRD_ROLLPLAN_MGE(?,?,?,?)}
		]]>
</query>
<query id="UIF052040_.CMerge_CalPlan" desc="撤销连退指示并卷" >
		<![CDATA[
			{call C_PKG_UIF_CAL.C_PRD_CALPLAN_CMG(?,?,?,?)}
		]]>
</query>
<query id="UIF052040_.Affirm_CalPlan" desc="确认连退指示" >
		<![CDATA[
			{call C_PKG_UIF_CAL.C_PRD_CALPLAN_AFM(?,?,?,?,?)}
		]]>
</query>
</queryMap>