FrmCouplingApplPh.xml 49 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393
  1. <?xml version="1.0" encoding="UTF-8"?>
  2. <queryMap desc = "申请判定管理">
  3. <query id = "FrmCouplingApplPh.doQueryMat" desc = "查询炉信息">
  4. <![CDATA[
  5. SELECT T.WO_ID,
  6. T.JUDGE_STOVE_NO,
  7. t.DETER_NO,
  8. t.BATCH_NO,
  9. --DECODE(MAX(T.LOCK_LIKU),'0','正常','1','利库') LOCK_LIKU,
  10. --MAX(T.JUDGE_STD_NAME) JUDGE_STD_NAME,
  11. --MAX(T.SOURE_CODE) SOURE_CODE,
  12. --MAX(T.SOURE_NAME) SOURE_NAME,
  13. --MAX(T.MAT_ORIGIN_CODE) MAT_ORIGIN_CODE,
  14. --MAX(T.MAT_ORIGIN_NAME) MAT_ORIGIN_NAME,
  15. MAX(T3.BUYER_NAME) FINAL_USER_DESC,
  16. DECODE(MAX(t3.ZY_BILL_STATUS),'2','生产中','3','生产完成','关闭') ZY_BILL_STATUS,
  17. decode(MAX(t.DETER_STATUS),'0','未判定','1','申请判定','2','已判定') DETER_STATUS,
  18. MI.ORDER_NO,
  19. MI.ORDER_SEQ,
  20. MI.ORDER_SEQ_NO,
  21. MI.CRAFT_SEQ_ORD CRAFT_SEQ,
  22. MI.CRAFT_FILE_NO_ORD CRAFT_FILE_NO,
  23. MAX(T3.CODE_JG_BL) CODE_JG_BL,
  24. MAX(T3.STOVE_NO) STOVE_NO,
  25. MAX(T3.FLAG_STOVE_NO) FLAG_STOVE_NO,
  26. MAX(T3.STD_NAME) STD_NAME,
  27. MAX(T3.STD_STYLE_DESC) STD_STYLE_DESC,
  28. MAX(T3.PRODUCCODE_JG_DESC) PRODUCCODE_JG_DESC,
  29. DECODE(MAX(T3.COAT_TYPE),'0','无','1','镀铜','2','磷化','3','镀铜及磷化') COAT_TYPE,
  30. MAX(T3.DEMAND_COPPER) DEMAND_COPPER,
  31. MAX(T3.DEMAND_BONDERIZING) DEMAND_BONDERIZING,
  32. MAX(T3.DEMAND_BLAST) DEMAND_BLAST,
  33. MAX(T3.DEMAND_DETECTION) DEMAND_DETECTION,
  34. MAX(T.MEMO) MEMO,
  35. (SELECT SUM(M.REJECTED_PCS) FROM COUPLING_THREADING_RESULT M WHERE T.WO_ID = M.WO_ID) REJECTED_PCS,
  36. ROUND(MAX(JG.WEIGHT_JG/1000)*(SELECT SUM(M.REJECTED_PCS) FROM COUPLING_THREADING_RESULT M WHERE T.WO_ID = M.WO_ID),3) REJECTED_WT,
  37. MAX(T3.BL_WL_DESC) BL_WL_DESC,
  38. MIN(T.CREATE_TIME) F_IN_TIME,
  39. MAX(T.UPDATE_NAME) UPDATE_NAME,
  40. MAX(T.UPDATE_TIME) UPDATE_TIME,
  41. MAX(T.CREATE_TIME) CREATE_TIME,
  42. MAX(T.COL_OPERATOR) CREATE_NAME,
  43. MAX(T.DETER_NO) DETER_NO,
  44. MAX(T.DETER_NO_SEQ) DETER_NO_SEQ,
  45. DECODE(MAX(T.COL_GROUP),'1','甲','2','乙','3','丙','4','丁') PRO_GROUP,
  46. DECODE(MAX(T.COL_SHIFT),'1','早班','2','中班','3','晚班') PRO_SHIFT,
  47. MAX(T.COL_TIME) RRO_TIME,
  48. MAX(T.COL_OPERATOR) COL_OPERATOR,
  49. SUM(T.COL_COUNT) PRO_NUM,
  50. ROUND((SUM(T.COL_COUNT))/1000*MAX(JG.WEIGHT_JG),3) PRO_WT,
  51. MAX(T.PRODUCER) PRODUCER,
  52. MAX(T3.PRDCR_NO) PRDCR_NO,
  53. DECODE(MAX(T3.IF_MONITOR_JG),'0','否','是') IF_MONITOR_JG,
  54. MAX(T3.MONITORDEMAND) MONITORDEMAND,
  55. MAX(T3.SINGLEWEIGHT) SINGLEWEIGHT,
  56. MAX(JG.LENGTH_JG) AIMLENGTH,
  57. MAX(JG.CHECK_J_VAL) CHECK_J_VAL,
  58. MAX(JG.DIAMETER) DIAMETER,
  59. MAX(T3.STYLE_JG) STYLE_JG,
  60. MAX(T3.SPEC_JG_DESC) SPEC_JG_DESC,
  61. MAX(T3.SPEC_JG) SPEC_JG,
  62. MAX(JG.DIAMETER_JG) OUTDIAMETER,
  63. MAX(JG.HEIGHT_JG) WALLTHICK,
  64. MAX(T3.CODE_JG) CODE_JG,
  65. MAX(T3.BL_WL_ID) BL_WL_ID,
  66. MAX(T3.MIN_D) MIN_D,
  67. MAX(T3.STEELCODE) STEELCODE,
  68. MAX(T3.STEELNAME) STEELNAME,
  69. MAX(T3.GRADECODE) GRADECODE,
  70. MAX(T3.GRADENAME) GRADENAME,
  71. MAX(T3.MODEL_CODE) MODEL_CODE,
  72. MAX(T3.MODEL_DESC) MODEL_DESC,
  73. MAX(T3.PLINE_CODE) PLINE_CODE,
  74. MAX(T3.PLINE_NAME) PLINE_NAME,
  75. MAX(T3.BELONG_CODE) BELONG_CODE,
  76. MAX(T3.BELONG_NAME) BELONG_NAME,
  77. MAX(T2.JUDGE_RESULT_CODE),
  78. DECODE(MAX(T1.JUDGE_RESULT_CODE),
  79. NULL,
  80. '未判',
  81. DECODE(MAX(T2.JUDGE_RESULT_CODE), '1', '部分已判', '已判')) JUDGE_FLAG,
  82. MAX(T1.HTT_TYPE) HTT_TYPE,
  83. MAX(T1.MIN_TEMP) MIN_TEMP,
  84. MAX(T1.HTT_TECHNOLOGY) HTT_TECHNOLOGY,
  85. MAX(T1.NOTCH_INFO) NOTCH_INFO,
  86. MAX(T1.NOTCH_LENGTH) NOTCH_LENGTH,
  87. MAX(T1.NOTCH_WIDTH) NOTCH_WIDTH,
  88. MAX(T1.NOTCH_DEPTH) NOTCH_DEPTH,
  89. MAX(T1.TEST_PRESSURE) TEST_PRESSURE,
  90. MAX(T1.HOLDTIME_TIME) HOLDTIME_TIME,
  91. MAX(T1.TEST_PRESSURE_Y) TEST_PRESSURE_Y,
  92. MAX(T1.MCH_WATERGAGE_RESULT) MCH_WATERGAGE_RESULT,
  93. MAX(T1.MCH_PATH_RESULT) MCH_PATH_RESULT,
  94. MAX(T1.MCH_CHAMFERING_RESULT) MCH_CHAMFERING_RESULT,
  95. MAX(T1.MCH_TWISTINGLY_RESULT) MCH_TWISTINGLY_RESULT,
  96. MAX(T1.MCH_DIMENSIONS_RESULT) MCH_DIMENSIONS_RESULT,
  97. MAX(T1.MCH_VISUAL_RESULT) MCH_VISUAL_RESULT,
  98. MAX(T1.MCH_THREAD_INSPECTION_RESULT) MCH_THREAD_INSPECTION_RESULT,
  99. MAX(T1.MCH_REMANENCE_RESULT) MCH_REMANENCE_RESULT,
  100. MAX(T1.MCH_RADIOACTIVITY_RESULT) MCH_RADIOACTIVITY_RESULT,
  101. MAX(T1.MCH_BEVEL_RESULT) MCH_BEVEL_RESULT,
  102. MAX(T1.ANGLE_VAL) ANGLE_VAL,
  103. MAX(T1.EDGE_VAL) EDGE_VAL,
  104. MAX(T1.DRIFT_MODEL_MIN) DRIFT_MODEL_MIN,
  105. MAX(T1.MEASURED_END_PART) MEASURED_END_PART,
  106. MAX(T1.MEASURED_MIDDLE_PART) MEASURED_MIDDLE_PART,
  107. MAX(T1.MEASURED_TAIL_PART) MEASURED_TAIL_PART,
  108. MAX(T1.DETECT_RESULT_CODE) DETECT_RESULT_CODE,
  109. MAX(T1.TESTING_STANDAR) TESTING_STANDAR,
  110. MAX(T1.TESTING_GRADE) TESTING_GRADE,
  111. MAX(T1.TESTING_TYPE) TESTING_TYPE,
  112. MAX(T1.APPLY_TIME) APPLY_TIME,
  113. MAX(T3.PLAN_BL_NUM) PLAN_BL_NUM,
  114. MAX(T3.PLAN_BL_WT) PLAN_BL_WT,
  115. MAX(T3.REAL_BL_NUM) REAL_BL_NUM,
  116. MAX(T3.REAL_BL_WT) REAL_BL_WT,
  117. to_char(ROUND((SUM(T.COL_COUNT))/1000*MAX(JG.WEIGHT_JG)/MAX(T3.REAL_BL_WT),4) *100, 'FM99999990.99') ||'%' MATER
  118. FROM PLN_ZY_JG_MIDDLE_SP MI
  119. LEFT JOIN COUPLING_MAT_M MM
  120. ON MM.MAT_NO = MI.MAT_NO AND MM.WO_ID = MI.WO_ID
  121. LEFT JOIN COUPLING_MAT_BACKUP BA
  122. ON BA.MAT_NO = MI.MAT_NO AND BA.WO_ID = MI.WO_ID,
  123. PLN_ZY_JG_WORKBILL t3,COM_MSC_JG JG,COUPLING_PHOSPHATE_RESULT T
  124. LEFT JOIN (SELECT MAX(JUDGE_RESULT_CODE) JUDGE_RESULT_CODE,
  125. MAX(T1.HTT_TYPE) HTT_TYPE,
  126. MAX(T1.MIN_TEMP) MIN_TEMP,
  127. MAX(T1.HTT_TECHNOLOGY) HTT_TECHNOLOGY,
  128. MAX(T1.NOTCH_INFO) NOTCH_INFO,
  129. MAX(T1.NOTCH_LENGTH) NOTCH_LENGTH,
  130. MAX(T1.NOTCH_WIDTH) NOTCH_WIDTH,
  131. MAX(T1.NOTCH_DEPTH) NOTCH_DEPTH,
  132. MAX(T1.TEST_PRESSURE) TEST_PRESSURE,
  133. MAX(T1.HOLDTIME_TIME) HOLDTIME_TIME,
  134. MAX(T1.TEST_PRESSURE_Y) TEST_PRESSURE_Y,
  135. MAX(T1.MCH_WATERGAGE_RESULT) MCH_WATERGAGE_RESULT,
  136. MAX(T1.MCH_PATH_RESULT) MCH_PATH_RESULT,
  137. MAX(T1.MCH_CHAMFERING_RESULT) MCH_CHAMFERING_RESULT,
  138. MAX(T1.MCH_TWISTINGLY_RESULT) MCH_TWISTINGLY_RESULT,
  139. MAX(T1.MCH_DIMENSIONS_RESULT) MCH_DIMENSIONS_RESULT,
  140. MAX(T1.MCH_VISUAL_RESULT) MCH_VISUAL_RESULT,
  141. MAX(T1.MCH_THREAD_INSPECTION_RESULT) MCH_THREAD_INSPECTION_RESULT,
  142. MAX(T1.MCH_REMANENCE_RESULT) MCH_REMANENCE_RESULT,
  143. MAX(T1.MCH_RADIOACTIVITY_RESULT) MCH_RADIOACTIVITY_RESULT,
  144. MAX(T1.MCH_BEVEL_RESULT) MCH_BEVEL_RESULT,
  145. MAX(T1.ANGLE_VAL) ANGLE_VAL,
  146. MAX(T1.EDGE_VAL) EDGE_VAL,
  147. MAX(T1.DRIFT_MODEL_MIN) DRIFT_MODEL_MIN,
  148. MAX(T1.MEASURED_END_PART) MEASURED_END_PART,
  149. MAX(T1.MEASURED_MIDDLE_PART) MEASURED_MIDDLE_PART,
  150. MAX(T1.MEASURED_TAIL_PART) MEASURED_TAIL_PART,
  151. MAX(T1.TESTING_GRADE) TESTING_GRADE,
  152. MAX(T1.TESTING_TYPE) TESTING_TYPE,
  153. MAX(T1.APPLY_TIME) APPLY_TIME,
  154. MAX(T1.TESTING_STANDAR) TESTING_STANDAR,
  155. MAX(DECODE(T1.DETECT_RESULT_CODE,
  156. '40740401',
  157. '合格',
  158. '40740402',
  159. '不合格')) DETECT_RESULT_CODE,
  160. JUGDE_APPLY_CODE
  161. FROM QCM_ZG_JUGDE_APPLY T1
  162. GROUP BY JUGDE_APPLY_CODE) t1
  163. ON T.DETER_NO = T1.JUGDE_APPLY_CODE
  164. LEFT JOIN (SELECT MIN(nvl(JUDGE_RESULT_CODE, '1')) JUDGE_RESULT_CODE,
  165. JUGDE_APPLY_CODE
  166. FROM QCM_ZG_JUGDE_APPLY T1
  167. GROUP BY JUGDE_APPLY_CODE) t2
  168. ON T.DETER_NO = T2.JUGDE_APPLY_CODE
  169. WHERE 1 = 1 and t.WO_ID = t3.WO_ID AND T3.CODE_JG = JG.CODE_JG and MI.WO_ID = T.WO_ID
  170. AND MI.CREATE_TIME =
  171. (SELECT MIN(E.CREATE_TIME)
  172. FROM PLN_ZY_JG_MIDDLE_SP E
  173. LEFT JOIN COUPLING_MAT_M MM
  174. ON MM.MAT_NO = E.MAT_NO
  175. AND MM.WO_ID = E.WO_ID
  176. LEFT JOIN COUPLING_MAT_BACKUP MB
  177. ON MB.MAT_NO = E.MAT_NO
  178. AND MB.WO_ID = E.WO_ID
  179. where e.WO_ID = T.WO_ID
  180. AND E.PLINE_CODE = T.PLINE_CODE)
  181. AND ((MM.MAT_NO IS NOT NULL AND MM.QCM_STAUS IN ('00','10')) OR (BA.MAT_NO IS NOT NULL AND BA.QCM_STAUS IN ('00','10')))
  182. #WO_ID#
  183. #INSTOCK_TIME#
  184. #JUDGE_STOVE_NO#
  185. #JUGDE_APPLY_CODE#
  186. #JUDGE_RESULT_CODE#
  187. #BELONG_CODE#
  188. #GROUP_BY#
  189. ]]>
  190. </query>
  191. <query id = "FrmCouplingApplPh.QueryQcmAddAsk" desc = "查询合同附加要求信息 (QCM_ADD_ASK)">
  192. <![CDATA[
  193. select t.* from QCM_ADD_ASK t WHERE T.JUGDE_APPLY_CODE = ? AND T.JUDGE_STOVE_NO = ?
  194. ]]>
  195. </query>
  196. <query id = "FrmCouplingApplPh.doQueryJgWt" desc = "查询接箍单个重(COM_MSC_JG)">
  197. <![CDATA[
  198. select t.* from COM_MSC_JG t WHERE T.CODE_JG = ?
  199. ]]>
  200. </query>
  201. <query id = "FrmCouplingApplPh.QueryQcmAddAsk2" desc = "查询合同附加要求信息 (CRAFT_ORD_DESIGN_ADD_ASK)">
  202. <![CDATA[
  203. select t.DESGIN_KEY,
  204. T.ASK_ITME,
  205. T.ASK_ITME_DESC,
  206. T.ASK_SUB_ITME,
  207. T.ASK_SUB_ITME_DESC,
  208. T.ASK_SUB_ITME_VAL,
  209. T.ASK_SUB_ITME_VAL_DESC
  210. from CRAFT_ORD_DESIGN_ADD_ASK t
  211. WHERE T.DESGIN_KEY =
  212. (SELECT C.DESGIN_KEY
  213. FROM SLM_ORDER_HEAD A, SLM_ORDER_LINE B, CRAFT_ORD_DESIGN C
  214. WHERE A.ORD_PK = B.ORD_PK
  215. AND C.ORD_LN_PK = B.ORD_LN_PK
  216. AND C.VALIDFLAG = '1'
  217. AND A.ORDER_NO || '/' || B.ORDER_SEQ = ?)
  218. ]]>
  219. </query>
  220. <query id = "FrmCouplingApplPh.QueryZgJugdeApply" desc = "查询送判数据">
  221. <![CDATA[
  222. select t.*
  223. from QCM_ZG_JUGDE_APPLY t
  224. WHERE 1=1
  225. AND T.PROCESS_CODE = 'H'
  226. ]]>
  227. </query>
  228. <query id = "FrmCouplingApplPh.insertQcmAddAsk" desc = "新增合同附加要求信息 (QCM_ADD_ASK)">
  229. <![CDATA[
  230. INSERT INTO QCM_ADD_ASK(
  231. JUGDE_APPLY_CODE,
  232. JUDGE_STOVE_NO,
  233. DESGIN_KEY,
  234. ASK_ITME,
  235. ASK_ITME_DESC,
  236. ASK_SUB_ITME,
  237. ASK_SUB_ITME_DESC,
  238. ASK_SUB_ITME_VAL,
  239. ASK_SUB_ITME_VAL_DESC,
  240. ASK_IS_COMFRIM,
  241. ASK_VAL_DESC,
  242. COMFRIM_NAME,
  243. COMFRIM_TIME)
  244. VALUES(
  245. '#JUGDE_APPLY_CODE#',
  246. '#JUDGE_STOVE_NO#',
  247. '#DESGIN_KEY#',
  248. '#ASK_ITME#',
  249. '#ASK_ITME_DESC#',
  250. '#ASK_SUB_ITME#',
  251. '#ASK_SUB_ITME_DESC#',
  252. '#ASK_SUB_ITME_VAL#',
  253. '#ASK_SUB_ITME_VAL_DESC#',
  254. '#ASK_IS_COMFRIM#',
  255. '#ASK_VAL_DESC#',
  256. '#COMFRIM_NAME#',
  257. SYSDATE)
  258. ]]>
  259. </query>
  260. <query id = "FrmCouplingApplPh.doUpdateJgWt" desc = "修改单重 (COM_MSC_JG)">
  261. <![CDATA[
  262. UPDATE COM_MSC_JG T
  263. SET T.WEIGHT_JG = '#WEIGHT_JG#'
  264. WHERE T.CODE_JG = '#CODE_JG#'
  265. ]]>
  266. </query>
  267. <query id = "FrmCouplingApplPh.doUpdateJgCouplingWt" desc = "修改单重 (COM_MSC_JG)">
  268. <![CDATA[
  269. UPDATE COUPLING_MAT_M T
  270. SET T.SINGLEWEIGHT = '#WEIGHT_JG#',
  271. T.PRO_WT = TO_NUMBER(T.PRO_NUM)*TO_NUMBER('#WEIGHT_JG#')/1000
  272. WHERE T.CODE_JG = '#CODE_JG#' AND T.DETER_NO IS NULL
  273. ]]>
  274. </query>
  275. <query id = "FrmCouplingApplPh.doQueryJudgeBath" desc = "查询详细炉批信息">
  276. SELECT
  277. T.WO_ID,
  278. T.JUDGE_STOVE_NO,
  279. t.DETER_NO,
  280. T.BATCH_NO,
  281. T1.ORDER_NO,
  282. T1.ORDER_SEQ,
  283. T1.ORDER_SEQ_NO,
  284. T1.CRAFT_SEQ_ORD CRAFT_SEQ,
  285. T1.CRAFT_FILE_NO_ORD CRAFT_FILE_NO,
  286. DECODE(MAX(T.LOCK_LIKU),'0','正常','1','利库') LOCK_LIKU,
  287. MAX(T.JUDGE_STD_NAME) JUDGE_STD_NAME,
  288. MAX(T.SOURE_CODE) SOURE_CODE,
  289. MAX(T.SOURE_NAME) SOURE_NAME,
  290. MAX(T.MAT_ORIGIN_CODE) MAT_ORIGIN_CODE,
  291. MAX(T.MAT_ORIGIN_NAME) MAT_ORIGIN_NAME,
  292. MAX(T.FINAL_USER_DESC) FINAL_USER_DESC,
  293. max(T.DETER_RESULTS) DETER_RESULTS,
  294. decode(MAX(t.DETER_STATUS),'0','未判定','1','申请判定','2','已判定') DETER_STATUS,
  295. DECODE(MAX(T.MNG_LOCK_FLAG),'0','未封锁','1','管理封锁') MNG_LOCK_FLAG,
  296. DECODE(MAX(T.LOCK_FLAG),'0','未封锁','1','质量封锁') LOCK_FLAG,
  297. MAX(T.CODE_JG_BL) CODE_JG_BL,
  298. DECODE(MAX(T.COAT_TYPE),'0','无','1','镀铜','2','磷化','3','镀铜及磷化') COAT_TYPE,
  299. MAX(T.DEMAND_COPPER) DEMAND_COPPER,
  300. MAX(T.DEMAND_BONDERIZING) DEMAND_BONDERIZING,
  301. MAX(T.DEMAND_BLAST) DEMAND_BLAST,
  302. MAX(T.DEMAND_DETECTION) DEMAND_DETECTION,
  303. MAX(T.MEMO) MEMO,
  304. MAX(T.BL_WL_DESC) BL_WL_DESC,
  305. MAX(T.F_IN_TIME) F_IN_TIME,
  306. MAX(T.UPDATE_NAME) UPDATE_NAME,
  307. MAX(T.UPDATE_TIME) UPDATE_TIME,
  308. MAX(T.CREATE_TIME) CREATE_TIME,
  309. MAX(T.CREATE_NAME) CREATE_NAME,
  310. DECODE(MAX(T.PRO_GROUP),'1','甲','2','乙','3','丙','4','丁') PRO_GROUP,
  311. DECODE(MAX(T.PRO_SHIFT),'1','早班','2','中班','3','晚班') PRO_SHIFT,
  312. MAX(T.RRO_TIME) RRO_TIME,
  313. MAX(T.COL_OPERATOR) COL_OPERATOR,
  314. SUM(T.PRO_NUM) PRO_NUM,
  315. ROUND(SUM(T.PRO_WT),3) PRO_WT,
  316. MAX(T.PRODUCER) PRODUCER,
  317. MAX(T.PRDCR_NO) PRDCR_NO,
  318. DECODE(MAX(T.IF_MONITOR_JG),'0','否','是') IF_MONITOR_JG,
  319. MAX(T.MONITORDEMAND) MONITORDEMAND,
  320. MAX(T.SINGLEWEIGHT) SINGLEWEIGHT,
  321. MAX(T.AIMLENGTH) AIMLENGTH,
  322. MAX(T.CHECK_J_VAL) CHECK_J_VAL,
  323. MAX(T.DIAMETER) DIAMETER,
  324. MAX(T.STYLE_JG) STYLE_JG,
  325. MAX(T.SPEC_JG_DESC) SPEC_JG_DESC,
  326. MAX(T.SPEC_JG) SPEC_JG,
  327. MAX(T.OUTDIAMETER) OUTDIAMETER,
  328. MAX(T.WALLTHICK) WALLTHICK,
  329. MAX(T.CODE_JG) CODE_JG,
  330. MAX(T.BL_WL_ID) BL_WL_ID,
  331. MAX(T.MIN_D) MIN_D,
  332. MAX(T.STEELCODE) STEELCODE,
  333. MAX(T.STEELNAME) STEELNAME,
  334. MAX(T.GRADECODE) GRADECODE,
  335. MAX(T.GRADENAME) GRADENAME,
  336. MAX(T.MODEL_CODE) MODEL_CODE,
  337. MAX(T.MODEL_DESC) MODEL_DESC,
  338. MAX(T.PLINE_CODE) PLINE_CODE,
  339. MAX(T.PLINE_NAME) PLINE_NAME,
  340. MAX(T.BELONG_CODE) BELONG_CODE,
  341. MAX(T.BELONG_NAME) BELONG_NAME,
  342. T.DETER_NO_SEQ,
  343. MAX(T.MAT_NO) MAT_NO
  344. FROM COUPLING_MAT_M T,PLN_ZY_JG_MIDDLE T1
  345. WHERE 1=1 AND T.WO_ID = T1.WO_ID AND T.MAT_NO = T1.MAT_NO AND T.QCM_STAUS = '00'
  346. #WO_ID#
  347. #JUDGE_STOVE_NO#
  348. #JUGDE_APPLY_CODE#
  349. #JUGDE_APPLY_CODE2#
  350. #GROUP_BY#
  351. </query>
  352. <query id = "FrmCouplingApplPh.doQueryHttData" desc = "查询热处理槽长槽宽槽深">
  353. SELECT MAX(T.NOTCH_LENGTH) NOTCH_LENGTH, MAX(T.NOTCH_WIDTH) NOTCH_WIDTH, MAX(T.NOTCH_DEPTH) NOTCH_DEPTH
  354. FROM HTT_CRACK_DETECTION_ET T
  355. WHERE 1 = 1
  356. </query>
  357. <query id = "FrmCouplingApplPh.updateProWgt" desc = "回报过磅量">
  358. UPDATE COUPLING_MAT_M T SET T.PRO_WT = ? WHERE T.MAT_NO = ? AND T.JUDGE_STOVE_NO = ? AND T.BELONG_CODE = ? AND T.BATCH_NO = ?
  359. </query>
  360. <query id = "FrmCouplingApplPh.selectCount" desc = "查询该炉总支数">
  361. SELECT COUNT(*) ACOUNT
  362. FROM COUPLING_MAT_M T
  363. WHERE T.JUDGE_STOVE_NO = ?
  364. AND T.BELONG_CODE = ?
  365. AND T.BATCH_NO = ?
  366. </query>
  367. <query id = "FrmCouplingApplPh.doQueryJudgeBathCount" desc = "查询详细炉批信息">
  368. SELECT
  369. COUNT(*) COUNT
  370. FROM COUPLING_MAT_M T
  371. WHERE T.WO_ID = ?
  372. AND T.JUDGE_STOVE_NO = ?
  373. </query>
  374. <query id = "FrmCouplingApplPh.doQueryWt" desc = "查询回磅重量">
  375. SELECT NVL(SUM(T.PONDER_GROSS_WT),0) PONDER_GROSS_WT FROM MAT_BC_M T WHERE 1 = 1 AND T.QCM_STAUS = '00' AND T.JUGDE_APPLY_CODE IS NULL
  376. </query>
  377. <query id = "FrmCouplingApplPh.doQueryQcmApply" desc = "查询判定表热处理状态">
  378. SELECT T.HTT_TYPE, T.MIN_TEMP, T.HTT_TECHNOLOGY,T.NOTCH_INFO,T.NOTCH_LENGTH,T.NOTCH_WIDTH,T.NOTCH_DEPTH FROM QCM_ZG_JUGDE_APPLY T WHERE 1 = 1
  379. </query>
  380. <query id = "FrmCouplingApplPh.doQueryProcess" desc = "查询镦拔扩二级工序">
  381. SELECT T.PROCESS_CODE_C
  382. FROM PLN_ZY_DBK_M T
  383. WHERE 1=1
  384. </query>
  385. <query id = "FrmCouplingApplPh.getQueryProcessRcl" desc = "查询热处理二级工序">
  386. SELECT T.PROCESS_CODE_C
  387. FROM PLN_ZY_RCL_M T
  388. WHERE 1=1
  389. </query>
  390. <query id = "FrmCouplingApplPh.getQueryProcessJgx" desc = "查询加工线二级工序">
  391. SELECT T.PROCESS_CODE_C
  392. FROM PLN_ZY_JGX_M T
  393. WHERE 1=1
  394. </query>
  395. <query id = "FrmCouplingApplPh.doQueryProcessDesc" desc = "查询镦拔扩二级工序">
  396. SELECT T.PROCESS_CODE_C
  397. FROM PLN_ZY_DBK_M T
  398. WHERE 1=1
  399. </query>
  400. <query id = "FrmCouplingApplPh.doQueryProcessRclDesc" desc = "查询热处理二级工序">
  401. SELECT T.PROCESS_CODE_C
  402. FROM PLN_ZY_RCL_M T
  403. WHERE 1=1
  404. </query>
  405. <query id = "FrmCouplingApplPh.selectMatNo" desc = "查询所有材料号">
  406. SELECT T.MAT_NO
  407. FROM COUPLING_MAT_M T
  408. WHERE T.JUDGE_STOVE_NO = ?
  409. AND T.BELONG_CODE = ?
  410. AND T.BATCH_NO = ?
  411. </query>
  412. <query id = "FrmCouplingApplPh.doQueryStorage" desc = "查询存储位置">
  413. SELECT T1.STORAGE_NAME
  414. FROM YDM_BC_BUTTRESS T,YDM_BS_STORAGE T1
  415. WHERE 1 = 1 AND T.STORAGE_NO = T1.STORAGE_NO
  416. </query>
  417. <query id = "FrmCouplingApplPh.doQueryBsStorage" desc = "查询存储">
  418. SELECT T.STORAGE_NAME
  419. FROM YDM_BS_STORAGE T
  420. WHERE 1 = 1
  421. </query>
  422. <query id = "FrmCouplingApplPh.doQueryTestingGrade" desc = "根据快速检索码查基础信息">
  423. SELECT T.BASENAME,T.BASECODE FROM COM_BASE_INFO T WHERE T.SORTCODE = ?
  424. </query>
  425. <query id = "FrmCouplingApplPh.jugdeApplyNo" desc = "申请判定单号">
  426. SELECT '#PLINE_CODE#'||'801401' || TO_CHAR(SYSDATE, 'YYYYMMDD') ||
  427. LPAD(NVL(MAX(SUBSTR(T.JUGDE_APPLY_CODE, 19,5)), 0) + 1, 5, 0)||'1' JUGDE_APPLY_CODE
  428. FROM QCM_ZG_JUGDE_APPLY T
  429. WHERE TRUNC(T.APPLY_TIME) = TRUNC(SYSDATE)
  430. AND T.IS_ALL_SCRAP != '3' AND T.IS_ALL_SCRAP != '4' AND T.JUGDE_APPLY_CODE LIKE '#PLINE_CODE#'||'801401' || '%'
  431. </query>
  432. <query id = "FrmCouplingApplPh.getQueryPlnRclM" desc = "查询热处理是否下发">
  433. SELECT NVL(COUNT(*),0) COUNT FROM PLN_ZY_RCL_M WHERE PLANSTATUS NOT IN ('00','10')
  434. </query>
  435. <query id = "FrmCouplingApplPh.getQueryPlnJgx" desc = "查询加工线是否下发">
  436. SELECT NVL(COUNT(*),0) COUNT FROM PLN_ZY_JGX_M WHERE PLANSTATUS NOT IN ('00','10')
  437. </query>
  438. <query id = "FrmCouplingApplPh.getQueryPlnJg" desc = "查询接箍是否下发">
  439. SELECT NVL(COUNT(*),0) COUNT FROM PLN_ZY_JG_M WHERE PLANSTATUS NOT IN ('00','10')
  440. </query>
  441. <query id = "FrmCouplingApplPh.SelectJudegNo" desc = "查询最大序号">
  442. SELECT T.JUGDE_APPLY_CODE
  443. FROM QCM_ZG_JUGDE_APPLY T
  444. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  445. AND T.PROCESS_CODE = 'H'
  446. AND T.IS_FLAG = '0'
  447. AND T.IS_ALL_SCRAP = '0'
  448. GROUP BY T.JUGDE_APPLY_CODE
  449. </query>
  450. <query id = "FrmCouplingApplPh.SelectJudegNoSequenNo" desc = "查询申请判定顺序号">
  451. SELECT NVL(MAX(T.JUGDE_APPLY_SEQUENO),0)+1 JUGDE_APPLY_SEQUENO
  452. FROM QCM_ZG_JUGDE_APPLY T
  453. WHERE T.JUGDE_APPLY_CODE = ?
  454. </query>
  455. <query id = "FrmCouplingApplPh.SelectFaceResultPath" desc = "查询表检报告路径">
  456. SELECT S.FACE_RESULT_PATH,S.HEAT_PLAN_NO
  457. FROM VRP_COM_INFO S
  458. WHERE S.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
  459. AND S.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  460. AND S.PLINE_CODE = '#PLINE_CODE#'
  461. AND S.STATION_CODE IN('650106','650404','650504','650604','650704')
  462. </query>
  463. <query id = "FrmCouplingApplPh.SelectDeteceResultPath" desc = "查询探伤报告路径">
  464. SELECT MIN(T.REPORT_PATH) REPORT_PATH
  465. FROM HTT_CRACK_DETECTION_PARA T
  466. WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
  467. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  468. AND T.batch_no = TRIM('#BATCH_NO#')
  469. AND T.REPORT_PATH IS NOT NULL
  470. </query>
  471. <query id = "FrmCouplingApplPh.QueryCode" desc = "查询申请判定数据刷新">
  472. SELECT SUM(COUNT) COUNT FROM
  473. (SELECT SUM(T.COL_COUNT) COUNT
  474. FROM coupling_phosphate_result T
  475. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  476. AND T.WO_ID = '#WO_ID#'
  477. AND T.BATCH_NO = '#BATCH_NO#'
  478. AND T.PLINE_CODE = '#PLINE_CODE#'
  479. AND T.DETER_NO IS NULL
  480. )
  481. </query>
  482. <query id = "FrmCouplingApplPh.QueryDeterNo" desc = "查询申请判定数据刷新">
  483. <![CDATA[
  484. SELECT COUNT(*) DETER FROM QCM_ZG_JUGDE_APPLY T WHERE T.IS_ALL_SCRAP <> '6' AND T.PRO_ORDER_ID = '#WO_ID#'
  485. ]]>
  486. </query>
  487. <query id = "FrmCouplingApplPh.SelectLiku" desc = "查询利库标志">
  488. SELECT T.LOCK_LIKU FROM COUPLING_MAT_M T WHERE T.WO_ID = '#WO_ID#'
  489. UNION ALL
  490. SELECT T.LOCK_LIKU FROM COUPLING_MAT_BACKUP T WHERE T.WO_ID = '#WO_ID#'
  491. </query>
  492. <query id = "FrmCouplingApplPh.SelectNodeFlagVrp" desc = "查询结炉状态">
  493. SELECT T.*
  494. FROM PLN_ZY_JG_WORKBILL T
  495. WHERE T.WO_ID = '#WO_ID#'
  496. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  497. AND T.BATCH_NO = '#BATCH_NO#'
  498. </query>
  499. <query id = "FrmCouplingApplPh.SelectNodePortEntity" desc = "查询管号队列检验编号">
  500. SELECT T.CHECK_NO
  501. FROM PORT_htt_BATCH_SAMPLE_RESULT T
  502. WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
  503. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  504. AND T.PHY_BATCH_NO = '#BATCH_NO#'
  505. AND T.IS_SAMPLE_PIPE = '1'
  506. GROUP BY T.CHECK_NO
  507. </query>
  508. <query id = "FrmCouplingApplPh.QueryVrpPortFailPiece" desc = "查询各实绩废品和">
  509. select NVL(SUM(T.ACT_COUNT), 0) ACT_COUNT
  510. from PORT_HTT_BATCH_SAMPLE_RESULT t
  511. WHERE T.HEAT_PLAN_NO = ?
  512. AND T.JUDGE_STOVE_NO = ?
  513. AND T.PROCESS_SEQ = ?
  514. AND T.MAT_STATUS = '10'
  515. </query>
  516. <query id = "FrmCouplingApplPh.insertJugdeApply" desc = "插入申请判定表">
  517. INSERT INTO QCM_ZG_JUGDE_APPLY
  518. (JUGDE_APPLY_CODE,
  519. JUDGE_STOVE_NO,
  520. BATCH_NO,
  521. BATCH_GROUD_NO,
  522. PROCESS_CODE,
  523. PLINE_CODE,
  524. ACT_COUNT,
  525. ACT_WEIGHT,
  526. ACT_THEORY_WEIGHT,
  527. PRO_ORDER_ID,
  528. FACE_RESULT_PATH,
  529. SPEC_RESULT_PATH,
  530. CHEM_RESULT_PATH,
  531. PHY_RESULT_PATH,
  532. DETECT_RESULT_PATH,
  533. WPRESSURE_RESULT_PATH,
  534. PROCESS_RESULT_PATH,
  535. VALIDFLAG,
  536. APPLY_NAME,
  537. APPLY_TIME,
  538. MEMO,
  539. QUALITY_GROUP,
  540. MATERIAL_NO,
  541. MATERIAL_NAME,
  542. PRODUCCODE,
  543. PRODUCNAME,
  544. STEELCODE,
  545. STEELNAME,
  546. GRADECODE,
  547. GRADENAME,
  548. SPEC_CODE,
  549. SPEC_NAME,
  550. MODEL_CODE,
  551. MODEL_DESC,
  552. STD_CODE,
  553. STD_NAME,
  554. STD_STYLE,
  555. STD_STYLE_DESC,
  556. CRAF_NO,
  557. LOT_NO,
  558. PLINE_NAME,
  559. PRO_ORDER_NO,
  560. MAT_GOWHERE_CODE,
  561. MAT_GOWHERE_NAME,
  562. ACT_DIMATER,
  563. ACT_HEIGHT,
  564. ACT_LEN_MIN,
  565. ACT_LEN_MAX,
  566. ORD_LN_DLY_PK,
  567. APPLY_FLAG,
  568. INSTOCK_FLAG,
  569. BELONG_CODE,
  570. BELONG_NAME,
  571. ISENDGX,
  572. ACT_LEN,
  573. BELONG_CODE_JUGDE,
  574. BELONG_NAME_JUGDE,
  575. GX_PLAN_NO,
  576. BAL_YEAR_MONTH,
  577. STOVE_NO,
  578. STEEL_STANDRAD,
  579. PRO_PLAN_ID_NEXT,
  580. GX_PLAN_NO_NEXT,
  581. LK_FLAG,
  582. JUGDE_APPLY_SEQUENO,
  583. TARGET,
  584. CRAFT_SEQ,
  585. INDEX_SEQ,
  586. CIC,
  587. PIC,
  588. SIC,
  589. DIC,
  590. WIC,
  591. GIC,
  592. FACE_RESULT_CODE,
  593. SPEC_RESULT_CODE,
  594. CHEM_RESULT_CODE,
  595. PHY_RESULT_CODE,
  596. DETECT_RESULT_CODE,
  597. WPRESSURE_RESULT_CODE,
  598. PROCESS_RESULT_CODE,
  599. CHECK_NO,
  600. HEAT_PLAN_NO_NEXT,
  601. HEAT_PLAN_NO,
  602. NEXT_PROCESS_CDOE,
  603. DELIVERY_STATE_CODE,
  604. DELIVERY_STATE_NAME,
  605. LOAD_JUDGE_STOVE_NO,
  606. ZP_M_LH,
  607. ZP_COLL,
  608. HTT_TYPE,
  609. MIN_TEMP,
  610. HTT_TECHNOLOGY,
  611. NOTCH_INFO,
  612. NOTCH_LENGTH,
  613. NOTCH_WIDTH,
  614. NOTCH_DEPTH,
  615. LOT_NO_GROUP,
  616. TESTING_GRADE,
  617. TESTING_TYPE,
  618. TEST_PRESSURE,
  619. HOLDTIME_TIME,
  620. TEST_PRESSURE_Y,
  621. MCH_WATERGAGE_RESULT,
  622. MCH_PATH_RESULT,
  623. MCH_CHAMFERING_RESULT,
  624. MCH_TWISTINGLY_RESULT,
  625. MCH_DIMENSIONS_RESULT,
  626. MCH_VISUAL_RESULT,
  627. MCH_THREAD_INSPECTION_RESULT,
  628. MCH_REMANENCE_RESULT,
  629. MCH_RADIOACTIVITY_RESULT,
  630. MCH_BEVEL_RESULT,
  631. ANGLE_VAL,
  632. EDGE_VAL,
  633. INPUT_WEIGHT,
  634. INPUT_COUNT,
  635. OUTPUT_WEIGHT,
  636. OUTPUT_COUNT,
  637. TESTING_STANDAR,
  638. DRIFT_MODEL_MIN,
  639. MEASURED_END_PART,
  640. MEASURED_MIDDLE_PART,
  641. MEASURED_TAIL_PART,
  642. INSTANCY_FLAG,
  643. SUPPLY_UNIT,
  644. SUPPLY_UNIT_DESC)
  645. VALUES
  646. ('#JUGDE_APPLY_CODE#',
  647. '#JUDGE_STOVE_NO#',
  648. '#BATCH_NO#',
  649. '#BATCH_GROUD_NO#',
  650. '#PROCESS_CODE#',
  651. '#PLINE_CODE#',
  652. '#ACT_COUNT#',
  653. '#ACT_WEIGHT#',
  654. '#ACT_THEORY_WEIGHT#',
  655. '#PRO_ORDER_ID#',
  656. '#FACE_RESULT_PATH#',
  657. '#SPEC_RESULT_PATH#',
  658. '#CHEM_RESULT_PATH#',
  659. '#PHY_RESULT_PATH#',
  660. '#DETECT_RESULT_PATH#',
  661. '#WPRESSURE_RESULT_PATH#',
  662. '#PROCESS_RESULT_PATH#',
  663. '#VALIDFLAG#',
  664. '#APPLY_NAME#',
  665. TO_DATE('#APPLY_TIME#', 'YYYY-MM-DD HH24:MI:SS'),
  666. '#MEMO#',
  667. '#QUALITY_GROUP#',
  668. '#MATERIAL_NO#',
  669. '#MATERIAL_NAME#',
  670. '#PRODUCCODE#',
  671. '#PRODUCNAME#',
  672. '#STEELCODE#',
  673. '#STEELNAME#',
  674. '#GRADECODE#',
  675. '#GRADENAME#',
  676. '#SPEC_CODE#',
  677. '#SPEC_NAME#',
  678. '#MODEL_CODE#',
  679. '#MODEL_DESC#',
  680. '#STD_CODE#',
  681. '#STD_NAME#',
  682. '#STD_STYLE#',
  683. '#STD_STYLE_DESC#',
  684. NVL('#CRAF_NO#', '\'),
  685. '#LOT_NO#',
  686. '#PLINE_NAME#',
  687. '#PRO_ORDER_NO#',
  688. NVL('#MAT_GOWHERE_CODE#', '\'),
  689. NVL('#MAT_GOWHERE_NAME#', '\'),
  690. '#ACT_DIMATER#',
  691. '#ACT_HEIGHT#',
  692. '#ACT_LEN_MIN#',
  693. '#ACT_LEN_MAX#',
  694. '#ORD_LN_DLY_PK#',
  695. '#APPLY_FLAG#',
  696. '#INSTOCK_FLAG#',
  697. '#BELONG_CODE#',
  698. '#BELONG_NAME#',
  699. '#ISENDGX#',
  700. '#ACT_LEN#',
  701. '#BELONG_CODE_JUGDE#',
  702. '#BELONG_NAME_JUGDE#',
  703. '#GX_PLAN_NO#',
  704. '',
  705. NVL('#STOVE_NO#', ''),
  706. '#STEEL_STANDRAD#',
  707. '#PRO_PLAN_ID_NEXT#',
  708. '#GX_PLAN_NO_NEXT#',
  709. '#LK_FLAG#',
  710. '#JUGDE_APPLY_SEQUENO#',
  711. '#TARGET#',
  712. '#CRAFT_SEQ#',
  713. '#INDEX_SEQ#',
  714. '#CIC#',
  715. '#PIC#',
  716. '#SIC#',
  717. '#DIC#',
  718. '#WIC#',
  719. '#GIC#',
  720. '#FACE_RESULT_CODE#',
  721. '#SPEC_RESULT_CODE#',
  722. '#CHEM_RESULT_CODE#',
  723. '#PHY_RESULT_CODE#',
  724. '#DETECT_RESULT_CODE#',
  725. '#WPRESSURE_RESULT_CODE#',
  726. '#PROCESS_RESULT_CODE#',
  727. '#CHECK_NO#',
  728. '#HEAT_PLAN_NO_NEXT#',
  729. '#HEAT_PLAN_NO#',
  730. '#NEXT_PROCESS_CDOE#',
  731. '#DELIVERY_STATE_CODE#',
  732. '#DELIVERY_STATE_NAME#',
  733. '#LOAD_JUDGE_STOVE_NO#',
  734. '#ZP_M_LH#',
  735. '#ZP_COLL#',
  736. '#HTT_TYPE#',
  737. '#MIN_TEMP#',
  738. '#HTT_TECHNOLOGY#',
  739. '#NOTCH_INFO#',
  740. '#NOTCH_LENGTH#',
  741. '#NOTCH_WIDTH#',
  742. '#NOTCH_DEPTH#',
  743. '#LOT_NO_GROUP#',
  744. '#TESTING_GRADE#',
  745. '#TESTING_TYPE#',
  746. '#TEST_PRESSURE#',
  747. '#HOLDTIME_TIME#',
  748. '#TEST_PRESSURE_Y#',
  749. '#MCH_WATERGAGE_RESULT#',
  750. '#MCH_PATH_RESULT#',
  751. '#MCH_CHAMFERING_RESULT#',
  752. '#MCH_TWISTINGLY_RESULT#',
  753. '#MCH_DIMENSIONS_RESULT#',
  754. '#MCH_VISUAL_RESULT#',
  755. '#MCH_THREAD_INSPECTION_RESULT#',
  756. '#MCH_REMANENCE_RESULT#',
  757. '#MCH_RADIOACTIVITY_RESULT#',
  758. '#MCH_BEVEL_RESULT#',
  759. '#ANGLE_VAL#',
  760. '#EDGE_VAL#',
  761. '#INPUT_WEIGHT#',
  762. '#INPUT_COUNT#',
  763. '#OUTPUT_WEIGHT#',
  764. '#OUTPUT_COUNT#',
  765. '#TESTING_STANDAR#',
  766. '#DRIFT_MODEL_MIN#',
  767. '#MEASURED_END_PART#',
  768. '#MEASURED_MIDDLE_PART#',
  769. '#MEASURED_TAIL_PART#',
  770. '1',
  771. '120501',
  772. '天津钢管制造有限公司')
  773. </query>
  774. <query id = "FrmCouplingApplPh.updateMatBcJugdeApplyCode" desc = "修改库存申请判定单号">
  775. DECLARE
  776. BEGIN
  777. FOR MYROW IN (SELECT T.MAT_NO, T.PLINE_CODE,t.wo_id
  778. FROM COUPLING_MAT_M T
  779. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  780. AND T.BATCH_NO = '#BATCH_NO#'
  781. AND T.PLINE_CODE = '#PLINE_CODE#'
  782. AND T.WO_ID = '#PRO_ORDER_ID#'
  783. --AND T.PRO_ORDER_ID = '#PRO_ORDER_ID#'
  784. --AND T.GX_PLAN_NO = '#GX_PLAN_NO#'
  785. --AND T.QCM_STAUS = '00'
  786. AND T.DETER_NO IS NULL
  787. UNION ALL
  788. SELECT T.MAT_NO, T.PLINE_CODE,t.wo_id
  789. FROM COUPLING_MAT_BACKUP T
  790. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  791. AND T.BATCH_NO = '#BATCH_NO#'
  792. AND T.PLINE_CODE = '#PLINE_CODE#'
  793. AND T.WO_ID = '#PRO_ORDER_ID#'
  794. AND T.DETER_NO IS NULL
  795. ORDER BY MAT_NO ASC) LOOP
  796. UPDATE COUPLING_MAT_M T
  797. SET T.DETER_NO = '#JUGDE_APPLY_CODE#',
  798. T.DETER_NO_SEQ = '#JUGDE_APPLY_SEQUENO#',
  799. T.INSTANCY_FLAG = '1',
  800. T.DETER_STATUS = '1'
  801. -- T.JUGDE_APPLY_TIME = TO_DATE('#APPLY_TIME#','YYYY-MM-DD HH24:MI:SS')
  802. WHERE T.MAT_NO = MYROW.MAT_NO
  803. AND T.QCM_STAUS = '00'
  804. AND T.PLINE_CODE = MYROW.PLINE_CODE;
  805. UPDATE COUPLING_MAT_BACKUP T
  806. SET T.DETER_NO = '#JUGDE_APPLY_CODE#',
  807. T.DETER_NO_SEQ = '#JUGDE_APPLY_SEQUENO#',
  808. T.INSTANCY_FLAG = '1',
  809. T.DETER_STATUS = '1'
  810. -- T.JUGDE_APPLY_TIME = TO_DATE('#APPLY_TIME#','YYYY-MM-DD HH24:MI:SS')
  811. WHERE T.MAT_NO = MYROW.MAT_NO
  812. AND T.QCM_STAUS = '00'
  813. AND T.PLINE_CODE = MYROW.PLINE_CODE;
  814. UPDATE coupling_phosphate_result T
  815. SET T.DETER_NO = '#JUGDE_APPLY_CODE#',
  816. T.DETER_NO_SEQ = '#JUGDE_APPLY_SEQUENO#',
  817. T.DETER_STATUS = '1'
  818. WHERE T.Wo_Id = '#PRO_ORDER_ID#'
  819. AND T.PLINE_CODE = MYROW.PLINE_CODE;
  820. END LOOP;
  821. END;
  822. </query>
  823. <query id = "FrmCouplingApplPh.SelectPlineBelong" desc = "获取现有产线所属权">
  824. SELECT S.DEPARTMENT_CODE FROM COM_BASE_PLINE S WHERE S.PLINE_CODE = '#PLINE_CODE#'
  825. </query>
  826. <query id = "FrmCouplingApplPh.SelectOrderInfo" desc = "查询midd合同信息">
  827. SELECT T.ORDER_NO || '/' || T.ORDER_SEQ PRO_ORDER_NO,T.ORD_LN_DLY_PK FROM PLN_ZY_JG_MIDDLE_SP T WHERE T.WO_ID='#WO_ID#'
  828. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.BATCH_NO = '#BATCH_NO#'
  829. </query>
  830. <query id = "FrmCouplingApplPh.updateMatBcButter" desc = "修改储存库位">
  831. UPDATE YDM_BC_BUTTRESS T
  832. SET T.STORAGE_NO = (SELECT T1.STORAGE_NO FROM YDM_BS_STORAGE T1 WHERE T1.STORAGE_NAME = '#STORAGE_NAME#')
  833. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  834. AND T.BATCH_NO = '#BATCH_NO#'
  835. </query>
  836. <query id = "FrmCouplingApplPh.updatePlnZyJgMiddleWork" desc = "修改计划工单状态">
  837. UPDATE PLN_ZY_JG_WORKBILL T SET T.ZY_BILL_STATUS = '3' WHERE T.WO_ID = '#WO_ID#'
  838. </query>
  839. <query id = "FrmCouplingApplPh.updatePlnZyJgMiddleCancel" desc = "修改计划工单状态">
  840. UPDATE PLN_ZY_JG_WORKBILL T SET T.ZY_BILL_STATUS = '2' WHERE T.WO_ID = '#WO_ID#'
  841. </query>
  842. <query id = "FrmCouplingApplPh.doQueryHttType" desc = "获取热处理类型">
  843. select T.SORT_CODE
  844. from COM_BASE_PROCESS_C t
  845. WHERE T.PROCESS_CDOE_C = (select T1.PROCESS_CODE_C
  846. from PLN_ZY_RCL_M T1
  847. where 1 =1
  848. </query>
  849. <query id = "FrmCouplingApplPh.doQueryHttTemp" desc = "获取热处理温度工艺制度">
  850. SELECT
  851. case
  852. when t.LOW_TEMP is null
  853. then ''
  854. else MAX(T.LOW_TEMP) || '℃' end LHEAT_EXIT_TEMP,
  855. case
  856. when T.LHEAT_EXIT_TEMP is null and t1.HHEAT_EXIT_TEMP is not null
  857. then T1.HHEAT_EXIT_TEMP || '℃' || '×' || T1.TOTAL_TIME || 'min'
  858. when T1.HHEAT_EXIT_TEMP is null and t.LHEAT_EXIT_TEMP is not null
  859. then T.LHEAT_EXIT_TEMP || '℃' || '×' || T.TOTAL_TIME || 'min'
  860. when T.LHEAT_EXIT_TEMP is null and T1.HHEAT_EXIT_TEMP is null
  861. then ''
  862. else T1.HHEAT_EXIT_TEMP || '℃' || '×' || T1.TOTAL_TIME || 'min' || '+' ||T.LHEAT_EXIT_TEMP || '℃' || '×' || T.TOTAL_TIME || 'min' end HEAT_EXIT_TEMP,
  863. MAX(T.CREATE_TIME),MAX(T1.CREATE_TIME)
  864. FROM HTT_LHEAT_RESULT T,HTT_HHEAT_RESULT T1
  865. WHERE T.HEAT_PLAN_NO = T1.HEAT_PLAN_NO
  866. AND T.PLINE_CODE = T1.PLINE_CODE
  867. AND T1.CREATE_TIME = (SELECT MAX(T2.CREATE_TIME) FROM HTT_HHEAT_RESULT T2 WHERE #HEAT_PLAN_NO# and #PLINE_CODE#)
  868. AND #LHEAT_PLAN_NO#
  869. and #LPLINE_CODE#
  870. GROUP BY T.LHEAT_EXIT_TEMP,t1.total_time,t.total_time,t.LOW_TEMP,
  871. T1.HHEAT_EXIT_TEMP
  872. </query>
  873. <query id = "FrmCouplingApplPh.doQueryHttTempTech" desc = "获取热处理温度工艺制度">
  874. SELECT T.MIN_TEMP,T.HTT_TECHNOLOGY FROM qcm_zg_jugde_apply T WHERE 1 =1 AND #LHEAT_PLAN_NO# AND #LPLINE_CODE#
  875. </query>
  876. <query id = "FrmCouplingApplPh.SelectZgJudgeNoE" desc = "查询组炉号">
  877. SELECT T.GROUP_ID,
  878. CASE
  879. WHEN T.ZP_BATCH_NO IS NULL
  880. THEN T.ZP_JUDGE_STOVE_NO
  881. ELSE T.ZP_JUDGE_STOVE_NO || '+' || T.ZP_BATCH_NO END ZP_M_LH
  882. FROM VRP_OFFLINE_RESULT T WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#' AND T.GROUP_LOG = '1'
  883. </query>
  884. <query id = "FrmCouplingApplPh.SelectJudgeNoE" desc = "查询组炉前炉号">
  885. SELECT
  886. LISTAGG(DECODE(T.BATCH_NO,
  887. '',T.JUDGE_STOVE_NO,T.JUDGE_STOVE_NO || '+' || T.BATCH_NO), ',') WITHIN GROUP(ORDER BY T.BATCH_NO) ZP_COLL
  888. FROM VRP_GROUP_RESULT T WHERE T.GROUP_ID = ?
  889. </query>
  890. <query id = "FrmCouplingApplPh.SelectZgJudgeNoF" desc = "查询组炉号">
  891. SELECT T.GROUP_ID,
  892. CASE
  893. WHEN T.ZP_BATCH_NO IS NULL
  894. THEN T.ZP_JUDGE_STOVE_NO
  895. ELSE T.ZP_JUDGE_STOVE_NO || '+' || T.ZP_BATCH_NO END ZP_M_LH
  896. FROM HTT_OFFLINE_RESULT T WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#' AND T.GROUP_LOG = '1'
  897. </query>
  898. <query id = "FrmCouplingApplPh.SelectJudgeNoF" desc = "查询组炉前炉号">
  899. SELECT
  900. LISTAGG(DECODE(T.BATCH_NO,
  901. '',T.JUDGE_STOVE_NO,T.JUDGE_STOVE_NO || '+' || T.BATCH_NO), ',') WITHIN GROUP(ORDER BY T.BATCH_NO) ZP_COLL
  902. FROM HTT_GROUP_RESULT T WHERE T.GROUP_ID = ?
  903. </query>
  904. <query id = "FrmCouplingApplPh.SelectZgJudgeNoG" desc = "查询组炉号">
  905. SELECT T.GROUP_ID,
  906. CASE
  907. WHEN T.ZP_BATCH_NO IS NULL
  908. THEN T.ZP_JUDGE_STOVE_NO
  909. ELSE T.ZP_JUDGE_STOVE_NO || '+' || T.ZP_BATCH_NO END ZP_M_LH
  910. FROM MCH_OFFLINE_RESULT T WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#' AND T.GROUP_LOG = '1'
  911. </query>
  912. <query id = "FrmCouplingApplPh.SelectJudgeNoG" desc = "查询组炉前炉号">
  913. SELECT
  914. LISTAGG(DECODE(T.BATCH_NO,
  915. '',T.JUDGE_STOVE_NO,T.JUDGE_STOVE_NO || '+' || T.BATCH_NO), ',') WITHIN GROUP(ORDER BY T.BATCH_NO) ZP_COLL
  916. FROM MCH_GROUP_RESULT T WHERE T.GROUP_ID = ?
  917. </query>
  918. <query id = "FrmCouplingApplPh.SelectGroupResultE" desc = "查询组炉号">
  919. SELECT
  920. CASE
  921. WHEN T.ZP_BATCH_NO IS NULL
  922. THEN T.ZP_JUDGE_STOVE_NO
  923. ELSE T.ZP_JUDGE_STOVE_NO || '+' || T.ZP_BATCH_NO END ZP_M_LH,
  924. CASE
  925. WHEN T.BATCH_NO IS NULL
  926. THEN LISTAGG(T.JUDGE_STOVE_NO, ',') WITHIN GROUP(ORDER BY T.JUDGE_STOVE_NO || T.BATCH_NO)
  927. ELSE LISTAGG(T.JUDGE_STOVE_NO || '+' || T.BATCH_NO, ',') WITHIN GROUP(ORDER BY T.JUDGE_STOVE_NO || T.BATCH_NO) END ZP_COLL
  928. FROM VRP_GROUP_RESULT T
  929. WHERE T.ZP_JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  930. GROUP BY T.ZP_JUDGE_STOVE_NO, T.ZP_BATCH_NO,T.BATCH_NO
  931. </query>
  932. <query id = "FrmCouplingApplPh.SelectGroupResultF" desc = "查询组炉号">
  933. SELECT
  934. CASE
  935. WHEN T.ZP_BATCH_NO IS NULL
  936. THEN T.ZP_JUDGE_STOVE_NO
  937. ELSE T.ZP_JUDGE_STOVE_NO || '+' || T.ZP_BATCH_NO END ZP_M_LH,
  938. CASE
  939. WHEN T.BATCH_NO IS NULL
  940. THEN LISTAGG(T.JUDGE_STOVE_NO, ',') WITHIN GROUP(ORDER BY T.JUDGE_STOVE_NO || T.BATCH_NO)
  941. ELSE LISTAGG(T.JUDGE_STOVE_NO || '+' || T.BATCH_NO, ',') WITHIN GROUP(ORDER BY T.JUDGE_STOVE_NO || T.BATCH_NO) END ZP_COLL
  942. FROM HTT_GROUP_RESULT T
  943. WHERE T.ZP_JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  944. GROUP BY T.ZP_JUDGE_STOVE_NO, T.ZP_BATCH_NO,T.BATCH_NO
  945. </query>
  946. <query id = "FrmCouplingApplPh.SelectGroupResultG" desc = "查询组炉号">
  947. SELECT
  948. CASE
  949. WHEN T.ZP_BATCH_NO IS NULL
  950. THEN T.ZP_JUDGE_STOVE_NO
  951. ELSE T.ZP_JUDGE_STOVE_NO || '+' || T.ZP_BATCH_NO END ZP_M_LH,
  952. CASE
  953. WHEN T.BATCH_NO IS NULL
  954. THEN LISTAGG(T.JUDGE_STOVE_NO, ',') WITHIN GROUP(ORDER BY T.JUDGE_STOVE_NO || T.BATCH_NO)
  955. ELSE LISTAGG(T.JUDGE_STOVE_NO || '+' || T.BATCH_NO, ',') WITHIN GROUP(ORDER BY T.JUDGE_STOVE_NO || T.BATCH_NO) END ZP_COLL
  956. FROM MCH_GROUP_RESULT T
  957. WHERE T.ZP_JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  958. GROUP BY T.ZP_JUDGE_STOVE_NO, T.ZP_BATCH_NO,T.BATCH_NO
  959. </query>
  960. <query id = "FrmCouplingApplPh.SelectCraftNo" desc = "查找工艺文件号">
  961. SELECT T.CRAFT_SEQ, T.CRAFT_FILE_NO,T.INDEX_SEQ
  962. FROM PLN_ZY_JG_WORKBILL T
  963. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  964. AND T.WO_ID = '#WO_ID#'
  965. </query>
  966. <query id = "FrmCouplingApplPh.SelectDemand" desc = "查找要求">
  967. SELECT T.DEMAND_COPPER,T.DEMAND_DETECTION,T.DEMAND_BLAST,T.DEMAND_BONDERIZING FROM PLN_ZY_JG_WORKBILL T
  968. WHERE T.WO_ID = ?
  969. </query>
  970. <query id = "FrmCouplingApplPh.SelectDemandYayin" desc = "查找压印喷标">
  971. SELECT NVL(T.EMB_COUNT,0) EMB_COUNT FROM coupling_cut_result T WHERE T.WO_ID = ?
  972. </query>
  973. <query id = "FrmCouplingApplPh.SelectDemandPen" desc = "查找喷标">
  974. SELECT NVL(T.COL_COUNT,0) COL_COUNT,NVL(T.SPRAY_COUNT, 0) SPRAY_COUNT
  975. FROM COUPLING_PHOSPHATE_RESULT T
  976. WHERE T.WO_ID = ?
  977. </query>
  978. <query id = "FrmCouplingApplPh.SelectDemandTan" desc = "查找探伤">
  979. SELECT NVL(T.INSPECT_PIECES, 0) INSPECT_PIECES
  980. FROM COUPLING_INSPECTION_RESULT T
  981. WHERE T.WO_ID = ?
  982. </query>
  983. <query id = "FrmCouplingApplPh.SelectDemandSha" desc = "查找喷砂">
  984. SELECT NVL(T.SPRAY_COUNT, 0) SPRAY_COUNT
  985. FROM COUPLING_SANDBLAST_RESULT T
  986. WHERE T.WO_ID = ?
  987. </query>
  988. <query id = "FrmCouplingApplPh.SelectCraftNoRcl" desc = "查找工艺文件号">
  989. SELECT T.CRAFT_SEQ, T.CRAFT_FILE_NO,T.INDEX_SEQ
  990. FROM PLN_ZY_RCL_M T
  991. WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
  992. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  993. </query>
  994. <query id = "FrmCouplingApplPh.SelectCrackType" desc = "查找探伤类型">
  995. SELECT REPLACE(DBMS_LOB.SUBSTR(WMSYS.WM_CONCAT(DISTINCT DECODE(REPORT_NO,
  996. '4',
  997. 'ET',
  998. 'UT')),
  999. 400),
  1000. ',',
  1001. '+') TESTING_TYPE
  1002. FROM HTT_CRACK_DETECTION_PARA
  1003. WHERE HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
  1004. AND BATCH_NO = '#BATCH_NO#'
  1005. </query>
  1006. <query id = "FrmCouplingApplPh.SelectCrackGade" desc = "查找探伤类型">
  1007. SELECT REPLACE(DBMS_LOB.SUBSTR(WMSYS.WM_CONCAT(DISTINCT TESTING_GRAGE),
  1008. 400),
  1009. ',',
  1010. '+') TESTING_GRAGE
  1011. FROM (SELECT LONGITUDINAL_EXTERNAL TESTING_GRAGE
  1012. FROM HTT_CRACK_DETECTION_PARA
  1013. WHERE HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
  1014. AND BATCH_NO = '#BATCH_NO#'
  1015. AND LONGITUDINAL_EXTERNAL IS NOT NULL
  1016. AND LONGITUDINAL_EXTERNAL != '/'
  1017. UNION
  1018. SELECT ACCPETANCE_LEVEL TESTING_GRAGE
  1019. FROM HTT_CRACK_DETECTION_PARA
  1020. WHERE HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
  1021. AND BATCH_NO = '#BATCH_NO#'
  1022. AND ACCPETANCE_LEVEL IS NOT NULL
  1023. AND ACCPETANCE_LEVEL != '/')
  1024. </query>
  1025. <query id = "FrmCouplingApplPh.SelectQcmZcCheck" desc = "查找是否有重新热处理">
  1026. SELECT COUNT(*) COUNT
  1027. FROM QCM_ZC_CHECKCONSIGN T
  1028. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1029. AND T.BATCH_NO = '#BATCH_NO#'
  1030. AND T.PROCESS_CODE = 'F'
  1031. AND T.CYCLES_FLAG = '1'
  1032. </query>
  1033. <query id = "FrmCouplingApplPh.SelectCraftNoJgx" desc = "查找工艺文件号">
  1034. SELECT T.CRAFT_SEQ, T.CRAFT_FILE_NO,T.INDEX_SEQ
  1035. FROM PLN_ZY_JGX_M T
  1036. WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
  1037. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1038. </query>
  1039. <query id = "FrmCouplingApplPh.SelectDesignKey" desc = "查找designKey">
  1040. SELECT T.DESGIN_KEY
  1041. FROM CRAFT_ORD_DESIGN T
  1042. WHERE T.CRAFT_NO = ?
  1043. AND T.CRAFT_SEQ = ?
  1044. </query>
  1045. <query id = "FrmCouplingApplPh.SelectBaseCodeState" desc = "查找交货状态">
  1046. SELECT T.DELIVERY_STATE_CODE BASECODE, T.DELIVERY_STATE_NAME BASENAME
  1047. FROM QCM_ZG_JUGDE_APPLY T
  1048. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1049. AND T.BATCH_NO = '#BATCH_NO#'
  1050. AND T.PROCESS_CODE = (SELECT MAX(A.PROCESS_CODE)
  1051. FROM QCM_ZG_JUGDE_APPLY A
  1052. WHERE A.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1053. AND A.BATCH_NO = '#BATCH_NO#')
  1054. </query>
  1055. <query id = "FrmCouplingApplPh.QueryVrpPortPiece" desc = "查询各实绩废品和">
  1056. select NVL(SUM(T.ACT_COUNT), 0) ACT_COUNT
  1057. from PORT_HTT_BATCH_SAMPLE_RESULT t
  1058. WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
  1059. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1060. AND ((T.MAT_STATUS = '00' and t.instore_flag='0')
  1061. or t.mat_status = '20')
  1062. </query>
  1063. <query id = "FrmCouplingApplPh.SelectBaseCode" desc = "查找交货状态">
  1064. SELECT T.BASECODE, T.BASENAME
  1065. FROM COM_BASE_INFO T
  1066. WHERE T.BASECODE = (SELECT GET_DELIVERY_STATE(?,
  1067. ?) SORTCODE
  1068. FROM DUAL)
  1069. AND T.SORTCODE='4100'
  1070. </query>
  1071. <query id = "FrmCouplingApplPh.SelectBaseCode1" desc = "查找交货状态">
  1072. SELECT T.BASECODE, T.BASENAME
  1073. FROM COM_BASE_INFO T
  1074. WHERE T.BASECODE = (SELECT GET_SHIPPED_STATE(?,?,?) SORTCODE
  1075. FROM DUAL)
  1076. AND T.SORTCODE='4100'
  1077. </query>
  1078. <query id = "FrmCouplingApplPh.SelectOrderSlaOrg" desc= "查询合同所属部门">
  1079. SELECT S.SALE_ORG, S.SALE_ORG_DESC
  1080. FROM SLM_ORDER_HEAD S,SLM_ORDER_LINE S1,pln_zy_jg_middle T1
  1081. WHERE S.ORD_PK = S1.ORD_PK
  1082. AND S.ORDER_NO ||'/'||S1.ORDER_SEQ = t1.ORDER_NO || '/' || t1.order_seq
  1083. AND T1.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1084. AND T1.PLINE_CODE = '#PLINE_CODE#'
  1085. AND ROWNUM = 1
  1086. </query>
  1087. <query id = "FrmCouplingApplPh.SelectNextPlineBelong" desc = "查询下工序产线部门">
  1088. SELECT P.DEPARTMENT_CODE,P.DEPARTMENT_DESC
  1089. FROM (SELECT S.ORD_LN_DLY_PK, S.PLN_DIVIDE_ID
  1090. FROM PLN_ZY_DBK_M T, PLN_ORDER_DBK_S S
  1091. WHERE T.PRO_PLAN_ID = S.PRO_PLAN_ID
  1092. AND T.GX_PLAN_NO = S.GX_PLAN_NO
  1093. AND T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
  1094. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#') E,
  1095. #PLAN# F,
  1096. COM_BASE_PLINE P
  1097. WHERE E.ORD_LN_DLY_PK = F.ORD_LN_DLY_PK
  1098. AND E.PLN_DIVIDE_ID = F.PLN_DIVIDE_ID
  1099. AND F.PLINE_CODE = P.PLINE_CODE
  1100. AND ROWNUM = 1
  1101. </query>
  1102. <query id = "FrmCouplingApplPh.SelectValueFlag" desc = "查询判定状态">
  1103. SELECT T.VALIDFLAG,T.INSTOCK_FLAG
  1104. FROM QCM_ZG_JUGDE_APPLY T
  1105. WHERE T.JUGDE_APPLY_CODE = '#JUGDE_APPLY_CODE#'
  1106. AND T.JUGDE_APPLY_SEQUENO = '#JUGDE_APPLY_SEQUENO#'
  1107. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1108. AND T.BATCH_NO = '#BATCH_NO#'
  1109. AND T.BATCH_GROUD_NO = '#BATCH_GROUD_NO#'
  1110. AND T.PLINE_CODE = '#PLINE_CODE#'
  1111. AND T.IS_ALL_SCRAP = '0'
  1112. </query>
  1113. <query id = "FrmCouplingApplPh.SelectValueFlagData" desc = "查询判定状态">
  1114. SELECT T.VALIDFLAG,T.INSTOCK_FLAG
  1115. FROM QCM_ZG_JUGDE_APPLY T
  1116. WHERE T.IS_ALL_SCRAP = '0'
  1117. </query>
  1118. <query id = "FrmCouplingApplPh.deleteQcmJudgeApply" desc = "撤销申请判定">
  1119. DECLARE
  1120. V_APPLY_FLAG QCM_ZG_JUGDE_APPLY.APPLY_FLAG%TYPE := NULL;
  1121. BEGIN
  1122. SELECT T.APPLY_FLAG
  1123. INTO V_APPLY_FLAG
  1124. FROM QCM_ZG_JUGDE_APPLY T
  1125. WHERE T.JUGDE_APPLY_CODE = '#DETER_NO#'
  1126. AND T.JUGDE_APPLY_SEQUENO = '#DETER_NO_SEQ#'
  1127. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1128. AND T.BATCH_NO = '#BATCH_NO#'
  1129. AND T.BATCH_GROUD_NO = '001'
  1130. AND T.PLINE_CODE = '#PLINE_CODE#'
  1131. AND T.IS_ALL_SCRAP = '0';
  1132. FOR MYROW IN (SELECT *
  1133. FROM COUPLING_MAT_M T
  1134. WHERE T.DETER_NO = '#DETER_NO#'
  1135. AND T.DETER_NO_SEQ = '#DETER_NO_SEQ#'
  1136. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1137. AND T.BATCH_NO = '#BATCH_NO#'
  1138. AND T.PLINE_CODE = '#PLINE_CODE#'
  1139. UNION
  1140. SELECT *
  1141. FROM COUPLING_MAT_BACKUP T
  1142. WHERE T.DETER_NO = '#DETER_NO#'
  1143. AND T.DETER_NO_SEQ = '#DETER_NO_SEQ#'
  1144. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1145. AND T.BATCH_NO = '#BATCH_NO#'
  1146. AND T.PLINE_CODE = '#PLINE_CODE#') LOOP
  1147. UPDATE COUPLING_MAT_M S
  1148. SET S.DETER_NO = '', S.DETER_NO_SEQ = '', S.DETER_STATUS = '0'
  1149. WHERE S.MAT_NO = MYROW.MAT_NO
  1150. AND S.PLINE_CODE = MYROW.PLINE_CODE;
  1151. UPDATE COUPLING_MAT_BACKUP S
  1152. SET S.DETER_NO = '', S.DETER_NO_SEQ = '', S.DETER_STATUS = '0'
  1153. WHERE S.MAT_NO = MYROW.MAT_NO
  1154. AND S.PLINE_CODE = MYROW.PLINE_CODE;
  1155. UPDATE coupling_phosphate_result S
  1156. SET S.DETER_NO = '', S.DETER_NO_SEQ = '', S.DETER_STATUS = '0'
  1157. WHERE S.WO_ID = '#WO_ID#'
  1158. AND S.PLINE_CODE = MYROW.PLINE_CODE;
  1159. DELETE FROM MAT_BC_QCMTRACK S
  1160. WHERE S.MAT_NO = MYROW.MAT_NO
  1161. AND S.PROCESS_CDOE = 'H';
  1162. END LOOP;
  1163. IF (V_APPLY_FLAG = '1') THEN
  1164. UPDATE QCM_ZG_JUGDE_APPLY T
  1165. SET T.IS_FLAG = '1'
  1166. WHERE T.JUGDE_APPLY_CODE = '#DETER_NO#'
  1167. AND T.JUGDE_APPLY_SEQUENO = '#DETER_NO_SEQ#'
  1168. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1169. AND T.BATCH_NO = '#BATCH_NO#'
  1170. AND T.BATCH_GROUD_NO = '001'
  1171. AND T.PLINE_CODE = '#PLINE_CODE#';
  1172. ELSE
  1173. DELETE FROM QCM_ZG_JUGDE_APPLY S
  1174. WHERE S.JUGDE_APPLY_CODE = '#DETER_NO#'
  1175. AND S.JUGDE_APPLY_SEQUENO = '#DETER_NO_SEQ#'
  1176. AND S.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1177. AND S.BATCH_NO = '#BATCH_NO#'
  1178. AND S.BATCH_GROUD_NO = '001'
  1179. AND S.PLINE_CODE = '#PLINE_CODE#';
  1180. END IF;
  1181. END;
  1182. </query>
  1183. <query id = "FrmCouplingApplPh.insertMatQcmBack" desc = "插入质量跟踪表">
  1184. DECLARE
  1185. BEGIN
  1186. FOR MYROW IN (SELECT *
  1187. FROM COUPLING_MAT_M T
  1188. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1189. AND T.BATCH_NO = '#BATCH_NO#'
  1190. AND T.PLINE_CODE = '#PLINE_CODE#'
  1191. AND T.DETER_NO = '#JUGDE_APPLY_CODE#'
  1192. AND T.DETER_NO_SEQ = '#JUGDE_APPLY_SEQUENO#'
  1193. ) LOOP
  1194. INSERT INTO MAT_BC_QCMTRACK
  1195. (MAT_NO,
  1196. PROCESS_CDOE,
  1197. STOVE_NO,
  1198. JUDGE_STOVE_NO,
  1199. BATCH_NO,
  1200. GRADECODE,
  1201. GRADENAME,
  1202. MATERIAL_NO,
  1203. MATERIAL_NAME,
  1204. JUGDE_APPLY_CODE,
  1205. JUGDE_APPLY_TIME,
  1206. JUGDE_APPLY_MAKER)
  1207. VALUES
  1208. (MYROW.MAT_NO,
  1209. 'H',
  1210. '',
  1211. MYROW.JUDGE_STOVE_NO,
  1212. MYROW.BATCH_NO,
  1213. MYROW.GRADECODE,
  1214. MYROW.GRADENAME,
  1215. MYROW.BL_WL_ID,
  1216. MYROW.BL_WL_DESC,
  1217. '#JUGDE_APPLY_CODE#',
  1218. TO_DATE('#APPLY_TIME#','YYYY-MM-DD HH24:MI:SS'),
  1219. '#APPLY_NAME#');
  1220. END LOOP;
  1221. END;
  1222. </query>
  1223. <query id = "FrmCouplingApplPh.SelectIsWic" desc = "查询是否有水压要求">
  1224. SELECT COUNT(1) ACOUNT
  1225. FROM CRAFT_ORD_DESIGN_MSC_PL_PRC T, CRAFT_ORD_DESIGN_STD_WIC W
  1226. WHERE T.DESGIN_KEY = W.DESGIN_KEY
  1227. AND T.MSC_PLINE = W.MSC_PLINE
  1228. and t.PROCESS_CODE = W.PROCESS_CODE
  1229. AND W.SPECL_FL = '2'
  1230. AND T.PROCESS_CODE = ?
  1231. AND T.DESGIN_KEY = ?
  1232. </query>
  1233. <query id = "FrmCouplingApplPh.doQueryWicValue" desc = "查询水压">
  1234. select t.*
  1235. from MCH_WATERGAGE_RESULT t
  1236. WHERE T.HEAT_PLAN_NO = ?
  1237. AND T.JUDGE_STOVE_NO = ?
  1238. </query>
  1239. <query id = "FrmCouplingApplPh.doQueryMchPathResult" desc = "查询加工通径结果">
  1240. select MAX(T.DRIFT_MODEL_MIN) DRIFT_MODEL_MIN,
  1241. MIN(T2.MEASURED_END_PART) MEASURED_END_PART,
  1242. MIN(T2.MEASURED_MIDDLE_PART) MEASURED_MIDDLE_PART,
  1243. MIN(T2.MEASURED_TAIL_PART) MEASURED_TAIL_PART
  1244. from MCH_PATH_RESULT t, MCH_PATH_RESULT_D T2
  1245. WHERE T.HEAT_PLAN_NO = T2.HEAT_PLAN_NO(+)
  1246. AND T.HEAT_PLAN_NO = ?
  1247. AND T.JUDGE_STOVE_NO = ?
  1248. </query>
  1249. <query id = "FrmCouplingApplPh.doQueryMchChamferingResult" desc = "查询加工倒棱结果">
  1250. select t.*
  1251. from MCH_CHAMFERING_RESULT t
  1252. WHERE T.HEAT_PLAN_NO = ?
  1253. AND T.JUDGE_STOVE_NO = ?
  1254. </query>
  1255. <query id = "FrmCouplingApplPh.doQueryMchTwistinglyResult" desc = "查询加工拧接结果">
  1256. select t.*
  1257. from MCH_TWISTINGLY_RESULT t
  1258. WHERE T.HEAT_PLAN_NO = ?
  1259. AND T.JUDGE_STOVE_NO = ?
  1260. </query>
  1261. <query id = "FrmCouplingApplPh.doQueryHttCrackDetectionEt" desc = "查询探伤结果">
  1262. <![CDATA[
  1263. SELECT listagg(TESTING_GRADE, ',') within GROUP(order by TESTING_GRADE) over(partition by '') TESTING_GRADE,
  1264. listagg(TESTING_TYPE, ',') within GROUP(order by TESTING_GRADE) over(partition by '') TESTING_TYPE
  1265. FROM (select DISTINCT T.TESTING_GRADE, T.TESTING_TYPE
  1266. from HTT_CRACK_DETECTION_ET t
  1267. WHERE T.HEAT_PLAN_NO = ?
  1268. AND T.JUDGE_STOVE_NO = ?
  1269. AND T.PROCESS_CODE = ?)
  1270. ]]>
  1271. </query>
  1272. <query id = "FrmCouplingApplPh.SelectQcmZgData" desc = "查询送判表支数">
  1273. SELECT SUM(T.ACT_COUNT) ACT_COUNT
  1274. FROM QCM_ZG_JUGDE_APPLY T
  1275. WHERE T.JUDGE_STOVE_NO = ?
  1276. AND T.PLINE_CODE = ?
  1277. AND T.PROCESS_CODE = 'F'
  1278. </query>
  1279. <query id = "FrmCouplingApplPh.SelectTestingStandar" desc = "查询探伤标准">
  1280. <![CDATA[
  1281. SELECT WMSYS.WM_CONCAT(DISTINCT T2.STANDARD_NAME) TESTING_STANDAR
  1282. FROM HTT_CRACK_DETECTION_PARA T1, HTT_CRACK_DETECTION_STANDARD T2
  1283. WHERE T1.STANDARD_ID = T2.STANDARD_ID
  1284. AND T1.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
  1285. ]]>
  1286. </query>
  1287. <query id = "FrmCouplingApplPh.SelectInputCountVrp" desc = "查询镦拔扩投料量">
  1288. <![CDATA[
  1289. select SUM(T.ACT_COUNT) ACT_COUNT,
  1290. SUM(NVL(T.ACT_THEORY_WEIGHT, T.ACT_WEIGHT)) ACT_WEIGHT
  1291. from PORT_VRP_BATCH_SAMPLE_RESULT t
  1292. WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
  1293. ]]>
  1294. </query>
  1295. <query id = "FrmCouplingApplPh.SelectInputCountHtt" desc = "查询热处理投料量">
  1296. <![CDATA[
  1297. select SUM(T.ACT_COUNT) ACT_COUNT,
  1298. SUM(NVL(T.ACT_THEORY_WEIGHT, T.ACT_WEIGHT)) ACT_WEIGHT
  1299. from PORT_HTT_BATCH_SAMPLE_RESULT t
  1300. WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
  1301. ]]>
  1302. </query>
  1303. <query id = "FrmCouplingApplPh.SelectInputCountMch" desc = "查询加工投料量">
  1304. <![CDATA[
  1305. select SUM(T.ACT_COUNT) ACT_COUNT,
  1306. SUM(NVL(T.ACT_THEORY_WEIGHT, T.ACT_WEIGHT)) ACT_WEIGHT
  1307. from PORT_MCH_BATCH_SAMPLE_RESULT t
  1308. WHERE T.HEAT_PLAN_NO = '#HEAT_PLAN_NO#'
  1309. ]]>
  1310. </query>
  1311. <query id = "FrmCouplingApplPh.doQueryQcmZgApplyData" desc = "查询加工线前紧急放行数据">
  1312. <![CDATA[
  1313. SELECT T.*
  1314. FROM QCM_ZG_JUGDE_APPLY T
  1315. WHERE T.INSTANCY_FLAG = '1'
  1316. AND (T.JUDGE_RESULT is null OR T.JUDGE_RESULT = '不合格' OR T.JUDGE_RESULT_CODE = '40740709')
  1317. ]]>
  1318. </query>
  1319. <query id = "FrmCouplingApplPh.SelectJudegApplyCount" desc = "查询是否已送判定过">
  1320. SELECT COUNT(1) ACOUNT
  1321. FROM QCM_ZG_JUGDE_APPLY T
  1322. WHERE T.JUDGE_STOVE_NO = ?
  1323. AND T.PROCESS_CODE = ?
  1324. AND T.IS_FLAG = '0'
  1325. AND T.IS_ALL_SCRAP IN ('0', '1')
  1326. </query>
  1327. <query id="FrmCouplingApplPh.SelectJgStuts" desc="查询公共表结炉状态">
  1328. <![CDATA[
  1329. SELECT T.STATION_STATUS, T.STATION_DESC
  1330. FROM COUPLING_COM_INFO T
  1331. WHERE T.WO_ID = ?
  1332. AND T.STATION_CODE = '700310'
  1333. ]]>
  1334. </query>
  1335. <query id = "FrmCouplingApplPh.SelectIsGroupE" desc = "查询炉计划标识">
  1336. SELECT T.IF_MATCH_ODD FROM PLN_ZY_DBK_M T WHERE T.HEAT_PLAN_NO = ? AND T.JUDGE_STOVE_NO = ?
  1337. </query>
  1338. <query id = "FrmCouplingApplPh.SelectIsGroupF" desc = "查询炉计划标识">
  1339. SELECT T.IF_MATCH_ODD FROM PLN_ZY_RCL_M T WHERE T.HEAT_PLAN_NO = ? AND T.JUDGE_STOVE_NO = ?
  1340. </query>
  1341. <query id = "FrmCouplingApplPh.SelectIsGroupG" desc = "查询炉计划标识">
  1342. SELECT T.IF_MATCH_ODD FROM PLN_ZY_JGX_M T WHERE T.HEAT_PLAN_NO = ? AND T.JUDGE_STOVE_NO = ?
  1343. </query>
  1344. <query id = "FrmVrpApplyNew.SelectApplyNo" desc = "查询库存支数与送判支数是否一致">
  1345. <![CDATA[
  1346. SELECT (NVL((SELECT SUM(T.ACT_COUNT)
  1347. FROM QCM_ZG_JUGDE_APPLY T
  1348. WHERE T.JUGDE_APPLY_CODE = ?),
  1349. 0) - NVL((SELECT SUM(T1.PRO_NUM)
  1350. FROM COUPLING_MAT_M T1
  1351. WHERE T1.DETER_NO = ?),
  1352. 0)) ACOUNT
  1353. FROM DUAL
  1354. ]]>
  1355. </query>
  1356. </queryMap>