FrmQueryScrapBack.xml 17 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633
  1. <?xml version="1.0" encoding="UTF-8"?>
  2. <queryMap desc = "修改处理结果">
  3. <query id = "FrmQueryScrapBack.doQueryData" desc = "查询处理结果">
  4. <![CDATA[
  5. SELECT T.RESULT_NO,
  6. T.JUDGE_STOVE_NO,
  7. T.SEQ,
  8. T.PROCESS_NO AS PROCESS_NO_CODE,
  9. DECODE(T.PROCESS_NO,
  10. 0,
  11. '锯切前',
  12. 1,
  13. '锯切后',
  14. 2,
  15. '加热炉',
  16. 3,
  17. '穿孔',
  18. 4,
  19. '连轧',
  20. 5,
  21. '再加热炉',
  22. 6,
  23. '定径',
  24. 7,
  25. '分切前',
  26. 8,
  27. '分切后',
  28. 9,
  29. '矫直',
  30. 10,
  31. '探伤',
  32. 11,
  33. '质检') PROCESS_NO,
  34. T.SRACP_REASON,
  35. T.PRO_PLAN_ID,
  36. T.GX_PLAN_NO,
  37. T.PLINE_CODE,
  38. T.MAT_NO,
  39. T.GROUP_FLAG,
  40. T.NEW_HEAT_NO,
  41. T.NEW_MAT_NO,
  42. (SELECT S.BASENAME
  43. FROM COM_BASE_INFO S
  44. WHERE S.BASECODE = T.HANDLE_RESULT) HANDLE_RESULT,
  45. DECODE(T.FLAG, '0', '未处理', '1', '已处理') FLAG,
  46. T.REMARK,
  47. T.SCRAP_USER,
  48. TO_CHAR(T.TIME, 'YYYY-MM-DD HH24:MI:SS') TIME,
  49. DECODE(T.SCRAP_SHIFT, '0', '常白班', '1', '早', '2', '中', 3, '晚') SCRAP_SHIFT,
  50. DECODE(T.SCRAP_GROUP, '1', '甲', 2, '乙', 3, '丙', 4, '丁') SCRAP_GROUP,
  51. T.COL_USER,
  52. TO_CHAR(T.COL_TIME, 'YYYY-MM-DD HH24:MI:SS') COL_TIME,
  53. DECODE(T.COL_SHIFT, '0', '常白班', '1', '早', '2', '中', 3, '晚') COL_SHIFT,
  54. DECODE(T.COL_GROUP, '1', '甲', 2, '乙', 3, '丙', 4, '丁') COL_GROUP,
  55. ROUND(1000 * T2.DB_HEIGHT / T2.DB_LENGTH, 3) DBZ
  56. FROM MIL_SLAB_SCRAP T, MIL_PLAN T2
  57. WHERE T.JUDGE_STOVE_NO = T2.JUDGE_STOVE_NO
  58. AND T.PRO_PLAN_ID = T2.PRO_PLAN_ID
  59. AND T.GX_PLAN_NO = T2.GX_PLAN_NO
  60. AND T.JUDGE_STOVE_NO || '&' LIKE ('%' || ? || '%')
  61. AND T.PLINE_CODE = ?
  62. AND T.GROUP_FLAG = '0'
  63. AND T.PLINE_CODE = 'C072'
  64. AND T.PROCESS_NO < 2
  65. ]]>
  66. </query>
  67. <query id = "FrmQueryScrapBack.SelectAcount" desc = "查询支数">
  68. <![CDATA[
  69. SELECT COUNT(1) ACOUNT
  70. FROM MAT_GP_M_HISTORY T, MIL_PLAN T1
  71. WHERE T.JUDGE_STOVE_NO = T1.FEED_HEAT_NO
  72. AND T.PRO_PLAN_ID_ZG = T1.PRO_PLAN_ID
  73. AND T.GX_PLAN_NO_ZG = T1.GX_PLAN_NO
  74. AND T1.JUDGE_STOVE_NO = ?
  75. AND T1.PRO_PLAN_ID = ?
  76. AND T1.GX_PLAN_NO = ?
  77. ]]>
  78. </query>
  79. <query id = "FrmQueryScrapBack.SelectIsFC" desc = "验证是否是返库的炉号">
  80. <![CDATA[
  81. SELECT COUNT(1) ACOUNT
  82. FROM MIL_SLAB_SCRAP T
  83. WHERE T.JUDGE_STOVE_NO = ?
  84. AND T.PRO_PLAN_ID = ?
  85. AND T.GX_PLAN_NO = ?
  86. AND T.MAT_NO = ?
  87. AND T.HANDLE_RESULT = '500202'
  88. AND T.FLAG = '1'
  89. ]]>
  90. </query>
  91. <query id = "FrmQueryScrapBack.SelectIsNoChang" desc = "验证返库的炉号是否还在库里或者用作其它">
  92. <![CDATA[
  93. SELECT COUNT(1) ACOUNT
  94. FROM MAT_GP_M T
  95. WHERE T.MAT_NO = ?
  96. AND T.PRO_PLAN_ID_ZG IS NULL
  97. AND T.GX_PLAN_NO_ZG IS NULL
  98. AND T.MAT_STATUS = '80150102'
  99. AND T.HANGING_FLAG = '0'
  100. ]]>
  101. </query>
  102. <query id = "FrmQueryScrapBack.updateResult" desc = "修改处理结果">
  103. UPDATE MIL_SLAB_SCRAP T
  104. SET T.COL_SHIFT = ?,
  105. T.COL_GROUP = ?,
  106. T.COL_USER = ?,
  107. T.Handle_Result = ?,
  108. T.COL_TIME = TO_DATE(?, 'YYYY-MM-DD HH24:MI:SS'),
  109. T.FLAG = ?
  110. WHERE T.JUDGE_STOVE_NO = ?
  111. AND T.MAT_NO = ?
  112. </query>
  113. <query id = "FrmQueryScrapBack.updatePort" desc = "修改进程表">
  114. UPDATE PORT_MIL_BATCH_SAMPLE_RESULT T
  115. SET T.HANDLE_RESULT = ?
  116. WHERE T.JUDGE_STOVE_NO = ?
  117. AND (T.M_MAT_NO = ? OR T.M_M_MAT_NO = ?)
  118. </query>
  119. <query id = "FrmQueryScrapBack.updateResultBack" desc = "修改处理结果">
  120. UPDATE MIL_SLAB_SCRAP T
  121. SET T.FLAG = '0',
  122. T.COL_SHIFT = ?,
  123. T.COL_GROUP = ?,
  124. T.COL_USER = ?,
  125. T.Handle_Result = '0',
  126. T.COL_TIME = TO_DATE(?, 'YYYY-MM-DD HH24:MI:SS')
  127. WHERE T.JUDGE_STOVE_NO = ?
  128. AND T.MAT_NO = ?
  129. </query>
  130. <query id = "FrmQueryScrapBack.returnLibrary" desc = "返库">
  131. <![CDATA[
  132. DECLARE
  133. V_INSTOCK_DOC YDM_GP_INLIST.INSTOCK_DOC%TYPE := NULL; --入库单编号
  134. V_STORAGE_NO YDM_GP_BUTTRESS.STORAGE_NO%TYPE := NULL; --仓库代码
  135. V_LOCATION_NO YDM_GP_BUTTRESS.LOCATION_NO%TYPE := NULL; --库位代码
  136. V_LOCATION_NAME YDM_GP_BUTTRESS.LOCATION_NAME%TYPE := NULL; --库位名称
  137. V_FEED_HEAT_NO MAT_GP_M.JUDGE_STOVE_NO%TYPE := NULL; --炼钢判定炉号
  138. V_MAT_NO MAT_GP_M.MAT_NO%TYPE := NULL; --材料号
  139. V_TIME YDM_GP_OUTLIST.CREATE_TIME%TYPE := SYSDATE; --系统时间
  140. V_OUTSTOCK_DOC_HO YDM_GP_OUTLIST.OUTSTOCK_DOC%TYPE := NULL; --红冲出库单编号
  141. V_OUTSTOCK_PLAN_NO YDM_GP_OUTLIST.OUTSTOCK_PLAN_NO%TYPE := NULL; --轧管炉计划ID
  142. V_PLINE_NAME COM_BASE_PLINE.PLINE_NAME%TYPE := NULL;
  143. V_ICOUNT NUMBER := 1;
  144. V_JUDGE_STOVE_NO MIL_SLAB_SCRAP.JUDGE_STOVE_NO%TYPE := ?;
  145. V_PRO_PLAN_ID MIL_SLAB_SCRAP.PRO_PLAN_ID%TYPE := ?;
  146. V_GX_PLAN_NO MIL_SLAB_SCRAP.GX_PLAN_NO%TYPE := ?;
  147. V_PLINE_CODE MIL_SLAB_SCRAP.PLINE_CODE%TYPE := ?;
  148. V_COL_USER MIL_SLAB_SCRAP.COL_USER%TYPE := ?;
  149. S_MAT_NO MIL_SLAB_SCRAP.MAT_NO%TYPE := ?; --管坯剔除子表材料号
  150. BEGIN
  151. --找到炼钢判定炉号
  152. SELECT T.FEED_HEAT_NO, T.ID
  153. INTO V_FEED_HEAT_NO, V_OUTSTOCK_PLAN_NO
  154. FROM MIL_PLAN T
  155. WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  156. AND T.PRO_PLAN_ID = V_PRO_PLAN_ID
  157. AND T.GX_PLAN_NO = V_GX_PLAN_NO;
  158. --产线名称
  159. SELECT B.PLINE_NAME
  160. INTO V_PLINE_NAME
  161. FROM COM_BASE_PLINE B
  162. WHERE B.PLINE_CODE = V_PLINE_CODE;
  163. --生成材料号
  164. SELECT V_FEED_HEAT_NO ||
  165. LPAD(NVL(MAX(SUBSTR(T2.MAT_NO, LENGTH(T2.MAT_NO) - 2)), 0) + 1,
  166. 3,
  167. 0) MAT_NO
  168. INTO V_MAT_NO
  169. FROM (SELECT MAX(T.MAT_NO) MAT_NO
  170. FROM MAT_GP_M T
  171. WHERE T.JUDGE_STOVE_NO = V_FEED_HEAT_NO
  172. UNION ALL
  173. SELECT MAX(T1.MAT_NO) MAT_NO
  174. FROM YDM_GP_INLIST T1
  175. WHERE T1.JUDGE_STOVE_NO = V_FEED_HEAT_NO
  176. UNION ALL
  177. SELECT MAX(T3.MAT_NO) MAT_NO
  178. FROM MAT_GP_M_HISTORY T3
  179. WHERE T3.JUDGE_STOVE_NO = V_FEED_HEAT_NO) T2;
  180. --生成 返库入库单编号
  181. SELECT 'FK' || TO_CHAR(V_TIME, 'YYMMDD') ||
  182. LPAD(NVL(MAX(SUBSTR(T.INSTOCK_DOC, 9)), 0) + 1, 5, 0) DI
  183. INTO V_INSTOCK_DOC
  184. FROM YDM_GP_INLIST T
  185. WHERE TO_CHAR(T.INSTOCK_TIME, 'YYYY-MM-DD') =
  186. TO_CHAR(V_TIME, 'YYYY-MM-DD')
  187. AND T.INSTOCK_TYPE_CODE = '800710';
  188. --生成 红冲出库单编号
  189. SELECT 'HO' || TO_CHAR(V_TIME, 'YYMMDD') ||
  190. LPAD(NVL(MAX(SUBSTR(T.OUTSTOCK_DOC, 9)), 0) + 1, 5, 0) DI
  191. INTO V_OUTSTOCK_DOC_HO
  192. FROM YDM_GP_OUTLIST T
  193. WHERE TO_CHAR(T.CREATE_TIME, 'YYYY-MM-DD') =
  194. TO_CHAR(V_TIME, 'YYYY-MM-DD')
  195. and t.outstock_type_code = '800806';
  196. --仓库代码
  197. SELECT DECODE(V_PLINE_CODE,
  198. 'C008',
  199. 'TCC7',
  200. 'C009',
  201. 'TCC5',
  202. 'C010',
  203. 'TCC6',
  204. 'C017',
  205. 'TCC8'),
  206. DECODE(V_PLINE_CODE,
  207. 'C008',
  208. 'TCC710101',
  209. 'C009',
  210. 'TCC510104',
  211. 'C010',
  212. 'TCC611202',
  213. 'C017',
  214. 'TCC811502'),
  215. DECODE(V_PLINE_CODE,
  216. 'C008',
  217. '回库料架1-1',
  218. 'C009',
  219. '管坯库A区四号料架',
  220. 'C010',
  221. '虚拟库位',
  222. 'C017',
  223. '虚拟库位一号')
  224. INTO V_STORAGE_NO, V_LOCATION_NO, V_LOCATION_NAME
  225. FROM DUAL;
  226. FOR MYROW IN (SELECT t.*
  227. FROM MAT_GP_M_HISTORY T
  228. WHERE T.JUDGE_STOVE_NO = V_FEED_HEAT_NO
  229. AND T.PRO_PLAN_ID_ZG = V_PRO_PLAN_ID
  230. AND T.GX_PLAN_NO_ZG = V_GX_PLAN_NO
  231. AND ROWNUM <= 1
  232. ORDER BY T.MAT_NO) LOOP
  233. --管坯剔除子表写新材料号
  234. UPDATE MIL_SLAB_SCRAP T
  235. SET T.NEW_MAT_NO = V_MAT_NO
  236. WHERE T.MAT_NO = S_MAT_NO;
  237. --复制数据到物料主表
  238. insert into MAT_GP_M
  239. select * from MAT_GP_M_HISTORY t where t.mat_no = MYROW.MAT_NO;
  240. update MAT_GP_M t
  241. set t.mat_no = V_MAT_NO,
  242. T.MAT_STATUS = '80150102',
  243. T.HANGING_FLAG = '0',
  244. T.PRO_PLAN_ID_ZG = '',
  245. T.GX_PLAN_NO_ZG = '',
  246. T.FIX_NUM = 1,
  247. T.ACT_LEN = MYROW.FIX_LEN,
  248. T.ACT_WEIGHT = ROUND(MYROW.ACT_WEIGHT / MYROW.FIX_NUM, 3),
  249. T.ACT_THEORY_WEIGHT = ROUND(MYROW.ACT_THEORY_WEIGHT /
  250. MYROW.FIX_NUM,
  251. 3),
  252. T.CREATE_NAME = V_COL_USER,
  253. T.CREATE_TIME = V_TIME,
  254. T.INSTOCK_TIME = V_TIME,
  255. T.LK_FLAG = '0',
  256. T.INSTANCY_FLAG = '0'
  257. WHERE T.MAT_NO = MYROW.MAT_NO;
  258. --插入位置表
  259. INSERT INTO YDM_GP_BUTTRESS
  260. (MAT_NO,
  261. JUDGE_STOVE_NO,
  262. STORAGE_NO,
  263. LOCATION_NO,
  264. LARY_NO,
  265. STORAGE_ATTR,
  266. STORAGE_ATTR_NAME,
  267. STORAGE_TYPE_NO,
  268. STORAGE_TYPE_NAME,
  269. CREATE_NAME,
  270. CREATE_TIME,
  271. LOCATION_NAME)
  272. VALUES
  273. (V_MAT_NO,
  274. MYROW.JUDGE_STOVE_NO,
  275. V_STORAGE_NO,
  276. V_LOCATION_NO,
  277. 1,
  278. '800302',
  279. '投料库',
  280. '800201',
  281. '管坯',
  282. V_COL_USER,
  283. V_TIME,
  284. V_LOCATION_NAME);
  285. --插入红冲出库记录
  286. INSERT INTO YDM_GP_OUTLIST
  287. (OUTSTOCK_SQE,
  288. OUTSTOCK_PLAN_NO,
  289. OUTSTOCK_DOC,
  290. OUTSTOCK_TYPE_CODE,
  291. OUTSTOCK_TYPE_NAME,
  292. MAT_NO,
  293. PRODUCT_FLAG,
  294. MAT_STATUS,
  295. STOVE_NO,
  296. FLAG_STOVE_NO,
  297. JUDGE_STOVE_NO,
  298. CAST_NO,
  299. CCMID,
  300. MATERIAL_NO,
  301. MATERIAL_NAME,
  302. GRADECODE,
  303. GRADENAME,
  304. STD_CODE,
  305. STD_NAME,
  306. DIMATER,
  307. HEIGHT,
  308. ACT_LEN,
  309. FIX_NUM,
  310. FIX_LEN,
  311. ACT_COUNT,
  312. ACT_WEIGHT,
  313. ACT_THEORY_WEIGHT,
  314. PONDER_NO,
  315. PONDER_GROSS_WT,
  316. PLINE_CODE,
  317. PLINE_NAME,
  318. PRO_ORDER_NO,
  319. ORDER_NO,
  320. ORDER_SEQ,
  321. ORDER_SEQ_NO,
  322. ORD_PK,
  323. ORD_LN_PK,
  324. ORD_LN_DLY_PK,
  325. BELONG_CODE,
  326. BELONG_NAME,
  327. BAR_CODE,
  328. STORAGE_NO,
  329. LOCATION_NO,
  330. RPO_TIME,
  331. PRO_BC,
  332. PRO_BZ,
  333. BAL_YEAR_MONTH,
  334. OUTSTOCK_TIME,
  335. MEMO,
  336. CREATE_NAME,
  337. CREATE_TIME,
  338. UPDATE_NAME,
  339. UPDATE_TIME,
  340. GROUD_NO,
  341. PRINT_STOVE_NO,
  342. PRO_PLAN_ID_ZG,
  343. GX_PLAN_NO_ZG,
  344. MAT_GOWHERE_CODE,
  345. MAT_GOWHERE_NAME)
  346. VALUES
  347. (V_OUTSTOCK_DOC_HO || LPAD(V_ICOUNT, 4, 0),
  348. V_OUTSTOCK_PLAN_NO,
  349. V_OUTSTOCK_DOC_HO,
  350. '800806',
  351. '出库红冲',
  352. V_MAT_NO,
  353. MYROW.PRODUCT_FLAG,
  354. MYROW.MAT_STATUS,
  355. MYROW.STOVE_NO,
  356. MYROW.FLAG_STOVE_NO,
  357. MYROW.JUDGE_STOVE_NO,
  358. MYROW.CAST_NO,
  359. MYROW.CCMID,
  360. MYROW.MATERIAL_NO,
  361. MYROW.MATERIAL_NAME,
  362. MYROW.GRADECODE,
  363. MYROW.GRADENAME,
  364. MYROW.STD_CODE,
  365. MYROW.STD_NAME,
  366. MYROW.DIMATER,
  367. MYROW.HEIGHT,
  368. MYROW.FIX_LEN,
  369. 1,
  370. MYROW.FIX_LEN,
  371. -1,
  372. -ROUND(MYROW.ACT_WEIGHT / MYROW.FIX_NUM, 3),
  373. -ROUND(MYROW.ACT_WEIGHT / MYROW.FIX_NUM, 3),
  374. MYROW.PONDER_NO,
  375. MYROW.PONDER_GROSS_WT,
  376. MYROW.PLINE_CODE,
  377. MYROW.PLINE_NAME,
  378. MYROW.PRO_ORDER_NO,
  379. MYROW.ORDER_NO,
  380. MYROW.ORDER_SEQ,
  381. MYROW.ORDER_SEQ_NO,
  382. MYROW.ORD_PK,
  383. MYROW.ORD_LN_PK,
  384. MYROW.ORD_LN_DLY_PK,
  385. MYROW.BELONG_CODE,
  386. MYROW.BELONG_NAME,
  387. MYROW.BAR_CODE,
  388. V_STORAGE_NO,
  389. V_LOCATION_NO,
  390. V_TIME,
  391. MYROW.PRO_BC,
  392. MYROW.PRO_BZ,
  393. TO_CHAR(V_TIME, 'YYYYMM'),
  394. V_TIME,
  395. MYROW.MEMO,
  396. V_COL_USER,
  397. V_TIME,
  398. V_COL_USER,
  399. V_TIME,
  400. MYROW.GROUD_NO,
  401. MYROW.PRINT_STOVE_NO,
  402. '',
  403. '',
  404. V_PLINE_CODE,
  405. V_PLINE_NAME);
  406. V_ICOUNT := V_ICOUNT + 1;
  407. END LOOP;
  408. END;
  409. ]]>
  410. </query>
  411. <query id = "FrmQueryScrapBack.returnLibraryBack" desc = "撤销返库">
  412. <![CDATA[
  413. DECLARE
  414. V_NEW_MAT_NO MIL_SLAB_SCRAP.NEW_MAT_NO%TYPE := ?;
  415. BEGIN
  416. DELETE FROM MAT_GP_M T WHERE T.MAT_NO = V_NEW_MAT_NO;
  417. DELETE FROM YDM_GP_BUTTRESS T WHERE T.MAT_NO = V_NEW_MAT_NO;
  418. /*DELETE FROM YDM_GP_INLIST T
  419. WHERE T.INSTOCK_TYPE_CODE = '800710'
  420. AND T.MAT_NO = V_NEW_MAT_NO;*/
  421. DELETE FROM YDM_GP_OUTLIST T
  422. WHERE T.OUTSTOCK_TYPE_CODE = '800806'
  423. AND T.MAT_NO = V_NEW_MAT_NO;
  424. END;
  425. ]]>
  426. </query>
  427. <query id = "FrmQueryScrapBack.selectMilPlan" desc = "查询轧管炉计划">
  428. SELECT T.*, S.OUTWL_ID, S.OUTWL_DESC,S.OUTDIAMETER,S.WALLTHICK,S.LEN_ROLL_MIN,S.LEN_ROLL_MAX,S.AIMLENGTH
  429. FROM MIL_PLAN T, PLN_ORDER_ZG_S S
  430. WHERE T.PRO_PLAN_ID = S.PRO_PLAN_ID
  431. AND T.GX_PLAN_NO = S.GX_PLAN_NO
  432. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  433. </query>
  434. <query id = "FrmQueryScrapBack.selectMatNoZg" desc = "查询材料号">
  435. SELECT ? || 'F' ||
  436. LPAD(NVL(MAX(SUBSTR(T.MAT_NO, LENGTH(T.MAT_NO) - 3)), 0) + 1, 4, 0) MAT_NO
  437. FROM (SELECT MAX(T1.MAT_NO) MAT_NO
  438. FROM MAT_BC_M T1
  439. WHERE T1.JUDGE_STOVE_NO = ?
  440. AND T1.BATCH_NO = 'F'
  441. UNION ALL
  442. SELECT MAX(T3.MAT_NO) MAT_NO
  443. FROM MAT_ZC_BACKUP T3
  444. WHERE T3.JUDGE_STOVE_NO = ?
  445. AND T3.BATCH_NO = 'F'
  446. UNION ALL
  447. SELECT MAX(T4.MAT_NO) MAT_NO
  448. FROM YDM_BC_INLIST T4
  449. WHERE T4.JUDGE_STOVE_NO = ?
  450. AND T4.BATCH_NO = 'F') T
  451. </query>
  452. <query id = "FrmQueryScrapBack.selectWgtM" desc = "查询母坯重量">
  453. SELECT SUM(T.INPUT_WEIGHT) WEIGHT
  454. FROM PORT_MIL_BATCH_SAMPLE_RESULT T
  455. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  456. AND T.M_M_MAT_NO = '#MAT_NO#'
  457. </query>
  458. <query id = "FrmQueryScrapBack.selectWgt" desc = "查询单倍坯重量">
  459. SELECT SUM(T.INPUT_WEIGHT) WEIGHT
  460. FROM PORT_MIL_BATCH_SAMPLE_RESULT T
  461. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  462. AND T.M_MAT_NO = '#MAT_NO#'
  463. </query>
  464. <query id = "FrmQueryScrapBack.insertMatBc" desc = "插入库存">
  465. DECLARE
  466. BEGIN
  467. INSERT INTO MAT_BC_M(
  468. MAT_NO,
  469. PRODUCT_FLAG,
  470. MAT_STATUS,
  471. LOT_NO,
  472. STOVE_NO,
  473. JUDGE_STOVE_NO,
  474. BATCH_NO,
  475. BATCH_GROUD_NO,
  476. MATERIAL_NO,
  477. MATERIAL_NAME,
  478. PRODUCCODE,
  479. PRODUCNAME,
  480. STEELCODE,
  481. STEELNAME,
  482. GRADECODE,
  483. GRADENAME,
  484. SPEC_CODE,
  485. SPEC_NAME,
  486. MODEL_CODE,
  487. MODEL_DESC,
  488. STD_CODE,
  489. STD_NAME,
  490. STD_STYLE,
  491. STD_STYLE_DESC,
  492. PRO_ORDER_NO,
  493. PROCESS_CDOE,
  494. PROCESS_DESC,
  495. PLINE_CODE,
  496. PLINE_NAME,
  497. ACT_DIMATER,
  498. ACT_HEIGHT,
  499. ACT_LEN,
  500. ACT_LEN_MIN,
  501. ACT_LEN_MAX,
  502. ACT_COUNT,
  503. ACT_WEIGHT,
  504. ACT_THEORY_WEIGHT,
  505. BELONG_CODE,
  506. BELONG_NAME,
  507. JUDGE_RESULT_CODE,
  508. JUDGE_RESULT,
  509. INSTOCK_TIME,
  510. CREATE_NAME,
  511. CREATE_TIME,
  512. QCM_STAUS,
  513. HEAT_PLAN_NO,
  514. ZG_STOVE_SQE,
  515. GX_PLAN_NO,
  516. TARGET,
  517. PROCESS_STATUS,
  518. FLAG_STOVE_NO_ZG,
  519. BELONG_CODE_RESPONSE,
  520. BELONG_NAME_RESPONSE,
  521. SCRAP_TYPE)
  522. VALUES(
  523. '#MAT_NO#',
  524. '#PRODUCT_FLAG#',
  525. '#MAT_STATUS#',
  526. '#LOT_NO#',
  527. '#STOVE_NO#',
  528. '#JUDGE_STOVE_NO#',
  529. '#BATCH_NO#',
  530. '#BATCH_GROUD_NO#',
  531. '#MATERIAL_NO#',
  532. '#MATERIAL_NAME#',
  533. '#PRODUCCODE#',
  534. '#PRODUCNAME#',
  535. '#STEELCODE#',
  536. '#STEELNAME#',
  537. '#GRADECODE#',
  538. '#GRADENAME#',
  539. '#SPEC_CODE#',
  540. '#SPEC_NAME#',
  541. '#MODEL_CODE#',
  542. '#MODEL_DESC#',
  543. '#STD_CODE#',
  544. '#STD_NAME#',
  545. '#STD_STYLE#',
  546. '#STD_STYLE_DESC#',
  547. '#PRO_ORDER_NO#',
  548. '#PROCESS_CDOE#',
  549. '#PROCESS_DESC#',
  550. '#PLINE_CODE#',
  551. '#PLINE_NAME#',
  552. '#ACT_DIMATER#',
  553. '#ACT_HEIGHT#',
  554. '#ACT_LEN#',
  555. '#ACT_LEN_MIN#',
  556. '#ACT_LEN_MAX#',
  557. '#ACT_COUNT#',
  558. '#ACT_WEIGHT#',
  559. '#ACT_THEORY_WEIGHT#',
  560. '#BELONG_CODE#',
  561. '#BELONG_NAME#',
  562. '#JUDGE_RESULT_CODE#',
  563. '#JUDGE_RESULT#',
  564. TO_DATE('#INSTOCK_TIME#','YYYY-MM-DD HH24:MI:SS'),
  565. '#CREATE_NAME#',
  566. TO_DATE('#CREATE_TIME#','YYYY-MM-DD HH24:MI:SS'),
  567. '#QCM_STAUS#',
  568. '#HEAT_PLAN_NO#',
  569. '#ZG_STOVE_SQE#',
  570. '#GX_PLAN_NO#',
  571. '#TARGET#',
  572. '#PROCESS_STATUS#',
  573. '#FLAG_STOVE_NO_ZG#',
  574. '#BELONG_CODE_RESPONSE#',
  575. '#BELONG_NAME_RESPONSE#',
  576. '#SCRAP_TYPE#');
  577. INSERT INTO YDM_BC_BUTTRESS(
  578. MAT_NO,
  579. JUDGE_STOVE_NO,
  580. BATCH_NO,
  581. BATCH_GROUD_NO,
  582. STORAGE_NO,
  583. LOCATION_NO,
  584. LARY_NO,
  585. CREATE_NAME,
  586. CREATE_TIME)
  587. VALUES(
  588. '#MAT_NO#',
  589. '#JUDGE_STOVE_NO#',
  590. '#BATCH_NO#',
  591. '#BATCH_GROUD_NO#',
  592. '#STORAGE_NO#',
  593. '#LOCATION_NO#',
  594. '#LARY_NO#',
  595. '#CREATE_NAME#',
  596. TO_DATE('#CREATE_TIME#','YYYY-MM-DD HH24:MI:SS'));
  597. END;
  598. </query>
  599. </queryMap>