FrmOutSourcApp.xml 19 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668
  1. <?xml version="1.0" encoding="UTF-8"?>
  2. <queryMap desc="委外审批管理">
  3. <query id="FrmOutSourcApp.doQueryOutSourc" desc="委外实绩查询">
  4. <![CDATA[
  5. SELECT T.SUBCONTRACT_NO,
  6. T.SUBCONTRACT_NO_SEQ,
  7. T.PLINE_CODE,
  8. T.PLINE_NAME,
  9. T.STATION_CODE,
  10. T.STATION_DESC,
  11. T.HEAT_PLAN_NO,
  12. T.ZY_BATCH_ID,
  13. T.PRO_PLAN_ID,
  14. T.GX_PLAN_NO,
  15. T.JUDGE_STOVE_NO,
  16. T.BATCH_NO,
  17. T.PRODUCCODE,
  18. T.PRODUCNAME,
  19. T.STEELCODE,
  20. T.STEELNAME,
  21. T.GRADECODE,
  22. T.GRADENAME,
  23. T.MODEL_CODE,
  24. T.MODEL_DESC,
  25. T.STD_CODE,
  26. T.STD_NAME,
  27. T.STD_STYLE,
  28. T.STD_STYLE_DESC,
  29. T.ACT_DIMATER,
  30. T.ACT_HEIGHT,
  31. T.ACT_LEN,
  32. T.ACT_LEN_MIN,
  33. T.ACT_LEN_MAX,
  34. T.CRAFT_FILE_NO,
  35. NVL(T.SUBCONTRACT_NUM,0) SUBCONTRACT_NUM,
  36. NVL(T.SUBCONTRACT_WT,0) SUBCONTRACT_WT,
  37. NVL(T.HB_COMPLETE_NUM,0) HB_COMPLETE_NUM,
  38. NVL(T.HB_COMPLETE_WT,0) HB_COMPLETE_WT,
  39. T.SUBCONTRACT_USER,
  40. DECODE(T.SUBCONTRACT_SHIFT, '1', '早', '2', '中', '3', '夜') SUBCONTRACT_SHIFT,
  41. DECODE(T.SUBCONTRACT_GROUP,
  42. '1',
  43. '甲',
  44. '2',
  45. '乙',
  46. '3',
  47. '丙',
  48. '4',
  49. '丁') SUBCONTRACT_GROUP,
  50. TO_CHAR(T.SUBCONTRACT_TIME, 'YYYY-MM-DD HH24:MI:SS') SUBCONTRACT_TIME,
  51. T.SP_USER,
  52. TO_CHAR(T.SP_TIME, 'YYYY-MM-DD HH24:MI:SS') SP_TIME,
  53. DECODE(T.SUBCONTRACT_LOG,
  54. '00',
  55. '委外申请',
  56. '10',
  57. '审核通过',
  58. '20',
  59. '审核不通过',
  60. '30',
  61. '回报完毕') SUBCONTRACT_LOG,
  62. T.SUBCONTRACT_PLINE_CODE,
  63. T.SUBCONTRACT_PLINE_NAME,
  64. T.SUBCONTRACT_NOTE,
  65. NVL(T.HB_FP_NUM,0) HB_FP_NUM,
  66. NVL(T.HB_FP_WT,0) HB_FP_WT,
  67. T.SP_NOTE,
  68. T.RESULT_NO,
  69. T.SUBCONTRACT_TYPE
  70. FROM VRP_ENTRUSTED_BILL T
  71. WHERE 1=1
  72. ]]>
  73. </query>
  74. <query id="FrmOutSourcApp.doQueryPlineCode" desc="查询产线">
  75. <![CDATA[
  76. SELECT T.PLINE_CODE, T.PLINE_NAME
  77. FROM COM_BASE_PLINE T
  78. WHERE T.VALIDFLAG = '1'
  79. ]]>
  80. </query>
  81. <query id="FrmOutSourcApp.QuerySubConStart" desc="查询委托状态">
  82. <![CDATA[
  83. SELECT T.SUBCONTRACT_LOG
  84. FROM VRP_ENTRUSTED_BILL T
  85. WHERE T.SUBCONTRACT_NO = ?
  86. AND T.SUBCONTRACT_NO_SEQ = ?
  87. ]]>
  88. </query>
  89. <query id="FrmOutSourcApp.UpdateOutSourc" desc="修改委托状态">
  90. <![CDATA[
  91. UPDATE VRP_ENTRUSTED_BILL
  92. SET SP_USER = ?,
  93. SP_TIME = TO_DATE(?, 'YYYY-MM-DD HH24:MI:SS'),
  94. SUBCONTRACT_LOG = ?,
  95. SUBCONTRACT_PLINE_CODE = ?,
  96. SUBCONTRACT_PLINE_NAME = ?,
  97. SP_NOTE = ?
  98. WHERE SUBCONTRACT_NO = ?
  99. AND SUBCONTRACT_NO_SEQ = ?
  100. ]]>
  101. </query>
  102. <query id="FrmOutSourcApp.UpdateOff" desc="释放离线表委外支吨">
  103. <![CDATA[
  104. UPDATE VRP_OFFLINE_RESULT
  105. SET SUBCONTRACT_NUM = ?,
  106. SUBCONTRACT_WT = ?,
  107. SUBCONTRACT_TIME = TO_DATE(?, 'YYYY-MM-DD HH24:MI:SS'),
  108. SUBCONTRACT_NAME = ?
  109. WHERE RESULT_NO = ?
  110. ]]>
  111. </query>
  112. <query id="FrmOutSourcApp.UpdateOutSourcNum" desc="修改委外回报量">
  113. <![CDATA[
  114. UPDATE VRP_ENTRUSTED_BILL
  115. SET HB_COMPLETE_NUM = ?,
  116. HB_COMPLETE_WT = ?,
  117. HB_FP_NUM = ?,
  118. HB_FP_WT = ?,
  119. SUBCONTRACT_LOG = ?
  120. WHERE SUBCONTRACT_NO = ?
  121. AND SUBCONTRACT_NO_SEQ = ?
  122. ]]>
  123. </query>
  124. <query id="FrmOutSourcApp.UpdateOffSourc" desc="修改离线表委外回报">
  125. <![CDATA[
  126. UPDATE VRP_OFFLINE_RESULT
  127. SET SUBCONTRACTCOMPLETE_NUM = ?,
  128. SUBCONTRACTCOMPLETE_WT = ?,
  129. HB_FP_NUM = ?,
  130. HB_FP_WT = ?
  131. WHERE RESULT_NO = ?
  132. ]]>
  133. </query>
  134. <query id="FrmOutSourcApp.QueryOfflineMat" desc="">
  135. <![CDATA[
  136. SELECT *
  137. FROM (SELECT *
  138. FROM PORT_VRP_BATCH_SAMPLE_RESULT
  139. WHERE HEAT_PLAN_NO = (SELECT HEAT_PLAN_NO
  140. FROM VRP_OFFLINE_RESULT
  141. WHERE RESULT_NO = ?)
  142. AND MAT_STATUS = '20'
  143. ORDER BY MAT_NO) WHERE ROWNUM <= ?
  144. ]]>
  145. </query>
  146. <query id="FrmOutSourcApp.QueryOfflineMatChe" desc="">
  147. <![CDATA[
  148. SELECT *
  149. FROM (SELECT *
  150. FROM PORT_VRP_BATCH_SAMPLE_RESULT
  151. WHERE HEAT_PLAN_NO = (SELECT HEAT_PLAN_NO
  152. FROM VRP_OFFLINE_RESULT
  153. WHERE RESULT_NO = ?)
  154. AND MAT_STATUS = '40'
  155. ORDER BY MAT_NO) WHERE ROWNUM <= ?
  156. ]]>
  157. </query>
  158. <query id = "FrmOutSourcApp.doQueryInList" desc = "查询委外入库实绩">
  159. SELECT T.INSTOCK_DOC,
  160. T.LOT_NO,
  161. T.JUDGE_STOVE_NO,
  162. T.BATCH_NO,
  163. T.BATCH_GROUD_NO,
  164. T.PRODUCCODE,
  165. T.PRODUCNAME,
  166. T.STD_CODE,
  167. T.STD_NAME,
  168. T.STEELCODE,
  169. T.STEELNAME,
  170. T.STD_STYLE,
  171. T.STD_STYLE_DESC,
  172. T.SPEC_CODE,
  173. T.SPEC_NAME,
  174. T.MODEL_CODE,
  175. T.MODEL_DESC,
  176. T.ACT_DIMATER,
  177. T.ACT_HEIGHT,
  178. TO_CHAR(T.ACT_LEN_MIN, 'FM999990.00') AS ACT_LEN_MIN,
  179. TO_CHAR(T.ACT_LEN_MAX, 'FM999990.00') AS ACT_LEN_MAX,
  180. SUM(T.ACT_COUNT) AS ACT_COUNT,
  181. TO_CHAR(SUM(T.ACT_WEIGHT), 'FM999999990.000') AS ACT_WEIGHT,
  182. T.ACT_LEN,
  183. T.BELONG_CODE,
  184. T.BELONG_NAME,
  185. T.STORAGE_NO,
  186. T.MEMO,
  187. T.CREATE_NAME,
  188. MAX(TO_CHAR(T.INSTOCK_TIME, 'YYYY-MM-DD HH24:MI:SS')) AS INSTOCK_TIME,
  189. MAX(TO_CHAR(T.IN_TIME_F, 'YYYY-MM-DD')) AS IN_TIME_F,
  190. TO_CHAR(TO_DATE(T.BAL_YEAR_MONTH, 'YYYY-MM'), 'YYYY-MM') AS BAL_YEAR_MONTH,
  191. T.ORDER_NO,
  192. T.ORDER_SEQ,
  193. T.DELIVERY_NO,
  194. T.JUDGE_STD_CODE,
  195. T.JUDGE_STD_NAME,
  196. T.PLINE_CODE,
  197. T.PLINE_NAME,
  198. T.GRADECODE,
  199. T.GRADENAME,
  200. T.MATERIAL_NO,
  201. T.MATERIAL_NAME,
  202. T.SUBCONTRACT_NO,
  203. DECODE(T.PRODUCT_FLAG,
  204. '801401',
  205. '在制品',
  206. '801402',
  207. '成品',
  208. '801403',
  209. '商品') PRODUCT_FLAG,
  210. T.MAT_STATUS,
  211. T.PIPMEMO,
  212. T.PRO_PLAN_ID,
  213. T.GX_PLAN_NO
  214. FROM YDM_BC_INLIST T
  215. WHERE T.INSTOCK_TYPE_CODE = '800701'
  216. AND T.HAND_FLAG = '0'
  217. AND T.QCM_STAUS = '00'
  218. AND T.SUBCONTRACT_NO IS NOT NULL
  219. </query>
  220. <query id = "FrmOutSourcApp.insertMatBcM" desc = "交库">
  221. <![CDATA[
  222. DECLARE
  223. V_INSTOCK_SQE YDM_BC_INLIST.INSTOCK_SQE%TYPE := NULL;
  224. V_ICOUNT NUMBER := 1;
  225. BEGIN
  226. SELECT
  227. NVL(MAX(SUBSTR(T.INSTOCK_SQE, LENGTH(T.INSTOCK_SQE) - 3)), 0) + 1 INTO V_ICOUNT
  228. FROM YDM_BC_INLIST T
  229. WHERE TRUNC(T.CREATE_TIME) = TRUNC(SYSDATE)
  230. AND T.INSTOCK_DOC = '#INSTOCK_DOC#';
  231. FOR MYROW IN (SELECT *
  232. FROM (SELECT *
  233. FROM PORT_VRP_BATCH_SAMPLE_RESULT T
  234. WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
  235. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  236. AND T.PHY_BATCH_NO = '#PHY_BATCH_NO#'
  237. --AND T.IS_SAMPLE_PIPE = '#IS_SAMPLE_PIPE#'
  238. AND T.MAT_STATUS = '20'
  239. AND T.INSTORE_FLAG = '0'
  240. ORDER BY T.MAT_NO ASC)
  241. WHERE ROWNUM <= #ACT_COUNT#) LOOP
  242. INSERT INTO YDM_BC_BUTTRESS(
  243. MAT_NO,
  244. JUDGE_STOVE_NO,
  245. BATCH_NO,
  246. BATCH_GROUD_NO,
  247. STORAGE_NO,
  248. LOCATION_NO,
  249. LARY_NO,
  250. CREATE_NAME,
  251. CREATE_TIME)
  252. VALUES(
  253. MYROW.MAT_NO,
  254. MYROW.JUDGE_STOVE_NO,
  255. MYROW.PHY_BATCH_NO,
  256. '#BATCH_GROUD_NO#',
  257. '#STORAGE_NO#',
  258. '#LOCATION_NO#',
  259. '#LARY_NO#',
  260. '#CREATE_NAME#',
  261. TO_DATE('#CREATE_TIME#','YYYY-MM-DD HH24:MI:SS'));
  262. INSERT INTO MAT_BC_M(
  263. MAT_NO,
  264. PRODUCT_FLAG,
  265. MAT_STATUS,
  266. LOT_NO,
  267. STOVE_NO,
  268. JUDGE_STOVE_NO,
  269. BATCH_NO,
  270. BATCH_GROUD_NO,
  271. SAMPLE_FLAG,
  272. MATERIAL_NO,
  273. MATERIAL_NAME,
  274. PRODUCCODE,
  275. PRODUCNAME,
  276. STEELCODE,
  277. STEELNAME,
  278. GRADECODE,
  279. GRADENAME,
  280. SPEC_CODE,
  281. SPEC_NAME,
  282. MODEL_CODE,
  283. MODEL_DESC,
  284. STD_CODE,
  285. STD_NAME,
  286. STD_STYLE,
  287. STD_STYLE_DESC,
  288. PRO_ORDER_NO,
  289. PRO_ORDER_ID,
  290. PROCESS_CDOE,
  291. PROCESS_DESC,
  292. NEXT_PROCESS_CDOE,
  293. NEXT_PROCESS_DESC,
  294. PLINE_CODE,
  295. PLINE_NAME,
  296. MAT_ORIGIN_CODE,
  297. MAT_ORIGIN_NAME,
  298. ACT_DIMATER,
  299. ACT_HEIGHT,
  300. ACT_LEN,
  301. ACT_LEN_MIN,
  302. ACT_LEN_MAX,
  303. ACT_COUNT,
  304. ACT_WEIGHT,
  305. ACT_THEORY_WEIGHT,
  306. BELONG_CODE,
  307. BELONG_NAME,
  308. MAT_GOWHERE_CODE,
  309. MAT_GOWHERE_NAME,
  310. INSTOCK_TIME,
  311. CREATE_NAME,
  312. CREATE_TIME,
  313. BAL_YEAR_MONTH,
  314. JUDGE_STD_DES,
  315. QCM_STAUS,
  316. HEAT_PLAN_NO,
  317. GX_PLAN_NO,
  318. CRAF_NO,
  319. CRAFT_SEQ,
  320. ORD_LN_DLY_PK,
  321. ORDER_NO,
  322. ORDER_SEQ,
  323. ORDER_SEQ_NO,
  324. TARGET,
  325. FLAG_STOVE_NO_ZG)
  326. VALUES(
  327. MYROW.MAT_NO,
  328. '#PRODUCT_FLAG#',
  329. '#MAT_STATUS#',
  330. MYROW.LOT_NO,
  331. MYROW.STOVE_NO,
  332. MYROW.JUDGE_STOVE_NO,
  333. MYROW.PHY_BATCH_NO,
  334. '#BATCH_GROUD_NO#',
  335. MYROW.IS_SAMPLE_PIPE,
  336. '#MATERIAL_NO#',
  337. '#MATERIAL_NAME#',
  338. '#PRODUCCODE#',
  339. '#PRODUCNAME#',
  340. '#STEELCODE#',
  341. '#STEELNAME#',
  342. '#GRADECODE#',
  343. '#GRADENAME#',
  344. '#SPEC_CODE#',
  345. '#SPEC_NAME#',
  346. '#MODEL_CODE#',
  347. '#MODEL_DESC#',
  348. '#STD_CODE#',
  349. '#STD_NAME#',
  350. '#STD_STYLE#',
  351. '#STD_STYLE_DESC#',
  352. '#PRO_ORDER_NO#',
  353. '#PRO_ORDER_ID#',
  354. '#PROCESS_CDOE#',
  355. '#PROCESS_DESC#',
  356. '#NEXT_PROCESS_CDOE#',
  357. '#NEXT_PROCESS_DESC#',
  358. '#PLINE_CODE#',
  359. '#PLINE_NAME#',
  360. '#MAT_ORIGIN_CODE#',
  361. '#MAT_ORIGIN_NAME#',
  362. '#ACT_DIMATER#',
  363. '#ACT_HEIGHT#',
  364. MYROW.ACT_LEN,
  365. '#ACT_LEN_MIN#',
  366. '#ACT_LEN_MAX#',
  367. MYROW.ACT_COUNT,
  368. MYROW.ACT_WEIGHT,
  369. MYROW.ACT_WEIGHT,
  370. '#BELONG_CODE#',
  371. '#BELONG_NAME#',
  372. '#MAT_GOWHERE_CODE#',
  373. '#MAT_GOWHERE_NAME#',
  374. TO_DATE('#CREATE_TIME#','YYYY-MM-DD HH24:MI:SS'),
  375. '#CREATE_NAME#',
  376. TO_DATE('#CREATE_TIME#','YYYY-MM-DD HH24:MI:SS'),
  377. '#BAL_YEAR_MONTH#',
  378. '#JUDGE_STD_NAME#',
  379. '#QCM_STAUS#',
  380. '#HEAT_PLAN_NO#',
  381. '#GX_PLAN_NO#',
  382. '#CRAF_NO#',
  383. '#CRAFT_SEQ#',
  384. '#ORD_LN_DLY_PK#',
  385. '#ORDER_NO#',
  386. '#ORDER_SEQ#',
  387. '#ORDER_SEQ_NO#',
  388. '#TARGET#',
  389. '#FLAG_STOVE_NO_ZG#');
  390. V_INSTOCK_SQE := '#INSTOCK_DOC#' || LPAD(V_ICOUNT, 4, 0);
  391. INSERT INTO YDM_BC_INLIST(
  392. INSTOCK_SQE,
  393. INSTOCK_DOC,
  394. INSTOCK_TYPE_CODE,
  395. INSTOCK_TYPE_NAME,
  396. MAT_NO,
  397. LOT_NO,
  398. STOVE_NO,
  399. JUDGE_STOVE_NO,
  400. BATCH_NO,
  401. BATCH_GROUD_NO,
  402. MATERIAL_NO,
  403. MATERIAL_NAME,
  404. PRODUCCODE,
  405. PRODUCNAME,
  406. STD_CODE,
  407. STD_NAME,
  408. GRADECODE,
  409. GRADENAME,
  410. STEELCODE,
  411. STEELNAME,
  412. STD_STYLE,
  413. STD_STYLE_DESC,
  414. SPEC_CODE,
  415. SPEC_NAME,
  416. MODEL_CODE,
  417. MODEL_DESC,
  418. PRO_ORDER_NO,
  419. PLINE_CODE,
  420. PLINE_NAME,
  421. ACT_DIMATER,
  422. ACT_HEIGHT,
  423. ACT_LEN,
  424. ACT_LEN_MIN,
  425. ACT_LEN_MAX,
  426. ACT_COUNT,
  427. ACT_WEIGHT,
  428. ACT_THEORY_WEIGHT,
  429. BELONG_CODE,
  430. BELONG_NAME,
  431. STORAGE_NO,
  432. LOCATION_NO,
  433. LARY_NO,
  434. INSTOCK_TIME,
  435. CREATE_NAME,
  436. CREATE_TIME,
  437. PRODUCT_FLAG,
  438. MAT_STATUS,
  439. JUDGE_STD_NAME,
  440. JUDGE_STD_CODE,
  441. IN_TIME_F,
  442. BAL_YEAR_MONTH,
  443. MAT_ORIGIN_CODE,
  444. MAT_ORIGIN_NAME,
  445. QCM_STAUS,
  446. PRO_PLAN_ID,
  447. GX_PLAN_NO,
  448. SUBCONTRACT_NO)
  449. VALUES(
  450. V_INSTOCK_SQE,
  451. '#INSTOCK_DOC#',
  452. '#INSTOCK_TYPE_CODE#',
  453. '#INSTOCK_TYPE_NAME#',
  454. MYROW.MAT_NO,
  455. MYROW.LOT_NO,
  456. MYROW.STOVE_NO,
  457. MYROW.JUDGE_STOVE_NO,
  458. MYROW.PHY_BATCH_NO,
  459. '#BATCH_GROUD_NO#',
  460. '#MATERIAL_NO#',
  461. '#MATERIAL_NAME#',
  462. '#PRODUCCODE#',
  463. '#PRODUCNAME#',
  464. '#STD_CODE#',
  465. '#STD_NAME#',
  466. '#GRADECODE#',
  467. '#GRADENAME#',
  468. '#STEELCODE#',
  469. '#STEELNAME#',
  470. '#STD_STYLE#',
  471. '#STD_STYLE_DESC#',
  472. '#SPEC_CODE#',
  473. '#SPEC_NAME#',
  474. '#MODEL_CODE#',
  475. '#MODEL_DESC#',
  476. '#PRO_ORDER_NO#',
  477. '#PLINE_CODE#',
  478. '#PLINE_NAME#',
  479. '#ACT_DIMATER#',
  480. '#ACT_HEIGHT#',
  481. MYROW.ACT_LEN,
  482. '#ACT_LEN_MIN#',
  483. '#ACT_LEN_MAX#',
  484. MYROW.ACT_COUNT,
  485. MYROW.ACT_WEIGHT,
  486. MYROW.ACT_WEIGHT,
  487. '#BELONG_CODE#',
  488. '#BELONG_NAME#',
  489. '#STORAGE_NO#',
  490. '#LOCATION_NO#',
  491. '#LARY_NO#',
  492. TO_DATE('#CREATE_TIME#','YYYY-MM-DD HH24:MI:SS'),
  493. '#CREATE_NAME#',
  494. TO_DATE('#CREATE_TIME#','YYYY-MM-DD HH24:MI:SS'),
  495. '#PRODUCT_FLAG#',
  496. '#MAT_STATUS#',
  497. '#JUDGE_STD_NAME#',
  498. '#JUDGE_STD_CODE#',
  499. TO_DATE('#CREATE_TIME#','YYYY-MM-DD HH24:MI:SS'),
  500. '#BAL_YEAR_MONTH#',
  501. '#MAT_ORIGIN_CODE#',
  502. '#MAT_ORIGIN_NAME#',
  503. '#QCM_STAUS#',
  504. '#PRO_ORDER_ID#',
  505. '#GX_PLAN_NO#',
  506. '#SUBCONTRACT_NO#');
  507. UPDATE PORT_VRP_BATCH_SAMPLE_RESULT T SET T.INSTORE_FLAG = '1',t.MAT_STATUS ='00' WHERE T.MAT_NO = MYROW.MAT_NO;
  508. V_ICOUNT := V_ICOUNT + 1;
  509. END LOOP;
  510. END;
  511. ]]>
  512. </query>
  513. <query id="FrmOutSourcApp.QueryOfflineMatNo" desc="">
  514. <![CDATA[
  515. SELECT *
  516. FROM (SELECT *
  517. FROM PORT_VRP_BATCH_SAMPLE_RESULT
  518. WHERE HEAT_PLAN_NO = (SELECT HEAT_PLAN_NO
  519. FROM VRP_OFFLINE_RESULT
  520. WHERE RESULT_NO = ?)
  521. AND MAT_STATUS = '40'
  522. ORDER BY MAT_NO) WHERE ROWNUM <= ?
  523. ]]>
  524. </query>
  525. <query id = "FrmOutSourcApp.DeleteInList" desc = "撤销交库">
  526. <![CDATA[
  527. DECLARE
  528. V_COUNT NUMBER := 0;
  529. BEGIN
  530. FOR MYROW IN (SELECT *
  531. FROM (SELECT *
  532. FROM YDM_BC_INLIST T
  533. WHERE T.INSTOCK_DOC = '#INSTOCK_DOC#'
  534. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  535. AND T.BATCH_NO = '#BATCH_NO#'
  536. AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#'
  537. AND T.PLINE_CODE = '#PLINE_CODE#'
  538. ORDER BY T.MAT_NO DESC)
  539. WHERE ROWNUM <= #ACT_COUNT#) LOOP
  540. UPDATE PORT_VRP_BATCH_SAMPLE_RESULT T SET T.INSTORE_FLAG = '0',t.MAT_STATUS ='20' WHERE T.MAT_NO = MYROW.MAT_NO;
  541. DELETE FROM MAT_BC_M T
  542. WHERE T.MAT_NO = MYROW.MAT_NO
  543. AND T.JUDGE_STOVE_NO = MYROW.JUDGE_STOVE_NO
  544. AND T.BATCH_NO = MYROW.BATCH_NO
  545. AND T.BATCH_GROUD_NO = MYROW.BATCH_GROUD_NO
  546. AND T.PLINE_CODE = MYROW.PLINE_CODE;
  547. DELETE FROM YDM_BC_BUTTRESS S
  548. WHERE S.MAT_NO = MYROW.MAT_NO
  549. AND S.JUDGE_STOVE_NO = MYROW.JUDGE_STOVE_NO
  550. AND S.BATCH_NO = MYROW.BATCH_NO
  551. AND S.BATCH_GROUD_NO = MYROW.BATCH_GROUD_NO;
  552. DELETE FROM YDM_BC_INLIST F WHERE F.INSTOCK_SQE = MYROW.INSTOCK_SQE;
  553. END LOOP;
  554. UPDATE VRP_INSTORE_RESULT S
  555. SET S.PRO_NUM = TO_NUMBER(S.PRO_NUM) - TO_NUMBER('#ACT_COUNT#'),
  556. S.PRO_WT = TO_NUMBER(S.PRO_WT) - TO_NUMBER('#ACT_WEIGHT#'),
  557. S.NODE_FUR_FLAG = '0'
  558. WHERE S.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  559. AND S.PRO_PLAN_ID = '#PRO_PLAN_ID#'
  560. AND S.GX_PLAN_NO = '#GX_PLAN_NO#';
  561. SELECT NVL(SUM(S.PRO_NUM), 0)
  562. INTO V_COUNT
  563. FROM VRP_INSTORE_RESULT S
  564. WHERE S.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  565. AND S.PRO_PLAN_ID = '#PRO_PLAN_ID#'
  566. AND S.GX_PLAN_NO = '#GX_PLAN_NO#';
  567. IF (V_COUNT = 0) THEN
  568. DELETE FROM VRP_INSTORE_RESULT S
  569. WHERE S.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  570. AND S.PRO_PLAN_ID = '#PRO_PLAN_ID#'
  571. AND S.GX_PLAN_NO = '#GX_PLAN_NO#';
  572. END IF;
  573. DELETE FROM VRP_COM_INFO T WHERE T.INSTOCK_DOC = '#INSTOCK_DOC#'
  574. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  575. AND T.PRO_PLAN_ID = '#PRO_PLAN_ID#'
  576. AND T.GX_PLAN_NO = '#GX_PLAN_NO#'
  577. AND T.STATION_DESC = '交库';
  578. UPDATE VRP_ENTRUSTED_BILL SET SUBCONTRACT_LOG = '10' WHERE SUBCONTRACT_NO = '#SUBCONTRACT_NO#';
  579. END;
  580. ]]>
  581. </query>
  582. <query id="FrmOutSourcApp.QueryOffMatNo" desc="查询管号队列离线材料号">
  583. <![CDATA[
  584. SELECT *
  585. FROM (SELECT T.MAT_NO,T.PHY_BATCH_NO,T.IS_SAMPLE_PIPE,T.ACT_COUNT
  586. FROM port_vrp_batch_sample_result T
  587. WHERE T.MAT_STATUS = '20'
  588. and T.PHY_BATCH_NO = ?
  589. AND T.HEAT_PLAN_NO = ?
  590. AND T.OP_PROCESS = ?
  591. ORDER BY T.MAT_NO ASC)
  592. WHERE ROWNUM < ?
  593. ]]>
  594. </query>
  595. <query id="FrmOutSourcApp.updateInStore" desc="">
  596. <![CDATA[
  597. update VRP_ENTRUSTED_BILL SET SUBCONTRACT_LOG ='40' where SUBCONTRACT_NO = '#SUBCONTRACT_NO#'
  598. ]]>
  599. </query>
  600. <query id="FrmOutSourcApp.updateOutStuts" desc="">
  601. <![CDATA[
  602. update VRP_ENTRUSTED_BILL SET SUBCONTRACT_LOG ='10' where SUBCONTRACT_NO = '#SUBCONTRACT_NO#'
  603. ]]>
  604. </query>
  605. <query id = "FrmOutSourcApp.insertInList" desc = "">
  606. <![CDATA[
  607. DECLARE
  608. BEGIN
  609. FOR MYROW IN (SELECT *
  610. FROM (SELECT *
  611. FROM VRP_ENTRUSTED_BILL T
  612. WHERE T.SUBCONTRACT_NO = '#SUBCONTRACT_NO#'
  613. )
  614. WHERE ROWNUM <= '#SUBCONTRACT_NUM#') LOOP
  615. UPDATE YDM_BC_INLIST T
  616. SET T.SUBCONTRACT_NO = '#SUBCONTRACT_NO#'
  617. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  618. AND T.SUBCONTRACT_NO IS NOT NULL;
  619. END LOOP;
  620. END;
  621. ]]>
  622. </query>
  623. <query id="FrmOutSourcApp.QueryInlistMat" desc="">
  624. <![CDATA[
  625. SELECT T.MAT_NO FROM YDM_BC_INLIST T WHERE t.instock_doc = ? and ROWNUM <= ?
  626. ]]>
  627. </query>
  628. <query id="FrmOutSourcApp.UpdateBCMatStatus" desc="">
  629. <![CDATA[
  630. UPDATE MAT_BC_M SET QCM_STAUS = '22', (JUDGE_RESULT_CODE, JUDGE_RESULT) =
  631. (SELECT BASECODE, BASENAME
  632. FROM COM_BASE_INFO
  633. WHERE BASECODE ='40740705')
  634. WHERE MAT_NO =?
  635. ]]>
  636. </query>
  637. <query id="FrmOutSourcApp.UpdateBCMatStatusNo" desc="">
  638. <![CDATA[
  639. UPDATE MAT_BC_M SET QCM_STAUS = '11', (JUDGE_RESULT_CODE, JUDGE_RESULT) =
  640. (SELECT BASECODE, BASENAME
  641. FROM COM_BASE_INFO
  642. WHERE BASECODE ='40740705')
  643. WHERE MAT_NO =?
  644. ]]>
  645. </query>
  646. <query id="FrmOutSourcApp.UpdatePortVRPMatStatus" desc="">
  647. <![CDATA[
  648. UPDATE PORT_VRP_BATCH_SAMPLE_RESULT SET MAT_STATUS = '40' WHERE MAT_NO =?
  649. ]]>
  650. </query>
  651. <query id="FrmOutSourcApp.UpdatePortVRPMatStatusNo" desc="">
  652. <![CDATA[
  653. UPDATE PORT_VRP_BATCH_SAMPLE_RESULT SET MAT_STATUS = '20' WHERE MAT_NO =?
  654. ]]>
  655. </query>
  656. <query id="FrmOutSourcApp.DetelePortStatus" desc="">
  657. <![CDATA[
  658. DELETE PORT_VRP_BATCH_SAMPLE_RESULT WHERE MAT_NO = ?
  659. ]]>
  660. </query>
  661. </queryMap>