043cbb5cd82bbe32d11f91a032d09c20d43e6a28.svn-base 16 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435
  1. <?xml version="1.0" encoding='UTF-8'?>
  2. <queryMap desc="STEEL MAKING QUERY ">
  3. <query id="UIH052400_01.select" desc="冷轧转运量查询-订单材">
  4. <![CDATA[
  5. SELECT 'N' CHK,H.CUR_PROG_CD, H.OLD_SAMPL_NO,H.STL_GRD,H.ORD_NO,H.ORD_SEQ,H.COIL_WTH,
  6. H.COIL_THK,H.COIL_LEN,H.ACT_WGT,H.CUR_LOAD_LOC,H.CR_PLANT_TRS_SEQ,H.COIL_NO
  7. ,DECODE(H.CUR_PROG_CD,'SGB','移送待机','SFA','发货指示待机','SED','综合判定待机','SRC','充当待机') CUR_PROG_CD_NM
  8. ,H.CUR_PROG_CD
  9. ,SUBSTR(H.SLAB_NO,1,10) CHARGE_NO,H.INSTR_COIL_THK,H.INSTR_COIL_WTH
  10. ,H.COIL_INDIA,H.COIL_OUTDIA,decode(H.EXTSHAPE_DEC_GRD,'1','合格','2','订单外合格','3','次品','4','废品') EXTSHAPE_DEC_GRD
  11. FROM TBH02_COIL_COMM H,TBA01_ORD_LINE A WHERE
  12. A.ORD_NO = H.ORD_NO
  13. AND A.ORD_SEQ = H.ORD_SEQ
  14. AND H.COIL_STAT = '2'
  15. AND H.EXTSHAPE_DEC_GRD = '1'
  16. AND H.SIZE_DEC_RST = '1'
  17. AND NVL (H.FB_YN, 'N') = 'N' --封闭卷无法移送 20200720
  18. AND nvl(A.RZHQX,'N')<>'Z' --常化卷屏蔽 20220909
  19. AND ((A.PROD_LINE IN ('C','L')
  20. AND H.CUR_PROG_CD = 'SGB')
  21. OR (H.CUR_PROG_CD in ('SED') AND SUBSTR(H.ORD_NO,0,1) IN ('4','5'))
  22. OR (SUBSTR(H.ORD_NO, 0, 2) IN ('W4', 'W5')) OR
  23. (SUBSTR(H.ORD_NO, 0, 6) IN ('XGEC-L')))
  24. AND H.ORD_NO||'&' like ? || '%'
  25. AND H.ORD_SEQ||'&' like ? || '%'
  26. AND H.OLD_SAMPL_NO||'&' LIKE ? || '%'
  27. ]]>
  28. </query>
  29. <query id="UIH052400_11.select" desc="冷轧转运量查询-余材">
  30. <![CDATA[
  31. SELECT 'N' CHK,H.CUR_PROG_CD, H.OLD_SAMPL_NO,H.STL_GRD,H.ORD_NO,H.ORD_SEQ,H.COIL_WTH,
  32. H.COIL_THK,H.COIL_LEN,H.ACT_WGT,H.CUR_LOAD_LOC,H.CR_PLANT_TRS_SEQ,H.COIL_NO
  33. ,DECODE(H.CUR_PROG_CD,'SGB','移送待机','SFA','发货指示待机','SED','综合判定待机','SRC','充当待机') CUR_PROG_CD_NM
  34. ,SUBSTR(H.SLAB_NO,1,10) CHARGE_NO,H.INSTR_COIL_THK,H.INSTR_COIL_WTH
  35. ,H.COIL_INDIA,H.COIL_OUTDIA,decode(H.EXTSHAPE_DEC_GRD,'1','合格','2','订单外合格','3','次品','4','废品') EXTSHAPE_DEC_GRD
  36. FROM TBH02_COIL_COMM H WHERE
  37. H.COIL_STAT = '2'
  38. AND H.CUR_PROG_CD = 'SRC'
  39. AND NVL (H.FB_YN, 'N') = 'N' --封闭卷无法移送 20200720
  40. AND H.OLD_SAMPL_NO||'&' LIKE ?||'%'
  41. ]]>
  42. </query>
  43. <query id="UIH052400_02.select" desc="查询冷轧原料库是否已经存在转运的钢卷信息">
  44. <![CDATA[
  45. SELECT COUNT(1) COUNT FROM C_TBK02_COIL_COMM WHERE COIL_NO = ?
  46. ]]>
  47. </query>
  48. <query id="UIH052400_03.select" desc="查询热轧卷订单信息">
  49. <![CDATA[
  50. SELECT ORD_NO FROM TBH02_COIL_COMM WHERE OLD_SAMPL_NO = ?
  51. ]]>
  52. </query>
  53. <query id="UIH052400_04.select" desc="冷轧移送实绩查询">
  54. <![CDATA[
  55. select 'N' CHK, h.old_sampl_no,h.SPEC_STL_GRD stl_grd,h.ord_no,h.ord_seq,
  56. h.coil_wth,h.coil_thk,h.coil_len,h.act_wgt,
  57. DECODE(h.cr_plant_trs_clf,'B','冷轧厂','C','其他转运') cr_plant_trs_clf,
  58. h.cr_plant_trs_no,H.CR_PLANT_TRS_SEQ cr_plant_trs_cd,h.cur_load_loc,
  59. TO_CHAR(TO_DATE(h.cr_plant_trs_dtime,'YYYYMMDD'),'YYYY-MM-DD') AS cr_plant_trs_dtime,
  60. k.YARD_ENTRY_REG receive_reg,
  61. TO_CHAR(TO_DATE(k.YARD_ENTRY_DTIME,'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS') AS receive_time,
  62. k.trnf_reg,TO_CHAR(TO_DATE(k.trnf_dtime,'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS') AS trnf_dtime
  63. from tbh02_coil_comm h,c_tbk02_coil_comm k where h.old_sampl_no = k.coil_no(+)
  64. and h.coil_stat = '3' and h.cur_prog_cd = 'SGF' and (k.coil_stat = '1' or (k.coil_stat = 3 and k.out_yard_kind = 2))
  65. and h.cr_plant_trs_dtime like '%'||trim(?)||'%'
  66. and h.cr_plant_trs_no like '%'||trim(?)||'%' order by h.cr_plant_trs_dtime desc,H.CR_PLANT_TRS_SEQ desc
  67. ]]>
  68. </query>
  69. <query id="UIH052400_05.select" desc="判断c_tbk02_coil_comm_d是否存在冷轧订单信息">
  70. <![CDATA[
  71. select coil_no from c_tbk02_coil_comm_d where coil_no = ?
  72. ]]>
  73. </query>
  74. <query id="UIH052400_09.select" desc="判断c_tbk02_coil_comm_d是否存cut信息">
  75. <![CDATA[
  76. select d.CUT_SEQ
  77. from tbh02_coil_comm_d d,tbh02_coil_comm h
  78. where d.coil_no = h.coil_no
  79. and h.old_sampl_no = ?
  80. ]]>
  81. </query>
  82. <query id="UIH052400_06.select" desc="查询冷轧订单信息">
  83. <![CDATA[
  84. select d.c_ord_thk ord_thk
  85. ,d.c_ord_wth ord_wth,d.c_ord_len ord_len
  86. ,d.c_ord_wgt ord_wgt,d.c_ord_wgt_min ord_wgt_min
  87. ,d.c_ord_wgt_max ord_wgt_max,d.c_ord_india ord_india
  88. ,d.c_ord_outdia ord_outdia,d.ord_no ord_no
  89. ,d.ord_seq ord_seq,d.ord_fl ord_fl
  90. from tbh02_coil_comm_d d
  91. where d.coil_no = (
  92. select coil_no from tbh02_coil_comm where
  93. old_sampl_no = ?
  94. )
  95. ]]>
  96. </query>
  97. <query id="UIH052400_07.select" desc="查询原料库钢卷信息">
  98. <![CDATA[
  99. SELECT H.SLAB_NO,H.CUR_PROG_CD,H.CUR_PROG_CD_DTIME,H.CUR_PROG_CD_PGM,H.INSTR_COIL_THK
  100. ,H.INSTR_COIL_WTH,H.INSTR_COIL_LEN,H.INSTR_COIL_INDIA,H.INSTR_COIL_OUTDIA,H.INSTR_COIL_WGT
  101. ,H.DEVLMT_DTIME,H.DEST_CD,H.ORDCUST_CD,H.CUST_CD,H.COIL_LEN,H.COIL_INDIA
  102. --,(CASE WHEN(H.COIL_OUTDIA IS NOT NULL OR H.COIL_OUTDIA <> '' or H.COIL_OUTDIA <> 0)THEN H.COIL_OUTDIA ELSE C_PKG_UIF.F_FUN_GET_OUTSIDE(H.COIL_INDIA,H.ACT_WGT,H.COIL_WTH)end) COIL_OUTDIA
  103. ,H.COIL_OUTDIA
  104. ,H.COIL_THK,H.COIL_WTH,H.ACT_WGT,H.ORD_FL,H.ORD_NO,H.ORD_SEQ,P.C_PRODNM_CD PRODNM_CD,H.SPEC_ABBSYM
  105. ,P.C_SPEC_STL_GRD SPEC_STL_GRD,H.ORD_USE_CD,H.SPEC_STL_GRD STL_GRD,H.PATH_MILL_CD,H.INGR_DEC_GRD,H.EXTSHAPE_DEC_GRD
  106. ,H.SIZE_DEC_RST,H.WGT_DEC_RST,H.PROC_DEC_RST,H.MATLQLTY_DEC_GRD,H.TOT_DEC_GRD,H.MILL_DTIME
  107. ,H.CRK_CD1,H.CRK_CD2,H.CRK_CD3,H.CRK_CD4,H.CRK_CD5,H.CAL_WGT,H.OLD_SAMPL_NO
  108. ,H.YARD_ENTRY_DTIME
  109. ,H.SAMPL_NO,H.SAMPL_CUT_LOC
  110. ,R.FM_EXT_STRIP_THK_AVG ,R.FM_EXT_STRIP_TEMP_AVG,R.DC_TEMP_AVG,R.FM_EXT_STRIP_CROWN_AVG
  111. FROM TBH02_COIL_COMM H,TBH02_MILL_RESULT R,TBE02_ORD_PRC P
  112. WHERE H.COIL_NO = R.COIL_NO AND H.ORD_NO = P.ORD_NO(+) AND H.ORD_SEQ = P.ORD_SEQ(+)
  113. AND H.OLD_SAMPL_NO = ?
  114. ]]>
  115. </query>
  116. <query id="UIH052400_01.insert" desc="冷轧原料钢卷基础信息插入">
  117. <![CDATA[
  118. INSERT INTO C_TBK02_COIL_COMM
  119. (COIL_NO,
  120. SLAB_NO,
  121. COIL_STAT,
  122. CUR_PROG_CD,
  123. CUR_PROG_CD_DTIME,
  124. CUR_PROG_CD_PGM,
  125. BEF_PROG_CD,
  126. BEF_PROG_CD_DTIME,
  127. BEF_PROG_CD_PGM,
  128. INSTR_COIL_THK,
  129. INSTR_COIL_WTH,
  130. INSTR_COIL_LEN,
  131. INSTR_COIL_INDIA,
  132. INSTR_COIL_OUTDIA,
  133. INSTR_COIL_WGT,
  134. DEVLMT_DTIME,
  135. DEST_CD,
  136. ORDCUST_CD,
  137. CUST_CD,
  138. COIL_LEN,
  139. COIL_INDIA,
  140. COIL_OUTDIA,
  141. COIL_THK,
  142. COIL_WTH,
  143. ACT_WGT,
  144. ORD_FL,
  145. ORD_NO,
  146. ORD_SEQ,
  147. PRODNM_CD,
  148. SPEC_ABBSYM,
  149. SPEC_STL_GRD,
  150. ORD_USE_CD,
  151. STL_GRD,
  152. PATH_MILL_CD,
  153. INGR_DEC_GRD,
  154. EXTSHAPE_DEC_GRD,
  155. SIZE_DEC_RST,
  156. WGT_DEC_RST,
  157. PROC_DEC_RST,
  158. MATLQLTY_DEC_GRD,
  159. TOT_DEC_GRD,
  160. MILL_DTIME,
  161. CRK_CD1,
  162. CRK_CD2,
  163. CRK_CD3,
  164. CRK_CD4,
  165. CRK_CD5,
  166. CAL_WGT,
  167. OLD_SAMPL_NO,
  168. CR_PLANT_TRS_CLF,
  169. CR_PLANT_TRS_NO,
  170. CR_PLANT_TRS_DTIME,
  171. FM_EXT_STRIP_THK_AVG,
  172. FM_EXT_STRIP_TEMP_AVG,
  173. DC_TEMP_AVG,
  174. FM_EXT_STRIP_CROWN_AVG,
  175. RECEIVE_TIME,
  176. SMP_NO,
  177. SMP_CUT_LOC,
  178. OLD_ORD_NO,
  179. OLD_ORD_SEQ,
  180. OLD_ORD_FL,
  181. CR_PLANT_TRS_SEQ,
  182. BEF_STL_GRD)
  183. SELECT H.OLD_SAMPL_NO COIL_NO,
  184. H.SLAB_NO,
  185. '1' COIL_STAT,
  186. 'PAB' CUR_PROG_CD,
  187. TO_CHAR(SYSDATE, 'YYYYMMDDHH24MISS') CUR_PROG_CD_DTIME,
  188. 'UIH052400' CUR_PROG_CD_PGM,
  189. CUR_PROG_CD BEF_PROG_CD,
  190. CUR_PROG_CD_DTIME BEF_PROG_CD_DTIME,
  191. CUR_PROG_CD_PGM BEF_PROG_CD_PGM,
  192. H.INSTR_COIL_THK,
  193. H.INSTR_COIL_WTH,
  194. H.INSTR_COIL_LEN,
  195. H.INSTR_COIL_INDIA,
  196. H.INSTR_COIL_OUTDIA,
  197. H.INSTR_COIL_WGT,
  198. H.DEVLMT_DTIME,
  199. H.DEST_CD,
  200. H.ORDCUST_CD,
  201. H.CUST_CD,
  202. H.COIL_LEN,
  203. H.COIL_INDIA
  204. --,(CASE WHEN(H.COIL_OUTDIA IS NOT NULL OR H.COIL_OUTDIA <> '' or H.COIL_OUTDIA <> 0)THEN H.COIL_OUTDIA ELSE C_PKG_UIF.F_FUN_GET_OUTSIDE(H.COIL_INDIA,H.ACT_WGT,H.COIL_WTH)end) COIL_OUTDIA
  205. ,
  206. H.COIL_OUTDIA,
  207. H.COIL_THK,
  208. H.COIL_WTH,
  209. H.ACT_WGT,
  210. H.ORD_FL,
  211. H.ORD_NO,
  212. H.ORD_SEQ,
  213. P.C_PRODNM_CD PRODNM_CD,
  214. H.SPEC_ABBSYM,
  215. P.C_SPEC_STL_GRD SPEC_STL_GRD,
  216. H.ORD_USE_CD,
  217. H.SPEC_STL_GRD STL_GRD,
  218. H.PATH_MILL_CD,
  219. H.INGR_DEC_GRD,
  220. H.EXTSHAPE_DEC_GRD,
  221. H.SIZE_DEC_RST,
  222. H.WGT_DEC_RST,
  223. H.PROC_DEC_RST,
  224. H.MATLQLTY_DEC_GRD,
  225. H.TOT_DEC_GRD,
  226. H.MILL_DTIME,
  227. H.CRK_CD1,
  228. H.CRK_CD2,
  229. H.CRK_CD3,
  230. H.CRK_CD4,
  231. H.CRK_CD5,
  232. H.CAL_WGT,
  233. H.OLD_SAMPL_NO,
  234. ? CR_PLANT_TRS_CLF,
  235. ? CR_PLANT_TRS_NO,
  236. ? CR_PLANT_TRS_DTIME,
  237. R.FM_EXT_STRIP_THK_AVG,
  238. R.FM_EXT_STRIP_TEMP_AVG,
  239. R.DC_TEMP_AVG,
  240. R.FM_EXT_STRIP_CROWN_AVG,
  241. H.MILL_DTIME,
  242. H.SAMPL_NO,
  243. H.SAMPL_CUT_LOC,
  244. H.ORD_NO,
  245. H.ORD_SEQ,
  246. H.ORD_FL,
  247. ? CR_PLANT_TRS_SEQ,
  248. H.SPEC_STL_GRD BEF_STL_GRD
  249. FROM TBH02_COIL_COMM H, TBH02_MILL_RESULT R, TBE02_ORD_PRC P
  250. WHERE H.COIL_NO = R.COIL_NO
  251. AND H.ORD_NO = P.ORD_NO(+)
  252. AND H.ORD_SEQ = P.ORD_SEQ(+)
  253. AND H.COIL_NO =
  254. (SELECT COIL_NO FROM TBH02_COIL_COMM WHERE OLD_SAMPL_NO = ?)
  255. ]]>
  256. </query>
  257. <query id="UIH052400_02.insert" desc="插入c_tbk02_comm_d">
  258. <![CDATA[
  259. insert into c_tbk02_coil_comm_d
  260. (coil_no,cut_seq,ord_thk
  261. ,ord_wth,ord_len,ord_wgt,ord_wgt_min,ord_wgt_max
  262. ,ord_india,ord_outdia,ord_no,ord_seq,ord_fl)
  263. select h.old_sampl_no coil_no,d.cut_seq cut_seq,d.c_ord_thk ord_thk
  264. ,d.c_ord_wth ord_wth,d.c_ord_len ord_len
  265. ,d.ord_wgt ord_wgt,d.ord_wgt_min ord_wgt_min
  266. ,d.ord_wgt_max ord_wgt_max,d.c_ord_india ord_india
  267. ,d.c_ord_outdia ord_outdia,d.ord_no ord_no
  268. ,d.ord_seq ord_seq,d.ord_fl ord_fl
  269. from tbh02_coil_comm_d d
  270. ,tbh02_coil_comm h
  271. where d.coil_no = h.coil_no
  272. and h.old_sampl_no = ?
  273. ]]>
  274. </query>
  275. <query id="UIH052400_03.insert" desc="新增移送记录">
  276. <![CDATA[
  277. insert into tbh02_coil_trans t
  278. (
  279. t.TRANS_NO,t.COIL_NO,t.TRANS_FLAG,t.YARD_ADDR
  280. ,t.REG_ID,t.REG_ORDER,t.REG_GROUP,t.REG_DTIME,t.REG_USER_TIME
  281. ,t.cr_plant_trs_clf,t.cr_plant_trs_no,t.cr_plant_trs_seq
  282. )
  283. values
  284. (
  285. (select nvl(max(t1.TRANS_NO),0)+1 from tbh02_coil_trans t1)
  286. ,?,'0',(select max(h.BEF_LOAD_LOC) from tbh02_coil_comm h where h.OLD_SAMPL_NO = ?)
  287. ,?,?,?,?,to_char(sysdate,'YYYYMMDDHH24MISS')
  288. ,?,?,?
  289. )
  290. ]]>
  291. </query>
  292. <query id="UIH052400_04.insert" desc="新增退回记录">
  293. <![CDATA[
  294. insert into tbh02_coil_trans t
  295. (
  296. t.TRANS_NO,t.COIL_NO,t.TRANS_FLAG,t.YARD_ADDR
  297. ,t.REG_ID,t.REG_ORDER,t.REG_GROUP,t.REG_DTIME,t.REG_USER_TIME
  298. )
  299. values
  300. (
  301. (select nvl(max(t1.TRANS_NO),0)+1 from tbh02_coil_trans t1)
  302. ,?,'1',?
  303. ,?,?,?,?,to_char(sysdate,'YYYYMMDDHH24MISS')
  304. )
  305. ]]>
  306. </query>
  307. <query id="UIH052400_05.insert" desc="插入步进梁接口表">
  308. <![CDATA[
  309. INSERT INTO TBS02_L3_IC_TAKE_COIL I(
  310. SEQ_NO --记录顺序号
  311. ,COIL_NO --钢卷号
  312. ,WB_NO --步进梁编号
  313. ,SADDLE_NO --鞍座号
  314. ,DIRECT --方向
  315. ,PROC_NAME --进程名称
  316. )
  317. VALUES(?,?,nvl(?,'4'),nvl(?,'1'),'0','UIH052400')
  318. ]]>
  319. </query>
  320. <query id="UIH052400_01.update" desc="c_tbk02_comm_d订单信息修改">
  321. <![CDATA[
  322. update c_tbk02_coil_comm_d d set
  323. d.ord_thk = ?
  324. ,d.ord_wth = ?
  325. ,d.ord_len = ?
  326. ,d.ord_wgt = ?
  327. ,d.ord_wgt_min = ?
  328. ,d.ord_wgt_max = ?
  329. ,d.ord_india = ?
  330. ,d.ord_outdia = ?
  331. ,d.ord_no = ?
  332. ,d.ord_seq = ?
  333. ,d.ord_fl = ?
  334. where d.coil_no = ?
  335. AND d.CUT_SEQ = ?
  336. ]]>
  337. </query>
  338. <query id="UIH052400_02.update" desc="原料公共表转运更新">
  339. <![CDATA[
  340. UPDATE C_TBK02_COIL_COMM K set K.SLAB_NO = ?,K.COIL_STAT = '1',K.CUR_PROG_CD ='PAB'
  341. ,K.CUR_PROG_CD_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS'),K.CUR_PROG_CD_PGM = 'UIH052400'
  342. ,K.BEF_PROG_CD = ?,K.BEF_PROG_CD_DTIME= ?,K.BEF_PROG_CD_PGM= ?
  343. ,K.INSTR_COIL_THK = ?,K.INSTR_COIL_WTH = ?,K.INSTR_COIL_LEN = ?
  344. ,K.INSTR_COIL_INDIA = ?,K.INSTR_COIL_OUTDIA = ?,K.INSTR_COIL_WGT = ?
  345. ,K.DEVLMT_DTIME = ?,K.DEST_CD = ?,K.ORDCUST_CD = ?,K.CUST_CD = ?
  346. ,K.COIL_LEN = ?,K.COIL_INDIA = ?,K.COIL_OUTDIA = ?,K.COIL_THK = ?,
  347. K.COIL_WTH = ?,K.ACT_WGT = ?,K.ORD_FL = ?,K.ORD_NO = ?,K.ORD_SEQ = ?
  348. ,K.PRODNM_CD = ?,K.SPEC_ABBSYM = ?,K.SPEC_STL_GRD = ?,K.ORD_USE_CD = ?
  349. ,K.STL_GRD = ?,K.PATH_MILL_CD = ?,K.INGR_DEC_GRD = ?,K.EXTSHAPE_DEC_GRD = ?
  350. ,K.SIZE_DEC_RST = ?,K.WGT_DEC_RST = ?,K.PROC_DEC_RST = ?,K.MATLQLTY_DEC_GRD = ?
  351. ,K.TOT_DEC_GRD = ?,K.MILL_DTIME = ?,K.CRK_CD1 = ?,K.CRK_CD2 = ?,K.CRK_CD3 = ?
  352. ,K.CRK_CD4 = ?,K.CRK_CD5 = ?,K.CAL_WGT = ?,K.OLD_SAMPL_NO = ?
  353. ,K.CR_PLANT_TRS_CLF = ?,K.CR_PLANT_TRS_NO = ?,K.CR_PLANT_TRS_DTIME = ?
  354. ,K.FM_EXT_STRIP_THK_AVG = ?,K.FM_EXT_STRIP_TEMP_AVG = ?,K.DC_TEMP_AVG = ?
  355. ,K.FM_EXT_STRIP_CROWN_AVG = ?
  356. ,K.RECEIVE_TIME = ?,K.SMP_NO = ?,K.SMP_CUT_LOC = ?
  357. ,k.OLD_ORD_FL = ?,k.OLD_ORD_NO = ?,k.OLD_ORD_SEQ = ?
  358. ,k.CR_PLANT_TRS_SEQ = ?
  359. WHERE K.COIL_NO = ?
  360. ]]>
  361. </query>
  362. <query id="UIH052400_03.update" desc="更新热轧库移送出库状态">
  363. <![CDATA[
  364. UPDATE TBH02_COIL_COMM H SET H.COIL_STAT = '3',H.BEF_PROG_CD = H.CUR_PROG_CD,
  365. H.BEF_PROG_CD_DTIME = H.CUR_PROG_CD_DTIME,H.BEF_PROG_CD_PGM = H.CUR_PROG_CD_PGM,
  366. H.CUR_PROG_CD = 'SGF', H.CUR_PROG_CD_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS'),
  367. H.CUR_PROG_CD_PGM = 'UIH052400',H.BEF_LOAD_LOC = H.CUR_LOAD_LOC,
  368. H.TRNF_SHIFT = ?, H.TRNF_GROUP = ?, H.TRNF_REG = ?,H.CUR_LOAD_LOC = 'L',
  369. H.TRNF_DTIME = ?, H.TRNF_USE_TIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS'),
  370. H.CR_PLANT_TRS_CLF = ?, H.CR_PLANT_TRS_NO = ?, H.CR_PLANT_TRS_DTIME = ?
  371. ,H.DLIV_TP = 'L',H.CR_PLANT_TRS_SEQ = ?,H.CR_PLANT_TRS_FLAG = ?
  372. WHERE H.OLD_SAMPL_NO = ?
  373. ]]>
  374. </query>
  375. <query id="UIH052400_04.update" desc="更新热轧库存表 ">
  376. <![CDATA[
  377. UPDATE TBH05_COIL_YARD T SET
  378. T.COIL_NO = '',
  379. T.REG_ID = '',
  380. T.REG_DTIME = ''
  381. WHERE T.COIL_NO = ?
  382. ]]>
  383. </query>
  384. <query id="UIH052400_05.update" desc="更新热轧库退回状态">
  385. <![CDATA[
  386. UPDATE TBH02_COIL_COMM H SET H.COIL_STAT = '2',H.CUR_PROG_CD = decode(H.ORD_FL,'1','SGB','SRC'),H.CUR_PROG_CD_PGM = 'UIH052400',
  387. H.YARD_ENTRY_SHIFT = ?, H.YARD_ENTRY_GROUP = ?, H.YARD_ENTRY_REG = ?,H.CUR_LOAD_LOC = ?,
  388. H.YARD_ENTRY_DTIME = ?, H.YARD_ENTRY_USE_TIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')
  389. WHERE H.OLD_SAMPL_NO = ?
  390. ]]>
  391. </query>
  392. <query id="UIH052400_06.update" desc="更新热轧库退回入库垛位">
  393. <![CDATA[
  394. UPDATE TBH05_COIL_YARD T SET
  395. T.COIL_NO = ?,
  396. T.REG_ID = ?,
  397. T.REG_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')
  398. where t.YARD_CLF = substr(?,0,5)
  399. and t.STEP_CLF = substr(?,6,2)
  400. and t.STORELAY = substr(?,8,1)
  401. and t.STORE_SEQ = substr(?,9,1)
  402. ]]>
  403. </query>
  404. <query id="UIH052401_01.select" desc="查询待判移送钢卷">
  405. <![CDATA[
  406. SELECT 'N' CHK, H.COIL_NO,H.OLD_SAMPL_NO,H.CR_PLANT_TRS_DTIME,H.CR_PLANT_TRS_SEQ
  407. ,decode(H.TOT_DEC_GRD,'1','合格','2','不合格','3','外观异常','4','废品') TOT_DEC_GRD
  408. ,H.SPEC_STL_GRD,TO_CHAR(H.COIL_THK,'FM990.099')||'*'||H.COIL_WTH T_W
  409. ,TO_CHAR(H.INSTR_COIL_THK,'FM990.099')||'*'||H.INSTR_COIL_WTH IT_IW
  410. ,H.ACT_WGT,H.ORD_NO,H.ORD_SEQ,H.CR_PLANT_TRS_CLF,H.CR_PLANT_TRS_NO
  411. FROM TBH02_COIL_COMM H WHERE H.CR_PLANT_TRS_FLAG = 'N'
  412. ORDER BY H.CR_PLANT_TRS_DTIME,H.CR_PLANT_TRS_SEQ
  413. ]]>
  414. </query>
  415. <query id="UIH052401_01.update" desc="更改热轧成口移送确认状态">
  416. <![CDATA[
  417. UPDATE TBH02_COIL_COMM H SET H.CR_PLANT_TRS_FLAG = ? WHERE H.OLD_SAMPL_NO = ?
  418. ]]>
  419. </query>
  420. <query id="UIH052400_01.delete" desc="删除冷轧数据">
  421. <![CDATA[
  422. delete from c_tbk02_coil_comm t where t.OLD_SAMPL_NO=? and t.COIL_STAT='1' and t.CUR_LOAD_LOC is null
  423. ]]>
  424. </query>
  425. <query id="UIH052400_08.select" desc="查询移送钢卷,外观判定和尺寸判定">
  426. <![CDATA[
  427. select t.EXTSHAPE_DEC_GRD,t.SIZE_DEC_RST from tbh02_coil_comm t where t.OLD_SAMPL_NO = ?
  428. ]]>
  429. </query>
  430. </queryMap>