d02f12989055baac69cc2dde298ddb9b1deefca2.svn-base 19 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307
  1. <?xml version="1.0" encoding="UTF-8"?>
  2. <queryMap desc="包装作业管理">
  3. <query id="UIM020020_01.SELECT" desc="查询待包装钢卷">
  4. <![CDATA[
  5. SELECT 'FALSE' CHK,A.OLD_SAMPL_NO,--PACKAGE_LEVEL,
  6. A.PRINT_TP,NVL(C.BUY_ABBSYM,A.SPEC_ABBSYM) SPEC_ABBSYM,nvl(c.DDC_STL_GRD,a.SPEC_STL_GRD) DDC_STL_GRD,
  7. A.SPEC_STL_GRD,A.COIL_THK,A.COIL_WTH,A.INSTR_COIL_THK,A.INSTR_COIL_WTH,A.ACT_WGT,
  8. DECODE(A.ORD_FL,'1','订单材','2','余材','','未判') ORD_FL,A.ORD_NO,
  9. A.ORD_SEQ,A.CUR_LOAD_LOC,DECODE(A.TOT_DEC_GRD,'1','合格','2','不合格','3','次品','4','废品') TOT_DEC_GRD,
  10. DECODE(A.INGR_DEC_GRD,'0','综合判定取消','1','合格','2','不合格') INGR_DEC_GRD,
  11. DECODE(A.MATLQLTY_DEC_GRD,'0','无性能要求','1','合格','2','不合格') MATRL_END_CAUSE_CD,
  12. DECODE(A.SIZE_DEC_RST,'1','合格','2','不合格') SIZE_DEC_RST,
  13. DECODE(A.EXTSHAPE_DEC_GRD,'1','合格','2','订单外合格','3','次品','4','废品','待判') EXTSHAPE_DEC_GRD,
  14. DECODE(A.WGT_DEC_RST,'1','合格','2','不合格') WGT_DEC_RST
  15. ,C_PKG_UIM.GET_STDDATESTR(A.YARD_ENTRY_DTIME) YARD_ENTRY_DTIME
  16. ,C_PKG_UIM.GET_STDTIMESTR(A.YARD_ENTRY_USE_TIME) YARD_ENTRY_USE_TIME
  17. ,(SELECT USERNAME FROM CORE_APP_USER U WHERE U.USERID = A.YARD_ENTRY_REG) YARD_ENTRY_REG
  18. ,DECODE(A.YARD_ENTRY_SHIFT,'0','常白班','1','早班','2','中班','3','晚班') YARD_ENTRY_SHIFT
  19. ,DECODE(A.YARD_ENTRY_GROUP,'1','甲班','2','乙班','3','丙班','4','丁班') YARD_ENTRY_GROUP,
  20. SUBSTR(B.SLAB_NO,0,10) CHARGE_NO,(SELECT T.SM_CFNM FROM TBZ00_COMMCD T
  21. WHERE T.LG_CD = 'A01012' AND T.SM_CD = C.DLIV_TP) DLIV_TP,
  22. (SELECT T.CUST_NM FROM TBZ00_CUSTOMER T WHERE T.CUST_CD = D.ORDCUST_CD) ORDCUST_CD,
  23. decode(A.CUR_PROG_CD,'CRC','酸轧卷充当待机','DBA','重卷指示待机','DBB','重卷作业待机'
  24. ,'DCA','包装指示待机','DCB','包装作业待机','DED','综合判定待机','DFA','发货指示待机'
  25. ,'DFB','发货待机','CCA','连退作业指示待机','CCB','连退作业待机','CCC','连退卷取待机'
  26. ) CUR_PROG_CD
  27. ,C_PKG_UIM.GET_STDDATESTR(C.ORD_DEVLMT_DATE) ORD_DEVLMT_DATE
  28. ,DECODE(c.PAKMTH_TP,
  29. '1',
  30. '不包装',
  31. '2',
  32. '简易包装',
  33. '3',
  34. '普通包装',
  35. '4',
  36. '精包装',
  37. '5',
  38. '出口包装') PAKMTH_TP
  39. --,E.SMP_SEND_DTIME
  40. --,E.SMP_WORK_DTIME
  41. --,E.QLTY_DCS_DTIME
  42. --,E.SMP_INTO_DTIME
  43. --,to_char(ROUND(((to_date(E.SMP_SEND_DTIME,'yyyy-mm-dd hh24:mi:ss')-to_date(A.MILL_DTIME,'yyyy-mm-dd hh24:mi:ss'))*86400)/3600,1)) GET_SEND_DTIME
  44. --,to_char(ROUND(((to_date(E.QLTY_DCS_DTIME,'yyyy-mm-dd hh24:mi:ss')-to_date(E.SMP_SEND_DTIME,'yyyy-mm-dd hh24:mi:ss'))*86400)/3600,1)) TO_YANG_DTIME
  45. -- ,to_char(to_date(A.MILL_DTIME,'yyyy-mm-dd hh24:mi:ss'),'yyyy-mm-dd hh24:mi:ss') MILL_DTIME
  46. ,C_PKG_UIM.GET_STDTIMESTR(A.MILL_DTIME) MILL_DTIME
  47. ,C.XSQY
  48. --,''||'/'||'' AFFIRMTIME
  49. ,C_PKG_UIM.GET_STDDATESTR(C.ORD_PLAN_DATA) ORD_PLAN_DATA
  50. ,NVL(C.PRODUCT_LX,PKG_QUALITY_COMM.FZ00_COMM('A01007', T.C_ORD_USE_TP)) C_ORD_USE_TP
  51. ,(select c.SM_CFNM from tbz00_commcd c where c.LG_CD = 'A01010' and SM_CD = A.PACKAGE_LEVEL) PACKAGE_LEVEL
  52. FROM C_TBL02_COIL_COMM A,TBG02_SLAB_COMM B,TBA01_ORD_LINE C,TBA01_ORD_COMM D,tbb01_ord_head t,
  53. TBB02_LOT_COM E WHERE '1' = '1' AND A.SLAB_NO = B.SLAB_NO(+)
  54. AND A.ORD_NO = C.ORD_NO(+) AND A.ORD_SEQ = C.ORD_SEQ(+) AND A.ORD_NO = T.ORD_NO(+)
  55. AND A.ORD_SEQ = T.ORD_SEQ(+) AND A.ORD_NO = D.ORD_NO(+) AND A.SMP_NO = E.SMP_NO(+)
  56. AND A.COIL_STAT = '2' AND A.PACKAGE_FL != '1'/*A.CUR_PROG_CD = 'DCB'*/
  57. AND A.LINE_TP IS NULL
  58. AND A.ORD_NO||'&' LIKE ?||'%' AND A.ORD_SEQ||'&' LIKE ?||'%' AND A.COIL_NO||'&' LIKE ?||'%'
  59. ]]>
  60. </query>
  61. <query id="UIM020020_02.SELECT" desc="查询已包装钢卷">
  62. <![CDATA[
  63. SELECT 'FALSE' CHK,A.OLD_SAMPL_NO,--PACKAGE_LEVEL,
  64. A.PRINT_TP,NVL(C.BUY_ABBSYM,A.SPEC_ABBSYM) SPEC_ABBSYM,nvl(c.DDC_STL_GRD,a.SPEC_STL_GRD) DDC_STL_GRD,
  65. A.SPEC_STL_GRD,A.COIL_THK,A.COIL_WTH,A.INSTR_COIL_THK,A.INSTR_COIL_WTH,A.ACT_WGT,
  66. DECODE(A.ORD_FL,'1','订单材','2','余材','','未判') ORD_FL,A.ORD_NO,
  67. A.ORD_SEQ,A.CUR_LOAD_LOC,DECODE(A.TOT_DEC_GRD,'1','合格','2','不合格','3','次品','4','废品') TOT_DEC_GRD,
  68. DECODE(A.INGR_DEC_GRD,'0','综合判定取消','1','合格','2','不合格') INGR_DEC_GRD,
  69. DECODE(A.MATLQLTY_DEC_GRD,'0','无性能要求','1','合格','2','不合格') MATRL_END_CAUSE_CD,
  70. DECODE(A.SIZE_DEC_RST,'1','合格','2','不合格') SIZE_DEC_RST,
  71. DECODE(A.EXTSHAPE_DEC_GRD,'1','合格','2','订单外合格','3','次品','4','废品','待判') EXTSHAPE_DEC_GRD,
  72. DECODE(A.WGT_DEC_RST,'1','合格','2','不合格') WGT_DEC_RST
  73. ,C_PKG_UIM.GET_STDDATESTR(A.YARD_ENTRY_DTIME) YARD_ENTRY_DTIME
  74. ,C_PKG_UIM.GET_STDTIMESTR(A.YARD_ENTRY_USE_TIME) YARD_ENTRY_USE_TIME
  75. ,(SELECT USERNAME FROM CORE_APP_USER U WHERE U.USERID = A.YARD_ENTRY_REG) YARD_ENTRY_REG
  76. ,DECODE(A.YARD_ENTRY_SHIFT,'0','常白班','1','早班','2','中班','3','晚班') YARD_ENTRY_SHIFT
  77. ,DECODE(A.YARD_ENTRY_GROUP,'1','甲班','2','乙班','3','丙班','4','丁班') YARD_ENTRY_GROUP,
  78. SUBSTR(B.SLAB_NO,0,10) CHARGE_NO,(SELECT T.SM_CFNM FROM TBZ00_COMMCD T
  79. WHERE T.LG_CD = 'A01012' AND T.SM_CD = C.DLIV_TP) DLIV_TP,
  80. (SELECT T.CUST_NM FROM TBZ00_CUSTOMER T WHERE T.CUST_CD = D.ORDCUST_CD) ORDCUST_CD,
  81. decode(A.CUR_PROG_CD,'CRC','酸轧卷充当待机','DBA','重卷指示待机','DBB','重卷作业待机'
  82. ,'DCA','包装指示待机','DCB','包装作业待机','DED','综合判定待机','DFA','发货指示待机'
  83. ,'DFB','发货待机','CCA','连退作业指示待机','CCB','连退作业待机','CCC','连退卷取待机'
  84. ) CUR_PROG_CD
  85. ,C_PKG_UIM.GET_STDDATESTR(C.ORD_DEVLMT_DATE) ORD_DEVLMT_DATE
  86. ,DECODE(c.PAKMTH_TP,
  87. '1',
  88. '不包装',
  89. '2',
  90. '简易包装',
  91. '3',
  92. '普通包装',
  93. '4',
  94. '精包装',
  95. '5',
  96. '出口包装') PAKMTH_TP
  97. --,E.SMP_SEND_DTIME
  98. --,E.SMP_WORK_DTIME
  99. --,E.QLTY_DCS_DTIME
  100. --,E.SMP_INTO_DTIME
  101. --,to_char(ROUND(((to_date(E.SMP_SEND_DTIME,'yyyy-mm-dd hh24:mi:ss')-to_date(A.MILL_DTIME,'yyyy-mm-dd hh24:mi:ss'))*86400)/3600,1)) GET_SEND_DTIME
  102. --,to_char(ROUND(((to_date(E.QLTY_DCS_DTIME,'yyyy-mm-dd hh24:mi:ss')-to_date(E.SMP_SEND_DTIME,'yyyy-mm-dd hh24:mi:ss'))*86400)/3600,1)) TO_YANG_DTIME
  103. -- ,to_char(to_date(A.MILL_DTIME,'yyyy-mm-dd hh24:mi:ss'),'yyyy-mm-dd hh24:mi:ss') MILL_DTIME
  104. , C_PKG_UIM.GET_STDTIMESTR(A.MILL_DTIME) MILL_DTIME
  105. ,C.XSQY
  106. --,''||'/'||'' AFFIRMTIME
  107. ,C_PKG_UIM.GET_STDDATESTR(C.ORD_PLAN_DATA) ORD_PLAN_DATA
  108. ,NVL(C.PRODUCT_LX,PKG_QUALITY_COMM.FZ00_COMM('A01007', T.C_ORD_USE_TP)) C_ORD_USE_TP
  109. ,(select c.SM_CFNM from tbz00_commcd c where c.LG_CD = 'A01010' and SM_CD = A.PACKAGE_LEVEL) PACKAGE_LEVEL
  110. FROM C_TBL02_COIL_COMM A,TBG02_SLAB_COMM B,TBA01_ORD_LINE C,TBA01_ORD_COMM D,tbb01_ord_head t,
  111. TBB02_LOT_COM E WHERE '1' = '1' AND A.SLAB_NO = B.SLAB_NO(+)
  112. AND A.ORD_NO = C.ORD_NO(+) AND A.ORD_SEQ = C.ORD_SEQ(+) AND A.ORD_NO = T.ORD_NO(+)
  113. AND A.ORD_SEQ = T.ORD_SEQ(+) AND A.ORD_NO = D.ORD_NO(+) AND A.SMP_NO = E.SMP_NO(+)
  114. AND A.COIL_STAT = '2' AND A.CUR_PROG_CD <> 'DCB' AND A.PACKAGE_FL = 1
  115. AND A.LINE_TP IS NULL
  116. AND A.ORD_NO||'&' LIKE ?||'%' AND A.ORD_SEQ||'&' LIKE ?||'%' AND A.COIL_NO||'&' LIKE ?||'%'
  117. ]]>
  118. </query>
  119. <query id="UIM020020_03.SELECT" desc="查询包装钢卷卷数和重量">
  120. <![CDATA[
  121. select count(1) packageCount,sum(t.ACT_WGT) packageAct_Wgt from c_tbl02_coil_comm t where t.PACKAGE_DTIME like ? ||'%' and t.PACKAGE_FL = '1'
  122. ]]>
  123. </query>
  124. <query id="UIM020020_11.SELECT" desc="查询包装方法">
  125. <![CDATA[
  126. select c.SM_CD,c.SM_CFNM from tbz00_commcd c where c.LG_CD = 'A01010'
  127. ]]>
  128. </query>
  129. <query id="UIM020020_01.UPDATE" desc="包装作业">
  130. <![CDATA[
  131. UPDATE C_TBL02_COIL_COMM L
  132. SET L.CUR_PROG_CD = decode(L.LINE_TP,'S',L.CUR_PROG_CD,'DFA')
  133. ,L.PACKAGE_FL = '1'
  134. ,L.PACKAGE_LEVEL = ?
  135. ,L.PACKAGE_SHIFT = ?
  136. ,L.PACKAGE_GROUP = ?
  137. ,L.PACKAGE_REG = ?
  138. ,L.PACKAGE_DTIME = TO_CHAR(SYSDATE,'YYYYMMDD')
  139. ,L.PACKAGE_USE_TIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')
  140. WHERE L.COIL_NO = ?
  141. ]]>
  142. </query>
  143. <query id="UIM020020_02.UPDATE" desc="修改包装作业">
  144. <![CDATA[
  145. UPDATE C_TBL02_COIL_COMM L
  146. SET L.PACKAGE_LEVEL = ?
  147. ,L.PACKAGE_SHIFT = ?
  148. ,L.PACKAGE_GROUP = ?
  149. ,L.PACKAGE_REG = ?
  150. ,L.PACKAGE_DTIME = TO_CHAR(SYSDATE,'YYYYMMDD')
  151. ,L.PACKAGE_USE_TIME = TO_CHAR(SYSDATE,'YYYYMMDDHH24MISS')
  152. WHERE L.COIL_NO = ?
  153. ]]>
  154. </query>
  155. <query id="UIM020020_04.SELECT" desc="查询待包装钢卷">
  156. <![CDATA[
  157. SELECT 'FALSE' CHK,A.OLD_SAMPL_NO,--PACKAGE_LEVEL,
  158. A.PRINT_TP,NVL(C.BUY_ABBSYM,A.SPEC_ABBSYM) SPEC_ABBSYM,nvl(c.DDC_STL_GRD,a.SPEC_STL_GRD) DDC_STL_GRD,
  159. A.SPEC_STL_GRD,A.COIL_THK,A.COIL_WTH,A.INSTR_COIL_THK,A.INSTR_COIL_WTH,A.ACT_WGT,
  160. DECODE(A.ORD_FL,'1','订单材','2','余材','','未判') ORD_FL,A.ORD_NO,
  161. A.ORD_SEQ,A.CUR_LOAD_LOC,DECODE(A.TOT_DEC_GRD,'1','合格','2','不合格','3','次品','4','废品') TOT_DEC_GRD,
  162. DECODE(A.INGR_DEC_GRD,'0','综合判定取消','1','合格','2','不合格') INGR_DEC_GRD,
  163. DECODE(A.MATLQLTY_DEC_GRD,'0','无性能要求','1','合格','2','不合格') MATRL_END_CAUSE_CD,
  164. DECODE(A.SIZE_DEC_RST,'1','合格','2','不合格') SIZE_DEC_RST,
  165. DECODE(A.EXTSHAPE_DEC_GRD,'1','合格','2','订单外合格','3','次品','4','废品','待判') EXTSHAPE_DEC_GRD,
  166. DECODE(A.WGT_DEC_RST,'1','合格','2','不合格') WGT_DEC_RST
  167. ,C_PKG_UIM.GET_STDDATESTR(A.YARD_ENTRY_DTIME) YARD_ENTRY_DTIME
  168. ,C_PKG_UIM.GET_STDTIMESTR(A.YARD_ENTRY_USE_TIME) YARD_ENTRY_USE_TIME
  169. ,(SELECT USERNAME FROM CORE_APP_USER U WHERE U.USERID = A.YARD_ENTRY_REG) YARD_ENTRY_REG
  170. ,DECODE(A.YARD_ENTRY_SHIFT,'0','常白班','1','早班','2','中班','3','晚班') YARD_ENTRY_SHIFT
  171. ,DECODE(A.YARD_ENTRY_GROUP,'1','甲班','2','乙班','3','丙班','4','丁班') YARD_ENTRY_GROUP,
  172. SUBSTR(B.SLAB_NO,0,10) CHARGE_NO,(SELECT T.SM_CFNM FROM TBZ00_COMMCD T
  173. WHERE T.LG_CD = 'A01012' AND T.SM_CD = C.DLIV_TP) DLIV_TP,
  174. (SELECT T.CUST_NM FROM TBZ00_CUSTOMER T WHERE T.CUST_CD = D.ORDCUST_CD) ORDCUST_CD,
  175. decode(A.CUR_PROG_CD,'CRC','酸轧卷充当待机','DBA','重卷指示待机','DBB','重卷作业待机'
  176. ,'DCA','包装指示待机','DCB','包装作业待机','DED','综合判定待机','DFA','发货指示待机'
  177. ,'DFB','发货待机','CCA','连退作业指示待机','CCB','连退作业待机','CCC','连退卷取待机'
  178. ) CUR_PROG_CD
  179. ,C_PKG_UIM.GET_STDDATESTR(C.ORD_DEVLMT_DATE) ORD_DEVLMT_DATE
  180. ,C_PKG_UIM.GET_STDTIMESTR(A.MILL_DTIME) MILL_DTIME
  181. ,C.XSQY
  182. ,C_PKG_UIM.GET_STDDATESTR(C.ORD_PLAN_DATA) ORD_PLAN_DATA
  183. ,DECODE(c.PAKMTH_TP,
  184. '1',
  185. '不包装',
  186. '2',
  187. '简易包装',
  188. '3',
  189. '普通包装',
  190. '4',
  191. '精包装',
  192. '5',
  193. '出口包装') PAKMTH_TP
  194. ,NVL(C.PRODUCT_LX,PKG_QUALITY_COMM.FZ00_COMM('A01007', T.C_ORD_USE_TP)) C_ORD_USE_TP
  195. ,(select c.SM_CFNM from tbz00_commcd c where c.LG_CD = 'A01010' and SM_CD = A.PACKAGE_LEVEL) PACKAGE_LEVEL
  196. FROM C_TBL02_COIL_COMM A,TBG02_SLAB_COMM B,TBA01_ORD_LINE C,TBA01_ORD_COMM D,tbb01_ord_head t,
  197. TBB02_LOT_COM E WHERE '1' = '1' AND A.SLAB_NO = B.SLAB_NO(+)
  198. AND A.ORD_NO = C.ORD_NO(+) AND A.ORD_SEQ = C.ORD_SEQ(+) AND A.ORD_NO = T.ORD_NO(+)
  199. AND A.ORD_SEQ = T.ORD_SEQ(+) AND A.ORD_NO = D.ORD_NO(+) AND A.SMP_NO = E.SMP_NO(+)
  200. AND A.LINE_TP='S'
  201. AND A.COIL_STAT = '2' AND A.PACKAGE_FL != '1'/*A.CUR_PROG_CD = 'DCB'*/
  202. AND A.ORD_NO||'&' LIKE ?||'%' AND A.ORD_SEQ||'&' LIKE ?||'%' AND A.COIL_NO||'&' LIKE ?||'%'
  203. ]]>
  204. </query>
  205. <query id="UIM020020_05.SELECT" desc="查询已包装钢卷">
  206. <![CDATA[
  207. SELECT 'FALSE' CHK,A.OLD_SAMPL_NO,--PACKAGE_LEVEL,
  208. A.PRINT_TP,NVL(C.BUY_ABBSYM,A.SPEC_ABBSYM) SPEC_ABBSYM,nvl(c.DDC_STL_GRD,a.SPEC_STL_GRD) DDC_STL_GRD,
  209. A.SPEC_STL_GRD,A.COIL_THK,A.COIL_WTH,A.INSTR_COIL_THK,A.INSTR_COIL_WTH,A.ACT_WGT,
  210. DECODE(A.ORD_FL,'1','订单材','2','余材','','未判') ORD_FL,A.ORD_NO,
  211. A.ORD_SEQ,A.CUR_LOAD_LOC,DECODE(A.TOT_DEC_GRD,'1','合格','2','不合格','3','次品','4','废品') TOT_DEC_GRD,
  212. DECODE(A.INGR_DEC_GRD,'0','综合判定取消','1','合格','2','不合格') INGR_DEC_GRD,
  213. DECODE(A.MATLQLTY_DEC_GRD,'0','无性能要求','1','合格','2','不合格') MATRL_END_CAUSE_CD,
  214. DECODE(A.SIZE_DEC_RST,'1','合格','2','不合格') SIZE_DEC_RST,
  215. DECODE(A.EXTSHAPE_DEC_GRD,'1','合格','2','订单外合格','3','次品','4','废品','待判') EXTSHAPE_DEC_GRD,
  216. DECODE(A.WGT_DEC_RST,'1','合格','2','不合格') WGT_DEC_RST
  217. ,C_PKG_UIM.GET_STDDATESTR(A.YARD_ENTRY_DTIME) YARD_ENTRY_DTIME
  218. ,C_PKG_UIM.GET_STDTIMESTR(A.YARD_ENTRY_USE_TIME) YARD_ENTRY_USE_TIME
  219. ,(SELECT USERNAME FROM CORE_APP_USER U WHERE U.USERID = A.YARD_ENTRY_REG) YARD_ENTRY_REG
  220. ,DECODE(A.YARD_ENTRY_SHIFT,'0','常白班','1','早班','2','中班','3','晚班') YARD_ENTRY_SHIFT
  221. ,DECODE(A.YARD_ENTRY_GROUP,'1','甲班','2','乙班','3','丙班','4','丁班') YARD_ENTRY_GROUP,
  222. SUBSTR(B.SLAB_NO,0,10) CHARGE_NO,(SELECT T.SM_CFNM FROM TBZ00_COMMCD T
  223. WHERE T.LG_CD = 'A01012' AND T.SM_CD = C.DLIV_TP) DLIV_TP,
  224. (SELECT T.CUST_NM FROM TBZ00_CUSTOMER T WHERE T.CUST_CD = D.ORDCUST_CD) ORDCUST_CD,
  225. decode(A.CUR_PROG_CD,'CRC','酸轧卷充当待机','DBA','重卷指示待机','DBB','重卷作业待机'
  226. ,'DCA','包装指示待机','DCB','包装作业待机','DED','综合判定待机','DFA','发货指示待机'
  227. ,'DFB','发货待机','CCA','连退作业指示待机','CCB','连退作业待机','CCC','连退卷取待机'
  228. ) CUR_PROG_CD
  229. ,C_PKG_UIM.GET_STDDATESTR(C.ORD_DEVLMT_DATE) ORD_DEVLMT_DATE
  230. ,C_PKG_UIM.GET_STDTIMESTR(A.MILL_DTIME) MILL_DTIME
  231. ,C.XSQY
  232. ,C_PKG_UIM.GET_STDDATESTR(C.ORD_PLAN_DATA) ORD_PLAN_DATA
  233. ,DECODE(c.PAKMTH_TP,
  234. '1',
  235. '不包装',
  236. '2',
  237. '简易包装',
  238. '3',
  239. '普通包装',
  240. '4',
  241. '精包装',
  242. '5',
  243. '出口包装') PAKMTH_TP
  244. ,NVL(C.PRODUCT_LX,PKG_QUALITY_COMM.FZ00_COMM('A01007', T.C_ORD_USE_TP)) C_ORD_USE_TP
  245. ,(select c.SM_CFNM from tbz00_commcd c where c.LG_CD = 'A01010' and SM_CD = A.PACKAGE_LEVEL) PACKAGE_LEVEL
  246. FROM C_TBL02_COIL_COMM A,TBG02_SLAB_COMM B,TBA01_ORD_LINE C,TBA01_ORD_COMM D,tbb01_ord_head t,
  247. TBB02_LOT_COM E WHERE '1' = '1' AND A.SLAB_NO = B.SLAB_NO(+)
  248. AND A.ORD_NO = C.ORD_NO(+) AND A.ORD_SEQ = C.ORD_SEQ(+) AND A.ORD_NO = T.ORD_NO(+)
  249. AND A.ORD_SEQ = T.ORD_SEQ(+) AND A.ORD_NO = D.ORD_NO(+) AND A.SMP_NO = E.SMP_NO(+)
  250. AND A.LINE_TP='S'
  251. AND A.COIL_STAT = '2' AND A.CUR_PROG_CD <> 'DCB' AND A.PACKAGE_FL = 1
  252. AND A.ORD_NO||'&' LIKE ?||'%' AND A.ORD_SEQ||'&' LIKE ?||'%' AND A.COIL_NO||'&' LIKE ?||'%'
  253. ]]>
  254. </query>
  255. <query id="UIM020020_06.SELECT" desc="查询待包装钢卷">
  256. <![CDATA[
  257. SELECT 'FALSE' CHK,A.OLD_SAMPL_NO,--PACKAGE_LEVEL,
  258. A.PRINT_TP,NVL(C.BUY_ABBSYM,A.SPEC_ABBSYM) SPEC_ABBSYM,nvl(c.DDC_STL_GRD,a.SPEC_STL_GRD) DDC_STL_GRD,
  259. A.SPEC_STL_GRD,A.COIL_THK,A.COIL_WTH,A.INSTR_COIL_THK,A.INSTR_COIL_WTH,A.ACT_WGT,
  260. DECODE(A.ORD_FL,'1','订单材','2','余材','','未判') ORD_FL,A.ORD_NO,
  261. A.ORD_SEQ,A.CUR_LOAD_LOC,DECODE(A.TOT_DEC_GRD,'1','合格','2','不合格','3','次品','4','废品') TOT_DEC_GRD,
  262. DECODE(A.INGR_DEC_GRD,'0','综合判定取消','1','合格','2','不合格') INGR_DEC_GRD,
  263. DECODE(A.MATLQLTY_DEC_GRD,'0','无性能要求','1','合格','2','不合格') MATRL_END_CAUSE_CD,
  264. DECODE(A.SIZE_DEC_RST,'1','合格','2','不合格') SIZE_DEC_RST,
  265. DECODE(A.EXTSHAPE_DEC_GRD,'1','合格','2','订单外合格','3','次品','4','废品','待判') EXTSHAPE_DEC_GRD,
  266. DECODE(A.WGT_DEC_RST,'1','合格','2','不合格') WGT_DEC_RST
  267. ,C_PKG_UIM.GET_STDDATESTR(A.YARD_ENTRY_DTIME) YARD_ENTRY_DTIME
  268. ,C_PKG_UIM.GET_STDTIMESTR(A.YARD_ENTRY_USE_TIME) YARD_ENTRY_USE_TIME
  269. ,(SELECT USERNAME FROM CORE_APP_USER U WHERE U.USERID = A.YARD_ENTRY_REG) YARD_ENTRY_REG
  270. ,DECODE(A.YARD_ENTRY_SHIFT,'0','常白班','1','早班','2','中班','3','晚班') YARD_ENTRY_SHIFT
  271. ,DECODE(A.YARD_ENTRY_GROUP,'1','甲班','2','乙班','3','丙班','4','丁班') YARD_ENTRY_GROUP,
  272. SUBSTR(B.SLAB_NO,0,10) CHARGE_NO,(SELECT T.SM_CFNM FROM TBZ00_COMMCD T
  273. WHERE T.LG_CD = 'A01012' AND T.SM_CD = C.DLIV_TP) DLIV_TP,
  274. (SELECT T.CUST_NM FROM TBZ00_CUSTOMER T WHERE T.CUST_CD = D.ORDCUST_CD) ORDCUST_CD,
  275. decode(A.CUR_PROG_CD,'CRC','酸轧卷充当待机','DBA','重卷指示待机','DBB','重卷作业待机'
  276. ,'DCA','包装指示待机','DCB','包装作业待机','DED','综合判定待机','DFA','发货指示待机'
  277. ,'DFB','发货待机','CCA','连退作业指示待机','CCB','连退作业待机','CCC','连退卷取待机'
  278. ) CUR_PROG_CD
  279. ,C_PKG_UIM.GET_STDDATESTR(C.ORD_DEVLMT_DATE) ORD_DEVLMT_DATE
  280. ,C_PKG_UIM.GET_STDTIMESTR(A.MILL_DTIME) MILL_DTIME
  281. ,C.XSQY
  282. ,C_PKG_UIM.GET_STDDATESTR(C.ORD_PLAN_DATA) ORD_PLAN_DATA
  283. ,DECODE(c.PAKMTH_TP,
  284. '1',
  285. '不包装',
  286. '2',
  287. '简易包装',
  288. '3',
  289. '普通包装',
  290. '4',
  291. '精包装',
  292. '5',
  293. '出口包装') PAKMTH_TP
  294. ,NVL(C.PRODUCT_LX,PKG_QUALITY_COMM.FZ00_COMM('A01007', T.C_ORD_USE_TP)) C_ORD_USE_TP
  295. ,(select c.SM_CFNM from tbz00_commcd c where c.LG_CD = 'A01010' and SM_CD = A.PACKAGE_LEVEL) PACKAGE_LEVEL
  296. FROM C_TBL02_COIL_COMM A,TBG02_SLAB_COMM B,TBA01_ORD_LINE C,TBA01_ORD_COMM D,tbb01_ord_head t,
  297. TBB02_LOT_COM E WHERE '1' = '1' AND A.SLAB_NO = B.SLAB_NO(+)
  298. AND A.ORD_NO = C.ORD_NO(+) AND A.ORD_SEQ = C.ORD_SEQ(+) AND A.ORD_NO = T.ORD_NO(+)
  299. AND A.ORD_SEQ = T.ORD_SEQ(+) AND A.ORD_NO = D.ORD_NO(+) AND A.SMP_NO = E.SMP_NO(+)
  300. AND A.LINE_TP='S'
  301. AND A.COIL_STAT = '2' AND A.PACKAGE_FL != '1'/*A.CUR_PROG_CD = 'DCB'*/ AND C.PAKMTH_TP !='1'
  302. AND A.ORD_NO||'&' LIKE ?||'%' AND A.ORD_SEQ||'&' LIKE ?||'%' AND A.COIL_NO||'&' LIKE ?||'%'
  303. ]]>
  304. </query>
  305. </queryMap>