FrmMaterialChoose.xml 9.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374
  1. <?xml version="1.0" encoding="UTF-8"?>
  2. <queryMap desc="利库">
  3. <query id="FrmMaterialChoose.queryMaterialE" desc="查询库存镦拔扩物料">
  4. <![CDATA[
  5. SELECT T.MATERIAL_NO,
  6. T.MATERIAL_NAME,
  7. T1.STORAGE_NO,
  8. (SELECT T2.STORAGE_NAME
  9. FROM YDM_BS_STORAGE T2
  10. WHERE T2.STORAGE_NO = T1.STORAGE_NO) STORAGE_NAME,
  11. T.VRP_PRO_ORDER_ID PRO_PLAN_ID,
  12. T.VRP_GX_PLAN_NO GX_PLAN_NO,
  13. T.VRP_HEAT_PLAN_NO HEAT_PLAN_NO,
  14. T.JUDGE_STOVE_NO,
  15. T.BATCH_NO,
  16. T.BATCH_GROUD_NO,
  17. T.GRADECODE,
  18. T.GRADENAME,
  19. T.ACT_DIMATER,
  20. T.ACT_HEIGHT,
  21. T.ACT_LEN,
  22. T.ACT_LEN_MIN,
  23. T.ACT_LEN_MAX,
  24. SUM(T.ACT_COUNT) ACT_COUNT,
  25. SUM(T.ACT_WEIGHT) ACT_WEIGHT,
  26. (SELECT I.BASENAME FROM COM_BASE_INFO I WHERE I.BASECODE=T.PRODUCT_FLAG) PRODUCT_FLAG,
  27. (SELECT I.BASENAME FROM COM_BASE_INFO I WHERE I.BASECODE=T.MAT_STATUS) MAT_STATUS
  28. FROM MAT_ZC_M T, YDM_ZC_BUTTRESS T1
  29. WHERE T.MAT_NO = T1.MAT_NO
  30. AND T.MATERIAL_NO = ?
  31. and t.PRODUCT_FLAG = '801401'
  32. and t.MAT_STATUS in ('80150102', '80150103')
  33. GROUP BY T.MATERIAL_NO,
  34. T.MATERIAL_NAME,
  35. T1.STORAGE_NO,
  36. T.JUDGE_STOVE_NO,
  37. T.BATCH_NO,
  38. T.BATCH_GROUD_NO,
  39. T.GRADECODE,
  40. T.GRADENAME,
  41. T.ACT_DIMATER,
  42. T.ACT_HEIGHT,
  43. T.ACT_LEN,
  44. T.ACT_LEN_MIN,
  45. T.ACT_LEN_MAX,
  46. T.MAT_STATUS,
  47. T.PRODUCT_FLAG,
  48. T.VRP_HEAT_PLAN_NO,
  49. T.VRP_PRO_ORDER_ID,
  50. T.VRP_GX_PLAN_NO
  51. ORDER BY T.JUDGE_STOVE_NO, T.BATCH_NO, T.BATCH_GROUD_NO
  52. ]]>
  53. </query>
  54. <query id="FrmMaterialChoose.getMatNoByJudgeLikuE" desc="通过炉批组号查询材料号">
  55. <![CDATA[
  56. SELECT T.MAT_NO,T.ACT_WEIGHT
  57. FROM MAT_ZC_M T, YDM_ZC_BUTTRESS T1
  58. WHERE T.MAT_NO = T1.MAT_NO
  59. AND T.MATERIAL_NO = ?
  60. AND T.PRODUCT_FLAG = '801401' ---在制品(及半成品)
  61. AND T.MAT_STATUS = '80150102' --材料产出(已判定)
  62. AND T.VRP_PRO_ORDER_ID IS NULL
  63. AND T.JUDGE_STOVE_NO = ?
  64. AND T.BATCH_NO = ?
  65. AND T.BATCH_GROUD_NO = ?
  66. ORDER BY T.MAT_NO
  67. ]]>
  68. </query>
  69. <query id="FrmMaterialChoose.getMatNoByJudgeMonomerE" desc="通过炉批组号查询材料号(脱单)">
  70. <![CDATA[
  71. SELECT T.MAT_NO,T.ACT_WEIGHT
  72. FROM MAT_ZC_M T, YDM_ZC_BUTTRESS T1
  73. WHERE T.MAT_NO = T1.MAT_NO
  74. AND T.MATERIAL_NO = ?
  75. AND T.PRODUCT_FLAG = '801401' ---在制品(及半成品)
  76. AND T.MAT_STATUS = '80150103' --材料产出(已判定)
  77. AND T.VRP_PRO_ORDER_ID IS NOT NULL
  78. AND T.JUDGE_STOVE_NO = ?
  79. AND T.BATCH_NO = ?
  80. AND T.BATCH_GROUD_NO = ?
  81. ORDER BY T.MAT_NO
  82. ]]>
  83. </query>
  84. <query id="FrmMaterialChoose.updateMatE" desc="修改镦拔扩库存数据">
  85. <![CDATA[
  86. UPDATE MAT_ZC_M T
  87. SET T.MAT_STATUS = ?,
  88. T.VRP_PRO_ORDER_ID = ?,
  89. T.VRP_GX_PLAN_NO = ?,
  90. T.VRP_HEAT_PLAN_NO = ?,
  91. T.VRP_PRO_ORDER_ID1 = T.VRP_PRO_ORDER_ID,
  92. T.VRP_GX_PLAN_NO1 = T.VRP_GX_PLAN_NO
  93. WHERE T.MAT_NO = ?
  94. ]]>
  95. </query>
  96. <query id="FrmMaterialChoose.getMaxHeatPlanNoD" desc="查询轧管最大炉号ID后四位">
  97. <![CDATA[
  98. SELECT TO_NUMBER(SUBSTR(NVL(MAX(T.HEAT_PLAN_NO), 'D000000000000'), 10, 4)) + 1 AS HEAT_PLAN_NO
  99. FROM PLN_ZY_ZG_M T
  100. WHERE SUBSTR(T.HEAT_PLAN_NO, 2, 8) = ?
  101. ]]>
  102. </query>
  103. <query id="FrmMaterialChoose.getMaxHeatPlanNoE" desc="查询镦拔扩最大炉号ID后四位">
  104. <![CDATA[
  105. SELECT TO_NUMBER(SUBSTR(NVL(MAX(T.HEAT_PLAN_NO), 'D000000000000'), 10, 4)) + 1 AS HEAT_PLAN_NO
  106. FROM PLN_ZY_DBK_M T
  107. WHERE SUBSTR(T.HEAT_PLAN_NO, 2, 8) = ?
  108. ]]>
  109. </query>
  110. <query id="FrmMaterialChoose.getProdIndexE" desc="查询最大镦拔扩批次生产序号">
  111. <![CDATA[
  112. SELECT TO_NUMBER(NVL(MAX(T.PROD_INDEX), '0')) + 1 PROD_INDEX
  113. FROM PLN_ZY_DBK_M T
  114. WHERE T.ZY_BATCH_ID = ?
  115. ]]>
  116. </query>
  117. <query id="FrmMaterialChoose.addZyDbkReadyE" desc="新增镦拔扩虚拟炉计划">
  118. <![CDATA[
  119. INSERT INTO PLN_ZY_DBK_READY
  120. (PRO_PLAN_ID,
  121. GX_PLAN_NO,
  122. READY_PLAN_NO,
  123. ZY_BATCH_ID,
  124. PLINE_CODE,
  125. PLINE_NAME,
  126. ZG_HEAT_PLAN_NO,
  127. JUDGE_STOVE_NO,
  128. ORDER_SOURCE,
  129. ORD_LN_DLY_PK,
  130. ORDER_NO,
  131. ORDER_SEQ,
  132. DELIVERY_NO,
  133. REQ_BL_ID,
  134. OUTWL_ID,
  135. OUTWL_DESC,
  136. ALLOT_NUM,
  137. ALLOT_WT,
  138. IF_MATCH_ODD,
  139. IF_DO_HEAT_PLAN,
  140. CREATE_TIME,
  141. REAL_ALLOT_NUM,
  142. REAL_ALLOT_WT,
  143. REAL_STOVE_NO,
  144. CRAFT_FILE_NO,
  145. CRAFT_SEQ,
  146. SEC_CRAFT_FILE_NO,
  147. OUT_JUDGE_STD)
  148. VALUES
  149. ('#PRO_PLAN_ID#',
  150. '#GX_PLAN_NO#',
  151. '#READY_PLAN_NO#',
  152. '#ZY_BATCH_ID#',
  153. '#PLINE_CODE#',
  154. '#PLINE_NAME#',
  155. '#ZG_HEAT_PLAN_NO#',
  156. '#JUDGE_STOVE_NO#',
  157. '#ORDER_SOURCE#',
  158. '#ORD_LN_DLY_PK#',
  159. '#ORDER_NO#',
  160. '#ORDER_SEQ#',
  161. '#DELIVERY_NO#',
  162. '#REQ_BL_ID#',
  163. '#OUTWL_ID#',
  164. '#OUTWL_DESC#',
  165. '#ALLOT_NUM#',
  166. '#ALLOT_WT#',
  167. '#IF_MATCH_ODD#',
  168. '#IF_DO_HEAT_PLAN#',
  169. SYSDATE,
  170. '#REAL_ALLOT_NUM#',
  171. '#REAL_ALLOT_WT#',
  172. '#REAL_STOVE_NO#',
  173. '#CRAFT_FILE_NO#',
  174. '#CRAFT_SEQ#',
  175. '#SEC_CRAFT_FILE_NO#',
  176. '#OUT_JUDGE_STD#')
  177. ]]>
  178. </query>
  179. <query id="FrmMaterialChoose.addZyDbkME" desc="新增镦拔扩实际计划">
  180. <![CDATA[
  181. INSERT INTO PLN_ZY_DBK_M(
  182. HEAT_PLAN_NO,
  183. ZY_BATCH_ID,
  184. PROD_INDEX,
  185. PRO_PLAN_ID,
  186. GX_PLAN_NO,
  187. READY_PLAN_NO,
  188. PLINE_CODE,
  189. PLINE_NAME,
  190. ZG_HEAT_PLAN_NO,
  191. HEATNO_LAST,
  192. ZG_BATCH_NO,
  193. BATCH_GROUD_NO,
  194. ISENDGX,
  195. ORDER_SOURCE,
  196. ORD_LN_DLY_PK,
  197. ORDER_NO,
  198. ORDER_SEQ,
  199. DELIVERY_NO,
  200. REQ_BL_ID,
  201. GRADECODE,
  202. GRADENAME,
  203. AIMOUTDIAMETER,
  204. AIMWALLTHICK,
  205. AIMLENGTH,
  206. OUTDIAMETER_IN,
  207. WALLTHICK_IN,
  208. LENGTH_IN,
  209. LENGTHMAX_IN,
  210. LENGTHMIN_IN,
  211. LEN_CUTHEAD,
  212. LEN_CUTEND,
  213. INWL_ID,
  214. INWL_DESC,
  215. IN_WT,
  216. IN_NUM,
  217. IF_WL_MATCHED,
  218. OUTWL_ID,
  219. OUTWL_DESC,
  220. IF_MONITOR_DBK,
  221. PRDCR_NO,
  222. MONITOR_POINT,
  223. CRAFT_FILE_NO,
  224. CRAFT_FILE_MAN,
  225. CRAFT_SEQ,
  226. SEC_CRAFT_FILE_NO,
  227. STATION_ROAD,
  228. PLANSTATUS,
  229. IN_WT_REAL,
  230. IN_NUM_REAL,
  231. OUT_WT_REAL,
  232. OUT_NUM_REAL,
  233. CREATE_NAME,
  234. CREATE_TIME,
  235. UPDATE_NAME,
  236. UPDATE_TIME,
  237. IN_JUDGE_STD)
  238. VALUES(
  239. '#HEAT_PLAN_NO#',
  240. '#ZY_BATCH_ID#',
  241. '#PROD_INDEX#',
  242. '#PRO_PLAN_ID#',
  243. '#GX_PLAN_NO#',
  244. '#READY_PLAN_NO#',
  245. '#PLINE_CODE#',
  246. '#PLINE_NAME#',
  247. '#ZG_HEAT_PLAN_NO#',
  248. '#HEATNO_LAST#',
  249. '#ZG_BATCH_NO#',
  250. '#BATCH_GROUD_NO#',
  251. '#ISENDGX#',
  252. '#ORDER_SOURCE#',
  253. '#ORD_LN_DLY_PK#',
  254. '#ORDER_NO#',
  255. '#ORDER_SEQ#',
  256. '#DELIVERY_NO#',
  257. '#REQ_BL_ID#',
  258. '#GRADECODE#',
  259. '#GRADENAME#',
  260. '#AIMOUTDIAMETER#',
  261. '#AIMWALLTHICK#',
  262. '#AIMLENGTH#',
  263. '#OUTDIAMETER_IN#',
  264. '#WALLTHICK_IN#',
  265. '#LENGTH_IN#',
  266. '#LENGTHMAX_IN#',
  267. '#LENGTHMIN_IN#',
  268. '#LEN_CUTHEAD#',
  269. '#LEN_CUTEND#',
  270. '#INWL_ID#',
  271. '#INWL_DESC#',
  272. '#IN_WT#',
  273. '#IN_NUM#',
  274. '#IF_WL_MATCHED#',
  275. '#OUTWL_ID#',
  276. '#OUTWL_DESC#',
  277. '#IF_MONITOR_DBK#',
  278. '#PRDCR_NO#',
  279. '#MONITOR_POINT#',
  280. '#CRAFT_FILE_NO#',
  281. '#CRAFT_FILE_MAN#',
  282. '#CRAFT_SEQ#',
  283. '#SEC_CRAFT_FILE_NO#',
  284. '#STATION_ROAD#',
  285. '#PLANSTATUS#',
  286. '#IN_WT_REAL#',
  287. '#IN_NUM_REAL#',
  288. '#OUT_WT_REAL#',
  289. '#OUT_NUM_REAL#',
  290. '#CREATE_NAME#',
  291. SYSDATE,
  292. '#UPDATE_NAME#',
  293. NULL,
  294. '#IN_JUDGE_STD#')
  295. ]]>
  296. </query>
  297. <query id="FrmMaterialChoose.updatePlanDataE" desc="修改镦拔扩排产加投与实际挂量数据">
  298. <![CDATA[
  299. UPDATE PLN_ORDER_DBK_S T
  300. SET T.MATCH_NUM_IN = TO_NUMBER(NVL(T.MATCH_NUM_IN, '0')) + TO_NUMBER(?),
  301. T.MATCH_WT_IN = TO_NUMBER(NVL(T.MATCH_WT_IN, '0')) + TO_NUMBER(?),
  302. T.REAL_BATCH_NUM = TO_NUMBER(NVL(T.REAL_BATCH_NUM, '0')) +
  303. TO_NUMBER(?),
  304. T.REAL_BATCH_WT = TO_NUMBER(NVL(T.REAL_BATCH_WT, '0')) +
  305. TO_NUMBER(?),
  306. T.BATCHED_NUM = TO_NUMBER(NVL(T.BATCHED_NUM, '0')) + TO_NUMBER(?),
  307. T.BATCHED_WT = TO_NUMBER(NVL(T.BATCHED_WT, '0')) + TO_NUMBER(?)
  308. WHERE T.PRO_PLAN_ID = ?
  309. AND T.GX_PLAN_NO = ?
  310. ]]>
  311. </query>
  312. <query id="FrmMaterialChoose.deleteDbkMByHeatPlanNo" desc="通过炉计划ID删除实际炉计划">
  313. <![CDATA[
  314. DELETE FROM PLN_ZY_DBK_M T WHERE T.HEAT_PLAN_NO=?
  315. ]]>
  316. </query>
  317. <query id="FrmMaterialChoose.deleteReadyById" desc="删除虚拟炉计划">
  318. <![CDATA[
  319. DELETE FROM PLN_ZY_DBK_READY T
  320. WHERE T.PRO_PLAN_ID = ?
  321. AND T.GX_PLAN_NO = ?
  322. AND T.READY_PLAN_NO = ?
  323. ]]>
  324. </query>
  325. <query id="FrmMaterialChoose.queryDbkMByHeatPlanNo" desc="查询实际炉计划数据">
  326. <![CDATA[
  327. SELECT T1.PRO_PLAN_ID, T1.GX_PLAN_NO, T1.READY_PLAN_NO, T1.HEAT_PLAN_NO
  328. FROM PLN_ZY_DBK_M T1, PLN_ZY_DBK_M T2
  329. WHERE T1.PRO_PLAN_ID = T2.PRO_PLAN_ID
  330. AND T1.GX_PLAN_NO = T2.GX_PLAN_NO
  331. AND T1.READY_PLAN_NO = T2.READY_PLAN_NO
  332. AND T1.HEAT_PLAN_NO = ?
  333. ]]>
  334. </query>
  335. <query id="FrmMaterialChoose.getMaxReadyPlanNo" desc="查询最大预排序号">
  336. <![CDATA[
  337. SELECT NVL(MAX(TO_NUMBER(T.READY_PLAN_NO)),0) READY_PLAN_NO FROM PLN_ZY_DBK_READY T WHERE T.PRO_PLAN_ID=?
  338. ]]>
  339. </query>
  340. <query id="FrmMaterialChoose.updateReadyNum" desc="修改虚拟炉计划量">
  341. <![CDATA[
  342. UPDATE PLN_ZY_DBK_READY T
  343. SET T.REAL_ALLOT_NUM = T.REAL_ALLOT_NUM - TO_NUMBER(?),
  344. T.REAL_ALLOT_WT = T.REAL_ALLOT_WT - TO_NUMBER(?)
  345. WHERE T.PRO_PLAN_ID = ?
  346. AND T.GX_PLAN_NO = ?
  347. AND T.READY_PLAN_NO = ?
  348. ]]>
  349. </query>
  350. </queryMap>