FrmGpApplyDecision.xml 37 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188
  1. <?xml version="1.0" encoding="UTF-8"?>
  2. <queryMap desc = "管坯申请判定">
  3. <query id = "FrmGpApplyDecision.doQueryMat" desc = "查询材料信息">
  4. SELECT T.STOVE_NO,
  5. T.JUDGE_STOVE_NO,
  6. T.MATERIAL_NO,
  7. T.MATERIAL_NAME,
  8. T.GRADECODE,
  9. T.GRADENAME,
  10. T.STD_CODE,
  11. T.STD_NAME,
  12. T.PLINE_CODE,
  13. T.PLINE_NAME,
  14. T.DIMATER,
  15. T.HEIGHT,
  16. T.FIX_LEN,
  17. SUM(T.ACT_COUNT) ACT_COUNT,
  18. SUM(T.ACT_WEIGHT) ACT_WEIGHT,
  19. SUM(CASE
  20. WHEN T.PONDER_GROSS_WT > 0 THEN
  21. 1
  22. ELSE
  23. 0
  24. END) PONDER_GROSS_COUNT,
  25. SUM(T.PONDER_GROSS_WT) PONDER_GROSS_WT,
  26. T.BELONG_CODE,
  27. T.BELONG_NAME,
  28. DECODE(T.GPTYPE, '1', '铸坯', '2', '锻坯') GPTYPE,
  29. T.FURNACENO,
  30. T.LG_CRAFT_NO
  31. FROM MAT_GP_M T
  32. WHERE T.QCM_STAUS = '00'
  33. AND T.MAT_STATUS = '80150101'
  34. AND T.MNG_LOCK_FLAG = '0'
  35. </query>
  36. <query id = "FrmGpApplyDecision.doQueryLocationNo" desc = "天淮室外管坯库,508投料库 不排计划料位 不能送判">
  37. SELECT COUNT(1) ACOUNT
  38. FROM MAT_GP_M T, YDM_GP_BUTTRESS T1
  39. WHERE T.QCM_STAUS = '00'
  40. AND T.MAT_STATUS = '80150101'
  41. AND T.MNG_LOCK_FLAG = '0'
  42. AND T.MAT_NO = T1.MAT_NO
  43. AND T.STOVE_NO = ?
  44. AND (T1.STORAGE_NO = 'LSG1' OR
  45. (T1.STORAGE_NO = 'TTH1' AND T1.LOCATION_NAME LIKE '不排计划%'))
  46. </query>
  47. <query id = "FrmGpApplyDecision.doQueryMatWG" desc = "查询材料信息">
  48. SELECT T.STOVE_NO,
  49. T.JUDGE_STOVE_NO,
  50. T.MATERIAL_NO,
  51. T.MATERIAL_NAME,
  52. T.GRADECODE,
  53. T.GRADENAME,
  54. T.SOURE_NAME,
  55. T.STD_CODE,
  56. T.STD_NAME,
  57. T.PLINE_CODE,
  58. T.PLINE_NAME,
  59. T.DIMATER,
  60. T.HEIGHT,
  61. T.FIX_LEN,
  62. SUM(T.ACT_COUNT) ACT_COUNT,
  63. SUM(T.ACT_WEIGHT) ACT_WEIGHT,
  64. SUM(CASE
  65. WHEN T.PONDER_GROSS_WT > 0 THEN
  66. 1
  67. ELSE
  68. 0
  69. END) PONDER_GROSS_COUNT,
  70. SUM(T.PONDER_GROSS_WT) PONDER_GROSS_WT,
  71. T.BELONG_CODE,
  72. T.BELONG_NAME,
  73. DECODE(T.GPTYPE, '1', '铸坯', '2', '锻坯') GPTYPE,
  74. T.LG_CRAFT_NO
  75. FROM MAT_GP_M T
  76. WHERE T.QCM_STAUS = '00'
  77. AND T.MAT_STATUS = '80150101'
  78. AND T.MNG_LOCK_FLAG = '0'
  79. </query>
  80. <query id = "FrmGpApplyDecision.doQueryMatData" desc = "查询详细炉组信息">
  81. SELECT T1.STOVE_NO,
  82. T1.JUDGE_STOVE_NO,
  83. T1.MATERIAL_NO,
  84. T1.MATERIAL_NAME,
  85. T1.GRADECODE,
  86. T1.GRADENAME,
  87. T1.STD_CODE,
  88. T1.STD_NAME,
  89. T1.PRO_ORDER_NO,
  90. T1.PLINE_CODE,
  91. T1.PLINE_NAME,
  92. T1.DIMATER,
  93. T1.HEIGHT,
  94. T1.FIX_LEN,
  95. T1.BELONG_CODE,
  96. T1.BELONG_NAME,
  97. T1.JUGDE_APPLY_CODE,
  98. T1.ACT_COUNT,
  99. T1.ACT_WEIGHT,
  100. T1.PONDER_GROSS_COUNT,
  101. T1.PONDER_GROSS_WT,
  102. T1.FURNACENO,
  103. T1.SEQUENCENO,
  104. T1.LG_CRAFT_NO,
  105. DECODE(T4.APPLY_FLAG, '0', '正常送判', '1', '退判', '未送判') APPLY_FLAG,
  106. T4.JUGDE_APPLY_SQE,
  107. T4.BACK_JUGDE_MEMO,
  108. T4.JUGDE_APPLY_CODE,
  109. T4.AUDIT_RESULT,
  110. T4.AUDIT_MEMO,
  111. T4.AUDIT_RESULT2,
  112. T4.AUDIT_MEMO2
  113. FROM (SELECT T.STOVE_NO,
  114. T.JUDGE_STOVE_NO,
  115. T.MATERIAL_NO,
  116. T.MATERIAL_NAME,
  117. T.GRADECODE,
  118. T.GRADENAME,
  119. T.STD_CODE,
  120. T.STD_NAME,
  121. T.PRO_ORDER_NO,
  122. T.PLINE_CODE,
  123. T.PLINE_NAME,
  124. T.DIMATER,
  125. T.HEIGHT,
  126. T.FIX_LEN,
  127. T.BELONG_CODE,
  128. T.BELONG_NAME,
  129. T.JUGDE_APPLY_CODE,
  130. T.FURNACENO,
  131. T.SEQUENCENO,
  132. T.LG_CRAFT_NO,
  133. SUM(T.ACT_COUNT) ACT_COUNT,
  134. SUM(T.ACT_WEIGHT) ACT_WEIGHT,
  135. SUM(CASE
  136. WHEN T.PONDER_GROSS_WT > 0 THEN
  137. 1
  138. ELSE
  139. 0
  140. END) PONDER_GROSS_COUNT,
  141. SUM(T.PONDER_GROSS_WT) PONDER_GROSS_WT
  142. FROM MAT_GP_M T
  143. WHERE T.STOVE_NO = ?
  144. AND T.JUDGE_STOVE_NO = ?
  145. AND NVL(T.FURNACENO, '/') = NVL(?, '/')
  146. AND T.FIX_LEN = ?
  147. #JUGDE_APPLY_CODE#
  148. AND T.QCM_STAUS = '00'
  149. AND T.MAT_STATUS = '80150101'
  150. AND T.MNG_LOCK_FLAG = '0'
  151. GROUP BY T.STOVE_NO,
  152. T.JUDGE_STOVE_NO,
  153. T.FURNACENO,
  154. T.SEQUENCENO,
  155. T.MATERIAL_NO,
  156. T.MATERIAL_NAME,
  157. T.GRADECODE,
  158. T.GRADENAME,
  159. T.STD_CODE,
  160. T.STD_NAME,
  161. T.PRO_ORDER_NO,
  162. T.PLINE_CODE,
  163. T.PLINE_NAME,
  164. T.DIMATER,
  165. T.HEIGHT,
  166. T.FIX_LEN,
  167. T.BELONG_CODE,
  168. T.BELONG_NAME,
  169. T.PRINT_STOVE_NO,
  170. T.LG_CRAFT_NO,
  171. T.JUGDE_APPLY_CODE) T1
  172. LEFT JOIN (SELECT T3.JUGDE_APPLY_CODE,
  173. T3.APPLY_FLAG,
  174. T3.BACK_JUGDE_MEMO,
  175. T3.JUGDE_APPLY_SQE,
  176. (SELECT S.BASENAME
  177. FROM COM_BASE_INFO S
  178. WHERE S.BASECODE = T3.AUDIT_RESULT) AUDIT_RESULT,
  179. T3.AUDIT_MEMO,
  180. (SELECT S1.BASENAME
  181. FROM COM_BASE_INFO S1
  182. WHERE S1.BASECODE = T3.AUDIT_RESULT2) AUDIT_RESULT2,
  183. T3.AUDIT_MEMO2
  184. FROM QCM_GP_JUDGE_APPLY T3
  185. WHERE T3.IS_FLAG = '0'
  186. GROUP BY T3.JUGDE_APPLY_CODE,
  187. T3.APPLY_FLAG,
  188. T3.JUGDE_APPLY_SQE,
  189. T3.BACK_JUGDE_MEMO,
  190. T3.AUDIT_RESULT,
  191. T3.AUDIT_MEMO,
  192. T3.AUDIT_RESULT2,
  193. T3.AUDIT_MEMO2) T4
  194. ON T1.JUGDE_APPLY_CODE = T4.JUGDE_APPLY_CODE || T4.JUGDE_APPLY_SQE
  195. </query>
  196. <query id = "FrmGpApplyDecision.doQueryMatDataWG" desc = "查询详细炉组信息">
  197. SELECT T1.STOVE_NO,
  198. T1.JUDGE_STOVE_NO,
  199. T1.MATERIAL_NO,
  200. T1.MATERIAL_NAME,
  201. T1.GRADECODE,
  202. T1.GRADENAME,
  203. T1.STD_CODE,
  204. T1.STD_NAME,
  205. T1.PRO_ORDER_NO,
  206. T1.PLINE_CODE,
  207. T1.PLINE_NAME,
  208. T1.DIMATER,
  209. T1.HEIGHT,
  210. T1.FIX_LEN,
  211. T1.BELONG_CODE,
  212. T1.BELONG_NAME,
  213. T1.JUGDE_APPLY_CODE,
  214. T1.ACT_COUNT,
  215. T1.ACT_WEIGHT,
  216. T1.PONDER_GROSS_COUNT,
  217. T1.PONDER_GROSS_WT,
  218. T1.LG_CRAFT_NO,
  219. DECODE(T4.APPLY_FLAG, '0', '正常送判', '1', '退判', '未送判') APPLY_FLAG,
  220. T4.JUGDE_APPLY_SQE,
  221. T4.BACK_JUGDE_MEMO,
  222. T4.JUGDE_APPLY_CODE,
  223. T4.AUDIT_RESULT,
  224. T4.AUDIT_MEMO,
  225. T4.AUDIT_RESULT2,
  226. T4.AUDIT_MEMO2
  227. FROM (SELECT T.STOVE_NO,
  228. T.JUDGE_STOVE_NO,
  229. T.MATERIAL_NO,
  230. T.MATERIAL_NAME,
  231. T.GRADECODE,
  232. T.GRADENAME,
  233. T.STD_CODE,
  234. T.STD_NAME,
  235. T.PRO_ORDER_NO,
  236. T.PLINE_CODE,
  237. T.PLINE_NAME,
  238. T.DIMATER,
  239. T.HEIGHT,
  240. T.FIX_LEN,
  241. T.BELONG_CODE,
  242. T.BELONG_NAME,
  243. T.JUGDE_APPLY_CODE,
  244. T.LG_CRAFT_NO,
  245. SUM(T.ACT_COUNT) ACT_COUNT,
  246. SUM(T.ACT_WEIGHT) ACT_WEIGHT,
  247. SUM(CASE
  248. WHEN T.PONDER_GROSS_WT > 0 THEN
  249. 1
  250. ELSE
  251. 0
  252. END) PONDER_GROSS_COUNT,
  253. SUM(T.PONDER_GROSS_WT) PONDER_GROSS_WT
  254. FROM MAT_GP_M T
  255. WHERE T.STOVE_NO = ?
  256. AND NVL(T.JUDGE_STOVE_NO,'/') = NVL(?,'/')
  257. AND T.FIX_LEN = ?
  258. AND T.QCM_STAUS = '00'
  259. AND T.MAT_STATUS = '80150101'
  260. AND T.MNG_LOCK_FLAG = '0'
  261. GROUP BY T.STOVE_NO,
  262. T.JUDGE_STOVE_NO,
  263. T.MATERIAL_NO,
  264. T.MATERIAL_NAME,
  265. T.GRADECODE,
  266. T.GRADENAME,
  267. T.STD_CODE,
  268. T.STD_NAME,
  269. T.PRO_ORDER_NO,
  270. T.PLINE_CODE,
  271. T.PLINE_NAME,
  272. T.DIMATER,
  273. T.HEIGHT,
  274. T.FIX_LEN,
  275. T.BELONG_CODE,
  276. T.BELONG_NAME,
  277. T.PRINT_STOVE_NO,
  278. T.LG_CRAFT_NO,
  279. T.JUGDE_APPLY_CODE) T1
  280. LEFT JOIN (SELECT T3.JUGDE_APPLY_CODE,
  281. T3.APPLY_FLAG,
  282. T3.BACK_JUGDE_MEMO,
  283. T3.JUGDE_APPLY_SQE,
  284. (SELECT S.BASENAME
  285. FROM COM_BASE_INFO S
  286. WHERE S.BASECODE = T3.AUDIT_RESULT) AUDIT_RESULT,
  287. T3.AUDIT_MEMO,
  288. (SELECT S1.BASENAME
  289. FROM COM_BASE_INFO S1
  290. WHERE S1.BASECODE = T3.AUDIT_RESULT2) AUDIT_RESULT2,
  291. T3.AUDIT_MEMO2
  292. FROM QCM_GP_JUDGE_APPLY T3
  293. WHERE T3.IS_FLAG = '0'
  294. GROUP BY T3.JUGDE_APPLY_CODE,
  295. T3.APPLY_FLAG,
  296. T3.JUGDE_APPLY_SQE,
  297. T3.BACK_JUGDE_MEMO,
  298. T3.AUDIT_RESULT,
  299. T3.AUDIT_MEMO,
  300. T3.AUDIT_RESULT2,
  301. T3.AUDIT_MEMO2) T4
  302. ON T1.JUGDE_APPLY_CODE = T4.JUGDE_APPLY_CODE || T4.JUGDE_APPLY_SQE
  303. </query>
  304. <query id = "FrmGpApplyDecision.doQueryMatDataFixNum" desc = "查询判定炉号下详细信息">
  305. SELECT T1.STOVE_NO,
  306. T1.JUDGE_STOVE_NO,
  307. T1.MATERIAL_NO,
  308. T1.MATERIAL_NAME,
  309. T1.GRADECODE,
  310. T1.GRADENAME,
  311. T1.STD_CODE,
  312. T1.STD_NAME,
  313. T1.PRO_ORDER_NO,
  314. T1.PLINE_CODE,
  315. T1.PLINE_NAME,
  316. T1.DIMATER,
  317. T1.HEIGHT,
  318. T1.FIX_LEN,
  319. T1.FIX_NUM,
  320. T1.GROUD_NO,
  321. T1.BELONG_CODE,
  322. T1.BELONG_NAME,
  323. T1.PRO_PLAN_ID,
  324. T1.GX_PLAN_NO,
  325. T1.ACT_LEN,
  326. T1.FURNACENO,
  327. T1.SEQUENCENO,
  328. T1.PRO_PLAN_ID,
  329. T1.GX_PLAN_NO,
  330. T1.ACT_COUNT,
  331. T1.ACT_WEIGHT,
  332. T1.PONDER_GROSS_COUNT,
  333. T1.PONDER_GROSS_WT,
  334. T1.LG_CRAFT_NO,
  335. T1.ISENDGX,
  336. T1.GPTYPE,
  337. T1.PRO_PLAN_ID_ZG,
  338. T1.GX_PLAN_NO_ZG,
  339. T1.HEAT_PLAN_NO_NEXT,
  340. T1.PRODUCCODE,
  341. T1.PRODUCNAME,
  342. T1.CIC,
  343. T1.PIC,
  344. T1.SIC,
  345. T1.DIC,
  346. T1.OLD_GRADECODE,
  347. T1.OLD_GRADENAME,
  348. T1.OLD_CIC,
  349. T1.JUDGE_STOVE_NO_LG,
  350. T1.EF_PLINE_CODE,
  351. T1.EF_PLINE_NAME,
  352. T1.PLAN_ROUTE,
  353. DECODE(T1.LK_FLAG, '0', '正常', '1', '轧管利库', '2', '炼钢利库') LK_FLAG,
  354. DECODE(T4.APPLY_FLAG, '0', '正常送判', '1', '退判', '未送判') APPLY_FLAG,
  355. T4.JUGDE_APPLY_SQE,
  356. T4.BACK_JUGDE_MEMO,
  357. T4.JUGDE_APPLY_CODE,
  358. T4.AUDIT_RESULT,
  359. T4.AUDIT_RESULT2
  360. FROM (SELECT T.STOVE_NO,
  361. T.JUDGE_STOVE_NO,
  362. T.MATERIAL_NO,
  363. T.MATERIAL_NAME,
  364. T.GRADECODE,
  365. T.GRADENAME,
  366. T.STD_CODE,
  367. T.STD_NAME,
  368. T.PRO_ORDER_NO,
  369. T.PLINE_CODE,
  370. T.PLINE_NAME,
  371. T.DIMATER,
  372. T.HEIGHT,
  373. T.FIX_LEN,
  374. T.FIX_NUM,
  375. T.GROUD_NO,
  376. T.BELONG_CODE,
  377. T.BELONG_NAME,
  378. T.ACT_LEN,
  379. T.FURNACENO,
  380. T.SEQUENCENO,
  381. T.PRO_PLAN_ID,
  382. T.GX_PLAN_NO,
  383. SUM(T.ACT_COUNT) ACT_COUNT,
  384. SUM(T.ACT_WEIGHT) ACT_WEIGHT,
  385. SUM(CASE
  386. WHEN T.PONDER_GROSS_WT > 0 THEN
  387. 1
  388. ELSE
  389. 0
  390. END) PONDER_GROSS_COUNT,
  391. SUM(T.PONDER_GROSS_WT) PONDER_GROSS_WT,
  392. T.LG_CRAFT_NO,
  393. T.JUGDE_APPLY_CODE,
  394. T.ISENDGX,
  395. T.GPTYPE,
  396. T.PRO_PLAN_ID_ZG,
  397. T.GX_PLAN_NO_ZG,
  398. T.HEAT_PLAN_NO_NEXT,
  399. T.PRODUCCODE,
  400. T.PRODUCNAME,
  401. T.CIC,
  402. T.PIC,
  403. T.SIC,
  404. T.DIC,
  405. T.PLAN_ROUTE,
  406. T.LK_FLAG,
  407. T.OLD_GRADECODE,
  408. T.OLD_GRADENAME,
  409. T.OLD_CIC,
  410. T.JUDGE_STOVE_NO_LG,
  411. T.EF_PLINE_CODE,
  412. T.EF_PLINE_NAME
  413. FROM MAT_GP_M T
  414. WHERE T.STOVE_NO = ?
  415. AND T.JUDGE_STOVE_NO = ?
  416. AND NVL(T.FURNACENO, '/') = NVL(?, '/')
  417. AND T.FIX_LEN = ?
  418. #JUGDE_APPLY_CODE#
  419. AND T.QCM_STAUS = '00'
  420. AND T.MAT_STATUS = '80150101'
  421. AND T.MNG_LOCK_FLAG = '0'
  422. GROUP BY T.STOVE_NO,
  423. T.JUDGE_STOVE_NO,
  424. T.FURNACENO,
  425. T.SEQUENCENO,
  426. T.MATERIAL_NO,
  427. T.MATERIAL_NAME,
  428. T.GRADECODE,
  429. T.GRADENAME,
  430. T.STD_CODE,
  431. T.STD_NAME,
  432. T.PRO_ORDER_NO,
  433. T.PLINE_CODE,
  434. T.PLINE_NAME,
  435. T.DIMATER,
  436. T.HEIGHT,
  437. T.FIX_LEN,
  438. T.FIX_NUM,
  439. T.GROUD_NO,
  440. T.BELONG_CODE,
  441. T.BELONG_NAME,
  442. T.PRO_PLAN_ID,
  443. T.GX_PLAN_NO,
  444. T.ACT_LEN,
  445. T.LG_CRAFT_NO,
  446. T.JUGDE_APPLY_CODE,
  447. T.ISENDGX,
  448. T.GPTYPE,
  449. T.PRO_PLAN_ID_ZG,
  450. T.GX_PLAN_NO_ZG,
  451. T.HEAT_PLAN_NO_NEXT,
  452. T.PRODUCCODE,
  453. T.PRODUCNAME,
  454. T.CIC,
  455. T.PIC,
  456. T.SIC,
  457. T.DIC,
  458. T.PLAN_ROUTE,
  459. T.LK_FLAG,
  460. T.OLD_GRADECODE,
  461. T.OLD_GRADENAME,
  462. T.OLD_CIC,
  463. T.JUDGE_STOVE_NO_LG,
  464. T.EF_PLINE_CODE,
  465. T.EF_PLINE_NAME) T1
  466. LEFT JOIN (SELECT T3.JUGDE_APPLY_CODE,
  467. T3.JUGDE_APPLY_SQE,
  468. T3.APPLY_FLAG,
  469. T3.BACK_JUGDE_MEMO,
  470. T3.AUDIT_RESULT,
  471. T3.AUDIT_RESULT2
  472. FROM QCM_GP_JUDGE_APPLY T3
  473. WHERE T3.IS_FLAG = '0'
  474. GROUP BY T3.JUGDE_APPLY_CODE,
  475. T3.JUGDE_APPLY_SQE,
  476. T3.APPLY_FLAG,
  477. T3.BACK_JUGDE_MEMO,
  478. T3.AUDIT_RESULT,
  479. T3.AUDIT_RESULT2) T4
  480. ON T1.JUGDE_APPLY_CODE = T4.JUGDE_APPLY_CODE || T4.JUGDE_APPLY_SQE
  481. </query>
  482. <query id = "FrmGpApplyDecision.doQueryMatDataFixNumWG" desc = "查询判定炉号下详细信息">
  483. SELECT T1.STOVE_NO,
  484. T1.JUDGE_STOVE_NO,
  485. T1.MATERIAL_NO,
  486. T1.MATERIAL_NAME,
  487. T1.GRADECODE,
  488. T1.GRADENAME,
  489. T1.STD_CODE,
  490. T1.STD_NAME,
  491. T1.PRO_ORDER_NO,
  492. T1.PLINE_CODE,
  493. T1.PLINE_NAME,
  494. T1.DIMATER,
  495. T1.HEIGHT,
  496. T1.FIX_LEN,
  497. T1.FIX_NUM,
  498. T1.GROUD_NO,
  499. T1.BELONG_CODE,
  500. T1.BELONG_NAME,
  501. T1.PRO_PLAN_ID,
  502. T1.GX_PLAN_NO,
  503. T1.ACT_LEN,
  504. T1.PRO_PLAN_ID,
  505. T1.GX_PLAN_NO,
  506. T1.ACT_COUNT,
  507. T1.ACT_WEIGHT,
  508. T1.PONDER_GROSS_COUNT,
  509. T1.PONDER_GROSS_WT,
  510. T1.LG_CRAFT_NO,
  511. T1.ISENDGX,
  512. T1.GPTYPE,
  513. T1.PRO_PLAN_ID_ZG,
  514. T1.GX_PLAN_NO_ZG,
  515. T1.HEAT_PLAN_NO_NEXT,
  516. T1.PRODUCCODE,
  517. T1.PRODUCNAME,
  518. T1.CIC,
  519. T1.PIC,
  520. T1.SIC,
  521. T1.DIC,
  522. T1.OLD_GRADECODE,
  523. T1.OLD_GRADENAME,
  524. T1.OLD_CIC,
  525. T1.JUDGE_STOVE_NO_LG,
  526. T1.EF_PLINE_CODE,
  527. T1.EF_PLINE_NAME,
  528. DECODE(T1.LK_FLAG, '0', '正常', '1', '轧管利库', '2', '炼钢利库') LK_FLAG,
  529. DECODE(T4.APPLY_FLAG, '0', '正常送判', '1', '退判', '未送判') APPLY_FLAG,
  530. T4.JUGDE_APPLY_SQE,
  531. T4.BACK_JUGDE_MEMO,
  532. T4.JUGDE_APPLY_CODE,
  533. T4.AUDIT_RESULT,
  534. T4.AUDIT_RESULT2
  535. FROM (SELECT T.STOVE_NO,
  536. T.JUDGE_STOVE_NO,
  537. T.MATERIAL_NO,
  538. T.MATERIAL_NAME,
  539. T.GRADECODE,
  540. T.GRADENAME,
  541. T.STD_CODE,
  542. T.STD_NAME,
  543. T.PRO_ORDER_NO,
  544. T.PLINE_CODE,
  545. T.PLINE_NAME,
  546. T.DIMATER,
  547. T.HEIGHT,
  548. T.FIX_LEN,
  549. T.FIX_NUM,
  550. T.GROUD_NO,
  551. T.BELONG_CODE,
  552. T.BELONG_NAME,
  553. T.ACT_LEN,
  554. T.PRO_PLAN_ID,
  555. T.GX_PLAN_NO,
  556. SUM(T.ACT_COUNT) ACT_COUNT,
  557. SUM(T.ACT_WEIGHT) ACT_WEIGHT,
  558. SUM(CASE
  559. WHEN T.PONDER_GROSS_WT > 0 THEN
  560. 1
  561. ELSE
  562. 0
  563. END) PONDER_GROSS_COUNT,
  564. SUM(T.PONDER_GROSS_WT) PONDER_GROSS_WT,
  565. T.LG_CRAFT_NO,
  566. T.JUGDE_APPLY_CODE,
  567. T.ISENDGX,
  568. T.GPTYPE,
  569. T.PRO_PLAN_ID_ZG,
  570. T.GX_PLAN_NO_ZG,
  571. T.HEAT_PLAN_NO_NEXT,
  572. T.PRODUCCODE,
  573. T.PRODUCNAME,
  574. T.CIC,
  575. T.PIC,
  576. T.SIC,
  577. T.DIC,
  578. T.LK_FLAG,
  579. T.OLD_GRADECODE,
  580. T.OLD_GRADENAME,
  581. T.OLD_CIC,
  582. T.JUDGE_STOVE_NO_LG,
  583. T.EF_PLINE_CODE,
  584. T.EF_PLINE_NAME
  585. FROM MAT_GP_M T
  586. WHERE T.STOVE_NO = ?
  587. AND NVL(T.JUDGE_STOVE_NO,'/') = NVL(?,'/')
  588. AND T.FIX_LEN = ?
  589. AND T.QCM_STAUS = '00'
  590. AND T.MAT_STATUS = '80150101'
  591. AND T.MNG_LOCK_FLAG = '0'
  592. GROUP BY T.STOVE_NO,
  593. T.JUDGE_STOVE_NO,
  594. T.MATERIAL_NO,
  595. T.MATERIAL_NAME,
  596. T.GRADECODE,
  597. T.GRADENAME,
  598. T.STD_CODE,
  599. T.STD_NAME,
  600. T.PRO_ORDER_NO,
  601. T.PLINE_CODE,
  602. T.PLINE_NAME,
  603. T.DIMATER,
  604. T.HEIGHT,
  605. T.FIX_LEN,
  606. T.FIX_NUM,
  607. T.GROUD_NO,
  608. T.BELONG_CODE,
  609. T.BELONG_NAME,
  610. T.PRO_PLAN_ID,
  611. T.GX_PLAN_NO,
  612. T.ACT_LEN,
  613. T.LG_CRAFT_NO,
  614. T.JUGDE_APPLY_CODE,
  615. T.ISENDGX,
  616. T.GPTYPE,
  617. T.PRO_PLAN_ID_ZG,
  618. T.GX_PLAN_NO_ZG,
  619. T.HEAT_PLAN_NO_NEXT,
  620. T.PRODUCCODE,
  621. T.PRODUCNAME,
  622. T.CIC,
  623. T.PIC,
  624. T.SIC,
  625. T.DIC,
  626. T.LK_FLAG,
  627. T.OLD_GRADECODE,
  628. T.OLD_GRADENAME,
  629. T.OLD_CIC,
  630. T.JUDGE_STOVE_NO_LG,
  631. T.EF_PLINE_CODE,
  632. T.EF_PLINE_NAME) T1
  633. LEFT JOIN (SELECT T3.JUGDE_APPLY_CODE,
  634. T3.JUGDE_APPLY_SQE,
  635. T3.APPLY_FLAG,
  636. T3.BACK_JUGDE_MEMO,
  637. T3.AUDIT_RESULT,
  638. T3.AUDIT_RESULT2
  639. FROM QCM_GP_JUDGE_APPLY T3
  640. WHERE T3.IS_FLAG = '0'
  641. GROUP BY T3.JUGDE_APPLY_CODE,
  642. T3.JUGDE_APPLY_SQE,
  643. T3.APPLY_FLAG,
  644. T3.BACK_JUGDE_MEMO,
  645. T3.AUDIT_RESULT,
  646. T3.AUDIT_RESULT2) T4
  647. ON T1.JUGDE_APPLY_CODE = T4.JUGDE_APPLY_CODE || T4.JUGDE_APPLY_SQE
  648. </query>
  649. <query id = "FrmGpApplyDecision.doQueryNode" desc = "查询下线点是否结炉">
  650. SELECT COUNT(1) FROM STL_LG_INSTORE_RESULT T WHERE T.STOVE_NO = ? AND T.JUDGE_STOVE_NO = ? AND T.NODE_FUR_FLAG = '0'
  651. </query>
  652. <query id = "FrmGpApplyDecision.doQueryNodeDz" desc = "查询锻造下线点是否已结炉">
  653. SELECT COUNT(1) FROM FRG_DZ_INSTORE_RESULT T WHERE T.STOVE_NO = ? AND T.JUDGE_STOVE_NO = ? AND T.NODE_FUR_FLAG = '0'
  654. </query>
  655. <query id = "FrmGpApplyDecision.doDecision" desc = "插入申请判定表">
  656. INSERT INTO QCM_GP_JUDGE_APPLY
  657. (JUGDE_APPLY_CODE,
  658. JUGDE_APPLY_SQE,
  659. JUGDE_APPLY_SEQUENO,
  660. STOVE_NO,
  661. CAST_NO,
  662. CCMID,
  663. JUDGE_STOVE_NO,
  664. BATCH_GROUD_NO,
  665. PLINE_CODE,
  666. LEN_GP_SINGLE,
  667. MULTIPLE_NUM,
  668. ACT_COUNT,
  669. ACT_DIMATER,
  670. ACT_LEN,
  671. ACT_WEIGHT,
  672. MATERIAL_NO,
  673. MATERIAL_NAME,
  674. GRADECODE,
  675. GRADENAME,
  676. STD_CODE,
  677. STD_NAME,
  678. PLINE_NAME,
  679. PRO_ORDER_NO,
  680. MAT_GOWHERE_CODE,
  681. MAT_GOWHERE_NAME,
  682. APPLY_FLAG,
  683. VALIDFLAG,
  684. APPLY_NAME,
  685. APPLY_TIME,
  686. IS_FLAG,
  687. IS_ALL_SCRAP,
  688. PRO_PLAN_ID,
  689. GX_PLAN_NO,
  690. GPREQ_ID,
  691. BELONG_CODE_JUGDE,
  692. BELONG_NAME_JUGDE,
  693. ACT_THEORY_WEIGHT,
  694. BAL_YEAR_MONTH,
  695. FURNACENO,
  696. SEQUENCENO,
  697. CRAFT_NO,
  698. ISENDGX,
  699. FACE_RESULT_PATH,
  700. GPTYPE,
  701. PRO_PLAN_ID_NEXT,
  702. GX_PLAN_NO_NEXT,
  703. PROCESS_CODE,
  704. PRODUCCODE,
  705. PRODUCNAME,
  706. APPLY_SHIFT,
  707. APPLY_GROUP,
  708. FINAL_USER,
  709. FINAL_USER_DESC,
  710. STEEL_STANDRAD,
  711. IF_MONITOR_LG,
  712. PLAN_ROUTE,
  713. LK_FLAG,
  714. OLD_GRADECODE,
  715. OLD_GRADENAME,
  716. OLD_CIC,
  717. JUDGE_STOVE_NO_LG,
  718. EF_PLINE_CODE,
  719. EF_PLINE_NAME,
  720. MEMO,
  721. CIC,
  722. HEAT_PLAN_NO_NEXT,
  723. SUPPLY_UNIT_CODE,
  724. SUPPLY_UNIT)
  725. VALUES
  726. ('#JUGDE_APPLY_CODE#',
  727. '#JUGDE_APPLY_SQE#',
  728. '#JUGDE_APPLY_SEQUENO#',
  729. '#STOVE_NO#',
  730. '#CAST_NO#',
  731. '#CCMID#',
  732. '#JUDGE_STOVE_NO#',
  733. '#BATCH_GROUD_NO#',
  734. '#PLINE_CODE#',
  735. '#LEN_GP_SINGLE#',
  736. '#MULTIPLE_NUM#',
  737. '#ACT_COUNT#',
  738. '#ACT_DIMATER#',
  739. '#ACT_LEN#',
  740. '#ACT_WEIGHT#',
  741. '#MATERIAL_NO#',
  742. '#MATERIAL_NAME#',
  743. '#GRADECODE#',
  744. '#GRADENAME#',
  745. '#STD_CODE#',
  746. '#STD_NAME#',
  747. '#PLINE_NAME#',
  748. '#PRO_ORDER_NO#',
  749. '#MAT_GOWHERE_CODE#',
  750. '#MAT_GOWHERE_NAME#',
  751. '0',
  752. '00',
  753. '#APPLY_NAME#',
  754. TO_DATE('#APPLY_TIME#', 'YYYY-MM-DD HH24:MI:SS'),
  755. '0',
  756. '0',
  757. '#PRO_PLAN_ID#',
  758. '#GX_PLAN_NO#',
  759. '#GPREQ_ID#',
  760. '#BELONG_CODE_JUGDE#',
  761. '#BELONG_NAME_JUGDE#',
  762. '#ACT_THEORY_WEIGHT#',
  763. '#BAL_YEAR_MONTH#',
  764. '#FURNACENO#',
  765. '#SEQUENCENO#',
  766. '#CRAFT_NO#',
  767. '#ISENDGX#',
  768. '#FACE_RESULT_PATH#',
  769. '#GPTYPE#',
  770. '#PRO_PLAN_ID_NEXT#',
  771. '#GX_PLAN_NO_NEXT#',
  772. '#PROCESS_CODE#',
  773. '#PRODUCCODE#',
  774. '#PRODUCNAME#',
  775. '#APPLY_SHIFT#',
  776. '#APPLY_GROUP#',
  777. '#FINAL_USER#',
  778. '#FINAL_USER_DESC#',
  779. '#STEEL_STANDRAD#',
  780. '#IF_MONITOR_LG#',
  781. '#PLAN_ROUTE#',
  782. '#LK_FLAG#',
  783. '#OLD_GRADECODE#',
  784. '#OLD_GRADENAME#',
  785. '#OLD_CIC#',
  786. '#JUDGE_STOVE_NO_LG#',
  787. '#EF_PLINE_CODE#',
  788. '#EF_PLINE_NAME#',
  789. '#MEMO#',
  790. '#CIC#',
  791. '#HEAT_PLAN_NO_NEXT#',
  792. '#SUPPLY_UNIT_CODE#',
  793. '#SUPPLY_UNIT#')
  794. </query>
  795. <query id = "FrmGpApplyDecision.updateMatGp" desc = "修改库存信息">
  796. DECLARE
  797. BEGIN
  798. FOR MYROW IN (SELECT T.MAT_NO
  799. FROM MAT_GP_M T
  800. WHERE T.STOVE_NO = '#STOVE_NO#'
  801. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  802. AND T.BELONG_CODE = '#BELONG_CODE#'
  803. AND T.FIX_NUM = '#MULTIPLE_NUM#'
  804. AND T.FIX_LEN = '#FIX_LEN#'
  805. AND T.ACT_LEN = '#ACT_LEN#'
  806. AND T.QCM_STAUS = '00'
  807. AND T.MNG_LOCK_FLAG = '0'
  808. AND T.MAT_STATUS = '80150101'
  809. AND T.JUGDE_APPLY_CODE IS NULL) LOOP
  810. UPDATE MAT_GP_M T
  811. SET T.JUGDE_APPLY_CODE = '#JUGDE_APPLY_CODE#' || '#JUGDE_APPLY_SQE#',
  812. T.JUGDE_APPLY_TIME = SYSDATE
  813. WHERE T.MAT_NO = MYROW.MAT_NO;
  814. END LOOP;
  815. END;
  816. </query>
  817. <query id = "FrmGpApplyDecision.jugdeApplyNo" desc = "生成申请判定单号">
  818. SELECT ? || TO_CHAR(SYSDATE, 'YYYYMMDD') ||
  819. LPAD(NVL(MAX(TO_NUMBER(SUBSTR(JUGDE_APPLY_CODE,
  820. LENGTH(JUGDE_APPLY_CODE) - 3))),
  821. 0) + 1,
  822. 4,
  823. '0') JUGDE_APPLY_CODE
  824. FROM QCM_GP_JUDGE_APPLY
  825. WHERE JUGDE_APPLY_CODE LIKE
  826. ? || TO_CHAR(SYSDATE, 'yyyyMMDD') || '____'
  827. </query>
  828. <query id = "FrmGpApplyDecision.SelectJudegNo" desc = "查询最大序号">
  829. SELECT T.JUGDE_APPLY_CODE,MAX(TO_NUMBER(T.JUGDE_APPLY_SQE))JUGDE_APPLY_SQE
  830. FROM QCM_GP_JUDGE_APPLY T
  831. WHERE T.STOVE_NO = ?
  832. --AND T.IS_FLAG = '0'
  833. --AND T.IS_ALL_SCRAP = '0'
  834. GROUP BY T.JUGDE_APPLY_CODE
  835. </query>
  836. <query id = "FrmGpApplyDecision.SelectJudegNoSequenNo" desc = "查询申请判定顺序号">
  837. SELECT NVL(MAX(T.JUGDE_APPLY_SEQUENO),0)+1 JUGDE_APPLY_SEQUENO
  838. FROM QCM_GP_JUDGE_APPLY T
  839. WHERE T.JUGDE_APPLY_CODE = ?
  840. AND T.JUGDE_APPLY_SQE = ?
  841. </query>
  842. <query id = "cancelDoDecision.deleteQcm" desc = "撤销判定(正常)">
  843. DECLARE
  844. BEGIN
  845. FOR MYROW IN (SELECT *
  846. FROM MAT_GP_M T
  847. WHERE T.JUGDE_APPLY_CODE = '#JUGDE_APPLY_CODE#'||'#JUGDE_APPLY_SQE#'
  848. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  849. AND T.FIX_NUM = '#FIX_NUM#'
  850. AND T.FIX_LEN = '#FIX_LEN#'
  851. AND T.ACT_LEN = '#ACT_LEN#') LOOP
  852. UPDATE MAT_GP_M T
  853. SET T.JUGDE_APPLY_CODE = ''
  854. WHERE T.JUGDE_APPLY_CODE = '#JUGDE_APPLY_CODE#' || '#JUGDE_APPLY_SQE#'
  855. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  856. AND T.FIX_NUM = '#FIX_NUM#'
  857. AND T.MAT_NO = MYROW.MAT_NO;
  858. IF ('#BELONG_CODE#' = '002023005') THEN
  859. UPDATE YDM_GP_INLIST T
  860. SET T.JUDGE_STOVE_NO = ''
  861. WHERE T.STOVE_NO = '#STOVE_NO#'
  862. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  863. AND T.INSTOCK_TYPE_CODE = '800701'
  864. AND T.MAT_NO = MYROW.MAT_NO;
  865. UPDATE YDM_GP_BUTTRESS T
  866. SET T.JUDGE_STOVE_NO = ''
  867. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  868. AND T.MAT_NO = MYROW.MAT_NO;
  869. UPDATE STL_LG_INSTORE_RESULT T
  870. SET T.JUDGE_STOVE_NO = ''
  871. WHERE T.STOVE_NO = '#STOVE_NO#'
  872. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#';
  873. UPDATE MAT_GP_M T
  874. SET T.JUDGE_STOVE_NO = ''
  875. WHERE T.STOVE_NO = '#STOVE_NO#'
  876. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  877. AND T.MAT_NO = MYROW.MAT_NO;
  878. END IF;
  879. DELETE FROM QCM_GP_JUDGE_APPLY T
  880. WHERE T.JUGDE_APPLY_CODE = '#JUGDE_APPLY_CODE#'
  881. AND T.JUGDE_APPLY_SQE = '#JUGDE_APPLY_SQE#'
  882. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  883. AND T.MULTIPLE_NUM = '#FIX_NUM#'
  884. AND T.LEN_GP_SINGLE = '#FIX_LEN#';
  885. END LOOP;
  886. END;
  887. </query>
  888. <query id = "cancelDoDecision.updateQcm" desc = "撤销申请判定(退判)">
  889. DECLARE
  890. BEGIN
  891. UPDATE QCM_GP_JUDGE_APPLY T SET T.IS_FLAG = '1'
  892. WHERE T.JUGDE_APPLY_CODE = '#JUGDE_APPLY_CODE#'
  893. AND T.JUGDE_APPLY_SQE = '#JUGDE_APPLY_SQE#'
  894. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  895. AND T.MULTIPLE_NUM = '#FIX_NUM#';
  896. UPDATE MAT_GP_M T
  897. SET T.JUGDE_APPLY_CODE = ''
  898. WHERE T.JUGDE_APPLY_CODE =
  899. '#JUGDE_APPLY_CODE#'||'#JUGDE_APPLY_SQE#'
  900. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  901. AND T.FIX_NUM = '#FIX_NUM#';
  902. END;
  903. </query>
  904. <query id = "FrmGpApplyDecision.doQuery" desc = "查询是否已判定">
  905. SELECT COUNT(1)ACOUNT
  906. FROM QCM_GP_JUDGE_APPLY T
  907. WHERE T.JUGDE_APPLY_CODE = ?
  908. AND T.JUGDE_APPLY_SQE = ?
  909. AND T.JUDGE_STOVE_NO = ?
  910. AND T.MULTIPLE_NUM = ?
  911. AND T.VALIDFLAG = '20'
  912. </query>
  913. <query id = "FrmGpApplyDecision.doQuerySP" desc = "查询送判支数">
  914. SELECT T.*
  915. FROM QCM_GP_JUDGE_APPLY T
  916. WHERE T.JUGDE_APPLY_CODE = ?
  917. AND T.JUGDE_APPLY_SQE = ?
  918. AND T.JUDGE_STOVE_NO = ?
  919. AND T.MULTIPLE_NUM = ?
  920. </query>
  921. <query id = "FrmGpApplyDecision.SelectOfflineNum" desc = "查询该判定炉号是否还有待处理">
  922. SELECT COUNT(1)ACOUNT
  923. FROM STL_LG_PROGRRSS T
  924. WHERE NVL(T.FURNACENO,'/') = NVL('#FURNACENO#','/')
  925. AND NVL(T.SEQUENCENO,'/') = NVL('#SEQUENCENO#','/')
  926. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  927. AND T.STATUS = '1'
  928. </query>
  929. <query id = "FrmGpApplyDecision.SelectNodeFlag" desc = "查询是否下线点结炉(炼钢)">
  930. <![CDATA[
  931. SELECT COUNT(1)ACOUNT
  932. FROM PLN_STEELFOR_ORD T
  933. WHERE SUBSTR(T.FURNACENO,0,12) = '#FURNACENO#'
  934. AND T.SEQUENCENO = '#SEQUENCENO#'
  935. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  936. AND T.CCM_STATE <> '30'
  937. ]]>
  938. </query>
  939. <query id = "FrmGpApplyDecision.SelectNodeFlagDz" desc = "查询是否下线点结炉(炼钢)">
  940. <![CDATA[
  941. SELECT COUNT(1)ACOUNT
  942. FROM PLN_ZY_DZ_M T
  943. WHERE T.HEAT_PLAN_NO = '#FURNACENO#'
  944. AND T.NODE_ESTATUS <> '70'
  945. ]]>
  946. </query>
  947. <query id = "FrmGpApplyDecision.SelectSurFacePath" desc = "查询表检报告路径">
  948. SELECT T.FACE_RESULT_PATH
  949. FROM STL_LG_SURFACE_M T
  950. WHERE T.STOVE_NO = '#STOVE_NO#'
  951. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  952. AND T.FACE_RESULT_PATH IS NOT NULL
  953. AND ROWNUM = 1
  954. </query>
  955. <query id = "FrmGpApplyDecision.selectChemjudge" desc = "查询熔炼成分">
  956. SELECT S.JUDGERESULT_CHEM
  957. FROM QCM_JHY_ELEMENTS T, QCM_LG_CHEMJUDGE S
  958. WHERE T.ASSAYNO = S.ASSAYNO
  959. AND T.STOVE_NO = '#STOVE_NO#'
  960. </query>
  961. <query id = "FrmGpApplyDecision.SelectOrderNoYC" desc = "余材查询合同号(无铸造订单)">
  962. SELECT T.ORDER_NO FROM PLN_STEELFOR_ORD T WHERE T.FURNACENO = ? AND T.SEQUENCENO = ?
  963. </query>
  964. <query id = "FrmGpApplyDecision.SelectOrderNoZg" desc = "查询轧管订单合同号">
  965. SELECT T.ORDER_NO || '/' || T.ORDER_SEQ || '/' || T.DELIVERY_NO AS ORDER_NO
  966. FROM PLN_ORDER_ZG_S T
  967. WHERE T.PRO_PLAN_ID = ?
  968. AND T.GX_PLAN_NO = ?
  969. GROUP BY T.ORDER_NO, T.ORDER_SEQ, T.DELIVERY_NO
  970. </query>
  971. <query id = "FrmGpApplyDecision.SelectOrderNoDz" desc = "查询锻造订单合同号">
  972. SELECT S.ORDER_NO || '/' || S.ORDER_SEQ || '/' || S.DELIVERY_NO AS ORDER_NO
  973. FROM PLN_ORDER_DZ_S T, PLN_ORDER_ZG_S S
  974. WHERE T.PRO_PLAN_ID = S.GPREQ_ID
  975. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  976. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  977. GROUP BY S.ORDER_NO, S.ORDER_SEQ, S.DELIVERY_NO
  978. </query>
  979. <query id = "FrmGpApplyDecision.SelectFinalUserZg" desc = "查询轧管订单下的用户">
  980. SELECT S.FINAL_USER, S.FINAL_USER_DESC
  981. FROM PLN_ORDER_ZG_S T, PLN_SALEORD S
  982. WHERE T.ORD_LN_DLY_PK = S.ORD_LN_DLY_PK
  983. AND T.PRO_PLAN_ID = ?
  984. AND T.GX_PLAN_NO = ?
  985. </query>
  986. <query id = "FrmGpApplyDecision.SelectFinalUserDz" desc = "查询锻造订单下的用户">
  987. SELECT S.FINAL_USER, S.FINAL_USER_DESC
  988. FROM PLN_ORDER_DZ_S T, PLN_SALEORD S
  989. WHERE T.ORD_LN_DLY_PK = S.ORD_LN_DLY_PK
  990. AND T.PRO_PLAN_ID = ?
  991. AND T.GX_PLAN_NO = ?
  992. </query>
  993. <query id = "FrmGpApplyDecision.SelectOrderNoWGZg" desc = "查询外购轧管订单下合同">
  994. SELECT T.ORDER_NO || '/' || T.ORDER_SEQ || '/' || T.DELIVERY_NO AS ORDER_NO
  995. FROM PLN_ORDER_ZG_S T
  996. WHERE T.PRO_PLAN_ID = ?
  997. GROUP BY T.ORDER_NO, T.ORDER_SEQ, T.DELIVERY_NO
  998. </query>
  999. <query id = "FrmGpApplyDecision.SelectPrdcrNo" desc = "查询监制单号">
  1000. SELECT T.PRDCR_NO
  1001. FROM PLN_STEELFOR_ORD T
  1002. WHERE T.FURNACENO = ?
  1003. AND T.SEQUENCENO = ?
  1004. AND T.STOVE_NO = ?
  1005. AND T.JUDGE_STOVE_NO = ?
  1006. </query>
  1007. <query id = "FrmGpApplyDecision.SelectNodeFlagWG" desc = "查询是否结炉(WG)">
  1008. SELECT COUNT(1)ACOUNT
  1009. FROM STL_LG_INSTORE_RESULT T
  1010. WHERE T.STOVE_NO = '#STOVE_NO#'
  1011. AND NVL(T.JUDGE_STOVE_NO,'/') = NVL('#JUDGE_STOVE_NO#','/')
  1012. AND T.LENGTH = '#ACT_LEN#'
  1013. AND T.FIX_LEN = '#FIX_LEN#'
  1014. AND T.NODE_FUR_FLAG = '0'
  1015. </query>
  1016. <query id = "FrmGpApplyDecision.SelectProPlanId" desc = "查询铸造订单">
  1017. SELECT T.PRO_PLAN_ID, T.GX_PLAN_NO,T.MERGE_NO
  1018. FROM PLN_STEELFOR_ORD T
  1019. WHERE T.STOVE_NO = '#STOVE_NO#'
  1020. AND T.PRO_PLAN_ID IS NOT NULL
  1021. AND ROWNUM = 1
  1022. </query>
  1023. <query id = "FrmGpApplyDecision.SelectProPlanIdMergNo" desc = "查询合并的铸造订单">
  1024. SELECT T.PRO_PLAN_ID,T.GX_PLAN_NO FROM PLN_STEELFOR_MERGE T WHERE T.MERGE_NO = ?
  1025. </query>
  1026. <query id = "FrmGpApplyDecision.updateSurfaceDz" desc = "增加表检报告路径">
  1027. UPDATE QCM_GP_JUDGE_APPLY T SET T.FACE_RESULT_PATH = ? WHERE T.JUDGE_STOVE_NO = ?
  1028. </query>
  1029. <query id = "FrmGpApplyDecision.doQueryCic" desc = "查询所有满足CIC">
  1030. <![CDATA[
  1031. SELECT T.CIC AS BASECODE,T.CIC AS BASENAME
  1032. FROM COM_MSC_STD_CIC T
  1033. WHERE T.VALIDFLAG <> '0'
  1034. AND T.GRADENAME = ?
  1035. ]]>
  1036. </query>
  1037. <query id = "FrmGpApplyDecision.SelectOutSelWgt" desc = "查询出钢量">
  1038. SELECT T.TAPPINGWGT FROM STL_EAF_OPTINFO T WHERE T.STOVE_NO = '#STOVE_NO#'
  1039. </query>
  1040. <query id = "FrmGpApplyDecision.updatePossWt" desc = "修改过磅重量">
  1041. UPDATE MAT_GP_M T
  1042. SET T.PONDER_GROSS_WT = ?, T.ACT_WEIGHT = ?
  1043. WHERE T.MAT_NO = ?
  1044. AND T.JUDGE_STOVE_NO = ?
  1045. AND T.BELONG_CODE = ?
  1046. AND T.QCM_STAUS = '00'
  1047. AND T.MNG_LOCK_FLAG = '0'
  1048. </query>
  1049. <query id = "FrmGpApplyDecision.selectMatNo" desc = "查询所有材料号">
  1050. <![CDATA[
  1051. SELECT T.MAT_NO
  1052. FROM MAT_GP_M T
  1053. WHERE T.JUDGE_STOVE_NO = ?
  1054. AND T.BELONG_CODE = ?
  1055. AND T.FIX_NUM = ?
  1056. AND T.QCM_STAUS = '00'
  1057. AND T.MNG_LOCK_FLAG = '0'
  1058. AND ROWNUM <= ?
  1059. ]]>
  1060. </query>
  1061. <query id = "FrmGpApplyDecision.updateMatGpJudgeNo" desc = "修改管坯判定炉号">
  1062. <![CDATA[
  1063. DECLARE
  1064. BEGIN
  1065. FOR MYROW IN (SELECT T.*
  1066. FROM MAT_GP_M T
  1067. WHERE T.STOVE_NO = '#STOVE_NO#'
  1068. AND T.SUPPLY_UNIT_CODE = '120504'
  1069. AND T.FIX_LEN = '#FIX_LEN#'
  1070. AND T.ACT_LEN = '#ACT_LEN#'
  1071. AND T.JUDGE_STOVE_NO IS NULL
  1072. AND T.MNG_LOCK_FLAG = '0'
  1073. AND T.MAT_STATUS = '80150101') LOOP
  1074. UPDATE MAT_GP_M T
  1075. SET T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1076. WHERE T.MAT_NO = MYROW.MAT_NO;
  1077. UPDATE YDM_GP_BUTTRESS T
  1078. SET T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1079. WHERE T.MAT_NO = MYROW.MAT_NO;
  1080. UPDATE YDM_GP_INLIST T
  1081. SET T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1082. WHERE T.INSTOCK_TYPE_CODE = '800701'
  1083. AND T.MAT_NO = MYROW.MAT_NO;
  1084. END LOOP;
  1085. UPDATE STL_LG_INSTORE_RESULT T
  1086. SET
  1087. T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1088. WHERE T.STOVE_NO = '#STOVE_NO#'
  1089. AND T.LENGTH = '#ACT_LEN#'
  1090. AND T.FIX_LEN = '#FIX_LEN#';
  1091. END;
  1092. ]]>
  1093. </query>
  1094. <query id = "FrmGpApplyDecision.queryMaxJudgeStoveNo" desc = "查询最大炉号">
  1095. <![CDATA[
  1096. SELECT /*? || TO_CHAR(SYSDATE, 'YYMM') ||
  1097. LPAD(NVL(MAX(SUBSTR(JUDGE_STOVE_NO, 6)), 0) + 1, 4, 0) JUDGE_STOVE_NO*/
  1098. CASE
  1099. WHEN TO_CHAR(SYSDATE, 'YY') ||
  1100. LPAD(NVL(MAX(SUBSTR(JUDGE_STOVE_NO, 4)), 0) + 1, 6, 0) <
  1101. TO_CHAR(SYSDATE, 'YYMM') || '0000' THEN
  1102. ? || TO_CHAR(SYSDATE, 'YYMM') || '0000'
  1103. ELSE
  1104. ? || TO_CHAR(SYSDATE, 'YY') ||
  1105. LPAD(NVL(MAX(SUBSTR(JUDGE_STOVE_NO, 4)), 0) + 1, 6, 0)
  1106. END JUDGE_STOVE_NO
  1107. FROM (SELECT MAX(T.JUDGE_STOVE_NO) JUDGE_STOVE_NO
  1108. FROM MAT_GP_M T
  1109. WHERE T.PLINE_CODE IN ('C063', 'C064')
  1110. AND T.SUPPLY_UNIT_CODE = '120504'
  1111. AND (T.JUDGE_STOVE_NO > 'A23121400'
  1112. OR T.JUDGE_STOVE_NO < 'A23120518')
  1113. AND T.JUDGE_STOVE_NO LIKE ?|| TO_CHAR(SYSDATE, 'YY') || '%'
  1114. UNION ALL
  1115. SELECT MAX(T.JUDGE_STOVE_NO) JUDGE_STOVE_NO
  1116. FROM MAT_GP_M_HISTORY T
  1117. WHERE T.PLINE_CODE IN ('C063', 'C064')
  1118. AND T.SUPPLY_UNIT_CODE = '120504'
  1119. AND (T.JUDGE_STOVE_NO > 'A23121400'
  1120. OR T.JUDGE_STOVE_NO < 'A23120518')
  1121. AND T.JUDGE_STOVE_NO LIKE ?|| TO_CHAR(SYSDATE, 'YY') || '%'
  1122. UNION ALL
  1123. SELECT MAX(T.JUDGE_STOVE_NO) JUDGE_STOVE_NO
  1124. FROM YDM_GP_INLIST T
  1125. WHERE T.PLINE_CODE IN ('C063', 'C064')
  1126. AND T.SUPPLY_UNIT_CODE = '120504'
  1127. AND (T.JUDGE_STOVE_NO > 'A23121400'
  1128. OR T.JUDGE_STOVE_NO < 'A23120518')
  1129. AND T.JUDGE_STOVE_NO LIKE ?|| TO_CHAR(SYSDATE, 'YY') || '%')
  1130. ]]>
  1131. </query>
  1132. <query id = "FrmGpApplyDecision.queryStoveJudgeNo" desc = "查询熔炼炉号、单倍长度下是否已有判定炉号">
  1133. SELECT JUDGE_STOVE_NO
  1134. FROM (SELECT JUDGE_STOVE_NO
  1135. FROM (SELECT T.JUDGE_STOVE_NO
  1136. FROM MAT_GP_M T
  1137. WHERE T.PLINE_CODE IN ('C063','C064')
  1138. AND T.SUPPLY_UNIT_CODE = '120504'
  1139. AND T.STOVE_NO = '#STOVE_NO#'
  1140. AND T.FIX_LEN = '#FIX_LEN#'
  1141. AND T.JUDGE_STOVE_NO IS NOT NULL
  1142. AND (T.JUDGE_STOVE_NO LIKE 'A%' OR T.JUDGE_STOVE_NO LIKE 'B%')
  1143. AND ROWNUM = 1
  1144. UNION ALL
  1145. SELECT T.JUDGE_STOVE_NO
  1146. FROM MAT_GP_M_HISTORY T
  1147. WHERE T.PLINE_CODE IN ('C063','C064')
  1148. AND T.SUPPLY_UNIT_CODE = '120504'
  1149. AND T.STOVE_NO = '#STOVE_NO#'
  1150. AND T.FIX_LEN = '#FIX_LEN#'
  1151. AND T.JUDGE_STOVE_NO IS NOT NULL
  1152. AND (T.JUDGE_STOVE_NO LIKE 'A%' OR T.JUDGE_STOVE_NO LIKE 'B%')
  1153. AND ROWNUM = 1))
  1154. </query>
  1155. <query id = "FrmGpApplyDecision.queryJudgeStoveNo" desc = "查询炉号炉号">
  1156. SELECT
  1157. A.JUDGE_STOVE_NO
  1158. FROM
  1159. QCM_GP_JUDGE_APPLY A,
  1160. PLN_REQINF_GP B
  1161. WHERE
  1162. A.JUDGE_STOVE_NO = ?
  1163. AND A.IS_FLAG = '0'
  1164. AND ( A.PLINE_CODE IN ( 'C063', 'C064' ) OR A.LK_FLAG = '1' OR A.GPTYPE = '2' )
  1165. AND A.PRO_PLAN_ID = B.GPREQ_ID
  1166. GROUP BY
  1167. A.JUDGE_STOVE_NO
  1168. </query>
  1169. <query id = "FrmGpApplyDecision.queryStoveNo" desc = "查询炉号炉号">
  1170. SELECT
  1171. A.STOVE_NO
  1172. FROM
  1173. QCM_GP_JUDGE_APPLY A
  1174. WHERE
  1175. A.JUDGE_STOVE_NO = ?
  1176. AND A.IS_FLAG = '0'
  1177. GROUP BY
  1178. A.STOVE_NO
  1179. </query>
  1180. </queryMap>