| 1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798 |
- <?xml version="1.0" encoding='UTF-8'?>
- <queryMap desc="板坯降级为余材处理">
- <query id="NIE031051.SlabComm.Select" desc="充当物料及其重量查询">
- <![CDATA[
- SELECT
- SLAB_NO MAT_NO
- FROM TBG02_SLAB_COMM
- WHERE SLAB_NO IN (
- SELECT COLUMN_VALUE FROM TABLE(XB_PACKAGE.GF_TABSTR(?)))
- ORDER BY SLAB_CUT_DTIME DESC
- ]]>
- </query>
- <query id="NIE031051.OrdSts.Select" desc="NIE012070 接口参数查询" fetchSize="10">
- <![CDATA[
- SELECT
- ORD_NO BEF_ORD_NO, -- 前合同号
- ORD_SEQ BEF_ORD_SEQ, -- 前订单号
- '' ORD_NO, -- 合同号
- '' ORD_SEQ, -- 订单号
- CUR_PROG_CD BEF_PROG_CD,-- 前进程代码
- 'RRC' PROG_CD, -- 进程代码
- 'TM' MAT_TYPE, -- 物料类型
- SLAB_NO MAT_NO, -- 物料号
- SLAB_WGT WGT, -- 重量
- 'NIE031051' PGMID
- FROM TBG02_SLAB_COMM
- WHERE SLAB_NO = ?
- ]]>
- </query>
- <query id="NIE031051.RepHis.Insert" desc="插入充当历史查询表" fetchSize="10">
- <![CDATA[
- INSERT INTO TBE04_REP_HIS
- (
- REP_TYP, REP_KND, REG_ID, MOD_PGM_ID, REG_DTIME,
- UPD_BEF_ORD_NO, UPD_BEF_ORD_SEQ, UPD_BEF_CUST_CD, MAT_TYPE,
- MAT_NO, UPD_AFT_ORD_NO, UPD_AFT_ORD_SEQ, UPD_AFT_CUST_CD
- )
- -- (1) 充当代码, 充当方法, 录入者, 变更程序ID, 录入时间,
- -- (2) 变更前合同号, 变更前订单号, 变更前客户代码, 物料类型,
- -- (3) 物料号, 变更后合同号, 变更后订单号, 变更后客户代码
- SELECT
- 'B', 'M', ?, 'NIE031051', TO_CHAR(SYSTIMESTAMP, 'YYYYMMDDHH24MISS'),
- A.ORD_NO, A.ORD_SEQ, A.CUST_CD, 'TM',
- B.SLAB_NO, '', '', ''
- FROM TBE02_ORD_PRC A, TBG02_SLAB_COMM B
- WHERE A.ORD_NO = B.ORD_NO
- AND A.ORD_SEQ = B.ORD_SEQ
- AND B.SLAB_NO = ?
- ]]>
- </query>
- <query id="NIE031051.SlabComm.Update" desc="">
- <![CDATA[
- UPDATE TBG02_SLAB_COMM A SET
- BEF_PROG_CD = CUR_PROG_CD,
- BEF_PROG_CD_PGM = CUR_PROG_CD_PGM,
- BEF_PROG_CD_DTIME = CUR_PROG_CD_DTIME,
- -----------------------------------------------------------------
- --MODIFY BY SJW :090831
- --DESC :降余材的时候记录前合同号和订单号
- ORG_ORD_NO = ORD_NO,
- ORG_ORD_SEQ = ORD_SEQ,
- ----------------------------------------------------------------
- CUR_PROG_CD = 'RRC',
- CUR_PROG_CD_PGM = 'NIE031051',
- CUR_PROG_CD_DTIME = TO_CHAR(SYSTIMESTAMP, 'YYYYMMDDHH24MISS'),
- ORD_FL = '2',
- NONORD_CAUSE_CD = ?,
- NONORD_OCR_DTIME = TO_CHAR(SYSTIMESTAMP, 'YYYYMMDDHH24MISS'),
- MOD_ID = ?,
- MOD_DTIME = TO_CHAR(SYSTIMESTAMP, 'YYYYMMDDHH24MISS'),
- ORD_NO = '',
- ORD_SEQ = '',
- CUST_CD = '',
- ORDCUST_CD = '',
- ORD_USE_CD = '',
- DEVLMT_DTIME = '',
- INSTR_COIL_THK = 0,
- INSTR_COIL_WTH = 0,
- INSTR_COIL_LEN = 0,
- INSTR_COIL_WGT = 0,
- INSTR_COIL_INDIA = 0,
- INSTR_COIL_OUTDIA = 0
- -- SLAB_INGR_DEC_GRD = ''
- WHERE SLAB_NO = ?
- ]]>
- </query>
- <query id="NIE031051.SlabCommD.Update" desc="">
- <![CDATA[
- UPDATE TBG02_SLAB_COMM_D SET
- ORD_FL = '2'
- WHERE SLAB_NO = (SELECT SUB_SLAB_NO FROM TBG02_SLAB_COMM WHERE SLAB_NO = ?)
- ]]>
- </query>
-
- </queryMap>
|
