be44a62f4af7a5cf870f928ef62795adda177311.svn-base 20 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608
  1. <?xml version="1.0" encoding='UTF-8'?>
  2. <queryMap desc="STEEL MAKING QUERY ">
  3. <query id="UIH070010_01.select" desc=" 查询待发板加的钢卷 " fetchSize="10">
  4. <![CDATA[
  5. SELECT '' CHK
  6. ,A.OLD_SAMPL_NO
  7. ,A.COIL_NO
  8. ,A.SPEC_STL_GRD
  9. ,A.ORD_NO
  10. ,A.ORD_SEQ
  11. ,A.SLAB_NO
  12. ,A.COIL_THK
  13. ,A.COIL_WTH
  14. ,A.COIL_LEN
  15. ,A.ACT_WGT
  16. ,A.COIL_INDIA
  17. ,A.COIL_OUTDIA
  18. ,A.CUR_LOAD_LOC
  19. ,'' TRANS_CAR_NO --车辆号,界面输入
  20. ,'' SHIP_INVNO --发货清单号,后台生成
  21. ,'' ROUTE --实去向从界面选择
  22. ,'' MOVE_MAN --移送人
  23. ,TO_CHAR(SYSDATE,'YYYYMMDD') MOVE_TIME --移送时间
  24. ,(SELECT T.DEL_TO_DATE FROM TBE02_ORD_PRC T WHERE T.ORD_NO = A.ORD_NO AND T.ORD_SEQ = A.ORD_SEQ) DEVLMT_DTIME
  25. ,T3.SM_CFNM ORDCUST_CD_DESC
  26. ,T3.SM_CD ORDCUST_CD
  27. ,T2.SM_CFNM CUST_CD_DESC
  28. ,(SELECT sm_cfnm FROM TBZ00_COMMCD WHERE LG_CD = 'A01009' AND C.DEST_PCD = SM_CD) DEST_PCD_DESC
  29. ,(SELECT SM_CD FROM TBZ00_COMMCD WHERE LG_CD = 'A01009' AND C.DEST_PCD = SM_CD) DEST_PCD
  30. ,A.PRODNM_CD
  31. ,A.SPEC_ABBSYM
  32. ,A.MILL_DTIME
  33. ,A.INSTR_COIL_THK
  34. ,A.INSTR_COIL_WTH
  35. ,A.INSTR_COIL_LEN
  36. ,A.INSTR_COIL_WGT
  37. ,A.INSTR_COIL_INDIA
  38. ,A.INSTR_COIL_OUTDIA
  39. ,decode(A.TOT_DEC_GRD,'1','合格','2','不合格','3','外观异常','4','废品') TOT_DEC_GRD_DESC --综合判定
  40. ,decode(A.INGR_DEC_GRD,'0','综合判定取消','1','合格','2','不合格') INGR_DEC_GRD_DESC --成份判定
  41. ,decode(A.MATLQLTY_DEC_GRD,'0','无性能要','1','合格','2','不合格') MATLQLTY_DEC_GRD_DESC --材质判定
  42. ,decode(A.SIZE_DEC_RST,'1','合格','2','订单外合格','3','不合格','4','废品') SIZE_DEC_RST_DESC --尺寸判定
  43. ,decode(A.EXTSHAPE_DEC_GRD,'1','合格','2','订单外合格','3','次品','4','废品') EXTSHAPE_DEC_GRD_DESC --外观判定
  44. ,DECODE(A.WGT_DEC_RST,'1','合格','2','不合格') WGT_DEC_RST_DESC
  45. ,A.TOT_DEC_GRD
  46. ,A.INGR_DEC_GRD
  47. ,A.MATLQLTY_DEC_GRD
  48. ,A.SIZE_DEC_RST
  49. ,A.EXTSHAPE_DEC_GRD
  50. ,A.WGT_DEC_RST
  51. ,A.CRK_CD1
  52. ,A.CRK_CD2
  53. ,A.CRK_CD3
  54. ,A.CRK_CD4
  55. ,A.CRK_CD5
  56. ,DECODE(A.CUR_PROG_CD,'SED','判定待机','SFA','发货待机','SFB','运送待机','SFF','运送完成') CUR_PROG_CD
  57. FROM TBH02_COIL_COMM A,TBA01_ORD_COMM B,TBA01_ORD_LINE C
  58. ,(SELECT T.CUST_CD SM_CD,T.CUST_NM SM_CFNM FROM TBZ00_CUSTOMER T WHERE REC_TP='02') T3
  59. ,(SELECT T.CUST_CD SM_CD,T.CUST_NM SM_CFNM FROM TBZ00_CUSTOMER T WHERE REC_TP='01') T2
  60. WHERE A.ORD_NO = B.ORD_NO(+)
  61. AND B.ORDCUST_CD = T3.SM_CD(+)
  62. AND B.CUST_CD = T2.SM_CD(+)
  63. AND A.ORD_NO = C.ORD_NO(+)
  64. AND A.ORD_SEQ = C.ORD_SEQ(+)
  65. AND A.COIL_STAT = '2'
  66. AND A.OLD_SAMPL_NO LIKE :1||'%'
  67. AND A.SPEC_STL_GRD LIKE :2||'%'
  68. AND T3.SM_CFNM LIKE '%'||:3||'%'
  69. AND A.ORD_NO LIKE :4||'%'
  70. AND A.CUR_LOAD_LOC IS NOT NULL
  71. AND A.TOT_DEC_GRD = '1'
  72. AND A.CUR_PROG_CD = 'SFA'
  73. ORDER BY A.OLD_SAMPL_NO
  74. ]]>
  75. </query>
  76. <query id="UIH070010_02.select" desc=" 查询板加待接收的卷 " fetchSize="10">
  77. <![CDATA[
  78. SELECT '' CHK
  79. ,A.OLD_SAMPL_NO
  80. ,A.SPEC_STL_GRD
  81. ,A.ORD_NO
  82. ,A.ORD_SEQ
  83. ,A.COIL_THK
  84. ,A.COIL_WTH
  85. ,A.COIL_LEN
  86. ,A.ACT_WGT
  87. ,A.TRANS_CAR_NO
  88. ,A.SHIP_INVNO
  89. ,A.ROUTE
  90. ,A.MOVE_TIME
  91. ,'' RTN_CUR_STORE_LOC --钢卷回退放置位置
  92. ,A.MOVE_ST
  93. ,A.RTN_CAU_CD
  94. ,A.CREATOR
  95. ,A.CREATE_TIME
  96. ,A.SHIP_INVNO_CR
  97. ,A.RETURN_REG
  98. ,A.RETURN_DTIME
  99. ,A.YSRETURN_REG
  100. ,A.YSRETURN_DTIME
  101. ,A.BJRETURN_REG
  102. ,A.BJRETURN_DTIME
  103. ,A.CRRETURN_REG
  104. ,A.CRRETURN_DTIME
  105. ,DECODE(A.MATLQLTY_DEC_GRD,'1','合格','2','不合格',null) as MATLQLTY_DEC_GRD_DESC
  106. ,DECODE(A.TOT_DEC_GRD,'1','合格','2','不合格',null) as TOT_DEC_GRD_DESC
  107. ,T3.SM_CFNM ORDCUST_CD_DESC
  108. ,T3.SM_CD ORDCUST_CD
  109. ,T2.SM_CFNM CUST_CD_DESC
  110. ,A.ENTRY_REG
  111. ,A.ENTRY_DTIME
  112. ,A.INSTR_COIL_THK
  113. ,A.INSTR_COIL_WTH
  114. ,A.PRODNM_CD
  115. ,A.SPEC_ABBSYM
  116. ,(SELECT sm_cfnm FROM TBZ00_COMMCD WHERE LG_CD = 'A01009' AND C.DEST_PCD = SM_CD) DEST_PCD_DESC
  117. ,(SELECT SM_CD FROM TBZ00_COMMCD WHERE LG_CD = 'A01009' AND C.DEST_PCD = SM_CD) DEST_PCD
  118. ,A.COIL_NO
  119. FROM TBH07_BJ_TRANFINFO A,TBA01_ORD_COMM B,TBA01_ORD_LINE C
  120. ,(SELECT T.CUST_CD SM_CD,T.CUST_NM SM_CFNM FROM TBZ00_CUSTOMER T WHERE REC_TP='02') T3
  121. ,(SELECT T.CUST_CD SM_CD,T.CUST_NM SM_CFNM FROM TBZ00_CUSTOMER T WHERE REC_TP='01') T2
  122. WHERE A.ORD_NO = B.ORD_NO(+)
  123. AND B.ORDCUST_CD = T3.SM_CD(+)
  124. AND B.CUST_CD = T2.SM_CD(+)
  125. AND A.ORD_NO = C.ORD_NO(+)
  126. AND A.ORD_SEQ = C.ORD_SEQ(+)
  127. AND A.MOVE_TIME LIKE :1||'%'
  128. AND A.TRANS_CAR_NO LIKE :2||'%'
  129. AND A.SHIP_INVNO||'&' LIKE :3||'%'
  130. AND A.MOVE_ST LIKE :4||'%'
  131. AND A.SHIP_INVNO_CR||'&' LIKE :5||'%'
  132. ORDER BY A.SHIP_INVNO,A.SHIP_INVNO_CR
  133. ]]>
  134. </query>
  135. <query id="UIH070010_03.select" desc=" 这里获取移送板加的发货明细编号 " fetchSize="10">
  136. <![CDATA[
  137. SELECT SUBSTRB(A.SHIP_INVNO,1,4)||TO_CHAR(TO_NUMBER(SUBSTRB(SHIP_INVNO,5,6)) + 1,'FM000000') SHIP_INVNO
  138. FROM (SELECT ROW_NUMBER() OVER (ORDER BY NVL(SHIP_INVNO,'BJ0-0000000') DESC) AS RN
  139. ,MOVE_TIME
  140. ,SHIP_INVNO
  141. FROM TBH07_BJ_TRANFINFO
  142. WHERE SHIP_INVNO LIKE 'BJ0%') A
  143. WHERE A.RN = 1
  144. ]]>
  145. </query>
  146. <query id="UIH070010_04.select" desc=" 查询垛位表中是否存在数据 " fetchSize="10">
  147. <![CDATA[
  148. SELECT A.COIL_NO FROM TBH05_COIL_YARD A WHERE A.YARD_CLF||A.STEP_CLF||A.STORELAY||A.STORE_SEQ = :1
  149. ]]>
  150. </query>
  151. <query id="UIH070010_05.select" desc=" 这里获取移送冷轧的发货明细编号 " fetchSize="10">
  152. <![CDATA[
  153. /********************************************************************************************************
  154. SELECT CASE WHEN (SUBSTRB(A.MOVE_TIME,1,4) = TO_CHAR(SYSDATE,'YYYY')) THEN
  155. SUBSTRB(A.SHIP_INVNO_CR,1,4)||TO_CHAR(TO_NUMBER(SUBSTRB(A.SHIP_INVNO_CR,5,6)) + 1,'FM000000')
  156. ELSE
  157. DECODE(SUBSTRB(A.SHIP_INVNO_CR,1,4),TO_CHAR(SYSDATE,'YYYY')
  158. ,SUBSTRB(A.SHIP_INVNO_CR,1,4)||TO_CHAR(TO_NUMBER(SUBSTRB(SHIP_INVNO_CR,5,6)) + 1,'FM000000')
  159. ,SUBSTRB(A.SHIP_INVNO_CR,1,2)||TO_CHAR(MOD(TO_NUMBER(TO_CHAR(SYSDATE,'YY')),10),'FM0')||'-'||'000001'
  160. )
  161. END AS SHIP_INVNO_CR
  162. FROM (SELECT ROW_NUMBER() OVER (ORDER BY NVL(SHIP_INVNO_CR,'CR0-0000000') DESC) AS RN
  163. ,MOVE_TIME
  164. ,SHIP_INVNO_CR
  165. FROM TBH07_BJ_TRANFINFO) A
  166. WHERE A.RN = 1
  167. *******************************************************************************************************/
  168. SELECT SUBSTRB(A.SHIP_INVNO_CR,1,4)||TO_CHAR(TO_NUMBER(SUBSTRB(SHIP_INVNO_CR,5,6)) + 1,'FM000000') SHIP_INVNO_CR
  169. FROM (SELECT ROW_NUMBER() OVER (ORDER BY NVL(SHIP_INVNO_CR,'CR0-0000000') DESC) AS RN
  170. ,MOVE_TIME
  171. ,SHIP_INVNO_CR
  172. FROM TBH07_BJ_TRANFINFO
  173. WHERE SHIP_INVNO_CR LIKE 'CR0%') A
  174. WHERE A.RN = 1
  175. ]]>
  176. </query>
  177. <query id="UIH070010_06.select" desc=" 这里效验此卷的状态是否已经做了发运计划或者发运完成 " fetchSize="10">
  178. <![CDATA[
  179. SELECT A.CUR_PROG_CD FROM TBH02_COIL_COMM A WHERE A.OLD_SAMPL_NO = ?
  180. ]]>
  181. </query>
  182. <query id="UIH070010_07.select" desc=" 查询板加待接收的卷,这里已报表的形式提交 " fetchSize="10">
  183. <![CDATA[
  184. SELECT '' CHK
  185. ,A.OLD_SAMPL_NO
  186. ,A.SPEC_STL_GRD
  187. ,A.ORD_NO
  188. ,A.ORD_SEQ
  189. ,A.COIL_THK
  190. ,A.COIL_WTH
  191. ,A.COIL_LEN
  192. ,A.ACT_WGT
  193. ,A.TRANS_CAR_NO
  194. ,A.SHIP_INVNO
  195. ,A.ROUTE
  196. ,A.MOVE_TIME
  197. ,'' RTN_CUR_STORE_LOC --钢卷回退放置位置
  198. ,A.MOVE_ST
  199. ,A.RTN_CAU_CD
  200. ,A.CREATOR
  201. ,A.CREATE_TIME
  202. ,A.SHIP_INVNO_CR
  203. ,A.RETURN_REG
  204. ,A.RETURN_DTIME
  205. ,A.YSRETURN_REG
  206. ,A.YSRETURN_DTIME
  207. ,A.BJRETURN_REG
  208. ,A.BJRETURN_DTIME
  209. ,A.CRRETURN_REG
  210. ,A.CRRETURN_DTIME
  211. ,A.RETURN_REM
  212. ,A.RETURN_SHIFT
  213. ,A.RETURN_GROUP
  214. ,A.MOVE_SHIFT
  215. ,A.MOVE_GROUP
  216. ,(SELECT sm_cfnm FROM TBZ00_COMMCD WHERE LG_CD = 'A01009' AND A.DEST_CD = SM_CD) DEST_PCD
  217. ,T3.SM_CD ORDCUST_CD
  218. ,T3.SM_CFNM ORDCUST_CD_DESC
  219. ,A.PRODNM_CD
  220. ,T2.SM_CFNM CUST_CD_DESC
  221. FROM TBH07_BJ_TRANFINFO A,TBA01_ORD_COMM B
  222. ,(SELECT T.CUST_CD SM_CD,T.CUST_NM SM_CFNM FROM TBZ00_CUSTOMER T WHERE REC_TP='02') T3
  223. ,(SELECT T.CUST_CD SM_CD,T.CUST_NM SM_CFNM FROM TBZ00_CUSTOMER T WHERE REC_TP='01') T2
  224. WHERE A.ORD_NO = B.ORD_NO(+)
  225. AND B.ORDCUST_CD = T3.SM_CD(+)
  226. AND B.CUST_CD = T2.SM_CD(+)
  227. AND A.OLD_SAMPL_NO LIKE :1||'%'
  228. AND (SUBSTR(A.MOVE_TIME,1,8) >= :2)
  229. AND (SUBSTR(A.MOVE_TIME,1,8) <= :3)
  230. AND A.MOVE_ST LIKE :4||'%'
  231. AND A.MOVE_SHIFT||'&' LIKE :5||'%'
  232. AND A.MOVE_GROUP||'&' LIKE :6||'%'
  233. AND T3.SM_CFNM LIKE :7||'%'
  234. AND A.SPEC_STL_GRD LIKE :8||'%'
  235. AND A.ORD_NO LIKE :9||'%'
  236. ORDER BY A.SHIP_INVNO,A.SHIP_INVNO_CR
  237. ]]>
  238. </query>
  239. <query id="UIH070010_08.select" desc=" 查询板加待接收的卷,这里已报表的形式提交 " fetchSize="10">
  240. <![CDATA[
  241. SELECT count(A.OLD_SAMPL_NO) COIL_CNT,
  242. nvl(sum(a.act_wgt)/1000,0) COIL_WGT
  243. FROM TBH07_BJ_TRANFINFO A,TBA01_ORD_COMM B
  244. ,(SELECT T.CUST_CD SM_CD,T.CUST_NM SM_CFNM FROM TBZ00_CUSTOMER T) T3
  245. WHERE A.ORD_NO = B.ORD_NO(+)
  246. AND B.ORDCUST_CD = T3.SM_CD(+)
  247. AND A.OLD_SAMPL_NO LIKE :1||'%'
  248. AND (SUBSTR(A.MOVE_TIME,1,8) >= :2)
  249. AND (SUBSTR(A.MOVE_TIME,1,8) <= :3)
  250. AND A.MOVE_ST LIKE :4||'%'
  251. AND A.MOVE_SHIFT||'&' LIKE :5||'%'
  252. AND A.MOVE_GROUP||'&' LIKE :6||'%'
  253. AND T3.SM_CFNM LIKE :7||'%'
  254. AND A.SPEC_STL_GRD LIKE :8||'%'
  255. AND A.ORD_NO LIKE :9||'%'
  256. ORDER BY A.SHIP_INVNO,A.SHIP_INVNO_CR
  257. ]]>
  258. </query>
  259. <query id="UIH070010_09.select" desc="效验移送状态,热轧退回时必须为0" fetchSize="10">
  260. <![CDATA[
  261. SELECT A.MOVE_ST FROM TBH07_BJ_TRANFINFO A WHERE A.OLD_SAMPL_NO = :1 AND A.SHIP_INVNO = :2
  262. ]]>
  263. </query>
  264. <query id="UIH070010_01.insert" desc=" 把数据迁移到板加接口表,这里走的是人工操作界面 " fetchSize="10">
  265. <![CDATA[
  266. insert into TBH07_BJ_TRANFINFO A
  267. (
  268. OLD_SAMPL_NO
  269. ,SPEC_STL_GRD
  270. ,ORD_NO
  271. ,ORD_SEQ
  272. ,SLAB_NO
  273. ,COIL_THK
  274. ,COIL_WTH
  275. ,COIL_LEN
  276. ,ACT_WGT
  277. ,COIL_INDIA
  278. ,COIL_OUTDIA
  279. ,TRANS_CAR_NO
  280. ,SHIP_INVNO
  281. ,ROUTE
  282. ,MOVE_ST
  283. ,DEVLMT_DTIME
  284. ,ORDCUST_CD
  285. ,DEST_CD
  286. ,PRODNM_CD
  287. ,SPEC_ABBSYM
  288. ,MILL_DTIME
  289. ,INSTR_COIL_THK
  290. ,INSTR_COIL_WTH
  291. ,INSTR_COIL_LEN
  292. ,INSTR_COIL_WGT
  293. ,INSTR_COIL_INDIA
  294. ,INSTR_COIL_OUTDIA
  295. ,EXTSHAPE_DEC_GRD
  296. ,INGR_DEC_GRD
  297. ,MATLQLTY_DEC_GRD
  298. ,SIZE_DEC_RST
  299. ,WGT_DEC_RST
  300. ,TOT_DEC_GRD
  301. ,CRK_CD1
  302. ,CRK_CD2
  303. ,CRK_CD3
  304. ,CRK_CD4
  305. ,CRK_CD5
  306. ,MOVE_MAN
  307. ,SX_BIAOZHUN
  308. ,BAHCT_NUMBER
  309. ,CHARGE_NO
  310. ,MOVE_LINE
  311. ,ARRIVE_LINE
  312. ,MOVE_SHIFT
  313. ,MOVE_GROUP
  314. ,ENTRY_REG
  315. ,ENTRY_DTIME
  316. ,COIL_NO
  317. ,MOVE_TYPE
  318. ,MOVE_TIME
  319. )
  320. values
  321. (
  322. :1
  323. ,:2
  324. ,:3
  325. ,:4
  326. ,:5
  327. ,:6
  328. ,:7
  329. ,:8
  330. ,:9
  331. ,:10
  332. ,:11
  333. ,:12
  334. ,:13
  335. ,:14
  336. ,:15
  337. ,:16
  338. ,:17
  339. ,:18
  340. ,:19
  341. ,:20
  342. ,:21
  343. ,:22
  344. ,:23
  345. ,:24
  346. ,:25
  347. ,:26
  348. ,:27
  349. ,:28
  350. ,:29
  351. ,:30
  352. ,:31
  353. ,:32
  354. ,:33
  355. ,:34
  356. ,:35
  357. ,:36
  358. ,:37
  359. ,:38
  360. ,:39
  361. ,:40
  362. ,:41
  363. ,:42
  364. ,:43
  365. ,:44
  366. ,:45
  367. ,:46
  368. ,:47
  369. ,:48
  370. ,:49
  371. ,'1'
  372. ,TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')
  373. )
  374. ]]>
  375. </query>
  376. <query id="UIH070010_02.insert" desc=" 把数据迁移到冷轧接口表,这里走的是人工操作界面 " fetchSize="10">
  377. <![CDATA[
  378. insert into TBH07_BJ_TRANFINFO A
  379. (
  380. OLD_SAMPL_NO
  381. ,SPEC_STL_GRD
  382. ,ORD_NO
  383. ,ORD_SEQ
  384. ,SLAB_NO
  385. ,COIL_THK
  386. ,COIL_WTH
  387. ,COIL_LEN
  388. ,ACT_WGT
  389. ,COIL_INDIA
  390. ,COIL_OUTDIA
  391. ,TRANS_CAR_NO
  392. ,SHIP_INVNO_CR
  393. ,ROUTE
  394. ,MOVE_ST
  395. ,DEVLMT_DTIME
  396. ,ORDCUST_CD
  397. ,DEST_CD
  398. ,PRODNM_CD
  399. ,SPEC_ABBSYM
  400. ,MILL_DTIME
  401. ,INSTR_COIL_THK
  402. ,INSTR_COIL_WTH
  403. ,INSTR_COIL_LEN
  404. ,INSTR_COIL_WGT
  405. ,INSTR_COIL_INDIA
  406. ,INSTR_COIL_OUTDIA
  407. ,EXTSHAPE_DEC_GRD
  408. ,INGR_DEC_GRD
  409. ,MATLQLTY_DEC_GRD
  410. ,SIZE_DEC_RST
  411. ,WGT_DEC_RST
  412. ,TOT_DEC_GRD
  413. ,CRK_CD1
  414. ,CRK_CD2
  415. ,CRK_CD3
  416. ,CRK_CD4
  417. ,CRK_CD5
  418. ,MOVE_MAN
  419. ,SX_BIAOZHUN
  420. ,BAHCT_NUMBER
  421. ,CHARGE_NO
  422. ,MOVE_LINE
  423. ,ARRIVE_LINE
  424. ,MOVE_SHIFT
  425. ,MOVE_GROUP
  426. ,ENTRY_REG
  427. ,ENTRY_DTIME
  428. ,COIL_NO
  429. ,MOVE_TYPE
  430. ,MOVE_TIME
  431. )
  432. values
  433. (
  434. :1
  435. ,:2
  436. ,:3
  437. ,:4
  438. ,:5
  439. ,:6
  440. ,:7
  441. ,:8
  442. ,:9
  443. ,:10
  444. ,:11
  445. ,:12
  446. ,:13
  447. ,:14
  448. ,:15
  449. ,:16
  450. ,:17
  451. ,:18
  452. ,:19
  453. ,:20
  454. ,:21
  455. ,:22
  456. ,:23
  457. ,:24
  458. ,:25
  459. ,:26
  460. ,:27
  461. ,:28
  462. ,:29
  463. ,:30
  464. ,:31
  465. ,:32
  466. ,:33
  467. ,:34
  468. ,:35
  469. ,:36
  470. ,:37
  471. ,:38
  472. ,:39
  473. ,:40
  474. ,:41
  475. ,:42
  476. ,:43
  477. ,:44
  478. ,:45
  479. ,:46
  480. ,:47
  481. ,:48
  482. ,:49
  483. ,'1'
  484. ,TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')
  485. )
  486. ]]>
  487. </query>
  488. <query id="UIH070010_01.update" desc=" 把发货明细号迁到钢卷公共表 " fetchSize="10">
  489. <![CDATA[
  490. update TBH02_COIL_COMM A set
  491. A.SHIP_INVNO = :1
  492. ,A.TRANS_CAR_NO = :2
  493. ,A.ROUTE = :3
  494. ,A.CUR_LOAD_LOC = 'BJ'
  495. ,A.CUR_LOAD_LOC_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')
  496. ,A.BEF_LOAD_LOC = CUR_LOAD_LOC
  497. ,A.BEF_LOAD_LOC_DTIME = CUR_LOAD_LOC_DTIME
  498. ,A.CUR_PROG_CD = 'SFF'
  499. ,A.CUR_PROG_CD_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')
  500. ,A.CUR_PROG_CD_PGM = 'UIH070010'
  501. ,A.BEF_PROG_CD = A.CUR_PROG_CD
  502. ,A.BEF_PROG_CD_DTIME = A.CUR_PROG_CD_DTIME
  503. ,A.BEF_PROG_CD_PGM = A.CUR_PROG_CD_PGM
  504. ,A.COIL_STAT = '3' --这里移送的卷在热轧结束相应状态
  505. where A.OLD_SAMPL_NO = :4
  506. ]]>
  507. </query>
  508. <query id="UIH070010_02.update" desc=" 更新垛位表 " fetchSize="10">
  509. <![CDATA[
  510. update TBH05_COIL_YARD A set
  511. A.COIL_NO = :1
  512. ,A.REG_ID = 'UIH070010'
  513. ,A.REG_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')
  514. where A.YARD_CLF||A.STEP_CLF||A.STORELAY||A.STORE_SEQ = :2
  515. ]]>
  516. </query>
  517. <query id="UIH070010_03.update" desc=" 移送回退的时候更新钢卷公共表 " fetchSize="10">
  518. <![CDATA[
  519. update tbh02_coil_comm A set
  520. A.CUR_LOAD_LOC = :1
  521. ,A.CUR_LOAD_LOC_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')
  522. ,A.BEF_LOAD_LOC = CUR_LOAD_LOC
  523. ,A.BEF_LOAD_LOC_DTIME = CUR_LOAD_LOC_DTIME
  524. ,A.TRANS_CAR_NO = ''
  525. ,A.ROUTE = 'H'
  526. ,A.COIL_STAT = '2'
  527. ,A.CUR_PROG_CD = 'SFA'
  528. ,A.CUR_PROG_CD_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')
  529. ,A.CUR_PROG_CD_PGM = 'UIH070010'
  530. ,A.BEF_PROG_CD = A.CUR_PROG_CD
  531. ,A.BEF_PROG_CD_DTIME = A.CUR_PROG_CD_DTIME
  532. ,A.BEF_PROG_CD_PGM = A.CUR_PROG_CD_PGM
  533. where A.OLD_SAMPL_NO = :2
  534. ]]>
  535. </query>
  536. <query id="UIH070010_04.update" desc=" 更新移送接口表,热轧回退板加的情况 " fetchSize="10">
  537. <![CDATA[
  538. update TBH07_BJ_TRANFINFO A set
  539. A.YSRETURN_REG = :1
  540. ,A.YSRETURN_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')
  541. ,A.MOVE_ST = '2'
  542. where A.OLD_SAMPL_NO = :2
  543. AND A.SHIP_INVNO = :3
  544. ]]>
  545. </query>
  546. <query id="UIH070010_05.update" desc=" 移送的时候还要清除垛位表数据 " fetchSize="10">
  547. <![CDATA[
  548. update TBH05_COIL_YARD A set
  549. A.COIL_NO = ''
  550. ,A.REG_ID = ''
  551. ,A.REG_DTIME = ''
  552. where A.COIL_NO = :1
  553. ]]>
  554. </query>
  555. <query id="UIH070010_06.update" desc=" 更新移送接口表,板加回退的情况 " fetchSize="10">
  556. <![CDATA[
  557. update TBH07_BJ_TRANFINFO A set
  558. A.BJRETURN_REG = :1
  559. ,A.BJRETURN_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')
  560. ,A.MOVE_ST = '8'
  561. where A.OLD_SAMPL_NO = :2
  562. AND A.SHIP_INVNO = :3
  563. ]]>
  564. </query>
  565. <query id="UIH070010_07.update" desc=" 更新移送接口表,冷轧回退的情况 " fetchSize="10">
  566. <![CDATA[
  567. update TBH07_BJ_TRANFINFO A set
  568. A.CRRETURN_REG = :1
  569. ,A.CRRETURN_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')
  570. ,A.MOVE_ST = '7'
  571. where A.OLD_SAMPL_NO = :2
  572. AND A.SHIP_INVNO_CR = :3
  573. ]]>
  574. </query>
  575. <query id="UIH070010_08.update" desc=" 把发货明细号迁到钢卷公共表,冷轧 " fetchSize="10">
  576. <![CDATA[
  577. update TBH02_COIL_COMM A set
  578. A.SHIP_INVNO = :1
  579. ,A.TRANS_CAR_NO = :2
  580. ,A.ROUTE = :3
  581. ,A.CUR_LOAD_LOC = 'CR'
  582. ,A.CUR_LOAD_LOC_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')
  583. ,A.BEF_LOAD_LOC = CUR_LOAD_LOC
  584. ,A.BEF_LOAD_LOC_DTIME = CUR_LOAD_LOC_DTIME
  585. ,A.CUR_PROG_CD = 'SFF'
  586. ,A.CUR_PROG_CD_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')
  587. ,A.CUR_PROG_CD_PGM = 'UIH070010'
  588. ,A.BEF_PROG_CD = A.CUR_PROG_CD
  589. ,A.BEF_PROG_CD_DTIME = A.CUR_PROG_CD_DTIME
  590. ,A.BEF_PROG_CD_PGM = A.CUR_PROG_CD_PGM
  591. ,A.COIL_STAT = '3' --这里移送的卷在热轧结束相应状态
  592. where A.OLD_SAMPL_NO = :4
  593. ]]>
  594. </query>
  595. <query id="UIH070010_09.update" desc=" 更新移送接口表,热轧回退冷轧的情况 " fetchSize="10">
  596. <![CDATA[
  597. update TBH07_BJ_TRANFINFO A set
  598. A.YSRETURN_REG = :1
  599. ,A.YSRETURN_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')
  600. ,A.MOVE_ST = '2'
  601. where A.OLD_SAMPL_NO = :2
  602. AND A.SHIP_INVNO_CR = :3
  603. ]]>
  604. </query>
  605. </queryMap>