ecfe658ea5c5eb29a832f4481e8f271eb1ae848d.svn-base 12 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149
  1. <?xml version="1.0" encoding='UTF-8'?>
  2. <queryMap desc="">
  3. <query id="UIB030050.SELECT" desc="" fetchSize="10">
  4. <![CDATA[
  5. SELECT (CASE WHEN SUBSTR(T.DT,7,1) = '0' THEN SUBSTR(T.DT,8,1) ELSE SUBSTR(T.DT,7,2) END ) SEQ
  6. ,TO_CHAR('当日') DANGRI
  7. ,TO_CHAR('累计') LEIJI
  8. ,TO_CHAR(SUM(SLAB_WGT)OVER(ORDER BY T.DT),'FM999990.000') SLAB_WGT_LJ
  9. ,TO_CHAR(SUM(HGYL)OVER(ORDER BY T.DT),'FM999990.000') HGYL_LJ
  10. ,TO_CHAR(SUM(HGL)OVER(ORDER BY T.DT),'FM999990.000') HGL_LJ
  11. ,TO_CHAR((CASE WHEN SUM(HGL)OVER(ORDER BY T.DT) != 0 AND SUM(HGYL)OVER(ORDER BY T.DT)!= 0 THEN
  12. SUM(HGL)OVER(ORDER BY T.DT)/SUM(HGYL)OVER(ORDER BY T.DT) END)*100, 'FM990.00') CCL_LJ
  13. ,TO_CHAR((CASE WHEN SUM(HGL)OVER(ORDER BY T.DT) != 0 THEN
  14. SUM(HGL)OVER(ORDER BY T.DT)/(SUM(HGL)OVER(ORDER BY T.DT)+(CASE WHEN SUM(GYC_LEIJI)OVER(ORDER BY T.DT) != 0 THEN
  15. SUM(GYC_LEIJI)OVER(ORDER BY T.DT) ELSE 0 END))END)*100,'FM990.00') HGLV_LJ
  16. ,TO_CHAR(SUM(GYC_TUDU)OVER(ORDER BY T.DT),'FM999990.000') GYC_TUDU_LJ
  17. ,TO_CHAR(SUM(GYC_LANGXING)OVER(ORDER BY T.DT),'FM999990.000') GYC_LANGXING_LJ
  18. ,TO_CHAR(SUM(GYC_GUNYIN)OVER(ORDER BY T.DT),'FM999990.000') GYC_GUNYIN_LJ
  19. ,TO_CHAR(SUM(GYC_YAHENG)OVER(ORDER BY T.DT),'FM999990.000') GYC_YAHENG_LJ
  20. ,TO_CHAR(SUM(GYC_HUASHANG)OVER(ORDER BY T.DT),'FM999990.000') GYC_HUASHANG_LJ
  21. ,TO_CHAR(SUM(GYC_TUKUAI)OVER(ORDER BY T.DT),'FM999990.000') GYC_TUKUAI_LJ
  22. ,TO_CHAR(SUM(GYC_QITA)OVER(ORDER BY T.DT),'FM999990.000') GYC_QITA_LJ
  23. ,TO_CHAR(SUM(GYC_GUANGLIANG)OVER(ORDER BY T.DT),'FM999990.000') GYC_GUANGLIANG_LJ
  24. ,TO_CHAR(SUM(GYC_ZHONGLIANG)OVER(ORDER BY T.DT),'FM999990.000') GYC_ZHONGLIANG_LJ
  25. ,TO_CHAR(SUM(GYC_BIANSUN)OVER(ORDER BY T.DT),'FM999990.000') GYC_BIANSUN_LJ
  26. ,TO_CHAR(SUM(GYC_HOUDU)OVER(ORDER BY T.DT),'FM999990.000') GYC_HOUDU_LJ
  27. ,TO_CHAR(SUM(GYC_XIEXING)OVER(ORDER BY T.DT),'FM999990.000') GYC_XIEXING_LJ
  28. ,TO_CHAR(SUM(GYC_MADIAN)OVER(ORDER BY T.DT),'FM999990.000') GYC_MADIAN_LJ
  29. ,TO_CHAR(SUM(GYC_KUANDU)OVER(ORDER BY T.DT),'FM999990.000') GYC_KUANDU_LJ
  30. ,TO_CHAR(SUM(GYC_JUANXING)OVER(ORDER BY T.DT),'FM999990.000') GYC_JUANXING_LJ
  31. ,TO_CHAR(SUM(GYC_ZHEDIE)OVER(ORDER BY T.DT),'FM999990.000') GYC_ZHEDIE_LJ
  32. ,TO_CHAR(SUM(GYC_TAXING)OVER(ORDER BY T.DT),'FM999990.000') GYC_TAXING_LJ
  33. ,TO_CHAR(SUM(GYC_BUPING)OVER(ORDER BY T.DT),'FM999990.000') GYC_BUPING_LJ
  34. ,TO_CHAR(SUM(GYC_XINGNENG)OVER(ORDER BY T.DT),'FM999990.000') GYC_XINGNENG_LJ
  35. ,TO_CHAR(SUM(GYC_FEIPIN)OVER(ORDER BY T.DT),'FM999990.000') GYC_FEIPIN_LJ
  36. ,TO_CHAR(SUM(GYC_LEIJI)OVER(ORDER BY T.DT),'FM999990.000') GYC_LEIJI_LJ
  37. ,TO_CHAR(SUM(GZC_QIPAO)OVER(ORDER BY T.DT),'FM999990.000') GZC_QIPAO_LJ
  38. ,TO_CHAR(SUM(GZC_FENCENG)OVER(ORDER BY T.DT),'FM999990.000') GZC_FENCENG_LJ
  39. ,TO_CHAR(SUM(GZC_JIAZA)OVER(ORDER BY T.DT),'FM999990.000') GZC_JIAZA_LJ
  40. ,TO_CHAR(SUM(GZC_BIANLIE)OVER(ORDER BY T.DT),'FM999990.000') GZC_BIANLIE_LJ
  41. ,TO_CHAR(SUM(GZC_AOKENG)OVER(ORDER BY T.DT),'FM999990.000') GZC_AOKENG_LJ
  42. ,TO_CHAR(SUM(GZC_HENGLIE)OVER(ORDER BY T.DT),'FM999990.000') GZC_HENGLIE_LJ
  43. ,TO_CHAR(SUM(GZC_QITA)OVER(ORDER BY T.DT),'FM999990.000') GZC_QITA_LJ
  44. ,TO_CHAR(SUM(GZC_ZONGLIE)OVER(ORDER BY T.DT),'FM999990.000') GZC_ZONGLIE_LJ
  45. ,TO_CHAR(SUM(GZC_LEIJI)OVER(ORDER BY T.DT),'FM999990.000') GZC_LEIJI_LJ
  46. ,T.*
  47. FROM
  48. (SELECT
  49. SUBSTR(H02CC.MILL_DTIME,1,8) DT
  50. ,to_char(SUM(G02SC.SLAB_WGT)/1000,'FM999990.000') SLAB_WGT --原料
  51. ,to_char((SUM(G02SC.SLAB_WGT)-SUM(CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND Z00C.CD_SEQ = '1'
  52. THEN H02CC.ACT_WGT ELSE 0 END)*1.064)/1000,'FM999990.000') HGYL --合格原料 = 原料 - 钢质次小计
  53. ,TO_CHAR(SUM((CASE WHEN H02CC.TOT_DEC_GRD = '1' OR H02CC.ORD_FL = '2' THEN H02CC.ACT_WGT END))/1000,'FM999990.000') HGL --合格量
  54. ,(CASE WHEN SUM(G02SC.SLAB_WGT) != 0 AND to_char(SUM((CASE WHEN H02CC.TOT_DEC_GRD = '1' OR H02CC.TOT_DEC_GRD IS NULL THEN H02CC.ACT_WGT/1000 END)),'FM999990.000') != 0
  55. THEN TO_CHAR((SUM(CASE WHEN H02CC.TOT_DEC_GRD = '1' OR H02CC.TOT_DEC_GRD IS NULL THEN H02CC.ACT_WGT END)
  56. /(SUM(G02SC.SLAB_WGT)-SUM(CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND Z00C.CD_SEQ = '1'THEN H02CC.ACT_WGT ELSE 0 END)*1.064)
  57. )*100,'FM990.00')
  58. ELSE ' ' END)CCL
  59. ,(CASE WHEN SUM((CASE WHEN H02CC.TOT_DEC_GRD = '1' OR H02CC.TOT_DEC_GRD IS NULL THEN H02CC.ACT_WGT END)) != 0
  60. THEN TO_CHAR((SUM((CASE WHEN H02CC.TOT_DEC_GRD = '1' OR H02CC.TOT_DEC_GRD IS NULL THEN H02CC.ACT_WGT END))
  61. /(SUM((CASE WHEN H02CC.TOT_DEC_GRD = '1' OR H02CC.TOT_DEC_GRD IS NULL THEN H02CC.ACT_WGT END))+SUM(CASE WHEN (H02CC.EXTSHAPE_DEC_GRD = '3' AND Z00C.CD_SEQ = '2')
  62. OR (H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 IS NULL AND H02CC.MATLQLTY_DEC_GRD != '1' )
  63. OR H02CC.EXTSHAPE_DEC_GRD = '4' THEN H02CC.ACT_WGT ELSE 0 END))
  64. )*100,'FM990.00')
  65. ELSE ' ' END)HGLV --成材率
  66. ,TO_CHAR(SUM((CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 = '10' THEN
  67. H02CC.ACT_WGT END))/1000,'FM999990.000') GYC_TUDU --工艺次,凸度
  68. ,TO_CHAR(SUM((CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 = '09' THEN
  69. H02CC.ACT_WGT END ))/1000,'FM999990.000') GYC_LANGXING --工艺次,浪形
  70. ,TO_CHAR(SUM((CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 = '08' THEN
  71. H02CC.ACT_WGT END ))/1000,'FM999990.000') GYC_GUNYIN --工艺次,辊印
  72. ,TO_CHAR(SUM((CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 = '24' THEN
  73. H02CC.ACT_WGT END))/1000,'FM999990.000') GYC_YAHENG --工艺次,压痕
  74. ,TO_CHAR(SUM((CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 = '03' THEN
  75. H02CC.ACT_WGT END))/1000,'FM999990.000') GYC_HUASHANG --工艺次,划伤
  76. ,TO_CHAR(SUM((CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 = '01' THEN
  77. H02CC.ACT_WGT END))/1000,'FM999990.000') GYC_TUKUAI --工艺次,凸块
  78. ,TO_CHAR(SUM((CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 = '02' THEN
  79. H02CC.ACT_WGT END))/1000,'FM999990.000') GYC_YIWU --工艺次,异物压入
  80. ,TO_CHAR(SUM((CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 = '56' THEN
  81. H02CC.ACT_WGT END))/1000,'FM999990.000') GYC_QITA --工艺次,其他
  82. ,TO_CHAR(SUM((CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 = '53' THEN
  83. H02CC.ACT_WGT END))/1000,'FM999990.000') GYC_GUANGLIANG --工艺次,光亮带
  84. ,TO_CHAR(SUM((CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 = '55' THEN
  85. H02CC.ACT_WGT END))/1000,'FM999990.000') GYC_ZHONGLIANG --工艺次,重量不良
  86. ,TO_CHAR(SUM((CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 = '52' THEN
  87. H02CC.ACT_WGT END))/1000,'FM999990.000') GYC_BIANSUN --工艺次,边损
  88. ,TO_CHAR(SUM((CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 = '54' THEN
  89. H02CC.ACT_WGT END))/1000,'FM999990.000') GYC_HOUDU --工艺次,厚度不良
  90. ,TO_CHAR(SUM((CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 = '43' THEN
  91. H02CC.ACT_WGT END))/1000,'FM999990.000') GYC_XIEXING --工艺次,楔形
  92. ,TO_CHAR(SUM((CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 = '39' THEN
  93. H02CC.ACT_WGT END))/1000,'FM999990.000') GYC_MADIAN --工艺次,麻点
  94. ,TO_CHAR(SUM((CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 = '29' THEN
  95. H02CC.ACT_WGT END))/1000,'FM999990.000') GYC_KUANDU --工艺次,宽度不良
  96. ,TO_CHAR(SUM((CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 = '26' THEN
  97. H02CC.ACT_WGT END))/1000,'FM999990.000') GYC_JUANXING --工艺次,卷形不良
  98. ,TO_CHAR(SUM((CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 = '24' THEN
  99. H02CC.ACT_WGT END))/1000,'FM999990.000') GYC_ZHEDIE --工艺次,折叠
  100. ,TO_CHAR(SUM((CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 = '22' THEN
  101. H02CC.ACT_WGT END))/1000,'FM999990.000') GYC_TAXING --工艺次,塔形
  102. ,TO_CHAR(SUM((CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 = '20' THEN
  103. H02CC.ACT_WGT END))/1000,'FM999990.000') GYC_BUPING --工艺次,不平度
  104. ,TO_CHAR(SUM(CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 IS NULL AND H02CC.MATLQLTY_DEC_GRD != '1'
  105. THEN H02CC.ACT_WGT END)/1000,'FM999990.000') GYC_XINGNENG --工艺次,性能次
  106. ,TO_CHAR(SUM(CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '4' THEN
  107. H02CC.ACT_WGT END)/1000,'FM999990.000') GYC_FEIPIN --工艺次,废品
  108. --,TO_CHAR(SUM(SQ_QD_COMMON.FIND_COIL_GYC(H02CC.COIL_NO))/1000,'FM999990.000') GYC_LEIJI
  109. ,TO_CHAR(SUM(CASE WHEN (H02CC.EXTSHAPE_DEC_GRD = '3' AND Z00C.CD_SEQ = '2')
  110. OR (H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 IS NULL AND H02CC.MATLQLTY_DEC_GRD != '1' )
  111. OR H02CC.EXTSHAPE_DEC_GRD = '4' THEN H02CC.ACT_WGT END)/1000,'FM999990.000') GYC_LEIJI --工艺次,累计
  112. ,TO_CHAR(SUM((CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 = '37' THEN
  113. H02CC.ACT_WGT END))/1000,'FM999990.000') GZC_QIPAO --钢质次,气泡
  114. ,TO_CHAR(SUM((CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 = '38' THEN
  115. H02CC.ACT_WGT END))/1000,'FM999990.000') GZC_FENCENG --钢质次,分层
  116. ,TO_CHAR(SUM((CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 = '42' THEN
  117. H02CC.ACT_WGT END))/1000,'FM999990.000') GZC_JIAZA --钢质次,夹杂
  118. ,TO_CHAR(SUM((CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 = '11' THEN
  119. H02CC.ACT_WGT END))/1000,'FM999990.000') GZC_BIANLIE --钢质次,边裂
  120. ,TO_CHAR(SUM((CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 = '06' THEN
  121. H02CC.ACT_WGT END))/1000,'FM999990.000') GZC_AOKENG --钢质次,凹坑
  122. ,TO_CHAR(SUM((CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 = '57' THEN
  123. H02CC.ACT_WGT END))/1000,'FM999990.000') GZC_HENGLIE --钢质次,横裂
  124. ,TO_CHAR(SUM((CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 = '59' THEN
  125. H02CC.ACT_WGT END))/1000,'FM999990.000') GZC_QITA --钢质次,其它(钢质)
  126. ,TO_CHAR(SUM((CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND H02CC.CRK_CD1 = '58' THEN
  127. H02CC.ACT_WGT END))/1000,'FM999990.000') GZC_ZONGLIE --钢质次,纵裂
  128. --,TO_CHAR(SUM(SQ_QD_COMMON.FIND_COIL_GZC(H02CC.COIL_NO))/1000,'FM999990.000') GZC_LEIJI
  129. --钢质次,累计
  130. ,TO_CHAR(SUM(CASE WHEN H02CC.EXTSHAPE_DEC_GRD = '3' AND Z00C.CD_SEQ = '1'
  131. THEN H02CC.ACT_WGT END)/1000,'FM999990.000') GZC_LEIJI
  132. FROM TBH02_COIL_COMM H02CC
  133. ,TBG02_SLAB_COMM G02SC
  134. ,(SELECT T.SM_CD,T.SM_CFNM,T.CD_SEQ
  135. FROM TBZ00_COMMCD T WHERE T.LG_CD = 'H02001' AND T.CD_SEQ IS NOT NULL) Z00C
  136. ,(SELECT T.SM_CD,T.SM_CFNM FROM TBZ00_COMMCD T WHERE T.LG_CD = 'B01132') CDDM
  137. WHERE H02CC.SLAB_NO = G02SC.SLAB_NO(+)
  138. AND H02CC.CRK_CD1 = Z00C.SM_CD(+)
  139. AND SUBSTR(G02SC.SLAB_NO,3,1) = CDDM.SM_CD
  140. AND H02CC.MILL_DTIME >= SUBSTR(:1,1,6)||'01000000'
  141. AND H02CC.MILL_DTIME <= :2||'235959'
  142. AND H02CC.MISSNO_CLF_CD IS NULL
  143. GROUP BY
  144. SUBSTR(H02CC.MILL_DTIME,1,8)
  145. ORDER BY SUBSTR(H02CC.MILL_DTIME,1,8)) T
  146. ]]>
  147. </query>
  148. </queryMap>