UIM020100-query.xml 30 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937
  1. <?xml version="1.0" encoding="UTF-8"?>
  2. <queryMap desc="包装作业管理">
  3. <query id="UIM020100_01.SELECT" desc="查询待包装钢卷">
  4. <![CDATA[
  5. SELECT 'FALSE' CHK,
  6. A.ORG_ORD_NO,
  7. A.ORG_ORD_SEQ,
  8. A.PRINT_TP,
  9. A.OLD_SAMPL_NO,
  10. A.SPEC_STL_GRD,
  11. A.COIL_THK,
  12. A.COIL_WTH,
  13. A.INSTR_COIL_THK,
  14. A.INSTR_COIL_WTH,
  15. A.ACT_WGT,
  16. DECODE(A.ORD_FL, '1', '订单材', '2', '余材', '', '未判') ORD_FL,
  17. A.ORD_NO,
  18. A.ORD_SEQ,
  19. A.CUR_LOAD_LOC,
  20. A.DLIV_DIRNO,
  21. DECODE(A.TOT_DEC_GRD,
  22. '1',
  23. '合格',
  24. '2',
  25. '不合格',
  26. '3',
  27. '次品',
  28. '4',
  29. '废品') TOT_DEC_GRD,
  30. DECODE(A.INGR_DEC_GRD,
  31. '0',
  32. '综合判定取消',
  33. '1',
  34. '合格',
  35. '2',
  36. '不合格') INGR_DEC_GRD,
  37. DECODE(A.MATLQLTY_DEC_GRD,
  38. '0',
  39. '无性能要求',
  40. '1',
  41. '合格',
  42. '2',
  43. '不合格') MATRL_END_CAUSE_CD,
  44. DECODE(A.SIZE_DEC_RST, '1', '合格', '2', '不合格') SIZE_DEC_RST,
  45. DECODE(A.EXTSHAPE_DEC_GRD,
  46. '1',
  47. '合格',
  48. '2',
  49. '订单外合格',
  50. '3',
  51. '次品',
  52. '4',
  53. '废品',
  54. '待判') EXTSHAPE_DEC_GRD,
  55. DECODE(A.WGT_DEC_RST, '1', '合格', '2', '不合格') WGT_DEC_RST,
  56. C_PKG_UIM.GET_STDDATESTR(A.YARD_ENTRY_DTIME) YARD_ENTRY_DTIME,
  57. C_PKG_UIM.GET_STDTIMESTR(A.YARD_ENTRY_USE_TIME) YARD_ENTRY_USE_TIME,
  58. (SELECT USERNAME
  59. FROM CORE_APP_USER U
  60. WHERE U.USERID = A.YARD_ENTRY_REG) YARD_ENTRY_REG,
  61. DECODE(A.YARD_ENTRY_SHIFT,
  62. '0',
  63. '常白班',
  64. '1',
  65. '早班',
  66. '2',
  67. '中班',
  68. '3',
  69. '晚班') YARD_ENTRY_SHIFT,
  70. DECODE(A.YARD_ENTRY_GROUP,
  71. '1',
  72. '甲班',
  73. '2',
  74. '乙班',
  75. '3',
  76. '丙班',
  77. '4',
  78. '丁班') YARD_ENTRY_GROUP,
  79. SUBSTR(B.SLAB_NO, 0, 10) CHARGE_NO,
  80. (SELECT T.SM_CFNM
  81. FROM TBZ00_COMMCD T
  82. WHERE T.LG_CD = 'A01012'
  83. AND T.SM_CD = C.DLIV_TP) DLIV_TP,
  84. (CASE
  85. WHEN XB_PACKAGE.GF_COMNNAME_FIND('E01002', A.CUR_PROG_CD) =
  86. '连退成品充当待机' AND a.DEFECTIVE = 'Y' THEN
  87. '二级库存'
  88. ELSE
  89. XB_PACKAGE.GF_COMNNAME_FIND('E01002', A.CUR_PROG_CD)
  90. END) CUR_PROG_CD,
  91. C_PKG_UIM.GET_STDDATESTR(C.ORD_DEVLMT_DATE) ORD_DEVLMT_DATE,
  92. C_PKG_UIM.GET_STDTIMESTR(A.MILL_DTIME) MILL_DTIME,
  93. C.XSQY,
  94. A.SPEC_ABBSYM,
  95. C_PKG_UIM.GET_STDDATESTR(C.ORD_PLAN_DATA) ORD_PLAN_DATA,
  96. (SELECT C.SM_CFNM
  97. FROM TBZ00_COMMCD C
  98. WHERE C.LG_CD = 'A01010'
  99. AND SM_CD = A.PACKAGE_LEVEL) PACKAGE_LEVEL,
  100. TO_CHAR(C_PKG_UIM.GET_REAL_ORDTHICK(A.OLD_SAMPL_NO, '3'),
  101. 'FM990.099') || '*' ||
  102. C_PKG_UIM.GET_REAL_ORDWIDTH(A.OLD_SAMPL_NO, '3') PRINT_SIZE
  103. FROM C_TBC02_COIL_COMM A,
  104. TBG02_SLAB_COMM B,
  105. TBA01_ORD_LINE C,
  106. TBA01_ORD_COMM D,
  107. TBB02_LOT_COM E
  108. WHERE '1' = '1'
  109. AND A.SLAB_NO = B.SLAB_NO(+)
  110. AND A.ORD_NO = C.ORD_NO(+)
  111. AND A.ORD_SEQ = C.ORD_SEQ(+)
  112. AND A.ORD_NO = D.ORD_NO(+)
  113. AND A.SMP_NO = E.SMP_NO(+)
  114. AND A.COIL_STAT = '2'
  115. AND A.CUR_PROG_CD='DFB'
  116. AND (SUBSTR(A.YARD_ENTRY_DTIME, 1, 8) >=NVL(?,'00000000' ))
  117. AND (SUBSTR(A.YARD_ENTRY_DTIME, 1, 8) <= NVL(?,'999999999' ))
  118. AND A.DLIV_DIRNO || '&' LIKE ? || '%'
  119. AND (A.ORD_NO || A.ORD_SEQ) ||'&' LIKE ? || '%'
  120. ORDER BY A.DLIV_DIRNO
  121. ]]>
  122. </query>
  123. <query id="UIM020100_01_CP.SELECT" desc="查询连退成品钢卷">
  124. <![CDATA[
  125. SELECT 'FALSE' CHK,
  126. A.ORG_ORD_NO,
  127. A.ORG_ORD_SEQ,
  128. A.PRINT_TP,
  129. A.OLD_SAMPL_NO,
  130. A.SPEC_STL_GRD,
  131. nvl(c.DDC_STL_GRD,a.SPEC_STL_GRD) DDC_STL_GRD,
  132. A.COIL_THK,
  133. A.COIL_WTH,
  134. A.INSTR_COIL_THK,
  135. A.INSTR_COIL_WTH,
  136. T1.C_ORD_THK_MIN,
  137. T1.C_ORD_THK_MAX,
  138. T1.C_ORD_WTH_MIN,
  139. T1.C_ORD_WTH_MAX,
  140. A.ACT_WGT,
  141. CHKCOIL_CUT(A.OLD_SAMPL_NO,'L') IS_CUT , --添加判断钢卷是否符合订单切边的要求函数 20201212
  142. DECODE(A.ORD_FL, '1', '订单材', '2', '余材', '', '未判') ORD_FL,
  143. A.ORD_NO,
  144. A.ORD_SEQ,
  145. A.CUR_LOAD_LOC,
  146. A.DLIV_DIRNO,
  147. C.FAC_STL_GRD,--销售标签备注
  148. DECODE(A.TOT_DEC_GRD,
  149. '1',
  150. '合格',
  151. '2',
  152. '不合格',
  153. '3',
  154. '次品',
  155. '4',
  156. '废品') TOT_DEC_GRD,
  157. DECODE(A.INGR_DEC_GRD,
  158. '0',
  159. '综合判定取消',
  160. '1',
  161. '合格',
  162. '2',
  163. '不合格') INGR_DEC_GRD,
  164. DECODE(A.MATLQLTY_DEC_GRD,
  165. '0',
  166. '无性能要求',
  167. '1',
  168. '合格',
  169. '2',
  170. '不合格') MATRL_END_CAUSE_CD,
  171. DECODE(A.SIZE_DEC_RST, '1', '合格', '2', '不合格') SIZE_DEC_RST,
  172. DECODE(A.EXTSHAPE_DEC_GRD,
  173. '1',
  174. '合格',
  175. '2',
  176. '订单外合格',
  177. '3',
  178. '次品',
  179. '4',
  180. '废品',
  181. '待判') EXTSHAPE_DEC_GRD,
  182. DECODE(A.WGT_DEC_RST, '1', '合格', '2', '不合格') WGT_DEC_RST,
  183. C_PKG_UIM.GET_STDDATESTR(A.YARD_ENTRY_DTIME) YARD_ENTRY_DTIME,
  184. C_PKG_UIM.GET_STDTIMESTR(A.YARD_ENTRY_USE_TIME) YARD_ENTRY_USE_TIME,
  185. (SELECT USERNAME
  186. FROM CORE_APP_USER U
  187. WHERE U.USERID = A.YARD_ENTRY_REG) YARD_ENTRY_REG,
  188. DECODE(A.YARD_ENTRY_SHIFT,
  189. '0',
  190. '常白班',
  191. '1',
  192. '早班',
  193. '2',
  194. '中班',
  195. '3',
  196. '晚班') YARD_ENTRY_SHIFT,
  197. DECODE(A.YARD_ENTRY_GROUP,
  198. '1',
  199. '甲班',
  200. '2',
  201. '乙班',
  202. '3',
  203. '丙班',
  204. '4',
  205. '丁班') YARD_ENTRY_GROUP,
  206. SUBSTR(B.SLAB_NO, 0, 10) CHARGE_NO,
  207. (SELECT T.SM_CFNM
  208. FROM TBZ00_COMMCD T
  209. WHERE T.LG_CD = 'A01012'
  210. AND T.SM_CD = C.DLIV_TP) DLIV_TP,
  211. (CASE
  212. WHEN XB_PACKAGE.GF_COMNNAME_FIND('E01002', A.CUR_PROG_CD) =
  213. '连退成品充当待机' AND a.DEFECTIVE = 'Y' THEN
  214. '二级库存'
  215. ELSE
  216. XB_PACKAGE.GF_COMNNAME_FIND('E01002', A.CUR_PROG_CD)
  217. END) CUR_PROG_CD,
  218. C_PKG_UIM.GET_STDDATESTR(C.ORD_DEVLMT_DATE) ORD_DEVLMT_DATE,
  219. C_PKG_UIM.GET_STDTIMESTR(A.MILL_DTIME) MILL_DTIME,
  220. C.XSQY,
  221. NVL(C.BUY_ABBSYM,A.SPEC_ABBSYM) SPEC_ABBSYM,
  222. C_PKG_UIM.GET_STDDATESTR(C.ORD_PLAN_DATA) ORD_PLAN_DATA,
  223. (SELECT C.SM_CFNM
  224. FROM TBZ00_COMMCD C
  225. WHERE C.LG_CD = 'A01010'
  226. AND SM_CD = A.PACKAGE_LEVEL) PACKAGE_LEVEL,
  227. TO_CHAR(C_PKG_UIM.GET_REAL_ORDTHICK(A.OLD_SAMPL_NO, '3'),
  228. 'FM990.099') || '*' ||
  229. C_PKG_UIM.GET_REAL_ORDWIDTH(A.OLD_SAMPL_NO, '3') PRINT_SIZE,
  230. PKG_QUALITY_COMM.FIB040000('A01007', T.C_ORD_USE_TP, 'E') EN_ORD_USE_TP,
  231. nvl(c.PRODUCT_LX, PKG_QUALITY_COMM.FZ00_COMM('A01007', T.C_ORD_USE_TP)) C_ORD_USE_TP, --订单用途编码C_ORD_USE_TP
  232. (SELECT A.CUST_NM
  233. FROM TBZ00_CUSTOMER A
  234. WHERE A.CUST_CD = T1.ORDCUST_CD) ORDCUST_CD
  235. FROM C_TBC02_COIL_COMM A,
  236. TBJ01_DLIV_DIR TD,
  237. TBG02_SLAB_COMM B,
  238. TBA01_ORD_LINE C,
  239. TBA01_ORD_COMM D,
  240. tbb01_ord_head t,
  241. tbe02_ord_prc t1
  242. WHERE '1' = '1'
  243. AND ROWNUM < 10000
  244. AND A.SLAB_NO = B.SLAB_NO(+)
  245. AND A.ORD_NO = C.ORD_NO(+)
  246. AND A.ORD_SEQ = C.ORD_SEQ(+)
  247. AND A.ORD_NO = T.ORD_NO(+)
  248. AND A.ORD_SEQ = T.ORD_SEQ(+)
  249. AND A.ORD_NO = T1.ORD_NO(+)
  250. AND A.ORD_SEQ = T1.ORD_SEQ(+)
  251. AND A.ORD_NO = D.ORD_NO(+)
  252. AND A.DLIV_DIRNO = TD.DLIV_DIRNO
  253. AND A.COIL_STAT = '2'
  254. AND A.CUR_PROG_CD='DFB'
  255. AND (SUBSTR(A.YARD_ENTRY_DTIME, 1, 8) >=NVL(?,'00000000' ))
  256. AND (SUBSTR(A.YARD_ENTRY_DTIME, 1, 8) <= NVL(?,'999999999' ))
  257. AND A.DLIV_DIRNO || '&' LIKE ? || '%'
  258. AND (A.ORD_NO || A.ORD_SEQ) ||'&' LIKE ? || '%'
  259. ORDER BY A.DLIV_DIRNO
  260. ]]>
  261. </query>
  262. <query id="UIM020100_01_CP_ALL.SELECT" desc="按钢卷号查询所有连退、重卷成品钢卷">
  263. <![CDATA[
  264. SELECT 'FALSE' CHK,
  265. A.ORG_ORD_NO,
  266. A.ORG_ORD_SEQ,
  267. A.PRINT_TP,
  268. A.OLD_SAMPL_NO,
  269. A.SPEC_STL_GRD,
  270. nvl(c.DDC_STL_GRD,a.SPEC_STL_GRD) DDC_STL_GRD,
  271. A.COIL_THK,
  272. A.COIL_WTH,
  273. A.INSTR_COIL_THK,
  274. A.INSTR_COIL_WTH,
  275. T1.C_ORD_THK_MIN,
  276. T1.C_ORD_THK_MAX,
  277. T1.C_ORD_WTH_MIN,
  278. T1.C_ORD_WTH_MAX,
  279. A.ACT_WGT,
  280. CHKCOIL_CUT(A.OLD_SAMPL_NO,'L') IS_CUT , --添加判断钢卷是否符合订单切边的要求函数 20201212
  281. DECODE(A.ORD_FL, '1', '订单材', '2', '余材', '', '未判') ORD_FL,
  282. A.ORD_NO,
  283. A.ORD_SEQ,
  284. A.CUR_LOAD_LOC,
  285. A.DLIV_DIRNO,
  286. C.FAC_STL_GRD,--销售标签备注
  287. DECODE(A.TOT_DEC_GRD,
  288. '1',
  289. '合格',
  290. '2',
  291. '不合格',
  292. '3',
  293. '次品',
  294. '4',
  295. '废品') TOT_DEC_GRD,
  296. DECODE(A.INGR_DEC_GRD,
  297. '0',
  298. '综合判定取消',
  299. '1',
  300. '合格',
  301. '2',
  302. '不合格') INGR_DEC_GRD,
  303. DECODE(A.MATLQLTY_DEC_GRD,
  304. '0',
  305. '无性能要求',
  306. '1',
  307. '合格',
  308. '2',
  309. '不合格') MATRL_END_CAUSE_CD,
  310. DECODE(A.SIZE_DEC_RST, '1', '合格', '2', '不合格') SIZE_DEC_RST,
  311. DECODE(A.EXTSHAPE_DEC_GRD,
  312. '1',
  313. '合格',
  314. '2',
  315. '订单外合格',
  316. '3',
  317. '次品',
  318. '4',
  319. '废品',
  320. '待判') EXTSHAPE_DEC_GRD,
  321. DECODE(A.WGT_DEC_RST, '1', '合格', '2', '不合格') WGT_DEC_RST,
  322. C_PKG_UIM.GET_STDDATESTR(A.YARD_ENTRY_DTIME) YARD_ENTRY_DTIME,
  323. C_PKG_UIM.GET_STDTIMESTR(A.YARD_ENTRY_USE_TIME) YARD_ENTRY_USE_TIME,
  324. (SELECT USERNAME
  325. FROM CORE_APP_USER U
  326. WHERE U.USERID = A.YARD_ENTRY_REG) YARD_ENTRY_REG,
  327. DECODE(A.YARD_ENTRY_SHIFT,
  328. '0',
  329. '常白班',
  330. '1',
  331. '早班',
  332. '2',
  333. '中班',
  334. '3',
  335. '晚班') YARD_ENTRY_SHIFT,
  336. DECODE(A.YARD_ENTRY_GROUP,
  337. '1',
  338. '甲班',
  339. '2',
  340. '乙班',
  341. '3',
  342. '丙班',
  343. '4',
  344. '丁班') YARD_ENTRY_GROUP,
  345. SUBSTR(B.SLAB_NO, 0, 10) CHARGE_NO,
  346. (SELECT T.SM_CFNM
  347. FROM TBZ00_COMMCD T
  348. WHERE T.LG_CD = 'A01012'
  349. AND T.SM_CD = C.DLIV_TP) DLIV_TP,
  350. (CASE
  351. WHEN XB_PACKAGE.GF_COMNNAME_FIND('E01002', A.CUR_PROG_CD) =
  352. '连退成品充当待机' AND a.DEFECTIVE = 'Y' THEN
  353. '二级库存'
  354. ELSE
  355. XB_PACKAGE.GF_COMNNAME_FIND('E01002', A.CUR_PROG_CD)
  356. END) CUR_PROG_CD,
  357. C_PKG_UIM.GET_STDDATESTR(C.ORD_DEVLMT_DATE) ORD_DEVLMT_DATE,
  358. C_PKG_UIM.GET_STDTIMESTR(A.MILL_DTIME) MILL_DTIME,
  359. C.XSQY,
  360. NVL(C.BUY_ABBSYM,A.SPEC_ABBSYM) SPEC_ABBSYM,
  361. C_PKG_UIM.GET_STDDATESTR(C.ORD_PLAN_DATA) ORD_PLAN_DATA,
  362. (SELECT C.SM_CFNM
  363. FROM TBZ00_COMMCD C
  364. WHERE C.LG_CD = 'A01010'
  365. AND SM_CD = A.PACKAGE_LEVEL) PACKAGE_LEVEL,
  366. TO_CHAR(C_PKG_UIM.GET_REAL_ORDTHICK(A.OLD_SAMPL_NO, '3'),
  367. 'FM990.099') || '*' ||
  368. C_PKG_UIM.GET_REAL_ORDWIDTH(A.OLD_SAMPL_NO, '3') PRINT_SIZE,
  369. PKG_QUALITY_COMM.FIB040000('A01007', T.C_ORD_USE_TP, 'E') EN_ORD_USE_TP,
  370. nvl(c.PRODUCT_LX, PKG_QUALITY_COMM.FZ00_COMM('A01007', T.C_ORD_USE_TP)) C_ORD_USE_TP, --订单用途编码C_ORD_USE_TP
  371. (SELECT A.CUST_NM
  372. FROM TBZ00_CUSTOMER A
  373. WHERE A.CUST_CD = T1.ORDCUST_CD) ORDCUST_CD
  374. FROM C_TBC02_COIL_COMM A,
  375. --TBJ01_DLIV_DIR TD,
  376. TBG02_SLAB_COMM B,
  377. TBA01_ORD_LINE C,
  378. tbb01_ord_head t,
  379. tbe02_ord_prc t1
  380. WHERE '1' = '1'
  381. AND ROWNUM < 2000
  382. AND A.SLAB_NO = B.SLAB_NO(+)
  383. AND A.ORD_NO = C.ORD_NO(+)
  384. AND A.ORD_SEQ = C.ORD_SEQ(+)
  385. AND A.ORD_NO = T.ORD_NO(+)
  386. AND A.ORD_SEQ = T.ORD_SEQ(+)
  387. AND A.ORD_NO = T1.ORD_NO(+)
  388. AND A.ORD_SEQ = T1.ORD_SEQ(+)
  389. AND A.DIVIDE_YN != 'Y' --排除母卷
  390. AND A.OLD_SAMPL_NO LIKE ? || '%'
  391. AND A.CUR_PROG_CD != 'DBC' --排除已重卷的母卷
  392. ORDER BY A.OLD_SAMPL_NO
  393. ]]>
  394. </query>
  395. <query id="UIM020103_01_CP_ALL.SELECT" desc="按钢卷号查询所有酸洗酸轧成品钢卷">
  396. <![CDATA[
  397. SELECT 'FALSE' CHK,
  398. A.ORG_ORD_NO,
  399. A.ORG_ORD_SEQ,
  400. A.PRINT_TP,
  401. A.OLD_SAMPL_NO,
  402. A.SPEC_STL_GRD,
  403. nvl(c.DDC_STL_GRD,a.SPEC_STL_GRD) DDC_STL_GRD,
  404. A.COIL_THK,
  405. A.COIL_WTH,
  406. A.INSTR_COIL_THK,
  407. A.INSTR_COIL_WTH,
  408. T1.C_ORD_THK_MIN,
  409. T1.C_ORD_THK_MAX,
  410. T1.C_ORD_WTH_MIN,
  411. T1.C_ORD_WTH_MAX,
  412. A.ACT_WGT,
  413. CHKCOIL_CUT(A.OLD_SAMPL_NO,'S') IS_CUT , --添加判断钢卷是否符合订单切边的要求函数 20201212
  414. DECODE(A.ORD_FL, '1', '订单材', '2', '余材', '', '未判') ORD_FL,
  415. A.ORD_NO,
  416. A.ORD_SEQ,
  417. A.CUR_LOAD_LOC,
  418. A.DLIV_DIRNO,
  419. C.FAC_STL_GRD,--销售标签备注
  420. DECODE(A.TOT_DEC_GRD,
  421. '1',
  422. '合格',
  423. '2',
  424. '不合格',
  425. '3',
  426. '次品',
  427. '4',
  428. '废品') TOT_DEC_GRD,
  429. DECODE(A.INGR_DEC_GRD,
  430. '0',
  431. '综合判定取消',
  432. '1',
  433. '合格',
  434. '2',
  435. '不合格') INGR_DEC_GRD,
  436. DECODE(A.MATLQLTY_DEC_GRD,
  437. '0',
  438. '无性能要求',
  439. '1',
  440. '合格',
  441. '2',
  442. '不合格') MATRL_END_CAUSE_CD,
  443. DECODE(A.SIZE_DEC_RST, '1', '合格', '2', '不合格') SIZE_DEC_RST,
  444. DECODE(A.EXTSHAPE_DEC_GRD,
  445. '1',
  446. '合格',
  447. '2',
  448. '订单外合格',
  449. '3',
  450. '次品',
  451. '4',
  452. '废品',
  453. '待判') EXTSHAPE_DEC_GRD,
  454. DECODE(A.WGT_DEC_RST, '1', '合格', '2', '不合格') WGT_DEC_RST,
  455. C_PKG_UIM.GET_STDDATESTR(A.YARD_ENTRY_DTIME) YARD_ENTRY_DTIME,
  456. C_PKG_UIM.GET_STDTIMESTR(A.YARD_ENTRY_USE_TIME) YARD_ENTRY_USE_TIME,
  457. (SELECT USERNAME
  458. FROM CORE_APP_USER U
  459. WHERE U.USERID = A.YARD_ENTRY_REG) YARD_ENTRY_REG,
  460. DECODE(A.YARD_ENTRY_SHIFT,
  461. '0',
  462. '常白班',
  463. '1',
  464. '早班',
  465. '2',
  466. '中班',
  467. '3',
  468. '晚班') YARD_ENTRY_SHIFT,
  469. DECODE(A.YARD_ENTRY_GROUP,
  470. '1',
  471. '甲班',
  472. '2',
  473. '乙班',
  474. '3',
  475. '丙班',
  476. '4',
  477. '丁班') YARD_ENTRY_GROUP,
  478. SUBSTR(B.SLAB_NO, 0, 10) CHARGE_NO,
  479. (SELECT T.SM_CFNM
  480. FROM TBZ00_COMMCD T
  481. WHERE T.LG_CD = 'A01012'
  482. AND T.SM_CD = C.DLIV_TP) DLIV_TP,
  483. (CASE
  484. WHEN XB_PACKAGE.GF_COMNNAME_FIND('E01002', A.CUR_PROG_CD) =
  485. '成品充当待机' AND a.DEFECTIVE = 'Y' THEN
  486. '二级库存'
  487. ELSE
  488. XB_PACKAGE.GF_COMNNAME_FIND('E01002', A.CUR_PROG_CD)
  489. END) CUR_PROG_CD,
  490. C_PKG_UIM.GET_STDDATESTR(C.ORD_DEVLMT_DATE) ORD_DEVLMT_DATE,
  491. C_PKG_UIM.GET_STDTIMESTR(A.MILL_DTIME) MILL_DTIME,
  492. C.XSQY,
  493. NVL(C.BUY_ABBSYM,A.SPEC_ABBSYM) SPEC_ABBSYM,
  494. C_PKG_UIM.GET_STDDATESTR(C.ORD_PLAN_DATA) ORD_PLAN_DATA,
  495. (SELECT C.SM_CFNM
  496. FROM TBZ00_COMMCD C
  497. WHERE C.LG_CD = 'A01010'
  498. AND SM_CD = A.PACKAGE_LEVEL) PACKAGE_LEVEL,
  499. TO_CHAR(C_PKG_UIM.GET_REAL_ORDTHICK(A.OLD_SAMPL_NO, '3'),
  500. 'FM990.099') || '*' ||
  501. C_PKG_UIM.GET_REAL_ORDWIDTH(A.OLD_SAMPL_NO, '3') PRINT_SIZE,
  502. nvl(c.PRODUCT_LX, PKG_QUALITY_COMM.FZ00_COMM('A01007', T.C_ORD_USE_TP)) C_ORD_USE_TP, --订单用途编码C_ORD_USE_TP
  503. (SELECT A.CUST_NM
  504. FROM TBZ00_CUSTOMER A
  505. WHERE A.CUST_CD = T1.ORDCUST_CD) ORDCUST_CD
  506. FROM C_TBL02_COIL_COMM A,
  507. --TBJ01_DLIV_DIR TD,
  508. TBG02_SLAB_COMM B,
  509. TBA01_ORD_LINE C,
  510. tbb01_ord_head t,
  511. tbe02_ord_prc t1
  512. WHERE '1' = '1'
  513. AND ROWNUM < 2000
  514. AND A.SLAB_NO = B.SLAB_NO(+)
  515. AND A.ORD_NO = C.ORD_NO(+)
  516. AND A.ORD_SEQ = C.ORD_SEQ(+)
  517. AND A.ORD_NO = T.ORD_NO(+)
  518. AND A.ORD_SEQ = T.ORD_SEQ(+)
  519. AND A.ORD_NO = T1.ORD_NO(+)
  520. AND A.ORD_SEQ = T1.ORD_SEQ(+)
  521. -- AND A.DIVIDE_YN != 'Y' --排除母卷
  522. AND A.OLD_SAMPL_NO LIKE ? || '%'
  523. AND A.CUR_PROG_CD != 'DBC' --排除已重卷的母卷
  524. ORDER BY A.OLD_SAMPL_NO
  525. ]]>
  526. </query>
  527. <query id="UIM020103_01_CP.SELECT" desc="查询酸洗成品钢卷">
  528. <![CDATA[
  529. SELECT 'FALSE' CHK,
  530. A.ORG_ORD_NO,
  531. A.ORG_ORD_SEQ,
  532. A.PRINT_TP,
  533. A.OLD_SAMPL_NO,
  534. A.SPEC_STL_GRD,
  535. nvl(c.DDC_STL_GRD,a.SPEC_STL_GRD) DDC_STL_GRD,
  536. A.COIL_THK,
  537. A.COIL_WTH,
  538. A.INSTR_COIL_THK,
  539. A.INSTR_COIL_WTH,
  540. T1.C_ORD_THK_MIN,
  541. T1.C_ORD_THK_MAX,
  542. T1.C_ORD_WTH_MIN,
  543. T1.C_ORD_WTH_MAX,
  544. A.ACT_WGT,
  545. CHKCOIL_CUT(A.OLD_SAMPL_NO,'S') IS_CUT , --添加判断钢卷是否符合订单切边的要求函数 20201212
  546. DECODE(A.ORD_FL, '1', '订单材', '2', '余材', '', '未判') ORD_FL,
  547. A.ORD_NO,
  548. A.ORD_SEQ,
  549. A.CUR_LOAD_LOC,
  550. A.DLIV_DIRNO,
  551. C.FAC_STL_GRD,--销售标签备注
  552. DECODE(A.TOT_DEC_GRD,
  553. '1',
  554. '合格',
  555. '2',
  556. '不合格',
  557. '3',
  558. '次品',
  559. '4',
  560. '废品') TOT_DEC_GRD,
  561. DECODE(A.INGR_DEC_GRD,
  562. '0',
  563. '综合判定取消',
  564. '1',
  565. '合格',
  566. '2',
  567. '不合格') INGR_DEC_GRD,
  568. DECODE(A.MATLQLTY_DEC_GRD,
  569. '0',
  570. '无性能要求',
  571. '1',
  572. '合格',
  573. '2',
  574. '不合格') MATRL_END_CAUSE_CD,
  575. DECODE(A.SIZE_DEC_RST, '1', '合格', '2', '不合格') SIZE_DEC_RST,
  576. DECODE(A.EXTSHAPE_DEC_GRD,
  577. '1',
  578. '合格',
  579. '2',
  580. '订单外合格',
  581. '3',
  582. '次品',
  583. '4',
  584. '废品',
  585. '待判') EXTSHAPE_DEC_GRD,
  586. DECODE(A.WGT_DEC_RST, '1', '合格', '2', '不合格') WGT_DEC_RST,
  587. C_PKG_UIM.GET_STDDATESTR(A.YARD_ENTRY_DTIME) YARD_ENTRY_DTIME,
  588. C_PKG_UIM.GET_STDTIMESTR(A.YARD_ENTRY_USE_TIME) YARD_ENTRY_USE_TIME,
  589. (SELECT USERNAME
  590. FROM CORE_APP_USER U
  591. WHERE U.USERID = A.YARD_ENTRY_REG) YARD_ENTRY_REG,
  592. DECODE(A.YARD_ENTRY_SHIFT,
  593. '0',
  594. '常白班',
  595. '1',
  596. '早班',
  597. '2',
  598. '中班',
  599. '3',
  600. '晚班') YARD_ENTRY_SHIFT,
  601. DECODE(A.YARD_ENTRY_GROUP,
  602. '1',
  603. '甲班',
  604. '2',
  605. '乙班',
  606. '3',
  607. '丙班',
  608. '4',
  609. '丁班') YARD_ENTRY_GROUP,
  610. SUBSTR(B.SLAB_NO, 0, 10) CHARGE_NO,
  611. (SELECT T.SM_CFNM
  612. FROM TBZ00_COMMCD T
  613. WHERE T.LG_CD = 'A01012'
  614. AND T.SM_CD = C.DLIV_TP) DLIV_TP,
  615. (CASE
  616. WHEN XB_PACKAGE.GF_COMNNAME_FIND('E01002', A.CUR_PROG_CD) =
  617. '成品充当待机' AND a.DEFECTIVE = 'Y' THEN
  618. '二级库存'
  619. ELSE
  620. XB_PACKAGE.GF_COMNNAME_FIND('E01002', A.CUR_PROG_CD)
  621. END) CUR_PROG_CD,
  622. C_PKG_UIM.GET_STDDATESTR(C.ORD_DEVLMT_DATE) ORD_DEVLMT_DATE,
  623. C_PKG_UIM.GET_STDTIMESTR(A.MILL_DTIME) MILL_DTIME,
  624. C.XSQY,
  625. NVL(C.BUY_ABBSYM,A.SPEC_ABBSYM) SPEC_ABBSYM,
  626. C_PKG_UIM.GET_STDDATESTR(C.ORD_PLAN_DATA) ORD_PLAN_DATA,
  627. (SELECT C.SM_CFNM
  628. FROM TBZ00_COMMCD C
  629. WHERE C.LG_CD = 'A01010'
  630. AND SM_CD = A.PACKAGE_LEVEL) PACKAGE_LEVEL,
  631. TO_CHAR(C_PKG_UIM.GET_REAL_ORDTHICK(A.OLD_SAMPL_NO, '3'),
  632. 'FM990.099') || '*' ||
  633. C_PKG_UIM.GET_REAL_ORDWIDTH(A.OLD_SAMPL_NO, '3') PRINT_SIZE,
  634. nvl(c.PRODUCT_LX, PKG_QUALITY_COMM.FZ00_COMM('A01007', T.C_ORD_USE_TP)) C_ORD_USE_TP, --订单用途编码C_ORD_USE_TP
  635. (SELECT A.CUST_NM
  636. FROM TBZ00_CUSTOMER A
  637. WHERE A.CUST_CD = T1.ORDCUST_CD) ORDCUST_CD
  638. FROM C_TBL02_COIL_COMM A,
  639. TBJ01_DLIV_DIR TD,
  640. TBG02_SLAB_COMM B,
  641. TBA01_ORD_LINE C,
  642. TBA01_ORD_COMM D,
  643. tbb01_ord_head t,
  644. tbe02_ord_prc t1
  645. WHERE '1' = '1'
  646. AND ROWNUM < 10000
  647. AND A.SLAB_NO = B.SLAB_NO(+)
  648. AND A.ORD_NO = C.ORD_NO(+)
  649. AND A.ORD_SEQ = C.ORD_SEQ(+)
  650. AND A.ORD_NO = T.ORD_NO(+)
  651. AND A.ORD_SEQ = T.ORD_SEQ(+)
  652. AND A.ORD_NO = T1.ORD_NO(+)
  653. AND A.ORD_SEQ = T1.ORD_SEQ(+)
  654. AND A.ORD_NO = D.ORD_NO(+)
  655. AND A.DLIV_DIRNO = TD.DLIV_DIRNO
  656. AND A.COIL_STAT = '2'
  657. AND A.CUR_PROG_CD='DFB'
  658. AND (SUBSTR(A.YARD_ENTRY_DTIME, 1, 8) >=NVL(?,'00000000' ))
  659. AND (SUBSTR(A.YARD_ENTRY_DTIME, 1, 8) <= NVL(?,'999999999' ))
  660. AND A.DLIV_DIRNO || '&' LIKE ? || '%'
  661. AND (A.ORD_NO || A.ORD_SEQ) ||'&' LIKE ? || '%'
  662. ORDER BY A.DLIV_DIRNO
  663. ]]>
  664. </query>
  665. <query id="UIM020103_01_CP_ALL_SUANXI.SELECT" desc="按钢卷号查询所有酸洗酸轧成品钢卷">
  666. <![CDATA[
  667. SELECT 'FALSE' CHK,
  668. A.ORG_ORD_NO,
  669. A.ORG_ORD_SEQ,
  670. A.PRINT_TP,
  671. A.OLD_SAMPL_NO,
  672. A.SPEC_STL_GRD,
  673. nvl(c.DDC_STL_GRD,a.SPEC_STL_GRD) DDC_STL_GRD,
  674. A.COIL_THK,
  675. A.COIL_WTH,
  676. A.INSTR_COIL_THK,
  677. A.INSTR_COIL_WTH,
  678. T1.C_ORD_THK_MIN,
  679. T1.C_ORD_THK_MAX,
  680. T1.C_ORD_WTH_MIN,
  681. T1.C_ORD_WTH_MAX,
  682. A.ACT_WGT,
  683. DECODE(A.ORD_FL, '1', '订单材', '2', '余材', '', '未判') ORD_FL,
  684. A.ORD_NO,
  685. A.ORD_SEQ,
  686. A.CUR_LOAD_LOC,
  687. A.DLIV_DIRNO,
  688. C.FAC_STL_GRD,--销售标签备注
  689. DECODE(A.TOT_DEC_GRD,
  690. '1',
  691. '合格',
  692. '2',
  693. '不合格',
  694. '3',
  695. '次品',
  696. '4',
  697. '废品') TOT_DEC_GRD,
  698. DECODE(A.INGR_DEC_GRD,
  699. '0',
  700. '综合判定取消',
  701. '1',
  702. '合格',
  703. '2',
  704. '不合格') INGR_DEC_GRD,
  705. DECODE(A.MATLQLTY_DEC_GRD,
  706. '0',
  707. '无性能要求',
  708. '1',
  709. '合格',
  710. '2',
  711. '不合格') MATRL_END_CAUSE_CD,
  712. DECODE(A.SIZE_DEC_RST, '1', '合格', '2', '不合格') SIZE_DEC_RST,
  713. DECODE(A.EXTSHAPE_DEC_GRD,
  714. '1',
  715. '合格',
  716. '2',
  717. '订单外合格',
  718. '3',
  719. '次品',
  720. '4',
  721. '废品',
  722. '待判') EXTSHAPE_DEC_GRD,
  723. DECODE(A.WGT_DEC_RST, '1', '合格', '2', '不合格') WGT_DEC_RST,
  724. C_PKG_UIM.GET_STDDATESTR(A.YARD_ENTRY_DTIME) YARD_ENTRY_DTIME,
  725. C_PKG_UIM.GET_STDTIMESTR(A.YARD_ENTRY_USE_TIME) YARD_ENTRY_USE_TIME,
  726. (SELECT USERNAME
  727. FROM CORE_APP_USER U
  728. WHERE U.USERID = A.YARD_ENTRY_REG) YARD_ENTRY_REG,
  729. DECODE(A.YARD_ENTRY_SHIFT,
  730. '0',
  731. '常白班',
  732. '1',
  733. '早班',
  734. '2',
  735. '中班',
  736. '3',
  737. '晚班') YARD_ENTRY_SHIFT,
  738. DECODE(A.YARD_ENTRY_GROUP,
  739. '1',
  740. '甲班',
  741. '2',
  742. '乙班',
  743. '3',
  744. '丙班',
  745. '4',
  746. '丁班') YARD_ENTRY_GROUP,
  747. SUBSTR(B.SLAB_NO, 0, 10) CHARGE_NO,
  748. (SELECT T.SM_CFNM
  749. FROM TBZ00_COMMCD T
  750. WHERE T.LG_CD = 'A01012'
  751. AND T.SM_CD = C.DLIV_TP) DLIV_TP,
  752. (CASE
  753. WHEN XB_PACKAGE.GF_COMNNAME_FIND('E01002', A.CUR_PROG_CD) =
  754. '成品充当待机' AND a.DEFECTIVE = 'Y' THEN
  755. '二级库存'
  756. ELSE
  757. XB_PACKAGE.GF_COMNNAME_FIND('E01002', A.CUR_PROG_CD)
  758. END) CUR_PROG_CD,
  759. C_PKG_UIM.GET_STDDATESTR(C.ORD_DEVLMT_DATE) ORD_DEVLMT_DATE,
  760. C_PKG_UIM.GET_STDTIMESTR(A.MILL_DTIME) MILL_DTIME,
  761. C.XSQY,
  762. NVL(C.BUY_ABBSYM,A.SPEC_ABBSYM) SPEC_ABBSYM,
  763. C_PKG_UIM.GET_STDDATESTR(C.ORD_PLAN_DATA) ORD_PLAN_DATA,
  764. (SELECT C.SM_CFNM
  765. FROM TBZ00_COMMCD C
  766. WHERE C.LG_CD = 'A01010'
  767. AND SM_CD = A.PACKAGE_LEVEL) PACKAGE_LEVEL,
  768. TO_CHAR(C_PKG_UIM.GET_REAL_ORDTHICK(A.OLD_SAMPL_NO, '3'),
  769. 'FM990.099') || '*' ||
  770. C_PKG_UIM.GET_REAL_ORDWIDTH(A.OLD_SAMPL_NO, '3') PRINT_SIZE,
  771. nvl(c.PRODUCT_LX, PKG_QUALITY_COMM.FZ00_COMM('A01007', T.C_ORD_USE_TP)) C_ORD_USE_TP, --订单用途编码C_ORD_USE_TP
  772. (SELECT A.CUST_NM
  773. FROM TBZ00_CUSTOMER A
  774. WHERE A.CUST_CD = T1.ORDCUST_CD) ORDCUST_CD
  775. FROM C_TBL02_COIL_COMM A,
  776. --TBJ01_DLIV_DIR TD,
  777. TBG02_SLAB_COMM B,
  778. TBA01_ORD_LINE C,
  779. tbb01_ord_head t,
  780. tbe02_ord_prc t1
  781. WHERE '1' = '1'
  782. AND ROWNUM < 2000
  783. AND A.SLAB_NO = B.SLAB_NO(+)
  784. AND A.ORD_NO = C.ORD_NO(+)
  785. AND A.ORD_SEQ = C.ORD_SEQ(+)
  786. AND A.ORD_NO = T.ORD_NO(+)
  787. AND A.ORD_SEQ = T.ORD_SEQ(+)
  788. AND A.ORD_NO = T1.ORD_NO(+)
  789. AND A.ORD_SEQ = T1.ORD_SEQ(+)
  790. -- AND A.DIVIDE_YN != 'Y' --排除母卷
  791. AND A.OLD_SAMPL_NO LIKE ? || '%'
  792. AND A.CUR_PROG_CD != 'DBC' --排除已重卷的母卷
  793. AND A.LINE_TP='S'
  794. ORDER BY A.OLD_SAMPL_NO
  795. ]]>
  796. </query>
  797. <query id="UIM020103_01_CP_SUANXI.SELECT" desc="查询酸洗成品钢卷">
  798. <![CDATA[
  799. SELECT 'FALSE' CHK,
  800. A.ORG_ORD_NO,
  801. A.ORG_ORD_SEQ,
  802. A.PRINT_TP,
  803. A.OLD_SAMPL_NO,
  804. A.SPEC_STL_GRD,
  805. nvl(c.DDC_STL_GRD,a.SPEC_STL_GRD) DDC_STL_GRD,
  806. A.COIL_THK,
  807. A.COIL_WTH,
  808. A.INSTR_COIL_THK,
  809. A.INSTR_COIL_WTH,
  810. T1.C_ORD_THK_MIN,
  811. T1.C_ORD_THK_MAX,
  812. T1.C_ORD_WTH_MIN,
  813. T1.C_ORD_WTH_MAX,
  814. A.ACT_WGT,
  815. DECODE(A.ORD_FL, '1', '订单材', '2', '余材', '', '未判') ORD_FL,
  816. A.ORD_NO,
  817. A.ORD_SEQ,
  818. A.CUR_LOAD_LOC,
  819. A.DLIV_DIRNO,
  820. C.FAC_STL_GRD,--销售标签备注
  821. DECODE(A.TOT_DEC_GRD,
  822. '1',
  823. '合格',
  824. '2',
  825. '不合格',
  826. '3',
  827. '次品',
  828. '4',
  829. '废品') TOT_DEC_GRD,
  830. DECODE(A.INGR_DEC_GRD,
  831. '0',
  832. '综合判定取消',
  833. '1',
  834. '合格',
  835. '2',
  836. '不合格') INGR_DEC_GRD,
  837. DECODE(A.MATLQLTY_DEC_GRD,
  838. '0',
  839. '无性能要求',
  840. '1',
  841. '合格',
  842. '2',
  843. '不合格') MATRL_END_CAUSE_CD,
  844. DECODE(A.SIZE_DEC_RST, '1', '合格', '2', '不合格') SIZE_DEC_RST,
  845. DECODE(A.EXTSHAPE_DEC_GRD,
  846. '1',
  847. '合格',
  848. '2',
  849. '订单外合格',
  850. '3',
  851. '次品',
  852. '4',
  853. '废品',
  854. '待判') EXTSHAPE_DEC_GRD,
  855. DECODE(A.WGT_DEC_RST, '1', '合格', '2', '不合格') WGT_DEC_RST,
  856. C_PKG_UIM.GET_STDDATESTR(A.YARD_ENTRY_DTIME) YARD_ENTRY_DTIME,
  857. C_PKG_UIM.GET_STDTIMESTR(A.YARD_ENTRY_USE_TIME) YARD_ENTRY_USE_TIME,
  858. (SELECT USERNAME
  859. FROM CORE_APP_USER U
  860. WHERE U.USERID = A.YARD_ENTRY_REG) YARD_ENTRY_REG,
  861. DECODE(A.YARD_ENTRY_SHIFT,
  862. '0',
  863. '常白班',
  864. '1',
  865. '早班',
  866. '2',
  867. '中班',
  868. '3',
  869. '晚班') YARD_ENTRY_SHIFT,
  870. DECODE(A.YARD_ENTRY_GROUP,
  871. '1',
  872. '甲班',
  873. '2',
  874. '乙班',
  875. '3',
  876. '丙班',
  877. '4',
  878. '丁班') YARD_ENTRY_GROUP,
  879. SUBSTR(B.SLAB_NO, 0, 10) CHARGE_NO,
  880. (SELECT T.SM_CFNM
  881. FROM TBZ00_COMMCD T
  882. WHERE T.LG_CD = 'A01012'
  883. AND T.SM_CD = C.DLIV_TP) DLIV_TP,
  884. (CASE
  885. WHEN XB_PACKAGE.GF_COMNNAME_FIND('E01002', A.CUR_PROG_CD) =
  886. '成品充当待机' AND a.DEFECTIVE = 'Y' THEN
  887. '二级库存'
  888. ELSE
  889. XB_PACKAGE.GF_COMNNAME_FIND('E01002', A.CUR_PROG_CD)
  890. END) CUR_PROG_CD,
  891. C_PKG_UIM.GET_STDDATESTR(C.ORD_DEVLMT_DATE) ORD_DEVLMT_DATE,
  892. C_PKG_UIM.GET_STDTIMESTR(A.MILL_DTIME) MILL_DTIME,
  893. C.XSQY,
  894. NVL(C.BUY_ABBSYM,A.SPEC_ABBSYM) SPEC_ABBSYM,
  895. C_PKG_UIM.GET_STDDATESTR(C.ORD_PLAN_DATA) ORD_PLAN_DATA,
  896. (SELECT C.SM_CFNM
  897. FROM TBZ00_COMMCD C
  898. WHERE C.LG_CD = 'A01010'
  899. AND SM_CD = A.PACKAGE_LEVEL) PACKAGE_LEVEL,
  900. TO_CHAR(C_PKG_UIM.GET_REAL_ORDTHICK(A.OLD_SAMPL_NO, '3'),
  901. 'FM990.099') || '*' ||
  902. C_PKG_UIM.GET_REAL_ORDWIDTH(A.OLD_SAMPL_NO, '3') PRINT_SIZE,
  903. nvl(c.PRODUCT_LX, PKG_QUALITY_COMM.FZ00_COMM('A01007', T.C_ORD_USE_TP)) C_ORD_USE_TP, --订单用途编码C_ORD_USE_TP
  904. (SELECT A.CUST_NM
  905. FROM TBZ00_CUSTOMER A
  906. WHERE A.CUST_CD = T1.ORDCUST_CD) ORDCUST_CD
  907. FROM C_TBL02_COIL_COMM A,
  908. TBJ01_DLIV_DIR TD,
  909. TBG02_SLAB_COMM B,
  910. TBA01_ORD_LINE C,
  911. TBA01_ORD_COMM D,
  912. tbb01_ord_head t,
  913. tbe02_ord_prc t1
  914. WHERE '1' = '1'
  915. AND ROWNUM < 10000
  916. AND A.SLAB_NO = B.SLAB_NO(+)
  917. AND A.ORD_NO = C.ORD_NO(+)
  918. AND A.ORD_SEQ = C.ORD_SEQ(+)
  919. AND A.ORD_NO = T.ORD_NO(+)
  920. AND A.ORD_SEQ = T.ORD_SEQ(+)
  921. AND A.ORD_NO = T1.ORD_NO(+)
  922. AND A.ORD_SEQ = T1.ORD_SEQ(+)
  923. AND A.ORD_NO = D.ORD_NO(+)
  924. AND A.DLIV_DIRNO = TD.DLIV_DIRNO
  925. AND A.COIL_STAT = '2'
  926. AND A.CUR_PROG_CD='DFB'
  927. AND A.LINE_TP='S'
  928. AND (SUBSTR(A.YARD_ENTRY_DTIME, 1, 8) >=NVL(?,'00000000' ))
  929. AND (SUBSTR(A.YARD_ENTRY_DTIME, 1, 8) <= NVL(?,'999999999' ))
  930. AND A.DLIV_DIRNO || '&' LIKE ? || '%'
  931. AND (A.ORD_NO || A.ORD_SEQ) ||'&' LIKE ? || '%'
  932. ORDER BY A.DLIV_DIRNO
  933. ]]>
  934. </query>
  935. </queryMap>