22707dc9d09722eb9409cd4d54d424aa24a94344.svn-base 25 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653
  1. <?xml version="1.0" encoding='UTF-8'?>
  2. <queryMap desc="钢卷缺陷录入与措施">
  3. <query id="UIB020230_01.INITSELECT" desc="初始化外观缺陷代码表 BugResult">
  4. SELECT
  5. 'N' CHK
  6. , SM_CFNM
  7. , SM_CD
  8. FROM TBZ00_COMMCD T WHERE LG_CD='H02001'
  9. AND T.USED_YN = 'Y'
  10. </query>
  11. <query id="UIB020230_02.INITSELECT" desc="初始化外观缺陷代码表 BugResult">
  12. SELECT
  13. 'N' CHK
  14. , SM_CFNM
  15. , SM_CD
  16. FROM TBZ00_COMMCD T WHERE LG_CD='H02002'
  17. AND T.USED_YN = 'Y'
  18. </query>
  19. <query id="UIB020230_011.SELECT" desc="尺寸、外观未判定钢卷过滤">
  20. /* SELECT
  21. 'N' CHK
  22. , '' EXT_FLAG
  23. , '' SMP_FLAG
  24. , '' SIZE_FLAG
  25. , ROW_NUMBER() OVER (ORDER BY A.OLD_SAMPL_NO ) SEQ
  26. , A.COIL_NO --钢卷号
  27. , A.OLD_SAMPL_NO --成分钢卷号
  28. , A.INSTR_COIL_THK
  29. , A.INSTR_COIL_WTH
  30. , B.DEL_TOL_THK_MIN
  31. , B.DEL_TOL_THK_MAX
  32. , B.DEL_TOL_WTH_MIN
  33. , B.DEL_TOL_WTH_MAX
  34. , TO_CHAR( A.INSTR_COIL_WGT/0.95*0.98 ,'99999999999' ) INSTR_COIL_WGT
  35. , A.COIL_THK
  36. , A.COIL_WTH
  37. , A.ACT_WGT
  38. , A.L2_COIL_WEIGHT
  39. , A.COIL_END_DTIME --卷取时间
  40. , A.SMP_DIR_PIC_YN --是否需要取样(指示)
  41. , A.SAMPL_PICK_YN --是否已取样(实绩)
  42. , A.SPEC_ABBSYM --标准号
  43. , A.SPEC_STL_GRD --标准钢号
  44. , A.EXTSHAPE_DEC_GRD --外观判定等级
  45. , A.CRK_CD1 --外观缺陷缺陷1
  46. , A.CRK_CD2 --外观缺陷缺陷2
  47. , A.CRK_CD3 --外观缺陷缺陷3
  48. , A.CRK_CD4 --外观缺陷缺陷4
  49. , A.CRK_CD5 --外观缺陷缺陷5
  50. , A.SPM_YN --SMP是否作业
  51. , A.MISSNO_CLF_CD --有无却号
  52. , A.SAMPL_NO SMP_NO
  53. , A.SAMPL_CUT_LOC SMP_CUT_LOC
  54. , A.DCS_WTH --判定宽度
  55. , A.DCS_THK --判定厚度
  56. , A.COIL_THK_OS
  57. , A.COIL_THK_CL
  58. , A.COIL_THK_DS
  59. , A.COIL_STAT
  60. , A.SIZE_DEC_RST
  61. , A.SPM_RMK
  62. , A.CUR_PROG_CD
  63. FROM TBH02_COIL_COMM A , TBB01_ORD_DEL B
  64. WHERE (A.SIZE_DEC_RST IS NULL OR A.EXTSHAPE_DEC_GRD IS NULL)
  65. AND A.COIL_STAT = '2'
  66. AND A.MISSNO_CLF_CD IS NULL
  67. --AND NVL(A.CUR_PROG_CD,'NULLCD') != 'SFF'--徐工要求去掉运送完成,金工需要数据(商议中)
  68. AND A.ORD_NO = B.ORD_NO(+)
  69. AND A.ORD_SEQ = B.ORD_SEQ(+)
  70. AND B.DSN_KIND = (SELECT MIN(O.DSN_KIND) FROM TBB01_ORD_DEL O WHERE O.ORD_NO = A.ORD_NO AND O.ORD_SEQ = A.ORD_SEQ )*/
  71. SELECT
  72. 'N' CHK
  73. , '' EXT_FLAG
  74. , '' SMP_FLAG
  75. , '' SIZE_FLAG
  76. , ROW_NUMBER() OVER (ORDER BY A.OLD_SAMPL_NO ) SEQ
  77. , A.COIL_NO --钢卷号
  78. , A.OLD_SAMPL_NO --成分钢卷号
  79. , A.INSTR_COIL_THK
  80. , A.INSTR_COIL_WTH
  81. , B.DEL_TOL_THK_MIN
  82. , B.DEL_TOL_THK_MAX
  83. , B.DEL_TOL_WTH_MIN
  84. , B.DEL_TOL_WTH_MAX
  85. , TO_CHAR( A.INSTR_COIL_WGT/0.95*0.98 ,'99999999999' ) INSTR_COIL_WGT
  86. , A.COIL_THK
  87. , A.COIL_WTH
  88. , A.ACT_WGT
  89. , A.L2_COIL_WEIGHT
  90. , A.COIL_END_DTIME --卷取时间
  91. , A.SMP_DIR_PIC_YN --是否需要取样(指示)
  92. , A.SAMPL_PICK_YN --是否已取样(实绩)
  93. , A.SPEC_ABBSYM --标准号
  94. , A.SPEC_STL_GRD --标准钢号
  95. , A.EXTSHAPE_DEC_GRD --外观判定等级
  96. , A.CRK_CD1 --外观缺陷缺陷1
  97. , A.CRK_CD2 --外观缺陷缺陷2
  98. , A.CRK_CD3 --外观缺陷缺陷3
  99. , A.CRK_CD4 --外观缺陷缺陷4
  100. , A.CRK_CD5 --外观缺陷缺陷5
  101. , A.SPM_YN --SMP是否作业
  102. , A.MISSNO_CLF_CD --有无却号
  103. , A.SAMPL_NO SMP_NO
  104. , A.SAMPL_CUT_LOC SMP_CUT_LOC
  105. , A.DCS_WTH --判定宽度
  106. , A.DCS_THK --判定厚度
  107. , A.COIL_THK_OS
  108. , A.COIL_THK_CL
  109. , A.COIL_THK_DS
  110. , A.COIL_STAT
  111. , A.SIZE_DEC_RST
  112. , A.SPM_RMK
  113. , A.CUR_PROG_CD
  114. ,A.CUR_LOAD_LOC,
  115. C.ORD_DEVLMT_DATE
  116. FROM TBH02_COIL_COMM A , TBB01_ORD_DEL B,TBA01_ORD_LINE C
  117. WHERE
  118. --AND NVL(A.CUR_PROG_CD,'NULLCD') != 'SFF'--徐工要求去掉运送完成,金工需要数据(商议中)
  119. A.ORD_NO = C.ORD_NO(+)
  120. AND A.ORD_SEQ = C.ORD_SEQ(+)
  121. AND A.ORD_NO = B.ORD_NO(+)
  122. AND A.ORD_SEQ = B.ORD_SEQ(+)
  123. AND (A.SIZE_DEC_RST IS NULL OR A.EXTSHAPE_DEC_GRD IS NULL)
  124. AND A.MISSNO_CLF_CD IS NULL
  125. AND A.COIL_STAT = '2'
  126. AND B.DSN_KIND = (SELECT MIN(O.DSN_KIND) FROM TBB01_ORD_DEL O WHERE O.ORD_NO = A.ORD_NO AND O.ORD_SEQ = A.ORD_SEQ )
  127. </query>
  128. <query id="UIB020230_012.SELECT" desc="钢卷信息查询,过滤取样钢卷">
  129. /* SELECT
  130. 'N' CHK
  131. , '' EXT_FLAG
  132. , '' SMP_FLAG
  133. , '' SIZE_FLAG
  134. , ROW_NUMBER() OVER (ORDER BY A.OLD_SAMPL_NO ) SEQ
  135. , A.COIL_NO --钢卷号
  136. , A.OLD_SAMPL_NO --成分钢卷号
  137. , A.INSTR_COIL_THK
  138. , A.INSTR_COIL_WTH
  139. , TO_CHAR( A.INSTR_COIL_WGT/0.95*0.98 ,'99999999999' ) INSTR_COIL_WGT
  140. , A.COIL_THK
  141. , A.COIL_WTH
  142. , A.ACT_WGT
  143. , A.L2_COIL_WEIGHT
  144. , A.COIL_END_DTIME --卷取时间
  145. , A.SMP_DIR_PIC_YN --是否需要取样(指示)
  146. , A.SAMPL_PICK_YN --是否已取样(实绩)
  147. , A.SPEC_ABBSYM --标准号
  148. , A.SPEC_STL_GRD --标准钢号
  149. , A.EXTSHAPE_DEC_GRD --外观判定等级
  150. , A.CRK_CD1 --外观缺陷缺陷1
  151. , A.CRK_CD2 --外观缺陷缺陷2
  152. , A.CRK_CD3 --外观缺陷缺陷3
  153. , A.CRK_CD4 --外观缺陷缺陷4
  154. , A.CRK_CD5 --外观缺陷缺陷5
  155. , A.SPM_YN --SMP是否作业
  156. , A.MISSNO_CLF_CD --有无却号
  157. , A.SAMPL_NO SMP_NO
  158. , A.SAMPL_CUT_LOC SMP_CUT_LOC
  159. , A.DCS_WTH --判定宽度
  160. , A.DCS_THK --判定厚度
  161. , A.COIL_THK_OS
  162. , A.COIL_THK_CL
  163. , A.COIL_THK_DS
  164. , A.COIL_STAT
  165. , A.SIZE_DEC_RST
  166. , A.CUR_PROG_CD
  167. , A.SPM_RMK
  168. FROM TBH02_COIL_COMM A
  169. WHERE SMP_DIR_PIC_YN = 'Y'
  170. AND A.SAMPL_PICK_YN IS NULL
  171. --AND NVL(A.CUR_PROG_CD,'NULLCD') != 'SFF'--徐工要求去掉运送完成 ,金工需要数据(商议中)
  172. ORDER BY A.OLD_SAMPL_NO DESC */
  173. SELECT 'N' CHK,
  174. '' EXT_FLAG,
  175. '' SMP_FLAG,
  176. '' SIZE_FLAG,
  177. ROW_NUMBER() OVER(ORDER BY A.OLD_SAMPL_NO) SEQ,
  178. A.COIL_NO --钢卷号
  179. ,
  180. A.OLD_SAMPL_NO --成分钢卷号
  181. ,
  182. A.INSTR_COIL_THK,
  183. A.INSTR_COIL_WTH,
  184. TO_CHAR(A.INSTR_COIL_WGT / 0.95 * 0.98, '99999999999') INSTR_COIL_WGT,
  185. A.COIL_THK,
  186. A.COIL_WTH,
  187. A.ACT_WGT,
  188. A.L2_COIL_WEIGHT,
  189. A.COIL_END_DTIME --卷取时间
  190. ,
  191. A.SMP_DIR_PIC_YN --是否需要取样(指示)
  192. ,
  193. A.SAMPL_PICK_YN --是否已取样(实绩)
  194. ,
  195. A.SPEC_ABBSYM --标准号
  196. ,
  197. A.SPEC_STL_GRD --标准钢号
  198. ,
  199. A.EXTSHAPE_DEC_GRD --外观判定等级
  200. ,
  201. A.CRK_CD1 --外观缺陷缺陷1
  202. ,
  203. A.CRK_CD2 --外观缺陷缺陷2
  204. ,
  205. A.CRK_CD3 --外观缺陷缺陷3
  206. ,
  207. A.CRK_CD4 --外观缺陷缺陷4
  208. ,
  209. A.CRK_CD5 --外观缺陷缺陷5
  210. ,
  211. A.SPM_YN --SMP是否作业
  212. ,
  213. A.MISSNO_CLF_CD --有无却号
  214. ,
  215. A.SAMPL_NO SMP_NO,
  216. A.SAMPL_CUT_LOC SMP_CUT_LOC,
  217. A.DCS_WTH --判定宽度
  218. ,
  219. A.DCS_THK --判定厚度
  220. ,
  221. A.COIL_THK_OS,
  222. A.COIL_THK_CL,
  223. A.COIL_THK_DS,
  224. A.COIL_STAT,
  225. A.SIZE_DEC_RST,
  226. A.CUR_PROG_CD,
  227. A.SPM_RMK,
  228. A.CUR_LOAD_LOC,
  229. B.ORD_DEVLMT_DATE
  230. FROM TBH02_COIL_COMM A,TBA01_ORD_LINE B
  231. WHERE A.ORD_NO=B.ORD_NO(+)
  232. AND A.ORD_SEQ=B.ORD_SEQ(+)
  233. AND SMP_DIR_PIC_YN = 'Y'
  234. AND A.SAMPL_PICK_YN IS NULL
  235. --AND NVL(A.CUR_PROG_CD,'NULLCD') != 'SFF'--徐工要求去掉运送完成 ,金工需要数据(商议中)
  236. ORDER BY A.OLD_SAMPL_NO DESC
  237. </query>
  238. <query id="UIB020230_013.SELECT" desc="按轧辊单元查询">
  239. <![CDATA[
  240. /* SELECT BB.*
  241. , AA.DEL_TOL_THK_MIN
  242. , AA.DEL_TOL_THK_MAX
  243. , (AA.DEL_TOL_THK_MAX+AA.DEL_TOL_THK_MIN)/2 DEL_TOL_THK_AVG
  244. , AA.DEL_TOL_WTH_MIN
  245. , AA.DEL_TOL_WTH_MAX
  246. , (AA.DEL_TOL_WTH_MIN+AA.DEL_TOL_WTH_MAX)/2 DEL_TOL_WTH_AVG
  247. , AA.CUST_SPEC_NO
  248. FROM
  249. (SELECT ORD.* , DECODE(OHD.CUST_SPEC_NO , NULL , 'N' , 'Y') CUST_SPEC_NO FROM TBB01_ORD_DEL ORD ,TBB01_ORD_HEAD OHD
  250. WHERE ORD.ORD_NO = OHD.ORD_NO
  251. AND ORD.ORD_SEQ = OHD.ORD_SEQ
  252. AND (ORD.DSN_KIND = (SELECT MIN(DEL.DSN_KIND)
  253. FROM TBB01_ORD_DEL DEL
  254. WHERE DEL.ORD_NO = ORD.ORD_NO
  255. AND DEL.ORD_SEQ = ORD.ORD_SEQ ))) AA
  256. , (SELECT
  257. 'N' CHK
  258. , '' EXT_FLAG
  259. , '' SMP_FLAG
  260. , '' SIZE_FLAG
  261. , C.ROLL_SLAB_SEQ SEQ
  262. , A.COIL_NO --钢卷号
  263. , A.OLD_SAMPL_NO --成分钢卷号
  264. , A.INSTR_COIL_THK
  265. , A.INSTR_COIL_WTH
  266. , TO_CHAR( A.INSTR_COIL_WGT/0.95*0.98 ,'99999999999' ) INSTR_COIL_WGT
  267. , A.COIL_LEN
  268. , A.COIL_THK
  269. , A.COIL_WTH
  270. , A.ACT_WGT
  271. , A.L2_COIL_WEIGHT
  272. , A.COIL_END_DTIME --卷取时间
  273. , A.SMP_DIR_PIC_YN --是否需要取样(指示)
  274. , A.SAMPL_PICK_YN --是否已取样(实绩)
  275. , A.SPEC_ABBSYM --标准号
  276. , A.SPEC_STL_GRD --标准钢号
  277. , A.EXTSHAPE_DEC_GRD --外观判定等级
  278. , A.CRK_CD1 --外观缺陷缺陷1
  279. , A.CRK_CD2 --外观缺陷缺陷2
  280. , A.CRK_CD3 --外观缺陷缺陷3
  281. , A.CRK_CD4 --外观缺陷缺陷4
  282. , A.CRK_CD5 --外观缺陷缺陷5
  283. , A.SPM_RMK
  284. , SPM_CRK_CD1
  285. , SPM_CRK_CD2
  286. , SPM_CRK_CD3
  287. , SPM_CRK_CD4
  288. , SPM_CRK_CD5
  289. , A.SPM_YN --SMP是否作业
  290. , A.MISSNO_CLF_CD --有无却号
  291. , A.SAMPL_NO SMP_NO
  292. , A.SAMPL_CUT_LOC SMP_CUT_LOC
  293. , A.DCS_WTH --判定宽度
  294. , A.DCS_THK --判定厚度
  295. , A.COIL_THK_OS
  296. , A.COIL_THK_CL
  297. , A.COIL_THK_DS
  298. , A.COIL_STAT
  299. , A.SIZE_DEC_RST
  300. , A.CUR_PROG_CD
  301. ,C.ROLL_MANA_NO
  302. , C.ROLL_SLAB_SEQ
  303. ,B.FM_STRIP_WDG_AVG --楔形
  304. ,B.FM_STRIP_WDG_MAX --楔形
  305. ,B.FM_STRIP_WDG_MIN --楔形
  306. ,TO_CHAR(DECODE(A.COIL_LEN,'0','0','','0',ROUND((B.FM_STRIP_WDG_OUT_OF_RANGE/A.COIL_LEN)*100,2)) , '0.00' ) FM_STRIP_WDG_OUT_OF_RANGE --楔形出口不在范围
  307. ,B.FM_EXT_STRIP_CROWN --FM出口凸度额定
  308. ,B.FM_EXT_STRIP_CROWN_AVG --FM出口凸度平均
  309. ,B.FM_EXT_STRIP_CROWN_MIN --FM出口凸度最小
  310. ,B.FM_EXT_STRIP_CROWN_MAX --FM出口凸度最大
  311. ,TO_CHAR(DECODE(A.COIL_LEN,'0','0','','0',ROUND((B.FM_EXT_STRIP_CROWN_OUT_OF_LEN/A.COIL_LEN)*100,2)) , '0.00' ) FM_EXT_STRIP_CROWN_OUT_OF_LEN --FM出口凸度不在范?
  312. ,B.RHF_DESCAL_YN --除?机是否加??后
  313. ,B.RM_ENT_DESCAL_YN --除?机是否RM入口
  314. ,B.RM_EXT_DESCAL_YN --除?机是否RM出口
  315. ,(B.RHF_DESCAL_YN+B.RM_ENT_DESCAL_YN+B.RM_EXT_DESCAL_YN) ZONG_DESCAL_YN --总除磷次数
  316. ,B.FM_EXT_STRIP_THK --FM出口厚度?定
  317. ,B.FM_EXT_STRIP_THK_AVG --FM出口厚度平均
  318. ,B.FM_EXT_STRIP_THK_MIN --FM出口厚度最
  319. ,B.FM_EXT_STRIP_THK_MAX --FM出口厚度最大
  320. ,TO_CHAR(DECODE(A.COIL_LEN,'0','0','','0',ROUND((B.FM_EXT_STRIP_THK_OUT_OF_LEN/NVL(A.COIL_LEN,0))*100,2)) , '0.00' ) FM_EXT_STRIP_THK_OUT_OF_LEN --FM出口厚度不在范?
  321. ,B.FM_SYM_STRIP_FLATNESS_AVG --对称平直度平均?
  322. ,B.FM_SYM_STRIP_FLATNESS_MAX --对称平直度最大
  323. ,B.FM_SYM_STRIP_FLATNESS_MIN --对称平直度最小
  324. ,TO_CHAR(DECODE(A.COIL_LEN,'0','0','','0',ROUND((B.FM_SYM_STRIP_OUT_OF_RANGE/A.COIL_LEN)*100,2)) , '0.00' ) FM_SYM_STRIP_OUT_OF_RANGE --对称平直度不在范围
  325. ,B.DC_TEMP --额定卷取温度
  326. ,B.DC_TEMP_AVG --卷取温度平均?
  327. ,B.DC_TEMP_MIN --卷取温度最小?
  328. ,B.DC_TEMP_MAX --卷取温度最大?
  329. ,TO_CHAR(DECODE(A.COIL_LEN,'0','0','','0',ROUND((B.DC_TEMP_OUT_OF_RANGE/A.COIL_LEN)*100,2)) , '0.00') DC_TEMP_OUT_OF_RANGE --卷取?度不在范?
  330. ,B.FM_EXT_STRIP_TEMP --FM出口温度额定
  331. ,B.FM_EXT_STRIP_TEMP_AVG --FM出口温度平均
  332. ,B.FM_EXT_STRIP_TEMP_MIN --FM出口温度最小
  333. ,B.FM_EXT_STRIP_TEMP_MAX --FM出口温度最大
  334. ,DECODE(A.COIL_LEN,'0','0','','0',ROUND((B.STRIP_OUT_OF_RANGE/A.COIL_LEN)*100,2)) STRIP_OUT_OF_RANGE
  335. ,A.ORD_NO
  336. ,A.ORD_SEQ
  337. FROM TBH02_COIL_COMM A , TBH02_MILL_RESULT B , TBF02_SPEC_MILL C
  338. WHERE --SUBSTR(A.COIL_NO ,1,12 ) = SUBSTR( C.COIL_NO , 1,12)
  339. --AND A.COIL_NO = B.COIL_NO(+)
  340. C.COIL_NO = B.COIL_NO(+)
  341. AND SUBSTR(A.COIL_NO ,1,12 ) = SUBSTR( C.COIL_NO , 1,12)
  342. AND C.ROLL_MANA_NO = ?) BB
  343. WHERE AA.ORD_NO(+) = BB.ORD_NO
  344. AND AA.ORD_SEQ(+) = BB.ORD_SEQ
  345. --AND NVL(BB.CUR_PROG_CD,'NULLCD') != 'SFF'--徐工要求去掉运送完成 ,金工需要数据(商议中)
  346. ORDER BY BB.ROLL_MANA_NO ASC , BB.ROLL_SLAB_SEQ ASC */
  347. SELECT BB.*,
  348. AA.DEL_TOL_THK_MIN,
  349. AA.DEL_TOL_THK_MAX,
  350. (AA.DEL_TOL_THK_MAX + AA.DEL_TOL_THK_MIN) / 2 DEL_TOL_THK_AVG,
  351. AA.DEL_TOL_WTH_MIN,
  352. AA.DEL_TOL_WTH_MAX,
  353. (AA.DEL_TOL_WTH_MIN + AA.DEL_TOL_WTH_MAX) / 2 DEL_TOL_WTH_AVG,
  354. AA.CUST_SPEC_NO,
  355. AA.ORD_DEVLMT_DATE
  356. FROM (SELECT LIN.ORD_DEVLMT_DATE ORD_DEVLMT_DATE,
  357. ORD.DEL_TOL_THK_MIN DEL_TOL_THK_MIN,
  358. ORD.DEL_TOL_THK_MAX DEL_TOL_THK_MAX,
  359. ORD.DEL_TOL_WTH_MIN DEL_TOL_WTH_MIN,
  360. ORD.DEL_TOL_WTH_MAX DEL_TOL_WTH_MAX,
  361. ORD.ORD_NO ORD_NO,
  362. ORD.ORD_SEQ ORD_SEQ,
  363. DECODE(OHD.CUST_SPEC_NO, NULL, 'N', 'Y') CUST_SPEC_NO
  364. FROM TBA01_ORD_LINE LIN, TBB01_ORD_DEL ORD, TBB01_ORD_HEAD OHD
  365. WHERE LIN.ORD_NO=ORD.ORD_NO
  366. AND LIN.ORD_SEQ=ORD.ORD_SEQ
  367. AND ORD.ORD_NO = OHD.ORD_NO
  368. AND ORD.ORD_SEQ = OHD.ORD_SEQ
  369. AND (ORD.DSN_KIND =
  370. (SELECT MIN(DEL.DSN_KIND)
  371. FROM TBB01_ORD_DEL DEL
  372. WHERE DEL.ORD_NO = ORD.ORD_NO
  373. AND DEL.ORD_SEQ = ORD.ORD_SEQ))) AA,
  374. (SELECT 'N' CHK,
  375. '' EXT_FLAG,
  376. '' SMP_FLAG,
  377. '' SIZE_FLAG,
  378. C.ROLL_SLAB_SEQ SEQ,
  379. A.COIL_NO --钢卷号
  380. ,
  381. A.OLD_SAMPL_NO --成分钢卷号
  382. ,
  383. A.INSTR_COIL_THK,
  384. A.INSTR_COIL_WTH,
  385. TO_CHAR(A.INSTR_COIL_WGT / 0.95 * 0.98, '99999999999') INSTR_COIL_WGT,
  386. A.COIL_LEN,
  387. A.COIL_THK,
  388. A.COIL_WTH,
  389. A.ACT_WGT,
  390. A.L2_COIL_WEIGHT,
  391. A.COIL_END_DTIME --卷取时间
  392. ,
  393. A.SMP_DIR_PIC_YN --是否需要取样(指示)
  394. ,
  395. A.SAMPL_PICK_YN --是否已取样(实绩)
  396. ,
  397. A.SPEC_ABBSYM --标准号
  398. ,
  399. A.SPEC_STL_GRD --标准钢号
  400. ,
  401. A.EXTSHAPE_DEC_GRD --外观判定等级
  402. ,
  403. A.CRK_CD1 --外观缺陷缺陷1
  404. ,
  405. A.CRK_CD2 --外观缺陷缺陷2
  406. ,
  407. A.CRK_CD3 --外观缺陷缺陷3
  408. ,
  409. A.CRK_CD4 --外观缺陷缺陷4
  410. ,
  411. A.CRK_CD5 --外观缺陷缺陷5
  412. ,
  413. A.SPM_RMK,
  414. SPM_CRK_CD1,
  415. SPM_CRK_CD2,
  416. SPM_CRK_CD3,
  417. SPM_CRK_CD4,
  418. SPM_CRK_CD5,
  419. A.SPM_YN --SMP是否作业
  420. ,
  421. A.MISSNO_CLF_CD --有无却号
  422. ,
  423. A.SAMPL_NO SMP_NO,
  424. A.SAMPL_CUT_LOC SMP_CUT_LOC,
  425. A.DCS_WTH --判定宽度
  426. ,
  427. A.DCS_THK --判定厚度
  428. ,
  429. A.COIL_THK_OS,
  430. A.COIL_THK_CL,
  431. A.COIL_THK_DS,
  432. A.COIL_STAT,
  433. A.SIZE_DEC_RST,
  434. A.CUR_PROG_CD,
  435. C.ROLL_MANA_NO,
  436. C.ROLL_SLAB_SEQ,
  437. B.FM_STRIP_WDG_AVG --楔形
  438. ,
  439. B.FM_STRIP_WDG_MAX --楔形
  440. ,
  441. B.FM_STRIP_WDG_MIN --楔形
  442. ,
  443. TO_CHAR(DECODE(A.COIL_LEN,
  444. '0',
  445. '0',
  446. '',
  447. '0',
  448. ROUND((B.FM_STRIP_WDG_OUT_OF_RANGE / A.COIL_LEN) * 100,
  449. 2)),
  450. '0.00') FM_STRIP_WDG_OUT_OF_RANGE --楔形出口不在范围
  451. ,
  452. B.FM_EXT_STRIP_CROWN --FM出口凸度?定
  453. ,
  454. B.FM_EXT_STRIP_CROWN_AVG --FM出口凸度平均
  455. ,
  456. B.FM_EXT_STRIP_CROWN_MIN --FM出口凸度最小
  457. ,
  458. B.FM_EXT_STRIP_CROWN_MAX --FM出口凸度最大
  459. ,
  460. TO_CHAR(DECODE(A.COIL_LEN,
  461. '0',
  462. '0',
  463. '',
  464. '0',
  465. ROUND((B.FM_EXT_STRIP_CROWN_OUT_OF_LEN /
  466. A.COIL_LEN) * 100,
  467. 2)),
  468. '0.00') FM_EXT_STRIP_CROWN_OUT_OF_LEN --FM出口凸度不在范?
  469. ,
  470. B.RHF_DESCAL_YN --除?机是否加??后
  471. ,
  472. B.RM_ENT_DESCAL_YN --除?机是否RM入口
  473. ,
  474. B.RM_EXT_DESCAL_YN --除?机是否RM出口
  475. ,
  476. (B.RHF_DESCAL_YN + B.RM_ENT_DESCAL_YN + B.RM_EXT_DESCAL_YN) ZONG_DESCAL_YN --总除磷次数
  477. ,
  478. B.FM_EXT_STRIP_THK --FM出口厚度?定
  479. ,
  480. B.FM_EXT_STRIP_THK_AVG --FM出口厚度平均
  481. ,
  482. B.FM_EXT_STRIP_THK_MIN --FM出口厚度最
  483. ,
  484. B.FM_EXT_STRIP_THK_MAX --FM出口厚度最大
  485. ,
  486. TO_CHAR(DECODE(A.COIL_LEN,
  487. '0',
  488. '0',
  489. '',
  490. '0',
  491. ROUND((B.FM_EXT_STRIP_THK_OUT_OF_LEN /
  492. NVL(A.COIL_LEN, 0)) * 100,
  493. 2)),
  494. '0.00') FM_EXT_STRIP_THK_OUT_OF_LEN --FM出口厚度不在范?
  495. ,
  496. B.FM_SYM_STRIP_FLATNESS_AVG --对称平直度平均?
  497. ,
  498. B.FM_SYM_STRIP_FLATNESS_MAX --对称平直度最大
  499. ,
  500. B.FM_SYM_STRIP_FLATNESS_MIN --对称平直度最小
  501. ,
  502. TO_CHAR(DECODE(A.COIL_LEN,
  503. '0',
  504. '0',
  505. '',
  506. '0',
  507. ROUND((B.FM_SYM_STRIP_OUT_OF_RANGE / A.COIL_LEN) * 100,
  508. 2)),
  509. '0.00') FM_SYM_STRIP_OUT_OF_RANGE --对称平直度不在范围
  510. ,
  511. B.DC_TEMP --温定卷取额度
  512. ,
  513. B.DC_TEMP_AVG --卷取温度平均?
  514. ,
  515. B.DC_TEMP_MIN --卷取温度最小?
  516. ,
  517. B.DC_TEMP_MAX --卷取温度最大?
  518. ,
  519. TO_CHAR(DECODE(A.COIL_LEN,
  520. '0',
  521. '0',
  522. '',
  523. '0',
  524. ROUND((B.DC_TEMP_OUT_OF_RANGE / A.COIL_LEN) * 100,
  525. 2)),
  526. '0.00') DC_TEMP_OUT_OF_RANGE --卷取温度不在范?
  527. ,
  528. B.FM_EXT_STRIP_TEMP --FM出口温度额定
  529. ,
  530. B.FM_EXT_STRIP_TEMP_AVG --FM出口温度平均
  531. ,
  532. B.FM_EXT_STRIP_TEMP_MIN --FM出口温度最小
  533. ,
  534. B.FM_EXT_STRIP_TEMP_MAX --FM出口温度最大
  535. ,
  536. DECODE(A.COIL_LEN,
  537. '0',
  538. '0',
  539. '',
  540. '0',
  541. ROUND((B.STRIP_OUT_OF_RANGE / A.COIL_LEN) * 100, 2)) STRIP_OUT_OF_RANGE,
  542. A.ORD_NO,
  543. A.ORD_SEQ,
  544. A.CUR_LOAD_LOC
  545. FROM TBH02_COIL_COMM A, TBH02_MILL_RESULT B, TBF02_SPEC_MILL C
  546. WHERE --SUBSTR(A.COIL_NO ,1,12 ) = SUBSTR( C.COIL_NO , 1,12)
  547. --AND A.COIL_NO = B.COIL_NO(+)
  548. C.COIL_NO = B.COIL_NO(+)
  549. AND SUBSTR(A.COIL_NO, 1, 12) = SUBSTR(C.COIL_NO, 1, 12)
  550. AND ('Trues' = NVL(?, 'False') OR C.ROLL_MANA_NO = ?)
  551. --AND ROLL_MANA_NO = ?
  552. AND A.OLD_SAMPL_NO like ? || '%'
  553. AND ('True' <> ? OR A.COIL_END_DTIME BETWEEN ? AND ?)
  554. AND rownum < 8000
  555. ) BB
  556. WHERE AA.ORD_NO(+) = BB.ORD_NO
  557. AND AA.ORD_SEQ(+) = BB.ORD_SEQ
  558. --AND NVL(BB.CUR_PROG_CD,'NULLCD') != 'SFF'--徐工要求去掉运送完成 ,金工需要数据(商议中)
  559. ORDER BY BB.ROLL_MANA_NO ASC, BB.ROLL_SLAB_SEQ ASC
  560. ]]>
  561. </query>
  562. <query id="UIB020230_014.SELECT" desc="">
  563. SELECT SQ.QLTY_CD_CFNM
  564. ,IQ.QLTY_MIN
  565. ,IQ.QLTY_MAX
  566. FROM TBB02_INS_QLTY IQ , TBB01_SEQ_QLTY SQ
  567. WHERE IQ.SMP_NO = ?
  568. AND IQ.QLTY_CD = SQ.QLTY_CD
  569. </query>
  570. <query id="UIB020230_01.UPDATE" desc="更新">
  571. UPDATE TBH02_COIL_COMM SET
  572. CRK_CD1 = ? --缺陷
  573. ,CRK_CD2 = ?
  574. ,CRK_CD3 = ?
  575. ,CRK_CD4 = ?
  576. ,CRK_CD5 = ?
  577. ,SPM_YN = ? --SPM是否作业
  578. ,DCS_THK = ? --判定厚度
  579. ,DCS_WTH = ? --判定宽度
  580. WHERE COIL_NO = ? --钢卷号
  581. -- AND COIL_STAT = '2'
  582. -- AND CUR_PROG_CD = 'SED'
  583. </query>
  584. <query id="UIB020230_02.UPDATE" desc="当有取样时候,更新试样号的进程状态为B">
  585. UPDATE TBB02_LOT_COM
  586. SET SMP_PROG_CD = ? --为B
  587. , SMP_GET_DTIME = TO_CHAR(SYSDATE , 'YYYYMMDDHH24MISS')
  588. WHERE SMP_NO = ?
  589. AND SMP_CUT_LOC = ?
  590. AND SMP_PROG_CD = 'A'
  591. </query>
  592. <query id="UIB020230_03.UPDATE" desc="外观判定信息记录">
  593. UPDATE TBH02_COIL_COMM CCM
  594. SET CCM.EXTSHAPE_DEC_GRD = ?
  595. ,CCM.EXTSHAPE_DEC_EMP_ID = ?
  596. ,CCM.CUR_PROG_CD_DTIME = TO_CHAR(SYSDATE , 'YYYYMMDDHH24MISS')
  597. ,CCM.EXTSHAPE_DEC_DTIME = TO_CHAR(SYSDATE , 'YYYYMMDDHH24MISS')
  598. WHERE CCM.COIL_NO = ?
  599. ----modify by wxy 冷轧移送完成 不能保存
  600. --AND CCM.COIL_STAT = '2'
  601. --AND CCM.CUR_PROG_CD = 'SED'
  602. -----------------------------------------------------
  603. </query>
  604. <query id="UIB020230_04.UPDATE" desc="取样操作">
  605. UPDATE TBH02_COIL_COMM CCM
  606. SET CCM.SAMPL_PICK_YN = ?
  607. WHERE CCM.COIL_NO = ?
  608. AND CCM.SMP_DIR_PIC_YN = 'Y'
  609. </query>
  610. <query id="UIB020230_05.UPDATE" desc="">
  611. UPDATE TBH02_COIL_COMM CCM
  612. SET CCM.SIZE_DEC_RST = ?
  613. ,CCM.CUR_PROG_CD_DTIME = TO_CHAR(SYSDATE , 'YYYYMMDDHH24MISS')
  614. ,CCM.EXTSHAPE_DEC_DTIME = TO_CHAR(SYSDATE , 'YYYYMMDDHH24MISS')
  615. WHERE CCM.COIL_NO = ?
  616. ----modify by wxy 冷轧移送完成 不能保存
  617. --AND CCM.COIL_STAT = '2'
  618. --AND CCM.CUR_PROG_CD = 'SED'
  619. ------------------------------------------
  620. </query>
  621. <query id="UIB020230_01.CALL" desc="取样钢卷更改">
  622. {call NIB020231(?,?,?)}
  623. </query>
  624. <query id="UIB020230_02.CALL" desc="平整分卷">
  625. {call ZL_HOST_DCS02.SMP_SPM_CHECK(?,?,?,?,?)}
  626. </query>
  627. <query id="UIB020230_03.CALL">
  628. {call ZL_HOST_DCS02.SMP_PICK_SAVES(?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)}
  629. </query>
  630. </queryMap>