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

<?xml version="1.0" encoding="UTF-8"?>
<queryMap desc="原料库出入库记录查询">
	<query id="UIM010060_01.SELECT"  desc="查询入库记录">
	 <![CDATA[
	SELECT ROWNUM,TS.* FROM
       (SELECT C_PKG_UIM.GET_STDDATESTR(A.YARD_ENTRY_DTIME) YARD_ENTRY_DTIME,
           XB_PACKAGE.GF_COMNNAME_FIND('A01004' ,A.PRODNM_CD )  PRODNM_CD ,
           C_PKG_UIM.GET_STDTIMESTR(A.YARD_ENTRY_USE_TIME) CZSJ ,
           DECODE(A.YARD_ENTRY_SHIFT,'0','常白班','1','早班','2','中班','3','晚班') SHIFT ,
           DECODE(A.YARD_ENTRY_GROUP,'0','常白班','1','甲班','2','乙班','3','丙班','4','丁班') WKGROUP ,
          (SELECT USERNAME FROM CORE_APP_USER U WHERE U.USERID = A.YARD_ENTRY_REG) CZR ,SUBSTR(A.OLD_SAMPL_NO,1,10)ZPH ,
           A.OLD_SAMPL_NO ,
           A.STL_GRD SPEC_STL_GRD ,DECODE(A.IN_YARD_KIND,'1','热送','2','吊销退回','3','轧废','4','盘入','5','退账面撤销') IN_YARD_KIND,
           F.ORD_THK||'*'||F.ORD_WTH HOUKUAN,F.ORD_LEN INSTR_COIL_LEN,F.ORD_INDIA INSTR_COIL_INDIA,F.ORD_OUTDIA INSTR_COIL_OUTDIA,
           F.ORD_WGT INSTR_COIL_WGT,
           A.COIL_THK||'*'||A.COIL_WTH NHOUKUAN,
           A.COIL_LEN,
           A.COIL_INDIA,
           A.COIL_OUTDIA,
           A.ACT_WGT ,
           A.CUR_LOAD_LOC ,
           F.DEL_TO_DATE,
           T1.CJ_REMARK,
           T1.CPCJ_REMARK,
           T1.SPM_RMK,
           T1.DEAL_REMARK,
           DECODE(SUBSTR(A.OLD_SAMPL_NO,1,1),'L','√','') FANXIU,
           decode(A.TOT_DEC_GRD,'1','合格','2','不合格','3','外观异常','4','废品') TOT_DEC_GRD ,
           decode(A.INGR_DEC_GRD,'0','综合判定取消','1','合格','2','不合格') INGR_DEC_GRD ,
           decode(A.MATLQLTY_DEC_GRD,'0','无性能要','1','合格','2','不合格') MATLQLTY_DEC_GRD ,
           decode(A.SIZE_DEC_RST,'1','合格','2','订单外合格','3','不合格','4','废品') SIZE_DEC_RST ,
           decode(A.EXTSHAPE_DEC_GRD,'1','合格','2','订单外合格','3','次品','4','废品') EXTSHAPE_DEC_GRD ,
           DECODE(A.WGT_DEC_RST,'1','合格','2','不合格') WGT_DEC_RST ,A.ORD_NO ,a.ORD_SEQ ,
           (SELECT T.SM_CFNM FROM TBZ00_COMMCD T WHERE T.LG_CD = 'A01012' AND T.SM_CD = C.DLIV_TP) DLIV_TP ,
           (SELECT T.CUST_NM FROM TBZ00_CUSTOMER T WHERE T.CUST_CD = D.ORDCUST_CD) ORDCUST_CD ,
           SUBSTR(B.SLAB_NO,1,10) CHARGE_NO ,
           C_PKG_UIM.GET_STDDATESTR(A.TRNF_DTIME) TRNF_DTIME,
           C_PKG_UIF.F_FUN_GET_FACEBUG(A.CRK_CD1,
                               A.CRK_CD2,
                               A.CRK_CD3,
                               A.CRK_CD4,
                               A.CRK_CD5) BUG ,
            A.BEF_STL_GRD,
            A.CRK_CD_DESC,
            nvl(A.ORI_ACT_WGT,A.ACT_WGT) RZWGT
      FROM C_TBK02_COIL_COMM A ,
           TBE02_ORD_PRC F,
           TBG02_SLAB_COMM B,
           TBA01_ORD_LINE C,
           TBA01_ORD_COMM D,
           TBH02_COIL_COMM T1 
      WHERE '1' = '1' 
           AND A.SLAB_NO = B.SLAB_NO(+)
           AND A.OLD_SAMPL_NO = T1.OLD_SAMPL_NO  
           AND A.ORD_NO = C.ORD_NO(+) 
           AND A.ORD_SEQ = C.ORD_SEQ(+) 
           AND A.ORD_NO = D.ORD_NO(+) 
           AND A.OLD_ORD_NO = F.ORD_NO(+)  
           AND A.OLD_ORD_SEQ = F.ORD_SEQ(+)
           AND(SUBSTR(A.YARD_ENTRY_DTIME,1,8) >= ?) 
           AND(SUBSTR(A.YARD_ENTRY_DTIME,1,8) <= ?) 
        -- AND A.COIL_NO >= NVL(?, 'R0-000000A000') --20130104
         --AND A.COIL_NO <= NVL(?, 'R99-999999A999') --20130104
           AND (SUBSTR(A.COIL_NO,1,10))>=(NVL(?,'R0-0000000'))
           AND (SUBSTR(A.COIL_NO,1,10))<=(NVL(?,'R9-9999999'))
           AND A.COIL_THK >= NVL(?,'000') 
           AND A.COIL_THK <= NVL(?,'999') 
           AND A.COIL_WTH >= NVL(?,'00000') 
           AND A.COIL_WTH <= NVL(?,'99999') 
           AND (A.CUR_LOAD_LOC LIKE ?||'%' OR A.CUR_LOAD_LOC IS NULL) 
           AND A.STL_GRD LIKE ?||'%' 
           AND A.YARD_ENTRY_SHIFT||'&' LIKE ?||'%' 
           AND A.YARD_ENTRY_GROUP||'&' LIKE ?||'%'
           AND A.YARD_ENTRY_REG||'&' LIKE ?||'%' 
           AND A.ORD_NO||'&' LIKE ?||'%' 
           AND A.ORD_SEQ||'&' LIKE ?||'%' 
           AND D.ORDCUST_CD||'&' LIKE ?||'%' 
           AND A.ORD_FL||'&' LIKE ?||'%'
           AND A.PRODNM_CD||'&'  LIKE ?||'%'
           AND '-1' <> nvl(?,'0') 
           AND A.COIL_NO||'&'  LIKE ?||'%'
           AND (NVL(SUBSTR(F.DEL_TO_DATE, 1, 8),(SUBSTR(A.YARD_ENTRY_DTIME, 1, 8))) >= NVL(?,'0')) 
           AND (NVL(SUBSTR(F.DEL_TO_DATE, 1, 8),(SUBSTR(A.YARD_ENTRY_DTIME, 1, 8))) <= NVL(?,'99999999'))
           AND  nvl(SUBSTR(A.CUR_LOAD_LOC,1,1),'%') LIKE ?||'%' 
           order by a.YARD_ENTRY_DTIME,a.spec_stl_grd,a.instr_coil_thk,a.instr_coil_wth) TS
        ]]>
	</query>
	
	<query id="UIM010060_02.SELECT"  desc="查询出库记录">
	 <![CDATA[
	select A.* from (SELECT DISTINCT TS.* FROM
      (SELECT C_PKG_UIM.GET_STDDATESTR(A.YARD_ENTRY_DTIME) YARD_ENTRY_DTIME ,
              XB_PACKAGE.GF_COMNNAME_FIND('A01004' ,A.PRODNM_CD )  PRODNM_CD ,
              C_PKG_UIM.GET_STDTIMESTR(A.TRNF_USE_TIME) CZSJ ,
              DECODE(A.TRNF_SHIFT,'0','常白班','1','早班','2','中班','3','晚班') SHIFT ,
              DECODE(A.TRNF_GROUP,'0','常白班','1','甲班','2','乙班','3','丙班','4','丁班') WKGROUP ,
             (SELECT USERNAME FROM CORE_APP_USER U WHERE U.USERID = A.TRNF_REG) CZR ,
             -- NVL(SUBSTR(R.C_COIL_NO,0,9),SUBSTR(H.C_COIL_NO,0,9)) ZPH ,
              CASE WHEN A.OUT_YARD_KIND IN('1','5') THEN NVL(SUBSTR(R.C_COIL_NO, 0, 9),
                           SUBSTR(H.C_COIL_NO, 0, 9)) ELSE '' END ZPH,
              A.OLD_SAMPL_NO ,
              A.STL_GRD SPEC_STL_GRD ,
              F.ORD_THK||'*'||F.ORD_WTH HOUKUAN,F.ORD_LEN INSTR_COIL_LEN,F.ORD_INDIA INSTR_COIL_INDIA,
              F.ORD_OUTDIA INSTR_COIL_OUTDIA,
              F.ORD_WGT INSTR_COIL_WGT,
              A.COIL_THK||'*'||A.COIL_WTH NHOUKUAN,A.COIL_LEN,A.COIL_INDIA,
              A.COIL_OUTDIA,
              A.ACT_WGT ,
              A.CUR_LOAD_LOC ,
              F.DEL_TO_DATE,
              T1.CJ_REMARK,
           	  T1.CPCJ_REMARK,
              T1.SPM_RMK,
              T1.DEAL_REMARK,
              DECODE(SUBSTR(A.OLD_SAMPL_NO,1,1),'L','√','') FANXIU,
              DECODE(A.OUT_YARD_KIND,'1','上料出库','2','热退','3','盘出','5','酸洗上料') OUT_YARD_KIND,
              DECODE(A.TRNF_TYPE,'1','退账面','2','退实物') TRNF_TYPE,
              decode(A.TOT_DEC_GRD,'1','合格','2','不合格','3','外观异常','4','废品') TOT_DEC_GRD ,
              decode(A.INGR_DEC_GRD,'1','合格','2','不合格') INGR_DEC_GRD ,
              decode(A.MATLQLTY_DEC_GRD,'1','合格','2','不合格') MATLQLTY_DEC_GRD ,
              decode(A.SIZE_DEC_RST,'1','合格','2','不合格') SIZE_DEC_RST ,
              decode(A.EXTSHAPE_DEC_GRD,'1','合格','2','订单外合格','3','次品','4','废品') EXTSHAPE_DEC_GRD ,
              DECODE(A.WGT_DEC_RST,'1','合格','2','不合格') WGT_DEC_RST ,
              A.ORD_NO ,a.ORD_SEQ  ,
             (SELECT T.SM_CFNM FROM TBZ00_COMMCD T 
              WHERE T.LG_CD = 'A01012' 
              AND T.SM_CD = C.DLIV_TP) DLIV_TP ,
              (SELECT T.CUST_NM FROM TBZ00_CUSTOMER T 
              WHERE T.CUST_CD = D.ORDCUST_CD) ORDCUST_CD ,
              SUBSTR(B.SLAB_NO,1,10) CHARGE_NO ,
              C_PKG_UIM.GET_STDDATESTR(A.TRNF_DTIME) TRNF_DTIME,
              C_PKG_UIF.F_FUN_GET_FACEBUG(A.CRK_CD1,
                                   A.CRK_CD2,
                                   A.CRK_CD3,
                                   A.CRK_CD4,
                                   A.CRK_CD5) BUG ,
               A.BEF_STL_GRD,
               A.CRK_CD_DESC,
              nvl(A.ORI_ACT_WGT,A.ACT_WGT) RZWGT
         FROM C_TBK02_COIL_COMM A ,
              TBG02_SLAB_COMM B ,
              TBA01_ORD_LINE C ,
              TBA01_ORD_COMM D ,
              (select * from  C_TBF03_SPEC_MILL where STATUS_CD<>'E') R,
              TBE02_ORD_PRC F,
             (SELECT * FROM S_TBF03_SPEC_MILL WHERE STATUS_CD<>'E') H,
               C_TBL02_COIL_COMM J,
               TBH02_COIL_COMM T1 
         WHERE '1' = '1' 
              AND A.SLAB_NO = B.SLAB_NO(+)  
              AND A.OLD_SAMPL_NO = T1.OLD_SAMPL_NO 
              AND A.ORD_NO = C.ORD_NO(+) 
              AND A.ORD_SEQ = C.ORD_SEQ(+)
              AND A.ORD_NO = D.ORD_NO(+)
              AND A.OLD_ORD_NO = F.ORD_NO(+)  
              AND A.OLD_ORD_SEQ = F.ORD_SEQ(+) 
              and R.COIL_NO(+) =A.OLD_SAMPL_NO   --屏蔽吊销
              and H.COIL_NO(+) =A.OLD_SAMPL_NO
              AND A.OLD_SAMPL_NO=J.H_COIL_NO1(+)
             -- AND J.COIL_STAT IN('2','3')
              -- and (r.STATUS_CD <> 'E' or r.STATUS_CD is null )
              -- and (H.STATUS_CD <> 'E' or H.STATUS_CD is null )
              --and ((r.STATUS_CD <> 'E' or r.STATUS_CD is null) or 
              -- (H.STATUS_CD <> 'E' or H.STATUS_CD is null))
             /*  and (((r.STATUS_CD <> 'E' or r.STATUS_CD is null) AND
       			H.STATUS_CD IS NULL) or ((H.STATUS_CD <> 'E' or H.STATUS_CD is null) AND
              R.STATUS_CD IS NULL))*/
              
            /*  AND (((r.STATUS_CD <> 'E' or r.STATUS_CD is null OR (r.STATUS_CD='E' AND A.COIL_STAT='3')) AND
                       H.STATUS_CD IS NULL) or
                       ((H.STATUS_CD <> 'E' or H.STATUS_CD is null OR (H.STATUS_CD='E' AND A.COIL_STAT='3')) AND
                       R.STATUS_CD IS NULL)) */--20191030
              AND (SUBSTR(A.TRNF_DTIME,1,8) >= ?) 
              AND (SUBSTR(A.TRNF_DTIME,1,8) <= ?)  
           
              AND (SUBSTR(NVL(J.COIL_NO,'L0-000000'),1,9))>=(NVL(?,'L0-000000')) --20130130
              AND (SUBSTR(NVL(J.COIL_NO,'L0-000000'),1,9))<=(NVL(?,'L9-999999')) --20130130
           
              AND A.COIL_THK >= NVL(?,'000') 
              AND A.COIL_THK <= NVL(?,'999') 
              AND A.COIL_WTH >= NVL(?,'00000')              
              AND A.COIL_WTH <= NVL(?,'99999') 
              AND (A.CUR_LOAD_LOC LIKE ?||'%' OR A.CUR_LOAD_LOC IS NULL) 
              AND A.STL_GRD LIKE ?||'%' 
              AND A.TRNF_SHIFT||'&' LIKE ?||'%' 
              AND A.TRNF_GROUP||'&' LIKE ?||'%' 
              AND A.TRNF_REG||'&' LIKE ?||'%' 
              AND A.ORD_NO||'&' LIKE ?||'%' 
              AND A.ORD_SEQ||'&' LIKE ?||'%' 
              AND D.ORDCUST_CD||'&' LIKE ?||'%' 
              AND A.ORD_FL||'&' LIKE ?||'%' 
              AND A.PRODNM_CD||'&'  LIKE ?||'%' 
              AND A.OUT_YARD_KIND||'&' LIKE ?||'%'
              AND A.COIL_NO ||'&'  LIKE ?||'%'
           	  AND (NVL(SUBSTR(F.DEL_TO_DATE, 1, 8),(SUBSTR(A.TRNF_DTIME, 1, 8))) >= NVL(?,'0')) 
           	  AND (NVL(SUBSTR(F.DEL_TO_DATE, 1, 8),(SUBSTR(A.TRNF_DTIME, 1, 8))) <= NVL(?,'99999999')) 
           	  AND  nvl(SUBSTR(A.CUR_LOAD_LOC,1,1),'%') LIKE ?||'%'
              order by a.TRNF_DTIME,a.spec_stl_grd,a.instr_coil_thk,a.instr_coil_wth) TS) A 
        ]]>
	</query>
</queryMap>