LIMSServer/WebRoot/WEB-INF/query/com/steering/lims/data/pipe/FrmPipeProducerNotice.xml

<?xml version="1.0" encoding="UTF-8"?>
<queryMap desc="管材调度监制通知">

	<query id="FrmPipeProducerNotice.QueryCheckConsignBase" desc="查询检验委托基本信息+通知状态">
		<![CDATA[
			SELECT DISTINCT 'FALSE' CHK,
                A.CHECK_NO,
                A.HEAT_NO,
                A.STEEL_GRADE,
                A.STEEL_NO,
                A.PRODUCT_STD,
                A.CONTRACT_NO,
                A.CHECK_COUNT,
                A.DIMATER,
                DECODE(A.CRAFT_SOURCE,
                       '0',
                       '生产样',
                       '1',
                       '首日检',
                       ' 2',
                       '科研样',
                       ' 3',
                       '生产加样',
                       '4',
                       '外购管',
                       '5',
                       '内部委托') CRAFT_SOURCE,
                A.HEIGHT,
                A.DIMATER || 'x' || HEIGHT PIPE_SIZE,
                A.CRAFT_FILE_NO,
                A.PRODUCT_NAME,
                A.BUCKLE_TYPE,
                A.PROCESS_STATUS,
                A.ISPRODUCER,
                DECODE(A.ISPRODUCER, '0', '否', '1', '是') AS ISPRODUCER_DESC,
                DECODE(A.PRDCR_FLAG,'1','监制到场','') PRDCR_FLAG,
                A.SPEC_REQ,
                A.IS_RUSH,
                A.RUSH_NAME,
                A.RUSH_TIME,
                A.CONSIGN_DEPT,
                A.CONSIGN_NAME,
                A.CONSIGN_TIME,
                A.GET_NAME,
                A.GET_TIME,
                A.CONSIGNDEPT_SEND_NAME,
                A.CONSIGNDEPT_SEND_TIME,
                A.JG_RECEIVE_NAME,
                A.JG_RECEIVE_TIME,
                A.FLAG,
                DECODE(A.FLAG,
                       '0',
                       '未下发',
                       '1',
                       '委托单位已下发',
                       '2',
                       '加工已确认') AS FLAG_DESC,
                A.SAMPLE_REMARK,
                A.REMARK,
                A.PRDCR_NO
  FROM PIPE_CHECKCONSIGN_BASEINFO A
 WHERE  A.ISPRODUCER = '1'
  		
		]]>
	</query>

	<query id="FrmPipeProducerNotice.QueryCheckConsignJGDetail" desc="查询检验委托加工信息">
		<![CDATA[
			SELECT NOTICE_PRODUCER_REMARK,
			DEPT_ID,
			DECODE(DEPT_ID,
              '002001007009',
              '力学',
              '002001007015',
              '金相',
              '002001007013',
              '腐蚀',
              '002001007014',
              '工程',
              '002001007010',
              '化学',
              '002001020001',
              '一快分',
              '002001020002',
              '二快分') AS DEPT_ID_DESC,
       CASE
         WHEN INSTR('23456', MAX(FLAG)) > 0 AND MIN(FLAG) = '2' THEN
          '可通知监制'
         ELSE
          '不可通知监制'
       END FLAG
			  FROM PIPE_CHECKCONSIGN_DETAIL
			 WHERE INSTR(?, IS_NOTICE_PRODUCER) > 0
			   AND CHECK_NO = ? 
		  GROUP BY DEPT_ID,NOTICE_PRODUCER_REMARK			
		]]>
	</query>

	<query id="FrmPipeProducerNotice.QueryCheckConsignProducerDetail"
		desc="查询检验委托加工信息">
		<![CDATA[
			SELECT NOTICE_PRODUCER_REMARK,
			DEPT_ID,
			DECODE(DEPT_ID,
              '002001007009',
              '力学',
              '002001007015',
              '金相',
              '002001007013',
              '腐蚀',
              '002001007014',
              '工程',
              '002001007010',
              '化学',
              '002001020001',
              '一快分',
              '002001020002',
              '二快分') AS DEPT_ID_DESC,
       CASE
         WHEN MAX(IS_NOTICE_PRODUCER) = '1' AND MIN(IS_NOTICE_PRODUCER) = '1' THEN
          '已通知监制'
         WHEN MAX(IS_NOTICE_PRODUCER) = '2' AND MIN(IS_NOTICE_PRODUCER) = '2' THEN
          '监制取消'
         WHEN MAX(IS_NOTICE_PRODUCER) = '3' AND MIN(IS_NOTICE_PRODUCER) = '3' THEN
          '监制完成'
         ELSE
          '已通知监制'
       END FLAG
			  FROM PIPE_CHECKCONSIGN_DETAIL
			 WHERE INSTR(?, IS_NOTICE_PRODUCER) > 0
			   AND CHECK_NO = ? 
		  GROUP BY DEPT_ID,NOTICE_PRODUCER_REMARK			
		]]>
	</query>

	<query id="FrmPipeProducerNotice.QueryCheckConsignDetail" desc="查询检验委托明细信息">
		<![CDATA[
			SELECT CHECK_NO,
       SAMPLE_NO,
       CHECK_STD,
       PHY_CODE_MAX,
       PHY_NAME_MAX,
       NVL(T2.SPLINE_COUNT, T.SAMPLE_COUNT) SAMPLE_COUNT,
       DEPT_ID,
       DECODE(DEPT_ID,
              '002001007009',
              '力学',
              '002023003002',
              '力学',
              '002001007015',
              '金相',
              '002023003005',
              '金物',
              '002001007013',
              '腐蚀',
              '002001007014',
              '工程',
              '002001007010',
              '化学',
              '002001007010',
              '化学',
              '002023003001',
              '一快分',
              '002001020002',
              '二快分') AS DEPT_ID_DESC,
       LAB_RECEIVE_NAME,
       LAB_RECEIVE_TIME,
       IS_NOTICE_PRODUCER,
       DECODE(IS_NOTICE_PRODUCER,
              '2',
              '已通知监制',
              '未通知监制'
              ) AS IS_NOTICE_PRODUCER_DESC,
       CHECK_NAME,
       CHECK_TIME,
       AUDIT_NAME,
       AUDIT_TIME,
       FLAG,
       DECODE(FLAG,
              '0',
              '加工未下发',
              '1',
              '加工已下发',
              '2',
              '试验室已确认',
              '3',
              '试验室已录入',
              '4',
              '试验室已审核',
              '5',
              '判定已接收') AS FLAG_DESC,
       REMARK
  FROM PIPE_CHECKCONSIGN_DETAIL T, COM_BASE_PHY_C T2
 WHERE INSTR(?, IS_NOTICE_PRODUCER) > 0
   AND DEPT_ID = ?
   AND CHECK_NO = ?
   AND T.PHY_CODE_MAX = T2.PHY_CODE(+)
 ORDER BY DEPT_ID, CHECK_NO, SAMPLE_NO, PHY_CODE_MAX	
		]]>
	</query>
	
	<query id="FrmPipeProducerNotice.QueryCheckConsignDetail2" desc="查询检验委托明细信息">
		<![CDATA[
	SELECT T.CHECK_NO,
       T.SAMPLE_NO,
       T.CHECK_STD,
       T.PHY_CODE_MAX,
       T.PHY_NAME_MAX,
       NVL(T2.SPLINE_COUNT, T.SAMPLE_COUNT) SAMPLE_COUNT,
       DECODE(T.DEPT_ID,
              '002001007009',
              '力学',
              '002023003002',
              '力学',
              '002001007015',
              '金相',
              '002023003005',
              '金物',
              '002001007013',
              '腐蚀',
              '002001007014',
              '工程',
              '002001007010',
              '化学',
              '002001007010',
              '化学',
              '002023003001',
              '一快分',
              '002001020002',
              '二快分') AS DEPT_ID,
       T.LAB_RECEIVE_NAME,
       T.LAB_RECEIVE_TIME,
       DECODE(T.IS_NOTICE_PRODUCER,
              '2',
              '已通知监制',
              '未通知监制') AS IS_NOTICE_PRODUCER,
       T.CHECK_NAME,
       T.CHECK_TIME,
       T.AUDIT_NAME,
       T.AUDIT_TIME,
       DECODE(T.FLAG,
              '0',
              '加工未确认',
              '9',
              '加工已收样',
              '1',
              '加工已下发',
              '2',
              '试验室已确认',
              '3',
              '试验室已录入',
              '4',
              '试验室已审核',
              '5',
              '判定已接收') AS FLAG,
       
       T.REMARK
  FROM PIPE_CHECKCONSIGN_DETAIL T, COM_BASE_PHY_C T2
 WHERE T.PHY_CODE_MAX = T2.PHY_CODE(+)
   AND CHECK_NO = ?

		]]>
	</query>

	<query id="FrmPipeProducerNotice.UpdateCheckConsignDetail" desc="修改检验委托明细信息">
		<![CDATA[
            UPDATE PIPE_CHECKCONSIGN_DETAIL
               SET IS_NOTICE_PRODUCER = ?,
                   NOTICE_PRODUCER_REMARK = DECODE(?,NULL,NOTICE_PRODUCER_REMARK,DECODE(NOTICE_PRODUCER_REMARK,NULL,NULL,NOTICE_PRODUCER_REMARK || '->>') || ?)
             WHERE FLAG = '2'
               AND IS_NOTICE_PRODUCER = ?
               AND DEPT_ID  = ?
               AND CHECK_NO = ?
		]]>
	</query>
	
	<query id="FrmPipeProducerNotice.QueryPrdcrNo" desc="">
		<![CDATA[
           select t.*
  from SLM_ORDER_LINE_PRDCR_LST t
 WHERE T.STATION_DESC IN ('钢管的检验和试验', '成品成分')
   AND T.PRDCR_NO = ?
		]]>
	</query>
	
	<query id="FrmPipeProducerNotice.updateIsNotice" desc="">
		<![CDATA[
            UPDATE PIPE_CHECKCONSIGN_BASEINFO T SET T.IS_NOTICE = ? WHERE T.CHECK_NO = ?
		]]>
	</query>
	
	<query id="FrmPipeProducerNotice.updatePrdcrLst" desc="">
		<![CDATA[
            UPDATE SLM_ORDER_LINE_PRDCR_LST T
   SET T.IS_NOTICE = ?, T.NOTICE_TIME = SYSDATE
 WHERE T.PRDCR_NO = ?
   AND T.STATION_CODE = ?
		]]>
	</query>
	
	<query id="FrmPipeProducerNotice.updateCome" desc="">
		<![CDATA[
            UPDATE PIPE_CHECKCONSIGN_BASEINFO T SET T.PRDCR_FLAG = ? WHERE T.CHECK_NO = ?
		]]>
	</query>
	
	<query id="FrmPipeProducerNotice.updatePrdcrLstCome" desc="">
		<![CDATA[
            UPDATE SLM_ORDER_LINE_PRDCR_LST T
   SET T.ARRIVE_TIME = CASE
                         WHEN ? = '1' AND T.PRDCR_MAN_PHONE IS NOT NULL THEN
                          SYSDATE
                         ELSE
                          TO_DATE('')
                       END,
       T.ARRIVE_TIME2 = CASE
                          WHEN ? = '1' AND T.PRDCR_MAN_PHONE2 IS NOT NULL THEN
                           SYSDATE
                          ELSE
                           TO_DATE('')
                        END,
       T.ARRIVE_TIME3 = CASE
                          WHEN ? = '1' AND T.PRDCR_MAN_PHONE3 IS NOT NULL THEN
                           SYSDATE
                          ELSE
                           TO_DATE('')
                        END
 WHERE T.PRDCR_NO = ?
   AND T.STATION_CODE = ?
		]]>
	</query>
	
	<query id="FrmPipeProducerNotice.UpdateNoticeDept" desc="">
		<![CDATA[
           UPDATE PIPE_CHECKCONSIGN_DETAIL T
   SET T.IS_NOTICE_PRODUCER = ?
 WHERE T.CHECK_NO = ?
   AND T.SAMPLE_NO = ?
   AND T.PHY_CODE_MAX = ?
		]]>
	</query>
	

</queryMap>