FrmStuffSurfaceResult.xml 49 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576
  1. <?xml version="1.0" encoding="UTF-8"?>
  2. <queryMap desc = "管坯表面检验">
  3. <query id = "FrmStuffSurfaceResult.doQueryPlanStoveNo" desc = "查询电炉炉信息">
  4. <![CDATA[
  5. SELECT * FROM (SELECT SUBSTR(T.FURNACENO,0,12)FURNACENO, T.STOVE_NO,MAX(T.PRO_MONTH)PRO_MONTH
  6. FROM PLN_STEELFOR_ORD T
  7. WHERE 1=1
  8. AND T.STATUS<>'00'
  9. ]]>
  10. </query>
  11. <query id = "FrmStuffSurfaceResult.doQueryPlan" desc = "查询切割炉信息">
  12. SELECT
  13. T.CAST_NO,
  14. T.MATERIAL_NO,
  15. T.MATERIAL_NAME,
  16. T.GRADECODE,
  17. T.GRADENAME,
  18. T.DIAMETER,
  19. T.LEN_GP_SINGLE,
  20. T.CUT_NUM_GP,
  21. T.LENGTH_M,
  22. T.TOT_WEIGHT_M,
  23. T.TOT_MUM_M,
  24. T.STOVE_NO,
  25. T.JUDGE_STOVE_NO,
  26. T.FLAG_STOVE_NO,
  27. DECODE(T.CCM_STATE,'10','切割完成','20','表检完成','30','入库完成','切割未完成')CCM_STATE,
  28. T.JUDGE_STOVE_NO_SEQ,
  29. T.FLOWNO,
  30. SUBSTR(T.FURNACENO,0,12)FURNACENO,
  31. T.SEQUENCENO,
  32. T.PRO_PLAN_ID,
  33. T.GX_PLAN_NO,
  34. DECODE(T.SURPLUSFLAG,'0','订单材','1','余材')SURPLUSFLAG,
  35. T.PLINE_CODE,
  36. T.ORDER_NO,
  37. T.GPTYPE,
  38. T.MERGE_NO,
  39. T.STEELCODE,
  40. T.STEELNAME,
  41. T.PRODUCCODE,
  42. T.PRODUCNAME,
  43. T.PLINE_CODE,
  44. T.PLINE_NAME,
  45. T.EF_PLINE_CODE,
  46. T.EF_PLINE_NAME,
  47. T.CUT_NUM
  48. FROM PLN_STEELFOR_ORD T
  49. WHERE T.STATUS >= '10'
  50. AND (T.SURPLUS_TYPE NOT IN('2','3') OR T.SURPLUS_TYPE IS NULL)
  51. </query>
  52. <query id = "FrmStuffSurfaceResult.doQueryResult" desc = "查询表检实绩">
  53. SELECT T.JUDGE_STOVE_NO,
  54. T.JUDGE_STOVE_NO_SEQ,
  55. T.GROUD_NO,
  56. T.STOVE_NO,
  57. T.GRADECODE,
  58. T.GRADENAME,
  59. T.DIMATER,
  60. T.HEIGHT,
  61. T.FIX_LEN,
  62. SUM(T.ACT_WEIGHT) ACT_WEIGHT,
  63. SUM(T.ACT_COUNT) ACT_COUNT,
  64. SUM(T.QUANTITY) QUANTITY,
  65. T.PLINE_CODE,
  66. T.PLINE_NAME,
  67. T.FLOW_NO1,
  68. T.FLOW_NO11,
  69. T.FLOW_NO2,
  70. T.FLOW_NO21,
  71. T.FLOW_NO3,
  72. T.FLOW_NO31,
  73. T.FLOW_NO4,
  74. T.FLOW_NO41,
  75. T.FLOW_NO5,
  76. T.FLOW_NO51,
  77. T.FLOW_NO6,
  78. T.FLOW_NO61,
  79. T.MIN_DIAMETER1,
  80. T.MIN_DIAMETER11,
  81. T.MIN_DIAMETER2,
  82. T.MIN_DIAMETER21,
  83. T.MIN_DIAMETER3,
  84. T.MIN_DIAMETER31,
  85. T.MIN_DIAMETER4,
  86. T.MIN_DIAMETER41,
  87. T.MIN_DIAMETER5,
  88. T.MIN_DIAMETER51,
  89. T.MIN_DIAMETER6,
  90. T.MIN_DIAMETER61,
  91. T.MAX_DIAMETER1,
  92. T.MAX_DIAMETER11,
  93. T.MAX_DIAMETER2,
  94. T.MAX_DIAMETER21,
  95. T.MAX_DIAMETER3,
  96. T.MAX_DIAMETER31,
  97. T.MAX_DIAMETER4,
  98. T.MAX_DIAMETER41,
  99. T.MAX_DIAMETER5,
  100. T.MAX_DIAMETER51,
  101. T.MAX_DIAMETER6,
  102. T.MAX_DIAMETER61,
  103. T.CASTING_LENGTH1,
  104. T.CASTING_LENGTH11,
  105. T.CASTING_LENGTH2,
  106. T.CASTING_LENGTH21,
  107. T.CASTING_LENGTH3,
  108. T.CASTING_LENGTH31,
  109. T.CASTING_LENGTH4,
  110. T.CASTING_LENGTH41,
  111. T.CASTING_LENGTH5,
  112. T.CASTING_LENGTH51,
  113. T.CASTING_LENGTH6,
  114. T.CASTING_LENGTH61,
  115. T.CHAMFERCUT1,
  116. T.WITHIN1,
  117. T.STRAIGHTNESS1,
  118. T.INSPECTION,
  119. T.TREATING_RESULT,
  120. T.REMARKS,
  121. T.FLAG_STOVE_NO,
  122. SUM(T.OFFLINE_NUM) OFFLINE_NUM,
  123. SUM(T.SCRAP_NUM) SCRAP_NUM,
  124. T.FURNACENO,
  125. T.SEQUENCENO,
  126. T.CHAMFERCUT11,
  127. T.CHAMFERCUT2,
  128. T.CHAMFERCUT21,
  129. T.CHAMFERCUT3,
  130. T.CHAMFERCUT31,
  131. T.CHAMFERCUT4,
  132. T.CHAMFERCUT41,
  133. T.CHAMFERCUT5,
  134. T.CHAMFERCUT51,
  135. T.CHAMFERCUT6,
  136. T.CHAMFERCUT61,
  137. T.WITHIN11,
  138. T.WITHIN2,
  139. T.WITHIN21,
  140. T.WITHIN3,
  141. T.WITHIN31,
  142. T.WITHIN4,
  143. T.WITHIN41,
  144. T.WITHIN5,
  145. T.WITHIN51,
  146. T.WITHIN6,
  147. T.WITHIN61,
  148. T.STRAIGHTNESS11,
  149. T.STRAIGHTNESS2,
  150. T.STRAIGHTNESS21,
  151. T.STRAIGHTNESS3,
  152. T.STRAIGHTNESS31,
  153. T.STRAIGHTNESS4,
  154. T.STRAIGHTNESS41,
  155. T.STRAIGHTNESS5,
  156. T.STRAIGHTNESS51,
  157. T.STRAIGHTNESS6,
  158. T.STRAIGHTNESS61,
  159. T.PRO_PLAN_ID,
  160. T.GX_PLAN_NO,
  161. T.IMPRESS_DIAMETER1,
  162. T.IMPRESS_DIAMETER2,
  163. T.IMPRESS_DIAMETER3,
  164. T.IMPRESS_DIAMETER4,
  165. T.IMPRESS_DIAMETER5,
  166. T.IMPRESS_DIAMETER6,
  167. T.EXECUTIVE_STANDARD,
  168. T.NO_CUT,
  169. T.FIX_NUM,
  170. T.LENGTH_M
  171. FROM STL_LG_SURFACE_M T
  172. WHERE T.FURNACENO = ?
  173. AND T.SEQUENCENO = ?
  174. AND T.STOVE_NO = ?
  175. AND T.JUDGE_STOVE_NO_SEQ = ?
  176. GROUP BY T.JUDGE_STOVE_NO,
  177. T.JUDGE_STOVE_NO_SEQ,
  178. T.GROUD_NO,
  179. T.STOVE_NO,
  180. T.GRADECODE,
  181. T.GRADENAME,
  182. T.DIMATER,
  183. T.HEIGHT,
  184. T.FIX_LEN,
  185. T.PLINE_CODE,
  186. T.PLINE_NAME,
  187. T.FLOW_NO1,
  188. T.FLOW_NO11,
  189. T.FLOW_NO2,
  190. T.FLOW_NO21,
  191. T.FLOW_NO3,
  192. T.FLOW_NO31,
  193. T.FLOW_NO4,
  194. T.FLOW_NO41,
  195. T.FLOW_NO5,
  196. T.FLOW_NO51,
  197. T.FLOW_NO6,
  198. T.FLOW_NO61,
  199. T.MIN_DIAMETER1,
  200. T.MIN_DIAMETER11,
  201. T.MIN_DIAMETER2,
  202. T.MIN_DIAMETER21,
  203. T.MIN_DIAMETER3,
  204. T.MIN_DIAMETER31,
  205. T.MIN_DIAMETER4,
  206. T.MIN_DIAMETER41,
  207. T.MIN_DIAMETER5,
  208. T.MIN_DIAMETER51,
  209. T.MIN_DIAMETER6,
  210. T.MIN_DIAMETER61,
  211. T.MAX_DIAMETER1,
  212. T.MAX_DIAMETER11,
  213. T.MAX_DIAMETER2,
  214. T.MAX_DIAMETER21,
  215. T.MAX_DIAMETER3,
  216. T.MAX_DIAMETER31,
  217. T.MAX_DIAMETER4,
  218. T.MAX_DIAMETER41,
  219. T.MAX_DIAMETER5,
  220. T.MAX_DIAMETER51,
  221. T.MAX_DIAMETER6,
  222. T.MAX_DIAMETER61,
  223. T.CASTING_LENGTH1,
  224. T.CASTING_LENGTH11,
  225. T.CASTING_LENGTH2,
  226. T.CASTING_LENGTH21,
  227. T.CASTING_LENGTH3,
  228. T.CASTING_LENGTH31,
  229. T.CASTING_LENGTH4,
  230. T.CASTING_LENGTH41,
  231. T.CASTING_LENGTH5,
  232. T.CASTING_LENGTH51,
  233. T.CASTING_LENGTH6,
  234. T.CASTING_LENGTH61,
  235. T.CHAMFERCUT1,
  236. T.WITHIN1,
  237. T.STRAIGHTNESS1,
  238. T.INSPECTION,
  239. T.TREATING_RESULT,
  240. T.REMARKS,
  241. T.FLAG_STOVE_NO,
  242. T.FURNACENO,
  243. T.SEQUENCENO,
  244. T.CHAMFERCUT11,
  245. T.CHAMFERCUT2,
  246. T.CHAMFERCUT21,
  247. T.CHAMFERCUT3,
  248. T.CHAMFERCUT31,
  249. T.CHAMFERCUT4,
  250. T.CHAMFERCUT41,
  251. T.CHAMFERCUT5,
  252. T.CHAMFERCUT51,
  253. T.CHAMFERCUT6,
  254. T.CHAMFERCUT61,
  255. T.WITHIN11,
  256. T.WITHIN2,
  257. T.WITHIN21,
  258. T.WITHIN3,
  259. T.WITHIN31,
  260. T.WITHIN4,
  261. T.WITHIN41,
  262. T.WITHIN5,
  263. T.WITHIN51,
  264. T.WITHIN6,
  265. T.WITHIN61,
  266. T.STRAIGHTNESS11,
  267. T.STRAIGHTNESS2,
  268. T.STRAIGHTNESS21,
  269. T.STRAIGHTNESS3,
  270. T.STRAIGHTNESS31,
  271. T.STRAIGHTNESS4,
  272. T.STRAIGHTNESS41,
  273. T.STRAIGHTNESS5,
  274. T.STRAIGHTNESS51,
  275. T.STRAIGHTNESS6,
  276. T.STRAIGHTNESS61,
  277. T.PRO_PLAN_ID,
  278. T.GX_PLAN_NO,
  279. T.IMPRESS_DIAMETER1,
  280. T.IMPRESS_DIAMETER2,
  281. T.IMPRESS_DIAMETER3,
  282. T.IMPRESS_DIAMETER4,
  283. T.IMPRESS_DIAMETER5,
  284. T.IMPRESS_DIAMETER6,
  285. T.EXECUTIVE_STANDARD,
  286. T.NO_CUT,
  287. T.FIX_NUM,
  288. T.LENGTH_M
  289. </query>
  290. <query id = "FrmStuffSurfaceResult.doQueryRack" desc = "查询管坯队列">
  291. <![CDATA[
  292. SELECT ROWNUM SEQ,S.* FROM
  293. (SELECT
  294. T.PRO_PLAN_ID,
  295. T.GX_PLAN_NO,
  296. T.GPREQ_ID,
  297. T.PRINT_STOVE_NO,
  298. T.MAT_NO,
  299. T.STOVE_NO,
  300. T.CCMSTOVENO,
  301. T.JUDGE_STOVE_NO,
  302. T.JUDGE_STOVE_NO_SEQ,
  303. T.CAST_NO,
  304. T.HEATCNT,
  305. T.CCMID,
  306. T.FLOWNO,
  307. T.CUTSEQNO,
  308. T.MATERIAL_NO,
  309. T.MATERIAL_NAME,
  310. T.GRADECODE,
  311. T.GRADENAME,
  312. T.BATCH_GROUD_NO,
  313. T.FLAG_STOVE_NO,
  314. T.STANDARDSCODE,
  315. T.STANDARDREMAK,
  316. T.DIAMETER,
  317. T.FIX_NUM,
  318. T.FIX_LEN,
  319. T.LENGTH,
  320. T.ACT_COUNT,
  321. T.WEIGHT,
  322. T.RECIVE_FLAG,
  323. DECODE(T.STATUS,'0','合格','1','待处理','2','剔除','3','返线','4','委外废')STATUS,
  324. TO_CHAR(T.CUTTIME, 'YYYY-MM-DD HH24:MI:SS') CUTTIME,
  325. T.AFFIRM_FLAG,
  326. T.SCRAP_REASON,
  327. T.SCRAP_REASON_NUM,
  328. T.OLD_MAT_NO,
  329. T.ALARM_REASON,
  330. T.REASON,
  331. T.TEST_COUNT,
  332. T.IS_VALID,
  333. T.FURNACENO,
  334. T.SEQUENCENO,
  335. T.CIC,
  336. T.PIC,
  337. T.SIC,
  338. T.DIC,
  339. T.PLINE_CODE,
  340. T.PLINE_NAME,
  341. T.SCRAP_LEN,
  342. T.SCRAP_WGT,
  343. '剔除按钮' AS SCRAP,
  344. '剔除回退' AS SCRAP_BACK,
  345. '离线按钮' AS ALARM,
  346. '离线回退'AS ALARM_BACK,
  347. S.EF_PLINE_CODE,
  348. S.EF_PLINE_NAME
  349. FROM PLN_STEELFOR_ORD S,STL_LG_PROGRRSS T
  350. WHERE SUBSTR(S.FURNACENO,0,12) = T.FURNACENO
  351. AND S.SEQUENCENO = T.SEQUENCENO
  352. AND S.JUDGE_STOVE_NO_SEQ = T.JUDGE_STOVE_NO_SEQ
  353. AND T.FURNACENO = ?
  354. AND T.SEQUENCENO = ?
  355. AND T.STOVE_NO = ?
  356. AND T.JUDGE_STOVE_NO_SEQ = ?
  357. AND T.IS_VALID = '0'
  358. ORDER BY T.MAT_NO ASC)S
  359. ]]>
  360. </query>
  361. <query id = "FrmStuffSurfaceResult.doQueryRackStaus" desc = "查询当前材料状态">
  362. SELECT T.STATUS FROM STL_LG_PROGRRSS T WHERE T.FURNACENO = ? AND T.SEQUENCENO = ? AND T.STOVE_NO = ? AND T.JUDGE_STOVE_NO_SEQ = ? AND T.MAT_NO = ?
  363. </query>
  364. <query id = "FrmStuffSurfaceResult.updateRackStaus" desc = "修改材料状态">
  365. UPDATE STL_LG_PROGRRSS T
  366. SET T.STATUS = '#STATUS#', T.SCRAP_REASON = '#SCRAP_REASON#'
  367. WHERE T.MAT_NO = '#MAT_NO#'
  368. AND T.STOVE_NO = '#STOVE_NO#'
  369. AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
  370. AND T.FURNACENO = '#FURNACENO#'
  371. AND T.SEQUENCENO = '#SEQUENCENO#'
  372. </query>
  373. <query id = "FrmStuffSurfaceResult.insertOffine" desc = "离线时插入离线表">
  374. DECLARE
  375. v_COUNT STL_LG_PROGRRSS.ACT_COUNT%TYPE := NULL;
  376. BEGIN
  377. SELECT COUNT(1)
  378. INTO v_COUNT
  379. FROM STL_LG_OFFLINE T
  380. WHERE T.STOVE_NO = '#STOVE_NO#'
  381. AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
  382. AND T.FURNACENO = '#FURNACENO#'
  383. AND T.SEQUENCENO = '#SEQUENCENO#'
  384. AND T.FIX_NUM = '#FIX_NUM#';
  385. FOR MYROW IN (SELECT *
  386. FROM STL_LG_PROGRRSS T
  387. WHERE T.MAT_NO = '#MAT_NO#'
  388. AND T.FURNACENO = '#FURNACENO#'
  389. AND T.SEQUENCENO = '#SEQUENCENO#'
  390. AND T.STOVE_NO = '#STOVE_NO#'
  391. AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#') LOOP
  392. IF (v_COUNT > 0) THEN
  393. UPDATE STL_LG_OFFLINE T
  394. SET T.OFFLINE_NUM = TO_NUMBER(T.OFFLINE_NUM) +
  395. TO_NUMBER(MYROW.ACT_COUNT),
  396. T.ZP_WEIGHT = TO_NUMBER(T.ZP_WEIGHT) +
  397. TO_NUMBER(MYROW.WEIGHT)
  398. WHERE T.STOVE_NO = MYROW.STOVE_NO
  399. AND T.FIX_NUM = MYROW.FIX_NUM
  400. AND T.FURNACENO = MYROW.FURNACENO
  401. AND T.SEQUENCENO = MYROW.SEQUENCENO
  402. AND T.JUDGE_STOVE_NO_SEQ = MYROW.JUDGE_STOVE_NO_SEQ;
  403. ELSE
  404. INSERT INTO STL_LG_OFFLINE
  405. (FURNACENO,
  406. STOVE_NO,
  407. JUDGE_STOVE_NO,
  408. DIAMETER,
  409. LENGTH,
  410. FIX_NUM,
  411. FIX_LEN,
  412. PLINE_CODE,
  413. OFFLINE_NUM,
  414. BACKLINE_NUM,
  415. ZP_FLAG,
  416. ZP_WEIGHT,
  417. MATERIAL_NO,
  418. MATERIAL_NAME,
  419. GRADECODE,
  420. GRADENAME,
  421. STD_CODE,
  422. STD_NAME,
  423. COL_USER,
  424. COL_SHIFT,
  425. COL_GROUP,
  426. OFFLINE_TIME,
  427. PRO_PLAN_ID,
  428. GX_PLAN_NO,
  429. GPREQ_ID,
  430. SEQUENCENO,
  431. JUDGE_STOVE_NO_SEQ,
  432. FLAG_STOVE_NO,
  433. PRO_ORDER_NO
  434. )
  435. VALUES
  436. (MYROW.FURNACENO,
  437. MYROW.STOVE_NO,
  438. MYROW.JUDGE_STOVE_NO,
  439. MYROW.DIAMETER,
  440. MYROW.LENGTH,
  441. MYROW.FIX_NUM,
  442. MYROW.FIX_LEN,
  443. MYROW.PLINE_CODE,
  444. MYROW.ACT_COUNT,
  445. '0',
  446. '0',
  447. MYROW.WEIGHT,
  448. MYROW.MATERIAL_NO,
  449. MYROW.MATERIAL_NAME,
  450. MYROW.GRADECODE,
  451. MYROW.GRADENAME,
  452. MYROW.STANDARDSCODE,
  453. MYROW.STANDARDREMAK,
  454. '#COL_USER#',
  455. '#COL_SHIFT#',
  456. '#COL_GROUP#',
  457. SYSDATE,
  458. MYROW.PRO_PLAN_ID,
  459. MYROW.GX_PLAN_NO,
  460. MYROW.GPREQ_ID,
  461. MYROW.SEQUENCENO,
  462. MYROW.JUDGE_STOVE_NO_SEQ,
  463. MYROW.FLAG_STOVE_NO,
  464. '#STANDARDREMAK#');
  465. END IF;
  466. UPDATE STL_LG_PROGRRSS T SET T.STATUS = '1',T.OP_PROCESS = '1',T.SCRAP_REASON = '#SCRAP_REASON#',
  467. T.SCRAP_REASON_NUM = '#SCRAP_REASON_NUM#'
  468. WHERE T.MAT_NO = MYROW.MAT_NO
  469. AND T.FIX_NUM = MYROW.FIX_NUM
  470. AND T.STOVE_NO = MYROW.STOVE_NO
  471. AND T.JUDGE_STOVE_NO_SEQ = MYROW.JUDGE_STOVE_NO_SEQ
  472. AND T.FURNACENO = MYROW.FURNACENO
  473. AND T.SEQUENCENO = MYROW.SEQUENCENO;
  474. END LOOP;
  475. END;
  476. </query>
  477. <query id = "FrmStuffSurfaceResult.insertOffineOff" desc = "批量离线时插入离线表">
  478. DECLARE
  479. v_COUNT STL_LG_PROGRRSS.ACT_COUNT%TYPE := NULL;
  480. BEGIN
  481. SELECT COUNT(1)
  482. INTO v_COUNT
  483. FROM STL_LG_OFFLINE T
  484. WHERE T.STOVE_NO = '#STOVE_NO#'
  485. AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
  486. AND T.FURNACENO = '#FURNACENO#'
  487. AND T.SEQUENCENO = '#SEQUENCENO#'
  488. AND T.FIX_NUM = '#FIX_NUM#';
  489. IF (v_COUNT > 0) THEN
  490. UPDATE STL_LG_OFFLINE T
  491. SET T.OFFLINE_NUM = TO_NUMBER(T.OFFLINE_NUM) +
  492. TO_NUMBER('#ACT_COUNT#'),
  493. T.ZP_WEIGHT = TO_NUMBER(T.ZP_WEIGHT) +
  494. TO_NUMBER('#WEIGHT#')
  495. WHERE T.STOVE_NO = '#STOVE_NO#'
  496. AND T.FIX_NUM = '#FIX_NUM#'
  497. AND T.FURNACENO = '#FURNACENO#'
  498. AND T.SEQUENCENO ='#SEQUENCENO#'
  499. AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#';
  500. ELSE
  501. INSERT INTO STL_LG_OFFLINE
  502. (FURNACENO,
  503. STOVE_NO,
  504. JUDGE_STOVE_NO,
  505. DIAMETER,
  506. LENGTH,
  507. FIX_NUM,
  508. FIX_LEN,
  509. PLINE_CODE,
  510. OFFLINE_NUM,
  511. BACKLINE_NUM,
  512. ZP_FLAG,
  513. ZP_WEIGHT,
  514. MATERIAL_NO,
  515. MATERIAL_NAME,
  516. GRADECODE,
  517. GRADENAME,
  518. STD_CODE,
  519. STD_NAME,
  520. COL_USER,
  521. COL_SHIFT,
  522. COL_GROUP,
  523. OFFLINE_TIME,
  524. PRO_PLAN_ID,
  525. GX_PLAN_NO,
  526. GPREQ_ID,
  527. SEQUENCENO,
  528. JUDGE_STOVE_NO_SEQ,
  529. FLAG_STOVE_NO)
  530. VALUES
  531. ('#FURNACENO#',
  532. '#STOVE_NO#',
  533. '#JUDGE_STOVE_NO#',
  534. '#DIAMETER#',
  535. '#LENGTH#',
  536. '#FIX_NUM#',
  537. '#FIX_LEN#',
  538. '#PLINE_CODE#',
  539. '#ACT_COUNT#',
  540. '0',
  541. '0',
  542. '#WEIGHT#',
  543. '#MATERIAL_NO#',
  544. '#MATERIAL_NAME#',
  545. '#GRADECODE#',
  546. '#GRADENAME#',
  547. '#STANDARDSCODE#',
  548. '#STANDARDREMAK#',
  549. '#COL_USER#',
  550. '#COL_SHIFT#',
  551. '#COL_GROUP#',
  552. SYSDATE,
  553. '#PRO_PLAN_ID#',
  554. '#GX_PLAN_NO#',
  555. '#GPREQ_ID#',
  556. '#SEQUENCENO#',
  557. '#JUDGE_STOVE_NO_SEQ#',
  558. '#FLAG_STOVE_NO#');
  559. END IF;
  560. END;
  561. </query>
  562. <query id = "FrmStuffSurfaceResult.updateProcessFlag" desc = "修改进程表状态">
  563. UPDATE STL_LG_PROGRRSS T
  564. SET T.STATUS = '1',
  565. T.OP_PROCESS = '1',
  566. T.SCRAP_REASON = '#SCRAP_REASON#'
  567. WHERE T.MAT_NO = '#MAT_NO#'
  568. AND T.FIX_NUM = '#FIX_NUM#'
  569. AND T.STOVE_NO = '#STOVE_NO#'
  570. AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
  571. AND T.FURNACENO = '#FURNACENO#'
  572. AND T.SEQUENCENO = '#SEQUENCENO#'
  573. </query>
  574. <query id = "FrmStuffSurfaceResult.insertGpMat" desc = "插入管坯材料表">
  575. INSERT INTO MAT_GP_M(
  576. MAT_NO,
  577. PRODUCT_FLAG,
  578. MAT_STATUS,
  579. STOVE_NO,
  580. FLAG_STOVE_NO,
  581. JUDGE_STOVE_NO,
  582. CAST_NO,
  583. CCMID,
  584. MATERIAL_NO,
  585. MATERIAL_NAME,
  586. GRADECODE,
  587. GRADENAME,
  588. STD_CODE,
  589. STD_NAME,
  590. PLINE_CODE,
  591. PLINE_NAME,
  592. DIMATER,
  593. ACT_LEN,
  594. FIX_NUM,
  595. FIX_LEN,
  596. ACT_COUNT,
  597. ACT_WEIGHT,
  598. BELONG_CODE,
  599. BELONG_NAME,
  600. JUGDE_APPLY_FLAG,
  601. INSTOCK_TIME,
  602. BAL_YEAR_MONTH,
  603. CREATE_NAME,
  604. CREATE_TIME,
  605. GROUD_NO,
  606. PRINT_STOVE_NO,
  607. PRO_PLAN_ID,
  608. GX_PLAN_NO,
  609. GPREQ_ID,
  610. DB_ACT_COUNT,
  611. CIC,
  612. PIC,
  613. SIC,
  614. DIC,
  615. GPTYPE,
  616. SEQUENCENO,
  617. FURNACENO,
  618. QCM_STAUS,
  619. FACE_RESULT_CODE,
  620. EF_PLINE_CODE,
  621. EF_PLINE_NAME,
  622. JUDGE_RESULT_CODE)
  623. VALUES(
  624. '#MAT_NO#',
  625. '#PRODUCT_FLAG#',
  626. '#MAT_STATUS#',
  627. '#STOVE_NO#',
  628. '#FLAG_STOVE_NO#',
  629. '#JUDGE_STOVE_NO#',
  630. '#CAST_NO#',
  631. '#CCMID#',
  632. '#MATERIAL_NO#',
  633. '#MATERIAL_NAME#',
  634. '#GRADECODE#',
  635. '#GRADENAME#',
  636. '#STD_CODE#',
  637. '#STD_NAME#',
  638. '#PLINE_CODE#',
  639. '#PLINE_NAME#',
  640. '#DIMATER#',
  641. '#ACT_LEN#',
  642. '#FIX_NUM#',
  643. '#FIX_LEN#',
  644. '#ACT_COUNT#',
  645. '#ACT_WEIGHT#',
  646. '#BELONG_CODE#',
  647. '#BELONG_NAME#',
  648. '#JUGDE_APPLY_FLAG#',
  649. TO_DATE('#INSTOCK_TIME#','YYYY-MM-DD HH24:MI:SS'),
  650. '#BAL_YEAR_MONTH#',
  651. '#CREATE_NAME#',
  652. TO_DATE('#CREATE_TIME#','YYYY-MM-DD HH24:MI:SS'),
  653. '#GROUD_NO#',
  654. '#PRINT_STOVE_NO#',
  655. '#PRO_PLAN_ID#',
  656. '#GX_PLAN_NO#',
  657. '#GPREQ_ID#',
  658. '#DB_ACT_COUNT#',
  659. '#CIC#',
  660. '#PIC#',
  661. '#SIC#',
  662. '#DIC#',
  663. '#GPTYPE#',
  664. '#SEQUENCENO#',
  665. '#FURNACENO#',
  666. '#QCM_STAUS#',
  667. '#FACE_RESULT_CODE#',
  668. '#EF_PLINE_CODE#',
  669. '#EF_PLINE_NAME#',
  670. '#JUDGE_RESULT_CODE#')
  671. </query>
  672. <query id = "FrmStuffSurfaceResult.insertGpButress" desc = "插入管坯位置表">
  673. INSERT INTO YDM_GP_BUTTRESS(
  674. MAT_NO,
  675. STOVE_NO,
  676. FLAG_STOVE_NO,
  677. JUDGE_STOVE_NO,
  678. STORAGE_NO,
  679. LOCATION_NO,
  680. LARY_NO,
  681. LOC_NO,
  682. STORAGE_ATTR,
  683. STORAGE_ATTR_NAME,
  684. STORAGE_TYPE_NO,
  685. STORAGE_TYPE_NAME,
  686. DEPARTMENT_CODE,
  687. DEPARTMENT_DESC,
  688. MANAGEMENT_NO,
  689. MANAGEMENT_NAME,
  690. CREATE_NAME,
  691. CREATE_TIME,
  692. GROUD_NO,
  693. LOCATION_NAME)
  694. VALUES(
  695. '#MAT_NO#',
  696. '#STOVE_NO#',
  697. '#FLAG_STOVE_NO#',
  698. '#JUDGE_STOVE_NO#',
  699. '#STORAGE_NO#',
  700. '#LOCATION_NO#',
  701. '#LARY_NO#',
  702. '#LOC_NO#',
  703. '',
  704. '',
  705. '',
  706. '',
  707. '#DEPARTMENT_CODE#',
  708. '#DEPARTMENT_DESC#',
  709. '#MANAGEMENT_NO#',
  710. '#MANAGEMENT_NAME#',
  711. '#CREATE_NAME#',
  712. TO_DATE('#CREATE_TIME#','YYYY-MM-DD HH24:MI:SS'),
  713. '#GROUD_NO#',
  714. '#LOCATION_NAME#')
  715. </query>
  716. <query id = "FrmStuffSurfaceResult.deleteMat" desc = "删除废品库存">
  717. DECLARE
  718. BEGIN
  719. DELETE FROM MAT_GP_M T
  720. WHERE T.STOVE_NO = '#STOVE_NO#'
  721. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  722. AND T.MAT_NO = '#MAT_NO#'
  723. AND T.FURNACENO = '#FURNACENO#'
  724. AND T.SEQUENCENO = '#SEQUENCENO#'
  725. AND T.QCM_STAUS = '22';
  726. DELETE FROM YDM_GP_BUTTRESS S
  727. WHERE S.STOVE_NO = '#STOVE_NO#'
  728. AND S.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  729. AND S.MAT_NO = '#MAT_NO#';
  730. END;
  731. </query>
  732. <query id= "FrmStuffSurfaceResult.insertOffineBack" desc = "表检离线回退">
  733. <![CDATA[
  734. DECLARE
  735. V_NUM STL_LG_OFFLINE.OFFLINE_NUM%TYPE := NULL;
  736. BEGIN
  737. FOR MYROW IN (SELECT *
  738. FROM STL_LG_PROGRRSS T
  739. WHERE T.MAT_NO = '#MAT_NO#'
  740. AND T.STOVE_NO = '#STOVE_NO#'
  741. AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
  742. AND T.FURNACENO = '#FURNACENO#'
  743. AND T.SEQUENCENO = '#SEQUENCENO#') LOOP
  744. UPDATE STL_LG_OFFLINE T
  745. SET T.OFFLINE_NUM = TO_NUMBER(T.OFFLINE_NUM) -
  746. TO_NUMBER(MYROW.ACT_COUNT),
  747. T.ZP_WEIGHT = TO_NUMBER(T.ZP_WEIGHT) - TO_NUMBER(MYROW.WEIGHT)
  748. WHERE T.STOVE_NO = MYROW.STOVE_NO
  749. AND T.JUDGE_STOVE_NO_SEQ = MYROW.JUDGE_STOVE_NO_SEQ
  750. AND T.FURNACENO = MYROW.FURNACENO
  751. AND T.SEQUENCENO = MYROW.SEQUENCENO
  752. AND T.FIX_NUM = MYROW.FIX_NUM;
  753. UPDATE STL_LG_PROGRRSS T
  754. SET T.STATUS = '0',T.OP_PROCESS = '',T.SCRAP_REASON = '',T.SCRAP_REASON_NUM = ''
  755. WHERE T.MAT_NO = MYROW.MAT_NO
  756. AND T.FIX_NUM = MYROW.FIX_NUM
  757. AND T.STOVE_NO = MYROW.STOVE_NO
  758. AND T.JUDGE_STOVE_NO_SEQ = MYROW.JUDGE_STOVE_NO_SEQ
  759. AND T.FURNACENO = MYROW.FURNACENO
  760. AND T.SEQUENCENO = MYROW.SEQUENCENO;
  761. SELECT T.OFFLINE_NUM
  762. INTO V_NUM
  763. FROM STL_LG_OFFLINE T
  764. WHERE T.STOVE_NO = '#STOVE_NO#'
  765. AND T.FIX_NUM = '#FIX_NUM#'
  766. AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
  767. AND T.FURNACENO = '#FURNACENO#'
  768. AND T.SEQUENCENO = '#SEQUENCENO#';
  769. IF (V_NUM < 1) THEN
  770. DELETE FROM STL_LG_OFFLINE T
  771. WHERE T.STOVE_NO = '#STOVE_NO#'
  772. AND T.FIX_NUM = '#FIX_NUM#'
  773. AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
  774. AND T.FURNACENO = '#FURNACENO#'
  775. AND T.SEQUENCENO = '#SEQUENCENO#';
  776. END IF;
  777. END LOOP;
  778. END;
  779. ]]>
  780. </query>
  781. <query id = "FrmStuffSurfaceResult.DeleteMat" desc = "删除库存">
  782. DECLARE
  783. BEGIN
  784. DELETE FROM MAT_GP_M T
  785. WHERE T.STOVE_NO = '#STOVE_NO#'
  786. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  787. AND T.MAT_NO = '#MAT_NO#';
  788. DELETE FROM YDM_GP_BUTTRESS T
  789. WHERE T.STOVE_NO = '#STOVE_NO#'
  790. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  791. AND T.MAT_NO = '#MAT_NO#';
  792. END;
  793. </query>
  794. <query id = "FrmStuffSurfaceResult.doQueryOffline" desc = "查询是否存在未处理管坯">
  795. SELECT COUNT(1) ACOUNT
  796. FROM STL_LG_OFFLINE T
  797. WHERE T.FURNACENO = ?
  798. AND T.SEQUENCENO = ?
  799. AND T.STOVE_NO = ?
  800. AND T.JUDGE_STOVE_NO_SEQ = ?
  801. AND T.STATUS = '0'
  802. </query>
  803. <query id = "FrmStuffSurfaceResult.doBaside" desc = "结炉">
  804. DECLARE
  805. BEGIN
  806. UPDATE STL_LG_SURFACE_M T
  807. SET T.NODE_FUR_FLAG = '1',
  808. T.COL_SHIFT = ?,
  809. T.COL_GROUP = ?
  810. WHERE T.FURNACENO = ?
  811. AND T.SEQUENCENO = ?
  812. AND T.STOVE_NO = ?
  813. AND T.JUDGE_STOVE_NO_SEQ = ?;
  814. UPDATE PLN_STEELFOR_ORD T
  815. SET T.CCM_STATE = '20'
  816. WHERE SUBSTR(T.FURNACENO,0,12) = ?
  817. AND T.SEQUENCENO = ?
  818. AND T.STOVE_NO = ?
  819. AND T.JUDGE_STOVE_NO_SEQ = ?;
  820. END;
  821. </query>
  822. <query id= "FrmStuffSurfaceResult.doBasideBack" desc = "结炉回退">
  823. DECLARE
  824. BEGIN
  825. UPDATE STL_LG_SURFACE_M T
  826. SET T.NODE_FUR_FLAG = '0'
  827. WHERE T.FURNACENO = ?
  828. AND T.SEQUENCENO = ?
  829. AND T.STOVE_NO = ?
  830. AND T.JUDGE_STOVE_NO_SEQ = ?;
  831. UPDATE PLN_STEELFOR_ORD T
  832. SET T.CCM_STATE = '10'
  833. WHERE SUBSTR(T.FURNACENO,0,12) = ?
  834. AND T.SEQUENCENO = ?
  835. AND T.STOVE_NO = ?
  836. AND T.JUDGE_STOVE_NO_SEQ = ?;
  837. END;
  838. </query>
  839. <query id = "FrmStuffSurfaceResult.doQueryPlnSteeOrd" desc = "查询切割计划状态">
  840. SELECT T.CCM_STATE
  841. FROM PLN_STEELFOR_ORD T
  842. WHERE SUBSTR(T.FURNACENO,0,12) = ?
  843. AND T.SEQUENCENO = ?
  844. AND T.STOVE_NO = ?
  845. AND T.JUDGE_STOVE_NO_SEQ = ?
  846. </query>
  847. <query id = "FrmStuffFurnace.createSurFaceNo" desc = "生成检验编号">
  848. SELECT ? || TO_CHAR(SYSDATE, 'YYYYMMDD') ||
  849. LPAD(NVL(MAX(SUBSTR(T.SURFACE_CHECK_NO, 13)), 0) + 1, 4, 0)
  850. SURFACE_CHECK_NO
  851. FROM STL_LG_SURFACE_M T
  852. WHERE TRUNC(T.CREATE_TIME) = TRUNC(SYSDATE)
  853. AND T.PLINE_CODE = ?
  854. </query>
  855. <query id = "FrmStuffSurfaceResult.saveSurfaceResult" desc = "保存实绩">
  856. DECLARE
  857. v_SURFACE_CHECK_NO STL_LG_SURFACE_M.SURFACE_CHECK_NO%TYPE := NULL;
  858. v_COUNT STL_LG_SURFACE_M.ACT_COUNT%TYPE := NULL;
  859. v_QUANTITY STL_LG_SURFACE_M.QUANTITY%TYPE := NULL; --检验支数
  860. v_ACT_COUNT STL_LG_SURFACE_M.ACT_COUNT%TYPE := NULL; --合格支数
  861. v_OFFLINE_NUM STL_LG_SURFACE_M.OFFLINE_NUM%TYPE := NULL; --下线支数
  862. v_SCRAP_NUM STL_LG_SURFACE_M.SCRAP_NUM%TYPE := NULL; --废品支数
  863. v_WEIGHT STL_LG_SURFACE_M.ACT_WEIGHT%TYPE := NULL; --合格吨
  864. v_NODE_FLAG STL_LG_SURFACE_M.NODE_FUR_FLAG%TYPE := NULL;
  865. BEGIN
  866. SELECT '#PLINE_CODE#' || TO_CHAR(SYSDATE, 'YYYYMMDD') ||
  867. LPAD(NVL(MAX(SUBSTR(T.SURFACE_CHECK_NO, 11)), 0) + 1, 4, 0)
  868. INTO v_SURFACE_CHECK_NO
  869. FROM STL_LG_SURFACE_M T
  870. WHERE TRUNC(T.CREATE_TIME) = TRUNC(SYSDATE)
  871. AND T.PLINE_CODE = '#PLINE_CODE#';
  872. FOR MYROW IN (SELECT T.FURNACENO,
  873. T.FIX_NUM,
  874. T.STOVE_NO,
  875. T.JUDGE_STOVE_NO_SEQ,
  876. T.SEQUENCENO
  877. FROM STL_LG_PROGRRSS T
  878. WHERE T.FURNACENO = '#FURNACENO#'
  879. AND T.STOVE_NO = '#STOVE_NO#'
  880. AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
  881. AND T.SEQUENCENO = '#SEQUENCENO#'
  882. GROUP BY T.FURNACENO, T.FIX_NUM, T.STOVE_NO,T.JUDGE_STOVE_NO_SEQ,T.SEQUENCENO) LOOP
  883. SELECT COUNT(1)
  884. INTO v_COUNT
  885. FROM STL_LG_SURFACE_M T
  886. WHERE T.FURNACENO = MYROW.FURNACENO
  887. AND T.SEQUENCENO = MYROW.SEQUENCENO
  888. AND T.STOVE_NO = MYROW.STOVE_NO
  889. AND T.JUDGE_STOVE_NO_SEQ = MYROW.JUDGE_STOVE_NO_SEQ
  890. AND T.FIX_NUM = MYROW.FIX_NUM;
  891. SELECT SUM(T1.ACT_COUNT)
  892. INTO v_QUANTITY
  893. FROM STL_LG_PROGRRSS T1
  894. WHERE T1.FURNACENO = MYROW.FURNACENO
  895. AND T1.SEQUENCENO = MYROW.SEQUENCENO
  896. AND T1.FIX_NUM = MYROW.FIX_NUM
  897. AND T1.STOVE_NO = MYROW.STOVE_NO
  898. AND T1.JUDGE_STOVE_NO_SEQ = MYROW.JUDGE_STOVE_NO_SEQ
  899. AND T1.IS_VALID = '0';
  900. SELECT SUM(T1.WEIGHT)
  901. INTO v_WEIGHT
  902. FROM STL_LG_PROGRRSS T1
  903. WHERE T1.FURNACENO = MYROW.FURNACENO
  904. AND T1.SEQUENCENO = MYROW.SEQUENCENO
  905. AND T1.FIX_NUM = MYROW.FIX_NUM
  906. AND T1.STOVE_NO = MYROW.STOVE_NO
  907. AND T1.JUDGE_STOVE_NO_SEQ = MYROW.JUDGE_STOVE_NO_SEQ
  908. AND T1.IS_VALID = '0'
  909. AND T1.STATUS = '0';
  910. SELECT SUM(T1.ACT_COUNT)
  911. INTO v_ACT_COUNT
  912. FROM STL_LG_PROGRRSS T1
  913. WHERE T1.FURNACENO = MYROW.FURNACENO
  914. AND T1.SEQUENCENO = MYROW.SEQUENCENO
  915. AND T1.FIX_NUM = MYROW.FIX_NUM
  916. AND T1.STOVE_NO = MYROW.STOVE_NO
  917. AND T1.JUDGE_STOVE_NO_SEQ = MYROW.JUDGE_STOVE_NO_SEQ
  918. AND T1.STATUS = '0'
  919. AND T1.IS_VALID = '0';
  920. SELECT SUM(T1.ACT_COUNT)
  921. INTO v_OFFLINE_NUM
  922. FROM STL_LG_PROGRRSS T1
  923. WHERE T1.FURNACENO = MYROW.FURNACENO
  924. AND T1.SEQUENCENO = MYROW.SEQUENCENO
  925. AND T1.FIX_NUM = MYROW.FIX_NUM
  926. AND T1.STOVE_NO = MYROW.STOVE_NO
  927. AND T1.JUDGE_STOVE_NO_SEQ = MYROW.JUDGE_STOVE_NO_SEQ
  928. AND T1.STATUS = '1';
  929. SELECT SUM(T1.ACT_COUNT)
  930. INTO v_SCRAP_NUM
  931. FROM STL_LG_PROGRRSS T1
  932. WHERE T1.FURNACENO = MYROW.FURNACENO
  933. AND T1.SEQUENCENO = MYROW.SEQUENCENO
  934. AND T1.STOVE_NO = MYROW.STOVE_NO
  935. AND T1.JUDGE_STOVE_NO_SEQ = MYROW.JUDGE_STOVE_NO_SEQ
  936. AND T1.FIX_NUM = MYROW.FIX_NUM
  937. AND T1.STATUS IN('2','4');
  938. IF (v_COUNT > 0) THEN
  939. SELECT T3.NODE_FUR_FLAG
  940. INTO v_NODE_FLAG
  941. FROM STL_LG_SURFACE_M T3
  942. WHERE T3.FURNACENO = MYROW.FURNACENO
  943. AND T3.SEQUENCENO = MYROW.SEQUENCENO
  944. AND T3.STOVE_NO = MYROW.STOVE_NO
  945. AND T3.JUDGE_STOVE_NO_SEQ = MYROW.JUDGE_STOVE_NO_SEQ
  946. AND T3.FIX_NUM = MYROW.FIX_NUM
  947. AND ROWNUM = 1;
  948. IF (v_NODE_FLAG = 1) THEN
  949. UPDATE STL_LG_SURFACE_M T
  950. SET T.CHECK_RESULT = '#CHECK_RESULT#',
  951. T.REMARKS = '#REMARKS#',
  952. T.FLOW_NO1 = '#FLOW_NO1#',
  953. T.FLOW_NO11 = '#FLOW_NO11#',
  954. T.FLOW_NO2 = '#FLOW_NO2#',
  955. T.FLOW_NO21 = '#FLOW_NO21#',
  956. T.FLOW_NO3 = '#FLOW_NO3#',
  957. T.FLOW_NO31 = '#FLOW_NO31#',
  958. T.FLOW_NO4 = '#FLOW_NO4#',
  959. T.FLOW_NO41 = '#FLOW_NO41#',
  960. T.FLOW_NO5 = '#FLOW_NO5#',
  961. T.FLOW_NO51 = '#FLOW_NO51#',
  962. T.FLOW_NO6 = '#FLOW_NO6#',
  963. T.FLOW_NO61 = '#FLOW_NO61#',
  964. T.MIN_DIAMETER1 = '#MIN_DIAMETER1#',
  965. T.MIN_DIAMETER11 = '#MIN_DIAMETER11#',
  966. T.MIN_DIAMETER2 = '#MIN_DIAMETER2#',
  967. T.MIN_DIAMETER21 = '#MIN_DIAMETER21#',
  968. T.MIN_DIAMETER3 = '#MIN_DIAMETER3#',
  969. T.MIN_DIAMETER31 = '#MIN_DIAMETER31#',
  970. T.MIN_DIAMETER4 = '#MIN_DIAMETER4#',
  971. T.MIN_DIAMETER41 = '#MIN_DIAMETER41#',
  972. T.MIN_DIAMETER5 = '#MIN_DIAMETER5#',
  973. T.MIN_DIAMETER51 = '#MIN_DIAMETER51#',
  974. T.MIN_DIAMETER6 = '#MIN_DIAMETER6#',
  975. T.MIN_DIAMETER61 = '#MIN_DIAMETER61#',
  976. T.MAX_DIAMETER1 = '#MAX_DIAMETER1#',
  977. T.MAX_DIAMETER11 = '#MAX_DIAMETER11#',
  978. T.MAX_DIAMETER2 = '#MAX_DIAMETER2#',
  979. T.MAX_DIAMETER21 = '#MAX_DIAMETER21#',
  980. T.MAX_DIAMETER3 = '#MAX_DIAMETER3#',
  981. T.MAX_DIAMETER31 = '#MAX_DIAMETER31#',
  982. T.MAX_DIAMETER4 = '#MAX_DIAMETER4#',
  983. T.MAX_DIAMETER41 = '#MAX_DIAMETER41#',
  984. T.MAX_DIAMETER5 = '#MAX_DIAMETER5#',
  985. T.MAX_DIAMETER51 = '#MAX_DIAMETER51#',
  986. T.MAX_DIAMETER6 = '#MAX_DIAMETER6#',
  987. T.MAX_DIAMETER61 = '#MAX_DIAMETER61#',
  988. T.CASTING_LENGTH1 = '#CASTING_LENGTH1#',
  989. T.CASTING_LENGTH11 = '#CASTING_LENGTH11#',
  990. T.CASTING_LENGTH2 = '#CASTING_LENGTH2#',
  991. T.CASTING_LENGTH21 = '#CASTING_LENGTH21#',
  992. T.CASTING_LENGTH3 = '#CASTING_LENGTH3#',
  993. T.CASTING_LENGTH31 = '#CASTING_LENGTH31#',
  994. T.CASTING_LENGTH4 = '#CASTING_LENGTH4#',
  995. T.CASTING_LENGTH41 = '#CASTING_LENGTH41#',
  996. T.CASTING_LENGTH5 = '#CASTING_LENGTH5#',
  997. T.CASTING_LENGTH51 = '#CASTING_LENGTH51#',
  998. T.CASTING_LENGTH6 = '#CASTING_LENGTH6#',
  999. T.CASTING_LENGTH61 = '#CASTING_LENGTH61#',
  1000. T.CHAMFERCUT1 = '#CHAMFERCUT1#',
  1001. T.WITHIN1 = '#WITHIN1#',
  1002. T.STRAIGHTNESS1 = '#STRAIGHTNESS1#',
  1003. T.INSPECTION = '#INSPECTION#',
  1004. T.TREATING_RESULT = '#TREATING_RESULT#',
  1005. T.CHAMFERCUT11 = '#CHAMFERCUT11#',
  1006. T.CHAMFERCUT2 = '#CHAMFERCUT2#',
  1007. T.CHAMFERCUT21 = '#CHAMFERCUT21#',
  1008. T.CHAMFERCUT3 = '#CHAMFERCUT3#',
  1009. T.CHAMFERCUT31 = '#CHAMFERCUT31#',
  1010. T.CHAMFERCUT4 = '#CHAMFERCUT4#',
  1011. T.CHAMFERCUT41 = '#CHAMFERCUT41#',
  1012. T.CHAMFERCUT5 = '#CHAMFERCUT5#',
  1013. T.CHAMFERCUT51 = '#CHAMFERCUT51#',
  1014. T.CHAMFERCUT6 = '#CHAMFERCUT6#',
  1015. T.CHAMFERCUT61 = '#CHAMFERCUT61#',
  1016. T.WITHIN11 = '#WITHIN11#',
  1017. T.WITHIN2 = '#WITHIN2#',
  1018. T.WITHIN21 = '#WITHIN21#',
  1019. T.WITHIN3 = '#WITHIN3#',
  1020. T.WITHIN31 = '#WITHIN31#',
  1021. T.WITHIN4 = '#WITHIN4#',
  1022. T.WITHIN41 = '#WITHIN41#',
  1023. T.WITHIN5 = '#WITHIN5#',
  1024. T.WITHIN51 = '#WITHIN51#',
  1025. T.WITHIN6 = '#WITHIN6#',
  1026. T.WITHIN61 = '#WITHIN61#',
  1027. T.STRAIGHTNESS11 = '#STRAIGHTNESS11#',
  1028. T.STRAIGHTNESS2 = '#STRAIGHTNESS2#',
  1029. T.STRAIGHTNESS21 = '#STRAIGHTNESS21#',
  1030. T.STRAIGHTNESS3 = '#STRAIGHTNESS3#',
  1031. T.STRAIGHTNESS31 = '#STRAIGHTNESS31#',
  1032. T.STRAIGHTNESS4 = '#STRAIGHTNESS4#',
  1033. T.STRAIGHTNESS41 = '#STRAIGHTNESS41#',
  1034. T.STRAIGHTNESS5 = '#STRAIGHTNESS5#',
  1035. T.STRAIGHTNESS51 = '#STRAIGHTNESS51#',
  1036. T.STRAIGHTNESS6 = '#STRAIGHTNESS6#',
  1037. T.STRAIGHTNESS61 = '#STRAIGHTNESS61#',
  1038. T.IMPRESS_DIAMETER1= '#IMPRESS_DIAMETER1#',
  1039. T.IMPRESS_DIAMETER2= '#IMPRESS_DIAMETER2#',
  1040. T.IMPRESS_DIAMETER3 = '#IMPRESS_DIAMETER3#',
  1041. T.IMPRESS_DIAMETER4 = '#IMPRESS_DIAMETER4#',
  1042. T.IMPRESS_DIAMETER5 = '#IMPRESS_DIAMETER5#',
  1043. T.IMPRESS_DIAMETER6 = '#IMPRESS_DIAMETER6#',
  1044. T.EXECUTIVE_STANDARD = '#EXECUTIVE_STANDARD#',
  1045. T.NO_CUT = '#NO_CUT#'
  1046. WHERE T.FURNACENO = MYROW.FURNACENO
  1047. AND T.STOVE_NO = MYROW.STOVE_NO
  1048. AND T.JUDGE_STOVE_NO_SEQ = MYROW.JUDGE_STOVE_NO_SEQ
  1049. AND T.SEQUENCENO = MYROW.SEQUENCENO
  1050. AND T.FIX_NUM = MYROW.FIX_NUM;
  1051. ELSE
  1052. UPDATE STL_LG_SURFACE_M T
  1053. SET T.QUANTITY = v_QUANTITY,
  1054. T.ACT_WEIGHT = v_WEIGHT,
  1055. T.CHECK_RESULT = '#CHECK_RESULT#',
  1056. T.ACT_COUNT = v_ACT_COUNT,
  1057. T.REMARKS = '#REMARKS#',
  1058. T.FLOW_NO1 = '#FLOW_NO1#',
  1059. T.FLOW_NO11 = '#FLOW_NO11#',
  1060. T.FLOW_NO2 = '#FLOW_NO2#',
  1061. T.FLOW_NO21 = '#FLOW_NO21#',
  1062. T.FLOW_NO3 = '#FLOW_NO3#',
  1063. T.FLOW_NO31 = '#FLOW_NO31#',
  1064. T.FLOW_NO4 = '#FLOW_NO4#',
  1065. T.FLOW_NO41 = '#FLOW_NO41#',
  1066. T.FLOW_NO5 = '#FLOW_NO5#',
  1067. T.FLOW_NO51 = '#FLOW_NO51#',
  1068. T.FLOW_NO6 = '#FLOW_NO6#',
  1069. T.FLOW_NO61 = '#FLOW_NO61#',
  1070. T.MIN_DIAMETER1 = '#MIN_DIAMETER1#',
  1071. T.MIN_DIAMETER11 = '#MIN_DIAMETER11#',
  1072. T.MIN_DIAMETER2 = '#MIN_DIAMETER2#',
  1073. T.MIN_DIAMETER21 = '#MIN_DIAMETER21#',
  1074. T.MIN_DIAMETER3 = '#MIN_DIAMETER3#',
  1075. T.MIN_DIAMETER31 = '#MIN_DIAMETER31#',
  1076. T.MIN_DIAMETER4 = '#MIN_DIAMETER4#',
  1077. T.MIN_DIAMETER41 = '#MIN_DIAMETER41#',
  1078. T.MIN_DIAMETER5 = '#MIN_DIAMETER5#',
  1079. T.MIN_DIAMETER51 = '#MIN_DIAMETER51#',
  1080. T.MIN_DIAMETER6 = '#MIN_DIAMETER6#',
  1081. T.MIN_DIAMETER61 = '#MIN_DIAMETER61#',
  1082. T.MAX_DIAMETER1 = '#MAX_DIAMETER1#',
  1083. T.MAX_DIAMETER11 = '#MAX_DIAMETER11#',
  1084. T.MAX_DIAMETER2 = '#MAX_DIAMETER2#',
  1085. T.MAX_DIAMETER21 = '#MAX_DIAMETER21#',
  1086. T.MAX_DIAMETER3 = '#MAX_DIAMETER3#',
  1087. T.MAX_DIAMETER31 = '#MAX_DIAMETER31#',
  1088. T.MAX_DIAMETER4 = '#MAX_DIAMETER4#',
  1089. T.MAX_DIAMETER41 = '#MAX_DIAMETER41#',
  1090. T.MAX_DIAMETER5 = '#MAX_DIAMETER5#',
  1091. T.MAX_DIAMETER51 = '#MAX_DIAMETER51#',
  1092. T.MAX_DIAMETER6 = '#MAX_DIAMETER6#',
  1093. T.MAX_DIAMETER61 = '#MAX_DIAMETER61#',
  1094. T.CASTING_LENGTH1 = '#CASTING_LENGTH1#',
  1095. T.CASTING_LENGTH11 = '#CASTING_LENGTH11#',
  1096. T.CASTING_LENGTH2 = '#CASTING_LENGTH2#',
  1097. T.CASTING_LENGTH21 = '#CASTING_LENGTH21#',
  1098. T.CASTING_LENGTH3 = '#CASTING_LENGTH3#',
  1099. T.CASTING_LENGTH31 = '#CASTING_LENGTH31#',
  1100. T.CASTING_LENGTH4 = '#CASTING_LENGTH4#',
  1101. T.CASTING_LENGTH41 = '#CASTING_LENGTH41#',
  1102. T.CASTING_LENGTH5 = '#CASTING_LENGTH5#',
  1103. T.CASTING_LENGTH51 = '#CASTING_LENGTH51#',
  1104. T.CASTING_LENGTH6 = '#CASTING_LENGTH6#',
  1105. T.CASTING_LENGTH61 = '#CASTING_LENGTH61#',
  1106. T.CHAMFERCUT1 = '#CHAMFERCUT1#',
  1107. T.WITHIN1 = '#WITHIN1#',
  1108. T.STRAIGHTNESS1 = '#STRAIGHTNESS1#',
  1109. T.INSPECTION = '#INSPECTION#',
  1110. T.TREATING_RESULT = '#TREATING_RESULT#',
  1111. T.OFFLINE_NUM = v_OFFLINE_NUM,
  1112. T.SCRAP_NUM = v_SCRAP_NUM,
  1113. T.CHAMFERCUT11 = '#CHAMFERCUT11#',
  1114. T.CHAMFERCUT2 = '#CHAMFERCUT2#',
  1115. T.CHAMFERCUT21 = '#CHAMFERCUT21#',
  1116. T.CHAMFERCUT3 = '#CHAMFERCUT3#',
  1117. T.CHAMFERCUT31 = '#CHAMFERCUT31#',
  1118. T.CHAMFERCUT4 = '#CHAMFERCUT4#',
  1119. T.CHAMFERCUT41 = '#CHAMFERCUT41#',
  1120. T.CHAMFERCUT5 = '#CHAMFERCUT5#',
  1121. T.CHAMFERCUT51 = '#CHAMFERCUT51#',
  1122. T.CHAMFERCUT6 = '#CHAMFERCUT6#',
  1123. T.CHAMFERCUT61 = '#CHAMFERCUT61#',
  1124. T.WITHIN11 = '#WITHIN11#',
  1125. T.WITHIN2 = '#WITHIN2#',
  1126. T.WITHIN21 = '#WITHIN21#',
  1127. T.WITHIN3 = '#WITHIN3#',
  1128. T.WITHIN31 = '#WITHIN31#',
  1129. T.WITHIN4 = '#WITHIN4#',
  1130. T.WITHIN41 = '#WITHIN41#',
  1131. T.WITHIN5 = '#WITHIN5#',
  1132. T.WITHIN51 = '#WITHIN51#',
  1133. T.WITHIN6 = '#WITHIN6#',
  1134. T.WITHIN61 = '#WITHIN61#',
  1135. T.STRAIGHTNESS11 = '#STRAIGHTNESS11#',
  1136. T.STRAIGHTNESS2 = '#STRAIGHTNESS2#',
  1137. T.STRAIGHTNESS21 = '#STRAIGHTNESS21#',
  1138. T.STRAIGHTNESS3 = '#STRAIGHTNESS3#',
  1139. T.STRAIGHTNESS31 = '#STRAIGHTNESS31#',
  1140. T.STRAIGHTNESS4 = '#STRAIGHTNESS4#',
  1141. T.STRAIGHTNESS41 = '#STRAIGHTNESS41#',
  1142. T.STRAIGHTNESS5 = '#STRAIGHTNESS5#',
  1143. T.STRAIGHTNESS51 = '#STRAIGHTNESS51#',
  1144. T.STRAIGHTNESS6 = '#STRAIGHTNESS6#',
  1145. T.STRAIGHTNESS61 = '#STRAIGHTNESS61#',
  1146. T.IMPRESS_DIAMETER1= '#IMPRESS_DIAMETER1#',
  1147. T.IMPRESS_DIAMETER2= '#IMPRESS_DIAMETER2#',
  1148. T.IMPRESS_DIAMETER3 = '#IMPRESS_DIAMETER3#',
  1149. T.IMPRESS_DIAMETER4 = '#IMPRESS_DIAMETER4#',
  1150. T.IMPRESS_DIAMETER5 = '#IMPRESS_DIAMETER5#',
  1151. T.IMPRESS_DIAMETER6 = '#IMPRESS_DIAMETER6#',
  1152. T.EXECUTIVE_STANDARD = '#EXECUTIVE_STANDARD#',
  1153. T.NO_CUT = '#NO_CUT#',
  1154. T.CREATE_NAME = '#CREATE_NAME#',
  1155. T.CREATE_TIME = SYSDATE
  1156. WHERE T.FURNACENO = MYROW.FURNACENO
  1157. AND T.FIX_NUM = MYROW.FIX_NUM
  1158. AND T.STOVE_NO = MYROW.STOVE_NO
  1159. AND T.SEQUENCENO = MYROW.SEQUENCENO
  1160. AND T.JUDGE_STOVE_NO_SEQ = MYROW.JUDGE_STOVE_NO_SEQ;
  1161. END IF;
  1162. ELSE
  1163. INSERT INTO STL_LG_SURFACE_M
  1164. (SURFACE_CHECK_NO,
  1165. JUDGE_STOVE_NO,
  1166. STOVE_NO,
  1167. ACT_WEIGHT,
  1168. CHECK_RESULT,
  1169. QUANTITY,
  1170. PRO_ORDER_NO,
  1171. CREATE_NAME,
  1172. CREATE_TIME,
  1173. MEMO,
  1174. PLINE_CODE,
  1175. FLOW_NO1,
  1176. FLOW_NO11,
  1177. FLOW_NO2,
  1178. FLOW_NO21,
  1179. FLOW_NO3,
  1180. FLOW_NO31,
  1181. FLOW_NO4,
  1182. FLOW_NO41,
  1183. FLOW_NO5,
  1184. FLOW_NO51,
  1185. FLOW_NO6,
  1186. FLOW_NO61,
  1187. MIN_DIAMETER1,
  1188. MIN_DIAMETER11,
  1189. MIN_DIAMETER2,
  1190. MIN_DIAMETER21,
  1191. MIN_DIAMETER3,
  1192. MIN_DIAMETER31,
  1193. MIN_DIAMETER4,
  1194. MIN_DIAMETER41,
  1195. MIN_DIAMETER5,
  1196. MIN_DIAMETER51,
  1197. MIN_DIAMETER6,
  1198. MIN_DIAMETER61,
  1199. MAX_DIAMETER1,
  1200. MAX_DIAMETER11,
  1201. MAX_DIAMETER2,
  1202. MAX_DIAMETER21,
  1203. MAX_DIAMETER3,
  1204. MAX_DIAMETER31,
  1205. MAX_DIAMETER4,
  1206. MAX_DIAMETER41,
  1207. MAX_DIAMETER5,
  1208. MAX_DIAMETER51,
  1209. MAX_DIAMETER6,
  1210. MAX_DIAMETER61,
  1211. CASTING_LENGTH1,
  1212. CASTING_LENGTH11,
  1213. CASTING_LENGTH2,
  1214. CASTING_LENGTH21,
  1215. CASTING_LENGTH3,
  1216. CASTING_LENGTH31,
  1217. CASTING_LENGTH4,
  1218. CASTING_LENGTH41,
  1219. CASTING_LENGTH5,
  1220. CASTING_LENGTH51,
  1221. CASTING_LENGTH6,
  1222. CASTING_LENGTH61,
  1223. CHAMFERCUT1,
  1224. WITHIN1,
  1225. STRAIGHTNESS1,
  1226. INSPECTION,
  1227. TREATING_RESULT,
  1228. REMARKS,
  1229. COL_SHIFT,
  1230. COL_GROUP,
  1231. FLAG_STOVE_NO,
  1232. OFFLINE_NUM,
  1233. SCRAP_NUM,
  1234. FURNACENO,
  1235. CHAMFERCUT11,
  1236. CHAMFERCUT2,
  1237. CHAMFERCUT21,
  1238. CHAMFERCUT3,
  1239. CHAMFERCUT31,
  1240. CHAMFERCUT4,
  1241. CHAMFERCUT41,
  1242. CHAMFERCUT5,
  1243. CHAMFERCUT51,
  1244. CHAMFERCUT6,
  1245. CHAMFERCUT61,
  1246. WITHIN11,
  1247. WITHIN2,
  1248. WITHIN21,
  1249. WITHIN3,
  1250. WITHIN31,
  1251. WITHIN4,
  1252. WITHIN41,
  1253. WITHIN5,
  1254. WITHIN51,
  1255. WITHIN6,
  1256. WITHIN61,
  1257. STRAIGHTNESS11,
  1258. STRAIGHTNESS2,
  1259. STRAIGHTNESS21,
  1260. STRAIGHTNESS3,
  1261. STRAIGHTNESS31,
  1262. STRAIGHTNESS4,
  1263. STRAIGHTNESS41,
  1264. STRAIGHTNESS5,
  1265. STRAIGHTNESS51,
  1266. STRAIGHTNESS6,
  1267. STRAIGHTNESS61,
  1268. FIX_NUM,
  1269. PRO_PLAN_ID,
  1270. GX_PLAN_NO,
  1271. GPREQ_ID,
  1272. JUDGE_STOVE_NO_SEQ,
  1273. SEQUENCENO,
  1274. IMPRESS_DIAMETER1,
  1275. IMPRESS_DIAMETER2,
  1276. IMPRESS_DIAMETER3,
  1277. IMPRESS_DIAMETER4,
  1278. IMPRESS_DIAMETER5,
  1279. IMPRESS_DIAMETER6,
  1280. EXECUTIVE_STANDARD,
  1281. NO_CUT)
  1282. VALUES
  1283. (v_SURFACE_CHECK_NO,
  1284. '#JUDGE_STOVE_NO#',
  1285. '#STOVE_NO#',
  1286. v_WEIGHT,
  1287. '#CHECK_RESULT#',
  1288. v_QUANTITY,
  1289. '#PRO_ORDER_NO#',
  1290. '#CREATE_NAME#',
  1291. SYSDATE,
  1292. '#MEMO#',
  1293. '#PLINE_CODE#',
  1294. '#FLOW_NO1#',
  1295. '#FLOW_NO11#',
  1296. '#FLOW_NO2#',
  1297. '#FLOW_NO21#',
  1298. '#FLOW_NO3#',
  1299. '#FLOW_NO31#',
  1300. '#FLOW_NO4#',
  1301. '#FLOW_NO41#',
  1302. '#FLOW_NO5#',
  1303. '#FLOW_NO51#',
  1304. '#FLOW_NO6#',
  1305. '#FLOW_NO61#',
  1306. '#MIN_DIAMETER1#',
  1307. '#MIN_DIAMETER11#',
  1308. '#MIN_DIAMETER2#',
  1309. '#MIN_DIAMETER21#',
  1310. '#MIN_DIAMETER3#',
  1311. '#MIN_DIAMETER31#',
  1312. '#MIN_DIAMETER4#',
  1313. '#MIN_DIAMETER41#',
  1314. '#MIN_DIAMETER5#',
  1315. '#MIN_DIAMETER51#',
  1316. '#MIN_DIAMETER6#',
  1317. '#MIN_DIAMETER61#',
  1318. '#MAX_DIAMETER1#',
  1319. '#MAX_DIAMETER11#',
  1320. '#MAX_DIAMETER2#',
  1321. '#MAX_DIAMETER21#',
  1322. '#MAX_DIAMETER3#',
  1323. '#MAX_DIAMETER31#',
  1324. '#MAX_DIAMETER4#',
  1325. '#MAX_DIAMETER41#',
  1326. '#MAX_DIAMETER5#',
  1327. '#MAX_DIAMETER51#',
  1328. '#MAX_DIAMETER6#',
  1329. '#MAX_DIAMETER61#',
  1330. '#CASTING_LENGTH1#',
  1331. '#CASTING_LENGTH11#',
  1332. '#CASTING_LENGTH2#',
  1333. '#CASTING_LENGTH21#',
  1334. '#CASTING_LENGTH3#',
  1335. '#CASTING_LENGTH31#',
  1336. '#CASTING_LENGTH4#',
  1337. '#CASTING_LENGTH41#',
  1338. '#CASTING_LENGTH5#',
  1339. '#CASTING_LENGTH51#',
  1340. '#CASTING_LENGTH6#',
  1341. '#CASTING_LENGTH61#',
  1342. '#CHAMFERCUT1#',
  1343. '#WITHIN1#',
  1344. '#STRAIGHTNESS1#',
  1345. '#INSPECTION#',
  1346. '#TREATING_RESULT#',
  1347. '#REMARKS#',
  1348. '#COL_SHIFT#',
  1349. '#COL_GROUP#',
  1350. '#FLAG_STOVE_NO#',
  1351. v_OFFLINE_NUM,
  1352. v_SCRAP_NUM,
  1353. '#FURNACENO#',
  1354. '#CHAMFERCUT11#',
  1355. '#CHAMFERCUT2#',
  1356. '#CHAMFERCUT21#',
  1357. '#CHAMFERCUT3#',
  1358. '#CHAMFERCUT31#',
  1359. '#CHAMFERCUT4#',
  1360. '#CHAMFERCUT41#',
  1361. '#CHAMFERCUT5#',
  1362. '#CHAMFERCUT51#',
  1363. '#CHAMFERCUT6#',
  1364. '#CHAMFERCUT61#',
  1365. '#WITHIN11#',
  1366. '#WITHIN2#',
  1367. '#WITHIN21#',
  1368. '#WITHIN3#',
  1369. '#WITHIN31#',
  1370. '#WITHIN4#',
  1371. '#WITHIN41#',
  1372. '#WITHIN5#',
  1373. '#WITHIN51#',
  1374. '#WITHIN6#',
  1375. '#WITHIN61#',
  1376. '#STRAIGHTNESS11#',
  1377. '#STRAIGHTNESS2#',
  1378. '#STRAIGHTNESS21#',
  1379. '#STRAIGHTNESS3#',
  1380. '#STRAIGHTNESS31#',
  1381. '#STRAIGHTNESS4#',
  1382. '#STRAIGHTNESS41#',
  1383. '#STRAIGHTNESS5#',
  1384. '#STRAIGHTNESS51#',
  1385. '#STRAIGHTNESS6#',
  1386. '#STRAIGHTNESS61#',
  1387. MYROW.FIX_NUM,
  1388. '#PRO_PLAN_ID#',
  1389. '#GX_PLAN_NO#',
  1390. '#GPREQ_ID#',
  1391. MYROW.JUDGE_STOVE_NO_SEQ,
  1392. MYROW.SEQUENCENO,
  1393. '#IMPRESS_DIAMETER1#',
  1394. '#IMPRESS_DIAMETER2#',
  1395. '#IMPRESS_DIAMETER3#',
  1396. '#IMPRESS_DIAMETER4#',
  1397. '#IMPRESS_DIAMETER5#',
  1398. '#IMPRESS_DIAMETER6#',
  1399. '#EXECUTIVE_STANDARD#',
  1400. '#NO_CUT#');
  1401. END IF;
  1402. END LOOP;
  1403. END;
  1404. </query>
  1405. <query id = "FrmStuffSurfaceResult.doQueryStausSum" desc = "查询支数">
  1406. SELECT SUM(T.ACT_COUNT) ACOUNT
  1407. FROM STL_LG_PROGRRSS T
  1408. WHERE T.STOVE_NO = '#STOVE_NO#'
  1409. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1410. AND T.PRO_PLAN_ID = '#PRO_PLAN_ID#'
  1411. AND T.GX_PLAN_NO = '#GX_PLAN_NO#'
  1412. </query>
  1413. <query id = "FrmStuffSurfaceResult.doQueryStausSum1" desc = "查询废品支数">
  1414. SELECT SUM(T.ACT_COUNT) ACOUNT FROM STL_LG_PROGRRSS T
  1415. WHERE T.STOVE_NO = '#STOVE_NO#'
  1416. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1417. AND T.PRO_PLAN_ID = '#PRO_PLAN_ID#'
  1418. AND T.GX_PLAN_NO = '#GX_PLAN_NO#'
  1419. AND T.STATUS = '2'
  1420. </query>
  1421. <query id = "FrmStuffSurfaceResult.doQueryStausSum2" desc = "查询离线品支数">
  1422. SELECT SUM(T.ACT_COUNT) ACOUNT FROM STL_LG_PROGRRSS T
  1423. WHERE T.STOVE_NO = '#STOVE_NO#'
  1424. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1425. AND T.PRO_PLAN_ID = '#PRO_PLAN_ID#'
  1426. AND T.GX_PLAN_NO = '#GX_PLAN_NO#'
  1427. AND T.STATUS = '1'
  1428. </query>
  1429. <query id = "FrmStuffSurfaceResult.doQueryStausSum3" desc = "查询合格支数重量">
  1430. SELECT SUM(T.ACT_COUNT) ACOUNT,SUM(T.WEIGHT)ACT_WEGHT FROM STL_LG_PROGRRSS T
  1431. WHERE T.STOVE_NO = '#STOVE_NO#'
  1432. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1433. AND T.PRO_PLAN_ID = '#PRO_PLAN_ID#'
  1434. AND T.GX_PLAN_NO = '#GX_PLAN_NO#'
  1435. AND T.STATUS = '0'
  1436. </query>
  1437. <query id = "FrmStuffSurfaceResult.SelectBelong" desc = "查询所属权">
  1438. SELECT T.DEPARTMENT_CODE,T.DEPARTMENT_DESC,T.DEPARTMENT_CODE_P,T.DEPARTMENT_DESC_P FROM COM_BASE_PLINE T WHERE T.PLINE_CODE = ? AND T.VALIDFLAG= '1'
  1439. </query>
  1440. <query id = "FrmStuffSurfaceResult.doQueryPlanStaus" desc = "查询切割计划执行状态">
  1441. SELECT T.CCM_STATE
  1442. FROM PLN_STEELFOR_ORD T
  1443. WHERE SUBSTR(T.FURNACENO,0,12) = ?
  1444. AND T.SEQUENCENO = ?
  1445. AND T.STOVE_NO = ?
  1446. AND T.JUDGE_STOVE_NO_SEQ = ?
  1447. </query>
  1448. <query id = "FrmStuffSurfaceResult.updateSurFace" desc = "修改路径">
  1449. UPDATE STL_LG_SURFACE_M T
  1450. SET T.FACE_RESULT_PATH = ?
  1451. WHERE T.JUDGE_STOVE_NO = ?
  1452. AND NVL(T.PRO_PLAN_ID,'/') = NVL(?,'/')
  1453. AND NVL(T.GX_PLAN_NO,'/') = NVL(?,'/')
  1454. </query>
  1455. <query id = "FrmStuffSurfaceResult.doQueryOkNum" desc = "查询合格支数">
  1456. SELECT NVL(SUM(T.ACT_COUNT),0)ACOUNT
  1457. FROM STL_LG_PROGRRSS T
  1458. WHERE T.STOVE_NO = '#STOVE_NO#'
  1459. AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
  1460. AND T.FURNACENO = '#FURNACENO#'
  1461. AND T.SEQUENCENO = '#SEQUENCENO#'
  1462. AND T.STATUS = '0'
  1463. </query>
  1464. <query id = "FrmStuffSurfaceResult.clearReason" desc = "清空缺陷原因">
  1465. <![CDATA[
  1466. DECLARE
  1467. BEGIN
  1468. FOR MYROW IN (SELECT T.MAT_NO
  1469. FROM STL_LG_PROGRRSS T
  1470. WHERE T.FURNACENO = '#FURNACENO#'
  1471. AND T.SEQUENCENO = '#SEQUENCENO#'
  1472. AND T.STOVE_NO = '#STOVE_NO#'
  1473. AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#') LOOP
  1474. UPDATE STL_LG_PROGRRSS T
  1475. SET T.REASON = ''
  1476. WHERE T.MAT_NO = MYROW.MAT_NO;
  1477. END LOOP;
  1478. END;
  1479. ]]>
  1480. </query>
  1481. <query id = "FrmStuffSurfaceResult.batchSaveReason" desc = "保存缺陷原因">
  1482. <![CDATA[
  1483. DECLARE
  1484. BEGIN
  1485. FOR MYROW IN (SELECT *
  1486. FROM (SELECT T.MAT_NO
  1487. FROM STL_LG_PROGRRSS T
  1488. WHERE T.FURNACENO = '#FURNACENO#'
  1489. AND T.SEQUENCENO = '#SEQUENCENO#'
  1490. AND T.STOVE_NO = '#STOVE_NO#'
  1491. AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
  1492. ORDER BY T.REASON DESC,T.MAT_NO ASC)
  1493. WHERE ROWNUM <= #TOT_MUM_M#) LOOP
  1494. UPDATE STL_LG_PROGRRSS T
  1495. SET T.REASON = '#FLOWNO#'
  1496. WHERE T.MAT_NO = MYROW.MAT_NO;
  1497. END LOOP;
  1498. END;
  1499. ]]>
  1500. </query>
  1501. <query id = "FrmStuffSurfaceResult.batchScrapNum" desc = "批量剔除">
  1502. <![CDATA[
  1503. DECLARE
  1504. BEGIN
  1505. FOR MYROW IN (SELECT *
  1506. FROM (SELECT T.MAT_NO
  1507. FROM STL_LG_PROGRRSS T
  1508. WHERE T.FURNACENO = '#FURNACENO#'
  1509. AND T.SEQUENCENO = '#SEQUENCENO#'
  1510. AND T.STOVE_NO = '#STOVE_NO#'
  1511. AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
  1512. ORDER BY T.STATUS,T.MAT_NO ASC)
  1513. WHERE ROWNUM <= #TOT_MUM_M#) LOOP
  1514. UPDATE STL_LG_PROGRRSS T
  1515. SET T.STATUS = '2',T.SCRAP_REASON = '#FLOWNO#'
  1516. WHERE T.MAT_NO = MYROW.MAT_NO;
  1517. END LOOP;
  1518. END;
  1519. ]]>
  1520. </query>
  1521. <query id = "FrmStuffSurfaceResult.SelectStlLgProcessOff" desc = "查询可离线支数信息">
  1522. <![CDATA[
  1523. SELECT *
  1524. FROM (SELECT *
  1525. FROM STL_LG_PROGRRSS T
  1526. WHERE T.FURNACENO = '#FURNACENO#'
  1527. AND T.SEQUENCENO = '#SEQUENCENO#'
  1528. AND T.STOVE_NO = '#STOVE_NO#'
  1529. AND T.JUDGE_STOVE_NO_SEQ = '#JUDGE_STOVE_NO_SEQ#'
  1530. ORDER BY T.STATUS,T.MAT_NO ASC)
  1531. WHERE ROWNUM <= #TOT_MUM_M#
  1532. ]]>
  1533. </query>
  1534. <query id = "FrmStuffSurfaceResult.doQueryEntrust" desc = "查询是否产生了委外加工委托">
  1535. SELECT *
  1536. FROM STL_LG_ENTRUST_BILL T
  1537. WHERE T.FURNACENO = ?
  1538. AND T.SEQUENCENO = ?
  1539. AND T.STOVE_NO = ?
  1540. AND T.JUDGE_STOVE_NO_SEQ = ?
  1541. </query>
  1542. <query id = "FrmStuffSurfaceResult.doQueryStlLgProcess" desc = "查询是否产生了表检委托">
  1543. SELECT *
  1544. FROM STL_LG_PROGRRSS T
  1545. WHERE T.FURNACENO = ?
  1546. AND T.SEQUENCENO = ?
  1547. AND T.STOVE_NO = ?
  1548. AND T.JUDGE_STOVE_NO_SEQ = ?
  1549. AND T.STATUS = '3'
  1550. </query>
  1551. <query id = "FrmStuffSurfaceResult.saveScrapLen" desc = "保存废品长度、重量">
  1552. UPDATE STL_LG_PROGRRSS T
  1553. SET T.SCRAP_LEN = '#SCRAP_LEN#', T.SCRAP_WGT = '#SCRAP_WGT#',T.SCRAP_REASON = '#SCRAP_REASON#'
  1554. WHERE T.FURNACENO = '#FURNACENO#'
  1555. AND T.SEQUENCENO = '#SEQUENCENO#'
  1556. AND T.STOVE_NO = '#STOVE_NO#'
  1557. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1558. AND T.MAT_NO = '#MAT_NO#'
  1559. </query>
  1560. </queryMap>