MscManage.xml 56 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681
  1. <?xml version="1.0" encoding="UTF-8"?>
  2. <queryMap desc="冶金规范">
  3. <query id="MscManage.queryPsc" desc="查询产品规范数据">
  4. <![CDATA[
  5. SELECT T.PSC,
  6. T.PSC_DESC,
  7. T.MEMO,
  8. T.PRODUCCODE,
  9. T.PRODUCNAME,
  10. T.STD_CODE,
  11. T.STD_NAME,
  12. T.STEELCODE,
  13. T.STEELNAME,
  14. T.STD_STYLE,
  15. T.STD_STYLE_DESC,
  16. T.NEW_PROC_CODE,
  17. T.NEW_PROC_DESC,
  18. A.PRODUC_HEAD,
  19. DECODE((SELECT B.PSC
  20. FROM COM_PSC_R_MSC B
  21. WHERE B.PSC = T.PSC
  22. AND B.VALIDFLAG = '1'
  23. AND ROWNUM = 1
  24. AND EXISTS (SELECT 1
  25. FROM COM_MSC
  26. WHERE MSC = B.MSC
  27. AND VALIDFLAG <> 'D')),
  28. NULL,
  29. 'False',
  30. 'True') HAVE_MSC
  31. FROM COM_PSC T
  32. LEFT JOIN COM_BASE_PRODUCT A
  33. ON A.PRODUCCODE = T.PRODUCCODE
  34. WHERE T.VALIDFLAG = '1'
  35. AND DECODE('#PRODUCCODE#', NULL, '1', T.PRODUCCODE) =
  36. DECODE('#PRODUCCODE#', NULL, '1', '#PRODUCCODE#')
  37. AND DECODE('#STD_NAME#', NULL, '1', LOWER(T.STD_NAME)) LIKE
  38. DECODE('#STD_NAME#', NULL, '1', '%' || LOWER('#STD_NAME#') || '%')
  39. AND DECODE('#STEELNAME#', NULL, '1', LOWER(T.STEELNAME)) LIKE
  40. DECODE('#STEELNAME#', NULL, '1', '%' || LOWER('#STEELNAME#') || '%')
  41. AND DECODE('#PSC#', NULL, '1', T.PSC) =
  42. DECODE('#PSC#', NULL, '1', '#PSC#')
  43. ]]>
  44. </query>
  45. <query id="MscManage.queryMsc" desc="根据产品规范码查询冶金规范">
  46. <![CDATA[
  47. SELECT T.MSC,
  48. A.MSC_DESC,
  49. A.MSC_DESC OLD_MSC_DESC,
  50. A.USE_CODE,
  51. A.USE_CODE OLD_USE_CODE,
  52. A.USE_DESC,
  53. A.USE_DESC OLD_USE_DESC,
  54. A.UNIT_CODE_PROCESS,
  55. A.DEPARTMENT_CODE,
  56. A.DEPARTMENT_DESC,
  57. A.UNIT_CODE,
  58. A.UNIT_DESC,
  59. A.MSC_STYLE,
  60. A.USER_COUNT,
  61. A.MSC_SEQ,
  62. A.MSC_DESC_SEQ,
  63. A.MSC_SEQ OLD_MSC_SEQ,
  64. A.ALLOW_NK,
  65. A.CREATE_NAME,
  66. TO_CHAR(A.CREATE_TIME, 'YYYY-MM-DD HH24:MI:SS') CREATE_TIME,
  67. A.UPDATE_NAME,
  68. TO_CHAR(A.UPDATE_TIME, 'YYYY-MM-DD HH24:MI:SS') UPDATE_TIME,
  69. A.DELETE_NAME,
  70. TO_CHAR(A.DELETE_TIME, 'YYYY-MM-DD HH24:MI:SS') DELETE_TIME,
  71. A.MEMO,
  72. A.REMARK,
  73. TO_CHAR(A.AUDIT_TIME, 'YYYY-MM-DD HH24:MI:SS') AUDIT_TIME,
  74. A.AUDIT_NAME,
  75. A.VALIDFLAG_NK,
  76. DECODE(A.VALIDFLAG_NK, 'A', '录入状态', 'B', '提交审核',
  77. 'C', '已生效', 'D', '无效', 'E', '提交修改', '未识别') VALIDFLAG_NK_NAME,
  78. A.AUDIT_NAME_NK,
  79. TO_CHAR(A.AUDIT_TIME_NK, 'YYYY-MM-DD HH24:MI:SS') AUDIT_TIME_NK,
  80. A.REMARK_NK,
  81. A.PRODUC_HEAD,
  82. A.VALIDFLAG,
  83. DECODE(A.VALIDFLAG, 'A', '录入状态', 'B', '提交审核',
  84. 'C', '已生效', 'D', '无效', 'E', '提交修改', '未识别') VALIDFLAG_NAME
  85. FROM COM_PSC_R_MSC T
  86. FULL JOIN COM_MSC A ON T.MSC = A.MSC
  87. WHERE T.PSC = '#PSC#'
  88. AND T.VALIDFLAG = '1'
  89. AND A.VALIDFLAG IN ('A', 'B', 'C', 'E', '#VALIDFLAG#')
  90. ORDER BY T.MSC
  91. ]]>
  92. </query>
  93. <query id="MscManage.queryJG" desc="查询接箍">
  94. <![CDATA[
  95. SELECT A.MSC,
  96. A.MSC_DESC,
  97. A.CODE_JG,
  98. A.STOCK_STYLE,
  99. B.PRODUCCODE,
  100. B.PRODUCNAME,
  101. B.STEELCODE_JG STEELCODE,
  102. B.STEELCODE_JG_DESC STEELNAME,
  103. B.MIN_H_CP MIN_H,
  104. B.MAX_H_CP MAX_H,
  105. B.MIN_D_JG MIN_D,
  106. B.MAX_D_JG MAX_D,
  107. A.CREATE_NAME,
  108. A.CREATE_TIME,
  109. A.UPDATE_NAME,
  110. A.UPDATE_TIME,
  111. A.DELETE_NAME,
  112. A.DELETE_TIME,
  113. A.VALIDFLAG,
  114. A.MEMO
  115. FROM COM_MSC_R_JG A
  116. LEFT JOIN COM_MSC_JG B
  117. ON B.CODE_JG = A.CODE_JG
  118. WHERE A.STOCK_STYLE = 'A'
  119. AND A.VALIDFLAG = '1'
  120. AND DECODE('#MSC#', NULL, '1', A.MSC) =
  121. DECODE('#MSC#', NULL, '1', '#MSC#')
  122. AND EXISTS
  123. (SELECT 1
  124. FROM COM_MSC D
  125. LEFT JOIN COM_PSC_R_MSC C
  126. ON C.MSC = D.MSC
  127. WHERE A.MSC = D.MSC
  128. AND C.PSC = '#PSC#'
  129. AND D.VALIDFLAG IN ('A', 'B', 'C', 'E', '#VALIDFLAG#'))
  130. ]]>
  131. </query>
  132. <query id="MscManage.insertMsc" desc="新增冶金规范">
  133. <![CDATA[
  134. DECLARE
  135. P_MSC COM_MSC.MSC%TYPE;
  136. P_MSC_DESC COM_MSC.MSC_DESC%TYPE := '#MSC_DESC#';
  137. P_USE_CODE COM_MSC.USE_CODE%TYPE := '#USE_CODE#';
  138. P_USE_DESC COM_MSC.USE_DESC%TYPE := '#USE_DESC#';
  139. P_DEPARTMENT_CODE COM_MSC.DEPARTMENT_CODE%TYPE := '#DEPARTMENT_CODE#';
  140. P_DEPARTMENT_DESC COM_MSC.DEPARTMENT_DESC%TYPE := '#DEPARTMENT_DESC#';
  141. P_UNIT_CODE COM_MSC.UNIT_CODE%TYPE := '#UNIT_CODE#';
  142. P_UNIT_DESC COM_MSC.UNIT_DESC%TYPE := '#UNIT_DESC#';
  143. P_UNIT_CODE_PROCESS COM_MSC.UNIT_CODE_PROCESS%TYPE := '#UNIT_CODE_PROCESS#';
  144. P_UNIT_DESC_PROCESS COM_MSC.UNIT_DESC_PROCESS%TYPE := '#UNIT_DESC_PROCESS#';
  145. P_MSC_STYLE COM_MSC.MSC_STYLE%TYPE := '#MSC_STYLE#';
  146. P_USER_COUNT COM_MSC.USER_COUNT%TYPE := '#USER_COUNT#';
  147. P_ALLOW_NK COM_MSC.ALLOW_NK%TYPE := '#ALLOW_NK#';
  148. P_MSC_SEQ COM_MSC.MSC_SEQ%TYPE := '#MSC_SEQ#';
  149. P_MSC_DESC_SEQ COM_MSC.MSC_DESC_SEQ%TYPE := '#MSC_DESC_SEQ#';
  150. P_CREATE_NAME COM_MSC.CREATE_NAME%TYPE := '#CREATE_NAME#';
  151. P_MEMO COM_MSC.MEMO%TYPE := '#MEMO#';
  152. P_PRODUC_HEAD COM_MSC.PRODUC_HEAD%TYPE;
  153. P_PRODUCCODE COM_MSC.PRODUCCODE%TYPE := '#PRODUCCODE#';
  154. P_PRODUCNAME COM_MSC.PRODUCNAME%TYPE := '#PRODUCNAME#';
  155. P_STD_CODE COM_MSC.STD_CODE%TYPE := '#STD_CODE#';
  156. P_STD_NAME COM_MSC.STD_NAME%TYPE := '#STD_NAME#';
  157. P_STEELCODE COM_MSC.STEELCODE%TYPE := '#STEELCODE#';
  158. P_STEELNAME COM_MSC.STEELNAME%TYPE := '#STEELNAME#';
  159. P_STD_STYLE COM_MSC.STD_STYLE%TYPE := '#STD_STYLE#';
  160. P_STD_STYLE_DESC COM_MSC.STD_STYLE_DESC%TYPE := '#STD_STYLE_DESC#';
  161. P_NEW_PROC_CODE COM_MSC.NEW_PROC_CODE%TYPE := '#NEW_PROC_CODE#';
  162. P_NEW_PROC_DESC COM_MSC.NEW_PROC_DESC%TYPE := '#NEW_PROC_DESC#';
  163. P_PSC COM_PSC_R_MSC.PSC%TYPE := '#PSC#';
  164. P_PSC_DESC COM_PSC_R_MSC.PSC_DESC%TYPE := '#PSC_DESC#';
  165. P_ITEM_C COM_MSC_ITEM.ITEM_C%TYPE;
  166. P_INDEX_SEQ COM_MSC_ITEM.INDEX_SEQ%TYPE := 0;
  167. BEGIN
  168. SELECT PRODUC_HEAD INTO P_PRODUC_HEAD FROM COM_PSC WHERE PSC = '#PSC#';
  169. SELECT REPLACE('#PSC#', 'P', 'M') || LPAD(SUBSTR(NVL(MAX(T.MSC), '#PSC#' || '000'), 11, 3) + DECODE(MAX(T.MSC), NULL, 0, 1), 3, '0')
  170. INTO P_MSC FROM com_psc_r_msc T WHERE T.PSC = '#PSC#';
  171. FOR VROW IN (SELECT BASECODE, BASENAME
  172. FROM COM_BASE_INFO
  173. WHERE SORTCODE = '4030') LOOP
  174. IF P_MSC LIKE '__________000' THEN
  175. P_ITEM_C := VROW.BASECODE || '01';
  176. ELSE
  177. P_ITEM_C := VROW.BASECODE || '02';
  178. END IF;
  179. P_INDEX_SEQ := P_INDEX_SEQ + 1;
  180. INSERT INTO COM_MSC_ITEM T
  181. (T.MSC,
  182. T.INDEX_SEQ,
  183. T.ITEM,
  184. T.ITEM_C,
  185. T.CREATE_NAME,
  186. T.MEMO,
  187. T.CREATE_TIME,
  188. T.VALIDFLAG)
  189. VALUES
  190. (P_MSC,
  191. P_INDEX_SEQ,
  192. VROW.BASECODE,
  193. P_ITEM_C,
  194. P_CREATE_NAME,
  195. P_MEMO,
  196. SYSDATE,
  197. '1');
  198. END LOOP;
  199. INSERT INTO COM_MSC
  200. (MSC,
  201. MSC_DESC,
  202. USE_CODE,
  203. USE_DESC,
  204. DEPARTMENT_CODE,
  205. DEPARTMENT_DESC,
  206. UNIT_CODE,
  207. UNIT_DESC,
  208. UNIT_CODE_PROCESS,
  209. UNIT_DESC_PROCESS,
  210. MSC_STYLE,
  211. USER_COUNT,
  212. ALLOW_NK,
  213. MSC_SEQ,
  214. MSC_DESC_SEQ,
  215. CREATE_NAME,
  216. MEMO,
  217. PRODUC_HEAD,
  218. PRODUCCODE,
  219. PRODUCNAME,
  220. STD_CODE,
  221. STD_NAME,
  222. STEELCODE,
  223. STEELNAME,
  224. STD_STYLE,
  225. STD_STYLE_DESC,
  226. NEW_PROC_CODE,
  227. NEW_PROC_DESC,
  228. VALIDFLAG,
  229. CREATE_TIME)
  230. VALUES
  231. (P_MSC,
  232. P_MSC_DESC,
  233. P_USE_CODE,
  234. P_USE_DESC,
  235. P_DEPARTMENT_CODE,
  236. P_DEPARTMENT_DESC,
  237. P_UNIT_CODE,
  238. P_UNIT_DESC,
  239. P_UNIT_CODE_PROCESS,
  240. P_UNIT_DESC_PROCESS,
  241. P_MSC_STYLE,
  242. P_USER_COUNT,
  243. P_ALLOW_NK,
  244. P_MSC_SEQ,
  245. P_MSC_DESC_SEQ,
  246. P_CREATE_NAME,
  247. P_MEMO,
  248. P_PRODUC_HEAD,
  249. P_PRODUCCODE,
  250. P_PRODUCNAME,
  251. P_STD_CODE,
  252. P_STD_NAME,
  253. P_STEELCODE,
  254. P_STEELNAME,
  255. P_STD_STYLE,
  256. P_STD_STYLE_DESC,
  257. P_NEW_PROC_CODE,
  258. P_NEW_PROC_DESC,
  259. 'A',
  260. SYSDATE);
  261. INSERT INTO COM_PSC_R_MSC
  262. (PSC,
  263. PSC_DESC,
  264. USE_CODE,
  265. USE_DESC,
  266. MSC,
  267. MSC_DESC,
  268. CREATE_NAME,
  269. CREATE_TIME,
  270. VALIDFLAG)
  271. VALUES
  272. (P_PSC,
  273. P_PSC_DESC,
  274. P_USE_CODE,
  275. P_USE_DESC,
  276. P_MSC,
  277. P_MSC_DESC,
  278. P_CREATE_NAME,
  279. SYSDATE,
  280. '1');
  281. END;
  282. ]]>
  283. </query>
  284. <query id="MscManage.updateMsc" desc="更新冶金规范">
  285. <![CDATA[
  286. UPDATE COM_MSC
  287. SET
  288. MSC_DESC = '#MSC_DESC#',
  289. USE_CODE = '#USE_CODE#',
  290. USE_DESC = '#USE_DESC#',
  291. DEPARTMENT_CODE = '#DEPARTMENT_CODE#',
  292. DEPARTMENT_DESC = '#DEPARTMENT_DESC#',
  293. UNIT_CODE = '#UNIT_CODE#',
  294. UNIT_DESC = '#UNIT_DESC#',
  295. UNIT_CODE_PROCESS = '#UNIT_CODE_PROCESS#',
  296. UNIT_DESC_PROCESS = '#UNIT_DESC_PROCESS#',
  297. MSC_STYLE = '#MSC_STYLE#',
  298. USER_COUNT = '#USER_COUNT#',
  299. ALLOW_NK = '#ALLOW_NK#',
  300. MSC_SEQ = '#MSC_SEQ#',
  301. MSC_DESC_SEQ = '#MSC_DESC_SEQ#',
  302. UPDATE_NAME = '#UPDATE_NAME#',
  303. UPDATE_TIME = SYSDATE,
  304. MEMO = '#MEMO#',
  305. PRODUC_HEAD = '#PRODUC_HEAD#'
  306. --PRODUCCODE = '#PRODUCCODE#',
  307. --PRODUCNAME = '#PRODUCNAME#',
  308. --STD_CODE = '#STD_CODE#',
  309. --STD_NAME = '#STD_NAME#',
  310. --STEELCODE = '#STEELCODE#',
  311. --STEELNAME = '#STEELNAME#',
  312. --STD_STYLE = '#STD_STYLE#',
  313. --STD_STYLE_DESC = '#STD_STYLE_DESC#',
  314. --NEW_PROC_CODE = '#NEW_PROC_CODE#',
  315. --NEW_PROC_DESC = '#NEW_PROC_DESC#'
  316. WHERE
  317. MSC = '#MSC#'
  318. ]]>
  319. </query>
  320. <query id="MscManage.isExistAlpha" desc="冶金规范中是否存在Alpha">
  321. <![CDATA[
  322. SELECT COUNT(1) FROM com_psc_r_msc T WHERE T.PSC = '#PSC#' AND T.USE_CODE = '#USE_CODE#'
  323. ]]>
  324. </query>
  325. <query id="MscManage.isCompleteMsc" desc="是否完整的MSC">
  326. <![CDATA[
  327. SELECT DECODE(COUNT(1), 0, 0, 1) CNT, '制程' TYPE
  328. FROM COM_MSC_BACKLOG A
  329. WHERE A.MSC = '#MSC#'
  330. AND A.VALIDFLAG = '1'
  331. UNION ALL
  332. SELECT DECODE(COUNT(1), 0, 0, 1) CNT, '工序' TYPE
  333. FROM COM_MSC_PROCESS A
  334. WHERE A.MSC = '#MSC#'
  335. AND A.VALIDFLAG = '1'
  336. UNION ALL
  337. SELECT DECODE(COUNT(1), 0, 0, 1) CNT, '工序点' TYPE
  338. FROM COM_MSC_STATION A
  339. WHERE A.MSC = '#MSC#'
  340. AND A.VALIDFLAG = '1'
  341. UNION ALL
  342. SELECT DECODE(COUNT(1), 0, 0, 1) CNT, '钢种' TYPE
  343. FROM COM_MSC_GRADE A
  344. WHERE A.MSC = '#MSC#'
  345. AND A.VALIDFLAG = '1'
  346. ]]>
  347. </query>
  348. <query id="MscManage.isCompleteMsc2" desc="是否完整的MSC">
  349. <![CDATA[
  350. SELECT SUM(CNT) CNT, '成分标准' TYPE FROM (SELECT DECODE(COUNT(1), 0, 0, 1) CNT
  351. FROM COM_MSC_STD_CIC A
  352. WHERE DECODE('#MSC#', NULL, '1', A.MSC) = DECODE('#MSC#', NULL, '1', '#MSC#')
  353. AND A.VALIDFLAG = '1'
  354. UNION ALL
  355. SELECT 1 CNT
  356. FROM DUAL
  357. WHERE NOT EXISTS (SELECT 1
  358. FROM COM_MSC_STATION T
  359. WHERE T.STATION_TYPE = '403201'
  360. AND T.VALIDFLAG = '1'
  361. AND T.MSC = '#MSC#')) UNION ALL
  362. SELECT SUM(CNT) CNT, '理化标准' TYPE FROM (SELECT DECODE(COUNT(1), 0, 0, 1) CNT
  363. FROM COM_MSC_STD_PIC A
  364. WHERE DECODE('#MSC#', NULL, '1', A.MSC) = DECODE('#MSC#', NULL, '1', '#MSC#')
  365. AND VALIDFLAG = '1'
  366. UNION ALL
  367. SELECT 1 CNT
  368. FROM DUAL
  369. WHERE NOT EXISTS (SELECT 1
  370. FROM COM_MSC_STATION T
  371. WHERE T.STATION_TYPE = '403202'
  372. AND T.VALIDFLAG = '1'
  373. AND T.MSC = '#MSC#')) UNION ALL
  374. SELECT SUM(CNT) CNT, '公差标准' TYPE FROM (SELECT DECODE(COUNT(1), 0, 0, 1) CNT
  375. FROM COM_MSC_STD_SPEC A
  376. WHERE DECODE('#MSC#', NULL, '1', A.MSC) = DECODE('#MSC#', NULL, '1', '#MSC#')
  377. AND VALIDFLAG = '1'
  378. UNION ALL
  379. SELECT 1 CNT
  380. FROM DUAL
  381. WHERE NOT EXISTS (SELECT 1
  382. FROM COM_MSC_STATION T
  383. WHERE T.STATION_TYPE = '403203'
  384. AND T.VALIDFLAG = '1'
  385. AND T.MSC = '#MSC#')) UNION ALL
  386. SELECT SUM(CNT) CNT, '探伤标准' TYPE FROM (SELECT DECODE(COUNT(1), 0, 0, 1) CNT
  387. FROM COM_MSC_STD_DETECTION A
  388. WHERE DECODE('#MSC#', NULL, '1', A.MSC) = DECODE('#MSC#', NULL, '1', '#MSC#')
  389. AND VALIDFLAG = '1'
  390. UNION ALL
  391. SELECT 1 CNT
  392. FROM DUAL
  393. WHERE NOT EXISTS (SELECT 1
  394. FROM COM_MSC_STATION T
  395. WHERE T.STATION_TYPE = '403204'
  396. AND T.VALIDFLAG = '1'
  397. AND T.MSC = '#MSC#')) UNION ALL
  398. SELECT SUM(CNT) CNT, '水压标准' TYPE FROM (SELECT DECODE(COUNT(1), 0, 0, 1) CNT
  399. FROM COM_MSC_STD_WATER A
  400. WHERE DECODE('#MSC#', NULL, '1', A.MSC) = DECODE('#MSC#', NULL, '1', '#MSC#')
  401. AND VALIDFLAG = '1'
  402. UNION ALL
  403. SELECT 1 CNT
  404. FROM DUAL
  405. WHERE NOT EXISTS (SELECT 1
  406. FROM COM_MSC_STATION T
  407. WHERE T.STATION_TYPE = '403205'
  408. AND T.VALIDFLAG = '1'
  409. AND T.MSC = '#MSC#')) UNION ALL
  410. SELECT SUM(CNT) CNT, '加工标准' TYPE FROM (SELECT DECODE(COUNT(1), 0, 0, 1) CNT
  411. FROM COM_MSC_STD_PROCESS A
  412. WHERE DECODE('#MSC#', NULL, '1', A.MSC) = DECODE('#MSC#', NULL, '1', '#MSC#')
  413. AND VALIDFLAG = '1'
  414. UNION ALL
  415. SELECT 1 CNT
  416. FROM DUAL
  417. WHERE NOT EXISTS (SELECT 1
  418. FROM COM_MSC_STATION T
  419. WHERE T.STATION_TYPE = '403208'
  420. AND T.VALIDFLAG = '1'
  421. AND T.MSC = '#MSC#'))
  422. UNION ALL
  423. SELECT SUM(CNT) CNT, '成分类工序点' TYPE FROM (SELECT DECODE(COUNT(1), 0, 0, 1) CNT
  424. FROM COM_MSC_STATION T
  425. WHERE T.STATION_TYPE = '403201'
  426. AND T.VALIDFLAG = '1'
  427. AND T.MSC = '#MSC#'
  428. UNION ALL
  429. SELECT 1 CNT
  430. FROM DUAL
  431. WHERE NOT EXISTS (SELECT 1
  432. FROM COM_MSC_STD_CIC A
  433. WHERE DECODE('#MSC#', NULL, '1', A.MSC) =
  434. DECODE('#MSC#', NULL, '1', '#MSC#')
  435. AND A.VALIDFLAG = '1')) UNION ALL
  436. SELECT SUM(CNT) CNT, '理化类工序点' TYPE FROM (SELECT DECODE(COUNT(1), 0, 0, 1) CNT
  437. FROM COM_MSC_STATION T
  438. WHERE T.STATION_TYPE = '403202'
  439. AND T.VALIDFLAG = '1'
  440. AND T.MSC = '#MSC#'
  441. UNION ALL
  442. SELECT 1 CNT
  443. FROM DUAL
  444. WHERE NOT EXISTS
  445. (SELECT 1
  446. FROM COM_MSC_STD_PIC A
  447. WHERE DECODE('#MSC#', NULL, '1', A.MSC) = DECODE('#MSC#', NULL, '1', '#MSC#')
  448. AND VALIDFLAG = '1')) UNION ALL
  449. SELECT SUM(CNT) CNT, '公差类工序点' TYPE FROM (SELECT DECODE(COUNT(1), 0, 0, 1) CNT
  450. FROM COM_MSC_STATION T
  451. WHERE T.STATION_TYPE = '403203'
  452. AND T.VALIDFLAG = '1'
  453. AND T.MSC = '#MSC#'
  454. UNION ALL
  455. SELECT 1 CNT
  456. FROM DUAL
  457. WHERE NOT EXISTS
  458. (SELECT 1
  459. FROM COM_MSC_STD_SPEC A
  460. WHERE DECODE('#MSC#', NULL, '1', A.MSC) = DECODE('#MSC#', NULL, '1', '#MSC#')
  461. AND VALIDFLAG = '1')) UNION ALL
  462. SELECT SUM(CNT) CNT, '探伤类工序点' TYPE FROM (SELECT DECODE(COUNT(1), 0, 0, 1) CNT
  463. FROM COM_MSC_STATION T
  464. WHERE T.STATION_TYPE = '403204'
  465. AND T.VALIDFLAG = '1'
  466. AND T.MSC = '#MSC#'
  467. UNION ALL
  468. SELECT 1 CNT
  469. FROM DUAL
  470. WHERE NOT EXISTS
  471. (SELECT 1
  472. FROM COM_MSC_STD_DETECTION A
  473. WHERE DECODE('#MSC#', NULL, '1', A.MSC) = DECODE('#MSC#', NULL, '1', '#MSC#')
  474. AND VALIDFLAG = '1')) UNION ALL
  475. SELECT SUM(CNT) CNT, '水压类工序点' TYPE FROM (SELECT DECODE(COUNT(1), 0, 0, 1) CNT
  476. FROM COM_MSC_STATION T
  477. WHERE T.STATION_TYPE = '403205'
  478. AND T.VALIDFLAG = '1'
  479. AND T.MSC = '#MSC#'
  480. UNION ALL
  481. SELECT 1 CNT
  482. FROM DUAL
  483. WHERE NOT EXISTS
  484. (SELECT 1
  485. FROM COM_MSC_STD_WATER A
  486. WHERE DECODE('#MSC#', NULL, '1', A.MSC) = DECODE('#MSC#', NULL, '1', '#MSC#')
  487. AND VALIDFLAG = '1')) UNION ALL
  488. SELECT SUM(CNT) CNT, '加工类工序点' TYPE FROM (SELECT DECODE(COUNT(1), 0, 0, 1) CNT
  489. FROM COM_MSC_STATION T
  490. WHERE T.STATION_TYPE = '403208'
  491. AND T.VALIDFLAG = '1'
  492. AND T.MSC = '#MSC#'
  493. UNION ALL
  494. SELECT 1 CNT
  495. FROM DUAL
  496. WHERE NOT EXISTS
  497. (SELECT 1
  498. FROM COM_MSC_STD_PROCESS A
  499. WHERE DECODE('#MSC#', NULL, '1', A.MSC) = DECODE('#MSC#', NULL, '1', '#MSC#')
  500. AND VALIDFLAG = '1'))
  501. ]]>
  502. </query>
  503. <query id="MscManage.updateMscState" desc="作废或者恢复冶金规范">
  504. <![CDATA[
  505. DECLARE
  506. P_VALIDFLAG COM_MSC.VALIDFLAG%TYPE := '#VALIDFLAG#';
  507. P_MSC COM_MSC.MSC%TYPE := '#MSC#';
  508. P_NAME COM_MSC.DELETE_NAME%TYPE := '#DELETE_NAME#';
  509. P_ACTION_TYPE VARCHAR2(20) := '#ACTION_TYPE#';
  510. BEGIN
  511. IF P_ACTION_TYPE <> 'Audit' THEN
  512. IF P_ACTION_TYPE = 'Delete' THEN
  513. UPDATE COM_MSC SET VALIDFLAG = P_VALIDFLAG, DELETE_NAME = P_NAME,
  514. DELETE_TIME = SYSDATE, VALIDFLAG_NK = P_VALIDFLAG WHERE MSC = P_MSC;
  515. UPDATE COM_MSC_STD_CIC T
  516. SET T.VALIDFLAG = '#VALIDFLAG2#',
  517. T.DELETE_NAME = '#DELETE_NAME#',
  518. T.DELETE_TIME = SYSDATE
  519. WHERE T.MSC = '#MSC#' AND T.VALIDFLAG <> '0';
  520. UPDATE COM_MSC_STD_PIC T
  521. SET T.VALIDFLAG = '#VALIDFLAG2#',
  522. T.DELETE_NAME = '#DELETE_NAME#',
  523. T.DELETE_TIME = SYSDATE
  524. WHERE T.MSC = '#MSC#' AND T.VALIDFLAG <> '0';
  525. UPDATE COM_MSC_STD_DETECTION T
  526. SET T.VALIDFLAG = '#VALIDFLAG2#',
  527. T.DELETE_NAME = '#DELETE_NAME#',
  528. T.DELETE_TIME = SYSDATE
  529. WHERE T.MSC = '#MSC#' AND T.VALIDFLAG <> '0';
  530. UPDATE COM_MSC_STD_SPEC T
  531. SET T.VALIDFLAG = '#VALIDFLAG2#',
  532. T.DELETE_NAME = '#DELETE_NAME#',
  533. T.DELETE_TIME = SYSDATE
  534. WHERE T.MSC = '#MSC#' AND T.VALIDFLAG <> '0';
  535. UPDATE COM_MSC_STD_WATER T
  536. SET T.VALIDFLAG = '#VALIDFLAG2#',
  537. T.DELETE_NAME = '#DELETE_NAME#',
  538. T.DELETE_TIME = SYSDATE
  539. WHERE T.MSC = '#MSC#' AND T.VALIDFLAG <> '0';
  540. UPDATE COM_MSC_STD_PROCESS T
  541. SET T.VALIDFLAG = '#VALIDFLAG2#',
  542. T.DELETE_NAME = '#DELETE_NAME#',
  543. T.DELETE_TIME = SYSDATE
  544. WHERE T.MSC = '#MSC#' AND T.VALIDFLAG <> '0';
  545. UPDATE COM_MSC_BACKLOG T
  546. SET T.VALIDFLAG = '#VALIDFLAG2#',
  547. T.VALIDFLAG_NK = '#VALIDFLAG2#',
  548. T.DELETE_NAME = '#DELETE_NAME#',
  549. T.DELETE_TIME = SYSDATE
  550. WHERE T.MSC = '#MSC#' AND T.VALIDFLAG <> '0';
  551. UPDATE COM_MSC_STD_CHEM T
  552. SET T.VALIDFLAG = '0',
  553. T.DELETE_NAME = '#DELETE_NAME#',
  554. T.DELETE_TIME = SYSDATE
  555. WHERE T.CIC = (SELECT A.CIC FROM COM_MSC_STD_CIC A WHERE A.MSC = '#MSC#');
  556. UPDATE COM_MSC_STD_PHY T
  557. SET T.VALIDFLAG = '0',
  558. T.DELETE_NAME = '#DELETE_NAME#',
  559. T.DELETE_TIME = SYSDATE
  560. WHERE T.PIC = (SELECT A.PIC FROM COM_MSC_STD_PIC A WHERE A.MSC = '#MSC#');
  561. UPDATE COM_MSC_STD_DETECTION_C T
  562. SET T.VALIDFLAG = '0',
  563. T.DELETE_NAME = '#DELETE_NAME#',
  564. T.DELETE_TIME = SYSDATE
  565. WHERE T.DIC = (SELECT A.DIC FROM COM_MSC_STD_DETECTION A WHERE A.MSC = '#MSC#');
  566. UPDATE COM_MSC_STD_SPEC_C T
  567. SET T.VALIDFLAG = '0',
  568. T.DELETE_NAME = '#DELETE_NAME#',
  569. T.DELETE_TIME = SYSDATE
  570. WHERE T.SIC = (SELECT A.SIC FROM COM_MSC_STD_SPEC A WHERE A.MSC = '#MSC#');
  571. UPDATE Com_Msc_Std_Water_C T
  572. SET T.VALIDFLAG = '0',
  573. T.DELETE_NAME = '#DELETE_NAME#',
  574. T.DELETE_TIME = SYSDATE
  575. WHERE T.WIC = (SELECT A.WIC FROM Com_Msc_Std_Water A WHERE A.MSC = '#MSC#');
  576. UPDATE Com_Msc_Std_Process_c T
  577. SET T.VALIDFLAG = '0',
  578. T.DELETE_NAME = '#DELETE_NAME#',
  579. T.DELETE_TIME = SYSDATE
  580. WHERE T.GIC = (SELECT A.GIC FROM Com_Msc_Std_Process A WHERE A.MSC = '#MSC#');
  581. UPDATE Com_Msc_Process T
  582. SET T.VALIDFLAG = '0',
  583. T.DELETE_NAME = '#DELETE_NAME#',
  584. T.DELETE_TIME = SYSDATE
  585. WHERE T.MSC = '#MSC#';
  586. UPDATE Com_Msc_Station T
  587. SET T.VALIDFLAG = '0',
  588. T.DELETE_NAME = '#DELETE_NAME#',
  589. T.DELETE_TIME = SYSDATE
  590. WHERE T.MSC = '#MSC#';
  591. UPDATE Com_Msc_Grade T
  592. SET T.VALIDFLAG = '0',
  593. T.DELETE_NAME = '#DELETE_NAME#',
  594. T.DELETE_TIME = SYSDATE
  595. WHERE T.MSC = '#MSC#';
  596. UPDATE Com_Msc_Grade_r_Spec T
  597. SET T.VALIDFLAG = '0',
  598. T.DELETE_NAME = '#DELETE_NAME#',
  599. T.DELETE_TIME = SYSDATE
  600. WHERE T.MSC = '#MSC#';
  601. UPDATE COM_MSC_R_JG T
  602. SET T.VALIDFLAG = '0',
  603. T.DELETE_NAME = '#DELETE_NAME#',
  604. T.DELETE_TIME = SYSDATE
  605. WHERE T.MSC = '#MSC#';
  606. ELSIF P_ACTION_TYPE = 'SubMitModify' THEN
  607. UPDATE COM_MSC SET VALIDFLAG = P_VALIDFLAG, UPDATE_NAME = P_NAME,
  608. UPDATE_TIME = SYSDATE WHERE MSC = P_MSC;
  609. ELSIF P_ACTION_TYPE = 'Resume' THEN
  610. UPDATE COM_MSC SET VALIDFLAG = P_VALIDFLAG, UPDATE_NAME = P_NAME,
  611. UPDATE_TIME = SYSDATE, VALIDFLAG_NK = P_VALIDFLAG WHERE MSC = P_MSC;
  612. UPDATE COM_MSC_STD_CIC T
  613. SET T.VALIDFLAG = '#VALIDFLAG2#',
  614. T.UPDATE_NAME = '#UPDATE_NAME#',
  615. T.UPDATE_TIME = SYSDATE,
  616. T.DELETE_NAME = '',
  617. T.DELETE_TIME = ''
  618. WHERE T.MSC = '#MSC#';
  619. UPDATE COM_MSC_STD_PIC T
  620. SET T.VALIDFLAG = '#VALIDFLAG2#',
  621. T.UPDATE_NAME = '#UPDATE_NAME#',
  622. T.UPDATE_TIME = SYSDATE,
  623. T.DELETE_NAME = '',
  624. T.DELETE_TIME = ''
  625. WHERE T.MSC = '#MSC#';
  626. UPDATE COM_MSC_STD_DETECTION T
  627. SET T.VALIDFLAG = '#VALIDFLAG2#',
  628. T.UPDATE_NAME = '#UPDATE_NAME#',
  629. T.UPDATE_TIME = SYSDATE,
  630. T.DELETE_NAME = '',
  631. T.DELETE_TIME = ''
  632. WHERE T.MSC = '#MSC#';
  633. UPDATE COM_MSC_STD_SPEC T
  634. SET T.VALIDFLAG = '#VALIDFLAG2#',
  635. T.UPDATE_NAME = '#UPDATE_NAME#',
  636. T.UPDATE_TIME = SYSDATE,
  637. T.DELETE_NAME = '',
  638. T.DELETE_TIME = ''
  639. WHERE T.MSC = '#MSC#';
  640. UPDATE COM_MSC_STD_WATER T
  641. SET T.VALIDFLAG = '#VALIDFLAG2#',
  642. T.UPDATE_NAME = '#UPDATE_NAME#',
  643. T.UPDATE_TIME = SYSDATE,
  644. T.DELETE_NAME = '',
  645. T.DELETE_TIME = ''
  646. WHERE T.MSC = '#MSC#';
  647. UPDATE COM_MSC_STD_PROCESS T
  648. SET T.VALIDFLAG = '#VALIDFLAG2#',
  649. T.UPDATE_NAME = '#UPDATE_NAME#',
  650. T.UPDATE_TIME = SYSDATE,
  651. T.DELETE_NAME = '',
  652. T.DELETE_TIME = ''
  653. WHERE T.MSC = '#MSC#';
  654. UPDATE COM_MSC_BACKLOG T
  655. SET T.VALIDFLAG = '#VALIDFLAG2#',
  656. T.VALIDFLAG_NK = '#VALIDFLAG2#',
  657. T.UPDATE_NAME = '#UPDATE_NAME#',
  658. T.UPDATE_TIME = SYSDATE,
  659. T.DELETE_NAME = '',
  660. T.DELETE_TIME = ''
  661. WHERE T.MSC = '#MSC#';
  662. UPDATE COM_MSC_STD_CHEM T
  663. SET T.VALIDFLAG = '1',
  664. T.DELETE_NAME = '',
  665. T.DELETE_TIME = '',
  666. T.UPDATE_NAME = '#UPDATE_NAME#',
  667. T.UPDATE_TIME = SYSDATE
  668. WHERE T.CIC = (SELECT A.CIC FROM COM_MSC_STD_CIC A WHERE A.MSC = '#MSC#');
  669. UPDATE COM_MSC_STD_PHY T
  670. SET T.VALIDFLAG = '1',
  671. T.DELETE_NAME = '',
  672. T.DELETE_TIME = '',
  673. T.UPDATE_NAME = '#UPDATE_NAME#',
  674. T.UPDATE_TIME = SYSDATE
  675. WHERE T.PIC = (SELECT A.PIC FROM COM_MSC_STD_PIC A WHERE A.MSC = '#MSC#');
  676. UPDATE COM_MSC_STD_DETECTION_C T
  677. SET T.VALIDFLAG = '1',
  678. T.DELETE_NAME = '',
  679. T.DELETE_TIME = '',
  680. T.UPDATE_NAME = '#UPDATE_NAME#',
  681. T.UPDATE_TIME = SYSDATE
  682. WHERE T.DIC = (SELECT A.DIC FROM COM_MSC_STD_DETECTION A WHERE A.MSC = '#MSC#');
  683. UPDATE COM_MSC_STD_SPEC_C T
  684. SET T.VALIDFLAG = '1',
  685. T.DELETE_NAME = '',
  686. T.DELETE_TIME = '',
  687. T.UPDATE_NAME = '#UPDATE_NAME#',
  688. T.UPDATE_TIME = SYSDATE
  689. WHERE T.SIC = (SELECT A.SIC FROM COM_MSC_STD_SPEC A WHERE A.MSC = '#MSC#');
  690. UPDATE Com_Msc_Std_Water_C T
  691. SET T.VALIDFLAG = '1',
  692. T.DELETE_NAME = '',
  693. T.DELETE_TIME = '',
  694. T.UPDATE_NAME = '#UPDATE_NAME#',
  695. T.UPDATE_TIME = SYSDATE
  696. WHERE T.WIC = (SELECT A.WIC FROM Com_Msc_Std_Water A WHERE A.MSC = '#MSC#');
  697. UPDATE Com_Msc_Std_Process_c T
  698. SET T.VALIDFLAG = '1',
  699. T.DELETE_NAME = '',
  700. T.DELETE_TIME = '',
  701. T.UPDATE_NAME = '#UPDATE_NAME#',
  702. T.UPDATE_TIME = SYSDATE
  703. WHERE T.GIC = (SELECT A.GIC FROM Com_Msc_Std_Process A WHERE A.MSC = '#MSC#');
  704. UPDATE Com_Msc_Process T
  705. SET T.VALIDFLAG = '1',
  706. T.DELETE_NAME = '',
  707. T.DELETE_TIME = '',
  708. T.UPDATE_NAME = '#UPDATE_NAME#',
  709. T.UPDATE_TIME = SYSDATE
  710. WHERE T.MSC = '#MSC#';
  711. UPDATE Com_Msc_Station T
  712. SET T.VALIDFLAG = '1',
  713. T.DELETE_NAME = '',
  714. T.DELETE_TIME = '',
  715. T.UPDATE_NAME = '#UPDATE_NAME#',
  716. T.UPDATE_TIME = SYSDATE
  717. WHERE T.MSC = '#MSC#';
  718. UPDATE Com_Msc_Grade T
  719. SET T.VALIDFLAG = '1',
  720. T.DELETE_NAME = '',
  721. T.DELETE_TIME = '',
  722. T.UPDATE_NAME = '#UPDATE_NAME#',
  723. T.UPDATE_TIME = SYSDATE
  724. WHERE T.MSC = '#MSC#';
  725. UPDATE Com_Msc_Grade_r_Spec T
  726. SET T.VALIDFLAG = '1',
  727. T.DELETE_NAME = '',
  728. T.DELETE_TIME = '',
  729. T.UPDATE_NAME = '#UPDATE_NAME#',
  730. T.UPDATE_TIME = SYSDATE
  731. WHERE T.MSC = '#MSC#';
  732. UPDATE COM_MSC_R_JG T
  733. SET T.VALIDFLAG = '1',
  734. T.DELETE_NAME = '',
  735. T.DELETE_TIME = '',
  736. T.UPDATE_NAME = '#UPDATE_NAME#',
  737. T.UPDATE_TIME = SYSDATE
  738. WHERE T.MSC = '#MSC#';
  739. ELSE
  740. UPDATE COM_MSC SET VALIDFLAG = P_VALIDFLAG, UPDATE_NAME = P_NAME,
  741. UPDATE_TIME = SYSDATE, DELETE_NAME = '', DELETE_TIME = '' WHERE MSC = P_MSC;
  742. UPDATE COM_MSC_STD_CIC T
  743. SET T.VALIDFLAG = '#VALIDFLAG2#',
  744. T.UPDATE_NAME = '#UPDATE_NAME#',
  745. T.UPDATE_TIME = SYSDATE,
  746. T.DELETE_NAME = '',
  747. T.DELETE_TIME = ''
  748. WHERE T.MSC = '#MSC#' AND T.VALIDFLAG <> '0';
  749. UPDATE COM_MSC_STD_PIC T
  750. SET T.VALIDFLAG = '#VALIDFLAG2#',
  751. T.UPDATE_NAME = '#UPDATE_NAME#',
  752. T.UPDATE_TIME = SYSDATE,
  753. T.DELETE_NAME = '',
  754. T.DELETE_TIME = ''
  755. WHERE T.MSC = '#MSC#' AND T.VALIDFLAG <> '0';
  756. UPDATE COM_MSC_STD_DETECTION T
  757. SET T.VALIDFLAG = '#VALIDFLAG2#',
  758. T.UPDATE_NAME = '#UPDATE_NAME#',
  759. T.UPDATE_TIME = SYSDATE,
  760. T.DELETE_NAME = '',
  761. T.DELETE_TIME = ''
  762. WHERE T.MSC = '#MSC#' AND T.VALIDFLAG <> '0';
  763. UPDATE COM_MSC_STD_SPEC T
  764. SET T.VALIDFLAG = '#VALIDFLAG2#',
  765. T.UPDATE_NAME = '#UPDATE_NAME#',
  766. T.UPDATE_TIME = SYSDATE,
  767. T.DELETE_NAME = '',
  768. T.DELETE_TIME = ''
  769. WHERE T.MSC = '#MSC#' AND T.VALIDFLAG <> '0';
  770. UPDATE COM_MSC_STD_WATER T
  771. SET T.VALIDFLAG = '#VALIDFLAG2#',
  772. T.UPDATE_NAME = '#UPDATE_NAME#',
  773. T.UPDATE_TIME = SYSDATE,
  774. T.DELETE_NAME = '',
  775. T.DELETE_TIME = ''
  776. WHERE T.MSC = '#MSC#' AND T.VALIDFLAG <> '0';
  777. UPDATE COM_MSC_STD_PROCESS T
  778. SET T.VALIDFLAG = '#VALIDFLAG2#',
  779. T.UPDATE_NAME = '#UPDATE_NAME#',
  780. T.UPDATE_TIME = SYSDATE,
  781. T.DELETE_NAME = '',
  782. T.DELETE_TIME = ''
  783. WHERE T.MSC = '#MSC#' AND T.VALIDFLAG <> '0';
  784. UPDATE COM_MSC_BACKLOG T
  785. SET T.VALIDFLAG = '#VALIDFLAG2#',
  786. T.UPDATE_NAME = '#UPDATE_NAME#',
  787. T.UPDATE_TIME = SYSDATE,
  788. T.DELETE_NAME = '',
  789. T.DELETE_TIME = ''
  790. WHERE T.MSC = '#MSC#' AND T.VALIDFLAG <> '0';
  791. END IF;
  792. ELSE
  793. UPDATE COM_MSC SET VALIDFLAG = P_VALIDFLAG, AUDIT_NAME = P_NAME,
  794. AUDIT_TIME = SYSDATE, REMARK = '#REMARK#' WHERE MSC = P_MSC;
  795. UPDATE COM_MSC_STD_CIC T
  796. SET T.VALIDFLAG = '#VALIDFLAG2#',
  797. T.UPDATE_NAME = '#UPDATE_NAME#',
  798. T.UPDATE_TIME = SYSDATE,
  799. T.DELETE_NAME = '',
  800. T.DELETE_TIME = ''
  801. WHERE T.MSC = '#MSC#' AND T.VALIDFLAG <> '0';
  802. UPDATE COM_MSC_STD_PIC T
  803. SET T.VALIDFLAG = '#VALIDFLAG2#',
  804. T.UPDATE_NAME = '#UPDATE_NAME#',
  805. T.UPDATE_TIME = SYSDATE,
  806. T.DELETE_NAME = '',
  807. T.DELETE_TIME = ''
  808. WHERE T.MSC = '#MSC#' AND T.VALIDFLAG <> '0';
  809. UPDATE COM_MSC_STD_DETECTION T
  810. SET T.VALIDFLAG = '#VALIDFLAG2#',
  811. T.UPDATE_NAME = '#UPDATE_NAME#',
  812. T.UPDATE_TIME = SYSDATE,
  813. T.DELETE_NAME = '',
  814. T.DELETE_TIME = ''
  815. WHERE T.MSC = '#MSC#' AND T.VALIDFLAG <> '0';
  816. UPDATE COM_MSC_STD_SPEC T
  817. SET T.VALIDFLAG = '#VALIDFLAG2#',
  818. T.UPDATE_NAME = '#UPDATE_NAME#',
  819. T.UPDATE_TIME = SYSDATE,
  820. T.DELETE_NAME = '',
  821. T.DELETE_TIME = ''
  822. WHERE T.MSC = '#MSC#' AND T.VALIDFLAG <> '0';
  823. UPDATE COM_MSC_STD_WATER T
  824. SET T.VALIDFLAG = '#VALIDFLAG2#',
  825. T.UPDATE_NAME = '#UPDATE_NAME#',
  826. T.UPDATE_TIME = SYSDATE,
  827. T.DELETE_NAME = '',
  828. T.DELETE_TIME = ''
  829. WHERE T.MSC = '#MSC#' AND T.VALIDFLAG <> '0';
  830. UPDATE COM_MSC_STD_PROCESS T
  831. SET T.VALIDFLAG = '#VALIDFLAG2#',
  832. T.UPDATE_NAME = '#UPDATE_NAME#',
  833. T.UPDATE_TIME = SYSDATE,
  834. T.DELETE_NAME = '',
  835. T.DELETE_TIME = ''
  836. WHERE T.MSC = '#MSC#' AND T.VALIDFLAG <> '0';
  837. UPDATE COM_MSC_BACKLOG T
  838. SET T.VALIDFLAG = '#VALIDFLAG2#',
  839. T.UPDATE_NAME = '#UPDATE_NAME#',
  840. T.UPDATE_TIME = SYSDATE,
  841. T.DELETE_NAME = '',
  842. T.DELETE_TIME = ''
  843. WHERE T.MSC = '#MSC#' AND T.VALIDFLAG <> '0';
  844. END IF;
  845. END;
  846. ]]>
  847. </query>
  848. <query id="MscManage.updateMscNkState" desc="更新冶金规范内控状态位">
  849. UPDATE COM_MSC T
  850. SET T.VALIDFLAG_NK = '#VALIDFLAG_NK#',
  851. T.AUDIT_NAME_NK = DECODE('#ACTION_TYPE#', 'Audit', '#AUDIT_NAME_NK#', 'AuditFail', '#AUDIT_NAME_NK#', T.AUDIT_NAME_NK),
  852. T.AUDIT_TIME_NK = TO_DATE(DECODE('#ACTION_TYPE#', 'Audit', TO_CHAR(SYSDATE, 'YYYYMMDDHH24MISS'),
  853. 'AuditFail', TO_CHAR(SYSDATE, 'YYYYMMDDHH24MISS'), NULL), 'YYYYMMDDHH24MISS'),
  854. T.REMARK_NK = DECODE('#ACTION_TYPE#', 'Audit', '#REMARK_NK#', 'AuditFail', '#REMARK_NK#', T.REMARK_NK)
  855. WHERE T.MSC = '#MSC#'
  856. </query>
  857. <query id="MscManage.updateBackLogNkState" desc="更新制程内控状态位">
  858. <![CDATA[
  859. UPDATE COM_MSC_BACKLOG T
  860. SET T.VALIDFLAG_NK = '#VALIDFLAG_NK#',
  861. T.UPDATE_NAME = '#UPDATE_NAME#',
  862. T.UPDATE_TIME = SYSDATE,
  863. T.DELETE_NAME = '',
  864. T.DELETE_TIME = ''
  865. WHERE T.MSC = '#MSC#' AND T.VALIDFLAG_NK <> '0'
  866. ]]>
  867. </query>
  868. <query id="MscManage.loadMsc" desc="加载冶金规范码(MSC以000结尾的为标志MSC)">
  869. <![CDATA[
  870. SELECT A.MSC, A.MSC_DESC
  871. FROM COM_PSC_R_MSC A
  872. FULL JOIN COM_MSC B ON A.MSC = B.MSC
  873. WHERE B.VALIDFLAG = 'C'
  874. AND A.PSC = '#PSC#'
  875. AND B.MSC LIKE '__________000'
  876. ORDER BY A.MSC
  877. ]]>
  878. </query>
  879. <query id="MscManage.queryMscBackLog" desc="查询冶金规范产线">
  880. <![CDATA[
  881. SELECT MSC,
  882. MSC_PLINE,
  883. WHOLE_BACKLOG,
  884. WHOLE_BACKLOG_DESC,
  885. CREATE_NAME,
  886. TO_CHAR(CREATE_TIME, 'YYYY-MM-DD HH24:MI:SS') CREATE_TIME,
  887. UPDATE_NAME,
  888. TO_CHAR(UPDATE_TIME, 'YYYY-MM-DD HH24:MI:SS') UPDATE_TIME,
  889. DELETE_NAME,
  890. TO_CHAR(DELETE_TIME, 'YYYY-MM-DD HH24:MI:SS') DELETE_TIME,
  891. VALIDFLAG,
  892. DECODE(VALIDFLAG, '1', '录入状态', '2', '提交审核', '3', '已审核', '0', '无效', '未识别') VALIDFLAG_NAME,
  893. VALIDFLAG_NK,
  894. DECODE(VALIDFLAG_NK, '1', '录入状态', '2', '提交审核', '3', '已审核', '0', '无效', '未识别') VALIDFLAG_NK_NAME,
  895. MEMO,
  896. PROCESS_NO
  897. FROM COM_MSC_BACKLOG
  898. WHERE MSC = '#MSC#'
  899. AND VALIDFLAG IN ('1', '2', '3', '#VALIDFLAG#')
  900. ORDER BY MSC_PLINE ASC
  901. ]]>
  902. </query>
  903. <query id="MscManage.queryMaxBackLogPline" desc="查询最大冶金规范产线号">
  904. <![CDATA[
  905. SELECT REPLACE(LPAD(NVL(MAX(MSC_PLINE + 1), '1'), 6), ' ', '0') MAX_VALUE
  906. FROM COM_MSC_BACKLOG
  907. WHERE MSC = '#MSC#'
  908. ]]>
  909. </query>
  910. <query id="MscManage.insertMscBackLog" desc="新增冶金规范产线">
  911. <![CDATA[
  912. INSERT INTO COM_MSC_BACKLOG
  913. (MSC,
  914. MSC_PLINE,
  915. WHOLE_BACKLOG,
  916. WHOLE_BACKLOG_DESC,
  917. CREATE_NAME,
  918. PROCESS_NO,
  919. MEMO,
  920. CREATE_TIME)
  921. VALUES
  922. ('#MSC#',
  923. '#MSC_PLINE#',
  924. '#WHOLE_BACKLOG#',
  925. '#WHOLE_BACKLOG_DESC#',
  926. '#CREATE_NAME#',
  927. '#PROCESS_NO#',
  928. '#MEMO#',
  929. SYSDATE)
  930. ]]>
  931. </query>
  932. <query id="MscManage.getMscBackLogCnt" desc="获取冶金规范产线数目">
  933. <![CDATA[
  934. SELECT COUNT(1) COUNT
  935. FROM COM_MSC_BACKLOG T
  936. WHERE T.MSC = '#MSC#'
  937. AND T.MSC_PLINE = '#MSC_PLINE#'
  938. ]]>
  939. </query>
  940. <query id="MscManage.updateMscBackLog" desc="设置冶金规范产线">
  941. <![CDATA[
  942. UPDATE COM_MSC_BACKLOG
  943. SET UPDATE_NAME = '#UPDATE_NAME#',
  944. UPDATE_TIME = SYSDATE,
  945. MEMO = '#MEMO#',
  946. PROCESS_NO = '#PROCESS_NO#',
  947. WHOLE_BACKLOG = '#WHOLE_BACKLOG#',
  948. WHOLE_BACKLOG_DESC = '#WHOLE_BACKLOG_DESC#'
  949. WHERE MSC = '#MSC#'
  950. AND MSC_PLINE = '#MSC_PLINE#'
  951. ]]>
  952. </query>
  953. <query id="MscManage.deleteMscProcess" desc="删除工序表">
  954. <![CDATA[
  955. DELETE FROM COM_MSC_PROCESS WHERE MSC = '#MSC#' AND MSC_PLINE = '#MSC_PLINE#'
  956. ]]>
  957. </query>
  958. <query id="MscManage.insertMscProcess" desc="添加工序基础">
  959. <![CDATA[
  960. INSERT INTO COM_MSC_PROCESS
  961. (MSC,
  962. MSC_PLINE,
  963. BACKLOG_SEQ,
  964. CREATE_NAME,
  965. PROCESS_CODE,
  966. PROCESS_DESC,
  967. MINUTE_PRODUCT,
  968. MINUTE_WAITE,
  969. BATCH_WAITE,
  970. MINUTE_PRODUCT_OUT,
  971. MINUTE_WAITE_OUT,
  972. BATCH_WAITE_OUT,
  973. CIC,
  974. PIC,
  975. SIC,
  976. DIC,
  977. WIC,
  978. GIC,
  979. PROCESS_CODE_C,
  980. PROCESS_DESC_C,
  981. PROCESS_SEQ,
  982. CREATE_TIME)
  983. VALUES
  984. ('#MSC#', '#MSC_PLINE#',
  985. (SELECT NVL(MAX(BACKLOG_SEQ) + 1, '1') BACKLOG_SEQ
  986. FROM COM_MSC_PROCESS
  987. WHERE MSC = '#MSC#'
  988. AND MSC_PLINE = '#MSC_PLINE#'), '#CREATE_NAME#', '#PROCESS_CODE#',
  989. '#PROCESS_DESC#', '#MINUTE_PRODUCT#', '#MINUTE_WAITE#', '#BATCH_WAITE#',
  990. '#MINUTE_PRODUCT_OUT#', '#MINUTE_WAITE_OUT#', '#BATCH_WAITE_OUT#',
  991. '#CIC#', '#PIC#', '#SIC#', '#DIC#', '#WIC#', '#GIC#', '#PROCESS_CODE_C#', '#PROCESS_DESC_C#',
  992. '#PROCESS_SEQ#', SYSDATE)
  993. ]]>
  994. </query>
  995. <query id="MscManage.deleteMscStation" desc="删除工序点">
  996. <![CDATA[
  997. DELETE FROM COM_MSC_STATION T WHERE T.MSC = '#MSC#' AND T.MSC_PLINE = '#MSC_PLINE#'
  998. AND T.PROCESS_CODE = '#PROCESS_CODE#'
  999. ]]>
  1000. </query>
  1001. <query id="MscManage.insertMscStation" desc="添加工序点">
  1002. <![CDATA[
  1003. INSERT INTO COM_MSC_STATION
  1004. (MSC,
  1005. MSC_PLINE,
  1006. BACKLOG_SEQ,
  1007. PROCESS_CODE,
  1008. PROCESS_DESC,
  1009. STATION_CODE,
  1010. STATION_DESC,
  1011. STATION_TYPE,
  1012. STATION_ID,
  1013. COST,
  1014. CHOOSE,
  1015. RETURN_RESULT,
  1016. SEND_CHECKPLAN,
  1017. CREATE_NAME,
  1018. PROCESS_SEQ,
  1019. MEMO,
  1020. PROCESS_CODE_C,
  1021. PROCESS_DESC_C,
  1022. CREATE_TIME)
  1023. VALUES
  1024. ('#MSC#', '#MSC_PLINE#',
  1025. (SELECT NVL(MAX(BACKLOG_SEQ) + 1, '1') BACKLOG_SEQ
  1026. FROM COM_MSC_STATION
  1027. WHERE MSC = '#MSC#'
  1028. AND MSC_PLINE = '#MSC_PLINE#'
  1029. AND PROCESS_CODE = '#PROCESS_CODE#'),
  1030. '#PROCESS_CODE#', '#PROCESS_DESC#', '#STATION_CODE#', '#STATION_DESC#',
  1031. '#STATION_TYPE#', '#STATION_ID#', '#COST#', '#CHOOSE#', '#RETURN_RESULT#',
  1032. '#SEND_CHECKPLAN#', '#CREATE_NAME#', '#PROCESS_SEQ#', '#MEMO#',
  1033. '#PROCESS_CODE_C#', '#PROCESS_DESC_C#', SYSDATE)
  1034. ]]>
  1035. </query>
  1036. <query id="MscManage.copyMustStation" desc="复制工序点中的必选项数据到冶金规范工序点表">
  1037. <![CDATA[
  1038. DECLARE
  1039. P_PROCESS_CODE COM_BASE_PROCESS.PROCESS_CODE%TYPE := '#PROCESS_CODE#';
  1040. P_NAME COM_BASE_PROCESS.CREATE_NAME%TYPE := '#CREATE_NAME#';
  1041. P_MSC COM_MSC_BACKLOG.MSC%TYPE := '#MSC#';
  1042. P_MSC_PLINE COM_MSC_BACKLOG.MSC_PLINE%TYPE := '#MSC_PLINE#';
  1043. P_PROCESS_CODE_C COM_MSC_PROCESS.PROCESS_CODE_C%TYPE := '#PROCESS_CODE_C#';
  1044. P_ICOUNT COM_BASE_PROCESS.ICOUNT%TYPE := '#ICOUNT#';
  1045. I NUMBER(3);
  1046. P_STAION_COUNT NUMBER(3);
  1047. BEGIN
  1048. FOR VROW IN (SELECT A.*
  1049. FROM COM_BASE_STATION A, COM_BASE_PROCESS_R_STATION B
  1050. WHERE A.PROCESS_CODE = P_PROCESS_CODE
  1051. AND A.VALIDFLAG = '1'
  1052. AND A.CHOOSE = '1'
  1053. AND A.STATION_CODE = B.STATION_CODE
  1054. AND B.VALIDFLAG = '1'
  1055. AND B.PROCESS_CDOE_C = P_PROCESS_CODE_C) LOOP
  1056. SELECT COUNT(1)
  1057. INTO P_STAION_COUNT
  1058. FROM COM_MSC_STATION T
  1059. WHERE T.MSC = P_MSC
  1060. AND T.MSC_PLINE = P_MSC_PLINE
  1061. AND T.PROCESS_CODE = P_PROCESS_CODE;
  1062. IF P_STAION_COUNT = 0 THEN
  1063. FOR I IN 1 .. P_ICOUNT LOOP
  1064. INSERT INTO COM_MSC_STATION
  1065. (MSC,
  1066. MSC_PLINE,
  1067. BACKLOG_SEQ,
  1068. PROCESS_CODE,
  1069. PROCESS_DESC,
  1070. STATION_CODE,
  1071. STATION_DESC,
  1072. STATION_TYPE,
  1073. STATION_ID,
  1074. COST,
  1075. CHOOSE,
  1076. RETURN_RESULT,
  1077. SEND_CHECKPLAN,
  1078. CREATE_NAME,
  1079. PROCESS_SEQ,
  1080. PROCESS_CODE_C,
  1081. PROCESS_DESC_C,
  1082. MEMO,
  1083. CREATE_TIME)
  1084. VALUES
  1085. (P_MSC,
  1086. P_MSC_PLINE,
  1087. (SELECT NVL(MAX(BACKLOG_SEQ) + 1, '1') BACKLOG_SEQ
  1088. FROM COM_MSC_STATION
  1089. WHERE MSC = P_MSC
  1090. AND MSC_PLINE = P_MSC_PLINE
  1091. AND PROCESS_CODE = P_PROCESS_CODE),
  1092. VROW.PROCESS_CODE,
  1093. VROW.PROCESS_DESC,
  1094. VROW.STATION_CODE,
  1095. VROW.STATION_DESC,
  1096. VROW.STATION_TYPE,
  1097. VROW.STATION_ID,
  1098. VROW.COST,
  1099. VROW.CHOOSE,
  1100. VROW.RETURN_RESULT,
  1101. VROW.SEND_CHECKPLAN,
  1102. P_NAME,
  1103. I,
  1104. '#PROCESS_CODE_C#',
  1105. '#PROCESS_DESC_C#',
  1106. '',
  1107. SYSDATE);
  1108. END LOOP;
  1109. END IF;
  1110. END LOOP;
  1111. END;
  1112. ]]>
  1113. </query>
  1114. <query id="MscManage.queryMaxMscPline" desc="查询最大冶金规范产线号">
  1115. <![CDATA[
  1116. SELECT REPLACE(LPAD(NVL(MAX(MSC_PLINE + 1), '1'), 6), ' ', '0') MSC_PLINE
  1117. FROM COM_MSC_BACKLOG
  1118. WHERE MSC = '#MSC#'
  1119. ]]>
  1120. </query>
  1121. <query id="MscManage.updateBackLogState" desc="修改冶金规范产线状态">
  1122. <![CDATA[
  1123. DECLARE
  1124. P_VALIDFLAG COM_MSC_BACKLOG.VALIDFLAG%TYPE := '#VALIDFLAG#';
  1125. P_MSC COM_MSC_BACKLOG.MSC%TYPE := '#MSC#';
  1126. P_MSC_PLINE COM_MSC_BACKLOG.MSC_PLINE%TYPE := '#MSC_PLINE#';
  1127. P_NAME COM_MSC_BACKLOG.UPDATE_NAME%TYPE := '#UPDATE_NAME#';
  1128. BEGIN
  1129. IF P_VALIDFLAG = '1' THEN
  1130. UPDATE COM_MSC_BACKLOG
  1131. SET VALIDFLAG = '1',
  1132. UPDATE_NAME = P_NAME,
  1133. UPDATE_TIME = SYSDATE,
  1134. DELETE_NAME = '',
  1135. DELETE_TIME = ''
  1136. WHERE MSC = P_MSC
  1137. AND MSC_PLINE = P_MSC_PLINE;
  1138. ELSIF P_VALIDFLAG = '0' THEN
  1139. UPDATE COM_MSC_BACKLOG
  1140. SET VALIDFLAG = '0',
  1141. DELETE_NAME = P_NAME,
  1142. DELETE_TIME = SYSDATE
  1143. WHERE MSC = P_MSC
  1144. AND MSC_PLINE = P_MSC_PLINE;
  1145. END IF;
  1146. END;
  1147. ]]>
  1148. </query>
  1149. <query id="MscManage.isExistProcess" desc="制程下面是否存在工序">
  1150. <![CDATA[
  1151. SELECT COUNT(1)
  1152. FROM COM_MSC_PROCESS T
  1153. WHERE T.MSC = '#MSC#'
  1154. AND T.MSC_PLINE = '#MSC_PLINE#'
  1155. AND T.VALIDFLAG = '1'
  1156. ]]>
  1157. </query>
  1158. <query id="MscManage.isExistGrade" desc="制程下面是否存在钢种">
  1159. <![CDATA[
  1160. SELECT COUNT(1) FROM COM_MSC_GRADE T WHERE T.MSC = '#MSC#'
  1161. AND T.MSC_PLINE = '#MSC_PLINE#' AND T.VALIDFLAG = '1'
  1162. ]]>
  1163. </query>
  1164. <query id="MscManage.queryMscStationCnt" desc="查询工序下的工序点个数">
  1165. <![CDATA[
  1166. SELECT COUNT(1)
  1167. FROM COM_BASE_PROCESS_R_STATION B,COM_BASE_STATION BS
  1168. WHERE BS.PROCESS_CODE = '#PROCESS_CODE#'
  1169. AND B.PROCESS_CDOE_C = '#PROCESS_CDOE_C#'
  1170. AND BS.VALIDFLAG = '1'
  1171. AND B.STATION_CODE = BS.STATION_CODE
  1172. AND B.VALIDFLAG = '1'
  1173. ]]>
  1174. </query>
  1175. <query id="MscManage.queryMscProcess" desc="查询MSC工序">
  1176. <![CDATA[
  1177. SELECT DECODE(BE.STYLE, 'A', '一级工序', 'B', '二级工序', '未识别') STYLE,
  1178. BE.PROCESS_ID,
  1179. BE.COST,
  1180. NVL(MS.MINUTE_PRODUCT, BE.MINUTE_PRODUCT) MINUTE_PRODUCT,
  1181. NVL(MS.MINUTE_WAITE, BE.MINUTE_WAITE) MINUTE_WAITE,
  1182. NVL(MS.BATCH_WAITE, BE.BATCH_WAITE) BATCH_WAITE,
  1183. NVL(MS.MINUTE_PRODUCT_OUT, BE.MINUTE_PRODUCT_OUT) MINUTE_PRODUCT_OUT,
  1184. NVL(MS.MINUTE_WAITE_OUT, BE.MINUTE_WAITE_OUT) MINUTE_WAITE_OUT,
  1185. NVL(MS.BATCH_WAITE_OUT, BE.BATCH_WAITE_OUT) BATCH_WAITE_OUT,
  1186. BE.ICOUNT MAX_COUNT,
  1187. 1 ICOUNT,
  1188. MS.MEMO,
  1189. MS.MSC,
  1190. BE.PROCESS_CODE,
  1191. BE.PROCESS_DESC,
  1192. MS.BACKLOG_SEQ,
  1193. MS.CIC,
  1194. MS.PIC,
  1195. MS.SIC,
  1196. MS.DIC,
  1197. MS.WIC,
  1198. MS.GIC,
  1199. NVL(MS.PROCESS_SEQ, '1') PROCESS_SEQ,
  1200. NVL(MS.PROCESS_SEQ, '1') PROCESS_SEQ_OLD,
  1201. MS.PROCESS_CODE_C,
  1202. MS.PROCESS_CODE_C PROCESS_CODE_C_OLD,
  1203. MS.PROCESS_DESC_C
  1204. FROM COM_BASE_PROCESS BE
  1205. LEFT JOIN COM_MSC_PROCESS MS
  1206. ON MS.PROCESS_CODE = BE.PROCESS_CODE
  1207. AND MS.MSC = '#MSC#'
  1208. AND MS.MSC_PLINE = '#MSC_PLINE#'
  1209. AND MS.VALIDFLAG = '1'
  1210. WHERE BE.VALIDFLAG = '1'
  1211. AND DECODE('#PROCESS_CODE#', NULL, '1', BE.PROCESS_CODE) =
  1212. DECODE('#PROCESS_CODE#', NULL, '1', '#PROCESS_CODE#')
  1213. ORDER BY BE.PROCESS_ID
  1214. ]]>
  1215. </query>
  1216. <query id="MscManage.queryMscProcess2" desc="查询工序基础(用于树形结构)">
  1217. <![CDATA[
  1218. SELECT
  1219. MS.MSC,
  1220. MS.MSC_PLINE,
  1221. MS.PROCESS_CODE,
  1222. MS.CIC,
  1223. MS.PIC,
  1224. MS.SIC,
  1225. MS.DIC,
  1226. MS.WIC,
  1227. MS.GIC,
  1228. A.PROCESS_DESC,
  1229. BS.PROCESS_ID
  1230. FROM COM_MSC_PROCESS MS
  1231. LEFT JOIN COM_BASE_PROCESS BS ON MS.PROCESS_CODE = BS.PROCESS_CODE
  1232. LEFT JOIN COM_BASE_PROCESS A ON A.PROCESS_CODE = MS.PROCESS_CODE
  1233. WHERE MS.MSC = '#MSC#' AND MS.VALIDFLAG = '1'
  1234. ORDER BY BS.PROCESS_ID ASC
  1235. ]]>
  1236. </query>
  1237. <query id="MscManage.queryMscStation" desc="查询冶金工序点">
  1238. <![CDATA[
  1239. SELECT A.BASENAME STATION_TYPE_DESC,
  1240. BS.STATION_TYPE,
  1241. BS.STATION_ID,
  1242. BS.PROCESS_DESC,
  1243. BS.PROCESS_CODE,
  1244. BS.STATION_CODE,
  1245. BS.STATION_DESC,
  1246. NVL(MS.PROCESS_SEQ, '1') PROCESS_SEQ,
  1247. B.PROCESS_CDOE_C PROCESS_CODE_C,
  1248. B.PROCESS_DESC_C,
  1249. DECODE(NVL(MS.CHOOSE, BS.CHOOSE), '1', 'True', 'False') CHOOSE,
  1250. DECODE(NVL(MS.RETURN_RESULT, BS.RETURN_RESULT), '1', 'True', 'False') RETURN_RESULT,
  1251. DECODE(NVL(MS.SEND_CHECKPLAN, BS.SEND_CHECKPLAN), '1', 'True', 'False') SEND_CHECKPLAN,
  1252. DECODE(BS.CHOOSE, '1', 'True', 'False') CHK,
  1253. MS.CREATE_NAME,
  1254. TO_CHAR(MS.CREATE_TIME, 'YYYY-MM-DD HH24:MI:SS') CREATE_TIME,
  1255. MS.UPDATE_NAME,
  1256. TO_CHAR(MS.UPDATE_TIME, 'YYYY-MM-DD HH24:MI:SS') UPDATE_TIME,
  1257. MS.DELETE_NAME,
  1258. TO_CHAR(MS.DELETE_TIME, 'YYYY-MM-DD HH24:MI:SS') DELETE_TIME,
  1259. MS.VALIDFLAG,
  1260. DECODE(MS.VALIDFLAG, '1', '有效', '0', '无效', '未识别') VALIDFLAG_NAME,
  1261. MS.MSC,
  1262. MS.MSC_PLINE,
  1263. NVL(MS.COST, BS.COST) COST,
  1264. MS.GROUP_SEQ,
  1265. MS.PROCESS_SEQ,
  1266. MS.BACKLOG_SEQ,
  1267. MS.MEMO
  1268. FROM COM_BASE_PROCESS_R_STATION B, COM_BASE_STATION BS
  1269. LEFT JOIN COM_MSC_STATION MS
  1270. ON MS.STATION_CODE = BS.STATION_CODE
  1271. AND MS.MSC = '#MSC#'
  1272. AND MS.MSC_PLINE = '#MSC_PLINE#'
  1273. AND MS.PROCESS_CODE = '#PROCESS_CODE#'
  1274. AND MS.VALIDFLAG = '1'
  1275. LEFT JOIN COM_BASE_INFO A
  1276. ON A.BASECODE = BS.STATION_TYPE
  1277. WHERE BS.VALIDFLAG = '1'
  1278. AND BS.PROCESS_CODE = '#PROCESS_CODE#'
  1279. AND B.STATION_CODE = BS.STATION_CODE
  1280. AND B.VALIDFLAG = '1'
  1281. AND B.PROCESS_CDOE_C = '#PROCESS_CODE_C#'
  1282. ORDER BY BS.STATION_ID
  1283. ]]>
  1284. </query>
  1285. <query id="MscManage.queryMscStation2" desc="查询工序点2(用于树形结构)">
  1286. <![CDATA[
  1287. SELECT MS.MSC,
  1288. MS.MSC_PLINE,
  1289. MS.PROCESS_CODE,
  1290. MS.STATION_CODE,
  1291. NVL(MS.PROCESS_SEQ, '1') PROCESS_SEQ
  1292. A.STATION_DESC,
  1293. MS.STATION_ID,
  1294. C.PROCESS_ID
  1295. FROM COM_MSC_STATION MS
  1296. LEFT JOIN COM_BASE_STATION A ON A.STATION_CODE = MS.STATION_CODE
  1297. LEFT JOIN COM_BASE_PROCESS C ON C.PROCESS_CODE = MS.PROCESS_CODE
  1298. AND C.VALIDFLAG = '1'
  1299. WHERE MS.MSC = '#MSC#' AND MS.VALIDFLAG = '1'
  1300. ORDER BY C.PROCESS_ID, MS.PROCESS_SEQ, MS.STATION_ID
  1301. ]]>
  1302. </query>
  1303. <query id="MscManage.queryProcessC" desc="查询二级工序">
  1304. <![CDATA[
  1305. SELECT T.PROCESS_CDOE_C, T.PROCESS_DESC_C, T.PROCESS_CDOE, T.PROCESS_DESC
  1306. from com_base_process_c t WHERE T.VALIDFLAG = '1'
  1307. ORDER BY T.PROCESS_DESC_C ASC
  1308. ]]>
  1309. </query>
  1310. <query id="MscManage.queryProcessCode" desc="查询工序代码">
  1311. <![CDATA[
  1312. SELECT T.PROCESS_CODE
  1313. FROM COM_BASE_PROCESS T
  1314. WHERE T.VALIDFLAG = '1'
  1315. ORDER BY T.PROCESS_ID
  1316. ]]>
  1317. </query>
  1318. <query id="MscManage.queryGrade" desc="查询钢种">
  1319. <![CDATA[
  1320. SELECT MSC,
  1321. MSC_PLINE,
  1322. GRADECODE,
  1323. GRADENAME,
  1324. ASSORTMENT_CODE,
  1325. ASSORTMENT_NAME,
  1326. CREATE_NAME,
  1327. CREATE_TIME,
  1328. UPDATE_NAME,
  1329. UPDATE_TIME,
  1330. DELETE_NAME,
  1331. DELETE_TIME,
  1332. VALIDFLAG,
  1333. MEMO,
  1334. STD_CODE,
  1335. STD_NAME,
  1336. CIC
  1337. FROM COM_MSC_GRADE
  1338. WHERE MSC = '#MSC#'
  1339. AND MSC_PLINE = '#MSC_PLINE#'
  1340. AND VALIDFLAG = '1'
  1341. ]]>
  1342. </query>
  1343. <query id="MscManage.queryGradeRSpec" desc="查询钢种下的规格表(从表)">
  1344. <![CDATA[
  1345. SELECT MSC,
  1346. MSC_PLINE,
  1347. GRADECODE,
  1348. GRADENAME,
  1349. HEIGHT_MIN,
  1350. DIMATER_MIN,
  1351. DIMATER_MAX,
  1352. HEIGHT_MIAX,
  1353. CREATE_NAME,
  1354. TO_CHAR(CREATE_TIME, 'YYYY-MM-DD HH24:MI:SS') CREATE_TIME,
  1355. UPDATE_NAME,
  1356. TO_CHAR(UPDATE_TIME, 'YYYY-MM-DD HH24:MI:SS') UPDATE_TIME,
  1357. DELETE_NAME,
  1358. TO_CHAR(DELETE_TIME, 'YYYY-MM-DD HH24:MI:SS') DELETE_TIME,
  1359. VALIDFLAG,
  1360. MEMO
  1361. FROM COM_MSC_GRADE_R_SPEC T
  1362. WHERE MSC = '#MSC#'
  1363. AND MSC_PLINE = '#MSC_PLINE#'
  1364. AND VALIDFLAG = '1'
  1365. AND EXISTS (SELECT 1
  1366. FROM COM_MSC_GRADE A
  1367. WHERE MSC = '#MSC#'
  1368. AND MSC_PLINE = '#MSC_PLINE#'
  1369. AND VALIDFLAG = '1'
  1370. AND A.GRADECODE = T.GRADECODE)
  1371. ]]>
  1372. </query>
  1373. <query id="MscManage.queryMscItemByMsc" desc="查询冶金规范项目">
  1374. <![CDATA[
  1375. SELECT T.ITEM, A.BASENAME ITEM_NAME, T.ITEM_C
  1376. FROM COM_MSC_ITEM T
  1377. LEFT JOIN COM_BASE_INFO A ON A.BASECODE = T.ITEM
  1378. WHERE T.MSC = '#MSC#'
  1379. AND T.VALIDFLAG = '1'
  1380. ORDER BY T.INDEX_SEQ
  1381. ]]>
  1382. </query>
  1383. <query id="MscManage.queryMscBackLogByMsc" desc="查询冶金产线">
  1384. <![CDATA[
  1385. SELECT T.MSC_PLINE
  1386. FROM COM_MSC_BACKLOG T
  1387. WHERE T.MSC = '#MSC#'
  1388. AND T.VALIDFLAG IN ('1', '2', '3')
  1389. ]]>
  1390. </query>
  1391. <query id="MscManage.queryMscProcessByMsc" desc="查询冶金工序">
  1392. <![CDATA[
  1393. SELECT T.MSC_PLINE,
  1394. T.PROCESS_CODE,
  1395. T.PROCESS_DESC,
  1396. T.CIC,
  1397. T.PIC,
  1398. T.DIC,
  1399. T.SIC,
  1400. T.WIC,
  1401. T.GIC
  1402. FROM COM_MSC_PROCESS T
  1403. WHERE T.MSC = '#MSC#'
  1404. AND T.VALIDFLAG = '1'
  1405. ORDER BY MSC_PLINE, BACKLOG_SEQ
  1406. ]]>
  1407. </query>
  1408. <query id="MscManage.queryMscStationByMsc" desc="查询冶金工序点">
  1409. <![CDATA[
  1410. SELECT T.MSC_PLINE, T.PROCESS_CODE, T.STATION_CODE, T.STATION_DESC, NVL(T.PROCESS_SEQ, '1') PROCESS_SEQ
  1411. FROM COM_MSC_STATION T
  1412. WHERE T.MSC = '#MSC#'
  1413. AND T.VALIDFLAG = '1'
  1414. ORDER BY T.MSC_PLINE, T.PROCESS_CODE, T.PROCESS_SEQ, T.STATION_ID
  1415. ]]>
  1416. </query>
  1417. <query id="MscManage.queryIsExistStdMsc" desc="查询是否存在标准MSC">
  1418. <![CDATA[
  1419. SELECT COUNT(1) FROM COM_PSC_R_MSC T WHERE T.PSC = '#PSC#'
  1420. AND T.MSC LIKE '__________000'
  1421. ]]>
  1422. </query>
  1423. <query id="MscManage.queryProductType" desc="查询品名类型">
  1424. <![CDATA[
  1425. SELECT PRODUC_TYPE
  1426. FROM COM_BASE_PRODUCT T
  1427. WHERE T.PRODUCCODE = '#PRODUCCODE#'
  1428. ]]>
  1429. </query>
  1430. <query id="MscManage.queryUnitCodeByPsc" desc="查询PSC表科室">
  1431. <![CDATA[
  1432. SELECT T.UNIT_CODE, T.DEPARTMENT_CODE FROM COM_PSC T WHERE T.PSC = '#PSC#'
  1433. ]]>
  1434. </query>
  1435. <query id="MscManage.queryJgByMsc" desc="冶金规范界面根据冶金规范码查询接箍信息">
  1436. <![CDATA[
  1437. SELECT AA.*,
  1438. B.SPEC_NAME SPEC_JG_DESC,
  1439. C.BASENAME PRODUCCODE_JG_DESC,
  1440. D.STEELNAME STEELCODE_JG_DESC,
  1441. F.MODEL_DESC,
  1442. G.PRODUCNAME,
  1443. H.BASENAME STYLE_JG_DESC
  1444. FROM (SELECT T.DEMAND_DETECTION,
  1445. DECODE(T.DEMAND_BONDERIZING, '1', 'TRUE', 'FALSE') DEMAND_BONDERIZING,
  1446. DECODE(T.DEMAND_COPPER, '1', 'TRUE', 'FALSE') DEMAND_COPPER,
  1447. DECODE(T.DEMAND_BLAST, '1', 'TRUE', 'FALSE') DEMAND_BLAST,
  1448. T.MSC,
  1449. T.MEMO,
  1450. A.STD_NAME,
  1451. A.STD_STYLE_DESC,
  1452. A.CHECK_J_VAL,
  1453. (SELECT REPLACE(WM_CONCAT(A.STEELCODE_JG_DESC),',',';')
  1454. FROM COM_MSC_JG_R_STEEL N WHERE N.STEELCODE= A.STEELCODE_JG) REP_STEELNAME,
  1455. A.TAPER,
  1456. A.MIN_D_JG,
  1457. A.MAX_D_JG,
  1458. A.CODE_JG,
  1459. A.SPEC_JG,
  1460. A.PRODUCCODE_JG,
  1461. A.STEELCODE_JG,
  1462. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = A.STYLE_JG) STYLE_JG,
  1463. A.PRODUCCODE,
  1464. A.MODEL_CODE,
  1465. A.DIAMETER_JG,
  1466. A.LENGTH_JG,
  1467. A.HEIGHT_JG,
  1468. A.WEIGHT_JG,
  1469. A.MIN_D,
  1470. A.MIN_H,
  1471. A.DIAMETER_PL,
  1472. A.HEIGHT_PL,
  1473. A.LENGTH_MIN,
  1474. A.LENGTH_MAX,
  1475. A.MIN_H_CP,
  1476. A.MAX_H_CP,
  1477. A.MIN_D_CP,
  1478. A.MAX_D_CP,
  1479. A.DIAMETER,
  1480. A.ALPHA,
  1481. A.VALIDFLAG,
  1482. DECODE(A.VALIDFLAG, '1', '有效', '0', '无效', '未识别') VALIDFLAG_NAME,
  1483. A.CREATE_NAME,
  1484. A.CREATE_TIME,
  1485. A.UPDATE_NAME,
  1486. A.UPDATE_TIME,
  1487. A.DELETE_NAME,
  1488. A.DELETE_TIME
  1489. FROM COM_MSC_R_JG T, COM_MSC_JG A
  1490. WHERE T.MSC = '#MSC#'
  1491. AND T.STOCK_STYLE = 'A'
  1492. AND T.VALIDFLAG = '1'
  1493. AND T.CODE_JG = A.CODE_JG) AA
  1494. LEFT JOIN COM_BASE_SPEC B
  1495. ON B.SPEC_CODE = AA.SPEC_JG
  1496. LEFT JOIN COM_BASE_INFO C
  1497. ON C.BASECODE = AA.PRODUCCODE_JG
  1498. LEFT JOIN COM_BASE_STEEL D
  1499. ON D.STEELCODE = AA.STEELCODE_JG
  1500. LEFT JOIN COM_BASE_MODEL F
  1501. ON F.MODEL_CODE = AA.MODEL_CODE
  1502. LEFT JOIN COM_BASE_PRODUCT G
  1503. ON G.PRODUCCODE = AA.PRODUCCODE
  1504. LEFT JOIN COM_BASE_INFO H
  1505. ON H.BASECODE = AA.STYLE_JG
  1506. ]]>
  1507. </query>
  1508. <query id="MscManage.queryBlByJg" desc="接箍备料关联查询2">
  1509. <![CDATA[
  1510. SELECT
  1511. 'TRUE' CHK,
  1512. T1.CODE_JG,
  1513. T1.PSC_BL,
  1514. T2.PRODUCCODE,
  1515. T2.PRODUCNAME,
  1516. T2.STD_CODE,
  1517. T2.STD_NAME,
  1518. T2.STEELCODE,
  1519. T2.STEELNAME,
  1520. T2.STD_STYLE,
  1521. T2.STD_STYLE_DESC,
  1522. T2.MODEL_CODE,
  1523. T2.MODEL_DESC,
  1524. T2.MIN_D,
  1525. T2.MIN_H,
  1526. T2.USE_CODE,
  1527. T2.USE_DESC,
  1528. T1.CREATE_NAME,
  1529. TO_CHAR(T1.CREATE_TIME,'YYYY-MM-DD HH24:MI:SS') CREATE_TIME,
  1530. T1.UPDATE_NAME,
  1531. TO_CHAR(T1.UPDATE_TIME,'YYYY-MM-DD HH24:MI:SS') UPDATE_TIME,
  1532. T1.DELETE_NAME,
  1533. TO_CHAR(T1.DELETE_TIME,'YYYY-MM-DD HH24:MI:SS') DELETE_TIME,
  1534. T1.VALIDFLAG,
  1535. T1.MEMO
  1536. FROM COM_MSC_JG_R_BL T1 ,COM_MSC_BL T2
  1537. WHERE T1.CODE_JG=? AND T1.PSC_BL=T2.PSC_BL
  1538. ]]>
  1539. </query>
  1540. <query id="MscManage.saveMscRJg" desc="保存接箍和冶金规范关系表中的3个附加要求">
  1541. <![CDATA[
  1542. UPDATE COM_MSC_R_JG T
  1543. SET T.DEMAND_DETECTION = '#DEMAND_DETECTION#',
  1544. T.DEMAND_BONDERIZING = '#DEMAND_BONDERIZING#',
  1545. T.DEMAND_COPPER = '#DEMAND_COPPER#',
  1546. T.DEMAND_BLAST = '#DEMAND_BLAST#',
  1547. T.UPDATE_NAME = '#UPDATE_NAME#',
  1548. T.UPDATE_TIME = SYSDATE,
  1549. T.MEMO = '#MEMO#'
  1550. WHERE T.MSC = '#MSC#'
  1551. AND T.CODE_JG = '#CODE_JG#'
  1552. ]]>
  1553. </query>
  1554. <query id="MscManage.queryMscRBlByMsc" desc="冶金规范中的备料查询">
  1555. <![CDATA[
  1556. SELECT 'False' CHK,
  1557. T.MSC,
  1558. T.GROUP_NUM,
  1559. A.PSC_BL,
  1560. A.PRODUCCODE,
  1561. NVL(B.PRODUCNAME, A.PRODUCNAME) PRODUCNAME,
  1562. A.STD_CODE,
  1563. NVL(C.STD_NAME, A.STD_NAME) STD_NAME,
  1564. A.STEELCODE,
  1565. NVL(D.STEELNAME, A.STEELNAME) STEELNAME,
  1566. A.STD_STYLE,
  1567. NVL(F.STD_STYLE_DESC, A.STD_STYLE_DESC) STD_STYLE_DESC,
  1568. A.MODEL_CODE,
  1569. NVL(G.MODEL_DESC, A.MODEL_DESC) MODEL_DESC,
  1570. A.MIN_D,
  1571. A.MIN_H,
  1572. A.USE_CODE,
  1573. NVL(H.STD_NAME, A.USE_DESC) USE_DESC,
  1574. A.CREATE_NAME,
  1575. A.CREATE_TIME,
  1576. A.UPDATE_NAME,
  1577. A.UPDATE_TIME,
  1578. A.DELETE_NAME,
  1579. A.DELETE_TIME,
  1580. A.VALIDFLAG,
  1581. DECODE(A.VALIDFLAG, '1', '有效', '0', '无效', '未识别') VALIDFLAG_NAME,
  1582. A.MEMO
  1583. FROM COM_MSC_R_JG T, COM_MSC_BL A
  1584. LEFT JOIN COM_BASE_PRODUCT B ON B.PRODUCCODE = A.PRODUCCODE
  1585. LEFT JOIN COM_BASE_STD C ON C.STD_CODE = A.STD_CODE
  1586. LEFT JOIN COM_BASE_STEEL D ON D.STEELCODE = A.STEELCODE
  1587. LEFT JOIN COM_BASE_STD_STYLE F ON F.STD_STYLE = A.STD_STYLE
  1588. LEFT JOIN COM_BASE_MODEL G ON G.MODEL_CODE = A.MODEL_CODE
  1589. LEFT JOIN COM_BASE_STD H ON H.STD_CODE = A.USE_CODE
  1590. WHERE A.PSC_BL = T.CODE_JG
  1591. AND T.MSC = ?
  1592. AND T.STOCK_STYLE = 'B'
  1593. AND T.VALIDFLAG = 1
  1594. AND A.VALIDFLAG = '1'
  1595. ]]>
  1596. </query>
  1597. <query id="MscManage.groupBl" desc="分组">
  1598. <![CDATA[
  1599. UPDATE COM_MSC_R_JG T SET T.GROUP_NUM = ? WHERE T.MSC = ? AND T.CODE_JG = ?
  1600. ]]>
  1601. </query>
  1602. <query id="MscManage.queryClient" desc="查询客户">
  1603. <![CDATA[
  1604. SELECT T.CUST_NAME, T.CUST_CODE
  1605. FROM COM_BASE_STD_R_CUST T
  1606. WHERE T.STD_CODE = '#USE_CODE#'
  1607. ]]>
  1608. </query>
  1609. <query id="MscManage.queryStdNameStyle" desc="查询冶金规范码所属的标准和协议。">
  1610. <![CDATA[
  1611. SELECT A.STD_CODE, A.STD_NAME, A.STD_STYLE, B.BASENAME STD_STYLE_NAME
  1612. FROM COM_BASE_STD A
  1613. LEFT JOIN COM_BASE_INFO B
  1614. ON A.STD_STYLE = B.BASECODE
  1615. WHERE A.STD_CODE =
  1616. (SELECT B.STD_CODE
  1617. FROM COM_PSC B
  1618. WHERE B.PSC =
  1619. (SELECT C.PSC FROM COM_PSC_R_MSC C WHERE C.MSC = '#MSC#'))
  1620. ]]>
  1621. </query>
  1622. </queryMap>