XinYu_LZMES/.svn/pristine/2a/2a3448538d19c3d8b29ccdd02bc1e11696f73d50.svn-base

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

<queryMap desc="酸洗作业对象申报">

<query id="UIF061070_01.SELECT" desc="申报对象查询">
	SELECT	A.OLD_SAMPL_NO 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,
       		TO_DATE(A.MILL_DTIME,'yyyy-mm-dd hh24:mi:ss') MILL_DTIME,
       		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,
       		(SELECT T1.SLAB_DCS_DETAIL FROM TBG02_SLAB_COMM T1 WHERE T1.SLAB_NO=A.SLAB_NO AND ROWNUM=1) BPBZ  
	FROM   	C_TBK02_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.ORD_FL='1'
       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.DLIV_DIRNO IS NULL 
</query>
<query id="UIF061070_02.SELECT" desc="已申报信息查询">
	SELECT A.COIL_NO C_COIL_NO,
       A.COIL_NO,
       A.ROLL_NO CAL_NO,
       F.SLAB_NO,
       F.CUR_PROG_CD,
       F.STL_GRD,
       F.COIL_THK,
       F.COIL_WTH,
       F.COIL_LEN,
       F.COIL_INDIA,
       F.COIL_OUTDIA,
       F.ACT_WGT COIL_WGT,
       DECODE(F.TOT_DEC_GRD, '1', '合格', '2', '不合格', '未判') TOT_DEC_GRD,
       NULL BUG,
       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,
       A.ROLL_COIL_SEQ COIL_EDT_SEQ,
       B.ORD_NO,
       B.ORD_SEQ,
       B.DEL_TO_DATE,
       '' MERGE_FL
  FROM S_tbf03_sch_mill A,
       TBE02_ORD_PRC B,
       TBZ00_COMMCD C,
       TBZ00_CUSTOMER D,
       TBZ00_COMMCD E,
       C_TBL02_COIL_COMM F
   
 WHERE A.ORD_NO = B.ORD_NO
   AND A.ORD_SEQ = B.ORD_SEQ
   AND A.COIL_NO = F.OLD_SAMPL_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 E.LG_CD(+) = 'A01010'
  -- AND A.L2_SEND = 'N'
   and a.ROLL_NO like 'Z%'
 ORDER BY A.ROLL_COIL_SEQ
</query>
<query id="UIF061070_03.SELECT" desc="获取连退申报原因信息">
	SELECT SM_CD,SM_CFNM FROM TBZ00_COMMCD WHERE LG_CD='F02001'
</query>
<query id="UIF061070_04.SELECT" desc="交货状态查询">
	SELECT SM_CD, SM_CFNM
	  FROM TBZ00_COMMCD
	 WHERE LG_CD = 'B01118'
	   AND CD_DESC = 'C'
</query>
<query id="UIF061070.Add" desc="新增酸洗申报信息" >
		<![CDATA[
			{call S_PKG_UIF.S_PRD_SXPLAN_ADD(?,?,?,?)}
		]]>
</query>
<query id="UIF061070.Del" desc="删除连退申报信息" >
		<![CDATA[
			{call S_PKG_UIF_CAL.P_PRD_DCL_CALPLAN_DEL(?,?,?,?)}
		]]>
</query>
</queryMap>