FrmRunTimeRptZgNew.xml 22 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514
  1. <?xml version="1.0" encoding="UTF-8"?>
  2. <queryMap desc = "轧管结转">
  3. <query id = "FrmRunTimeRptZgNew.getOriginalLastB" desc = "查询期初数据">
  4. SELECT T.JUDGE_STOVE_NO,
  5. T.PLINE_NAME,
  6. SUM(NVL(T.ACT_COUNT, 0)) COUNT,
  7. SUM(NVL(T.ACT_WEIGHT, 0)) WEIGHT
  8. FROM YDM_ZC_INITIAL_ZG T
  9. WHERE 1 = 1
  10. AND T.BAL_YEAR_MONTH = ?
  11. </query>
  12. <query id = "FrmRunTimeRptZgNew.getThisInB" desc = "查询入库">
  13. select t.JUDGE_STOVE_NO,
  14. nvl((case
  15. when t.BAL_YEAR_MONTH = ? then
  16. nvl(t.count, 0)
  17. end),
  18. 0) weight_monthcount,
  19. nvl((case
  20. when t.BAL_YEAR_MONTH = ? then
  21. nvl(t.weight, 0)
  22. end),
  23. 0) weight_month,
  24. t.PLINE_NAME
  25. from (SELECT REGEXP_REPLACE(T.JUDGE_STOVE_NO, '-.*', '') JUDGE_STOVE_NO,
  26. (CEIL(T.ACT_COUNT / S.SAW_NUM)) AS count,
  27. t.weight,
  28. t.BAL_YEAR_MONTH,
  29. t.PLINE_NAME
  30. FROM (SELECT T1.JUDGE_STOVE_NO,
  31. T1.BAL_YEAR_MONTH,
  32. (CASE
  33. WHEN T1.PLINE_CODE = 'C008' THEN
  34. '250机组'
  35. WHEN T1.PLINE_CODE = 'C009' THEN
  36. '258机组'
  37. WHEN T1.PLINE_CODE = 'C010' THEN
  38. '168机组'
  39. WHEN T1.PLINE_CODE = 'C017' THEN
  40. '460机组'
  41. WHEN T1.PLINE_CODE = 'C072' THEN
  42. '天淮508机组'
  43. END) PLINE_NAME,
  44. SUM(T1.ACT_COUNT) ACT_COUNT,
  45. SUM(T1.INPUT_WEIGHT) weight
  46. FROM PORT_MIL_BATCH_SAMPLE_RESULT T1
  47. WHERE T1.JUDGE_STOVE_NO =
  48. REGEXP_REPLACE(T1.JUDGE_STOVE_NO, '-.*', '') || '-01'
  49. --AND T1.GROUP_FLAG = '0'
  50. AND T1.BAL_YEAR_MONTH = ? #PLINE_CODE#
  51. GROUP BY T1.JUDGE_STOVE_NO, T1.BAL_YEAR_MONTH, T1.PLINE_CODE) T,
  52. MIL_PLAN S
  53. WHERE T.JUDGE_STOVE_NO = S.JUDGE_STOVE_NO
  54. AND S.BACK_PLAN_FLAG = '0'
  55. AND S.BACK_SLAB_FLAG = '0') t
  56. </query>
  57. <query id = "FrmRunTimeRptZgNew.getThisOutB" desc = "查询出库">
  58. <![CDATA[
  59. select t.JUDGE_STOVE_NO,
  60. nvl((case
  61. when t.BAL_YEAR_MONTH = ? then
  62. nvl(t.count, 0)
  63. end),
  64. 0) weight_monthcount,
  65. nvl((case
  66. when t.BAL_YEAR_MONTH = ? then
  67. nvl(t.weight, 0)
  68. end),
  69. 0) weight_month,
  70. t.PLINE_NAME
  71. from (SELECT JUDGE_STOVE_NO,
  72. BAL_YEAR_MONTH,
  73. PLINE_NAME,
  74. SUM(COUNT) COUNT,
  75. SUM(WEIGHT) WEIGHT
  76. FROM (SELECT T1.JUDGE_STOVE_NO,
  77. T1.BAL_YEAR_MONTH,
  78. (CASE
  79. WHEN T1.PLINE_CODE = 'C008' THEN
  80. '250机组'
  81. WHEN T1.PLINE_CODE = 'C009' THEN
  82. '258机组'
  83. WHEN T1.PLINE_CODE = 'C010' THEN
  84. '168机组'
  85. WHEN T1.PLINE_CODE = 'C017' THEN
  86. '460机组'
  87. WHEN T1.PLINE_CODE = 'C072' THEN
  88. '天淮508机组'
  89. END) PLINE_NAME,
  90. SUM(T1.OUTPUT_COUNT) AS COUNT,
  91. SUM(T1.OUTPUT_WEIGHT) AS WEIGHT
  92. FROM QCM_ZG_JUGDE_APPLY T1, MIL_PLAN S5
  93. WHERE T1.JUDGE_STOVE_NO || '-01' = S5.JUDGE_STOVE_NO
  94. AND S5.BACK_PLAN_FLAG = '0'
  95. AND S5.BACK_SLAB_FLAG = '0'
  96. AND T1.BAL_YEAR_MONTH = ?
  97. AND ((T1.VALIDFLAG = '20' AND
  98. T1.TARGET <> 'A' AND
  99. T1.JUDGE_RESULT_CODE IN
  100. ('40740701', '40740705', '40740709')) OR
  101. (T1.VALIDFLAG = '20' AND T1.TARGET = 'A' AND
  102. T1.JUDGE_TOLRESULT_CODE IN
  103. ('40740701', '40740705', '40740709')) OR
  104. (T1.VALIDFLAG = '20' AND T1.TARGET = 'A' AND
  105. T1.IS_ALL_SCRAP = '1') OR
  106. T1.INSTANCY_FLAG = '1')
  107. /*AND ((T1.VALIDFLAG = '20' AND
  108. T1.JUDGE_RESULT_CODE IN ('40740701', '40740706')) OR
  109. T1.INSTANCY_FLAG = '1' OR
  110. (T1.VALIDFLAG = '20' AND
  111. T1.IS_ALL_SCRAP IN ('1', '2')))*/
  112. AND T1.PLINE_CODE NOT IN ('C065', 'C066')
  113. AND T1.PROCESS_CODE = 'D'
  114. AND T1.IS_ALL_SCRAP <> '6'
  115. #PLINE_CODE#
  116. GROUP BY T1.JUDGE_STOVE_NO, T1.BAL_YEAR_MONTH, T1.PLINE_CODE
  117. UNION ALL
  118. SELECT REGEXP_REPLACE(F.JUDGE_STOVE_NO, '-.*', '') JUDGE_STOVE_NO,
  119. F.BAL_YEAR_MONTH,
  120. S1.PLINE_NAME,
  121. COUNT(1) COUNT,
  122. SUM(S1.INPUT_WEIGHT) WEIGHT
  123. FROM (SELECT COUNT(1) ACOUNT,
  124. T3.JUDGE_STOVE_NO,
  125. T3.NEW_HEAT_NO,
  126. T3.BAL_YEAR_MONTH
  127. FROM (SELECT G2.*, T1.BAL_YEAR_MONTH
  128. FROM MIL_SLAB_SCRAP G2, QCM_ZG_JUGDE_APPLY T1
  129. WHERE REGEXP_REPLACE(G2.NEW_HEAT_NO, '-.*', '') =
  130. T1.JUDGE_STOVE_NO
  131. AND (G2.REMARK <> '无' OR G2.REMARK IS NULL)
  132. AND ((T1.VALIDFLAG = '20' AND
  133. T1.JUDGE_RESULT_CODE IN
  134. ('40740701', '40740706')) OR
  135. T1.INSTANCY_FLAG = '1' OR
  136. (T1.VALIDFLAG = '20' AND
  137. T1.IS_ALL_SCRAP IN ('1', '2')))
  138. AND T1.IS_FLAG = '0'
  139. AND T1.BAL_YEAR_MONTH = ?
  140. AND T1.PROCESS_CODE = 'D' #PLINE_CODE#) T3
  141. WHERE T3.PROCESS_NO <= 6
  142. AND T3.NEW_HEAT_NO IS NOT NULL
  143. GROUP BY T3.JUDGE_STOVE_NO,
  144. T3.NEW_HEAT_NO,
  145. T3.BAL_YEAR_MONTH) F,
  146. (SELECT SUM(S.INPUT_WEIGHT) INPUT_WEIGHT,
  147. S.JUDGE_STOVE_NO,
  148. S.M_MAT_NO,
  149. (CASE
  150. WHEN S.PLINE_CODE = 'C008' THEN
  151. '250机组'
  152. WHEN S.PLINE_CODE = 'C009' THEN
  153. '258机组'
  154. WHEN S.PLINE_CODE = 'C010' THEN
  155. '168机组'
  156. WHEN S.PLINE_CODE = 'C017' THEN
  157. '460机组'
  158. WHEN S.PLINE_CODE = 'C072' THEN
  159. '天淮508机组'
  160. END) PLINE_NAME,
  161. ROW_NUMBER() OVER(PARTITION BY JUDGE_STOVE_NO ORDER BY JUDGE_STOVE_NO) RNUM
  162. FROM PORT_MIL_BATCH_SAMPLE_RESULT S
  163. WHERE
  164. --S.OP_PROCESS IN('2','3','4')
  165. --AND S.GROUP_FLAG = '1'
  166. --AND
  167. S.TR_FLAG = '0'
  168. GROUP BY S.M_MAT_NO, S.JUDGE_STOVE_NO, S.PLINE_CODE) S1
  169. WHERE F.JUDGE_STOVE_NO = S1.JUDGE_STOVE_NO
  170. AND RNUM <= F.ACOUNT
  171. GROUP BY F.JUDGE_STOVE_NO, F.BAL_YEAR_MONTH, S1.PLINE_NAME
  172. UNION ALL
  173. SELECT REGEXP_REPLACE(S.JUDGE_STOVE_NO, '-.*', '') JUDGE_STOVE_NO,
  174. T.BAL_YEAR_MONTH,
  175. S.PLINE_NAME,
  176. COUNT(1) COUNT,
  177. SUM(S.INPUT_WEIGHT) WEIGHT
  178. FROM (SELECT G1.*, T1.BAL_YEAR_MONTH
  179. FROM MIL_FURNACES_RESLUT_DETIA G1,
  180. QCM_ZG_JUGDE_APPLY T1
  181. WHERE REGEXP_REPLACE(G1.ZP_JUDGE_STOVE_NO, '-.*', '') =
  182. T1.JUDGE_STOVE_NO
  183. AND (G1.REMARK <> '无' OR G1.REMARK IS NULL)
  184. AND ((T1.VALIDFLAG = '20' AND
  185. T1.JUDGE_RESULT_CODE IN
  186. ('40740701', '40740706')) OR
  187. T1.INSTANCY_FLAG = '1' OR
  188. (T1.VALIDFLAG = '20' AND
  189. T1.IS_ALL_SCRAP IN ('1', '2')))
  190. AND T1.IS_FLAG = '0'
  191. AND T1.BAL_YEAR_MONTH = ?
  192. AND T1.PROCESS_CODE = 'D' #PLINE_CODE#) T,
  193. (SELECT SUM(S1.INPUT_WEIGHT) INPUT_WEIGHT,
  194. S1.M_MAT_NO,
  195. S1.JUDGE_STOVE_NO,
  196. (CASE
  197. WHEN S1.PLINE_CODE = 'C008' THEN
  198. '250机组'
  199. WHEN S1.PLINE_CODE = 'C009' THEN
  200. '258机组'
  201. WHEN S1.PLINE_CODE = 'C010' THEN
  202. '168机组'
  203. WHEN S1.PLINE_CODE = 'C017' THEN
  204. '460机组'
  205. WHEN S1.PLINE_CODE = 'C072' THEN
  206. '天淮508机组'
  207. END) PLINE_NAME,
  208. ROW_NUMBER() OVER(PARTITION BY JUDGE_STOVE_NO ORDER BY JUDGE_STOVE_NO) RNUM
  209. FROM PORT_MIL_BATCH_SAMPLE_RESULT S1
  210. WHERE
  211. --S1.OP_PROCESS = '5'
  212. --AND S1.GROUP_FLAG = '1'
  213. --AND
  214. S1.TR_FLAG = '0'
  215. GROUP BY S1.JUDGE_STOVE_NO,
  216. S1.M_MAT_NO,
  217. S1.PLINE_CODE) S
  218. WHERE T.JUDGE_STOVE_NO = S.JUDGE_STOVE_NO
  219. AND RNUM <= T.GROUP_NUM
  220. GROUP BY S.JUDGE_STOVE_NO, S.PLINE_NAME, T.BAL_YEAR_MONTH
  221. UNION ALL
  222. SELECT REGEXP_REPLACE(T8.JUDGE_STOVE_NO, '-.*', '') JUDGE_STOVE_NO,
  223. T7.BAL_YEAR_MONTH,
  224. T8.PLINE_NAME,
  225. COUNT(1) COUNT,
  226. SUM(INPUT_WEIGHT) WEIGHT
  227. FROM (SELECT T.OLD_ZP_JUDGE_STOVE_NO,
  228. CEIL(SUM(T.ZP_COUNT) / S.SAW_NUM) AS RN,
  229. T1.BAL_YEAR_MONTH
  230. FROM MIL_OFFLINE_GROUP T,
  231. MIL_PLAN S,
  232. QCM_ZG_JUGDE_APPLY T1
  233. WHERE T.Old_Zp_Judge_Stove_No = S.JUDGE_STOVE_NO
  234. AND REGEXP_REPLACE(T.ZP_JUDGE_STOVE_NO, '-.*', '') =
  235. T1.Judge_Stove_No
  236. AND (T.REMARK <> '无' OR T.REMARK IS NULL)
  237. AND ((T1.VALIDFLAG = '20' AND
  238. T1.JUDGE_RESULT_CODE IN
  239. ('40740701', '40740706')) OR
  240. T1.INSTANCY_FLAG = '1' OR
  241. (T1.VALIDFLAG = '20' AND
  242. T1.IS_ALL_SCRAP IN ('1', '2')))
  243. AND T1.IS_FLAG = '0'
  244. AND T1.BAL_YEAR_MONTH = ?
  245. AND T1.PROCESS_CODE = 'D' #PLINE_CODE#
  246. GROUP BY T.OLD_ZP_JUDGE_STOVE_NO,
  247. S.SAW_NUM,
  248. T1.BAL_YEAR_MONTH) T7,
  249. (SELECT SUM(S2.INPUT_WEIGHT) INPUT_WEIGHT,
  250. S2.JUDGE_STOVE_NO,
  251. S2.M_MAT_NO,
  252. (CASE
  253. WHEN S2.PLINE_CODE = 'C008' THEN
  254. '250机组'
  255. WHEN S2.PLINE_CODE = 'C009' THEN
  256. '258机组'
  257. WHEN S2.PLINE_CODE = 'C010' THEN
  258. '168机组'
  259. WHEN S2.PLINE_CODE = 'C017' THEN
  260. '460机组'
  261. WHEN S2.PLINE_CODE = 'C072' THEN
  262. '天淮508机组'
  263. END) PLINE_NAME,
  264. ROW_NUMBER() OVER(PARTITION BY JUDGE_STOVE_NO ORDER BY JUDGE_STOVE_NO) RNUM
  265. FROM PORT_MIL_BATCH_SAMPLE_RESULT S2
  266. WHERE
  267. --S2.OP_PROCESS IN('10','11')
  268. --AND S2.GROUP_FLAG = '1'
  269. S2.TR_FLAG = '0'
  270. GROUP BY S2.M_MAT_NO,
  271. S2.JUDGE_STOVE_NO,
  272. S2.PLINE_CODE) T8
  273. WHERE REGEXP_REPLACE(T7.OLD_ZP_JUDGE_STOVE_NO, '-.*', '') ||
  274. '-01' = T8.JUDGE_STOVE_NO
  275. AND RNUM <= RN
  276. GROUP BY T8.JUDGE_STOVE_NO, T7.BAL_YEAR_MONTH, T8.PLINE_NAME)
  277. GROUP BY JUDGE_STOVE_NO, BAL_YEAR_MONTH, PLINE_NAME) t
  278. ]]>
  279. </query>
  280. <!-- select t.JUDGE_STOVE_NO,
  281. nvl((case
  282. when t.BAL_YEAR_MONTH = ? then
  283. nvl(t.count, 0)
  284. end),
  285. 0) weight_monthcount,
  286. nvl((case
  287. when t.BAL_YEAR_MONTH = ? then
  288. nvl(t.weight, 0)
  289. end),
  290. 0) weight_month,
  291. t.PLINE_NAME
  292. from (
  293. SELECT T2.JUDGE_STOVE_NO,
  294. T2.BAL_YEAR_MONTH,
  295. T2.PLINE_NAME,
  296. (TO_NUMBER(T2.COUNT) + TO_NUMBER(NVL(T4.INPUT_COUNT, 0))+TO_NUMBER(NVL(T5.INPUT_COUNT,0))+TO_NUMBER(NVL(T6.INPUT_COUNT,0)))COUNT,
  297. (TO_NUMBER(T2.WEIGHT) + TO_NUMBER(NVL(T4.INPUT_WEIGHT, 0))+TO_NUMBER(NVL(T5.INPUT_WEIGHT,0))+TO_NUMBER(NVL(T6.INPUT_WEIGHT,0)))WEIGHT
  298. FROM (SELECT T1.JUDGE_STOVE_NO,
  299. T1.BAL_YEAR_MONTH,
  300. (CASE
  301. WHEN T1.PLINE_CODE = 'C008' THEN
  302. '250机组'
  303. WHEN T1.PLINE_CODE = 'C009' THEN
  304. '258机组'
  305. WHEN T1.PLINE_CODE = 'C010' THEN
  306. '168机组'
  307. WHEN T1.PLINE_CODE = 'C017' THEN
  308. '460机组'
  309. END) PLINE_NAME,
  310. SUM(T1.OUTPUT_COUNT) AS COUNT,
  311. SUM(T1.OUTPUT_WEIGHT) AS WEIGHT
  312. FROM QCM_ZG_JUGDE_APPLY T1, MIL_PLAN S5
  313. WHERE T1.JUDGE_STOVE_NO || '-01' = S5.JUDGE_STOVE_NO
  314. AND S5.BACK_PLAN_FLAG = '0'
  315. AND S5.BACK_SLAB_FLAG = '0'
  316. AND T1.BAL_YEAR_MONTH = ?
  317. AND T1.VALIDFLAG = '20'
  318. AND T1.PLINE_CODE NOT IN ('C065', 'C066')
  319. GROUP BY T1.JUDGE_STOVE_NO, T1.BAL_YEAR_MONTH, T1.PLINE_CODE) T2
  320. LEFT JOIN (SELECT SUM(S1.INPUT_WEIGHT) INPUT_WEIGHT,
  321. COUNT(1) INPUT_COUNT,
  322. F.JUDGE_STOVE_NO,
  323. F.NEW_HEAT_NO
  324. FROM (SELECT COUNT(1) ACOUNT, T3.JUDGE_STOVE_NO, T3.NEW_HEAT_NO
  325. FROM (SELECT G2.*
  326. FROM MIL_SLAB_SCRAP G2, QCM_ZG_JUGDE_APPLY F2
  327. WHERE SUBSTR(G2.NEW_HEAT_NO, 0, 6) =
  328. F2.JUDGE_STOVE_NO
  329. AND F2.VALIDFLAG = '00'
  330. AND F2.IS_FLAG = '0') T3
  331. WHERE T3.PROCESS_NO <= 6
  332. AND T3.NEW_HEAT_NO IS NOT NULL
  333. GROUP BY T3.JUDGE_STOVE_NO, T3.NEW_HEAT_NO) F,
  334. (SELECT SUM(S.INPUT_WEIGHT) INPUT_WEIGHT,
  335. S.JUDGE_STOVE_NO,
  336. S.M_MAT_NO,
  337. ROW_NUMBER() OVER(PARTITION BY JUDGE_STOVE_NO ORDER BY JUDGE_STOVE_NO) RNUM
  338. FROM PORT_MIL_BATCH_SAMPLE_RESULT S
  339. WHERE S.TR_FLAG = '0'
  340. GROUP BY S.M_MAT_NO, S.JUDGE_STOVE_NO) S1
  341. WHERE F.JUDGE_STOVE_NO = S1.JUDGE_STOVE_NO
  342. AND RNUM <= F.ACOUNT
  343. GROUP BY F.JUDGE_STOVE_NO, F.NEW_HEAT_NO) T4 ON T2.JUDGE_STOVE_NO =SUBSTR(T4.JUDGE_STOVE_NO,0,6)
  344. LEFT JOIN (SELECT SUM(S.INPUT_WEIGHT) INPUT_WEIGHT,
  345. S.JUDGE_STOVE_NO,
  346. COUNT(1) INPUT_COUNT
  347. FROM (SELECT G1.*
  348. FROM MIL_FURNACES_RESLUT_DETIA G1,
  349. QCM_ZG_JUGDE_APPLY F1
  350. WHERE SUBSTR(G1.Zp_Judge_Stove_No, 0, 6) =
  351. F1.JUDGE_STOVE_NO
  352. AND F1.VALIDFLAG = '20'
  353. AND F1.IS_FLAG = '0') T,
  354. (SELECT SUM(S1.INPUT_WEIGHT) INPUT_WEIGHT,
  355. S1.M_MAT_NO,
  356. S1.JUDGE_STOVE_NO,
  357. ROW_NUMBER() OVER(PARTITION BY JUDGE_STOVE_NO ORDER BY JUDGE_STOVE_NO) RNUM
  358. FROM PORT_MIL_BATCH_SAMPLE_RESULT S1
  359. WHERE S1.TR_FLAG = '0'
  360. GROUP BY S1.JUDGE_STOVE_NO, S1.M_MAT_NO) S
  361. WHERE T.JUDGE_STOVE_NO = S.JUDGE_STOVE_NO
  362. AND RNUM <= T.GROUP_NUM
  363. GROUP BY S.JUDGE_STOVE_NO)T5 ON T2.JUDGE_STOVE_NO = SUBSTR(T5.JUDGE_STOVE_NO,0,6)
  364. LEFT JOIN (SELECT SUM(INPUT_WEIGHT) INPUT_WEIGHT,
  365. JUDGE_STOVE_NO,
  366. COUNT(1) INPUT_COUNT
  367. FROM (SELECT T.OLD_ZP_JUDGE_STOVE_NO,
  368. CEIL(T.ZP_COUNT / S.SAW_NUM) AS RN
  369. FROM MIL_OFFLINE_GROUP T, MIL_PLAN S,QCM_ZG_JUGDE_APPLY F
  370. WHERE T.Old_Zp_Judge_Stove_No = S.JUDGE_STOVE_NO
  371. AND SUBSTR(T.ZP_JUDGE_STOVE_NO,0,6) = F.Judge_Stove_No
  372. AND F.VALIDFLAG = '20'
  373. AND F.IS_FLAG = '0') T7,
  374. (SELECT SUM(S2.INPUT_WEIGHT) INPUT_WEIGHT,
  375. S2.JUDGE_STOVE_NO,
  376. S2.M_MAT_NO,
  377. ROW_NUMBER() OVER(PARTITION BY JUDGE_STOVE_NO ORDER BY JUDGE_STOVE_NO) RNUM
  378. FROM PORT_MIL_BATCH_SAMPLE_RESULT S2
  379. WHERE S2.TR_FLAG = '0'
  380. GROUP BY S2.M_MAT_NO, S2.JUDGE_STOVE_NO) T8
  381. WHERE SUBSTR(T7.OLD_ZP_JUDGE_STOVE_NO, 0, 6) || '-01' =
  382. T8.JUDGE_STOVE_NO
  383. AND RNUM <= RN
  384. GROUP BY JUDGE_STOVE_NO)T6 ON T2.JUDGE_STOVE_NO = SUBSTR(T6.JUDGE_STOVE_NO,0,6)
  385. )t
  386. -->
  387. <query id ="FrmRunTimeRptZgNew.SelectInitalBelog" desc ="查询计划基本信息">
  388. SELECT * FROM MIL_PLAN T WHERE REGEXP_REPLACE(T.JUDGE_STOVE_NO, '-.*', '') = ? AND ROWNUM = 1
  389. </query>
  390. <query id = "FrmRunTimeRptZgNew.insertInitalBelog" desc = "插入结转表">
  391. INSERT INTO YDM_ZC_INITIAL_ZG(
  392. JUDGE_STOVE_NO,
  393. PRODUCT_FLAG,
  394. MAT_STATUS,
  395. PRODUCCODE,
  396. PRODUCNAME,
  397. STEELCODE,
  398. STEELNAME,
  399. SPEC_CODE,
  400. SPEC_NAME,
  401. MODEL_CODE,
  402. MODEL_DESC,
  403. STD_CODE,
  404. STD_NAME,
  405. STD_STYLE,
  406. STD_STYLE_DESC,
  407. ACT_COUNT,
  408. ACT_WEIGHT,
  409. PRO_ORDER_NO,
  410. PRO_ORDER_ID,
  411. CREATE_NAME,
  412. CREATE_TIME,
  413. BAL_YEAR_MONTH,
  414. GRADECODE,
  415. GRADENAME,
  416. PLINE_CODE,
  417. PLINE_NAME,
  418. INSTOCK_TIME,
  419. BELONG_CODE,
  420. BELONG_NAME,
  421. LOT_NO,
  422. TUBE_TYPE,
  423. TUBE_SUORCE,
  424. PIPE_SECTION)
  425. VALUES(
  426. '#JUDGE_STOVE_NO#',
  427. '801401',
  428. '80150101',
  429. '#PRODUCCODE#',
  430. '#PRODUCNAME#',
  431. '#STEELCODE#',
  432. '#STEELNAME#',
  433. '#SPEC_CODE#',
  434. '#SPEC_NAME#',
  435. '#MODEL_CODE#',
  436. '#MODEL_DESC#',
  437. '#STD_CODE#',
  438. '#STD_NAME#',
  439. '#STD_STYLE#',
  440. '#STD_STYLE_DESC#',
  441. '#ACT_COUNT#',
  442. '#ACT_WEIGHT#',
  443. '#PRO_ORDER_NO#',
  444. '#PRO_ORDER_ID#',
  445. '#CREATE_NAME#',
  446. TO_DATE('#INSTOCK_TIME#','YYYY-MM-DD HH24:MI:SS'),
  447. '#BAL_YEAR_MONTH#',
  448. '#GRADECODE#',
  449. '#GRADENAME#',
  450. '#PLINE_CODE#',
  451. '#PLINE_NAME#',
  452. TO_DATE('#INSTOCK_TIME#','YYYY-MM-DD HH24:MI:SS'),
  453. '#BELONG_CODE#',
  454. '#BELONG_NAME#',
  455. '#LOT_NO#',
  456. '#TUBE_TYPE#',
  457. '#TUBE_SUORCE#',
  458. '#PIPE_SECTION#')
  459. </query>
  460. <query id = "FrmRunTimeRptZgNew.SelectInitalZg" desc = "查询期初基本信息">
  461. SELECT
  462. JUDGE_STOVE_NO,
  463. PRODUCCODE AS VARIETIES_CODE,
  464. PRODUCNAME AS VARIETIES,
  465. STEELCODE ,
  466. STEELNAME,
  467. SPEC_CODE AS PIPE_SIZE_CODE,
  468. SPEC_NAME AS PIPE_SIZE,
  469. MODEL_CODE AS BUCKLE_TYPE_CODE,
  470. MODEL_DESC AS BUCKLE_TYPE,
  471. STD_CODE AS ROLL_STANDRAD_CODE,
  472. STD_NAME AS ROLL_STANDRAD,
  473. STD_STYLE,
  474. STD_STYLE_DESC,
  475. PRO_ORDER_NO AS CONTRACT_NO,
  476. PRO_ORDER_ID AS PRO_PLAN_ID,
  477. GRADECODE,
  478. GRADENAME,
  479. PLINE_CODE,
  480. LOT_NO,
  481. TUBE_TYPE,
  482. TUBE_SUORCE,
  483. PIPE_SECTION
  484. FROM YDM_ZC_INITIAL_ZG T
  485. WHERE T.JUDGE_STOVE_NO = ?
  486. AND ROWNUM = 1
  487. </query>
  488. <query id = "FrmRunTimeRptZgNew.UpdateQcmStatus" desc = "对判定表进行封账状态修改">
  489. UPDATE QCM_ZG_JUGDE_APPLY T
  490. SET T.IS_CARRY_VOER = '1'
  491. WHERE T.BAL_YEAR_MONTH = ?
  492. AND T.VALIDFLAG = '20'
  493. AND T.IS_FLAG = '0'
  494. AND T.PROCESS_CODE = 'D'
  495. </query>
  496. <query id = "FrmRunTimeRptZgNew.UpdateQcmStatusBack" desc = "撤销对判定表当月判定记录封账">
  497. UPDATE QCM_ZG_JUGDE_APPLY T
  498. SET T.IS_CARRY_VOER = '0'
  499. WHERE T.BAL_YEAR_MONTH = ?
  500. AND T.VALIDFLAG = '20'
  501. AND T.IS_FLAG = '0'
  502. AND T.PROCESS_CODE = 'D'
  503. </query>
  504. <query id = "FrmRunTimeRptZgNew.deleteQcmStatus" desc = "删除结转数据">
  505. DELETE FROM YDM_ZC_INITIAL_ZG T WHERE T.BAL_YEAR_MONTH = ?
  506. </query>
  507. </queryMap>