UIG040210-query.xml 48 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823
  1. <?xml version="1.0" encoding='UTF-8'?>
  2. <queryMap desc="STEEL MAKING PROGRESS MONITORING ">
  3. <query id="UIG040210_01.select" desc=" 取板坯运送前的信息,此时板坯在我方数据库。 ">
  4. <![CDATA[
  5. SELECT A.SLAB_NO
  6. ,F.STL_GRD PLAN_STL_GRD
  7. ,A.STL_GRD
  8. ,A.SLAB_THK
  9. ,A.SLAB_WTH
  10. ,A.SLAB_LEN
  11. ,A.SLAB_WGT
  12. ,A.FB_YN
  13. ,A.FB_REASON
  14. ,A.WEIGHT_WGT --20130227
  15. ,CUR_LOAD_LOC
  16. ,DECODE(SUBSTR(A.CUR_LOAD_LOC,1,1),'Z',A.SLAB_STOCK_ENT_DTIME,'L',A.SMS_YARD_ENT_DTIME) SLAB_STOCK_ENT_DTIME
  17. ,ROUND((SYSDATE - to_date(nvl(DECODE(SUBSTR(A.CUR_LOAD_LOC,1,1),'Z',A.SLAB_STOCK_ENT_DTIME,'L',A.SMS_YARD_ENT_DTIME), TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')),'YYYYMMDDHH24MISS')) * 24 ,3) ZKSJ
  18. ,decode(A.SLAB_RT,'H','热轧厂','Z','中板厂','P','厚板厂') SLAB_RT
  19. ,decode(a.SLAB_OUT_TP,'Y','允许出库','不允许出库') SLAB_OUT_TP
  20. ,XB_PACKAGE.GF_COMNNAME_FIND('E01002', A.CUR_PROG_CD) CUR_PROG_CD
  21. ,decode(A.ORD_FL,'1','订单材','2','余材') ORD_FL
  22. ,G.PRD_TY --产品类型
  23. ,(select sm_cfnm from tbz00_commcd where lg_cd like 'E01010%' and sm_cd = A.NONORD_CAUSE_CD)NONORD_CAUSE_CD
  24. ,(SELECT TT.SM_CFNM FROM TBZ00_COMMCD TT WHERE TT.LG_CD = 'G03004' AND TT.SM_CD = A.CRK_CD1) CRK_CD1
  25. ,(SELECT SM_CFNM FROM TBZ00_COMMCD WHERE LG_CD LIKE 'B01136' AND SM_CD = A.SLAB_TOT_DEC_GRD) SLAB_TOT_DEC_GRD
  26. ,(SELECT SM_CFNM FROM TBZ00_COMMCD WHERE SM_CD = A.SLAB_INGR_DEC_KIND AND LG_CD = 'B01133') SLAB_INGR_DEC_KIND --成分判定依据
  27. ,A.SLAB_INGR_DEC_GRD
  28. ,substr(a.SLAB_NO,3,1)||'号转炉' BOF_NO
  29. ,SUBSTR(E.CC_DEVNO,2,1)||'连铸机' CCM_NO
  30. ,(SELECT SM_CFNM FROM TBZ00_COMMCD WHERE SM_CD = SUBSTR(A.SLAB_NO,3,1) AND LG_CD = 'B01132') CHANDI
  31. --,A.ORD_NO
  32. ,DECODE(A.SLAB_RT,'H',A.ORD_NO,I.ORD_NO) ORD_NO
  33. ,DECODE(A.SLAB_RT,'H',A.ORD_SEQ,I.ORD_SEQ) ORD_SEQ
  34. ,H.L2_SCH_NO
  35. ,decode(G.KEEPWARM_YN,'Y','有','N','无','','无')KEEPWARM_YN --是否需要坑冷
  36. ,(SELECT T.SM_CFNM FROM TBZ00_COMMCD T WHERE T.LG_CD = 'A01001' AND T.SM_CD = D.RCVORD_TP)RCVORD_TP --是否出口
  37. ,DECODE(C.DLIV_TP,'T','火运','C','汽运') DLIV_TP -- 运输方式
  38. ,G.H_SPEC_STL_GRD SPEC_STL_GRD --订单钢号
  39. ,L.PLANPRODUCTDATE PLAN_PRODUCT_DATE --预排期
  40. ,CASE
  41. WHEN A.SLAB_RT = 'H' THEN
  42. c.ORD_DEVLMT_DATE /*C.CMT_DLIV_DEVLMT_DATE*/
  43. WHEN A.SLAB_RT = 'Z' OR A.SLAB_RT = 'P' THEN
  44. to_char(H.L2_SENDBEGINDATE, 'yyyy-mm-dd hh24:mi:ss')
  45. END CMT_DLIV_DEVLMT_DATE --交货期
  46. ,C.XSQY --销售区域 生产处刘树根要求添加 TL 091225
  47. ,
  48. CASE
  49. WHEN A.SLAB_RT = 'H' THEN
  50. G.ORD_THK
  51. WHEN A.SLAB_RT = 'Z' OR A.SLAB_RT = 'P' THEN
  52. H.L2_PLATE_PLY
  53. ELSE
  54. 0
  55. END ORD_THK --订单厚度
  56. ,
  57. CASE
  58. WHEN A.SLAB_RT = 'H' THEN
  59. G.ORD_WTH
  60. WHEN A.SLAB_RT = 'Z' OR A.SLAB_RT = 'P' THEN
  61. H.L2_PLATE_WIDTH
  62. ELSE
  63. 0
  64. END ORD_WTH --订单宽度
  65. ,ROUND(C.PROD_WGT_MIN/1000,2)||'~'||ROUND(C.PROD_WGT_MAX/1000,2)||'T' ORD_WGT --订单单重范围
  66. ,decode(A.SLAB_INGR_DEC_GRD,'1','合格','2','不合格','','待判') SLAB_INGR_DEC_GRD1
  67. ,'-' CASTING_STA_DTIME
  68. ,'-' CASTING_END_DTIME
  69. ,E.INGR_DEC_DTIME
  70. ,'-' IGR_LAG_DTIME
  71. ,A.SLAB_CUT_DTIME --切割时间
  72. ,'-' CUT_LAG_DTIME
  73. ,decode(A.CUT_WKSHIFT,'1','早班','2','中班','3','晚班')CUT_WKSHIFT
  74. ,decode(A.CUT_WKGROUP,'A','甲班','B','乙班','C','丙班','D','丁班')CUT_WKGROUP
  75. ,A.CUT_EMP_ID
  76. ,DECODE(K.DSN_KIND, '1', 'Y', 'N') AS INGR_YN
  77. ,A.REMARKS REMARKS2
  78. --,'' REMARKS
  79. ,NVL(A.SLAB_DCS_DETAIL,E.CHARGE_DCS_DETAIL) REMARKS
  80. ,'' SEQ
  81. ,A.NONORD_OCR_DTIME
  82. --,A.SLAB_INGR_DEC_DTIME
  83. /*,C.CMT_DLIV_DEVLMT_DATE --交货期
  84. ,G.ORD_THK --订单厚度
  85. ,G.ORD_WTH --订单宽度
  86. ,G.PRODNM_CD --交货状态
  87. ,G.C_PRODNM_CD --交货状态*/
  88. FROM TBG02_SLAB_COMM A
  89. ,TBG04_SLAB_YARD B
  90. ,TBA01_ORD_LINE C
  91. ,TBA01_ORD_COMM D
  92. ,TBG02_CHARGE_COMM E
  93. ,TBF01_SPEC_SLAB F
  94. ,TBE02_ORD_PRC G
  95. ,TBD01_SLABDN_OBJ2 H
  96. ,TBB01_ORD_MAP I
  97. ,(SELECT T.ORD_NO ,T.ORD_SEQ ,'1' DSN_KIND FROM TBB01_ORD_HEAD T WHERE T.CUST_SPEC_NO_INGR IS NOT NULL) K
  98. ,sel_pactdetail L
  99. WHERE A.SLAB_NO = B.SLAB_NO(+)
  100. AND A.PLAN_SLAB_NO = F.SLAB_MANA_NO(+)
  101. AND A.ORD_NO = C.ORD_NO(+)
  102. AND A.ORD_SEQ = C.ORD_SEQ(+)
  103. and a.ORD_NO = g.ORD_NO(+)
  104. and a.ORD_SEQ = g.ORD_SEQ(+)
  105. AND A.ORD_NO = D.ORD_NO(+)
  106. AND A.ORD_NO = K.ORD_NO(+)
  107. AND A.ORD_SEQ = K.ORD_SEQ(+)
  108. AND A.DSN_SLAB_NO = H.DSN_SLAB_NO(+)
  109. and H.ORD_NO = I.ZH_ORD_NO(+)
  110. AND H.ORD_SEQ = I.ZH_ORD_SEQ(+)
  111. AND A.ORD_NO||A.ORD_SEQ = L.ORDERNO(+)
  112. ----MOD BY WXY 炉次变更----100302---------
  113. AND SUBSTR(A.SUB_SLAB_NO,1,10) = E.CHARGE_NO
  114. ----------------------------------------
  115. AND A.CUR_LOAD_LOC = B.YARD_ADDR(+)||B.STORELAY(+)
  116. AND A.SLAB_STAT = '2'
  117. AND A.SLAB_NO LIKE ?||'%' --1
  118. AND A.STL_GRD LIKE '%'||NVL(?,A.STL_GRD)||'%' --2
  119. AND A.CUR_LOAD_LOC||'&' LIKE DECODE(?,'J','L','R','Z')||'%' --3
  120. AND SUBSTR(A.SLAB_NO,3,1) IN (SELECT SM_CD FROM TBZ00_COMMCD WHERE SM_CFNM||'&' LIKE ?||'%' AND LG_CD = 'B01132') --4
  121. AND A.SLAB_LEN >= ? AND A.SLAB_LEN <= ? --6
  122. AND A.ORD_NO||'&' LIKE ?||'%' --7
  123. AND A.ORD_FL||'&' LIKE ?||'%' --8
  124. AND A.SLAB_STOCK_TYPE||'&' like ?||'%' --9热轧入库类型(1:热送入库 2 冷送入库 3 加回入库 4 轧回入库)
  125. AND A.SLAB_RT||'&' LIKE ?||'%' --10
  126. AND A.NONORD_CAUSE_CD||'&' LIKE ?||'%' --11
  127. AND A.SLAB_INGR_DEC_GRD||'&' LIKE ?||'%' --12
  128. AND A.SLAB_WTH >= ? AND A.SLAB_WTH <= ? --14
  129. AND SUBSTR(nvl(C.CMT_DLIV_DEVLMT_DATE,10000000), 1, 8) <= nvl(?,'50000000') --15交货期
  130. -------------------------------------------
  131. AND C.DLIV_TP||'&' LIKE ?||'%' --16运输方式
  132. AND C.KEEPWARM_YN||'&' LIKE ?||'%' --17
  133. AND (A.STL_GRD LIKE ? OR A.STL_GRD LIKE ? OR A.STL_GRD LIKE ? OR A.STL_GRD LIKE ? OR A.STL_GRD LIKE ? OR A.STL_GRD LIKE ?) --23
  134. --------------------ADD BY WXY 091130 生产处要求
  135. AND substr(A.SLAB_CUT_DTIME,1,8) >= ? --24
  136. AND substr(A.SLAB_CUT_DTIME,1,8) <= ? --25
  137. AND SUBSTR(A.SLAB_NO,3,1) LIKE ? --26
  138. AND SUBSTR(E.CC_DEVNO,2,1)||'&' LIKE ?||'%' --27
  139. AND C.XSQY||'&' LIKE ?||'%' --28
  140. AND A.SLAB_TOT_DEC_GRD||'&' LIKE ?||'%' --29
  141. -------------------------------------------------
  142. AND ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_END_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(A.SLAB_CUT_DTIME,'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 1),2) >= ?
  143. AND ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_END_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(A.SLAB_CUT_DTIME,'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 1),2) <= ?
  144. AND ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_STA_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(decode(A.SLAB_INGR_DEC_DTIME,'',E.INGR_DEC_DTIME,A.SLAB_INGR_DEC_DTIME),'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 0.75),2) >= ?
  145. AND ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_STA_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(decode(A.SLAB_INGR_DEC_DTIME,'',E.INGR_DEC_DTIME,A.SLAB_INGR_DEC_DTIME),'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 0.75),2) <= ?
  146. AND A.CUR_PROG_CD LIKE ?||'%' --34
  147. -- AND G.PRD_TY||'&' LIKE ?||'%'
  148. AND INSTR(NVL(? , NVL(G.PRD_TY,'AR')) , NVL(G.PRD_TY,'AR')) > 0 --为空的作为AR,简单处理 --35
  149. AND A.SLAB_THK >= ? AND A.SLAB_THK <= ? --37
  150. AND H.L2_SCH_NO||'&' LIKE ?||'%' --38
  151. AND INSTR(NVL(? , NVL(A.CRK_CD1,'ALL')) , NVL(A.CRK_CD1,'ALL')) > 0 --为空的作为ALL,简单处理 --39
  152. ORDER BY STL_GRD,SLAB_NO,SLAB_WTH
  153. ]]>
  154. </query>
  155. <query id="UIG040210_03.select" desc=" 在辊道坯料 ">
  156. <![CDATA[
  157. SELECT '' SEQ
  158. -----------------------ADD by wxy 091130 生产处要求
  159. ,substr(a.SLAB_NO,3,1)||'号转炉' BOF_NO
  160. ,SUBSTR(E.CC_DEVNO,2,1)||'连铸机' CCM_NO
  161. -------------------------------------
  162. ,A.SLAB_NO
  163. ,A.STL_GRD
  164. ,A.REMARKS REMARKS2
  165. ,A.SLAB_THK
  166. ,A.SLAB_WTH
  167. ,A.SLAB_LEN
  168. ,A.SLAB_WGT
  169. ,A.FB_YN
  170. ,A.FB_REASON
  171. ,decode(a.SLAB_OUT_TP,'Y','允许出库','不允许出库') SLAB_OUT_TP
  172. ,(SELECT TT.SM_CFNM FROM TBZ00_COMMCD TT WHERE TT.LG_CD = 'G03004' AND TT.SM_CD = A.CRK_CD1) CRK_CD1
  173. ,CUR_LOAD_LOC
  174. ,DECODE(SUBSTR(A.CUR_LOAD_LOC,1,1),'Z',A.SLAB_STOCK_ENT_DTIME,'L',A.SMS_YARD_ENT_DTIME) SLAB_STOCK_ENT_DTIME
  175. ,ROUND((SYSDATE - to_date(nvl(DECODE(SUBSTR(A.CUR_LOAD_LOC,1,1),'Z',A.SLAB_STOCK_ENT_DTIME,'L',A.SMS_YARD_ENT_DTIME), TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')),'YYYYMMDDHH24MISS')) * 24 ,3) ZKSJ
  176. ,A.ORD_NO
  177. ,decode(A.ORD_FL,'1','订单材','2','余材') ORD_FL
  178. ,(select sm_cfnm from tbz00_commcd where lg_cd like 'E01010%' and sm_cd = A.NONORD_CAUSE_CD)NONORD_CAUSE_CD
  179. ,A.NONORD_OCR_DTIME
  180. ,decode(A.SLAB_RT,'H','热轧厂','Z','中板厂','P','厚板厂') SLAB_RT
  181. ,DECODE(A.SLAB_RT,'H',A.ORD_NO,I.ORD_NO) ORD_NO
  182. ,DECODE(A.SLAB_RT,'H',A.ORD_SEQ,I.ORD_SEQ) ORD_SEQ
  183. ,'' REMARKS
  184. ,A.SLAB_CUT_DTIME --切割时间
  185. ,A.SLAB_INGR_DEC_GRD
  186. ,E.INGR_DEC_DTIME
  187. --,A.SLAB_INGR_DEC_DTIME
  188. ,decode(A.CUT_WKSHIFT,'1','早班','2','中班','3','晚班')CUT_WKSHIFT
  189. ,decode(A.CUT_WKGROUP,'A','甲班','B','乙班','C','丙班','D','丁班')CUT_WKGROUP
  190. ,A.CUT_EMP_ID
  191. ,decode(G.KEEPWARM_YN,'Y','有','N','无','','无')KEEPWARM_YN --是否需要坑冷
  192. ,(SELECT T.SM_CFNM FROM TBZ00_COMMCD T WHERE T.LG_CD = 'A01001' AND T.SM_CD = D.RCVORD_TP)RCVORD_TP --是否出口
  193. ,G.H_SPEC_STL_GRD SPEC_STL_GRD --订单钢号
  194. ,C.ORD_DEVLMT_DATE CMT_DLIV_DEVLMT_DATE --交货期
  195. ,G.ORD_THK --订单厚度
  196. ,G.ORD_WTH --订单宽度
  197. ,ROUND(C.PROD_WGT_MIN/1000,2)||'~'||ROUND(C.PROD_WGT_MAX/1000,2)||'T' ORD_WGT --订单单重范围
  198. ,DECODE(C.DLIV_TP,'T','火运','C','汽运') DLIV_TP -- 运输方式
  199. ,F.STL_GRD PLAN_STL_GRD
  200. ,decode(A.SLAB_INGR_DEC_GRD,'1','合格','2','不合格','','待判') SLAB_INGR_DEC_GRD
  201. ,(SELECT SM_CFNM FROM TBZ00_COMMCD WHERE SM_CD = SUBSTR(A.SLAB_NO,3,1) AND LG_CD = 'B01132') CHANDI
  202. ,(SELECT SM_CFNM FROM TBZ00_COMMCD WHERE SM_CD = A.SLAB_INGR_DEC_KIND AND LG_CD = 'B01133') SLAB_INGR_DEC_KIND --成分判定依据
  203. ,NVL(A.SLAB_DCS_DETAIL,E.CHARGE_DCS_DETAIL) REMARKS
  204. ,DECODE(K.DSN_KIND, '1', 'Y', 'N') AS INGR_YN
  205. ,C.XSQY --销售区域 生产处刘树根要求添加 TL 091225
  206. ,(SELECT SM_CFNM FROM TBZ00_COMMCD WHERE LG_CD LIKE 'B01136' AND SM_CD = A.SLAB_TOT_DEC_GRD) SLAB_TOT_DEC_GRD
  207. ,XB_PACKAGE.GF_COMNNAME_FIND('E01002', A.CUR_PROG_CD) CUR_PROG_CD
  208. ,G.PRODNM_CD --交货状态
  209. ,G.C_PRODNM_CD --交货状态
  210. ,G.PRD_TY --产品类型
  211. ,H.L2_SCH_NO
  212. FROM TBG02_SLAB_COMM A
  213. ,TBG04_SLAB_YARD B
  214. ,TBA01_ORD_LINE C
  215. ,TBA01_ORD_COMM D
  216. ,TBG02_CHARGE_COMM E
  217. ,TBF01_SPEC_SLAB F
  218. ,TBE02_ORD_PRC G
  219. ,TBD01_SLABDN_OBJ2 H
  220. ,TBB01_ORD_MAP I
  221. ,(SELECT TH.ORD_NO ,TH.ORD_SEQ ,'1' DSN_KIND FROM TBB01_ORD_HEAD TH WHERE TH.CUST_SPEC_NO IS NOT NULL) K
  222. WHERE A.SLAB_NO = B.SLAB_NO(+)
  223. AND A.PLAN_SLAB_NO = F.SLAB_MANA_NO(+)
  224. AND A.ORD_NO = C.ORD_NO(+)
  225. AND A.ORD_SEQ = C.ORD_SEQ(+)
  226. and a.ORD_NO = g.ORD_NO(+)
  227. and a.ORD_SEQ = g.ORD_SEQ(+)
  228. AND A.ORD_NO = D.ORD_NO(+)
  229. AND A.ORD_NO = K.ORD_NO(+)
  230. AND A.ORD_SEQ = K.ORD_SEQ(+)
  231. AND A.DSN_SLAB_NO = H.DSN_SLAB_NO(+)
  232. and H.ORD_NO = I.ZH_ORD_NO(+)
  233. AND H.ORD_SEQ = I.ZH_ORD_SEQ(+)
  234. ----MOD BY WXY 炉次变更----100302---------
  235. AND SUBSTR(A.SUB_SLAB_NO,1,10) = E.CHARGE_NO
  236. ----------------------------------------
  237. AND A.CUR_LOAD_LOC = B.YARD_ADDR(+)||B.STORELAY(+)
  238. AND A.SLAB_STAT = '2'
  239. and A.SLAB_RTURN = 'Y'
  240. AND A.SLAB_NO LIKE ?||'%'
  241. AND A.STL_GRD LIKE '%'||NVL(?,A.STL_GRD)||'%'
  242. AND A.CUR_LOAD_LOC||'&' LIKE DECODE(?,'G','')||'%'
  243. AND SUBSTR(A.SLAB_NO,3,1) IN (SELECT SM_CD FROM TBZ00_COMMCD WHERE SM_CFNM||'&' LIKE ?||'%' AND LG_CD = 'B01132')
  244. AND A.SLAB_LEN >= ? AND A.SLAB_LEN <= ?
  245. AND A.ORD_NO||'&' LIKE ?||'%'
  246. AND A.ORD_FL||'&' LIKE ?||'%'
  247. AND A.SLAB_STOCK_TYPE||'&' like ?||'%' --热轧入库类型(1:热送入库 2 冷送入库 3 加回入库 4 轧回入库)
  248. AND A.SLAB_RT||'&' LIKE ?||'%'
  249. AND A.NONORD_CAUSE_CD||'&' LIKE ?||'%'
  250. AND A.SLAB_INGR_DEC_GRD||'&' LIKE ?||'%'
  251. AND A.SLAB_WTH >= ? AND A.SLAB_WTH <= ?
  252. AND SUBSTR(nvl(C.CMT_DLIV_DEVLMT_DATE,10000000), 1, 8) <= nvl(?,'50000000') --交货期
  253. -------------------------------------------
  254. AND C.DLIV_TP||'&' LIKE ?||'%' --运输方式
  255. AND C.KEEPWARM_YN||'&' LIKE ?||'%'
  256. AND (A.STL_GRD LIKE ? OR A.STL_GRD LIKE ? OR A.STL_GRD LIKE ? OR A.STL_GRD LIKE ? OR A.STL_GRD LIKE ? OR A.STL_GRD LIKE ?)
  257. --------------------ADD BY WXY 091130 生产处要求
  258. AND substr(A.SLAB_CUT_DTIME,1,8) >= ?
  259. AND substr(A.SLAB_CUT_DTIME,1,8) <= ?
  260. AND SUBSTR(A.SLAB_NO,3,1) LIKE ?
  261. AND SUBSTR(E.CC_DEVNO,2,1)||'&' LIKE ?||'%'
  262. AND C.XSQY||'&' LIKE ?||'%'
  263. AND A.SLAB_TOT_DEC_GRD||'&' LIKE ?||'%'
  264. -------------------------------------------------
  265. AND ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_END_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(A.SLAB_CUT_DTIME,'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 1),2) >= ?
  266. AND ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_END_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(A.SLAB_CUT_DTIME,'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 1),2) <= ?
  267. AND ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_STA_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(decode(A.SLAB_INGR_DEC_DTIME,'',E.INGR_DEC_DTIME,A.SLAB_INGR_DEC_DTIME),'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 0.75),2) >= ?
  268. AND ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_STA_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(decode(A.SLAB_INGR_DEC_DTIME,'',E.INGR_DEC_DTIME,A.SLAB_INGR_DEC_DTIME),'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 0.75),2) <= ?
  269. AND A.CUR_PROG_CD LIKE ?||'%'
  270. -- AND G.PRD_TY||'&' LIKE ?||'%'
  271. AND INSTR(NVL(? , NVL(G.PRD_TY,'AR')) , NVL(G.PRD_TY,'AR')) > 0 --为空的作为AR,简单处理
  272. AND A.SLAB_THK >= ? AND A.SLAB_THK <= ?
  273. AND H.L2_SCH_NO||'&' LIKE ?||'%'
  274. AND INSTR(NVL(? , NVL(A.CRK_CD1,'ALL')) , NVL(A.CRK_CD1,'ALL')) > 0 --为空的作为ALL,简单处理 --39
  275. ORDER BY STL_GRD,SLAB_NO,SLAB_WTH
  276. ]]>
  277. </query>
  278. <query id="UIG040210_chem01.select" desc=" 取板坯运送前的信息,此时板坯在我方数据库。带成分信息 ">
  279. <![CDATA[
  280. select QQS.*,
  281. WINGR.VALUE_C VALUE_C,
  282. WINGR.VALUE_Mn VALUE_MN,
  283. WINGR.VALUE_S VALUE_S,
  284. WINGR.VALUE_P VALUE_P,
  285. WINGR.VALUE_Si VALUE_SI,
  286. WINGR.VALUE_Nb VALUE_NB,
  287. WINGR.VALUE_V VALUE_V,
  288. WINGR.VALUE_Ti VALUE_TI,
  289. WINGR.VALUE_Als VALUE_ALS,
  290. WINGR.VALUE_B VALUE_B,
  291. WINGR.VALUE_Cr VALUE_CR,
  292. WINGR.VALUE_Ni VALUE_NI,
  293. WINGR.VALUE_Cu VALUE_CU,
  294. WINGR.VALUE_Mo VALUE_MO,
  295. WINGR.VALUE_N VALUE_N,
  296. WINGR.VALUE_CEV VALUE_CEV
  297. from (
  298. SELECT '' SEQ
  299. -----------------------ADD by wxy 091130 生产处要求
  300. ,substr(a.SLAB_NO,3,1)||'号转炉' BOF_NO
  301. ,SUBSTR(E.CC_DEVNO,2,1)||'连铸机' CCM_NO
  302. -------------------------------------
  303. ,A.WEIGHT_WGT --20130227
  304. ,A.SLAB_NO
  305. ,A.STL_GRD
  306. ,A.REMARKS REMARKS2
  307. ,A.SLAB_THK
  308. ,A.SLAB_WTH
  309. ,A.SLAB_LEN
  310. ,A.SLAB_WGT
  311. ,decode(a.SLAB_OUT_TP,'Y','允许出库','不允许出库') SLAB_OUT_TP
  312. ,(SELECT TT.SM_CFNM FROM TBZ00_COMMCD TT WHERE TT.LG_CD = 'G03004' AND TT.SM_CD = A.CRK_CD1) CRK_CD1
  313. ,CUR_LOAD_LOC
  314. ,DECODE(SUBSTR(A.CUR_LOAD_LOC,1,1),'Z',A.SLAB_STOCK_ENT_DTIME,'L',A.SMS_YARD_ENT_DTIME) SLAB_STOCK_ENT_DTIME
  315. ,ROUND((SYSDATE - to_date(nvl(DECODE(SUBSTR(A.CUR_LOAD_LOC,1,1),'Z',A.SLAB_STOCK_ENT_DTIME,'L',A.SMS_YARD_ENT_DTIME), TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')),'YYYYMMDDHH24MISS')) * 24 ,3) ZKSJ
  316. --,A.ORD_NO
  317. ,decode(A.ORD_FL,'1','订单材','2','余材') ORD_FL
  318. ,(select sm_cfnm from tbz00_commcd where lg_cd like 'E01010%' and sm_cd = A.NONORD_CAUSE_CD)NONORD_CAUSE_CD
  319. ,A.NONORD_OCR_DTIME
  320. ,decode(A.SLAB_RT,'H','热轧厂','Z','中板厂','P','厚板厂') SLAB_RT
  321. ,DECODE(A.SLAB_RT,'H',A.ORD_NO,I.ORD_NO) ORD_NO
  322. ,DECODE(A.SLAB_RT,'H',A.ORD_SEQ,I.ORD_SEQ) ORD_SEQ
  323. --,'' REMARKS
  324. ,A.SLAB_CUT_DTIME --切割时间
  325. --,A.SLAB_INGR_DEC_GRD
  326. ,E.INGR_DEC_DTIME
  327. --,A.SLAB_INGR_DEC_DTIME
  328. ,decode(A.CUT_WKSHIFT,'1','早班','2','中班','3','晚班')CUT_WKSHIFT
  329. ,decode(A.CUT_WKGROUP,'A','甲班','B','乙班','C','丙班','D','丁班')CUT_WKGROUP
  330. ,A.CUT_EMP_ID
  331. ,decode(G.KEEPWARM_YN,'Y','有','N','无','','无')KEEPWARM_YN --是否需要坑冷
  332. ,(SELECT T.SM_CFNM FROM TBZ00_COMMCD T WHERE T.LG_CD = 'A01001' AND T.SM_CD = D.RCVORD_TP)RCVORD_TP --是否出口
  333. ,G.H_SPEC_STL_GRD SPEC_STL_GRD --订单钢号
  334. ,C.CMT_DLIV_DEVLMT_DATE --交货期
  335. ,G.ORD_THK --订单厚度
  336. ,G.ORD_WTH --订单宽度
  337. ,ROUND(C.PROD_WGT_MIN/1000,2)||'~'||ROUND(C.PROD_WGT_MAX/1000,2)||'T' ORD_WGT --订单单重范围
  338. ,DECODE(C.DLIV_TP,'T','火运','C','汽运') DLIV_TP -- 运输方式
  339. ,F.STL_GRD PLAN_STL_GRD
  340. ,decode(A.SLAB_INGR_DEC_GRD,'1','合格','2','不合格','','待判') SLAB_INGR_DEC_GRD
  341. ,(SELECT SM_CFNM FROM TBZ00_COMMCD WHERE SM_CD = SUBSTR(A.SLAB_NO,3,1) AND LG_CD = 'B01132') CHANDI
  342. ,(SELECT SM_CFNM FROM TBZ00_COMMCD WHERE SM_CD = A.SLAB_INGR_DEC_KIND AND LG_CD = 'B01133') SLAB_INGR_DEC_KIND --成分判定依据
  343. ,NVL(A.SLAB_DCS_DETAIL,E.CHARGE_DCS_DETAIL) REMARKS
  344. ,DECODE(K.DSN_KIND, '1', 'Y', 'N') AS INGR_YN
  345. ,C.XSQY --销售区域 生产处刘树根要求添加 TL 091225
  346. ,(SELECT SM_CFNM FROM TBZ00_COMMCD WHERE LG_CD LIKE 'B01136' AND SM_CD = A.SLAB_TOT_DEC_GRD) SLAB_TOT_DEC_GRD
  347. ,XB_PACKAGE.GF_COMNNAME_FIND('E01002', A.CUR_PROG_CD) CUR_PROG_CD
  348. ,G.PRODNM_CD --交货状态
  349. ,G.C_PRODNM_CD --交货状态
  350. ,G.PRD_TY --产品类型
  351. ,H.L2_SCH_NO
  352. FROM TBG02_SLAB_COMM A
  353. ,TBG04_SLAB_YARD B
  354. ,TBA01_ORD_LINE C
  355. ,TBA01_ORD_COMM D
  356. ,TBG02_CHARGE_COMM E
  357. ,TBF01_SPEC_SLAB F
  358. ,TBE02_ORD_PRC G
  359. ,TBD01_SLABDN_OBJ2 H
  360. ,TBB01_ORD_MAP I
  361. ,(SELECT TH.ORD_NO ,TH.ORD_SEQ ,'1' DSN_KIND FROM TBB01_ORD_HEAD TH WHERE TH.CUST_SPEC_NO IS NOT NULL) K
  362. WHERE A.SLAB_NO = B.SLAB_NO(+)
  363. AND A.PLAN_SLAB_NO = F.SLAB_MANA_NO(+)
  364. AND A.ORD_NO = C.ORD_NO(+)
  365. AND A.ORD_SEQ = C.ORD_SEQ(+)
  366. and a.ORD_NO = g.ORD_NO(+)
  367. and a.ORD_SEQ = g.ORD_SEQ(+)
  368. AND A.ORD_NO = D.ORD_NO(+)
  369. AND A.ORD_NO = K.ORD_NO(+)
  370. AND A.ORD_SEQ = K.ORD_SEQ(+)
  371. AND A.DSN_SLAB_NO = H.DSN_SLAB_NO(+)
  372. and H.ORD_NO = I.ZH_ORD_NO(+)
  373. AND H.ORD_SEQ = I.ZH_ORD_SEQ(+)
  374. ----MOD BY WXY 炉次变更----100302---------
  375. AND SUBSTR(A.SUB_SLAB_NO,1,10) = E.CHARGE_NO
  376. ----------------------------------------
  377. AND A.CUR_LOAD_LOC = B.YARD_ADDR(+)||B.STORELAY(+)
  378. AND A.SLAB_STAT = '2'
  379. AND A.SLAB_NO LIKE ?||'%' --1
  380. AND A.STL_GRD LIKE '%'||NVL(?,A.STL_GRD)||'%' --2
  381. AND A.CUR_LOAD_LOC||'&' LIKE DECODE(?,'J','L','R','Z')||'%' --3
  382. AND SUBSTR(A.SLAB_NO,3,1) IN (SELECT SM_CD FROM TBZ00_COMMCD WHERE SM_CFNM||'&' LIKE ?||'%' AND LG_CD = 'B01132') --4
  383. AND A.SLAB_LEN >= ? AND A.SLAB_LEN <= ? --6
  384. AND A.ORD_NO||'&' LIKE ?||'%' --7
  385. AND A.ORD_FL||'&' LIKE ?||'%' --8
  386. AND A.SLAB_STOCK_TYPE||'&' like ?||'%' --9热轧入库类型(1:热送入库 2 冷送入库 3 加回入库 4 轧回入库)
  387. AND A.SLAB_RT||'&' LIKE ?||'%' --10
  388. AND A.NONORD_CAUSE_CD||'&' LIKE ?||'%' --11
  389. AND A.SLAB_INGR_DEC_GRD||'&' LIKE ?||'%' --12
  390. AND A.SLAB_WTH >= ? AND A.SLAB_WTH <= ? --14
  391. AND SUBSTR(nvl(C.CMT_DLIV_DEVLMT_DATE,10000000), 1, 8) <= nvl(?,'50000000') --15交货期
  392. -------------------------------------------
  393. AND C.DLIV_TP||'&' LIKE ?||'%' --16运输方式
  394. AND C.KEEPWARM_YN||'&' LIKE ?||'%' --17
  395. AND (A.STL_GRD LIKE ? OR A.STL_GRD LIKE ? OR A.STL_GRD LIKE ? OR A.STL_GRD LIKE ? OR A.STL_GRD LIKE ? OR A.STL_GRD LIKE ?) --23
  396. --------------------ADD BY WXY 091130 生产处要求
  397. AND substr(A.SLAB_CUT_DTIME,1,8) >= ? --24
  398. AND substr(A.SLAB_CUT_DTIME,1,8) <= ? --25
  399. AND SUBSTR(A.SLAB_NO,3,1) LIKE ? --26
  400. AND SUBSTR(E.CC_DEVNO,2,1)||'&' LIKE ?||'%' --27
  401. AND C.XSQY||'&' LIKE ?||'%' --28
  402. AND A.SLAB_TOT_DEC_GRD||'&' LIKE ?||'%' --29
  403. -------------------------------------------------
  404. AND ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_END_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(A.SLAB_CUT_DTIME,'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 1),2) >= ?
  405. AND ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_END_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(A.SLAB_CUT_DTIME,'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 1),2) <= ?
  406. AND ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_STA_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(decode(A.SLAB_INGR_DEC_DTIME,'',E.INGR_DEC_DTIME,A.SLAB_INGR_DEC_DTIME),'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 0.75),2) >= ?
  407. AND ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_STA_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(decode(A.SLAB_INGR_DEC_DTIME,'',E.INGR_DEC_DTIME,A.SLAB_INGR_DEC_DTIME),'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 0.75),2) <= ?
  408. AND A.CUR_PROG_CD LIKE ?||'%' --34
  409. -- AND G.PRD_TY||'&' LIKE ?||'%'
  410. AND INSTR(NVL(? , NVL(G.PRD_TY,'AR')) , NVL(G.PRD_TY,'AR')) > 0 --为空的作为AR,简单处理 --35
  411. AND A.SLAB_THK >= ? AND A.SLAB_THK <= ? --37
  412. AND H.L2_SCH_NO||'&' LIKE ?||'%' --38
  413. AND INSTR(NVL(? , NVL(A.CRK_CD1,'ALL')) , NVL(A.CRK_CD1,'ALL')) > 0 --为空的作为ALL,简单处理 --39
  414. ORDER BY STL_GRD,SLAB_NO,SLAB_WTH) QQS
  415. full join (SELECT A.SLAB_NO,
  416. max(decode(WI.CHEM_CD, 'C', WI.CHEM_VAL)) VALUE_C,
  417. max(decode(WI.CHEM_CD, 'Mn', WI.CHEM_VAL)) VALUE_Mn,
  418. max(decode(WI.CHEM_CD, 'P', WI.CHEM_VAL)) VALUE_P,
  419. max(decode(WI.CHEM_CD, 'S', WI.CHEM_VAL)) VALUE_S,
  420. max(decode(WI.CHEM_CD, 'Si',WI.CHEM_VAL)) VALUE_Si,
  421. max(decode(WI.CHEM_CD, 'Cr', WI.CHEM_VAL)) VALUE_Cr,
  422. max(decode(WI.CHEM_CD, 'Mo', WI.CHEM_VAL)) VALUE_Mo,
  423. max(decode(WI.CHEM_CD, 'Ni', WI.CHEM_VAL)) VALUE_Ni,
  424. max(decode(WI.CHEM_CD, 'Cu', WI.CHEM_VAL)) VALUE_Cu,
  425. max(decode(WI.CHEM_CD, 'Nb', WI.CHEM_VAL)) VALUE_Nb,
  426. max(decode(WI.CHEM_CD, 'V', WI.CHEM_VAL)) VALUE_V,
  427. max(decode(WI.CHEM_CD, 'Ti', WI.CHEM_VAL)) VALUE_Ti,
  428. max(decode(WI.CHEM_CD, 'Als', WI.CHEM_VAL)) VALUE_Als,
  429. max(decode(WI.CHEM_CD, 'B', WI.CHEM_VAL)) VALUE_B,
  430. max(decode(WI.CHEM_CD, 'N', WI.CHEM_VAL)) VALUE_N,
  431. max(decode(WI.CHEM_CD, 'CEV', WI.CHEM_VAL)) VALUE_CEV
  432. FROM TBG02_SLAB_COMM A,
  433. TBB02_WORK_INGR WI,
  434. TBG02_CHARGE_COMM_D CHD,
  435. TBA01_ORD_LINE C,
  436. TBG02_CHARGE_COMM E,
  437. TBE02_ORD_PRC G,
  438. TBD01_SLABDN_OBJ2 H
  439. WHERE SUBSTR(A.SLAB_NO, 1, 10) = CHD.CHARGE_NO
  440. AND A.ORD_NO = C.ORD_NO(+)
  441. AND A.ORD_SEQ = C.ORD_SEQ(+)
  442. and a.ORD_NO = g.ORD_NO(+)
  443. and a.ORD_SEQ = g.ORD_SEQ(+)
  444. AND A.DSN_SLAB_NO = H.DSN_SLAB_NO(+)
  445. ----MOD BY WXY 炉次变更----100302---------
  446. AND SUBSTR(A.SUB_SLAB_NO, 1, 10) = E.CHARGE_NO
  447. AND WI.CHARGE_NO = CHD.CHARGE_NO
  448. AND WI.PROC_CD || WI.CHEM_SEQ = CHD.LST_INGR_CD
  449. AND A.SLAB_STAT = '2'
  450. AND A.SLAB_NO LIKE ?||'%' --1
  451. AND A.STL_GRD LIKE '%'||NVL(?,A.STL_GRD)||'%' --2
  452. AND A.CUR_LOAD_LOC||'&' LIKE DECODE(?,'J','L','R','Z')||'%' --3
  453. AND SUBSTR(A.SLAB_NO,3,1) IN (SELECT SM_CD FROM TBZ00_COMMCD WHERE SM_CFNM||'&' LIKE ?||'%' AND LG_CD = 'B01132') --4
  454. AND A.SLAB_LEN >= ? AND A.SLAB_LEN <= ? --6
  455. AND A.ORD_NO||'&' LIKE ? ||'%' --7
  456. AND A.ORD_FL||'&' LIKE ? ||'%' --8
  457. AND A.SLAB_STOCK_TYPE||'&' like ? ||'%' --9热轧入库类型(1:热送入库 2 冷送入库 3 加回入库 4 轧回入库)
  458. AND A.SLAB_RT||'&' LIKE ? ||'%' --10
  459. AND A.NONORD_CAUSE_CD||'&' LIKE ? ||'%' --11
  460. AND A.SLAB_INGR_DEC_GRD||'&' LIKE ? ||'%' --12
  461. AND A.SLAB_WTH >= ? AND A.SLAB_WTH <= ? --14
  462. AND SUBSTR(nvl(C.CMT_DLIV_DEVLMT_DATE,10000000), 1, 8) <= nvl(?,'50000000') --15交货期
  463. -------------------------------------------
  464. AND C.DLIV_TP||'&' LIKE ?||'%' --16运输方式
  465. AND C.KEEPWARM_YN||'&' LIKE ?||'%' --17
  466. AND (A.STL_GRD LIKE ? OR A.STL_GRD LIKE ? OR A.STL_GRD LIKE ? OR A.STL_GRD LIKE ? OR A.STL_GRD LIKE ? OR A.STL_GRD LIKE ?) --23
  467. --------------------ADD BY WXY 091130 生产处要求
  468. AND substr(A.SLAB_CUT_DTIME,1,8) >= ? --24
  469. AND substr(A.SLAB_CUT_DTIME,1,8) <= ? --25
  470. AND SUBSTR(A.SLAB_NO,3,1) LIKE ? --26
  471. AND SUBSTR(E.CC_DEVNO,2,1)||'&' LIKE ?||'%' --27
  472. AND C.XSQY||'&' LIKE ?||'%' --28
  473. AND A.SLAB_TOT_DEC_GRD||'&' LIKE ?||'%' --29
  474. -------------------------------------------------
  475. AND ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_END_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(A.SLAB_CUT_DTIME,'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 1),2) >= ?
  476. AND ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_END_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(A.SLAB_CUT_DTIME,'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 1),2) <= ?
  477. AND ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_STA_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(decode(A.SLAB_INGR_DEC_DTIME,'',E.INGR_DEC_DTIME,A.SLAB_INGR_DEC_DTIME),'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 0.75),2) >= ?
  478. AND ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_STA_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(decode(A.SLAB_INGR_DEC_DTIME,'',E.INGR_DEC_DTIME,A.SLAB_INGR_DEC_DTIME),'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 0.75),2) <= ?
  479. AND A.CUR_PROG_CD LIKE ?||'%' --34
  480. -- AND G.PRD_TY||'&' LIKE ?||'%'
  481. AND INSTR(NVL(? , NVL(G.PRD_TY,'AR')) , NVL(G.PRD_TY,'AR')) > 0 --为空的作为AR,简单处理 --35
  482. AND A.SLAB_THK >= ? AND A.SLAB_THK <= ? --37
  483. AND H.L2_SCH_NO||'&' LIKE ?||'%' --38
  484. AND INSTR(NVL(?, NVL(A.CRK_CD1,'ALL')) , NVL(A.CRK_CD1,'ALL')) > 0 --为空的作为ALL,简单处理 --39
  485. GROUP BY A.SLAB_NO
  486. ORDER BY A.SLAB_NO) WINGR
  487. on QQS.SLAB_NO = WINGR.SLAB_NO
  488. ]]>
  489. </query>
  490. <query id="UIG040210_01.UPDATE" desc="板坯封闭">
  491. UPDATE TBG02_SLAB_COMM SET
  492. FB_YN = ? --封闭
  493. ,FB_REASON = ? --封闭原因
  494. WHERE SLAB_NO = ? --板坯号
  495. AND SLAB_STAT = '2'
  496. -- AND CUR_PROG_CD = 'SED'
  497. </query>
  498. <query id="UIG040100_chem03.select" desc=" 在辊道坯料,带成分信息 ">
  499. <![CDATA[
  500. select QQS.*,
  501. WINGR.VALUE_C VALUE_C,
  502. WINGR.VALUE_Mn VALUE_MN,
  503. WINGR.VALUE_S VALUE_S,
  504. WINGR.VALUE_P VALUE_P,
  505. WINGR.VALUE_Si VALUE_SI,
  506. WINGR.VALUE_Nb VALUE_NB,
  507. WINGR.VALUE_V VALUE_V,
  508. WINGR.VALUE_Ti VALUE_TI,
  509. WINGR.VALUE_Als VALUE_ALS,
  510. WINGR.VALUE_B VALUE_B,
  511. WINGR.VALUE_Cr VALUE_CR,
  512. WINGR.VALUE_Ni VALUE_NI,
  513. WINGR.VALUE_Cu VALUE_CU,
  514. WINGR.VALUE_Mo VALUE_MO,
  515. WINGR.VALUE_N VALUE_N,
  516. WINGR.VALUE_CEV VALUE_CEV
  517. from (
  518. SELECT '' SEQ
  519. -----------------------ADD by wxy 091130 生产处要求
  520. ,substr(a.SLAB_NO,3,1)||'号转炉' BOF_NO
  521. ,SUBSTR(E.CC_DEVNO,2,1)||'连铸机' CCM_NO
  522. -------------------------------------
  523. ,A.SLAB_NO
  524. ,A.STL_GRD
  525. ,A.REMARKS REMARKS2
  526. ,A.SLAB_THK
  527. ,A.SLAB_WTH
  528. ,A.SLAB_LEN
  529. ,A.SLAB_WGT
  530. ,decode(a.SLAB_OUT_TP,'Y','允许出库','不允许出库') SLAB_OUT_TP
  531. ,(SELECT TT.SM_CFNM FROM TBZ00_COMMCD TT WHERE TT.LG_CD = 'G03004' AND TT.SM_CD = A.CRK_CD1) CRK_CD1
  532. ,CUR_LOAD_LOC
  533. ,DECODE(SUBSTR(A.CUR_LOAD_LOC,1,1),'Z',A.SLAB_STOCK_ENT_DTIME,'L',A.SMS_YARD_ENT_DTIME) SLAB_STOCK_ENT_DTIME
  534. ,ROUND((SYSDATE - to_date(nvl(DECODE(SUBSTR(A.CUR_LOAD_LOC,1,1),'Z',A.SLAB_STOCK_ENT_DTIME,'L',A.SMS_YARD_ENT_DTIME), TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')),'YYYYMMDDHH24MISS')) * 24 ,3) ZKSJ
  535. --,A.ORD_NO
  536. ,decode(A.ORD_FL,'1','订单材','2','余材') ORD_FL
  537. ,(select sm_cfnm from tbz00_commcd where lg_cd like 'E01010%' and sm_cd = A.NONORD_CAUSE_CD)NONORD_CAUSE_CD
  538. ,A.NONORD_OCR_DTIME
  539. ,decode(A.SLAB_RT,'H','热轧厂','Z','中板厂','P','厚板厂') SLAB_RT
  540. ,DECODE(A.SLAB_RT,'H',A.ORD_NO,I.ORD_NO) ORD_NO
  541. ,DECODE(A.SLAB_RT,'H',A.ORD_SEQ,I.ORD_SEQ) ORD_SEQ
  542. --,'' REMARKS
  543. ,A.SLAB_CUT_DTIME --切割时间
  544. --,A.SLAB_INGR_DEC_GRD
  545. ,E.INGR_DEC_DTIME
  546. --,A.SLAB_INGR_DEC_DTIME
  547. ,decode(A.CUT_WKSHIFT,'1','早班','2','中班','3','晚班')CUT_WKSHIFT
  548. ,decode(A.CUT_WKGROUP,'A','甲班','B','乙班','C','丙班','D','丁班')CUT_WKGROUP
  549. ,A.CUT_EMP_ID
  550. ,decode(G.KEEPWARM_YN,'Y','有','N','无','','无')KEEPWARM_YN --是否需要坑冷
  551. ,(SELECT T.SM_CFNM FROM TBZ00_COMMCD T WHERE T.LG_CD = 'A01001' AND T.SM_CD = D.RCVORD_TP)RCVORD_TP --是否出口
  552. ,G.H_SPEC_STL_GRD SPEC_STL_GRD --订单钢号
  553. ,C.CMT_DLIV_DEVLMT_DATE --交货期
  554. ,G.ORD_THK --订单厚度
  555. ,G.ORD_WTH --订单宽度
  556. ,ROUND(C.PROD_WGT_MIN/1000,2)||'~'||ROUND(C.PROD_WGT_MAX/1000,2)||'T' ORD_WGT --订单单重范围
  557. ,DECODE(C.DLIV_TP,'T','火运','C','汽运') DLIV_TP -- 运输方式
  558. ,F.STL_GRD PLAN_STL_GRD
  559. ,decode(A.SLAB_INGR_DEC_GRD,'1','合格','2','不合格','','待判') SLAB_INGR_DEC_GRD
  560. ,(SELECT SM_CFNM FROM TBZ00_COMMCD WHERE SM_CD = SUBSTR(A.SLAB_NO,3,1) AND LG_CD = 'B01132') CHANDI
  561. ,(SELECT SM_CFNM FROM TBZ00_COMMCD WHERE SM_CD = A.SLAB_INGR_DEC_KIND AND LG_CD = 'B01133') SLAB_INGR_DEC_KIND --成分判定依据
  562. ,NVL(A.SLAB_DCS_DETAIL,E.CHARGE_DCS_DETAIL) REMARKS
  563. ,DECODE(K.DSN_KIND, '1', 'Y', 'N') AS INGR_YN
  564. ,C.XSQY --销售区域 生产处刘树根要求添加 TL 091225
  565. ,(SELECT SM_CFNM FROM TBZ00_COMMCD WHERE LG_CD LIKE 'B01136' AND SM_CD = A.SLAB_TOT_DEC_GRD) SLAB_TOT_DEC_GRD
  566. ,XB_PACKAGE.GF_COMNNAME_FIND('E01002', A.CUR_PROG_CD) CUR_PROG_CD
  567. ,G.PRODNM_CD --交货状态
  568. ,G.C_PRODNM_CD --交货状态
  569. ,G.PRD_TY --产品类型
  570. ,H.L2_SCH_NO
  571. FROM TBG02_SLAB_COMM A
  572. ,TBG04_SLAB_YARD B
  573. ,TBA01_ORD_LINE C
  574. ,TBA01_ORD_COMM D
  575. ,TBG02_CHARGE_COMM E
  576. ,TBF01_SPEC_SLAB F
  577. ,TBE02_ORD_PRC G
  578. ,TBD01_SLABDN_OBJ2 H
  579. ,TBB01_ORD_MAP I
  580. ,(SELECT TH.ORD_NO ,TH.ORD_SEQ ,'1' DSN_KIND FROM TBB01_ORD_HEAD TH WHERE TH.CUST_SPEC_NO IS NOT NULL) K
  581. WHERE A.SLAB_NO = B.SLAB_NO(+)
  582. AND A.PLAN_SLAB_NO = F.SLAB_MANA_NO(+)
  583. AND A.ORD_NO = C.ORD_NO(+)
  584. AND A.ORD_SEQ = C.ORD_SEQ(+)
  585. and a.ORD_NO = g.ORD_NO(+)
  586. and a.ORD_SEQ = g.ORD_SEQ(+)
  587. AND A.ORD_NO = D.ORD_NO(+)
  588. AND A.ORD_NO = K.ORD_NO(+)
  589. AND A.ORD_SEQ = K.ORD_SEQ(+)
  590. AND A.DSN_SLAB_NO = H.DSN_SLAB_NO(+)
  591. and H.ORD_NO = I.ZH_ORD_NO(+)
  592. AND H.ORD_SEQ = I.ZH_ORD_SEQ(+)
  593. ----MOD BY WXY 炉次变更----100302---------
  594. AND SUBSTR(A.SUB_SLAB_NO,1,10) = E.CHARGE_NO
  595. ----------------------------------------
  596. AND A.CUR_LOAD_LOC = B.YARD_ADDR(+)||B.STORELAY(+)
  597. AND A.SLAB_STAT = '2'
  598. and A.SLAB_RTURN = 'Y'
  599. AND A.SLAB_NO LIKE ?||'%'
  600. AND A.STL_GRD LIKE '%'||NVL(?,A.STL_GRD)||'%'
  601. AND A.CUR_LOAD_LOC||'&' LIKE DECODE(?,'G','')||'%'
  602. AND SUBSTR(A.SLAB_NO,3,1) IN (SELECT SM_CD FROM TBZ00_COMMCD WHERE SM_CFNM||'&' LIKE ?||'%' AND LG_CD = 'B01132')
  603. AND A.SLAB_LEN >= ? AND A.SLAB_LEN <= ?
  604. AND A.ORD_NO||'&' LIKE ?||'%'
  605. AND A.ORD_FL||'&' LIKE ?||'%'
  606. AND A.SLAB_STOCK_TYPE||'&' like ?||'%' --热轧入库类型(1:热送入库 2 冷送入库 3 加回入库 4 轧回入库)
  607. AND A.SLAB_RT||'&' LIKE ?||'%'
  608. AND A.NONORD_CAUSE_CD||'&' LIKE ?||'%'
  609. AND A.SLAB_INGR_DEC_GRD||'&' LIKE ?||'%'
  610. AND A.SLAB_WTH >= ? AND A.SLAB_WTH <= ?
  611. AND SUBSTR(nvl(C.CMT_DLIV_DEVLMT_DATE,10000000), 1, 8) <= nvl(?,'50000000') --交货期
  612. -------------------------------------------
  613. AND C.DLIV_TP||'&' LIKE ?||'%' --运输方式
  614. AND C.KEEPWARM_YN||'&' LIKE ?||'%'
  615. AND (A.STL_GRD LIKE ? OR A.STL_GRD LIKE ? OR A.STL_GRD LIKE ? OR A.STL_GRD LIKE ? OR A.STL_GRD LIKE ? OR A.STL_GRD LIKE ?)
  616. --------------------ADD BY WXY 091130 生产处要求
  617. AND substr(A.SLAB_CUT_DTIME,1,8) >= ?
  618. AND substr(A.SLAB_CUT_DTIME,1,8) <= ?
  619. AND SUBSTR(A.SLAB_NO,3,1) LIKE ?
  620. AND SUBSTR(E.CC_DEVNO,2,1)||'&' LIKE ?||'%'
  621. AND C.XSQY||'&' LIKE ?||'%'
  622. AND A.SLAB_TOT_DEC_GRD||'&' LIKE ?||'%'
  623. -------------------------------------------------
  624. AND ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_END_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(A.SLAB_CUT_DTIME,'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 1),2) >= ?
  625. AND ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_END_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(A.SLAB_CUT_DTIME,'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 1),2) <= ?
  626. AND ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_STA_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(decode(A.SLAB_INGR_DEC_DTIME,'',E.INGR_DEC_DTIME,A.SLAB_INGR_DEC_DTIME),'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 0.75),2) >= ?
  627. AND ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_STA_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(decode(A.SLAB_INGR_DEC_DTIME,'',E.INGR_DEC_DTIME,A.SLAB_INGR_DEC_DTIME),'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 0.75),2) <= ?
  628. AND A.CUR_PROG_CD LIKE ?||'%'
  629. -- AND G.PRD_TY||'&' LIKE ?||'%'
  630. AND INSTR(NVL(? , NVL(G.PRD_TY,'AR')) , NVL(G.PRD_TY,'AR')) > 0 --为空的作为AR,简单处理
  631. AND A.SLAB_THK >= ? AND A.SLAB_THK <= ?
  632. AND H.L2_SCH_NO||'&' LIKE ?||'%'
  633. AND INSTR(NVL(? , NVL(A.CRK_CD1,'ALL')) , NVL(A.CRK_CD1,'ALL')) > 0 --为空的作为ALL,简单处理 --39
  634. ORDER BY STL_GRD,SLAB_NO,SLAB_WTH) QQS
  635. full join (SELECT A.SLAB_NO,
  636. max(decode(WI.CHEM_CD, 'C', WI.CHEM_VAL)) VALUE_C,
  637. max(decode(WI.CHEM_CD, 'Mn', WI.CHEM_VAL)) VALUE_Mn,
  638. max(decode(WI.CHEM_CD, 'P', WI.CHEM_VAL)) VALUE_P,
  639. max(decode(WI.CHEM_CD, 'S', WI.CHEM_VAL)) VALUE_S,
  640. max(decode(WI.CHEM_CD, 'Si',WI.CHEM_VAL)) VALUE_Si,
  641. max(decode(WI.CHEM_CD, 'Cr', WI.CHEM_VAL)) VALUE_Cr,
  642. max(decode(WI.CHEM_CD, 'Mo', WI.CHEM_VAL)) VALUE_Mo,
  643. max(decode(WI.CHEM_CD, 'Ni', WI.CHEM_VAL)) VALUE_Ni,
  644. max(decode(WI.CHEM_CD, 'Cu', WI.CHEM_VAL)) VALUE_Cu,
  645. max(decode(WI.CHEM_CD, 'Nb', WI.CHEM_VAL)) VALUE_Nb,
  646. max(decode(WI.CHEM_CD, 'V', WI.CHEM_VAL)) VALUE_V,
  647. max(decode(WI.CHEM_CD, 'Ti', WI.CHEM_VAL)) VALUE_Ti,
  648. max(decode(WI.CHEM_CD, 'Als', WI.CHEM_VAL)) VALUE_Als,
  649. max(decode(WI.CHEM_CD, 'B', WI.CHEM_VAL)) VALUE_B,
  650. max(decode(WI.CHEM_CD, 'N', WI.CHEM_VAL)) VALUE_N,
  651. max(decode(WI.CHEM_CD, 'CEV', WI.CHEM_VAL)) VALUE_CEV
  652. FROM TBG02_SLAB_COMM A,
  653. TBB02_WORK_INGR WI,
  654. TBG02_CHARGE_COMM_D CHD,
  655. TBA01_ORD_LINE C,
  656. TBG02_CHARGE_COMM E,
  657. TBE02_ORD_PRC G,
  658. TBD01_SLABDN_OBJ2 H
  659. WHERE SUBSTR(A.SLAB_NO, 1, 10) = CHD.CHARGE_NO
  660. AND A.ORD_NO = C.ORD_NO(+)
  661. AND A.ORD_SEQ = C.ORD_SEQ(+)
  662. and a.ORD_NO = g.ORD_NO(+)
  663. and a.ORD_SEQ = g.ORD_SEQ(+)
  664. AND A.DSN_SLAB_NO = H.DSN_SLAB_NO(+)
  665. ----MOD BY WXY 炉次变更----100302---------
  666. AND SUBSTR(A.SUB_SLAB_NO, 1, 10) = E.CHARGE_NO
  667. AND WI.CHARGE_NO = CHD.CHARGE_NO
  668. AND WI.PROC_CD || WI.CHEM_SEQ = CHD.LST_INGR_CD
  669. AND A.SLAB_STAT = '2'
  670. and A.SLAB_RTURN = 'Y'
  671. AND A.SLAB_NO LIKE ?||'%'
  672. AND A.STL_GRD LIKE '%'||NVL(?,A.STL_GRD)||'%'
  673. AND A.CUR_LOAD_LOC||'&' LIKE DECODE(?,'G','')||'%'
  674. AND SUBSTR(A.SLAB_NO,3,1) IN (SELECT SM_CD FROM TBZ00_COMMCD WHERE SM_CFNM||'&' LIKE ?||'%' AND LG_CD = 'B01132')
  675. AND A.SLAB_LEN >= ? AND A.SLAB_LEN <= ?
  676. AND A.ORD_NO||'&' LIKE ?||'%'
  677. AND A.ORD_FL||'&' LIKE ?||'%'
  678. AND A.SLAB_STOCK_TYPE||'&' like ?||'%' --热轧入库类型(1:热送入库 2 冷送入库 3 加回入库 4 轧回入库)
  679. AND A.SLAB_RT||'&' LIKE ?||'%'
  680. AND A.NONORD_CAUSE_CD||'&' LIKE ?||'%'
  681. AND A.SLAB_INGR_DEC_GRD||'&' LIKE ?||'%'
  682. AND A.SLAB_WTH >= ? AND A.SLAB_WTH <= ?
  683. AND SUBSTR(nvl(C.CMT_DLIV_DEVLMT_DATE,10000000), 1, 8) <= nvl(?,'50000000') --交货期
  684. -------------------------------------------
  685. AND C.DLIV_TP||'&' LIKE ?||'%' --运输方式
  686. AND C.KEEPWARM_YN||'&' LIKE ?||'%'
  687. AND (A.STL_GRD LIKE ? OR A.STL_GRD LIKE ? OR A.STL_GRD LIKE ? OR A.STL_GRD LIKE ? OR A.STL_GRD LIKE ? OR A.STL_GRD LIKE ?)
  688. --------------------ADD BY WXY 091130 生产处要求
  689. AND substr(A.SLAB_CUT_DTIME,1,8) >= ?
  690. AND substr(A.SLAB_CUT_DTIME,1,8) <= ?
  691. AND SUBSTR(A.SLAB_NO,3,1) LIKE ?
  692. AND SUBSTR(E.CC_DEVNO,2,1)||'&' LIKE ?||'%'
  693. AND C.XSQY||'&' LIKE ?||'%'
  694. AND A.SLAB_TOT_DEC_GRD||'&' LIKE ?||'%'
  695. -------------------------------------------------
  696. AND ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_END_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(A.SLAB_CUT_DTIME,'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 1),2) >= ?
  697. AND ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_END_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(A.SLAB_CUT_DTIME,'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 1),2) <= ?
  698. AND ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_STA_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(decode(A.SLAB_INGR_DEC_DTIME,'',E.INGR_DEC_DTIME,A.SLAB_INGR_DEC_DTIME),'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 0.75),2) >= ?
  699. AND ROUND((((SYSDATE-to_date(to_char(TO_date(nvl(E.CASTING_STA_DTIME,'23331111111111'),'YYYYMMDDHH24MISS'),'YYYYMMDDHH24MISS'),'YYYY-MM-DD HH24:MI:SS')) - (SYSDATE-to_date(nvl(decode(A.SLAB_INGR_DEC_DTIME,'',E.INGR_DEC_DTIME,A.SLAB_INGR_DEC_DTIME),'10000101010101'),'YYYY-MM-DD HH24:MI:SS')))*24 - 0.75),2) <= ?
  700. AND A.CUR_PROG_CD LIKE ?||'%'
  701. -- AND G.PRD_TY||'&' LIKE ?||'%'
  702. AND INSTR(NVL(? , NVL(G.PRD_TY,'AR')) , NVL(G.PRD_TY,'AR')) > 0 --为空的作为AR,简单处理
  703. AND A.SLAB_THK >= ? AND A.SLAB_THK <= ?
  704. AND H.L2_SCH_NO||'&' LIKE ?||'%'
  705. AND INSTR(NVL(? , NVL(A.CRK_CD1,'ALL')) , NVL(A.CRK_CD1,'ALL')) > 0 --为空的作为ALL,简单处理 --39
  706. GROUP BY A.SLAB_NO
  707. ORDER BY A.SLAB_NO) WINGR
  708. on QQS.SLAB_NO = WINGR.SLAB_NO
  709. ]]>
  710. </query>
  711. <query id="UIG040210_02.select" desc=" 取板坯运送前的信息,此时板坯在我方数据库。 ">
  712. <![CDATA[
  713. SELECT '' SEQ,A.WEIGHT_WGT*1000 WEIGHT_WGT,H.L2_SCH_NO
  714. ,decode(NVL(L.CC_DEVNO,E.CC_DEVNO),'J1','一号铸机','J2','二号铸机','J3','三号铸机','') CC_DEVNO
  715. ,A.SLAB_NO
  716. ,case when NVL(L.CC_DEVNO,E.CC_DEVNO)='J1' and substr(A.SLAB_NO,11,1)<'5' then '1'
  717. when NVL(L.CC_DEVNO,E.CC_DEVNO)='J1' and substr(A.SLAB_NO,11,1)>'4' then '2'
  718. when NVL(L.CC_DEVNO,E.CC_DEVNO)='J2' and substr(A.SLAB_NO,11,1)<'5' then '3'
  719. when NVL(L.CC_DEVNO,E.CC_DEVNO)='J2' and substr(A.SLAB_NO,11,1)>'4' then '4'
  720. else '5' end STREAM_NO
  721. ,A.STL_GRD
  722. ,A.REMARKS REMARKS2
  723. ,A.SLAB_THK
  724. ,A.SLAB_WTH
  725. ,A.SLAB_LEN
  726. ,A.SLAB_WGT
  727. ,ROUND(A.SLAB_THK/1000 * A.SLAB_WTH/1000 * A.SLAB_LEN/1000 * 7.85 * 1000) SLAB_WGT85
  728. ,CASE WHEN A.WEIGHT_WGT IS NOT NULL THEN to_char(ROUND(A.WEIGHT_WGT*1000-ROUND(A.SLAB_THK/1000 * A.SLAB_WTH/1000 * A.SLAB_LEN/1000 * 7.85 * 1000))) ELSE '' END SLAB_WGT_DIFF
  729. ,CASE WHEN A.WEIGHT_WGT IS NOT NULL AND ROUND(A.WEIGHT_WGT*1000-ROUND(A.SLAB_THK/1000 * A.SLAB_WTH/1000 * A.SLAB_LEN/1000 * 7.85 * 1000))>=-50
  730. AND ROUND(A.WEIGHT_WGT*1000-ROUND(A.SLAB_THK/1000 * A.SLAB_WTH/1000 * A.SLAB_LEN/1000 * 7.85 * 1000))<=150 THEN '合格' END SLAB_WGT_OK
  731. ,CUR_LOAD_LOC
  732. ,A.SMS_YARD_ENT_DTIME
  733. ,decode(a.SLAB_OUT_TP, 'Y', '允许出库', '不允许出库') SLAB_OUT_TP
  734. --
  735. ,A.SMS_YARD_EXT_DTIME
  736. ,A.SLAB_STOCK_ENT_DTIME
  737. ,A.SLAB_STOCK_EXT_DTIME
  738. ,A.ORD_NO
  739. ,decode(A.ORD_FL,'1','订单材','2','余材') ORD_FL
  740. ,(select sm_cfnm from tbz00_commcd where lg_cd like 'E01010%' and sm_cd = A.NONORD_CAUSE_CD)NONORD_CAUSE_CD
  741. ,A.NONORD_OCR_DTIME
  742. ,decode(A.SLAB_RT,'H','热轧厂','Z','中板厂','P','厚板厂') SLAB_RT
  743. ,A.ORD_SEQ
  744. ,'' REMARKS
  745. ,E.BOF_STA_DTIME
  746. ,E.CASTING_STA_DTIME
  747. ,E.CASTING_END_DTIME
  748. ,A.SLAB_CUT_DTIME --切割时间
  749. ,A.SLAB_INGR_DEC_GRD
  750. ,E.INGR_DEC_DTIME
  751. --,A.SLAB_INGR_DEC_DTIME
  752. ,decode(A.CUT_WKSHIFT,'1','早班','2','中班','3','晚班')CUT_WKSHIFT
  753. ,decode(A.CUT_WKGROUP,'A','甲班','B','乙班','C','丙班','D','丁班')CUT_WKGROUP
  754. ,A.CUT_EMP_ID
  755. ,decode(C.KEEPWARM_YN,'Y','有','N','无','','无')KEEPWARM_YN --是否需要坑冷
  756. ,(SELECT T.SM_CFNM FROM TBZ00_COMMCD T WHERE T.LG_CD = 'A01001' AND T.SM_CD = D.RCVORD_TP)RCVORD_TP --是否出口
  757. ,C.SPEC_STL_GRD --订单钢号
  758. ,C.CMT_DLIV_DEVLMT_DATE --交货期
  759. ,C.ORD_THK --订单厚度
  760. ,C.ORD_WTH --订单宽度
  761. ,ROUND(C.PROD_WGT_MIN/1000,2)||'~'||ROUND(C.PROD_WGT_MAX/1000,2)||'T' ORD_WGT --订单单重范围
  762. ,DECODE(C.DLIV_TP,'T','火运','C','汽运') DLIV_TP -- 运输方式
  763. ,F.STL_GRD PLAN_STL_GRD
  764. ,decode(A.SLAB_INGR_DEC_GRD,'1','合格','2','不合格','','待判') SLAB_INGR_DEC_GRD
  765. ,(SELECT SM_CFNM FROM TBZ00_COMMCD WHERE SM_CD = SUBSTR(A.SLAB_NO,3,1) AND LG_CD = 'B01132') CHANDI
  766. ,(SELECT SM_CFNM FROM TBZ00_COMMCD WHERE SM_CD = A.SLAB_INGR_DEC_KIND AND LG_CD = 'B01133') SLAB_INGR_DEC_KIND --成分判定依据
  767. ,NVL(A.SLAB_DCS_DETAIL,E.CHARGE_DCS_DETAIL) REMARKS
  768. ,DECODE(K.DSN_KIND, '1', 'Y', 'N') AS INGR_YN,B.AVG_WIDTH
  769. FROM TBG02_SLAB_COMM A
  770. ,TBA01_ORD_LINE C
  771. ,TBA01_ORD_COMM D
  772. ,TBG02_CHARGE_COMM E
  773. ,TBF01_SPEC_SLAB F
  774. ,TBD01_SLABDN_OBJ2 H
  775. ,TBG02_CC_RESULT L
  776. ,(SELECT T.ORD_NO ,T.ORD_SEQ ,'1' DSN_KIND FROM TBB01_ORD_HEAD T WHERE T.CUST_SPEC_NO_INGR IS NOT NULL) K
  777. ,(SELECT * FROM STL_CCM_WIDTHGAUGE@Xgejgzxt_Wgt UNION SELECT * FROM J#STL_CCM_WIDTHGAUGE@Xgejgzxt_Wgt) B
  778. WHERE A.PLAN_SLAB_NO = F.SLAB_MANA_NO(+)
  779. AND A.ORD_NO = C.ORD_NO(+)
  780. AND A.ORD_SEQ = C.ORD_SEQ(+)
  781. AND A.ORD_NO = D.ORD_NO(+)
  782. AND A.ORD_NO = K.ORD_NO(+)
  783. AND A.ORD_SEQ = K.ORD_SEQ(+)
  784. AND A.DSN_SLAB_NO = H.DSN_SLAB_NO(+)
  785. AND SUBSTR(A.SLAB_NO,1,9) = SUBSTR(E.CHARGE_NO,1,9)
  786. AND A.CHARGE_NO = L.CHARGE_NO(+)
  787. AND A.SLAB_NO = B.BILLETNO(+)
  788. AND A.SLAB_NO LIKE ?||'%'
  789. AND A.STL_GRD = NVL(?,A.STL_GRD)
  790. AND A.CUR_LOAD_LOC||'&' LIKE DECODE(?,'J','L','R','Z')||'%'
  791. AND SUBSTR(A.SLAB_NO,3,1) IN (SELECT SM_CD FROM TBZ00_COMMCD WHERE SM_CFNM||'&' LIKE ?||'%' AND LG_CD = 'B01132')
  792. AND A.SLAB_LEN >= ? AND A.SLAB_LEN <= ?
  793. AND A.ORD_NO||'&' LIKE ?||'%'
  794. AND A.ORD_FL||'&' LIKE ?||'%'
  795. AND A.SLAB_STOCK_TYPE||'&' like ?||'%' --热轧入库类型(1:热送入库 2 冷送入库 3 加回入库 4 轧回入库)
  796. AND A.SLAB_RT||'&' LIKE ?||'%'
  797. AND A.NONORD_CAUSE_CD||'&' LIKE ?||'%'
  798. AND A.SLAB_INGR_DEC_GRD||'&' LIKE ?||'%'
  799. AND A.SLAB_WTH >= ? AND A.SLAB_WTH <= ?
  800. AND SUBSTR(nvl(A.SLAB_STOCK_ENT_DTIME,50000000), 1, 8) >= NVL(?, '10000000')
  801. AND SUBSTR(nvl(A.SLAB_STOCK_ENT_DTIME,10000000), 1, 8) <= NVL(?, '50000000')
  802. AND SUBSTR(nvl(A.SLAB_STOCK_EXT_DTIME,50000000), 1, 8) >= NVL(?, '10000000')
  803. AND SUBSTR(nvl(A.SLAB_STOCK_EXT_DTIME,10000000), 1, 8) <= NVL(?, '50000000')
  804. AND SUBSTR(nvl(E.BOF_STA_DTIME,50000000), 1, 8) >= NVL(?, '10000000')
  805. AND SUBSTR(nvl(E.BOF_STA_DTIME,00000000), 1, 8) <= NVL(?, '50000000')
  806. AND E.CC_DEVNO = NVL(? , E.CC_DEVNO)
  807. AND SUBSTR(nvl(A.SMS_YARD_ENT_DTIME,50000000), 1, 8) >= NVL(?, '10000000')
  808. AND SUBSTR(nvl(A.SMS_YARD_ENT_DTIME,10000000), 1, 8) <= NVL(?, '50000000')
  809. AND SUBSTR(nvl(A.SMS_YARD_EXT_DTIME,50000000), 1, 8) >= NVL(?, '10000000')
  810. AND SUBSTR(nvl(A.SMS_YARD_EXT_DTIME,10000000), 1, 8) <= NVL(?, '50000000')
  811. AND E.BOF_STA_DTIME IS NOT NULL
  812. ORDER BY STL_GRD,SLAB_NO,SLAB_WTH
  813. ]]>
  814. </query>
  815. </queryMap>