1cd8ab25b82fe38cb397f2c9ceb005c4df063b10.svn-base 3.8 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091
  1. <?xml version="1.0" encoding='UTF-8'?>
  2. <queryMap desc="物料充当处理">
  3. <!--
  4. 选定充当订单:UIE031010.RepOrd.Select
  5. -->
  6. <query id="UIE031025.RepSlab.Select" desc="" fetchSize="10">
  7. <![CDATA[
  8. SELECT
  9. B.SLAB_NO DSP_NO,
  10. B.SLAB_NO MAT_NO, -- 板坯号
  11. B.STL_GRD, -- 钢号
  12. B.SLAB_THK MAT_THK, -- 板坯厚度
  13. B.SLAB_WTH MAT_WTH, -- 板坯宽度
  14. B.SLAB_LEN MAT_LEN, -- 板坯长度
  15. B.SLAB_WGT MAT_WGT, -- 板坯重量
  16. B.PROD_DTIME, -- 生产日期
  17. XB_PACKAGE.GF_COMNNAME_FIND('E01010', B.WOO_RSN) WOO_RSN, -- 余材原因
  18. B.LOC, -- 堆放位置
  19. NVL(B.KEEPWARM_YN, 'N') KEEPWARM_YN, -- 是否需要进保温坑
  20. B.ORG_ORD_NO, -- 最初合同号
  21. B.ORG_ORD_SEQ, -- 最初订单号
  22. (B.SLAB_WGT * C.PROC_RATE / 100) REP_WGT
  23. FROM TBE04_REP_ORD A, TBE04_REP_SLAB B, (
  24. SELECT PROC_RATE FROM TBE01_PROC_RATE WHERE PROC_CD = 'R') C /*, TBG02_SLAB_COMM D */
  25. WHERE A.ORD_NO = ?
  26. AND A.ORD_SEQ = ?
  27. AND B.ORD_FL = '2'
  28. AND B.SLAB_WTH BETWEEN A.ORD_WTH AND A.ORD_WTH + 100
  29. AND (B.SLAB_WGT * C.PROC_RATE / 100) BETWEEN A.ORD_WGT_MIN AND A.ORD_WGT_MAX
  30. -- AND D.SLAB_NO = B.SLAB_NO
  31. AND ('Y' <> NVL(?, 'N') OR (B.STL_GRD = A.STL_GRD /* AND D.SLAB_INGR_DEC_GRD = '1' */)) -- 同牌号
  32. AND ('Y' <> NVL(?, 'N') OR GF_NIB028720(B.SLAB_NO, A.ORD_NO, A.ORD_SEQ) = 'YY') -- 检查成分项目
  33. ORDER BY B.SLAB_WGT DESC, B.LOC ASC
  34. ]]>
  35. </query>
  36. <query id="UIE031025.RepCoil.Select" desc="" fetchSize="10">
  37. <![CDATA[
  38. SELECT
  39. C.OLD_SAMPL_NO DSP_NO,
  40. B.COIL_NO MAT_NO, -- 钢卷号
  41. B.STL_GRD, -- 钢号
  42. --------------------------------------
  43. --MODIFY BY SJW 091010
  44. D.SPEC_STL_GRD, -- 钢号
  45. --------------------------------------
  46. B.COIL_THK MAT_THK, -- 钢卷厚度
  47. B.COIL_WTH MAT_WTH, -- 钢卷宽度
  48. B.COIL_LEN MAT_LEN, -- 钢卷长度
  49. B.COIL_WGT MAT_WGT, -- 钢卷重量
  50. B.COIL_INDIA, -- 钢卷内径
  51. B.COIL_OUTDIA, -- 钢卷外径
  52. B.PROD_DTIME, -- 生产日期
  53. XB_PACKAGE.GF_COMNNAME_FIND('E01010', B.WOO_RSN) WOO_RSN, -- 余材原因
  54. B.LOC, -- 堆放位置
  55. NVL(B.SAMPL_PICK_YN, 'N') SAMPL_PICK_YN,
  56. B.ORG_ORD_NO, -- 最初合同号
  57. B.ORG_ORD_SEQ, -- 最初订单号
  58. COIL_WGT REP_WGT
  59. FROM TBE04_REP_ORD A, TBE04_REP_COIL B, TBH02_COIL_COMM C
  60. -------------------------------------------
  61. --MODIFY BY SJW 091010
  62. --DESC: 成品同牌号更改为spec_stl_grd
  63. ,TBA01_ORD_LINE D
  64. -------------------------------------------
  65. WHERE A.ORD_NO = ?
  66. AND A.ORD_SEQ = ?
  67. -----------------------------------------------------------
  68. --MODIFY BY SJW 091010
  69. --DESC: 成品同牌号更改为spec_stl_grd
  70. AND A.ORD_NO = D.ORD_NO -- 合同号
  71. AND A.ORD_SEQ = D.ORD_SEQ -- 订单号
  72. -----------------------------------------------------------
  73. AND B.ORD_FL = '2'
  74. AND B.COIL_WGT BETWEEN A.ORD_WGT_MIN AND A.ORD_WGT_MAX
  75. AND B.COIL_NO = C.COIL_NO
  76. -- AND ('Y' <> NVL(?, 'N') OR B.STL_GRD = A.STL_GRD) -- 同牌号
  77. ------------------------------------------------------------------------------------------
  78. --MODIFY BY SJW 091010
  79. --DESC: 成品同牌号更改为spec_stl_grd
  80. AND ('Y' <> NVL(?, 'N') OR C.SPEC_STL_GRD = D.SPEC_STL_GRD) -- 同牌号
  81. ------------------------------------------------------------------------------------------
  82. AND GF_NIB028780(B.COIL_NO, A.ORD_NO, A.ORD_SEQ) = 'YY' -- 检查尺寸通过
  83. AND ('Y' <> NVL(?, 'N') OR GF_NIB028720(C.SLAB_NO, A.ORD_NO, A.ORD_SEQ) = 'YY') -- 检查成分项目
  84. AND ('Y' <> NVL(?, 'N') OR GF_NIB028750(B.COIL_NO, A.ORD_NO, A.ORD_SEQ) = 'YY') -- 检查材质项目
  85. ORDER BY COIL_WGT DESC, LOC ASC
  86. ]]>
  87. </query>
  88. </queryMap>