FrmMchControlLog.xml 20 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543
  1. <?xml version="1.0" encoding="UTF-8"?>
  2. <queryMap desc="轧管调度日志">
  3. <query id="FrmMchControlLog.doQueryPlan" desc="查询日志">
  4. <![CDATA[
  5. SELECT T.CONTROL_ID,
  6. TO_CHAR(TO_DATE(T.LOGS_BEG, 'YYYY-MM-DD HH24:MI'),
  7. 'YYYY-MM-DD HH24:MI') LOGS_BEG,
  8. TO_CHAR(TO_DATE(T.LOGS_END, 'YYYY-MM-DD HH24:MI'),
  9. 'YYYY-MM-DD HH24:MI') LOGS_END,
  10. (SELECT B.PLINE_NAME
  11. FROM COM_BASE_PLINE B
  12. WHERE B.PLINE_CODE = T.PLINE_CODE) PLINE_CODE,
  13. T.JUDGE_STOVE_NO,
  14. T.LOT_NO,
  15. T.CONTRACT_NO,
  16. T.CRAFT_FILE_NO,
  17. T.PRDCR_NO,
  18. T.VARIETIES,
  19. T.PIPE_SIZE,
  20. T.BUCKLE_TYPE,
  21. T.LENGTH_RANGE,
  22. T.STEELCODE,
  23. T.STEELNAME,
  24. T.GRADECODE,
  25. T.GRADENAME,
  26. T.PRO_BC,
  27. T.PRO_BZ,
  28. NVL(T.QUALIFIED_NUM, 0) QUALIFIED_NUM,
  29. NVL(T.QUALIFIED_WT, 0) QUALIFIED_WT,
  30. NVL(T.SCRAP_NUM, 0) SCRAP_NUM,
  31. NVL(T.SCRAP_WT, 0) SCRAP_WT,
  32. DECODE(T.PRO_TYPE, '1', '正常', '2', '停机','正常') PRO_TYPE,
  33. T.STOP_TYPE,
  34. T.STOP_REASON STOP_REASON_CODE,
  35. (SELECT BASENAME FROM com_base_info WHERE BASECODE=T.STOP_REASON ) STOP_REASON,
  36. TO_CHAR(T.USER_DATE, 'YYYY-MM-DD HH24:MI:SS') USER_DATE,
  37. T.USER_NAME,
  38. T.USER_ID,
  39. T.STOP_SMALL STOP_SMALL_CODE,
  40. (SELECT BASENAME FROM com_base_info WHERE BASECODE=T.STOP_SMALL ) STOP_SMALL,
  41. TO_CHAR(T.CONFIRM_TIME, 'YYYY-MM-DD HH24:MI:SS') CONFIRM_TIME,
  42. T.CONFIRM_NAME,
  43. DECODE(T.CONFIRM_FLAG, '0', '未确认', '1', '已确认') CONFIRM_FLAG,
  44. T.MEMO,
  45. T.BAL_YEAR_MONTH,
  46. T.PROC_DATE,
  47. DECODE(T.NODE_FLAG, '0', '未结炉', '1', '已结炉') NODE_FLAG,
  48. T.RESULT_NO,
  49. T.HEAT_PLAN_NO,
  50. T.BATCH_NO,
  51. T.BATCH_GROUD_NO
  52. FROM MCH_CONTROL_LOG T
  53. WHERE 1 = 1
  54. ]]>
  55. </query>
  56. <query id="FrmMchControlLog.doQueryPlanPro" desc="生产详情">
  57. <![CDATA[
  58. SELECT T.CONTROL_ID,
  59. TO_CHAR(TO_DATE(T.LOGS_BEG, 'YYYY-MM-DD HH24:MI'),
  60. 'YYYY-MM-DD HH24:MI') LOGS_BEG,
  61. TO_CHAR(TO_DATE(T.LOGS_END, 'YYYY-MM-DD HH24:MI'),
  62. 'YYYY-MM-DD HH24:MI') LOGS_END,
  63. (SELECT B.PLINE_NAME
  64. FROM COM_BASE_PLINE B
  65. WHERE B.PLINE_CODE = T.PLINE_CODE) PLINE_CODE,
  66. T.JUDGE_STOVE_NO,
  67. T.LOT_NO,
  68. T.CONTRACT_NO,
  69. T.CRAFT_FILE_NO,
  70. T.PRDCR_NO,
  71. T.VARIETIES,
  72. T.PIPE_SIZE,
  73. T.BUCKLE_TYPE,
  74. T.LENGTH_RANGE,
  75. T.STEELCODE,
  76. T.STEELNAME,
  77. T.GRADECODE,
  78. T.GRADENAME,
  79. DECODE(T.PRO_BC,'1','早班','2','中班','3','夜班') PRO_BC,
  80. DECODE(T.PRO_BZ,'1','甲','2','乙','3','丙','4','丁') PRO_BZ,
  81. NVL(T.QUALIFIED_NUM, 0) QUALIFIED_NUM,
  82. NVL(T.QUALIFIED_WT, 0) QUALIFIED_WT,
  83. NVL(T.SCRAP_NUM, 0) SCRAP_NUM,
  84. NVL(T.SCRAP_WT, 0) SCRAP_WT,
  85. DECODE(T.PRO_TYPE, '1', '正常', '2', '停机','正常') PRO_TYPE,
  86. T.STOP_TYPE,
  87. T.STOP_REASON,
  88. TO_CHAR(T.USER_DATE, 'YYYY-MM-DD HH24:MI:SS') USER_DATE,
  89. T.USER_NAME,
  90. T.USER_ID,
  91. T.STOP_SMALL,
  92. TO_CHAR(T.CONFIRM_TIME, 'YYYY-MM-DD HH24:MI:SS') CONFIRM_TIME,
  93. T.CONFIRM_NAME,
  94. DECODE(T.CONFIRM_FLAG, '0', '未确认', '1', '已确认') CONFIRM_FLAG,
  95. T.MEMO,
  96. T.BAL_YEAR_MONTH,
  97. T.PROC_DATE,
  98. DECODE(T.NODE_FLAG, '0', '未结炉', '1', '已结炉') NODE_FLAG,
  99. T.RESULT_NO,
  100. T.HEAT_PLAN_NO,
  101. T.BATCH_NO,
  102. T.BATCH_GROUD_NO
  103. FROM MCH_CONTROL_LOG T
  104. WHERE 1 = 1
  105. ]]>
  106. </query>
  107. <query id="FrmMchControlLog.doStopQuery" desc="查询日志停机记录">
  108. <![CDATA[
  109. SELECT T.CONTROL_ID,
  110. TO_CHAR(TO_DATE(T.LOGS_BEG, 'YYYY-MM-DD HH24:MI'),
  111. 'YYYY-MM-DD HH24:MI') LOGS_BEG,
  112. TO_CHAR(TO_DATE(T.LOGS_END, 'YYYY-MM-DD HH24:MI'),
  113. 'YYYY-MM-DD HH24:MI') LOGS_END,
  114. (SELECT B.PLINE_NAME
  115. FROM COM_BASE_PLINE B
  116. WHERE B.PLINE_CODE = T.PLINE_CODE) PLINE_CODE,
  117. T.JUDGE_STOVE_NO,
  118. T.LOT_NO,
  119. T.CONTRACT_NO,
  120. T.CRAFT_FILE_NO,
  121. T.PRDCR_NO,
  122. T.VARIETIES,
  123. T.PIPE_SIZE,
  124. T.BUCKLE_TYPE,
  125. T.LENGTH_RANGE,
  126. T.STEELCODE,
  127. T.STEELNAME,
  128. T.GRADECODE,
  129. T.GRADENAME,
  130. DECODE(T.PRO_BC,'1','早班','2','中班','3','夜班') PRO_BC,
  131. DECODE(T.PRO_BZ,'1','甲','2','乙','3','丙','4','丁') PRO_BZ,
  132. NVL(T.QUALIFIED_NUM, 0) QUALIFIED_NUM,
  133. NVL(T.QUALIFIED_WT, 0) QUALIFIED_WT,
  134. NVL(T.SCRAP_NUM, 0) SCRAP_NUM,
  135. NVL(T.SCRAP_WT, 0) SCRAP_WT,
  136. DECODE(T.PRO_TYPE, '1', '正常', '2', '停机','正常') PRO_TYPE,
  137. (SELECT BASENAME FROM com_base_info WHERE BASECODE=T.STOP_TYPE ) STOP_TYPE,
  138. (SELECT BASENAME FROM com_base_info WHERE BASECODE=T.STOP_REASON ) STOP_REASON,
  139. TO_CHAR(T.USER_DATE, 'YYYY-MM-DD HH24:MI:SS') USER_DATE,
  140. T.USER_NAME,
  141. T.USER_ID,
  142. (SELECT BASENAME FROM com_base_info WHERE BASECODE=T.STOP_SMALL ) STOP_SMALL,
  143. TO_CHAR(T.CONFIRM_TIME, 'YYYY-MM-DD HH24:MI:SS') CONFIRM_TIME,
  144. T.CONFIRM_NAME,
  145. DECODE(T.CONFIRM_FLAG, '0', '未确认', '1', '已确认') CONFIRM_FLAG,
  146. T.MEMO,
  147. T.BAL_YEAR_MONTH,
  148. T.PROC_DATE,
  149. DECODE(T.NODE_FLAG, '0', '未结炉', '1', '已结炉') NODE_FLAG,
  150. T.RESULT_NO,
  151. T.HEAT_PLAN_NO,
  152. T.BATCH_NO,
  153. T.BATCH_GROUD_NO
  154. FROM MCH_CONTROL_LOG T
  155. WHERE 1 = 1
  156. AND T.PRO_TYPE='2'
  157. ]]>
  158. </query>
  159. <query id="FrmMchControlLog.addMilControlLog" desc="新增日志">
  160. <![CDATA[
  161. INSERT INTO MCH_CONTROL_LOG
  162. (LOGS_BEG, LOGS_END, USER_DATE, USER_NAME, PRO_TYPE,PRO_BC,PRO_BZ,PLINE_CODE)
  163. VALUES
  164. (?, ?, TO_DATE(?, 'YYYY-MM-DD HH24:MI:SS'), ?, '2',?,?,?)
  165. ]]>
  166. </query>
  167. <query id="FrmMchControlLog.queryPlanJg" desc="查询是否存在要新增的记录">
  168. <![CDATA[
  169. SELECT COUNT(*) COUNTS
  170. FROM MCH_CONTROL_LOG T
  171. WHERE T.LOGS_BEG = ?
  172. ]]>
  173. </query>
  174. <query id="FrmMchControlLog.updateControlLog" desc="修改日志表记录">
  175. <![CDATA[
  176. UPDATE MCH_CONTROL_LOG
  177. SET LOGS_BEG = ?,
  178. LOGS_END = ?,
  179. PLINE_CODE = ?,
  180. STOP_TYPE = ?,
  181. STOP_REASON = ?,
  182. QUALIFIED_NUM = ?,
  183. QUALIFIED_WT = ?,
  184. SCRAP_NUM = ?,
  185. SCRAP_WT = ?,
  186. PRO_BC = ?,
  187. PRO_BZ = ?,
  188. STOP_SMALL = ?,
  189. MEMO=?,
  190. Proc_Date = CASE
  191. WHEN (substr(?,9,4)> '1200'
  192. AND substr(?,9,4)<= '2400') AND PRO_BC = '3' THEN TO_CHAR(TRUNC(to_date(?,'YYYY-MM-DD HH24:MI:SS'))+1,'YYYYMMDD')
  193. WHEN (substr(?,9,4) >='0000'
  194. AND substr(?,9,4)< '1200') AND PRO_BC = '3' THEN TO_CHAR(TRUNC(to_date(?,'YYYY-MM-DD HH24:MI:SS')),'YYYYMMDD')
  195. ELSE TO_CHAR(TRUNC(to_date(?,'YYYY-MM-DD HH24:MI:SS')),'YYYYMMDD')END,
  196. Bal_Year_Month = CASE
  197. WHEN (substr(?,9,4)> '1200'
  198. AND substr(?,9,4)<= '2400') AND PRO_BC ='3' THEN TO_CHAR(TRUNC(to_date(?,'YYYY-MM-DD HH24:MI:SS'))+1,'YYYYMM')
  199. WHEN (substr(?,9,4) >='0000'
  200. AND substr(?,9,4)< '1200') AND PRO_BC = '3' THEN TO_CHAR(TRUNC(to_date(?,'YYYY-MM-DD HH24:MI:SS')),'YYYYMM')
  201. ELSE TO_CHAR(TRUNC(to_date(?,'YYYY-MM-DD HH24:MI:SS')),'YYYYMM')END
  202. WHERE CONTROL_ID = ?
  203. ]]>
  204. </query>
  205. <query id="FrmMchControlLog.updateControlLogDown" desc="修改选中行下一条数据">
  206. <![CDATA[
  207. UPDATE MCH_CONTROL_LOG
  208. SET LOGS_BEG = ?
  209. WHERE CONTROL_ID = ?
  210. ]]>
  211. </query>
  212. <query id="FrmMchControlLog.updateControlLogUp" desc="修改选中行上一条数据">
  213. <![CDATA[
  214. UPDATE MCH_CONTROL_LOG
  215. SET LOGS_END = ?
  216. WHERE CONTROL_ID = ?
  217. ]]>
  218. </query>
  219. <query id="FrmMchControlLog.queryStratTime" desc="查询修改上一行记录">
  220. <![CDATA[
  221. SELECT TO_CHAR(TO_DATE(T.LOGS_BEG, 'YYYY-MM-DD HH24:MI'),
  222. 'YYYY-MM-DD HH24:MI') LOGS_BEG,
  223. TO_CHAR(TO_DATE(T.LOGS_END, 'YYYY-MM-DD HH24:MI'),
  224. 'YYYY-MM-DD HH24:MI') LOGS_END,
  225. T.CONTROL_ID
  226. FROM MCH_CONTROL_LOG T
  227. WHERE T.LOGS_BEG <
  228. (SELECT T1.LOGS_BEG
  229. FROM MCH_CONTROL_LOG T1
  230. WHERE T1.CONTROL_ID = ?)
  231. AND T.PRO_BC=?
  232. AND T.PRO_BZ=?
  233. ORDER BY T.LOGS_BEG DESC
  234. ]]>
  235. </query>
  236. <query id="FrmMchControlLog.queryEndTime" desc="查询修改下一行记录">
  237. <![CDATA[
  238. SELECT TO_CHAR(TO_DATE(T.LOGS_BEG, 'YYYY-MM-DD HH24:MI'),
  239. 'YYYY-MM-DD HH24:MI') LOGS_BEG,
  240. TO_CHAR(TO_DATE(T.LOGS_END, 'YYYY-MM-DD HH24:MI'),
  241. 'YYYY-MM-DD HH24:MI') LOGS_END,
  242. T.CONTROL_ID
  243. FROM MCH_CONTROL_LOG T
  244. WHERE T.LOGS_BEG >
  245. (SELECT T1.LOGS_BEG
  246. FROM MCH_CONTROL_LOG T1
  247. WHERE T1.CONTROL_ID = ?)
  248. AND T.PRO_BC=?
  249. AND T.PRO_BZ=?
  250. ORDER BY T.LOGS_BEG ASC
  251. ]]>
  252. </query>
  253. <query id="FrmMchControlLog.queryTime" desc="查询修改下一行记录">
  254. <![CDATA[
  255. SELECT TO_CHAR(TO_DATE(T.LOGS_BEG, 'YYYY-MM-DD HH24:MI'),
  256. 'YYYY-MM-DD HH24:MI') LOGS_BEG,
  257. TO_CHAR(TO_DATE(T.LOGS_END, 'YYYY-MM-DD HH24:MI'),
  258. 'YYYY-MM-DD HH24:MI') LOGS_END,
  259. T.CONTROL_ID
  260. FROM MCH_CONTROL_LOG T
  261. WHERE T.CONTROL_ID = ?
  262. ]]>
  263. </query>
  264. <query id="FrmMchControlLog.getComBaseInfo" desc="停机分类">
  265. <![CDATA[
  266. SELECT T.BASECODE, T.BASENAME
  267. FROM COM_BASE_INFO T
  268. WHERE T.SORTCODE = ?
  269. AND T.VALIDFLAG = '1'
  270. ]]>
  271. </query>
  272. <query id="FrmMchControlLog.queryContfirm" desc="确认状态">
  273. <![CDATA[
  274. SELECT T.CONFIRM_FLAG FROM MCH_CONTROL_LOG T WHERE T.CONTROL_ID=?
  275. ]]>
  276. </query>
  277. <query id="FrmMchControlLog.queryCountLoag" desc="查询选中行数据前是否有数据">
  278. <![CDATA[
  279. SELECT T.CONTROL_ID
  280. FROM MCH_CONTROL_LOG T
  281. WHERE T.CONFIRM_FLAG='0'
  282. AND T.LOGS_BEG <= ?
  283. AND T.PLINE_CODE = ?
  284. AND T.PRO_BC =?
  285. AND T.PRO_BZ = ?
  286. AND T.LOGS_END >= ?
  287. AND T.LOGS_END <= ?
  288. ORDER BY T.LOGS_BEG
  289. ]]>
  290. </query>
  291. <query id="FrmMchControlLog.queryCountLoag1" desc="查询选中行数据后是否有数据">
  292. <![CDATA[
  293. SELECT T.CONTROL_ID
  294. FROM MCH_CONTROL_LOG T
  295. WHERE T.CONFIRM_FLAG='1'
  296. AND T.LOGS_BEG >= ?
  297. AND T.PLINE_CODE = ?
  298. AND T.PRO_BC =?
  299. AND T.PRO_BZ = ?
  300. AND T.LOGS_END >= ?
  301. AND T.LOGS_END <= ?
  302. ORDER BY T.LOGS_BEG
  303. ]]>
  304. </query>
  305. <query id="FrmMchControlLog.confirmMilControlLog" desc="修改确认标志">
  306. <![CDATA[
  307. UPDATE MCH_CONTROL_LOG
  308. SET CONFIRM_FLAG = '1',
  309. CONFIRM_NAME = ?,
  310. CONFIRM_TIME = TO_DATE(?, 'YYYY-MM-DD HH24:MI:SS')
  311. WHERE CONTROL_ID = ?
  312. ]]>
  313. </query>
  314. <query id="FrmMchControlLog.UpConfirmMilControlLog" desc="取消确认标志">
  315. <![CDATA[
  316. UPDATE MCH_CONTROL_LOG
  317. SET CONFIRM_FLAG = '0',
  318. CONFIRM_NAME = '',
  319. CONFIRM_TIME = TO_DATE('', 'YYYY-MM-DD HH24:MI:SS')
  320. WHERE CONTROL_ID = ?
  321. ]]>
  322. </query>
  323. <query id="FrmMchControlLog.DeleteControlLog" desc="删除停机记录">
  324. <![CDATA[
  325. DELETE MCH_CONTROL_LOG WHERE CONTROL_ID = ?
  326. ]]>
  327. </query>
  328. <query id="FrmMchControlLog.OneKeyProcesMilControlLog" desc="一键处理新增轧管日志">
  329. <![CDATA[
  330. INSERT INTO MCH_CONTROL_LOG
  331. (LOGS_BEG, LOGS_END, USER_DATE, USER_NAME, PRO_BC,PRO_BZ,PLINE_CODE,PRO_TYPE,STOP_TYPE,STOP_SMALL,STOP_REASON)
  332. VALUES
  333. (?, ?, TO_DATE(?,'YYYY-MM-DD HH24:MI:SS'), ?, ?,?,?,?,?,?,?)
  334. ]]>
  335. </query>
  336. <query id="FrmMchControlLog.doQueryActual" desc="统计当班生产实绩">
  337. <![CDATA[
  338. SELECT T2.JUDGE_STOVE_NO,
  339. T2.QUALIFIED_NUM,
  340. T2.QUALIFIED_WT,
  341. (SELECT round(NVL(((CASE
  342. WHEN TRUNC(TO_DATE(?, 'YYYY-MM-DD')) =
  343. TRUNC(SYSDATE) AND ? = GET_CurrentBC() THEN
  344. SYSDATE
  345. ELSE
  346. TO_DATE(MAX(T.LOGS_END), 'YYYY-MM-DD HH24:MI')
  347. END -
  348. TO_DATE(MIN(T.LOGS_BEG), 'YYYY-MM-DD HH24:MI')) * 24 * 60),
  349. 0)) YOUMINUTES
  350. FROM MCH_CONTROL_LOG T
  351. WHERE T.PROC_DATE = ?
  352. AND T.PRO_BC = ?
  353. AND T.PLINE_CODE = ?
  354. AND T.CONFIRM_FLAG = '1') YOUMINUTES,
  355. (SELECT round(NVL(SUM(((TO_DATE(T.LOGS_END, 'YYYY-MM-DD HH24:MI') -
  356. TO_DATE(T.LOGS_BEG, 'YYYY-MM-DD HH24:MI')) * 24 * 60)),
  357. 0)) MINUTES
  358. FROM MCH_CONTROL_LOG T
  359. WHERE T.PROC_DATE = ?
  360. AND T.PRO_BC = ?
  361. AND T.PLINE_CODE = ?
  362. AND T.CONFIRM_FLAG = '1'
  363. AND T.PRO_TYPE = '2'
  364. AND (T.STOP_TYPE = '500601' OR T.STOP_TYPE = '500602')) MINUTES,
  365. (SELECT round(NVL(SUM(((TO_DATE(T.LOGS_END, 'YYYY-MM-DD HH24:MI') -
  366. TO_DATE(T.LOGS_BEG, 'YYYY-MM-DD HH24:MI')) * 24 * 60)),
  367. 0)) ABSMINUTES
  368. FROM MCH_CONTROL_LOG T
  369. WHERE T.PROC_DATE = ?
  370. AND T.PRO_BC = ?
  371. AND T.PLINE_CODE = ?
  372. AND T.CONFIRM_FLAG = '1'
  373. AND T.PRO_TYPE = '2'
  374. AND T.STOP_TYPE = '500603') ABSMINUTES,
  375. (SELECT round(NVL(SUM(((TO_DATE(T.LOGS_END, 'YYYY-MM-DD HH24:MI') -
  376. TO_DATE(T.LOGS_BEG, 'YYYY-MM-DD HH24:MI')) * 24 * 60)),
  377. 0)) SUMMINUTES
  378. FROM MCH_CONTROL_LOG T
  379. WHERE T.PROC_DATE = ?
  380. AND T.PRO_BC = ?
  381. AND T.PLINE_CODE = ?
  382. AND T.CONFIRM_FLAG = '1'
  383. AND T.PRO_TYPE = '2') SUMMINUTES
  384. FROM (SELECT COUNT(1) JUDGE_STOVE_NO,
  385. NVL(SUM(T1.QUALIFIED_NUM), 0) QUALIFIED_NUM,
  386. NVL(SUM(T1.QUALIFIED_WT), 0) QUALIFIED_WT
  387. FROM (SELECT T.JUDGE_STOVE_NO,
  388. NVL(SUM(T.QUALIFIED_NUM), 0) QUALIFIED_NUM,
  389. NVL(SUM(T.QUALIFIED_WT), 0) QUALIFIED_WT
  390. FROM MCH_CONTROL_LOG T
  391. WHERE T.PROC_DATE = ?
  392. AND T.PRO_BC = ?
  393. AND T.PLINE_CODE = ?
  394. AND T.CONFIRM_FLAG = '1'
  395. AND T.PRO_TYPE = '1'
  396. GROUP BY T.JUDGE_STOVE_NO) T1) T2
  397. ]]>
  398. </query>
  399. <query id="FrmMchControlLog.doQueryMonthActual" desc="统计月生产实绩">
  400. <![CDATA[
  401. SELECT T2.JUDGE_STOVE_NO,
  402. T2.QUALIFIED_NUM,
  403. T2.QUALIFIED_WT,
  404. (SELECT round(NVL(((CASE
  405. WHEN ? = TO_CHAR(TRUNC(SYSDATE), 'YYYYMM') THEN
  406. SYSDATE
  407. ELSE
  408. TO_DATE(MAX(T.LOGS_END), 'YYYY-MM-DD HH24:MI')
  409. END -
  410. TO_DATE(MIN(T.LOGS_BEG), 'YYYY-MM-DD HH24:MI')) * 24 * 60),
  411. 0)) YOUMINUTES
  412. FROM MCH_CONTROL_LOG T
  413. WHERE T.BAL_YEAR_MONTH = ?
  414. AND T.PLINE_CODE = ?
  415. AND T.CONFIRM_FLAG = '1') YOUMINUTES,
  416. (SELECT round(NVL(SUM(((TO_DATE(T.LOGS_END, 'YYYY-MM-DD HH24:MI') -
  417. TO_DATE(T.LOGS_BEG, 'YYYY-MM-DD HH24:MI')) * 24 * 60)),
  418. 0)) MINUTES
  419. FROM MCH_CONTROL_LOG T
  420. WHERE T.BAL_YEAR_MONTH = ?
  421. AND T.PLINE_CODE = ?
  422. AND T.CONFIRM_FLAG = '1'
  423. AND T.PRO_TYPE = '2'
  424. AND (T.STOP_TYPE = '500601' OR T.STOP_TYPE = '500602')) MINUTES,
  425. (SELECT round(NVL(SUM(((TO_DATE(T.LOGS_END, 'YYYY-MM-DD HH24:MI') -
  426. TO_DATE(T.LOGS_BEG, 'YYYY-MM-DD HH24:MI')) * 24 * 60)),
  427. 0)) ABSMINUTES
  428. FROM MCH_CONTROL_LOG T
  429. WHERE T.BAL_YEAR_MONTH = ?
  430. AND T.PLINE_CODE = ?
  431. AND T.CONFIRM_FLAG = '1'
  432. AND T.PRO_TYPE = '2'
  433. AND T.STOP_TYPE = '500603') ABSMINUTES,
  434. (SELECT round(NVL(SUM(((TO_DATE(T.LOGS_END, 'YYYY-MM-DD HH24:MI') -
  435. TO_DATE(T.LOGS_BEG, 'YYYY-MM-DD HH24:MI')) * 24 * 60)),
  436. 0)) SUMMINUTES
  437. FROM MCH_CONTROL_LOG T
  438. WHERE T.BAL_YEAR_MONTH = ?
  439. AND T.PLINE_CODE = ?
  440. AND T.CONFIRM_FLAG = '1'
  441. AND T.PRO_TYPE = '2') SUMMINUTES
  442. FROM (SELECT COUNT(1) JUDGE_STOVE_NO,
  443. NVL(SUM(T1.QUALIFIED_NUM), 0) QUALIFIED_NUM,
  444. NVL(SUM(T1.QUALIFIED_WT), 0) QUALIFIED_WT
  445. FROM (SELECT T.JUDGE_STOVE_NO,
  446. NVL(SUM(T.QUALIFIED_NUM), 0) QUALIFIED_NUM,
  447. NVL(SUM(T.QUALIFIED_WT), 0) QUALIFIED_WT
  448. FROM MCH_CONTROL_LOG T
  449. WHERE T.BAL_YEAR_MONTH = ?
  450. AND T.PLINE_CODE = ?
  451. AND T.CONFIRM_FLAG = '1'
  452. AND T.PRO_TYPE = '1'
  453. GROUP BY T.JUDGE_STOVE_NO) T1) T2
  454. ]]>
  455. </query>
  456. <query id="FrmMchControlLog.doQueryDayActual" desc="统计日">
  457. <![CDATA[ SELECT T2.JUDGE_STOVE_NO,
  458. T2.QUALIFIED_NUM,
  459. T2.QUALIFIED_WT,
  460. (SELECT round(NVL(((CASE
  461. WHEN TRUNC(TO_DATE(?, 'YYYY-MM-DD')) =
  462. TRUNC(SYSDATE) THEN
  463. SYSDATE
  464. ELSE
  465. TO_DATE(MAX(T.LOGS_END), 'YYYY-MM-DD HH24:MI')
  466. END -
  467. TO_DATE(MIN(T.LOGS_BEG), 'YYYY-MM-DD HH24:MI')) * 24 * 60),
  468. 0)) YOUMINUTES
  469. FROM MCH_CONTROL_LOG T
  470. WHERE T.PROC_DATE = ?
  471. AND T.PLINE_CODE = ?
  472. AND T.CONFIRM_FLAG = '1') YOUMINUTES,
  473. (SELECT round(NVL(SUM(((TO_DATE(T.LOGS_END, 'YYYY-MM-DD HH24:MI') -
  474. TO_DATE(T.LOGS_BEG, 'YYYY-MM-DD HH24:MI')) * 24 * 60)),
  475. 0)) MINUTES
  476. FROM MCH_CONTROL_LOG T
  477. WHERE T.PROC_DATE = ?
  478. AND T.PLINE_CODE = ?
  479. AND T.CONFIRM_FLAG = '1'
  480. AND T.PRO_TYPE = '2'
  481. AND (T.STOP_TYPE = '500601' OR T.STOP_TYPE = '500602')) MINUTES,
  482. (SELECT round(NVL(SUM(((TO_DATE(T.LOGS_END, 'YYYY-MM-DD HH24:MI') -
  483. TO_DATE(T.LOGS_BEG, 'YYYY-MM-DD HH24:MI')) * 24 * 60)),
  484. 0)) ABSMINUTES
  485. FROM MCH_CONTROL_LOG T
  486. WHERE T.PROC_DATE = ?
  487. AND T.PLINE_CODE = ?
  488. AND T.CONFIRM_FLAG = '1'
  489. AND T.PRO_TYPE = '2'
  490. AND T.STOP_TYPE = '500603') ABSMINUTES,
  491. (SELECT round(NVL(SUM(((TO_DATE(T.LOGS_END, 'YYYY-MM-DD HH24:MI') -
  492. TO_DATE(T.LOGS_BEG, 'YYYY-MM-DD HH24:MI')) * 24 * 60)),
  493. 0)) SUMMINUTES
  494. FROM MCH_CONTROL_LOG T
  495. WHERE T.PROC_DATE = ?
  496. AND T.PLINE_CODE = ?
  497. AND T.CONFIRM_FLAG = '1'
  498. AND T.PRO_TYPE = '2') SUMMINUTES
  499. FROM (SELECT COUNT(1) JUDGE_STOVE_NO,
  500. NVL(SUM(T1.QUALIFIED_NUM), 0) QUALIFIED_NUM,
  501. NVL(SUM(T1.QUALIFIED_WT), 0) QUALIFIED_WT
  502. FROM (SELECT T.JUDGE_STOVE_NO,
  503. NVL(SUM(T.QUALIFIED_NUM), 0) QUALIFIED_NUM,
  504. NVL(SUM(T.QUALIFIED_WT), 0) QUALIFIED_WT
  505. FROM MCH_CONTROL_LOG T
  506. WHERE T.PROC_DATE = ?
  507. AND T.PLINE_CODE = ?
  508. AND T.CONFIRM_FLAG = '1'
  509. AND T.PRO_TYPE = '1'
  510. GROUP BY T.JUDGE_STOVE_NO) T1) T2
  511. ]]>
  512. </query>
  513. <query id="FrmMchControlLog.OneKeyUpdateMilControlLog" desc="一键修改">
  514. <![CDATA[
  515. UPDATE MCH_CONTROL_LOG T SET T.LOGS_END = ? WHERE T.CONTROL_ID = ?
  516. ]]>
  517. </query>
  518. <query id="FrmMchControlLog.UpdataPROCDATE" desc="更新调度中的生产年月">
  519. <![CDATA[
  520. UPDATE MCH_CONTROL_LOG T
  521. SET T.Proc_Date = CASE
  522. WHEN (substr(t.logs_beg,9,4)> '1200'
  523. AND substr(t.logs_beg,9,4)<= '2400') AND T.PRO_BC = '3' THEN TO_CHAR(TRUNC(to_date(t.logs_beg,'YYYY-MM-DD HH24:MI:SS'))+1,'YYYYMMDD')
  524. WHEN (substr(t.logs_beg,9,4) >='0000'
  525. AND substr(t.logs_beg,9,4)< '1200') AND T.PRO_BC = '3' THEN TO_CHAR(TRUNC(to_date(t.logs_beg,'YYYY-MM-DD HH24:MI:SS')),'YYYYMMDD')
  526. ELSE TO_CHAR(TRUNC(to_date(t.logs_beg,'YYYY-MM-DD HH24:MI:SS')),'YYYYMMDD')END,
  527. T.Bal_Year_Month = CASE
  528. WHEN (substr(t.logs_beg,9,4)> '1200'
  529. AND substr(t.logs_beg,9,4)<= '2400') AND T.PRO_BC = '3' THEN TO_CHAR(TRUNC(to_date(t.logs_beg,'YYYY-MM-DD HH24:MI:SS'))+1,'YYYYMM')
  530. WHEN (substr(t.logs_beg,9,4) >='0000'
  531. AND substr(t.logs_beg,9,4)< '1200') AND T.PRO_BC = '3' THEN TO_CHAR(TRUNC(to_date(t.logs_beg,'YYYY-MM-DD HH24:MI:SS')),'YYYYMM')
  532. ELSE TO_CHAR(TRUNC(to_date(t.logs_beg,'YYYY-MM-DD HH24:MI:SS')),'YYYYMM')END
  533. WHERE T.Proc_Date IS NULL
  534. ]]>
  535. </query>
  536. <query id="FrmMchControlLog.doMinutesQuery" desc="查询调度生产运行停机时间">
  537. <![CDATA[
  538. ]]>
  539. </query>
  540. </queryMap>