e8eeadadb020f5cd42f9aeeea1db219937e31246.svn-base 13 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399
  1. <?xml version="1.0" encoding='UTF-8'?>
  2. <queryMap desc="STEEL MAKING QUERY ">
  3. <query id="XTBGCOMM_CHEK_CHARGE_COMM_01" desc="" fetchSize="10">
  4. <![CDATA[
  5. SELECT CHARGE_NO FROM TBG02_CHARGE_COMM
  6. WHERE CHARGE_NO = ?
  7. ]]>
  8. </query>
  9. <query id="XTBGCOMM_CREATE_CHARGE_INSERT_01" desc="" fetchSize="10">
  10. <![CDATA[
  11. INSERT INTO TBG02_CHARGE_COMM (
  12. CHARGE_NO
  13. ,PLAN_CHARGE_NO
  14. ,CHARGE_STAT
  15. ,INSTR_RT
  16. ,PRODNM_CD
  17. ,SPEC_ABBSYM
  18. ,STL_GRD
  19. ,HCR_CLF
  20. ,CAST_EDT_CHARGE_CNT
  21. ,CAST_CHARGE_SEQ
  22. ,CUR_PROG_CD
  23. ,CUR_PROG_CD_REG_PGM
  24. ,CUR_PROG_CD_REG_DTIME
  25. ,BEF_PROG_CD
  26. ,CAST_NO
  27. ,REG_DTIME
  28. ,SLAB_RT
  29. ,CHARGE_WGT --装入钢水量
  30. ,BOF_TAPPING_WGT --转炉出钢量
  31. ,CHARGE_INIT_DTIME
  32. )
  33. (SELECT 'J'||SUBSTR(A.CHARGE_MANA_NO,2,9)
  34. ,A.CHARGE_MANA_NO
  35. ,'2'
  36. ,A.LINE_PROC_CD
  37. ,A.PRODNM_CD
  38. ,A.SPEC_ABBSYM
  39. ,A.STL_GRD
  40. ,A.HCR_CLF
  41. ,A.CAST_EDT_CHARGE_CNT
  42. ,A.CAST_CHARGE_SEQ
  43. ,'JBB'
  44. ,''
  45. ,TO_CHAR(SYSDATE,'YYYYMMDDHHMMSS')
  46. ,'JBA'
  47. ,A.CAST_MANA_NO
  48. ,TO_CHAR(SYSDATE,'YYYYMMDDHHMMSS')
  49. ,A.CHARGE_RT
  50. ,A.PREV_CHARGE_WGT --预定出钢量
  51. ,A.PREV_CHARGE_WGT --预定出钢量
  52. ,TO_CHAR(SYSDATE,'YYYYMMDDHHMMSS')
  53. FROM TBF01_SPEC_CHARGE A
  54. WHERE '1' = '1'
  55. AND A.CHARGE_MANA_NO = ?
  56. )
  57. ]]>
  58. </query>
  59. <query id="XTBGCOMM_CREATE_CHARGE_D_INSERT_01" desc="" fetchSize="10">
  60. <![CDATA[
  61. INSERT INTO TBG02_CHARGE_COMM_D
  62. (SUB_CHARGE_NO
  63. ,CHARGE_NO
  64. ,STL_GRD
  65. ,CHARGE_STAT
  66. ,CUR_PROG_CD
  67. ,CUR_PROG_CD_REG_PGM
  68. ,CUR_PROG_CD_REG_DTIME
  69. ,CHARGE_WGT
  70. ,SLAB_CNT
  71. ,SUB_CHARGE_CODE
  72. ,SLAB_RT
  73. ,CHARGE_INIT_DTIME
  74. )
  75. (SELECT 'J'||SUBSTR(CHARGE_MANA_NO,2,9)
  76. ,'J'||SUBSTR(CHARGE_MANA_NO,2,9)
  77. ,STL_GRD
  78. ,'2'
  79. ,'JBB'
  80. ,'TBGCREAE'
  81. ,TO_CHAR(SYSDATE,'YYYYMMDDHHMMSS')
  82. ,PREV_CHARGE_WGT CHARGE_WGT
  83. ,SLAB_CNT
  84. ,'A' SUB_CHARGE_CODE
  85. ,CHARGE_RT
  86. ,TO_CHAR(SYSDATE,'YYYYMMDDHHMMSS')
  87. FROM TBF01_SPEC_CHARGE
  88. WHERE CHARGE_MANA_NO = ?)
  89. ]]>
  90. </query>
  91. <query id="XTBGCOMM_CREATE_SLAB_INSERT_01" desc="" fetchSize="10">
  92. <![CDATA[
  93. INSERT INTO TBG02_SLAB_COMM
  94. ( SLAB_NO
  95. ,sub_slab_no
  96. ,CHARGE_NO
  97. ,PLAN_SLAB_NO
  98. ,SLAB_STAT
  99. ,STL_GRD
  100. ,INSTR_SLAB_THK
  101. ,INSTR_SLAB_WTH
  102. ,INSTR_SLAB_LEN
  103. ,INSTR_SLAB_WGT
  104. ,PRODNM_CD
  105. ,ORD_FL
  106. ,ORD_NO
  107. ,ORD_SEQ
  108. ,HCR_CLF
  109. ,SPEC_ABBSYM
  110. ,REG_DTIME
  111. ,INSTR_ORD_FL
  112. ,ORG_ORD_NO
  113. ,ORG_ORD_SEQ
  114. ,INSTR_COIL_THK
  115. ,INSTR_COIL_WTH
  116. ,INSTR_COIL_LEN
  117. ,INSTR_COIL_INDIA
  118. ,INSTR_COIL_OUTDIA
  119. ,INSTR_COIL_WGT
  120. ,SLAB_RT
  121. ,CAST_NO
  122. ,DSN_SLAB_NO
  123. )
  124. SELECT T.SLAB_MANA_NO --'J'||SUBSTR(T.SLAB_MANA_NO,2,12)
  125. ,'J'||SUBSTR(T.SLAB_MANA_NO,2,12)
  126. ,'J'||SUBSTR(T.CHARGE_MANA_NO,2,9)
  127. ,T.SLAB_MANA_NO
  128. ,'1',T.STL_GRD
  129. ,T.SLAB_THK
  130. ,T.SLAB_WTH
  131. ,T.SLAB_LEN
  132. ,T.SLAB_WGT
  133. ,T.PRODNM_CD
  134. ,T.ORD_FL
  135. ,T.ORD_NO
  136. ,T.ORD_SEQ
  137. ,T.HCR_CLF
  138. ,T.SPEC_ABBSYM
  139. ,TO_CHAR(SYSDATE,'YYYYMMDDHHMMDD')
  140. ,T.ORD_FL
  141. ,T.ORD_NO
  142. ,T.ORD_SEQ
  143. ,T.ORD_THK
  144. ,T.ORD_WTH
  145. ,T.ORD_LEN
  146. ,T.COIL_INDIA
  147. ,T.COIL_OUTDIA
  148. ,T.ORD_WGT
  149. ,T.SLAB_RT
  150. ,T.CAST_MANA_NO
  151. ,T.DSN_SLAB_NO
  152. FROM TBF01_SPEC_SLAB T
  153. WHERE T.SLAB_MANA_NO LIKE ?||'%'
  154. ]]>
  155. </query>
  156. <query id="XTBGCOMM_CREATE_SLAB_INSERT_02" desc="" fetchSize="10">
  157. <![CDATA[
  158. INSERT INTO TBG02_SLAB_COMM
  159. ( SLAB_NO
  160. ,SUB_SLAB_NO
  161. ,CHARGE_NO
  162. ,PLAN_SLAB_NO
  163. ,SLAB_STAT
  164. ,STL_GRD
  165. ,INSTR_SLAB_THK
  166. ,INSTR_SLAB_WTH
  167. ,INSTR_SLAB_LEN
  168. ,INSTR_SLAB_WGT
  169. ,PRODNM_CD
  170. ,ORD_FL
  171. ,ORD_NO
  172. ,ORD_SEQ
  173. ,HCR_CLF
  174. ,SPEC_ABBSYM
  175. ,REG_DTIME
  176. ,INSTR_ORD_FL
  177. ,ORG_ORD_NO
  178. ,ORG_ORD_SEQ
  179. ,INSTR_COIL_THK
  180. ,INSTR_COIL_WTH
  181. ,INSTR_COIL_LEN
  182. ,INSTR_COIL_INDIA
  183. ,INSTR_COIL_OUTDIA
  184. ,INSTR_COIL_WGT
  185. ,SLAB_RT
  186. ,CAST_NO
  187. ,SURPLMATL_YN
  188. ,SLAB_INGR_DEC_GRD
  189. ,SLAB_INGR_DEC_KIND
  190. )
  191. SELECT SUBSTR(T.SLAB_MANA_NO,1,10)||lpad(B.SLAB_CNT,2,'0')||'0' --'J'||SUBSTR(T.SLAB_MANA_NO,2,12)
  192. ,'J'||SUBSTR(T.SLAB_MANA_NO,2,9)||lpad(B.SLAB_CNT,2,'0')||'0'
  193. ,'J'||SUBSTR(T.CHARGE_MANA_NO,2,9)
  194. ,SUBSTR(T.SLAB_MANA_NO,1,10)||'010'
  195. ,'1',T.STL_GRD
  196. ,T.SLAB_THK
  197. ,T.SLAB_WTH
  198. ,T.SLAB_LEN
  199. ,T.SLAB_WGT
  200. ,T.PRODNM_CD
  201. ,T.ORD_FL
  202. ,T.ORD_NO
  203. ,T.ORD_SEQ
  204. ,T.HCR_CLF
  205. ,T.SPEC_ABBSYM
  206. ,TO_CHAR(SYSDATE,'YYYYMMDDHHMMDD')
  207. ,'2' ORD_FL
  208. ,'' ORD_NO
  209. ,'' ORD_SEQ
  210. ,T.ORD_THK
  211. ,T.ORD_WTH
  212. ,T.ORD_LEN
  213. ,T.COIL_INDIA
  214. ,T.COIL_OUTDIA
  215. ,T.ORD_WGT
  216. ,T.SLAB_RT
  217. ,T.CAST_MANA_NO
  218. ,'S'
  219. /*,C.INGR_DEC_GRD
  220. ,'8' SLAB_INGR_DEC_KIND*/
  221. ,''
  222. ,''
  223. FROM TBF01_SPEC_SLAB T
  224. ,(SELECT SUBSTR(PLAN_SLAB_NO,1,10) CHARGE_MANA_NO,COUNT(SLAB_NO)+1 SLAB_CNT
  225. FROM TBG02_SLAB_COMM
  226. WHERE PLAN_SLAB_NO LIKE SUBSTR(?,1,10)||'%'
  227. GROUP BY SUBSTR(PLAN_SLAB_NO,1,10))B
  228. ,TBG02_CHARGE_COMM_D C
  229. ,TBG02_CHARGE_COMM D
  230. WHERE SUBSTR(T.SLAB_MANA_NO,1,10) = B.CHARGE_MANA_NO
  231. AND B.CHARGE_MANA_NO = D.PLAN_CHARGE_NO
  232. AND C.SUB_CHARGE_NO = D.CHARGE_NO
  233. AND T.SLAB_MANA_NO LIKE ?||'%'
  234. AND ROWNUM = 1
  235. ]]>
  236. </query>
  237. <query id="XTBGCOMM_CREATE_SLAB_D_INSERT_01" desc="" fetchSize="10">
  238. <![CDATA[
  239. INSERT INTO TBG02_SLAB_COMM_D
  240. ( SLAB_NO
  241. ,SLAB_CUT_SEQ
  242. ,SLAB_THK
  243. ,SLAB_WTH
  244. ,SLAB_LEN
  245. ,ORD_THK
  246. ,ORD_WTH
  247. ,ORD_LEN
  248. ,ORD_WGT
  249. ,COIL_INDIA
  250. ,COIL_OUTDIA
  251. ,ORD_NO
  252. ,ORD_SEQ
  253. ,ORD_FL )
  254. SELECT 'J'||SUBSTR(B.SLAB_MANA_NO,2,12) SLAB_NO
  255. ,A.SLAB_CUT_SEQ
  256. ,A.SLAB_THK
  257. ,A.SLAB_WTH
  258. ,A.SLAB_LEN
  259. ,A.ORD_THK
  260. ,A.ORD_WTH
  261. ,A.ORD_LEN
  262. ,A.ORD_WGT
  263. ,A.COIL_INDIA
  264. ,A.COIL_OUTDIA
  265. ,A.ORD_NO
  266. ,A.ORD_SEQ
  267. ,'2' ORD_FL
  268. FROM TBF01_SPEC_SLAB_D A
  269. ,TBF01_SPEC_SLAB B
  270. WHERE A.SLAB_EDT_SEQ = B.SLAB_EDT_SEQ
  271. AND B.SLAB_MANA_NO LIKE ?||'%'
  272. AND ROWNUM = 1
  273. ]]>
  274. </query>
  275. <query id="XTBGCOMM_CREATE_SLAB_D_INSERT_02" desc="" fetchSize="10">
  276. <![CDATA[
  277. INSERT INTO TBG02_SLAB_COMM_D
  278. ( SLAB_NO
  279. ,SLAB_CUT_SEQ
  280. ,SLAB_THK
  281. ,SLAB_WTH
  282. ,SLAB_LEN
  283. ,ORD_THK
  284. ,ORD_WTH
  285. ,ORD_LEN
  286. ,ORD_WGT
  287. ,COIL_INDIA
  288. ,COIL_OUTDIA
  289. ,ORD_NO
  290. ,ORD_SEQ
  291. ,ORD_FL )
  292. SELECT 'J'||SUBSTR(B.SLAB_MANA_NO,2,9)||lpad(C.SLAB_CNT,2,'0')||'0' SLAB_NO
  293. ,A.SLAB_CUT_SEQ
  294. ,A.SLAB_THK
  295. ,A.SLAB_WTH
  296. ,A.SLAB_LEN
  297. ,A.ORD_THK
  298. ,A.ORD_WTH
  299. ,A.ORD_LEN
  300. ,A.ORD_WGT
  301. ,A.COIL_INDIA
  302. ,A.COIL_OUTDIA
  303. ,A.ORD_NO
  304. ,A.ORD_SEQ
  305. ,A.ORD_FL
  306. FROM TBF01_SPEC_SLAB_D A
  307. ,TBF01_SPEC_SLAB B
  308. , ( SELECT SUBSTR(PLAN_SLAB_NO,1,10) CHARGE_MANA_NO,COUNT(SLAB_NO) SLAB_CNT
  309. FROM TBG02_SLAB_COMM
  310. WHERE PLAN_SLAB_NO LIKE SUBSTR(?,1,10)||'%'
  311. GROUP BY SUBSTR(PLAN_SLAB_NO,1,10))C
  312. WHERE A.SLAB_EDT_SEQ = B.SLAB_EDT_SEQ
  313. AND SUBSTR(B.SLAB_MANA_NO,1,10) = C.CHARGE_MANA_NO
  314. AND B.SLAB_MANA_NO LIKE ?||'%'
  315. AND ROWNUM = 1
  316. ]]>
  317. </query>
  318. <query id="XTBGCOMM_SPEC_CHARGE_PROC_UPT_01" desc="" fetchSize="10">
  319. <![CDATA[
  320. UPDATE TBF01_SPEC_CHARGE
  321. SET PROG_CD = ?
  322. ,STATUS_CD = ?
  323. WHERE CHARGE_MANA_NO = ?
  324. ]]>
  325. </query>
  326. <query id="XTBGCOMM_SPEC_CHARGE_PROC_UPT_02" desc="" fetchSize="10">
  327. <![CDATA[
  328. UPDATE TBF01_CHARGE_IDX
  329. SET STATUS_CD = ?
  330. WHERE CHARGE_MANA_NO = ?
  331. ]]>
  332. </query>
  333. <query id="XTBGCOMM_SPEC_SLAB_PROC_UPT_01" desc=" " fetchSize="10">
  334. <![CDATA[
  335. UPDATE TBF01_SPEC_SLAB
  336. SET STATUS_CD = ?
  337. WHERE SLAB_MANA_NO = ?
  338. ]]>
  339. </query>
  340. <query id="XTBGCOMM_SPEC_SLAB_PROC_UPT_02" desc=" " fetchSize="10">
  341. <![CDATA[
  342. UPDATE TBF01_SPEC_SLAB_D
  343. SET STATUS_CD = ?
  344. WHERE SLAB_EDT_SEQ IN (SELECT SLAB_EDT_SEQ FROM TBF01_SPEC_SLAB WHERE SLAB_MANA_NO = ?)
  345. ]]>
  346. </query>
  347. <query id="XTBGCOMM_CHARGE_PROC_UPT_01" desc="" fetchSize="10">
  348. <![CDATA[
  349. UPDATE TBG02_CHARGE_COMM T
  350. SET T.CHARGE_STAT = ?
  351. ,T.BEF_PROG_CD = T.CUR_PROG_CD
  352. ,T.BEF_PROG_CD_REG_PGM = T.CUR_PROG_CD_REG_PGM
  353. ,T.BEF_PROG_CD_REG_DTIME = T.CUR_PROG_CD_REG_DTIME
  354. ,T.CUR_PROG_CD = ?
  355. ,T.CUR_PROG_CD_REG_PGM = ?
  356. ,T.CUR_PROG_CD_REG_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MMSS')
  357. WHERE T.CHARGE_NO = ?
  358. ]]>
  359. </query>
  360. <query id="XTBGCOMM_CHARGE_PROC_UPT_02" desc="" fetchSize="10">
  361. <![CDATA[
  362. UPDATE TBG02_CHARGE_COMM_D T
  363. SET T.CHARGE_STAT = ?
  364. ,T.BEF_PROG_CD = T.CUR_PROG_CD
  365. ,T.BEF_PROG_CD_REG_PGM = T.CUR_PROG_CD_REG_PGM
  366. ,T.BEF_PROG_CD_REG_DTIME = T.CUR_PROG_CD_REG_DTIME
  367. ,T.CUR_PROG_CD = ?
  368. ,T.CUR_PROG_CD_REG_PGM = ?
  369. ,T.CUR_PROG_CD_REG_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHHMMSS')
  370. WHERE T.CHARGE_NO = ?
  371. ]]>
  372. </query>
  373. <query id="XTBGCOMM_SLAB_PROC_UPT_01" desc="" fetchSize="10">
  374. <![CDATA[
  375. UPDATE TBG02_SLAB_COMM T
  376. SET T.SLAB_STAT = ?
  377. ,T.BEF_PROG_CD = T.CUR_PROG_CD
  378. ,T.BEF_PROG_CD_PGM = T.CUR_PROG_CD_PGM
  379. ,T.BEF_PROG_CD_DTIME = T.CUR_PROG_CD_DTIME
  380. ,T.CUR_PROG_CD = ?
  381. ,T.CUR_PROG_CD_PGM = ?
  382. ,T.CUR_PROG_CD_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHHMMSS')
  383. WHERE T.SLAB_NO = ?
  384. ]]>
  385. </query>
  386. <query id="XTBGCOMM_GET_SUBSLAB_NO" desc="" fetchSize="10">
  387. <![CDATA[
  388. UPDATE TBG02_SLAB_COMM T
  389. SET T.SLAB_STAT = ?
  390. ,T.BEF_PROG_CD = T.CUR_PROG_CD
  391. ,T.BEF_PROG_CD_PGM = T.CUR_PROG_CD_PGM
  392. ,T.BEF_PROG_CD_DTIME = T.CUR_PROG_CD_DTIME
  393. ,T.CUR_PROG_CD = ?
  394. ,T.CUR_PROG_CD_PGM = ?
  395. ,T.CUR_PROG_CD_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHHMMSS')
  396. WHERE T.SLAB_NO = ?
  397. ]]>
  398. </query>
  399. </queryMap>