FrmStuffSurfaceInspection.xml 32 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041
  1. <?xml version="1.0" encoding="UTF-8"?>
  2. <queryMap desc = "管坯表面检验">
  3. <query id = "FrmStuffSurfaceInspection.doQueryMat" desc = "查询收料实绩">
  4. <![CDATA[
  5. SELECT
  6. MAX(TO_CHAR(T.INSTOCK_TIME, 'YYYY-MM-DD HH24:MI:SS')) INSTOCK_TIME,
  7. T.MEMO,
  8. T.PRODUCT_FLAG,
  9. T.MAT_STATUS,
  10. T.STOVE_NO,
  11. T.JUDGE_STOVE_NO,
  12. T.BATCH_NO,
  13. T.GROUD_NO,
  14. T.CAST_NO,
  15. T.CCMID,
  16. T.SAMPLE_FLAG,
  17. T.CUTTING_FLAG,
  18. T.CUTTING_NUM,
  19. T.MATERIAL_NO,
  20. T.MATERIAL_NAME,
  21. T.PRODUCCODE,
  22. T.PRODUCNAME,
  23. T.JUDGE_GRADECODE,
  24. T.JUDGE_GRADENAME,
  25. T.JUDGE_STD_CODE,
  26. T.JUDGE_STD_NAME,
  27. T.PRO_ORDER_NO,
  28. T.PRO_ORDER_ID,
  29. T.PLINE_CODE,
  30. T.PLINE_NAME,
  31. T.ACT_DIMATER,
  32. SUM(nvl(T.ACT_LEN,'0'))ACT_LEN,
  33. T.ACT_LEN_MIN,
  34. T.ACT_LEN_MAX,
  35. T.ACT_FIX_NUM,
  36. T.ACT_FIX_LEN,
  37. SUM(T.ACT_COUNT)ACT_COUNT,
  38. SUM(T.ACT_THEORY_WEIGHT)ACT_THEORY_WEIGHT,
  39. '0' QUALIFIED_COUNT,
  40. '0' NO_QUALIFIED_COUNT,
  41. '0' QUANTITY,
  42. T.BELONG_CODE,
  43. T.BELONG_NAME,
  44. T.BUG_NO,
  45. DECODE(T.FACE_RESULT_CODE,'40740601','合格','40740602','不合格','','未检') FACE_RESULT_CODE
  46. FROM MAT_GP_M T
  47. WHERE T.JUDGE_STOVE_NO || '&' LIKE ('%' || ? || '%')
  48. ]]>
  49. </query>
  50. <query id = "FrmStuffSurfaceInspection.doQuerySurFace" desc = "查询表检信息">
  51. <![CDATA[
  52. SELECT
  53. SURFACE_CHECK_NO,
  54. JUDGE_STOVE_NO,
  55. GROUD_NO,
  56. STOVE_NO,
  57. JUDGE_GRADECODE,
  58. JUDGE_GRADENAME,
  59. JUDGE_STD_CODE,
  60. JUDGE_STD_NAME,
  61. TARG_GRADECODE,
  62. TARG_GRADENAME,
  63. TARG_STD_CODE,
  64. TARG_STD_NAME,
  65. TARG_DIMATER,
  66. TARG_HEIGHT,
  67. TARG_LEN,
  68. TARG_LEN_MIN,
  69. TARG_LEN_MAX,
  70. TARG_FIX_NUM,
  71. TARG_FIX_LEN,
  72. ACT_DIMATER,
  73. ACT_HEIGHT,
  74. ACT_LEN,
  75. ACT_LEN_MIN,
  76. ACT_LEN_MAX,
  77. ACT_FIX_NUM,
  78. ACT_FIX_LEN,
  79. ACT_COUNT,
  80. ACT_WEIGHT,
  81. ACT_THEORY_WEIGHT,
  82. BUG_NO,
  83. CHECK_RESULT,
  84. QUANTITY,
  85. ELIGIBLEQUTY,
  86. PRO_ORDER_NO,
  87. PRO_ORDER_ID,
  88. CREATE_NAME,
  89. TO_CHAR(CREATE_TIME, 'YYYY-MM-DD HH24:MI:SS') CREATE_TIME,
  90. UPDATE_NAME,
  91. TO_CHAR(UPDATE_TIME, 'YYYY-MM-DD HH24:MI:SS') UPDATE_TIME,
  92. VALIDFLAG,
  93. MEMO,
  94. PLINE_CODE,
  95. PLINE_NAME
  96. FROM QCM_LG_SURFACE_M
  97. WHERE JUDGE_STOVE_NO || '&' LIKE ('%' || ? || '%')
  98. ]]>
  99. </query>
  100. <query id = "FrmStuffSurfaceInspection.doQueryMatC" desc = "查询收料明细">
  101. <![CDATA[
  102. SELECT T.MAT_NO,
  103. T.GROUD_NO,
  104. T.MEMO,
  105. T.STOVE_NO,
  106. T.JUDGE_STOVE_NO,
  107. T.ACT_COUNT,
  108. T.ACT_THEORY_WEIGHT,
  109. T.BUG_NO,
  110. T.SURFACE_CHECK_NO,
  111. S.BUG_POS_CODE,
  112. S.BUG_POS_NAME,
  113. S.BUG_CODE1,
  114. S.BUG_NAME1,
  115. S.BUG_CODE2,
  116. S.BUG_NAME2,
  117. S.BUG_CODE3,
  118. S.BUG_NAME3,
  119. S.BUG_CODE4,
  120. S.BUG_NAME4,
  121. S.BUG_CODE5,
  122. S.BUG_NAME5,
  123. T.ACT_DIMATER,
  124. S.CHECK_DIMATER,
  125. T.ACT_LEN,
  126. S.CHECK_LEN,
  127. DECODE(T.FACE_RESULT_CODE,'40740601','合格','40740602','不合格','未检')FACE_RESULT_CODE
  128. FROM MAT_GP_M T
  129. LEFT JOIN QCM_LG_SURFACE_C S
  130. ON T.MAT_NO = S.MAT_NO
  131. AND T.BUG_NO = S.BUG_NO
  132. WHERE
  133. --S.VALIDFLAG = '1'
  134. T.JUDGE_STOVE_NO || '&' LIKE ('%' || ? || '%')
  135. ]]>
  136. </query>
  137. <query id = "FrmStuffSurfaceInspection.doQuerySufaceC" desc = "查询缺陷信息">
  138. SELECT
  139. BUG_NO,
  140. MAT_NO,
  141. BUG_CODE1,
  142. BUG_NAME1,
  143. BUG_CODE2,
  144. BUG_NAME2,
  145. BUG_CODE3,
  146. BUG_NAME3,
  147. BUG_CODE4,
  148. BUG_NAME4,
  149. BUG_CODE5,
  150. BUG_NAME5,
  151. ACT_COUNT,
  152. ACT_WEIGHT,
  153. ACT_THEORY_WEIGHT,
  154. CREATE_NAME,
  155. TO_CHAR(CREATE_TIME, 'YYYY-MM-DD HH24:MI:SS') CREATE_TIME,
  156. UPDATE_NAME,
  157. TO_CHAR(UPDATE_TIME, 'YYYY-MM-DD HH24:MI:SS') UPDATE_TIME,
  158. DECODE(VALIDFLAG,'0','无效','1','有效')VALIDFLAG,
  159. MEMO,
  160. BUG_POS_CODE,
  161. BUG_POS_NAME,
  162. ACT_DIMATER,
  163. CHECK_DIMATER,
  164. ACT_LEN,
  165. CHECK_LEN
  166. FROM QCM_LG_SURFACE_C
  167. WHERE 1=1
  168. </query>
  169. <query id = "FrmStuffSurfaceInspection.getBugLocation" desc = "获取缺陷位置">
  170. SELECT T.BASENAME,T.BASECODE FROM COM_BASE_INFO T WHERE T.SORTCODE = '4082'
  171. </query>
  172. <query id = "FrmStuffSurfaceInspection.getBugName" desc = "获取缺陷名称">
  173. SELECT T.BASENAME,T.BASECODE FROM COM_BASE_INFO T WHERE T.SORTCODE = '4083'
  174. </query>
  175. <query id = "FrmStuffSurfaceInspection.getCheckNo" desc = "生成检验编号、缺陷编号">
  176. <![CDATA[
  177. select 'CFG' || ? || to_char(sysdate, 'yymmdd') ||
  178. Lpad(NVL(MAX(substr(t.surface_check_no,
  179. length(t.surface_check_no) - 3)),
  180. 0) + 1,
  181. 4,
  182. 0) SURFACE_CHECK_NO,
  183. 'CFG' || ? || to_char(sysdate, 'yymmdd') ||
  184. Lpad(NVL(MAX(substr(t.surface_check_no,
  185. length(t.surface_check_no) - 3)),
  186. 0) + 1,
  187. 4,
  188. 0) || Lpad(NVL(MAX(substr(t.surface_check_no,
  189. length(t.surface_check_no) - 2)),
  190. 0) + 1,
  191. 3,
  192. 0) BUG_NO
  193. from Qcm_Lg_Surface_m t
  194. where t.PLINE_CODE = ?
  195. AND to_char(t.CREATE_TIME, 'YYYY-MM-DD') =
  196. to_char(sysdate, 'YYYY-MM-DD')
  197. ]]>
  198. </query>
  199. <query id = "ensureBug.CheckNo" desc = "插入检验主信息">
  200. INSERT INTO QCM_LG_SURFACE_M
  201. (SURFACE_CHECK_NO,
  202. JUDGE_STOVE_NO,
  203. GROUD_NO,
  204. STOVE_NO,
  205. JUDGE_GRADECODE,
  206. JUDGE_GRADENAME,
  207. JUDGE_STD_CODE,
  208. JUDGE_STD_NAME,
  209. ACT_DIMATER,
  210. ACT_HEIGHT,
  211. ACT_LEN,
  212. ACT_LEN_MIN,
  213. ACT_LEN_MAX,
  214. ACT_FIX_NUM,
  215. ACT_FIX_LEN,
  216. ACT_COUNT,
  217. ACT_WEIGHT,
  218. ACT_THEORY_WEIGHT,
  219. BUG_NO,
  220. QUANTITY,
  221. ELIGIBLEQUTY,
  222. PRO_ORDER_NO,
  223. PRO_ORDER_ID,
  224. CREATE_NAME,
  225. CREATE_TIME,
  226. PLINE_CODE,
  227. PLINE_NAME)
  228. VALUES
  229. (?,
  230. ?,
  231. ?,
  232. ?,
  233. ?,
  234. ?,
  235. ?,
  236. ?,
  237. ?,
  238. ?,
  239. ?,
  240. ?,
  241. ?,
  242. ?,
  243. ?,
  244. ?,
  245. '0',
  246. ?,
  247. ?,
  248. ?,
  249. ?,
  250. ?,
  251. ?,
  252. ?,
  253. TO_DATE(?,'YYYY-MM-DD HH24:MI:SS'),
  254. ?,
  255. ?)
  256. </query>
  257. <query id = "ensureBug.BugNo" desc = "插入表检从记录">
  258. INSERT INTO QCM_LG_SURFACE_C(
  259. BUG_NO,
  260. MAT_NO,
  261. BUG_CODE1,
  262. BUG_NAME1,
  263. BUG_CODE2,
  264. BUG_NAME2,
  265. BUG_CODE3,
  266. BUG_NAME3,
  267. BUG_CODE4,
  268. BUG_NAME4,
  269. BUG_CODE5,
  270. BUG_NAME5,
  271. ACT_COUNT,
  272. ACT_WEIGHT,
  273. ACT_THEORY_WEIGHT,
  274. CREATE_NAME,
  275. CREATE_TIME,
  276. BUG_POS_CODE,
  277. BUG_POS_NAME,
  278. ACT_DIMATER,
  279. CHECK_DIMATER,
  280. ACT_LEN,
  281. CHECK_LEN)
  282. VALUES(
  283. ?,
  284. ?,
  285. ?,
  286. ?,
  287. ?,
  288. ?,
  289. ?,
  290. ?,
  291. ?,
  292. ?,
  293. ?,
  294. ?,
  295. ?,
  296. '',
  297. ?,
  298. ?,
  299. TO_DATE(?,'YYYY-MM-DD HH24:MI:SS'),
  300. ?,
  301. ?,
  302. ?,?,?,?)
  303. </query>
  304. <query id = "ensureBug.updateMat" desc = "回写材料表缺陷编号重量">
  305. UPDATE MAT_GP_M T
  306. SET T.SURFACE_CHECK_NO = ?,
  307. T.BUG_NO = ?,
  308. T.ACT_THEORY_WEIGHT = ?,
  309. T.ACT_DIMATER = ?,
  310. T.ACT_LEN = ?,
  311. T.FACE_RESULT_CODE = '40740602'
  312. WHERE T.MAT_NO = ?
  313. </query>
  314. <query id = "ensureBug.updateMatAll" desc = "回写检验编号">
  315. UPDATE MAT_GP_M T
  316. SET T.SURFACE_CHECK_NO = ?,
  317. T.ACT_THEORY_WEIGHT = ?,
  318. T.ACT_DIMATER = ?,
  319. T.ACT_LEN = ?,
  320. T.FACE_RESULT_CODE = '40740601'
  321. WHERE T.MAT_NO = ?
  322. </query>
  323. <query id = "ensureBug.SelectSurFace" desc = "查询该支是否已表检">
  324. SELECT COUNT(1)ACOUNT FROM QCM_LG_SURFACE_C T WHERE T.MAT_NO = ? AND T.VALIDFLAG = '1'
  325. </query>
  326. <query id = "ensureBug.deleteSurFace" desc = "作废上次表捡信息">
  327. DECLARE
  328. BEGIN
  329. UPDATE QCM_LG_SURFACE_C S
  330. SET S.VALIDFLAG = '0'
  331. WHERE S.MAT_NO = ?;
  332. END;
  333. </query>
  334. <query id = "FrmStuffSurfaceInspection.doQueryOrders" desc = "查询炼钢炉计划订单信息">
  335. SELECT T.*,S.STOVE_NO FROM PLN_STEELFOR_ORD T,PLN_STEELFORFURNACE S WHERE T.FURNACENO = S.FURNACENO AND T.FURNACENO = ?
  336. </query>
  337. <query id = "FrmStuffSurfaceInspection.doQueryPlan" desc = "查询炼钢炉计划">
  338. SELECT T.*
  339. FROM PLN_STEELFORFURNACE T
  340. WHERE T.STATUS IN ('2','3')
  341. </query>
  342. <query id = "FrmStuffSurfaceInspection.doQueryRack" desc = "查询管坯队列">
  343. SELECT
  344. T.MAT_NO,
  345. T.STOVE_NO,
  346. T.CCMSTOVENO,
  347. T.JUDGE_STOVE_NO,
  348. T.CAST_NO,
  349. T.HEATCNT,
  350. T.CCMID,
  351. T.FLOWNO,
  352. T.CUTSEQNO,
  353. T.MATERIAL_NO,
  354. T.MATERIAL_NAME,
  355. T.PRODUCCODE,
  356. T.PRODUCNAME,
  357. T.GRADECODE,
  358. T.GRADENAME,
  359. T.BATCH_GROUD_NO,
  360. T.FLAG_STOVE_NO,
  361. T.ORDER_SEQ,
  362. T.ORDER_NO,
  363. T.DELIVERY_NO,
  364. T.PRODORDERNO,
  365. T.STANDARDSCODE,
  366. T.STANDARDREMAK,
  367. T.DIAMETER,
  368. T.LEN_MIN,
  369. T.LEN_MAX,
  370. T.FIX_NUM,
  371. T.FIX_LEN,
  372. T.LENGTH,
  373. T.ACT_COUNT,
  374. T.WEIGHT,
  375. T.RECIVE_FLAG,
  376. DECODE(T.STATUS,'0','合格','1','待处理','2','剔除','3','返线')STATUS,
  377. TO_CHAR(T.CUTTIME, 'YYYY-MM-DD HH24:MI:SS') CUTTIME,
  378. T.AFFIRM_FLAG,
  379. T.SCRAP_REASON,
  380. T.OLD_MAT_NO,
  381. T.RESULT_NO,
  382. T.OLD_RESULT_NO,
  383. T.ALARM_REASON,
  384. T.TEST_COUNT,
  385. T.IS_VALID,
  386. T.FURNACENO,
  387. '管坯剔除' AS SCRAP,
  388. '剔除回退' AS SCRAP_BACK,
  389. '离线' AS ALARM,
  390. '离线回退'AS ALARM_BACK,
  391. ROWNUM SEQ
  392. FROM STL_LG_PROGRRSS T
  393. WHERE T.FURNACENO = ?
  394. AND T.STOVE_NO = ?
  395. AND T.IS_VALID = '0'
  396. ORDER BY T.MAT_NO ASC
  397. </query>
  398. <query id = "FrmStuffSurfaceInspection.getPCode" desc = "获取产线代码">
  399. select t.pline_code
  400. from COM_BASE_PLINE t
  401. where t.department_desc=?
  402. </query>
  403. <query id = "FrmStuffSurfaceInspection.doQueryResult" desc = "查询表检实绩">
  404. SELECT * FROM STL_LG_SURFACE_M T WHERE T.FURNACENO = ?
  405. </query>
  406. <query id = "FrmStuffSurfaceInspection.doQueryStausSum" desc = "查询支数">
  407. SELECT SUM(T.ACT_COUNT) ACOUNT FROM STL_LG_PROGRRSS T WHERE T.FURNACENO = ?
  408. </query>
  409. <query id = "FrmStuffSurfaceInspection.doQueryStausSum1" desc = "查询废品支数">
  410. SELECT SUM(T.ACT_COUNT) ACOUNT FROM STL_LG_PROGRRSS T WHERE T.FURNACENO = ? AND T.STATUS = '2'
  411. </query>
  412. <query id = "FrmStuffSurfaceInspection.doQueryStausSum2" desc = "查询离线品支数">
  413. SELECT SUM(T.ACT_COUNT) ACOUNT FROM STL_LG_PROGRRSS T WHERE T.FURNACENO = ? AND T.STATUS = '1'
  414. </query>
  415. <query id = "FrmStuffSurfaceInspection.doQueryStausSum3" desc = "查询合格支数重量">
  416. SELECT SUM(T.ACT_COUNT) ACOUNT,SUM(T.WEIGHT)ACT_WEGHT FROM STL_LG_PROGRRSS T WHERE T.FURNACENO = ? AND T.STATUS = '0'
  417. </query>
  418. <query id = "FrmStuffSurfaceInspection.doQueryRackStaus" desc = "查询当前材料状态">
  419. SELECT T.STATUS FROM STL_LG_PROGRRSS T WHERE T.MAT_NO = ?
  420. </query>
  421. <query id = "FrmStuffSurfaceInspection.updateRackStaus" desc = "修改材料状态">
  422. UPDATE STL_LG_PROGRRSS T SET T.STATUS = ?,T.SCRAP_REASON = ? WHERE T.MAT_NO = ?
  423. </query>
  424. <query id = "FrmStuffSurfaceInspection.saveSurfaceResult" desc = "保存实绩">
  425. DECLARE
  426. v_SURFACE_CHECK_NO STL_LG_SURFACE_M.SURFACE_CHECK_NO%TYPE := NULL;
  427. v_COUNT STL_LG_SURFACE_M.ACT_COUNT%TYPE := NULL;
  428. v_QUANTITY STL_LG_SURFACE_M.QUANTITY%TYPE := NULL; --检验支数
  429. v_ELIGIBLEQUTY STL_LG_SURFACE_M.ELIGIBLEQUTY%TYPE := NULL; --合格支数
  430. v_OFFLINE_NUM STL_LG_SURFACE_M.OFFLINE_NUM%TYPE := NULL; --下线支数
  431. v_SCRAP_NUM STL_LG_SURFACE_M.SCRAP_NUM%TYPE := NULL; --废品支数
  432. v_WEIGHT STL_LG_SURFACE_M.ACT_WEIGHT%TYPE := NULL; --合格吨
  433. v_NODE_FLAG STL_LG_SURFACE_M.NODE_FUR_FLAG%TYPE := NULL;
  434. BEGIN
  435. FOR MYROW IN (SELECT T.FURNACENO, T.FIX_NUM
  436. FROM STL_LG_PROGRRSS T
  437. WHERE T.FURNACENO = '#FURNACENO#'
  438. GROUP BY T.FURNACENO, T.FIX_NUM) LOOP
  439. SELECT '#PLINE_CODE#' || TO_CHAR(SYSDATE, 'YYMMDD') ||
  440. LPAD(NVL(MAX(SUBSTR(T.SURFACE_CHECK_NO, 11)), 0) + 1, 4, 0)
  441. INTO v_SURFACE_CHECK_NO
  442. FROM STL_LG_SURFACE_M T
  443. WHERE TRUNC(T.CREATE_TIME) = TRUNC(SYSDATE)
  444. AND T.PLINE_CODE = '#PLINE_CODE#';
  445. SELECT COUNT(1)
  446. INTO v_COUNT
  447. FROM STL_LG_SURFACE_M T
  448. WHERE T.FURNACENO = MYROW.FURNACENO
  449. AND T.ACT_FIX_NUM = MYROW.FIX_NUM;
  450. SELECT SUM(T1.ACT_COUNT)
  451. INTO v_QUANTITY
  452. FROM STL_LG_PROGRRSS T1
  453. WHERE T1.FURNACENO = MYROW.FURNACENO
  454. AND T1.FIX_NUM = MYROW.FIX_NUM;
  455. SELECT SUM(T1.WEIGHT)
  456. INTO v_WEIGHT
  457. FROM STL_LG_PROGRRSS T1
  458. WHERE T1.FURNACENO = MYROW.FURNACENO
  459. AND T1.FIX_NUM = MYROW.FIX_NUM
  460. AND T1.STATUS = '0';
  461. SELECT SUM(T1.ACT_COUNT)
  462. INTO v_ELIGIBLEQUTY
  463. FROM STL_LG_PROGRRSS T1
  464. WHERE T1.FURNACENO = MYROW.FURNACENO
  465. AND T1.FIX_NUM = MYROW.FIX_NUM
  466. AND T1.STATUS IN ('0','4');
  467. SELECT SUM(T1.ACT_COUNT)
  468. INTO v_OFFLINE_NUM
  469. FROM STL_LG_PROGRRSS T1
  470. WHERE T1.FURNACENO = MYROW.FURNACENO
  471. AND T1.FIX_NUM = MYROW.FIX_NUM
  472. AND T1.STATUS = '1';
  473. SELECT SUM(T1.ACT_COUNT)
  474. INTO v_SCRAP_NUM
  475. FROM STL_LG_PROGRRSS T1
  476. WHERE T1.FURNACENO = MYROW.FURNACENO
  477. AND T1.FIX_NUM = MYROW.FIX_NUM
  478. AND T1.STATUS = '2';
  479. SELECT T3.NODE_FUR_FLAG
  480. INTO v_NODE_FLAG
  481. FROM STL_LG_SURFACE_M T3
  482. WHERE T3.FURNACENO = MYROW.FURNACENO
  483. AND ROWNUM = 1;
  484. IF (v_COUNT > 0) THEN
  485. IF (v_NODE_FLAG = 1) THEN
  486. UPDATE STL_LG_SURFACE_M T
  487. SET T.CHECK_RESULT = '#CHECK_RESULT#',
  488. T.MEMO = '#MEMO#',
  489. T.FLOW_NO1 = '#FLOW_NO1#',
  490. T.FLOW_NO11 = '#FLOW_NO11#',
  491. T.FLOW_NO2 = '#FLOW_NO2#',
  492. T.FLOW_NO21 = '#FLOW_NO21#',
  493. T.FLOW_NO3 = '#FLOW_NO3#',
  494. T.FLOW_NO31 = '#FLOW_NO31#',
  495. T.FLOW_NO4 = '#FLOW_NO4#',
  496. T.FLOW_NO41 = '#FLOW_NO41#',
  497. T.FLOW_NO5 = '#FLOW_NO5#',
  498. T.FLOW_NO51 = '#FLOW_NO51#',
  499. T.FLOW_NO6 = '#FLOW_NO6#',
  500. T.FLOW_NO61 = '#FLOW_NO61#',
  501. T.MIN_DIAMETER1 = '#MIN_DIAMETER1#',
  502. T.MIN_DIAMETER11 = '#MIN_DIAMETER11#',
  503. T.MIN_DIAMETER2 = '#MIN_DIAMETER2#',
  504. T.MIN_DIAMETER21 = '#MIN_DIAMETER21#',
  505. T.MIN_DIAMETER3 = '#MIN_DIAMETER3#',
  506. T.MIN_DIAMETER31 = '#MIN_DIAMETER31#',
  507. T.MIN_DIAMETER4 = '#MIN_DIAMETER4#',
  508. T.MIN_DIAMETER41 = '#MIN_DIAMETER41#',
  509. T.MIN_DIAMETER5 = '#MIN_DIAMETER5#',
  510. T.MIN_DIAMETER51 = '#MIN_DIAMETER51#',
  511. T.MIN_DIAMETER6 = '#MIN_DIAMETER6#',
  512. T.MIN_DIAMETER61 = '#MIN_DIAMETER61#',
  513. T.MAX_DIAMETER1 = '#MAX_DIAMETER1#',
  514. T.MAX_DIAMETER11 = '#MAX_DIAMETER11#',
  515. T.MAX_DIAMETER2 = '#MAX_DIAMETER2#',
  516. T.MAX_DIAMETER21 = '#MAX_DIAMETER21#',
  517. T.MAX_DIAMETER3 = '#MAX_DIAMETER3#',
  518. T.MAX_DIAMETER31 = '#MAX_DIAMETER31#',
  519. T.MAX_DIAMETER4 = '#MAX_DIAMETER4#',
  520. T.MAX_DIAMETER41 = '#MAX_DIAMETER41#',
  521. T.MAX_DIAMETER5 = '#MAX_DIAMETER5#',
  522. T.MAX_DIAMETER51 = '#MAX_DIAMETER51#',
  523. T.MAX_DIAMETER6 = '#MAX_DIAMETER6#',
  524. T.MAX_DIAMETER61 = '#MAX_DIAMETER61#',
  525. T.CASTING_LENGTH1 = '#CASTING_LENGTH1#',
  526. T.CASTING_LENGTH11 = '#CASTING_LENGTH11#',
  527. T.CASTING_LENGTH2 = '#CASTING_LENGTH2#',
  528. T.CASTING_LENGTH21 = '#CASTING_LENGTH21#',
  529. T.CASTING_LENGTH3 = '#CASTING_LENGTH3#',
  530. T.CASTING_LENGTH31 = '#CASTING_LENGTH31#',
  531. T.CASTING_LENGTH4 = '#CASTING_LENGTH4#',
  532. T.CASTING_LENGTH41 = '#CASTING_LENGTH41#',
  533. T.CASTING_LENGTH5 = '#CASTING_LENGTH5#',
  534. T.CASTING_LENGTH51 = '#CASTING_LENGTH51#',
  535. T.CASTING_LENGTH6 = '#CASTING_LENGTH6#',
  536. T.CASTING_LENGTH61 = '#CASTING_LENGTH61#',
  537. T.CHAMFERCUT1 = '#CHAMFERCUT1#',
  538. T.WITHIN1 = '#WITHIN1#',
  539. T.STRAIGHTNESS1 = '#STRAIGHTNESS1#',
  540. T.INSPECTION = '#INSPECTION#',
  541. T.TREATING_RESULT = '#TREATING_RESULT#',
  542. T.CHAMFERCUT11 = '#CHAMFERCUT11#',
  543. T.CHAMFERCUT2 = '#CHAMFERCUT2#',
  544. T.CHAMFERCUT21 = '#CHAMFERCUT21#',
  545. T.CHAMFERCUT3 = '#CHAMFERCUT3#',
  546. T.CHAMFERCUT31 = '#CHAMFERCUT31#',
  547. T.CHAMFERCUT4 = '#CHAMFERCUT4#',
  548. T.CHAMFERCUT41 = '#CHAMFERCUT41#',
  549. T.CHAMFERCUT5 = '#CHAMFERCUT5#',
  550. T.CHAMFERCUT51 = '#CHAMFERCUT51#',
  551. T.CHAMFERCUT6 = '#CHAMFERCUT6#',
  552. T.CHAMFERCUT61 = '#CHAMFERCUT61#',
  553. T.WITHIN11 = '#WITHIN11#',
  554. T.WITHIN2 = '#WITHIN2#',
  555. T.WITHIN21 = '#WITHIN21#',
  556. T.WITHIN3 = '#WITHIN3#',
  557. T.WITHIN31 = '#WITHIN31#',
  558. T.WITHIN4 = '#WITHIN4#',
  559. T.WITHIN41 = '#WITHIN41#',
  560. T.WITHIN5 = '#WITHIN5#',
  561. T.WITHIN51 = '#WITHIN51#',
  562. T.WITHIN6 = '#WITHIN6#',
  563. T.WITHIN61 = '#WITHIN61#',
  564. T.STRAIGHTNESS11 = '#STRAIGHTNESS11#',
  565. T.STRAIGHTNESS2 = '#STRAIGHTNESS2#',
  566. T.STRAIGHTNESS21 = '#STRAIGHTNESS21#',
  567. T.STRAIGHTNESS3 = '#STRAIGHTNESS3#',
  568. T.STRAIGHTNESS31 = '#STRAIGHTNESS31#',
  569. T.STRAIGHTNESS4 = '#STRAIGHTNESS4#',
  570. T.STRAIGHTNESS41 = '#STRAIGHTNESS41#',
  571. T.STRAIGHTNESS5 = '#STRAIGHTNESS5#',
  572. T.STRAIGHTNESS51 = '#STRAIGHTNESS51#',
  573. T.STRAIGHTNESS6 = '#STRAIGHTNESS6#',
  574. T.STRAIGHTNESS61 = '#STRAIGHTNESS61#'
  575. WHERE T.FURNACENO = MYROW.FURNACENO;
  576. ELSE
  577. UPDATE STL_LG_SURFACE_M T
  578. SET T.QUANTITY = v_QUANTITY,
  579. T.ACT_WEIGHT = v_WEIGHT,
  580. T.CHECK_RESULT = '#CHECK_RESULT#',
  581. T.ELIGIBLEQUTY = v_ELIGIBLEQUTY,
  582. T.MEMO = '#MEMO#',
  583. T.FLOW_NO1 = '#FLOW_NO1#',
  584. T.FLOW_NO11 = '#FLOW_NO11#',
  585. T.FLOW_NO2 = '#FLOW_NO2#',
  586. T.FLOW_NO21 = '#FLOW_NO21#',
  587. T.FLOW_NO3 = '#FLOW_NO3#',
  588. T.FLOW_NO31 = '#FLOW_NO31#',
  589. T.FLOW_NO4 = '#FLOW_NO4#',
  590. T.FLOW_NO41 = '#FLOW_NO41#',
  591. T.FLOW_NO5 = '#FLOW_NO5#',
  592. T.FLOW_NO51 = '#FLOW_NO51#',
  593. T.FLOW_NO6 = '#FLOW_NO6#',
  594. T.FLOW_NO61 = '#FLOW_NO61#',
  595. T.MIN_DIAMETER1 = '#MIN_DIAMETER1#',
  596. T.MIN_DIAMETER11 = '#MIN_DIAMETER11#',
  597. T.MIN_DIAMETER2 = '#MIN_DIAMETER2#',
  598. T.MIN_DIAMETER21 = '#MIN_DIAMETER21#',
  599. T.MIN_DIAMETER3 = '#MIN_DIAMETER3#',
  600. T.MIN_DIAMETER31 = '#MIN_DIAMETER31#',
  601. T.MIN_DIAMETER4 = '#MIN_DIAMETER4#',
  602. T.MIN_DIAMETER41 = '#MIN_DIAMETER41#',
  603. T.MIN_DIAMETER5 = '#MIN_DIAMETER5#',
  604. T.MIN_DIAMETER51 = '#MIN_DIAMETER51#',
  605. T.MIN_DIAMETER6 = '#MIN_DIAMETER6#',
  606. T.MIN_DIAMETER61 = '#MIN_DIAMETER61#',
  607. T.MAX_DIAMETER1 = '#MAX_DIAMETER1#',
  608. T.MAX_DIAMETER11 = '#MAX_DIAMETER11#',
  609. T.MAX_DIAMETER2 = '#MAX_DIAMETER2#',
  610. T.MAX_DIAMETER21 = '#MAX_DIAMETER21#',
  611. T.MAX_DIAMETER3 = '#MAX_DIAMETER3#',
  612. T.MAX_DIAMETER31 = '#MAX_DIAMETER31#',
  613. T.MAX_DIAMETER4 = '#MAX_DIAMETER4#',
  614. T.MAX_DIAMETER41 = '#MAX_DIAMETER41#',
  615. T.MAX_DIAMETER5 = '#MAX_DIAMETER5#',
  616. T.MAX_DIAMETER51 = '#MAX_DIAMETER51#',
  617. T.MAX_DIAMETER6 = '#MAX_DIAMETER6#',
  618. T.MAX_DIAMETER61 = '#MAX_DIAMETER61#',
  619. T.CASTING_LENGTH1 = '#CASTING_LENGTH1#',
  620. T.CASTING_LENGTH11 = '#CASTING_LENGTH11#',
  621. T.CASTING_LENGTH2 = '#CASTING_LENGTH2#',
  622. T.CASTING_LENGTH21 = '#CASTING_LENGTH21#',
  623. T.CASTING_LENGTH3 = '#CASTING_LENGTH3#',
  624. T.CASTING_LENGTH31 = '#CASTING_LENGTH31#',
  625. T.CASTING_LENGTH4 = '#CASTING_LENGTH4#',
  626. T.CASTING_LENGTH41 = '#CASTING_LENGTH41#',
  627. T.CASTING_LENGTH5 = '#CASTING_LENGTH5#',
  628. T.CASTING_LENGTH51 = '#CASTING_LENGTH51#',
  629. T.CASTING_LENGTH6 = '#CASTING_LENGTH6#',
  630. T.CASTING_LENGTH61 = '#CASTING_LENGTH61#',
  631. T.CHAMFERCUT1 = '#CHAMFERCUT1#',
  632. T.WITHIN1 = '#WITHIN1#',
  633. T.STRAIGHTNESS1 = '#STRAIGHTNESS1#',
  634. T.INSPECTION = '#INSPECTION#',
  635. T.TREATING_RESULT = '#TREATING_RESULT#',
  636. T.OFFLINE_NUM = v_OFFLINE_NUM,
  637. T.SCRAP_NUM = v_SCRAP_NUM,
  638. T.FURNACENO = MYROW.FURNACENO,
  639. T.CHAMFERCUT11 = '#CHAMFERCUT11#',
  640. T.CHAMFERCUT2 = '#CHAMFERCUT2#',
  641. T.CHAMFERCUT21 = '#CHAMFERCUT21#',
  642. T.CHAMFERCUT3 = '#CHAMFERCUT3#',
  643. T.CHAMFERCUT31 = '#CHAMFERCUT31#',
  644. T.CHAMFERCUT4 = '#CHAMFERCUT4#',
  645. T.CHAMFERCUT41 = '#CHAMFERCUT41#',
  646. T.CHAMFERCUT5 = '#CHAMFERCUT5#',
  647. T.CHAMFERCUT51 = '#CHAMFERCUT51#',
  648. T.CHAMFERCUT6 = '#CHAMFERCUT6#',
  649. T.CHAMFERCUT61 = '#CHAMFERCUT61#',
  650. T.WITHIN11 = '#WITHIN11#',
  651. T.WITHIN2 = '#WITHIN2#',
  652. T.WITHIN21 = '#WITHIN21#',
  653. T.WITHIN3 = '#WITHIN3#',
  654. T.WITHIN31 = '#WITHIN31#',
  655. T.WITHIN4 = '#WITHIN4#',
  656. T.WITHIN41 = '#WITHIN41#',
  657. T.WITHIN5 = '#WITHIN5#',
  658. T.WITHIN51 = '#WITHIN51#',
  659. T.WITHIN6 = '#WITHIN6#',
  660. T.WITHIN61 = '#WITHIN61#',
  661. T.STRAIGHTNESS11 = '#STRAIGHTNESS11#',
  662. T.STRAIGHTNESS2 = '#STRAIGHTNESS2#',
  663. T.STRAIGHTNESS21 = '#STRAIGHTNESS21#',
  664. T.STRAIGHTNESS3 = '#STRAIGHTNESS3#',
  665. T.STRAIGHTNESS31 = '#STRAIGHTNESS31#',
  666. T.STRAIGHTNESS4 = '#STRAIGHTNESS4#',
  667. T.STRAIGHTNESS41 = '#STRAIGHTNESS41#',
  668. T.STRAIGHTNESS5 = '#STRAIGHTNESS5#',
  669. T.STRAIGHTNESS51 = '#STRAIGHTNESS51#',
  670. T.STRAIGHTNESS6 = '#STRAIGHTNESS6#',
  671. T.STRAIGHTNESS61 = '#STRAIGHTNESS61#'
  672. WHERE T.FURNACENO = MYROW.FURNACENO
  673. AND T.ACT_FIX_NUM = MYROW.FIX_NUM;
  674. END IF;
  675. ELSE
  676. INSERT INTO STL_LG_SURFACE_M
  677. (SURFACE_CHECK_NO,
  678. JUDGE_STOVE_NO,
  679. STOVE_NO,
  680. ACT_WEIGHT,
  681. CHECK_RESULT,
  682. QUANTITY,
  683. ELIGIBLEQUTY,
  684. PRO_ORDER_NO,
  685. PRO_ORDER_ID,
  686. CREATE_NAME,
  687. CREATE_TIME,
  688. MEMO,
  689. PLINE_CODE,
  690. FLOW_NO1,
  691. FLOW_NO11,
  692. FLOW_NO2,
  693. FLOW_NO21,
  694. FLOW_NO3,
  695. FLOW_NO31,
  696. FLOW_NO4,
  697. FLOW_NO41,
  698. FLOW_NO5,
  699. FLOW_NO51,
  700. FLOW_NO6,
  701. FLOW_NO61,
  702. MIN_DIAMETER1,
  703. MIN_DIAMETER11,
  704. MIN_DIAMETER2,
  705. MIN_DIAMETER21,
  706. MIN_DIAMETER3,
  707. MIN_DIAMETER31,
  708. MIN_DIAMETER4,
  709. MIN_DIAMETER41,
  710. MIN_DIAMETER5,
  711. MIN_DIAMETER51,
  712. MIN_DIAMETER6,
  713. MIN_DIAMETER61,
  714. MAX_DIAMETER1,
  715. MAX_DIAMETER11,
  716. MAX_DIAMETER2,
  717. MAX_DIAMETER21,
  718. MAX_DIAMETER3,
  719. MAX_DIAMETER31,
  720. MAX_DIAMETER4,
  721. MAX_DIAMETER41,
  722. MAX_DIAMETER5,
  723. MAX_DIAMETER51,
  724. MAX_DIAMETER6,
  725. MAX_DIAMETER61,
  726. CASTING_LENGTH1,
  727. CASTING_LENGTH11,
  728. CASTING_LENGTH2,
  729. CASTING_LENGTH21,
  730. CASTING_LENGTH3,
  731. CASTING_LENGTH31,
  732. CASTING_LENGTH4,
  733. CASTING_LENGTH41,
  734. CASTING_LENGTH5,
  735. CASTING_LENGTH51,
  736. CASTING_LENGTH6,
  737. CASTING_LENGTH61,
  738. CHAMFERCUT1,
  739. WITHIN1,
  740. STRAIGHTNESS1,
  741. INSPECTION,
  742. TREATING_RESULT,
  743. REMARKS,
  744. COL_SHIFT,
  745. COL_GROUP,
  746. FLAG_STOVE_NO,
  747. RESULT_NO,
  748. OFFLINE_NUM,
  749. SCRAP_NUM,
  750. FURNACENO,
  751. CHAMFERCUT11,
  752. CHAMFERCUT2,
  753. CHAMFERCUT21,
  754. CHAMFERCUT3,
  755. CHAMFERCUT31,
  756. CHAMFERCUT4,
  757. CHAMFERCUT41,
  758. CHAMFERCUT5,
  759. CHAMFERCUT51,
  760. CHAMFERCUT6,
  761. CHAMFERCUT61,
  762. WITHIN11,
  763. WITHIN2,
  764. WITHIN21,
  765. WITHIN3,
  766. WITHIN31,
  767. WITHIN4,
  768. WITHIN41,
  769. WITHIN5,
  770. WITHIN51,
  771. WITHIN6,
  772. WITHIN61,
  773. STRAIGHTNESS11,
  774. STRAIGHTNESS2,
  775. STRAIGHTNESS21,
  776. STRAIGHTNESS3,
  777. STRAIGHTNESS31,
  778. STRAIGHTNESS4,
  779. STRAIGHTNESS41,
  780. STRAIGHTNESS5,
  781. STRAIGHTNESS51,
  782. STRAIGHTNESS6,
  783. STRAIGHTNESS61,
  784. ACT_FIX_NUM)
  785. VALUES
  786. (v_SURFACE_CHECK_NO,
  787. '#JUDGE_STOVE_NO#',
  788. '#STOVE_NO#',
  789. v_WEIGHT,
  790. '#CHECK_RESULT#',
  791. v_QUANTITY,
  792. v_ELIGIBLEQUTY,
  793. '#PRO_ORDER_NO#',
  794. '#PRO_ORDER_ID#',
  795. '#CREATE_NAME#',
  796. SYSDATE,
  797. '#MEMO#',
  798. '#PLINE_CODE#',
  799. '#FLOW_NO1#',
  800. '#FLOW_NO11#',
  801. '#FLOW_NO2#',
  802. '#FLOW_NO21#',
  803. '#FLOW_NO3#',
  804. '#FLOW_NO31#',
  805. '#FLOW_NO4#',
  806. '#FLOW_NO41#',
  807. '#FLOW_NO5#',
  808. '#FLOW_NO51#',
  809. '#FLOW_NO6#',
  810. '#FLOW_NO61#',
  811. '#MIN_DIAMETER1#',
  812. '#MIN_DIAMETER11#',
  813. '#MIN_DIAMETER2#',
  814. '#MIN_DIAMETER21#',
  815. '#MIN_DIAMETER3#',
  816. '#MIN_DIAMETER31#',
  817. '#MIN_DIAMETER4#',
  818. '#MIN_DIAMETER41#',
  819. '#MIN_DIAMETER5#',
  820. '#MIN_DIAMETER51#',
  821. '#MIN_DIAMETER6#',
  822. '#MIN_DIAMETER61#',
  823. '#MAX_DIAMETER1#',
  824. '#MAX_DIAMETER11#',
  825. '#MAX_DIAMETER2#',
  826. '#MAX_DIAMETER21#',
  827. '#MAX_DIAMETER3#',
  828. '#MAX_DIAMETER31#',
  829. '#MAX_DIAMETER4#',
  830. '#MAX_DIAMETER41#',
  831. '#MAX_DIAMETER5#',
  832. '#MAX_DIAMETER51#',
  833. '#MAX_DIAMETER6#',
  834. '#MAX_DIAMETER61#',
  835. '#CASTING_LENGTH1#',
  836. '#CASTING_LENGTH11#',
  837. '#CASTING_LENGTH2#',
  838. '#CASTING_LENGTH21#',
  839. '#CASTING_LENGTH3#',
  840. '#CASTING_LENGTH31#',
  841. '#CASTING_LENGTH4#',
  842. '#CASTING_LENGTH41#',
  843. '#CASTING_LENGTH5#',
  844. '#CASTING_LENGTH51#',
  845. '#CASTING_LENGTH6#',
  846. '#CASTING_LENGTH61#',
  847. '#CHAMFERCUT1#',
  848. '#WITHIN1#',
  849. '#STRAIGHTNESS1#',
  850. '#INSPECTION#',
  851. '#TREATING_RESULT#',
  852. '#REMARKS#',
  853. '#COL_SHIFT#',
  854. '#COL_GROUP#',
  855. '#FLAG_STOVE_NO#',
  856. '#RESULT_NO#',
  857. v_OFFLINE_NUM,
  858. v_SCRAP_NUM,
  859. '#FURNACENO#',
  860. '#CHAMFERCUT11#',
  861. '#CHAMFERCUT2#',
  862. '#CHAMFERCUT21#',
  863. '#CHAMFERCUT3#',
  864. '#CHAMFERCUT31#',
  865. '#CHAMFERCUT4#',
  866. '#CHAMFERCUT41#',
  867. '#CHAMFERCUT5#',
  868. '#CHAMFERCUT51#',
  869. '#CHAMFERCUT6#',
  870. '#CHAMFERCUT61#',
  871. '#WITHIN11#',
  872. '#WITHIN2#',
  873. '#WITHIN21#',
  874. '#WITHIN3#',
  875. '#WITHIN31#',
  876. '#WITHIN4#',
  877. '#WITHIN41#',
  878. '#WITHIN5#',
  879. '#WITHIN51#',
  880. '#WITHIN6#',
  881. '#WITHIN61#',
  882. '#STRAIGHTNESS11#',
  883. '#STRAIGHTNESS2#',
  884. '#STRAIGHTNESS21#',
  885. '#STRAIGHTNESS3#',
  886. '#STRAIGHTNESS31#',
  887. '#STRAIGHTNESS4#',
  888. '#STRAIGHTNESS41#',
  889. '#STRAIGHTNESS5#',
  890. '#STRAIGHTNESS51#',
  891. '#STRAIGHTNESS6#',
  892. '#STRAIGHTNESS61#',
  893. MYROW.FIX_NUM);
  894. END IF;
  895. END LOOP;
  896. END;
  897. </query>
  898. <query id = "FrmStuffSurfaceInspection.insertOffine" desc = "离线时插入离线表">
  899. DECLARE
  900. v_COUNT STL_LG_PROGRRSS.ACT_COUNT%TYPE := NULL;
  901. BEGIN
  902. SELECT COUNT(1)
  903. INTO v_COUNT
  904. FROM STL_LG_OFFLINE T
  905. WHERE T.FURNACENO = '#FURNACENO#'
  906. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  907. AND T.FIX_NUM = '#FIX_NUM#';
  908. FOR MYROW IN (SELECT *
  909. FROM STL_LG_PROGRRSS T
  910. WHERE T.MAT_NO = '#MAT_NO#'
  911. AND T.FURNACENO = '#FURNACENO#') LOOP
  912. IF (v_COUNT > 0) THEN
  913. UPDATE STL_LG_OFFLINE T
  914. SET T.OFFLINE_NUM = TO_NUMBER(T.OFFLINE_NUM) +
  915. TO_NUMBER(MYROW.ACT_COUNT),
  916. T.ZP_WEIGHT = TO_NUMBER(T.ZP_WEIGHT) +
  917. TO_NUMBER(MYROW.WEIGHT)
  918. WHERE T.FURNACENO = MYROW.FURNACENO
  919. AND T.FIX_NUM = MYROW.FIX_NUM;
  920. ELSE
  921. INSERT INTO STL_LG_OFFLINE
  922. (FURNACENO,
  923. STOVE_NO,
  924. JUDGE_STOVE_NO,
  925. DIAMETER,
  926. LENGTH,
  927. FIX_NUM,
  928. FIX_LEN,
  929. PLINE_CODE,
  930. OFFLINE_NUM,
  931. BACKLINE_NUM,
  932. ZP_FLAG,
  933. ZP_WEIGHT,
  934. MATERIAL_NO,
  935. MATERIAL_NAME,
  936. PRODUCCODE,
  937. PRODUCNAME,
  938. STEELCODE,
  939. STEELNAME,
  940. GRADECODE,
  941. GRADENAME,
  942. SPEC_CODE,
  943. SPEC_NAME,
  944. MODEL_CODE,
  945. MODEL_DESC,
  946. STD_CODE,
  947. STD_NAME,
  948. STD_STYLE,
  949. STD_STYLE_DESC,
  950. COL_USER,
  951. COL_SHIFT,
  952. COL_GROUP,
  953. OFFLINE_TIME
  954. )
  955. VALUES
  956. (MYROW.FURNACENO,
  957. MYROW.STOVE_NO,
  958. MYROW.JUDGE_STOVE_NO,
  959. MYROW.DIAMETER,
  960. MYROW.LENGTH,
  961. MYROW.FIX_NUM,
  962. MYROW.FIX_LEN,
  963. MYROW.PLINE_CODE,
  964. MYROW.ACT_COUNT,
  965. '0',
  966. '0',
  967. MYROW.WEIGHT,
  968. MYROW.MATERIAL_NO,
  969. MYROW.MATERIAL_NAME,
  970. '',
  971. '',
  972. '',
  973. '',
  974. MYROW.GRADECODE,
  975. MYROW.GRADENAME,
  976. '',
  977. '',
  978. '',
  979. '',
  980. '',
  981. '',
  982. '',
  983. '',
  984. '#COL_USER#',
  985. '#COL_SHIFT#',
  986. '#COL_GROUP#',
  987. SYSDATE
  988. );
  989. END IF;
  990. UPDATE STL_LG_PROGRRSS T SET T.STATUS = '1' WHERE T.MAT_NO = MYROW.MAT_NO AND T.FIX_NUM = MYROW.FIX_NUM;
  991. END LOOP;
  992. END;
  993. </query>
  994. <query id= "FrmStuffSurfaceInspection.insertOffineBack" desc = "表检离线回退">
  995. <![CDATA[
  996. DECLARE
  997. V_NUM STL_LG_OFFLINE.OFFLINE_NUM%TYPE := NULL;
  998. BEGIN
  999. FOR MYROW IN (SELECT *
  1000. FROM STL_LG_PROGRRSS T
  1001. WHERE T.MAT_NO = '#MAT_NO#'
  1002. AND T.FURNACENO = '#FURNACENO#') LOOP
  1003. UPDATE STL_LG_OFFLINE T
  1004. SET T.OFFLINE_NUM = TO_NUMBER(T.OFFLINE_NUM) -
  1005. TO_NUMBER(MYROW.ACT_COUNT),
  1006. T.ZP_WEIGHT = TO_NUMBER(T.ZP_WEIGHT) - TO_NUMBER(MYROW.WEIGHT)
  1007. WHERE T.FURNACENO = MYROW.FURNACENO
  1008. AND T.FIX_NUM = MYROW.FIX_NUM;
  1009. UPDATE STL_LG_PROGRRSS T SET T.STATUS = '0' WHERE T.MAT_NO = MYROW.MAT_NO AND T.FIX_NUM = MYROW.FIX_NUM;
  1010. SELECT T.OFFLINE_NUM
  1011. INTO V_NUM
  1012. FROM STL_LG_OFFLINE T
  1013. WHERE T.FURNACENO = '#FURNACENO#'
  1014. AND T.FIX_NUM = '#FIX_NUM#';
  1015. IF(V_NUM <1)THEN
  1016. DELETE FROM STL_LG_OFFLINE T WHERE T.FURNACENO = '#FURNACENO#' AND T.FIX_NUM = '#FIX_NUM#';
  1017. END IF;
  1018. END LOOP;
  1019. END;
  1020. ]]>
  1021. </query>
  1022. <query id = "FrmStuffSurfaceInspection.doQueryOffline" desc = "查询是否存在未处理管坯">
  1023. SELECT COUNT(1)ACOUNT FROM STL_LG_PROGRRSS T WHERE T.FURNACENO = ? AND T.IS_VALID = '0' AND T.STATUS = '1'
  1024. </query>
  1025. <query id = "FrmStuffSurfaceInspection.doBaside" desc = "结炉">
  1026. UPDATE STL_LG_SURFACE_M T SET T.NODE_FUR_FLAG = '1' WHERE T.FURNACENO = ?
  1027. </query>
  1028. <query id= "FrmStuffSurfaceInspection.doBasideBack" desc = "结炉回退">
  1029. UPDATE STL_LG_SURFACE_M T SET T.NODE_FUR_FLAG = '0' WHERE T.FURNACENO = ?
  1030. </query>
  1031. </queryMap>