FrmVrpDownLineManage.xml 44 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519
  1. <?xml version="1.0" encoding="UTF-8"?>
  2. <queryMap desc="离线管理">
  3. <query id="FrmVrpDownLineManage.doQueryOffLine" desc="查询离线实绩">
  4. <![CDATA[
  5. SELECT T.ORDER_NO || '/' || T.ORDER_SEQ || '/' || T.DELIVERY_NO PROCESS_ORDER,
  6. T.ORDER_NO,
  7. T.ORDER_SEQ,
  8. T.DELIVERY_NO,
  9. T.ORD_LN_DLY_PK,
  10. T.RESULT_NO,
  11. T.PLINE_CODE,
  12. T.PLINE_NAME,
  13. T.STATION_CODE,
  14. T.STATION_DESC,
  15. T.HEAT_PLAN_NO,
  16. T.ZY_BATCH_ID,
  17. T.PRO_PLAN_ID,
  18. T.GX_PLAN_NO,
  19. T.JUDGE_STOVE_NO,
  20. T.BATCH_NO,
  21. T.PRODUCCODE,
  22. T.PRODUCNAME,
  23. T.STEELCODE,
  24. T.STEELNAME,
  25. T.GRADECODE,
  26. T.GRADENAME,
  27. T.MODEL_CODE,
  28. T.MODEL_DESC,
  29. T.STD_CODE,
  30. T.STD_NAME,
  31. T.STD_STYLE,
  32. T.STD_STYLE_DESC,
  33. T.ACT_DIMATER,
  34. T.ACT_HEIGHT,
  35. NVL(T.ACT_LEN, 0) ACT_LEN,
  36. T.ACT_LEN_MIN,
  37. T.ACT_LEN_MAX,
  38. T.ZP_JUDGE_STOVE_NO,
  39. T.ZP_BATCH_NO,
  40. NVL(T.OFFLINE_NUM, 0) OFFLINE_NUM,
  41. NVL(T.OFFLINE_WT, 0) OFFLINE_WT,
  42. NVL(T.RE_NUM, 0) RE_NUM,
  43. NVL(T.RE_WT, 0) RE_WT,
  44. NVL(T.GROUP_NUM, 0) GROUP_NUM,
  45. NVL(T.GROUP_WT, 0) GROUP_WT,
  46. NVL(T.SUBCONTRACT_NUM, 0) SUBCONTRACT_NUM,
  47. NVL(T.SUBCONTRACTCOMPLETE_NUM, 0) SUBCONTRACTCOMPLETE_NUM,
  48. NVL(T.SUBCONTRACTCOMPLETE_WT, 0) SUBCONTRACTCOMPLETE_WT,
  49. T.SUBCONTRACT_NO,
  50. T.SUBCONTRACT_NO_SEQ,
  51. TO_CHAR(TO_DATE(T.PRO_YEAR_MONTH_DAY, 'YYYY-MM-DD'), 'YYYY-MM-DD') PRO_YEAR_MONTH_DAY,
  52. T.PRO_USER,
  53. T.ZY_BATCH_ID1,
  54. T.BATCH_GROUD_NO,
  55. T.FLAG_STOVE_NO,
  56. T.MEMO,
  57. DECODE(T.PRO_SHIFT, '1', '早', '2', '中', '3', '夜') PRO_SHIFT,
  58. DECODE(T.PRO_GROUP, '1', '甲', '2', '乙', '3', '丙', '4', '丁') PRO_GROUP,
  59. TO_CHAR(T.PRO_TIME, 'YYYY-MM-DD HH24:MI:SS') PRO_TIME,
  60. DECODE(T.GROUP_LOG, '1', '已组炉', '0', '未组炉') GROUP_LOG,
  61. (TO_NUMBER(NVL(T.OFFLINE_NUM, 0)) - TO_NUMBER(NVL(T.GROUP_NUM, 0)) -
  62. TO_NUMBER(NVL(T.RE_NUM, 0)) - TO_NUMBER(NVL(T.SUBCONTRACT_NUM, 0)) +
  63. TO_NUMBER(NVL(T.SUBCONTRACTCOMPLETE_NUM, 0))) OFFLINE_BRANCH,
  64. (TO_NUMBER(NVL(T.OFFLINE_NUM, 0)) - TO_NUMBER(NVL(T.GROUP_NUM, 0)) -
  65. TO_NUMBER(NVL(T.RE_NUM, 0)) - TO_NUMBER(NVL(T.SUBCONTRACT_NUM, 0)) +
  66. TO_NUMBER(NVL(T.SUBCONTRACTCOMPLETE_NUM, 0))) TOTALCOUNT
  67. FROM VRP_OFFLINE_RESULT T
  68. WHERE 1=1
  69. AND (TO_NUMBER(NVL(T.OFFLINE_NUM, 0)) - TO_NUMBER(NVL(T.GROUP_NUM, 0)) -
  70. TO_NUMBER(NVL(T.RE_NUM, 0)) - TO_NUMBER(NVL(T.SUBCONTRACT_NUM, 0)) +
  71. TO_NUMBER(NVL(T.SUBCONTRACTCOMPLETE_NUM, 0))) >0
  72. ]]>
  73. </query>
  74. <query id = "FrmVrpDownLineManage.insertVrpTakeReslut" desc = "插入脱单实绩表,脱单,回写PLN_ORDER_ZG_S">
  75. <![CDATA[
  76. DECLARE
  77. v_JUDGE_STOVE_NO VRP_OFFLINE_RESULT.JUDGE_STOVE_NO%TYPE := ?;
  78. v_STATION_CODE VRP_OFFLINE_RESULT.STATION_CODE%TYPE := ?;
  79. v_PLINE_CODE VRP_OFFLINE_RESULT.PLINE_CODE%TYPE :=?;
  80. v_ID VRP_TAKE_RESULT.ID%TYPE := NULL;
  81. v_OFFLINE_PRO1 VRP_OFFLINE_RESULT.STATION_CODE%TYPE := NULL;
  82. v_NMB VRP_TAKE_RESULT.ID%TYPE := NULL;
  83. BEGIN
  84. --生成ID
  85. --SELECT TO_CHAR(SYSDATE, 'YYMMDD') || v_PLINE_CODE ||
  86. -- LPAD(NVL(MAX(SUBSTR(T.ID, 11)), 0) + 1, 3, 0) DI
  87. -- INTO v_ID
  88. -- FROM VRP_TAKE_RESULT T
  89. -- WHERE T.PLINE_CODE = v_PLINE_CODE
  90. -- AND INSTR(T.ID, '-') = 0
  91. -- AND TO_CHAR(T.TAKE_TIME, 'YYYY-MM-DD') =
  92. -- TO_CHAR(SYSDATE, 'YYYY-MM-DD');
  93. FOR MYROW IN (SELECT *
  94. FROM VRP_OFFLINE_RESULT T
  95. WHERE T.JUDGE_STOVE_NO = v_JUDGE_STOVE_NO
  96. AND T.STATION_CODE = v_STATION_CODE
  97. AND T.PLINE_CODE = v_PLINE_CODE) LOOP
  98. SELECT TO_CHAR(SYSDATE, 'YYMMDD') || v_PLINE_CODE ||
  99. LPAD(NVL(MAX(TO_NUMBER(SUBSTR(T.ID, LENGTH(T.ID) - 2))), 0) + 1,
  100. 3,
  101. '0') ID INTO v_ID
  102. FROM VRP_TAKE_RESULT T
  103. WHERE ID LIKE TO_CHAR(SYSDATE, 'YYMMDD') || v_PLINE_CODE || '___';
  104. insert into vrp_take_result
  105. (id,
  106. result_no,
  107. pline_code,
  108. pline_name,
  109. station_code,
  110. station_desc,
  111. heat_plan_no,
  112. zy_batch_id,
  113. pro_plan_id,
  114. gx_plan_no,
  115. judge_stove_no,
  116. batch_no,
  117. produccode,
  118. producname,
  119. steelcode,
  120. steelname,
  121. gradecode,
  122. gradename,
  123. model_code,
  124. model_desc,
  125. std_code,
  126. std_name,
  127. std_style,
  128. std_style_desc,
  129. act_dimater,
  130. act_height,
  131. act_len,
  132. act_len_min,
  133. act_len_max,
  134. zp_judge_stove_no,
  135. zp_batch_no,
  136. offline_num,
  137. offline_wt,
  138. re_num,
  139. re_wt,
  140. group_num,
  141. group_wt,
  142. subcontract_num,
  143. subcontractcomplete_num,
  144. subcontractcomplete_wt,
  145. subcontract_no,
  146. subcontract_no_seq,
  147. pro_year_month_day,
  148. pro_user,
  149. pro_shift,
  150. pro_group,
  151. pro_time,
  152. group_log,
  153. group_id,
  154. ord_ln_dly_pk,
  155. order_no,
  156. order_seq,
  157. delivery_no,
  158. update_time,
  159. update_name,
  160. return_process,
  161. subcontract_wt,
  162. re_time,
  163. re_name,
  164. subcontract_time,
  165. subcontract_name,
  166. subcontractcomplete_time,
  167. subcontractcomplete_name,
  168. hb_fp_num,
  169. hb_fp_wt,
  170. bal_year_month,
  171. zy_batch_id1,
  172. batch_groud_no,
  173. flag_stove_no,
  174. flag,
  175. take_time,
  176. take_user,
  177. take_num)
  178. values
  179. (v_id,
  180. MYROW.result_no,
  181. MYROW.pline_code,
  182. MYROW.pline_name,
  183. MYROW.station_code,
  184. MYROW.station_desc,
  185. MYROW.heat_plan_no,
  186. MYROW.zy_batch_id,
  187. MYROW.pro_plan_id,
  188. MYROW.gx_plan_no,
  189. MYROW.judge_stove_no,
  190. MYROW.batch_no,
  191. MYROW.produccode,
  192. MYROW.producname,
  193. MYROW.steelcode,
  194. MYROW.steelname,
  195. MYROW.gradecode,
  196. MYROW.gradename,
  197. MYROW.model_code,
  198. MYROW.model_desc,
  199. MYROW.std_code,
  200. MYROW.std_name,
  201. MYROW.std_style,
  202. MYROW.std_style_desc,
  203. MYROW.act_dimater,
  204. MYROW.act_height,
  205. MYROW.act_len,
  206. MYROW.act_len_min,
  207. MYROW.act_len_max,
  208. MYROW.zp_judge_stove_no,
  209. MYROW.zp_batch_no,
  210. MYROW.offline_num,
  211. MYROW.offline_wt,
  212. MYROW.re_num,
  213. MYROW.re_wt,
  214. MYROW.group_num,
  215. MYROW.group_wt,
  216. MYROW.subcontract_num,
  217. MYROW.subcontractcomplete_num,
  218. MYROW.subcontractcomplete_wt,
  219. MYROW.subcontract_no,
  220. MYROW.subcontract_no_seq,
  221. MYROW.pro_year_month_day,
  222. MYROW.pro_user,
  223. MYROW.pro_shift,
  224. MYROW.pro_group,
  225. MYROW.pro_time,
  226. MYROW.group_log,
  227. MYROW.group_id,
  228. MYROW.ord_ln_dly_pk,
  229. MYROW.order_no,
  230. MYROW.order_seq,
  231. MYROW.delivery_no,
  232. MYROW.update_time,
  233. MYROW.update_name,
  234. MYROW.return_process,
  235. MYROW.subcontract_wt,
  236. MYROW.re_time,
  237. MYROW.re_name,
  238. MYROW.subcontract_time,
  239. MYROW.subcontract_name,
  240. MYROW.subcontractcomplete_time,
  241. MYROW.subcontractcomplete_name,
  242. MYROW.hb_fp_num,
  243. MYROW.hb_fp_wt,
  244. MYROW.bal_year_month,
  245. MYROW.zy_batch_id1,
  246. MYROW.batch_groud_no,
  247. MYROW.flag_stove_no,
  248. MYROW.flag,
  249. SYSDATE,
  250. ?,
  251. NVL(MYROW.OFFLINE_NUM, 0) - NVL(MYROW.GROUP_NUM, 0) -
  252. NVL(MYROW.RE_NUM, 0));
  253. UPDATE VRP_OFFLINE_RESULT T
  254. SET T.PRO_PLAN_ID = '', T.GX_PLAN_NO = '', T.Order_No = '',t.order_seq ='',t.DELIVERY_NO =''
  255. WHERE T.JUDGE_STOVE_NO = v_JUDGE_STOVE_NO
  256. AND T.PLINE_CODE = v_PLINE_CODE
  257. AND T.STATION_CODE = v_STATION_CODE;
  258. END LOOP;
  259. END;
  260. ]]>
  261. </query>
  262. <query id = "FrmVrpDownLineManage.doQueryTake" desc = "查询是否已脱单">
  263. <![CDATA[
  264. select count(1) ACOUNT
  265. from vrp_TAKE_RESulT t
  266. where t.judge_stove_no = ?
  267. and t.ZY_BATCH_ID = ?
  268. and t.STATION_CODE = ?
  269. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  270. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  271. ]]>
  272. </query>
  273. <query id = "FrmVrpDownLineManage.doQueryTake2" desc = "查询是否已脱单">
  274. <![CDATA[
  275. select COUNT(1) ACOUNT
  276. from vrp_OFFLINE_RESulT t
  277. WHERE T.IS_TAKE = '1'
  278. AND T.JUDGE_STOVE_NO = ?
  279. AND T.LOT_NO = ?
  280. AND T.PLINE_CODE = ?
  281. ]]>
  282. </query>
  283. <query id="FrmVrpDownLineManage.doQueryOffLineNum" desc="查询离线实绩">
  284. <![CDATA[
  285. SELECT
  286. (TO_NUMBER(NVL(T.OFFLINE_NUM, 0)) - TO_NUMBER(NVL(T.GROUP_NUM, 0)) -
  287. TO_NUMBER(NVL(T.RE_NUM, 0)) - TO_NUMBER(NVL(T.SUBCONTRACT_NUM, 0)) +
  288. TO_NUMBER(NVL(T.SUBCONTRACTCOMPLETE_NUM, 0))) OFFLINE_BRANCH,
  289. abs((TO_NUMBER(NVL(T.OFFLINE_NUM, 0)) - TO_NUMBER(NVL(T.GROUP_NUM, 0)) -
  290. TO_NUMBER(NVL(T.RE_NUM, 0)))) TOTALCOUNT
  291. FROM VRP_OFFLINE_RESULT T
  292. WHERE 1=1 and t.HEAT_PLAN_NO = ? AND T.RESULT_NO = ?
  293. AND (TO_NUMBER(NVL(T.OFFLINE_NUM, 0)) - TO_NUMBER(NVL(T.GROUP_NUM, 0)) -
  294. TO_NUMBER(NVL(T.RE_NUM, 0))) <>0
  295. ]]>
  296. </query>
  297. <query id="FrmVrpDownLineManage.deteleVrpPort" desc="删除管号队列新增数据">
  298. <![CDATA[
  299. DELETE port_vrp_batch_sample_result T where T.MAT_NO = ? AND t.HEAT_PLAN_NO = ?
  300. and t.OP_PROCESS = ?
  301. ]]>
  302. </query>
  303. <query id="FrmVrpDownLineManage.queryVrpMatNo" desc="查询待处理的材料号">
  304. <![CDATA[
  305. SELECT T.MAT_NO MAT_NO FROM port_vrp_batch_sample_result T where t.RESULT_nO = ? AND T.MAT_STATUS='00'
  306. order by t.MAT_NO DESC
  307. ]]>
  308. </query>
  309. <query id="FrmVrpDownLineManage.doQueryOffLine2" desc="查询离线实绩">
  310. <![CDATA[
  311. SELECT T.*, (TO_NUMBER(NVL(T.OFFLINE_NUM, 0)) - TO_NUMBER(NVL(T.GROUP_NUM, 0)) -
  312. TO_NUMBER(NVL(T.RE_NUM, 0)) - TO_NUMBER(NVL(T.SUBCONTRACT_NUM, 0)) +
  313. TO_NUMBER(NVL(T.SUBCONTRACTCOMPLETE_NUM, 0))) OFFLINE_BRANCH,
  314. (TO_NUMBER(NVL(T.OFFLINE_NUM, 0)) - TO_NUMBER(NVL(T.GROUP_NUM, 0)) -
  315. TO_NUMBER(NVL(T.RE_NUM, 0)) - TO_NUMBER(NVL(T.SUBCONTRACT_NUM, 0)) +
  316. TO_NUMBER(NVL(T.SUBCONTRACTCOMPLETE_NUM, 0))) TOTALCOUNT
  317. FROM VRP_OFFLINE_RESULT T
  318. WHERE RESULT_NO = ?
  319. AND (TO_NUMBER(NVL(T.OFFLINE_NUM, 0)) - TO_NUMBER(NVL(T.GROUP_NUM, 0)) -
  320. TO_NUMBER(NVL(T.RE_NUM, 0)) - TO_NUMBER(NVL(T.SUBCONTRACT_NUM, 0)) +
  321. TO_NUMBER(NVL(T.SUBCONTRACTCOMPLETE_NUM, 0))) <>0
  322. ]]>
  323. </query>
  324. <query id="FrmVrpDownLineManage.GetQueryVrpPort" desc="查询对应的管号队列数据">
  325. <![CDATA[
  326. SELECT T.HEAT_PLAN_NO,
  327. T.MAT_NO,
  328. T.M_MAT_NO,
  329. T.M_M_MAT_NO,
  330. T.LOT_NO,
  331. T.LOT_NO_SQE,
  332. T.PLINE_CODE,
  333. T.PLINE_NAME,
  334. T.JUDGE_STOVE_NO,
  335. T.BATCH_NO,
  336. T.GROUP_NO,
  337. T.STOVE_NO,
  338. T.ACT_DIMATER,
  339. T.ACT_HEIGHT,
  340. T.ACT_LEN,
  341. T.ACT_LEN_MIN,
  342. T.ACT_LEN_MAX,
  343. T.ACT_COUNT,
  344. T.ACT_WEIGHT,
  345. T.ACT_THEORY_WEIGHT,
  346. DECODE(T.IS_SAMPLE_PIPE, '0', '否', '1', '是') IS_SAMPLE_PIPE,
  347. T.SAMPLE_PIPE_LEN,
  348. T.GET_SAMPLE_SHIFT,
  349. T.GET_SAMPLE_CLASS,
  350. T.GET_SAMPLE_NAME,
  351. TO_CHAR(T.GET_SAMPLE_TIME, 'YYYY-MM-DD HH24:MI:SS') GET_SAMPLE_TIME,
  352. T.OLD_JUDGE_STOVE_NO,
  353. DECODE(T.GROUP_FLAG, '0', '未组炉', '1', '组炉') GROUP_FLAG,
  354. (SELECT T1.BASENAME
  355. FROM COM_BASE_INFO T1
  356. WHERE T1.BASECODE = T.OP_PROCESS
  357. AND T1.VALIDFLAG = '1') OP_PROCESS,
  358. DECODE(T.MAT_STATUS, '00', '合格', '10', '剔除', '20', '待处理','30','另组炉','40','委外废品') MAT_STATUS,
  359. DECODE(T.LEVE_LOG, '00', '无', '10', '离线', '20', '返线') LEVE_LOG,
  360. DECODE(T.INSTORE_FLAG, '0', '未入库', '1', '已入库') INSTORE_FLAG,
  361. T.PRO_USER,
  362. DECODE(T.PRO_SHIFT, 1, '早', 2, '中', 3, '夜', 0, '常白') PRO_SHIFT,
  363. DECODE(T.PRO_GROUP, 1, '甲', 2, '乙', 3, '丙', 4, '丁') PRO_GROUP,
  364. TO_CHAR(T.PRO_TIME, 'YYYY-MM-DD HH24:MI:SS') PRO_TIME,
  365. T.REMARK,
  366. T.PRC_TECHNOLOGY_PATH,
  367. t.FEED_HEAT_NO,
  368. t.HEAT_PLAN_SQE
  369. FROM PORT_VRP_BATCH_SAMPLE_RESULT T
  370. WHERE T.HEAT_PLAN_NO = ? and t.JUDGE_STOVE_NO =? and t.BATCH_NO = ?
  371. ORDER BY T.MAT_NO ASC
  372. ]]>
  373. </query>
  374. <query id="FrmVrpDownLineManage.GetQueryVrpPortCount" desc="查询对应的管号队列数据支数">
  375. <![CDATA[
  376. SELECT count(*) COUNT
  377. FROM PORT_VRP_BATCH_SAMPLE_RESULT T
  378. WHERE T.HEAT_PLAN_NO = ? and t.JUDGE_STOVE_NO =? and t.BATCH_NO = ? AND T.LEVE_LOG in ('10','20')
  379. ORDER BY T.MAT_NO ASC
  380. ]]>
  381. </query>
  382. <query id="FrmVrpDownLineManage.doQueryOffLineGroup" desc="查询组炉实绩">
  383. <![CDATA[
  384. SELECT T.ORDER_NO || '/' || T.ORDER_SEQ || '/' || T.DELIVERY_NO PROCESS_ORDER,
  385. T.ORDER_NO,
  386. T.ORDER_SEQ,
  387. T.DELIVERY_NO,
  388. T.ORD_LN_DLY_PK,
  389. T.RESULT_NO,
  390. T.PLINE_CODE,
  391. T.PLINE_NAME,
  392. T.STATION_CODE,
  393. T.STATION_DESC,
  394. T.HEAT_PLAN_NO,
  395. T.ZY_BATCH_ID,
  396. T.PRO_PLAN_ID,
  397. T.GX_PLAN_NO,
  398. T.JUDGE_STOVE_NO,
  399. T.BATCH_NO,
  400. T.PRODUCCODE,
  401. T.PRODUCNAME,
  402. T.STEELCODE,
  403. T.STEELNAME,
  404. T.GRADECODE,
  405. T.GRADENAME,
  406. T.MODEL_CODE,
  407. T.MODEL_DESC,
  408. T.STD_CODE,
  409. T.STD_NAME,
  410. T.STD_STYLE,
  411. T.STD_STYLE_DESC,
  412. T.ACT_DIMATER,
  413. T.ACT_HEIGHT,
  414. NVL(T.ACT_LEN, 0) ACT_LEN,
  415. T.ACT_LEN_MIN,
  416. T.ACT_LEN_MAX,
  417. T.ZP_JUDGE_STOVE_NO,
  418. T.ZP_BATCH_NO,
  419. NVL(T.OFFLINE_NUM, 0) OFFLINE_NUM,
  420. NVL(T.OFFLINE_WT, 0) OFFLINE_WT,
  421. NVL(T.RE_NUM, 0) RE_NUM,
  422. NVL(T.RE_WT, 0) RE_WT,
  423. NVL(T.GROUP_NUM, 0) GROUP_NUM,
  424. NVL(T.GROUP_WT, 0) GROUP_WT,
  425. NVL(T.SUBCONTRACT_NUM, 0) SUBCONTRACT_NUM,
  426. NVL(T.SUBCONTRACTCOMPLETE_NUM, 0) SUBCONTRACTCOMPLETE_NUM,
  427. NVL(T.SUBCONTRACTCOMPLETE_WT, 0) SUBCONTRACTCOMPLETE_WT,
  428. T.SUBCONTRACT_NO,
  429. T.SUBCONTRACT_NO_SEQ,
  430. TO_CHAR(TO_DATE(T.PRO_YEAR_MONTH_DAY, 'YYYY-MM-DD'), 'YYYY-MM-DD') PRO_YEAR_MONTH_DAY,
  431. T.PRO_USER,
  432. T.ZY_BATCH_ID1,
  433. T.FLAG_STOVE_NO,
  434. DECODE(T.PRO_SHIFT, '1', '早', '2', '中', '3', '夜') PRO_SHIFT,
  435. DECODE(T.PRO_GROUP, '1', '甲', '2', '乙', '3', '丙', '4', '丁') PRO_GROUP,
  436. TO_CHAR(T.PRO_TIME, 'YYYY-MM-DD HH24:MI:SS') PRO_TIME,
  437. DECODE(T.GROUP_LOG, '1', '已组炉', '0', '未组炉') GROUP_LOG,
  438. (TO_NUMBER(NVL(T.OFFLINE_NUM, 0)) - TO_NUMBER(NVL(T.GROUP_NUM, 0)) -
  439. TO_NUMBER(NVL(T.RE_NUM, 0)) - TO_NUMBER(NVL(T.SUBCONTRACT_NUM, 0)) +
  440. TO_NUMBER(NVL(T.SUBCONTRACTCOMPLETE_NUM, 0))) OFFLINE_BRANCH,
  441. (TO_NUMBER(NVL(T.OFFLINE_NUM, 0)) - TO_NUMBER(NVL(T.GROUP_NUM, 0)) -
  442. TO_NUMBER(NVL(T.RE_NUM, 0)) - TO_NUMBER(NVL(T.SUBCONTRACT_NUM, 0)) +
  443. TO_NUMBER(NVL(T.SUBCONTRACTCOMPLETE_NUM, 0))) TOTALCOUNT,
  444. T.GROUP_ID
  445. FROM VRP_OFFLINE_RESULT T
  446. WHERE 1=1
  447. AND T.GROUP_LOG='1'
  448. ]]>
  449. </query>
  450. <query id="FrmVrpDownLineManage.doQueryReturnLine" desc="查询返线实绩">
  451. <![CDATA[
  452. SELECT T.ORDER_NO || '/' || T.ORDER_SEQ || '/' || T.DELIVERY_NO PROCESS_ORDER,
  453. T.ORDER_NO,
  454. T.ORDER_SEQ,
  455. T.DELIVERY_NO,
  456. T.ORD_LN_DLY_PK,
  457. T.RESULT_NO,
  458. T.PLINE_CODE,
  459. T.PLINE_NAME,
  460. T.STATION_CODE,
  461. T.STATION_DESC,
  462. T.HEAT_PLAN_NO,
  463. T.ZY_BATCH_ID,
  464. T.PRO_PLAN_ID,
  465. T.GX_PLAN_NO,
  466. T.JUDGE_STOVE_NO,
  467. T.BATCH_NO,
  468. T.PRODUCCODE,
  469. T.PRODUCNAME,
  470. T.STEELCODE,
  471. T.STEELNAME,
  472. T.GRADECODE,
  473. T.GRADENAME,
  474. T.MODEL_CODE,
  475. T.MODEL_DESC,
  476. T.STD_CODE,
  477. T.STD_NAME,
  478. T.STD_STYLE,
  479. T.STD_STYLE_DESC,
  480. T.ACT_DIMATER,
  481. T.ACT_HEIGHT,
  482. NVL(T.ACT_LEN, 0) ACT_LEN,
  483. T.ACT_LEN_MIN,
  484. T.ACT_LEN_MAX,
  485. T.ZP_JUDGE_STOVE_NO,
  486. T.ZP_BATCH_NO,
  487. NVL(T.OFFLINE_NUM, 0) OFFLINE_NUM,
  488. NVL(T.OFFLINE_WT, 0) OFFLINE_WT,
  489. NVL(T.RE_NUM, 0) RE_NUM,
  490. NVL(T.RE_WT, 0) RE_WT,
  491. NVL(T.GROUP_NUM, 0) GROUP_NUM,
  492. NVL(T.GROUP_WT, 0) GROUP_WT,
  493. NVL(T.SUBCONTRACT_NUM, 0) SUBCONTRACT_NUM,
  494. NVL(T.SUBCONTRACTCOMPLETE_NUM, 0) SUBCONTRACTCOMPLETE_NUM,
  495. NVL(T.SUBCONTRACTCOMPLETE_WT, 0) SUBCONTRACTCOMPLETE_WT,
  496. T.SUBCONTRACT_NO,
  497. T.SUBCONTRACT_NO_SEQ,
  498. TO_CHAR(TO_DATE(T.PRO_YEAR_MONTH_DAY, 'YYYY-MM-DD'), 'YYYY-MM-DD') PRO_YEAR_MONTH_DAY,
  499. T.PRO_USER,
  500. T.ZY_BATCH_ID1,
  501. T.FLAG_STOVE_NO,
  502. DECODE(T.PRO_SHIFT, '1', '早', '2', '中', '3', '夜') PRO_SHIFT,
  503. DECODE(T.PRO_GROUP, '1', '甲', '2', '乙', '3', '丙', '4', '丁') PRO_GROUP,
  504. TO_CHAR(T.PRO_TIME, 'YYYY-MM-DD HH24:MI:SS') PRO_TIME,
  505. DECODE(T.GROUP_LOG, '1', '已组炉', '0', '未组炉') GROUP_LOG,
  506. (TO_NUMBER(NVL(T.OFFLINE_NUM, 0)) - TO_NUMBER(NVL(T.GROUP_NUM, 0)) -
  507. TO_NUMBER(NVL(T.RE_NUM, 0)) - TO_NUMBER(NVL(T.SUBCONTRACT_NUM, 0)) +
  508. TO_NUMBER(NVL(T.SUBCONTRACTCOMPLETE_NUM, 0))) OFFLINE_BRANCH,
  509. (TO_NUMBER(NVL(T.OFFLINE_NUM, 0)) - TO_NUMBER(NVL(T.GROUP_NUM, 0)) -
  510. TO_NUMBER(NVL(T.RE_NUM, 0)) - TO_NUMBER(NVL(T.SUBCONTRACT_NUM, 0)) +
  511. TO_NUMBER(NVL(T.SUBCONTRACTCOMPLETE_NUM, 0))) TOTALCOUNT,
  512. T.GROUP_ID,
  513. T.RETURN_PROCESS,
  514. T.FLAG
  515. FROM VRP_OFFLINE_RESULT T
  516. WHERE 1=1
  517. AND TO_NUMBER(NVL(T.RE_NUM, 0)) <>0
  518. ]]>
  519. </query>
  520. <query id="FrmVrpDownLineManage.getOrder" desc="查询合同信息">
  521. <![CDATA[
  522. SELECT T.PRO_ORDER_NO,
  523. T.PRO_PLAN_ID,
  524. T.GX_PLAN_NO,
  525. T.ORDER_SOURCE,
  526. T.ORD_LN_DLY_PK,
  527. T.PLN_DIVIDE_ID,
  528. T.ORDER_NO,
  529. T.ORDER_SEQ,
  530. T.DELIVERY_NO,
  531. T.PLINE_CODE,
  532. T.PLINE_NAME,
  533. DECODE(T.EXE_STATUS,
  534. '0',
  535. '计划',
  536. '1',
  537. '生产中',
  538. '2',
  539. '已生产',
  540. '3',
  541. '关闭A',
  542. '') EXE_STATUS,
  543. T2.*
  544. FROM PLN_ORDER_DBK_S T,
  545. (SELECT Q1.PRODUCCODE,
  546. Q1.PRODUCNAME,
  547. Q1.STD_CODE,
  548. Q1.STD_NAME,
  549. Q1.STD_STYLE,
  550. Q1.STD_STYLE_DESC,
  551. Q1.ORDER_SPEC_CODE,
  552. Q1.ORDER_SPEC_DESC,
  553. Q1.SPEC_CODE,
  554. Q1.SPEC_NAME,
  555. Q2.ORD_LN_DLY_PK ORD_LN_DLY_PK1,
  556. Q2.ORD_LN_PK,
  557. Q1.STEELCODE,
  558. Q1.STEELNAME,
  559. Q1.DELVRY_RANGE_TPE,
  560. Q1.DELVRY_RANGE_MAX,
  561. Q1.DELVRY_RANGE_MIN,
  562. Q2.DELVRY_QTY,
  563. Q3.CRAFT_SEQ,
  564. Q3.CRAFT_NO,
  565. Q4.CRAFT_NAME,
  566. NVL(Q1.DIMATER, 0) DIMATER,
  567. NVL(Q1.HEIGHT, 0) HEIGHT,
  568. NVL(Q3.CRAFT_PATH,
  569. (SELECT C1.CRAFT_PATH
  570. FROM CRAFT_ORD_DESIGN C2, CRAFT_ORD_DESIGN_FILE C1
  571. WHERE C1.CRAFT_NO = C2.CRAFT_NO
  572. AND C1.CRAFT_NO_V = C2.CRAFT_NO_V
  573. AND C1.VALIDFLAG = '1'
  574. AND C2.VALIDFLAG = '1'
  575. AND C2.ORD_LN_PK = Q1.ORD_LN_PK)) AS CRAFT_PATH,
  576. Q3.CRAFT_FILE_LV2_E
  577. FROM SLM_ORDER_LINE Q1,
  578. SLM_ORDER_LINE_DELIVERY Q2,
  579. CRAFT_ORD_DESIGN Q3,
  580. CRAFT_ORD_DESIGN_APPOINT Q4
  581. WHERE Q1.ORD_LN_PK = Q2.ORD_LN_PK
  582. AND Q1.ORD_LN_PK = Q3.ORD_LN_PK(+)
  583. AND Q1.ORD_LN_PK = Q4.ORD_LN_PK(+)
  584. AND Q3.VALIDFLAG(+) = '1') T2
  585. WHERE T.ORD_LN_DLY_PK = T2.ORD_LN_DLY_PK1(+)
  586. AND T.EXE_STATUS IN ('0', '1')
  587. AND T.PLINE_CODE = ?
  588. AND (T.PRO_PLAN_ID NOT IN (?) OR
  589. T.GX_PLAN_NO NOT IN (?))
  590. AND T.ORDER_NO || '&' LIKE ('%' || ?|| '%')
  591. ]]>
  592. </query>
  593. <query id="FrmVrpDownLineManage.QueryOffLineMaxResultNo" desc="查询最大离线实绩编号">
  594. <![CDATA[
  595. SELECT ? ||
  596. LPAD(NVL(MAX(TO_NUMBER(SUBSTR(RESULT_NO, LENGTH(RESULT_NO) - 5))),
  597. 0) + 1,
  598. 6,
  599. '0') RESULT_NO
  600. FROM VRP_OFFLINE_RESULT
  601. WHERE RESULT_NO LIKE ? || '______'
  602. ]]>
  603. </query>
  604. <query id="FrmVrpDownLineManage.QueryGroupResult" desc="查询组操作Id">
  605. <![CDATA[
  606. SELECT ? ||
  607. LPAD(SUBSTR(NVL(MAX(T.GROUP_ID),'000000'),-6,6) + 1, 6, '0') AS GROUP_ID
  608. FROM VRP_GROUP_RESULT T
  609. WHERE TO_CHAR(T.PRO_TIME,'YYYY-MM-DD') = ?
  610. ]]>
  611. </query>
  612. <query id="FrmVrpDownLineManage.QueryOffLineGroupStart" desc="查询是否组炉">
  613. <![CDATA[
  614. SELECT T.GROUP_LOG,
  615. T.GROUP_ID,
  616. NVL(T.OFFLINE_NUM, 0) OFFLINE_NUM,
  617. NVL(T.GROUP_NUM, 0) GROUP_NUM,
  618. TO_NUMBER(NVL(T.OFFLINE_NUM, 0)) - TO_NUMBER(NVL(T.GROUP_NUM, 0)) COUNT_NUM,
  619. TO_NUMBER(NVL(T.OFFLINE_NUM, 0)) - TO_NUMBER(NVL(T.RE_NUM, 0)) RE_NUM,
  620. TO_NUMBER(NVL(T.OFFLINE_NUM, 0)) - TO_NUMBER(NVL(T.SUBCONTRACT_NUM, 0)) SUBCONTRACT_NUM,
  621. FLAG
  622. FROM VRP_OFFLINE_RESULT T
  623. WHERE T.JUDGE_STOVE_NO = ?
  624. AND NVL(T.BATCH_NO,'/') = NVL(?,'/')
  625. AND T.RESULT_NO = ?
  626. AND NVL(T.HEAT_PLAN_NO,'/') = NVL(?,'/')
  627. ]]>
  628. </query>
  629. <query id="FrmVrpDownLineManage.QueryOffLineGroupId" desc="查询组炉信息">
  630. <![CDATA[
  631. SELECT COUNT(1) COUNT
  632. FROM VRP_OFFLINE_RESULT T
  633. WHERE T.GROUP_LOG = '1'
  634. AND T.RESULT_NO = ?
  635. AND T.GROUP_ID = ?
  636. ]]>
  637. </query>
  638. <query id="FrmVrpDownLineManage.AddOffLineResu" desc="新增组炉实绩">
  639. <![CDATA[
  640. INSERT INTO VRP_OFFLINE_RESULT (RESULT_NO, PLINE_CODE, PLINE_NAME, STATION_CODE,
  641. STATION_DESC, HEAT_PLAN_NO, ZY_BATCH_ID, PRO_PLAN_ID, GX_PLAN_NO,
  642. JUDGE_STOVE_NO, BATCH_NO, PRODUCCODE, PRODUCNAME, STEELCODE, STEELNAME,
  643. GRADECODE, GRADENAME, MODEL_CODE, MODEL_DESC, STD_CODE, STD_NAME, STD_STYLE,
  644. STD_STYLE_DESC, ACT_DIMATER, ACT_HEIGHT, ACT_LEN, ACT_LEN_MIN, ACT_LEN_MAX,
  645. ZP_JUDGE_STOVE_NO, ZP_BATCH_NO, OFFLINE_NUM, OFFLINE_WT, PRO_USER, PRO_SHIFT,
  646. PRO_GROUP, PRO_TIME, GROUP_LOG, GROUP_ID, ORD_LN_DLY_PK, ORDER_NO, ORDER_SEQ,
  647. DELIVERY_NO,ZY_BATCH_ID1,BATCH_GROUD_NO) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?,
  648. ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?,
  649. TO_DATE(?, 'YYYY-MM-DD HH24:MI:SS'), '1', ?, ?, ?, ?, ?,?,?)
  650. ]]>
  651. </query>
  652. <query id="FrmVrpDownLineManage.UpdateOffLineResu" desc="修改离线组炉支,吨">
  653. <![CDATA[
  654. DECLARE
  655. BEGIN
  656. UPDATE VRP_OFFLINE_RESULT
  657. SET GROUP_NUM = TO_NUMBER(NVL(GROUP_NUM, 0)) + TO_NUMBER(?),
  658. GROUP_WT = TO_NUMBER(NVL(GROUP_WT, 0)) + TO_NUMBER(?),
  659. UPDATE_TIME=TO_DATE(?,'YYYY-MM-DD HH24:MI:SS'),
  660. UPDATE_NAME=?
  661. WHERE RESULT_NO = ?;
  662. INSERT INTO VRP_GROUP_RESULT
  663. (GROUP_ID,
  664. GROUP_XH,
  665. ZP_JUDGE_STOVE_NO,
  666. ZP_BATCH_NO,
  667. JUDGE_STOVE_NO,
  668. BATCH_NO,
  669. GROUP_NUM,
  670. GROUP_WT,
  671. PRO_USER,
  672. PRO_SHIFT,
  673. PRO_GROUP,
  674. PRO_TIME,
  675. LX_RESULT_NO)
  676. VALUES
  677. (?,
  678. ?,
  679. ?,
  680. ?,
  681. ?,
  682. ?,
  683. ?,
  684. ?,
  685. ?,
  686. ?,
  687. ?,
  688. TO_DATE(?, 'YYYY-MM-DD HH24:MI:SS'),?);
  689. END;
  690. ]]>
  691. </query>
  692. <query id="FrmVrpDownLineManage.UpdateOffLineComm" desc="修改离线表数据(改判)">
  693. <![CDATA[
  694. UPDATE VRP_OFFLINE_RESULT
  695. SET PRODUCCODE = ?,
  696. PRODUCNAME = ?,
  697. STEELCODE = ?,
  698. STEELNAME = ?,
  699. MODEL_CODE = ?,
  700. MODEL_DESC = ?,
  701. STD_CODE = ?,
  702. STD_NAME = ?,
  703. STD_STYLE = ?,
  704. STD_STYLE_DESC = ?,
  705. ACT_DIMATER = ?,
  706. ACT_HEIGHT = ?,
  707. ACT_LEN = ?,
  708. ORD_LN_DLY_PK = ?,
  709. ORDER_NO = ?,
  710. ORDER_SEQ = ?,
  711. DELIVERY_NO = ?,
  712. UPDATE_TIME = TO_DATE(?, 'YYYY-MM-DD HH24:MI:SS'),
  713. UPDATE_NAME = ?,
  714. PRO_PLAN_ID = ?,
  715. GX_PLAN_NO = ?
  716. WHERE RESULT_NO = ?
  717. ]]>
  718. </query>
  719. <query id="FrmVrpDownLineManage.DaeleteGroupResu" desc="修改离线组炉支,吨,删除组炉履历表">
  720. <![CDATA[
  721. DECLARE
  722. BEGIN
  723. UPDATE VRP_OFFLINE_RESULT
  724. SET GROUP_NUM = TO_NUMBER(NVL(GROUP_NUM, 0)) - TO_NUMBER(?),
  725. GROUP_WT = TO_NUMBER(NVL(GROUP_WT, 0)) - TO_NUMBER(?),
  726. UPDATE_TIME=TO_DATE(?,'YYYY-MM-DD HH24:MI:SS'),
  727. UPDATE_NAME=?
  728. WHERE RESULT_NO = ?;
  729. DELETE VRP_GROUP_RESULT
  730. WHERE GROUP_ID = ?
  731. AND GROUP_XH = ?;
  732. END;
  733. ]]>
  734. </query>
  735. <query id="FrmVrpDownLineManage.DeleteOffLineResu" desc="删除离线表组炉记录">
  736. <![CDATA[
  737. DELETE VRP_OFFLINE_RESULT
  738. WHERE RESULT_NO = ?
  739. AND GROUP_ID=?
  740. ]]>
  741. </query>
  742. <query id="FrmVrpDownLineManage.QueryGroupVrpResult" desc="查询组炉履历表信息">
  743. <![CDATA[
  744. SELECT GROUP_ID,
  745. GROUP_XH,
  746. ZP_JUDGE_STOVE_NO,
  747. ZP_BATCH_NO,
  748. JUDGE_STOVE_NO,
  749. BATCH_NO,
  750. GROUP_NUM,
  751. GROUP_WT,
  752. PRO_YEAR_MONTH_DAY,
  753. PRO_USER,
  754. PRO_SHIFT,
  755. PRO_GROUP,
  756. PRO_TIME,
  757. LX_RESULT_NO
  758. FROM VRP_GROUP_RESULT
  759. WHERE GROUP_ID = ?
  760. ]]>
  761. </query>
  762. <query id="FrmVrpDownLineManage.doQuery" desc="查询工序点">
  763. <![CDATA[
  764. SELECT T.BASECODE,T.BASENAME
  765. FROM COM_BASE_INFO T
  766. WHERE T.SORTCODE = ?
  767. AND T.VALIDFLAG = '1'
  768. AND T.BASENAME NOT IN ('分批取样', '交库')
  769. ORDER BY T.BASECODE ASC
  770. ]]>
  771. </query>
  772. <query id="FrmVrpDownLineManage.queryheatsqe" desc="镦拔扩上料行ID">
  773. <![CDATA[
  774. SELECT ? ||
  775. LPAD(SUBSTR(NVL(MAX(T.HEAT_PLAN_SQE), '00'), -2, 2) + 1, 2, '0') AS HEAT_PLAN_SQE
  776. FROM PLN_ZY_DBK_C T
  777. WHERE T.HEAT_PLAN_NO = ?
  778. ]]>
  779. </query>
  780. <query id="FrmVrpDownLineManage.AddReturnResu" desc="新增镦拔扩计划表">
  781. <![CDATA[
  782. INSERT INTO PLN_ZY_DBK_M (HEAT_PLAN_NO, ZY_BATCH_ID, PRO_PLAN_ID,
  783. GX_PLAN_NO, PLINE_CODE, PLINE_NAME, UPPER_HEATPLAN_ID, JUDGE_STOVE_NO, BATCH_NO,
  784. ISENDGX, ORDER_SOURCE, ORD_LN_DLY_PK, ORDER_NO, ORDER_SEQ,
  785. DELIVERY_NO, REQ_BL_ID, GRADECODE, GRADENAME, AIMOUTDIAMETER, AIMWALLTHICK,
  786. AIMLENGTH, OUTDIAMETER_IN, WALLTHICK_IN, LENGTH_IN, LENGTHMAX_IN, LENGTHMIN_IN,
  787. LEN_CUTHEAD, LEN_CUTEND, INWL_ID, INWL_DESC,IF_MATCH_ODD,
  788. OUTWL_ID, OUTWL_DESC, IF_MONITOR, PRDCR_NO, MONITOR_POINT,
  789. CRAFT_FILE_NO, CRAFT_FILE_MAN, CRAFT_SEQ, SEC_CRAFT_FILE_NO, STATION_ROAD,
  790. PLANSTATUS, CREATE_NAME, CREATE_TIME,PRODUCCODE,PRODUCNAME)
  791. VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?,
  792. ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?,
  793. TO_DATE(?, 'YYYY-MM-DD HH24:MI:SS'),?,?)
  794. ]]>
  795. </query>
  796. <query id="FrmVrpDownLineManage.AddReturnResuC" desc="新增镦拔扩计划从表">
  797. <![CDATA[
  798. DECLARE
  799. BEGIN
  800. FOR MROW IN (SELECT T.PRO_ORDER_NO,
  801. T.PRO_PLAN_ID,
  802. T.GX_PLAN_NO,
  803. T.PLAN_GROUP_ID,
  804. T.ORDER_SOURCE,
  805. T.ORD_LN_DLY_PK,
  806. T.PLN_DIVIDE_ID,
  807. T.ORDER_NO,
  808. T.ORDER_SEQ,
  809. T.DELIVERY_NO,
  810. T.REQ_BL_ID,
  811. T.PLINE_CODE,
  812. T.PLINE_NAME,
  813. T.INWL_ID,
  814. T.INWL_DESC,
  815. T.OUTWL_ID,
  816. T.OUTWL_DESC,
  817. T.WEIGTH_S,
  818. T.NUM_S,
  819. T.GX_PRO_SEQ,
  820. T.PLAN_USETIME,
  821. TO_CHAR(T.PLAN_TIME_B, 'YYYY-MM-DD HH24:MI:SS') PLAN_TIME_B,
  822. TO_CHAR(T.PLAN_TIME_E, 'YYYY-MM-DD HH24:MI:SS') PLAN_TIME_E,
  823. T.EXE_STATUS,
  824. T.IS_REPAIR_PLN,
  825. T.REPAIR_TYPE,
  826. T.OUTDIAMETER,
  827. T.WALLTHICK,
  828. T.LENGTHDISC,
  829. T.AIMOUTDIAMETER,
  830. T.AIMWALLTHICK,
  831. T.AIMLENGTH,
  832. T.OUTDIAMETER_IN,
  833. T.WALLTHICK_IN,
  834. T.LENGTH_IN,
  835. T.LEN_CUTHEAD,
  836. T.LEN_CUTEND,
  837. T.LENGTHMAX_IN,
  838. T.LENGTHMIN_IN,
  839. T.IN_WEIGHT_S,
  840. T.IN_NUM_S,
  841. T.ADD_WT_IN,
  842. T.ADD_NUM_IN,
  843. T.MATCH_WT_IN,
  844. T.MATCH_NUM_IN,
  845. T.ISENDGX,
  846. T.IF_MONITOR_DBK,
  847. T.PRDCR_NO,
  848. T.MONITOR_POINT,
  849. T.CIC,
  850. T.PIC,
  851. T.SIC,
  852. T.DIC,
  853. T.WIC,
  854. T.GIC,
  855. T.CRAFT_FILE_NO,
  856. T.CRAFT_FILE_MAN,
  857. T.CRAFT_SEQ,
  858. T.STATION_ROAD,
  859. T.BATCHED_WT,
  860. T.BATCHED_NUM,
  861. T.FINISHWEIGHT,
  862. T.FINISHNUM,
  863. T.IS_PLAN_OK,
  864. T.ZY_BATCH_ID,
  865. T.GRADECODE,
  866. T.GRADENAME,
  867. T.PRO_MONTH,
  868. T.PREVIOUS_GX,
  869. T.PREV_GXPLAN_ID,
  870. T.IF_EXPORT,
  871. TO_CHAR(T.ISSUED_TIME, 'YYYY-MM-DD HH24:MI:SS') ISSUED_TIME,
  872. T.ISSUED_MAN,
  873. TO_CHAR(T.LAST_UNDOWN_TIME, 'YYYY-MM-DD HH24:MI:SS') LAST_UNDOWN_TIME,
  874. T.LAST_UNDOWN_MAN,
  875. T.VERSION_NO,
  876. T.PROCESSING_COST,
  877. T.TOTAL_COST,
  878. T.MEMO,
  879. TO_CHAR(T.CREATE_TIME, 'YYYY-MM-DD HH24:MI:SS') CREATE_TIME,
  880. T.IF_STOVE_ISSUED,
  881. TO_CHAR(T.STOVE_ISSUED_TIME, 'YYYY-MM-DD HH24:MI:SS') STOVE_ISSUED_TIME,
  882. T.STOVE_ISSUED_MAN,
  883. T.REAL_BATCH_WT,
  884. T.REAL_BATCH_NUM
  885. FROM PLN_ORDER_DBK_S T
  886. WHERE T.PRO_PLAN_ID = ?
  887. AND T.GX_PLAN_NO = ?) LOOP
  888. INSERT INTO PLN_ZY_DBK_C
  889. (HEAT_PLAN_NO,
  890. ZY_BATCH_ID,
  891. PRO_PLAN_ID,
  892. GX_PLAN_NO,
  893. HEAT_PLAN_SQE,
  894. JUDGE_STOVE_NO,
  895. BATCH_NO,
  896. BATCH_GROUD_NO,
  897. PLINE_CODE,
  898. PLINE_NAME,
  899. OUTDIAMETER_IN,
  900. WALLTHICK_IN,
  901. LENGTHMAX_IN,
  902. LENGTHMIN_IN,
  903. PLAN_INDOUBLE_NUM,
  904. PLAN_INDOUBLE_WT,
  905. REAL_INDOUBLE_NUM,
  906. REAL_INDOUBLE_WT
  907. )
  908. VALUES
  909. (?,
  910. MROW.ZY_BATCH_ID,
  911. MROW.PRO_PLAN_ID,
  912. MROW.GX_PLAN_NO,
  913. ?,
  914. ?,
  915. ?,
  916. ?,
  917. MROW.PLINE_CODE,
  918. MROW.PLINE_NAME,
  919. MROW.OUTDIAMETER,
  920. MROW.WALLTHICK,
  921. MROW.LENGTHMAX_IN,
  922. MROW.LENGTHMIN_IN,
  923. ?,
  924. ?,
  925. ?,
  926. ?
  927. );
  928. END LOOP;
  929. END;
  930. ]]>
  931. </query>
  932. <query id="FrmVrpDownLineManage.UpdatePortVrpReturn" desc="修改管号队列表">
  933. <![CDATA[
  934. UPDATE PORT_VRP_BATCH_SAMPLE_RESULT
  935. SET MAT_STATUS = ?,
  936. LEVE_LOG = ?,
  937. PRC_TECHNOLOGY_PATH = ?,
  938. RETURN_PROCESS = ?,
  939. FLAG_STOVE_NO = ?,
  940. INSTORE_FLAG = ?
  941. WHERE HEAT_PLAN_NO = ?
  942. AND MAT_NO = ?
  943. ]]>
  944. </query>
  945. <query id="FrmVrpDownLineManage.QueryOffMatNo" desc="查询管号队列离线材料号">
  946. <![CDATA[
  947. SELECT *
  948. FROM (SELECT T.MAT_NO,T.PHY_BATCH_NO,T.IS_SAMPLE_PIPE,T.ACT_COUNT
  949. FROM port_vrp_batch_sample_result T
  950. WHERE T.MAT_STATUS = '20'
  951. AND T.HEAT_PLAN_NO = ?
  952. AND T.OP_PROCESS = ?
  953. ORDER BY T.MAT_NO ASC)
  954. WHERE ROWNUM < ?
  955. ]]>
  956. </query>
  957. <query id="FrmVrpDownLineManage.QueryOffMatNo2" desc="查询管号队列离线材料号">
  958. <![CDATA[
  959. SELECT *
  960. FROM (SELECT *
  961. FROM port_vrp_batch_sample_result T
  962. WHERE T.MAT_STATUS = '20'
  963. AND T.RESULT_NO =?
  964. ORDER BY T.MAT_NO ASC)
  965. ]]>
  966. </query>
  967. <query id="FrmVrpDownLineManage.QueryNewFurnMatNo" desc="查询管号队列另组炉材料号">
  968. <![CDATA[
  969. SELECT T.MAT_NO
  970. FROM port_vrp_batch_sample_result T
  971. WHERE T.MAT_STATUS = '30'
  972. AND T.RESULT_NO =?
  973. ORDER BY T.MAT_NO ASC
  974. ]]>
  975. </query>
  976. <query id="FrmVrpDownLineManage.QueryReturnMatNo" desc="查询管号队列返线的材料号">
  977. <![CDATA[
  978. SELECT T.MAT_NO
  979. FROM port_vrp_batch_sample_result T
  980. WHERE T.LEVE_LOG = '20'
  981. AND T.RESULT_NO =?
  982. AND MAT_STATUS = '00'
  983. ORDER BY T.MAT_NO ASC
  984. ]]>
  985. </query>
  986. <query id="FrmVrpDownLineManage.AddPortVrpReturn" desc="新增管号队列表">
  987. <![CDATA[
  988. INSERT INTO PORT_VRP_BATCH_SAMPLE_RESULT (HEAT_PLAN_NO, MAT_NO, M_MAT_NO,
  989. M_M_MAT_NO, LOT_NO, LOT_NO_SQE, PLINE_CODE, PLINE_NAME, JUDGE_STOVE_NO,
  990. BATCH_NO, GROUP_NO, STOVE_NO, FLAG_STOVE_NO, ACT_DIMATER, ACT_HEIGHT, ACT_LEN,
  991. ACT_LEN_MIN, ACT_LEN_MAX, ACT_COUNT, ACT_WEIGHT, ACT_THEORY_WEIGHT, OP_PROCESS, LEVE_LOG, PRO_USER, PRO_SHIFT,
  992. PRO_GROUP, PRO_TIME,PRC_TECHNOLOGY_PATH,RETURN_PROCESS,MAT_STATUS,PHY_BATCH_NO,FEED_HEAT_NO,HEAT_PLAN_SQE,INSTORE_FLAG
  993. ,BAL_YEAR_MONTH) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?,
  994. ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, TO_DATE(?, 'YYYY-MM-DD HH24:MI:SS'),?,?,?,?,?,?,?,?)
  995. ]]>
  996. </query>
  997. <query id="FrmVrpDownLineManage.getQueryMatNo" desc="查询管号队列对应最大的材料号">
  998. <![CDATA[
  999. SELECT MAX(T.MAT_NO) MAT_NO
  1000. FROM PORT_VRP_BATCH_SAMPLE_RESULT T
  1001. WHERE T.HEAT_PLAN_NO = ?
  1002. AND T.JUDGE_STOVE_NO = ?
  1003. AND T.BATCH_NO = ?
  1004. ]]>
  1005. </query>
  1006. <query id="FrmVrpDownLineManage.UpdateMatReturn" desc="修改材料表">
  1007. <![CDATA[
  1008. UPDATE MAT_BC_M T
  1009. SET T.MAT_STATUS = ?,
  1010. T.QCM_STAUS = ?,
  1011. T.PRODUCCODE = ?,
  1012. T.PRODUCNAME = ?,
  1013. T.STEELCODE = ?,
  1014. T.STEELNAME = ?,
  1015. T.MODEL_CODE = ?,
  1016. T.MODEL_DESC = ?,
  1017. T.STD_CODE = ?,
  1018. T.STD_NAME = ?,
  1019. T.STD_STYLE = ?,
  1020. T.STD_STYLE_DESC = ?,
  1021. T.ACT_DIMATER = ?,
  1022. T.ACT_HEIGHT = ?,
  1023. T.ACT_LEN = ?,
  1024. T.ORD_LN_DLY_PK = ?,
  1025. T.ORDER_NO = ?,
  1026. T.ORDER_SEQ = ?,
  1027. T.ORDER_SEQ_NO = ?,
  1028. T.ORD_PK = ?,
  1029. T.ORD_LN_PK = ?
  1030. WHERE T.MAT_NO = ?
  1031. ]]>
  1032. </query>
  1033. <query id="FrmVrpDownLineManage.queryMatNoM" desc="自动生存材料号">
  1034. <![CDATA[
  1035. SELECT ? || ? ||
  1036. LPAD(NVL(MAX(SUBSTR(T2.MAT_NO, LENGTH(T2.MAT_NO) - 3)), 0) + 1, 4, 0) MAT_NO
  1037. FROM (SELECT MAX(T.MAT_NO) MAT_NO
  1038. FROM MAT_BC_M T
  1039. WHERE T.JUDGE_STOVE_NO = ?
  1040. AND T.BATCH_NO = ?
  1041. UNION ALL
  1042. SELECT MAX(T1.MAT_NO) MAT_NO
  1043. FROM YDM_BC_INLIST T1
  1044. WHERE T1.JUDGE_STOVE_NO = ?
  1045. AND T1.BATCH_NO = ?
  1046. UNION ALL
  1047. SELECT MAX(T3.MAT_NO) MAT_NO
  1048. FROM MAT_ZC_BACKUP T3
  1049. WHERE T3.JUDGE_STOVE_NO = ?
  1050. AND T3.BATCH_NO = ?) T2
  1051. ]]>
  1052. </query>
  1053. <query id="FrmVrpDownLineManage.AddMatReturn" desc="新增材料表">
  1054. <![CDATA[
  1055. INSERT INTO MAT_BC_M
  1056. (JUDGE_STOVE_NO,
  1057. BATCH_NO,
  1058. BATCH_GROUD_NO,
  1059. ACT_COUNT,
  1060. ACT_WEIGHT,
  1061. CREATE_NAME,
  1062. CREATE_TIME,
  1063. MAT_NO,
  1064. PRODUCT_FLAG,
  1065. MAT_STATUS,
  1066. PLINE_CODE,
  1067. PLINE_NAME,
  1068. QCM_STAUS,
  1069. PRODUCCODE,
  1070. PRODUCNAME,
  1071. STEELCODE,
  1072. STEELNAME,
  1073. SPEC_CODE,
  1074. SPEC_NAME,
  1075. GRADECODE,
  1076. GRADENAME,
  1077. MODEL_CODE,
  1078. MODEL_DESC,
  1079. STD_CODE,
  1080. STD_NAME,
  1081. BELONG_CODE,
  1082. BELONG_NAME,
  1083. STD_STYLE,
  1084. STD_STYLE_DESC,
  1085. ACT_DIMATER,
  1086. ACT_HEIGHT,ORD_LN_DLY_PK,ORDER_NO,ORDER_SEQ,ORDER_SEQ_NO,ORD_PK,ORD_LN_PK)
  1087. VALUES
  1088. (?,
  1089. ?,
  1090. ?,
  1091. ?,
  1092. ?,?,
  1093. TO_DATE(?,'YYYY-MM-DD HH24:MI:SS'),
  1094. ?,
  1095. ?,
  1096. ?,
  1097. ?,
  1098. ?,
  1099. ?,
  1100. ?,
  1101. ?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)
  1102. ]]>
  1103. </query>
  1104. <query id="FrmVrpDownLineManage.QueryPlnOrig" desc="查询原计划">
  1105. <![CDATA[
  1106. SELECT
  1107. T.PRO_ORDER_NO,
  1108. T.PRO_PLAN_ID,
  1109. T.GX_PLAN_NO,
  1110. T.PLAN_GROUP_ID,
  1111. T.ORDER_SOURCE,
  1112. T.ORD_LN_DLY_PK,
  1113. T.PLN_DIVIDE_ID,
  1114. T.ORDER_NO,
  1115. T.ORDER_SEQ,
  1116. T.DELIVERY_NO,
  1117. T.REQ_BL_ID,
  1118. T.PLINE_CODE,
  1119. T.PLINE_NAME,
  1120. T.INWL_ID,
  1121. T.INWL_DESC,
  1122. T.OUTWL_ID,
  1123. T.OUTWL_DESC,
  1124. T.WEIGTH_S,
  1125. T.NUM_S,
  1126. T.GX_PRO_SEQ,
  1127. T.PLAN_USETIME,
  1128. TO_CHAR(T.PLAN_TIME_B, 'YYYY-MM-DD HH24:MI:SS') PLAN_TIME_B,
  1129. TO_CHAR(T.PLAN_TIME_E, 'YYYY-MM-DD HH24:MI:SS') PLAN_TIME_E,
  1130. T.EXE_STATUS,
  1131. T.IS_REPAIR_PLN,
  1132. T.REPAIR_TYPE,
  1133. T.OUTDIAMETER,
  1134. T.WALLTHICK,
  1135. T.LENGTHDISC,
  1136. T.AIMOUTDIAMETER,
  1137. T.AIMWALLTHICK,
  1138. T.AIMLENGTH,
  1139. T.OUTDIAMETER_IN,
  1140. T.WALLTHICK_IN,
  1141. T.LENGTH_IN,
  1142. T.LEN_CUTHEAD,
  1143. T.LEN_CUTEND,
  1144. T.LENGTHMAX_IN,
  1145. T.LENGTHMIN_IN,
  1146. T.IN_WEIGHT_S,
  1147. T.IN_NUM_S,
  1148. T.ADD_WT_IN,
  1149. T.ADD_NUM_IN,
  1150. T.MATCH_WT_IN,
  1151. T.MATCH_NUM_IN,
  1152. T.ISENDGX,
  1153. T.IF_MONITOR_DBK,
  1154. T.PRDCR_NO,
  1155. T.MONITOR_POINT,
  1156. T.CIC,
  1157. T.PIC,
  1158. T.SIC,
  1159. T.DIC,
  1160. T.WIC,
  1161. T.GIC,
  1162. T.CRAFT_FILE_NO,
  1163. T.CRAFT_FILE_MAN,
  1164. T.CRAFT_SEQ,
  1165. T.STATION_ROAD,
  1166. T.BATCHED_WT,
  1167. T.BATCHED_NUM,
  1168. T.FINISHWEIGHT,
  1169. T.FINISHNUM,
  1170. T.IS_PLAN_OK,
  1171. T.ZY_BATCH_ID,
  1172. T.GRADECODE,
  1173. T.GRADENAME,
  1174. T.PRO_MONTH,
  1175. T.PREVIOUS_GX,
  1176. T.PREV_GXPLAN_ID,
  1177. T.IF_EXPORT,
  1178. TO_CHAR(T.ISSUED_TIME, 'YYYY-MM-DD HH24:MI:SS') ISSUED_TIME,
  1179. T.ISSUED_MAN,
  1180. TO_CHAR(T.LAST_UNDOWN_TIME, 'YYYY-MM-DD HH24:MI:SS') LAST_UNDOWN_TIME,
  1181. T.LAST_UNDOWN_MAN,
  1182. T.VERSION_NO,
  1183. T.PROCESSING_COST,
  1184. T.TOTAL_COST,
  1185. T.MEMO,
  1186. TO_CHAR(T.CREATE_TIME, 'YYYY-MM-DD HH24:MI:SS') CREATE_TIME,
  1187. T.IF_STOVE_ISSUED,
  1188. TO_CHAR(T.STOVE_ISSUED_TIME, 'YYYY-MM-DD HH24:MI:SS') STOVE_ISSUED_TIME,
  1189. T.STOVE_ISSUED_MAN,
  1190. T.REAL_BATCH_WT,
  1191. T.REAL_BATCH_NUM
  1192. FROM PLN_ORDER_DBK_S T
  1193. WHERE
  1194. T.PRO_PLAN_ID = ?
  1195. AND T.GX_PLAN_NO = ?
  1196. AND T.EXE_STATUS IN ('0','1')
  1197. ]]>
  1198. </query>
  1199. <query id="FrmVrpDownLineManage.queryPlanMaxNo" desc="获取最大计划编号">
  1200. <![CDATA[
  1201. SELECT ? ||
  1202. LPAD(SUBSTR(NVL(MAX(T.HEAT_PLAN_NO), '0000'), -4,4) + 1, 4, '0') AS HEAT_PLAN_NO
  1203. FROM PLN_ZY_DBK_M T
  1204. WHERE TO_CHAR(T.CREATE_TIME, 'YYYY-MM-DD') = ?
  1205. ]]>
  1206. </query>
  1207. <query id="FrmVrpDownLineManage.QueryPortBatch" desc="查询管号队列炉计划ID">
  1208. <![CDATA[
  1209. SELECT T.HEAT_PLAN_NO
  1210. FROM PORT_VRP_BATCH_SAMPLE_RESULT T
  1211. WHERE T.OP_PROCESS = ?
  1212. AND T.MAT_STATUS = '20'
  1213. AND T.LEVE_LOG = '10'
  1214. AND T.JUDGE_STOVE_NO = ?
  1215. AND T.BATCH_NO = ?
  1216. AND T.GROUP_NO = ?
  1217. ]]>
  1218. </query>
  1219. <query id="FrmVrpDownLineManage.UpdateOff" desc=" 修改离线表返线支数">
  1220. <![CDATA[
  1221. UPDATE VRP_OFFLINE_RESULT
  1222. SET RE_NUM = ?,
  1223. RE_WT = ?,
  1224. RE_TIME = TO_DATE(?, 'YYYY-MM-DD HH24:MI:SS'),
  1225. RE_NAME = ?,
  1226. RETURN_PROCESS=?,
  1227. HEAT_PLAN_NO=?
  1228. WHERE RESULT_NO = ?
  1229. ]]>
  1230. </query>
  1231. <query id="FrmVrpDownLineManage.UpdateStatus" desc=" 修改组炉返线材料状态">
  1232. <![CDATA[
  1233. UPDATE PORT_VRP_BATCH_SAMPLE_RESULT
  1234. SET MAT_STATUS = '30',LEVE_LOG = '00', BAL_YEAR_MONTH_FAIL =TO_CHAR(SYSDATE , 'YYYYMM'),IS_FAIL_CHECK='1'
  1235. WHERE HEAT_PLAN_NO = ?
  1236. AND MAT_NO = ?
  1237. ]]>
  1238. </query>
  1239. <query id="FrmVrpDownLineManage.UpdateStatus1" desc=" 修改组炉返线材料状态">
  1240. <![CDATA[
  1241. UPDATE PORT_VRP_BATCH_SAMPLE_RESULT
  1242. SET MAT_STATUS = '20',LEVE_LOG = '10', BAL_YEAR_MONTH_FAIL= '',IS_FAIL_CHECK='0'
  1243. WHERE HEAT_PLAN_NO = ?
  1244. AND MAT_NO =?
  1245. ]]>
  1246. </query>
  1247. <query id="FrmVrpDownLineManage.queryStorageType" desc="查询库位信息">
  1248. <![CDATA[
  1249. SELECT T.STORAGE_ATTR,
  1250. T.STORAGE_ATTR_NAME,
  1251. T.STORAGE_TYPE_NO,
  1252. T.STORAGE_TYPE_NAME,
  1253. T.MANAGEMENT_NO,
  1254. T.MANAGEMENT_NAME,
  1255. T.DEPARTMENT_CODE,
  1256. T.DEPARTMENT_DESC
  1257. FROM YDM_BS_STORAGE T
  1258. WHERE T.STORAGE_NO = ?
  1259. AND T.VALIDFLAG='1'
  1260. ]]>
  1261. </query>
  1262. <query id="FrmVrpDownLineManage.AddButtReturn" desc=" 新增位置表">
  1263. <![CDATA[
  1264. INSERT INTO YDM_BC_BUTTRESS
  1265. (MAT_NO,
  1266. JUDGE_STOVE_NO,
  1267. BATCH_NO,
  1268. BATCH_GROUD_NO,
  1269. STORAGE_NO,
  1270. LOCATION_NO,
  1271. STORAGE_ATTR,
  1272. STORAGE_ATTR_NAME,
  1273. STORAGE_TYPE_NO,
  1274. STORAGE_TYPE_NAME,
  1275. MANAGEMENT_NO,
  1276. MANAGEMENT_NAME,
  1277. CREATE_NAME,
  1278. CREATE_TIME,
  1279. DEPARTMENT_CODE,
  1280. DEPARTMENT_DESC)
  1281. VALUES
  1282. (?,
  1283. ?,
  1284. ?,
  1285. ?,
  1286. ?,
  1287. ?,
  1288. ?,
  1289. ?,
  1290. ?,
  1291. ?,
  1292. ?,
  1293. ?,
  1294. ?,
  1295. TO_DATE(?, 'YYYY-MM-DD HH24:MI:SS'),
  1296. ?,
  1297. ?)
  1298. ]]>
  1299. </query>
  1300. <query id="FrmVrpDownLineManage.DeletePortVrpReturn" desc="删除管号队列表">
  1301. <![CDATA[
  1302. DELETE PORT_VRP_BATCH_SAMPLE_RESULT
  1303. WHERE HEAT_PLAN_NO = ?
  1304. ]]>
  1305. </query>
  1306. <query id="FrmVrpDownLineManage.DeleteReturnResu" desc="删除计划表">
  1307. <![CDATA[
  1308. DELETE PLN_ZY_DBK_M WHERE HEAT_PLAN_NO = ?
  1309. ]]>
  1310. </query>
  1311. <query id="FrmVrpDownLineManage.DeleteReturnResuC" desc="删除计划从表">
  1312. <![CDATA[
  1313. DELETE PLN_ZY_DBK_C WHERE HEAT_PLAN_NO = ?
  1314. ]]>
  1315. </query>
  1316. <query id="FrmVrpDownLineManage.DeleteMatReturn" desc="删除材料表">
  1317. <![CDATA[
  1318. DELETE MAT_BC_M WHERE MAT_NO = ?
  1319. ]]>
  1320. </query>
  1321. <query id="FrmVrpDownLineManage.QueryComVrpRes" desc="查询返线后是否存在实绩">
  1322. <![CDATA[
  1323. SELECT COUNT(1) COUNT FROM VRP_COM_INFO T WHERE T.HEAT_PLAN_NO = ?
  1324. ]]>
  1325. </query>
  1326. <query id="FrmVrpDownLineManage.QueryButtMatNo" desc="查询材料表材料号">
  1327. <![CDATA[
  1328. SELECT T1.MAT_NO FROM (SELECT T.MAT_NO
  1329. FROM MAT_BC_M T
  1330. WHERE T.JUDGE_STOVE_NO = ?
  1331. AND NVL(T.BATCH_NO, '/') = NVL(?, '/')
  1332. AND T.PRODUCT_FLAG = '801401'
  1333. ORDER BY T.MAT_NO) T1
  1334. WHERE ROWNUM < ?
  1335. ]]>
  1336. </query>
  1337. <query id="FrmVrpDownLineManage.doQueryOutSourc" desc="委外实绩查询">
  1338. <![CDATA[
  1339. SELECT T.SUBCONTRACT_NO,
  1340. T.SUBCONTRACT_NO_SEQ,
  1341. T.PLINE_CODE,
  1342. T.PLINE_NAME,
  1343. T.STATION_CODE,
  1344. T.STATION_DESC,
  1345. T.HEAT_PLAN_NO,
  1346. T.ZY_BATCH_ID,
  1347. T.PRO_PLAN_ID,
  1348. T.GX_PLAN_NO,
  1349. T.JUDGE_STOVE_NO,
  1350. T.BATCH_NO,
  1351. T.PRODUCCODE,
  1352. T.PRODUCNAME,
  1353. T.STEELCODE,
  1354. T.STEELNAME,
  1355. T.GRADECODE,
  1356. T.GRADENAME,
  1357. T.MODEL_CODE,
  1358. T.MODEL_DESC,
  1359. T.STD_CODE,
  1360. T.STD_NAME,
  1361. T.STD_STYLE,
  1362. T.STD_STYLE_DESC,
  1363. T.ACT_DIMATER,
  1364. T.ACT_HEIGHT,
  1365. T.ACT_LEN,
  1366. T.ACT_LEN_MIN,
  1367. T.ACT_LEN_MAX,
  1368. T.CRAFT_FILE_NO,
  1369. T.SUBCONTRACT_NUM,
  1370. T.SUBCONTRACT_WT,
  1371. T.HB_COMPLETE_NUM,
  1372. T.HB_COMPLETE_WT,
  1373. T.SUBCONTRACT_USER,
  1374. DECODE(T.SUBCONTRACT_SHIFT, '1', '早', '2', '中', '3', '夜') SUBCONTRACT_SHIFT,
  1375. DECODE(T.SUBCONTRACT_GROUP,
  1376. '1',
  1377. '甲',
  1378. '2',
  1379. '乙',
  1380. '3',
  1381. '丙',
  1382. '4',
  1383. '丁') SUBCONTRACT_GROUP,
  1384. TO_CHAR(T.SUBCONTRACT_TIME, 'YYYY-MM-DD HH24:MI:SS') SUBCONTRACT_TIME,
  1385. T.SP_USER,
  1386. TO_CHAR(T.SP_TIME, 'YYYY-MM-DD HH24:MI:SS') SP_TIME,
  1387. DECODE(T.SUBCONTRACT_LOG,
  1388. '00',
  1389. '委外申请',
  1390. '10',
  1391. '审核通过',
  1392. '20',
  1393. '审核不通过',
  1394. '30',
  1395. '回报完毕') SUBCONTRACT_LOG,
  1396. T.SUBCONTRACT_PLINE_CODE,
  1397. T.SUBCONTRACT_PLINE_NAME,
  1398. T.SUBCONTRACT_NOTE,
  1399. T.HB_FP_NUM,
  1400. T.HB_FP_WT,
  1401. T.SP_NOTE,
  1402. T.RESULT_NO
  1403. FROM VRP_ENTRUSTED_BILL T
  1404. WHERE 1=1
  1405. ]]>
  1406. </query>
  1407. <query id="FrmVrpDownLineManage.AddOutSourc" desc="新增委外加工表">
  1408. <![CDATA[
  1409. INSERT INTO VRP_ENTRUSTED_BILL (SUBCONTRACT_NO, SUBCONTRACT_NO_SEQ, PLINE_CODE,
  1410. PLINE_NAME, STATION_CODE, STATION_DESC, HEAT_PLAN_NO, ZY_BATCH_ID, PRO_PLAN_ID,
  1411. GX_PLAN_NO, JUDGE_STOVE_NO, BATCH_NO, PRODUCCODE, PRODUCNAME, STEELCODE,
  1412. STEELNAME, GRADECODE, GRADENAME, MODEL_CODE, MODEL_DESC, STD_CODE, STD_NAME,
  1413. STD_STYLE, STD_STYLE_DESC, ACT_DIMATER, ACT_HEIGHT, ACT_LEN, ACT_LEN_MIN,
  1414. ACT_LEN_MAX, CRAFT_FILE_NO, SUBCONTRACT_NUM, SUBCONTRACT_WT, SUBCONTRACT_USER,
  1415. SUBCONTRACT_SHIFT, SUBCONTRACT_GROUP, SUBCONTRACT_TIME, SUBCONTRACT_LOG,
  1416. SUBCONTRACT_NOTE,RESULT_NO,SUBCONTRACT_PLINE_CODE,SUBCONTRACT_PLINE_NAME,SUBCONTRACT_TYPE,SUBCONTRACT_GX,BATCH_GROUD_NO)
  1417. VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?,
  1418. ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?,
  1419. TO_DATE(?, 'YYYY-MM-DD HH24:MI:SS'), ?, ?,?,?,?,?,?,?)
  1420. ]]>
  1421. </query>
  1422. <query id="FrmVrpDownLineManage.UpdateOffOutSourc" desc="修改离线表委外支数">
  1423. <![CDATA[
  1424. UPDATE VRP_OFFLINE_RESULT
  1425. SET SUBCONTRACT_NUM = ?,
  1426. SUBCONTRACT_WT = ?,
  1427. SUBCONTRACT_TIME = TO_DATE(?, 'YYYY-MM-DD HH24:MI:SS'),
  1428. SUBCONTRACT_NAME = ?,
  1429. SUBCONTRACT_NO=?,
  1430. SUBCONTRACT_NO_SEQ=?
  1431. WHERE RESULT_NO = ?
  1432. ]]>
  1433. </query>
  1434. <query id="FrmVrpDownLineManage.deleteOutSourc" desc="删除委外加工表">
  1435. <![CDATA[
  1436. DELETE VRP_ENTRUSTED_BILL
  1437. WHERE SUBCONTRACT_NO = ?
  1438. AND SUBCONTRACT_NO_SEQ = ?
  1439. ]]>
  1440. </query>
  1441. <query id="FrmVrpDownLineManage.queryEntrustrMax" desc="获取最大委外单号">
  1442. <![CDATA[
  1443. SELECT ? ||
  1444. LPAD(SUBSTR(NVL(MAX(T.SUBCONTRACT_NO), '0000'), -4,4) + 1, 4, '0') AS SUBCONTRACT_NO
  1445. FROM VRP_ENTRUSTED_BILL T
  1446. WHERE TO_CHAR(T.SUBCONTRACT_TIME, 'YYYY-MM-DD') = ?
  1447. ]]>
  1448. </query>
  1449. <query id="FrmVrpDownLineManage.QuerySubConStart" desc="查询委托状态">
  1450. <![CDATA[
  1451. SELECT T.SUBCONTRACT_LOG
  1452. FROM VRP_ENTRUSTED_BILL T
  1453. WHERE T.SUBCONTRACT_NO = ?
  1454. AND T.SUBCONTRACT_NO_SEQ = ?
  1455. ]]>
  1456. </query>
  1457. <query id="FrmVrpDownLineManage.doQueryPlanStrat" desc="查询计划是否结炉">
  1458. <![CDATA[
  1459. SELECT T.PLANSTATUS FROM PLN_ZY_DBK_M T WHERE T.HEAT_PLAN_NO = ?
  1460. ]]>
  1461. </query>
  1462. <query id="FrmVrpDownLineManage.doQueryComInfo" desc="查询返线最大实绩">
  1463. <![CDATA[
  1464. SELECT ? ||
  1465. LPAD(SUBSTR(NVL(MAX(T.RESULT_NO), '000000'), -6, 6) + 1, 6, '0') AS RESULT_NO
  1466. FROM VRP_COM_INFO T
  1467. WHERE TO_CHAR(T.CREATE_TIME, 'YYYY-MM-DD') = ?
  1468. AND T.PLINE_CODE = ?
  1469. ]]>
  1470. </query>
  1471. <query id="FrmVrpDownLineManage.doUpdateFlagStoveNo" desc="修改离线标识炉号">
  1472. <![CDATA[
  1473. UPDATE VRP_OFFLINE_RESULT T
  1474. SET T.FLAG_STOVE_NO = ?
  1475. WHERE T.RESULT_NO = ?
  1476. ]]>
  1477. </query>
  1478. <query id="FrmVrpDownLineManage.UpdatePlanStatus" desc="全组炉返线, 关闭原计划">
  1479. <![CDATA[
  1480. UPDATE PLN_ZY_DBK_M T
  1481. SET PLANSTATUS = DECODE((SELECT COUNT(1)
  1482. FROM PORT_VRP_BATCH_SAMPLE_RESULT
  1483. WHERE HEAT_PLAN_NO = T.HEAT_PLAN_NO
  1484. AND MAT_STATUS <> '10'
  1485. AND MAT_STATUS <> '30'
  1486. AND MAT_STATUS <> '40'),
  1487. 0,
  1488. '40',
  1489. '20')
  1490. WHERE T.HEAT_PLAN_NO =?
  1491. ]]>
  1492. </query>
  1493. <query id="FrmVrpDownLineManage.queryHttM" desc="新增组炉实绩">
  1494. <![CDATA[
  1495. SELECT * FROM VRP_GROUP_RESULT WHERE ZP_JUDGE_STOVE_NO =?
  1496. ]]>
  1497. </query>
  1498. </queryMap>