6a29817fed4bd34d91d3ca2ec02e5822fc4fdc43.svn-base 13 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238
  1. <?xml version="1.0" encoding='UTF-8'?>
  2. <queryMap desc="STEEL MAKING QUERY ">
  3. <query id="UIH051000_01.select" desc=" 入库查询,这里需要查询入库的历史记录 " fetchSize="10">
  4. <![CDATA[
  5. SELECT SUBSTR(A.YARD_ENTRY_DTIME,1,8) YARD_ENTRY_DTIME --入库时间
  6. ,XB_PACKAGE.GF_COMNNAME_FIND('A01004' ,D.PRDNM_CD ) PRODNM_CD
  7. ,A.YARD_ENTRY_USE_TIME CZSJ --操作时间
  8. ,A.YARD_ENTRY_SHIFT SHIFT --班次
  9. ,A.YARD_ENTRY_GROUP WKGROUP --班组
  10. ,A.YARD_ENTRY_REG CZR --操作人
  11. ,SUBSTR(A.OLD_SAMPL_NO,1,10)ZPH --轧批号
  12. ,A.OLD_SAMPL_NO
  13. ,A.SPEC_STL_GRD
  14. ,A.INSTR_COIL_THK ORD_THK
  15. ,A.INSTR_COIL_WTH ORD_WTH
  16. ,A.COIL_THK COIL_THK
  17. ,A.COIL_WTH COIL_WTH
  18. ,A.ACT_WGT
  19. ,A.CUR_LOAD_LOC
  20. ,decode(A.TOT_DEC_GRD,'1','合格','2','不合格','3','外观异常','4','废品') TOT_DEC_GRD --综合判定
  21. ,decode(A.INGR_DEC_GRD,'0','综合判定取消','1','合格','2','不合格') INGR_DEC_GRD --成份判定
  22. ,decode(A.MATLQLTY_DEC_GRD,'0','无性能要','1','合格','2','不合格') MATLQLTY_DEC_GRD --材质判定
  23. ,decode(A.SIZE_DEC_RST,'1','合格','2','订单外合格','3','不合格','4','废品') SIZE_DEC_RST --尺寸判定
  24. ,decode(A.EXTSHAPE_DEC_GRD,'1','合格','2','订单外合格','3','次品','4','废品','待判定') EXTSHAPE_DEC_GRD --外观判定
  25. ,DECODE(A.WGT_DEC_RST,'1','合格','2','不合格') WGT_DEC_RST
  26. ,DECODE(A.QK_YN,'Y','清库卷') QK_YN
  27. ,A.ORD_NO
  28. ,a.ORD_SEQ
  29. ,(SELECT T.SM_CFNM FROM TBZ00_COMMCD T WHERE T.LG_CD = 'A01012' AND T.SM_CD = C.DLIV_TP) DLIV_TP
  30. ,(SELECT T.CUST_NM FROM TBZ00_CUSTOMER T WHERE T.CUST_CD = D.ORDCUST_CD) ORDCUST_CD
  31. ,SUBSTR(B.SLAB_NO,1,10) CHARGE_NO
  32. ,B.STL_GRD
  33. ,a.TRNF_DTIME
  34. ,A.TRANS_CAR_NO
  35. ,A.DLIV_DIRNO
  36. ,DECODE(A.COIL_DEFECTIVE,'1A',null,'2A','成分不合格','2E','工序不合格','3B','尺寸不合格','3C','重量不合格','3D','外观不合格','4A','性能不合格') COIL_DEFECTIVE
  37. ,A.BEF_SPEC_STL_GRD
  38. ,DECODE(A.BEF_MATLQLTY_DEC_GRD,'0','无性能要求','1','合格','2','不合格') BEF_MATRL_END_CAUSE_CD --清库前性能
  39. ,DECODE(A.BEF_EXTSHAPE_DEC_GRD,'1','合格','2','订单外合格','3','次品','4','废品') BEF_EXTSHAPE_DEC_GRD --清库前外观
  40. ,C.XSQY --销售区域
  41. FROM TBH02_COIL_COMM A
  42. ,TBG02_SLAB_COMM B
  43. ,TBA01_ORD_LINE C
  44. ,TBA01_ORD_COMM D
  45. WHERE '1' = '1'
  46. AND A.SLAB_NO = B.SLAB_NO(+)
  47. AND A.ORD_NO = C.ORD_NO(+)
  48. AND A.ORD_SEQ = C.ORD_SEQ(+)
  49. AND A.ORD_NO = D.ORD_NO(+)
  50. AND (SUBSTR(A.YARD_ENTRY_DTIME,1,8) >= :1)
  51. AND (SUBSTR(A.YARD_ENTRY_DTIME,1,8) <= :2)
  52. AND A.OLD_SAMPL_NO LIKE :3||'%'
  53. AND A.COIL_THK >= NVL(:4,'000')
  54. AND A.COIL_THK <= NVL(:5,'999')
  55. AND A.COIL_WTH >= NVL(:6,'00000')
  56. AND A.COIL_WTH <= NVL(:7,'99999')
  57. AND (A.CUR_LOAD_LOC LIKE :8||'%' OR A.CUR_LOAD_LOC IS NULL)
  58. AND A.SPEC_STL_GRD LIKE :9||'%'
  59. AND A.YARD_ENTRY_SHIFT||'&' LIKE :10||'%'
  60. AND A.YARD_ENTRY_GROUP||'&' LIKE :11||'%'
  61. AND A.YARD_ENTRY_REG||'&' LIKE :12||'%'
  62. AND A.TRANS_CAR_NO||'&' LIKE :13||'%'
  63. AND A.ORD_NO||'&' LIKE :14||'%'
  64. AND A.ORD_SEQ||'&' LIKE :15||'%'
  65. AND A.DLIV_DIRNO||'&' LIKE :l6||'%'
  66. AND D.ORDCUST_CD||'&' LIKE :17||'%'
  67. AND A.DLIV_TP||'&' LIKE :18||'%'
  68. AND A.COIL_DEFECTIVE||'&' LIKE :19||'%'
  69. AND A.ORD_FL||'&' LIKE :20||'%'
  70. AND A.QK_YN||'&' LIKE :21||'%'
  71. AND INSTR(NVL(:22 , NVL(D.PRDNM_CD,'NULL')) , NVL(D.PRDNM_CD,'NULL')) > 0
  72. AND C.XSQY||'&' like :23||'%'
  73. --AND A.COIL_STAT = '2'
  74. and a.SPM_YN||'&' like :24||'%'
  75. AND A.COIL_IN_REG IS NULL -- ADD BY JUNGAN 2010-12-29 不查询盘入记录
  76. order by a.OLD_SAMPL_NO desc
  77. ]]>
  78. </query>
  79. <query id="UIH051000_03.select" desc=" 出库查询 " fetchSize="10">
  80. <![CDATA[
  81. SELECT SUBSTR(A.YARD_ENTRY_DTIME,1,8) YARD_ENTRY_DTIME --入库时间
  82. ,XB_PACKAGE.GF_COMNNAME_FIND('A01004' ,D.PRDNM_CD ) PRODNM_CD
  83. ,A.TRNF_USE_TIME CZSJ --操作时间
  84. ,A.TRNF_SHIFT SHIFT --班次
  85. ,A.TRNF_GROUP WKGROUP --班组
  86. ,A.TRNF_REG CZR --操作人
  87. ,SUBSTR(A.OLD_SAMPL_NO,1,10)ZPH --轧批号
  88. ,A.OLD_SAMPL_NO
  89. ,A.SPEC_STL_GRD
  90. ,A.INSTR_COIL_THK ORD_THK
  91. ,A.INSTR_COIL_WTH ORD_WTH
  92. ,A.COIL_THK COIL_THK
  93. ,A.COIL_WTH COIL_WTH
  94. ,A.ACT_WGT
  95. ,A.CUR_LOAD_LOC
  96. ,decode(A.TOT_DEC_GRD,'1','合格','2','不合格','3','外观异常','4','废品') TOT_DEC_GRD --综合判定
  97. ,decode(A.INGR_DEC_GRD,'1','合格','2','不合格') INGR_DEC_GRD --成份判定
  98. ,decode(A.MATLQLTY_DEC_GRD,'1','合格','2','不合格') MATLQLTY_DEC_GRD --材质判定
  99. ,decode(A.SIZE_DEC_RST,'1','合格','2','不合格') SIZE_DEC_RST --尺寸判定
  100. ,decode(A.EXTSHAPE_DEC_GRD,'1','合格','2','订单外合格','3','次品','4','废品','待判定') EXTSHAPE_DEC_GRD --外观判定
  101. ,DECODE(A.WGT_DEC_RST,'1','合格','2','不合格') WGT_DEC_RST
  102. ,DECODE(A.QK_YN,'Y','清库卷') QK_YN
  103. ,A.ORD_NO
  104. ,a.ORD_SEQ
  105. ,(SELECT T.SM_CFNM FROM TBZ00_COMMCD T WHERE T.LG_CD = 'A01012' AND T.SM_CD = C.DLIV_TP) DLIV_TP
  106. ,(SELECT T.CUST_NM FROM TBZ00_CUSTOMER T WHERE T.CUST_CD = D.ORDCUST_CD) ORDCUST_CD
  107. ,SUBSTR(B.SLAB_NO,1,10) CHARGE_NO
  108. ,B.STL_GRD
  109. ,a.TRNF_DTIME
  110. ,A.TRANS_CAR_NO
  111. ,A.DLIV_DIRNO
  112. ,DECODE(A.COIL_DEFECTIVE,'1A',null,'2A','成分不合格','2E','工序不合格','3B','尺寸不合格','3C','重量不合格','3D','外观不合格','4A','性能不合格') COIL_DEFECTIVE
  113. ,A.BEF_SPEC_STL_GRD
  114. ,DECODE(A.BEF_MATLQLTY_DEC_GRD,'0','无性能要求','1','合格','2','不合格') BEF_MATRL_END_CAUSE_CD --清库前性能
  115. ,DECODE(A.BEF_EXTSHAPE_DEC_GRD,'1','合格','2','订单外合格','3','次品','4','废品') BEF_EXTSHAPE_DEC_GRD --清库前外观
  116. ,C.XSQY --销售区域
  117. FROM TBH02_COIL_COMM A
  118. ,TBG02_SLAB_COMM B
  119. ,TBA01_ORD_LINE C
  120. ,TBA01_ORD_COMM D
  121. WHERE '1' = '1'
  122. AND A.SLAB_NO = B.SLAB_NO(+)
  123. AND A.ORD_NO = C.ORD_NO(+)
  124. AND A.ORD_SEQ = C.ORD_SEQ(+)
  125. AND A.ORD_NO = D.ORD_NO(+)
  126. AND (SUBSTR(A.TRNF_DTIME,1,8) >= :1) --or (a.QK_YN = 'Y' and SUBSTR(a.QK_REG_DTIME,1,8)>= :2))
  127. AND (SUBSTR(A.TRNF_DTIME,1,8) <= :2) --or (a.QK_YN = 'Y' and SUBSTR(a.QK_REG_DTIME,1,8)<= :4))
  128. and a.COIL_STAT = '3'
  129. AND nvl(a.ISDIVI,1) <> '0'
  130. AND A.OLD_SAMPL_NO LIKE :3||'%'
  131. AND A.COIL_THK >= NVL(:4,'000')
  132. AND A.COIL_THK <= NVL(:5,'999')
  133. AND A.COIL_WTH >= NVL(:6,'00000')
  134. AND A.COIL_WTH <= NVL(:7,'99999')
  135. AND (A.CUR_LOAD_LOC LIKE :8||'%' OR A.CUR_LOAD_LOC IS NULL)
  136. AND A.SPEC_STL_GRD LIKE :9||'%'
  137. AND A.TRNF_SHIFT||'&' LIKE :10||'%'
  138. AND A.TRNF_GROUP||'&' LIKE :11||'%'
  139. AND A.TRNF_REG||'&' LIKE :12||'%'
  140. AND A.TRANS_CAR_NO||'&' LIKE :13||'%'
  141. AND A.ORD_NO||'&' LIKE :14||'%'
  142. AND A.ORD_SEQ||'&' LIKE :15||'%'
  143. AND A.DLIV_DIRNO||'&' LIKE :l6||'%'
  144. AND D.ORDCUST_CD||'&' LIKE :17||'%'
  145. AND A.DLIV_TP||'&' LIKE :18||'%'
  146. AND A.COIL_DEFECTIVE||'&' LIKE :19||'%'
  147. AND A.ORD_FL||'&' LIKE :20||'%'
  148. AND A.QK_YN||'&' LIKE :21||'%'
  149. AND INSTR(NVL(:22 , NVL(D.PRDNM_CD,'NULL')) , NVL(D.PRDNM_CD,'NULL')) > 0
  150. AND C.XSQY||'&' like :23||'%'
  151. and a.SPM_YN||'&' like :24||'%'
  152. AND (A.SHIP_PROG_CD <> '10' or A.SHIP_PROG_CD IS NULL) -- ADD BY JUNGAN 2010-12-29 不查询盘出记录
  153. order by a.OLD_SAMPL_NO desc
  154. ]]>
  155. </query>
  156. <query id="UIH051000_02.select" desc=" 统计入库钢卷个数和重量 " fetchSize="10">
  157. <![CDATA[
  158. select count(*) COIL_CNT,
  159. nvl(sum(a.act_wgt)/1000,0) COIL_WGT
  160. FROM TBH02_COIL_COMM A,
  161. TBA01_ORD_LINE C,
  162. TBA01_ORD_COMM D
  163. WHERE '1' = '1'
  164. AND A.ORD_NO = D.ORD_NO(+)
  165. AND A.ORD_NO = C.ORD_NO(+)
  166. AND A.ORD_SEQ = C.ORD_SEQ(+)
  167. AND (SUBSTR(A.YARD_ENTRY_DTIME,1,8) >= :1)
  168. AND (SUBSTR(A.YARD_ENTRY_DTIME,1,8) <= :2)
  169. AND A.OLD_SAMPL_NO LIKE :3||'%'
  170. AND A.COIL_THK >= NVL(:4,'000')
  171. AND A.COIL_THK <= NVL(:5,'999')
  172. AND A.COIL_WTH >= NVL(:6,'00000')
  173. AND A.COIL_WTH <= NVL(:7,'99999')
  174. AND (A.CUR_LOAD_LOC LIKE :8||'%' OR A.CUR_LOAD_LOC IS NULL)
  175. AND A.SPEC_STL_GRD LIKE :9||'%'
  176. AND A.YARD_ENTRY_SHIFT||'&' LIKE :10||'%'
  177. AND A.YARD_ENTRY_GROUP||'&' LIKE :11||'%'
  178. AND A.YARD_ENTRY_REG||'&' LIKE :12||'%'
  179. AND A.TRANS_CAR_NO||'&' LIKE :13||'%'
  180. AND A.ORD_NO||'&' LIKE :14||'%'
  181. AND A.ORD_SEQ||'&' LIKE :15||'%'
  182. AND A.DLIV_DIRNO||'&' LIKE :l6||'%'
  183. AND D.ORDCUST_CD||'&' LIKE :17||'%'
  184. AND A.DLIV_TP||'&' LIKE :18||'%'
  185. AND A.COIL_DEFECTIVE||'&' LIKE :19||'%'
  186. AND A.ORD_FL||'&' LIKE :20||'%'
  187. AND A.QK_YN||'&' LIKE :21||'%'
  188. AND INSTR(NVL(:22 , NVL(D.PRDNM_CD,'NULL')) , NVL(D.PRDNM_CD,'NULL')) > 0
  189. AND C.XSQY||'&' like :23||'%'
  190. and a.SPM_YN||'&' like :24||'%'
  191. --AND A.COIL_STAT = '2'
  192. AND A.COIL_IN_REG IS NULL -- ADD BY JUNGAN 2010-12-29 不查询盘入记录
  193. ]]>
  194. </query>
  195. <query id="UIH051000_04.select" desc=" 统计出库钢卷个数和重量 " fetchSize="10">
  196. <![CDATA[
  197. select count(*) COIL_CNT,
  198. nvl(sum(a.act_wgt)/1000,0) COIL_WGT
  199. from tbh02_coil_comm a,TBA01_ORD_COMM D,TBA01_ORD_LINE C
  200. where a.COIL_STAT = '3'
  201. AND A.ORD_NO = D.ORD_NO(+)
  202. AND A.ORD_NO = C.ORD_NO(+)
  203. AND A.ORD_SEQ = C.ORD_SEQ(+)
  204. AND (SUBSTR(A.TRNF_DTIME,1,8) >= :1) --or (a.QK_YN = 'Y' and SUBSTR(a.QK_REG_DTIME,1,8)>= :2))
  205. AND (SUBSTR(A.TRNF_DTIME,1,8) <= :2) --or (a.QK_YN = 'Y' and SUBSTR(a.QK_REG_DTIME,1,8)<= :4))
  206. AND A.OLD_SAMPL_NO LIKE :3||'%'
  207. AND A.COIL_THK >= NVL(:4,'000')
  208. AND A.COIL_THK <= NVL(:5,'999')
  209. AND A.COIL_WTH >= NVL(:6,'00000')
  210. AND A.COIL_WTH <= NVL(:7,'99999')
  211. AND (A.CUR_LOAD_LOC LIKE :8||'%' OR A.CUR_LOAD_LOC IS NULL)
  212. AND A.SPEC_STL_GRD LIKE :9||'%'
  213. AND A.TRNF_SHIFT||'&' LIKE :10||'%'
  214. AND A.TRNF_GROUP||'&' LIKE :11||'%'
  215. AND A.TRNF_REG||'&' LIKE :12||'%'
  216. AND A.TRANS_CAR_NO||'&' LIKE :13||'%'
  217. AND A.ORD_NO||'&' LIKE :14||'%'
  218. AND A.ORD_SEQ||'&' LIKE :15||'%'
  219. AND A.DLIV_DIRNO||'&' LIKE :l6||'%'
  220. AND D.ORDCUST_CD||'&' LIKE :17||'%'
  221. AND A.DLIV_TP||'&' LIKE :18||'%'
  222. AND A.COIL_DEFECTIVE||'&' LIKE :19||'%'
  223. AND A.ORD_FL||'&' LIKE :20||'%'
  224. AND A.QK_YN||'&' LIKE :21||'%'
  225. AND INSTR(NVL(:22 , NVL(D.PRDNM_CD,'NULL')) , NVL(D.PRDNM_CD,'NULL')) > 0
  226. AND C.XSQY||'&' like :23||'%'
  227. and a.SPM_YN||'&' like :24||'%'
  228. AND (A.SHIP_PROG_CD <> '10' or A.SHIP_PROG_CD IS NULL) -- ADD BY JUNGAN 2010-12-29 不查询盘出记录
  229. ]]>
  230. </query>
  231. <query id="UIH051000_05.select" desc=" 获取收货单位信息 " fetchSize="10">
  232. <![CDATA[
  233. SELECT T.CUST_CD VALUE,T.CUST_NM LABEL FROM TBZ00_CUSTOMER T WHERE T.REC_TP='02' order by T.CUST_NM
  234. ]]>
  235. </query>
  236. </queryMap>