cc225eedc95bd80fdccd0fc9e435252962378a78.svn-base 4.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131
  1. <?xml version="1.0" encoding='UTF-8'?>
  2. <queryMap desc="STEEL MAKING QUERY ">
  3. <query id="UIH051600_01.select" desc=" ">
  4. <![CDATA[
  5. SELECT A.SPEC_STL_GRD,A.COIL_THK||'*'||A.COIL_WTH T_W,
  6. A.INSTR_COIL_THK||'*'||A.INSTR_COIL_WTH IT_IW,
  7. A.ORD_NO,A.ORD_SEQ,A.COIL_LEN,A.ACT_WGT,A.CAL_WGT,
  8. DECODE(A.CUR_PROG_CD,'SFA','发货指示待机','SED','判定待机','SRC','充当待机','SFB','运送待机','SFF','发货完成',null) CUR_PROG_CD,
  9. DECODE(A.TOT_DEC_GRD,'1','合格','2','不合格','3','次品','4','废品','','待判定') TOT_DEC_GRD,
  10. DECODE(A.ORD_FL,'1','订单材','2','余材','','未判') ORD_FL,
  11. DECODE(A.COIL_STAT,'0','加热炉上料','1','加热炉出炉','2','轧制完成','3','出库/轧废','4','预装车',null) COIL_STAT,
  12. A.COIL_IN_REG,A.COIL_IN_DTIME,A.COIL_OUT_REG,A.COIL_OUT_DTIME
  13. FROM TBH02_COIL_COMM A WHERE A.OLD_SAMPL_NO = ?
  14. ]]>
  15. </query>
  16. <query id="UIH051600_02.select" desc=" 查询钢卷号是否存在于钢卷公共表 ">
  17. <![CDATA[
  18. SELECT A.OLD_SAMPL_NO,A.COIL_NO,A.COIL_STAT,A.SLAB_NO,a.CUR_PROG_CD,a.SHIP_PROG_CD,a.TRNF_DTIME
  19. ,A.ORD_NO,A.ORD_SEQ,A.ORD_FL FROM TBH02_COIL_COMM A
  20. WHERE A.OLD_SAMPL_NO = ? AND A.COIL_STAT <> '2'
  21. ]]>
  22. </query>
  23. <query id="UIH051600_03.select" desc=" ">
  24. <![CDATA[
  25. SELECT A.OLD_SAMPL_NO,A.COIL_NO,A.COIL_STAT,CUR_PROG_CD
  26. ,A.ORD_NO,A.ORD_SEQ,A.ORD_FL FROM TBH02_COIL_COMM A
  27. WHERE A.OLD_SAMPL_NO = ? AND A.COIL_STAT = '2'
  28. ]]>
  29. </query>
  30. <query id="UIH051600_04.select" desc=" ">
  31. <![CDATA[
  32. SELECT A.COIL_NO FROM TBH05_COIL_YARD A WHERE A.YARD_CLF||A.STEP_CLF||A.STORELAY||A.STORE_SEQ = ?
  33. ]]>
  34. </query>
  35. <query id="UIH051600_05.select" desc=" ">
  36. <![CDATA[
  37. SELECT A.COIL_NO FROM TBH05_COIL_YARD A WHERE A.COIL_NO = ?
  38. ]]>
  39. </query>
  40. <query id="UIH051600_06.select" desc=" ">
  41. <![CDATA[
  42. SELECT A.CUR_PROG_CD FROM TBG02_SLAB_COMM A WHERE A.SLAB_NO = ?
  43. ]]>
  44. </query>
  45. <query id="UIH051600_01.update" desc=" 钢卷公共表 ">
  46. <![CDATA[
  47. UPDATE TBH02_COIL_COMM A SET
  48. A.CUR_LOAD_LOC = ?,
  49. A.COIL_IN_REG = ?,
  50. A.CUR_PROG_CD = 'SRC',
  51. A.COIL_STAT = '2',
  52. A.ORD_FL = '2',
  53. A.ORD_NO = '',
  54. A.ORD_SEQ = '',
  55. A.ISUSED = '0',
  56. A.SHIP_DIRNO = '',
  57. A.DLIV_DIRNO = '',
  58. A.SHIP_PROG_CD = '',
  59. A.SHIP_DIR_DTIME = '',
  60. A.COIL_IN_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')
  61. WHERE A.OLD_SAMPL_NO = ?
  62. ]]>
  63. </query>
  64. <query id="UIH051600_02.update" desc=" 钢卷公共_D表 ">
  65. <![CDATA[
  66. UPDATE TBH02_COIL_COMM_D A SET
  67. A.ORD_FL = '2'
  68. WHERE A.COIL_NO = ?
  69. ]]>
  70. </query>
  71. <query id="UIH051600_03.update" desc=" 垛位表 ">
  72. <![CDATA[
  73. UPDATE TBH05_COIL_YARD A SET
  74. A.COIL_NO = ?
  75. WHERE A.YARD_CLF = ?
  76. AND A.STEP_CLF = ?
  77. AND A.STORELAY = ?
  78. AND A.STORE_SEQ = ?
  79. ]]>
  80. </query>
  81. <query id="UIH051600_04.update" desc=" ">
  82. <![CDATA[
  83. UPDATE TBH02_COIL_COMM A SET
  84. A.COIL_STAT = '3',
  85. A.CUR_LOAD_LOC = '',
  86. A.ORD_FL = '2',
  87. A.ORD_NO = '',
  88. A.ORD_SEQ = '',
  89. A.SHIP_PROG_CD = '10',
  90. A.COIL_OUT_REG = ?,
  91. A.COIL_OUT_DTIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')
  92. WHERE A.OLD_SAMPL_NO = ?
  93. ]]>
  94. </query>
  95. <query id="UIH051600_05.update" desc=" ">
  96. <![CDATA[
  97. UPDATE TBH05_COIL_YARD T SET
  98. T.COIL_NO = '',
  99. T.REG_ID = '',
  100. T.REG_DTIME = ''
  101. WHERE T.COIL_NO = ?
  102. ]]>
  103. </query>
  104. <query id="UIH051600_06.update" desc=" ">
  105. <![CDATA[
  106. UPDATE TBG02_SLAB_COMM A SET
  107. A.SLAB_STAT = '3',
  108. A.CUR_LOAD_LOC = 'H516'
  109. WHERE A.SLAB_NO = ?
  110. ]]>
  111. </query>
  112. <query id="UIH051600_07.update" desc=" ">
  113. <![CDATA[
  114. UPDATE TBG04_SLAB_YARD A SET
  115. A.SLAB_NO = ''
  116. WHERE A.SLAB_NO = ?
  117. ]]>
  118. </query>
  119. <query id="UIH051600_01.call" desc=" 插入降级余材记录 ">
  120. <![CDATA[
  121. {call C_PKG_ORD_REP.PRD_ORD_HIS(?,?,?,?,?,?,?,?,?,?,?,?,?)}
  122. ]]>
  123. </query>
  124. </queryMap>