FrmRollTubeLibraryZg.xml 23 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751
  1. <?xml version="1.0" encoding="UTF-8"?>
  2. <queryMap desc="">
  3. <query id="FrmRollTubeLibraryZg.queryPlanStoveD" desc="查询轧管虚拟炉计划">
  4. <![CDATA[
  5. SELECT T.HEAT_PLAN_NO,
  6. T.GX_PRO_SEQ,
  7. T1.ZY_BATCH_ID,
  8. CASE
  9. WHEN T.STOVE_NO IS NULL AND T.UPPER_PROCESS_CODE = 'B' THEN
  10. (SELECT O.STOVE_NO
  11. FROM PLN_STEELFOR_ORD O
  12. WHERE O.FURNACENO || '/' || O.SEQUENCENO = T.UPPER_HEATPLAN_ID)
  13. ELSE
  14. T.STOVE_NO
  15. END STOVE_NO,
  16. CASE
  17. WHEN T.JUDGE_STOVE_NO IS NULL AND T.UPPER_PROCESS_CODE = 'B' THEN
  18. (SELECT O.JUDGE_STOVE_NO
  19. FROM PLN_STEELFOR_ORD O
  20. WHERE O.FURNACENO || '/' || O.SEQUENCENO = T.UPPER_HEATPLAN_ID)
  21. ELSE
  22. T.JUDGE_STOVE_NO
  23. END JUDGE_STOVE_NO,
  24. CASE
  25. WHEN T.FLAG_STOVE_NO IS NULL AND T.UPPER_PROCESS_CODE = 'B' THEN
  26. (SELECT O.FLAG_STOVE_NO
  27. FROM PLN_STEELFOR_ORD O
  28. WHERE O.FURNACENO || '/' || O.SEQUENCENO = T.UPPER_HEATPLAN_ID)
  29. ELSE
  30. T.FLAG_STOVE_NO
  31. END FLAG_STOVE_NO,
  32. DECODE(T.PLANSTATUS,
  33. '00',
  34. '计划',
  35. '10',
  36. '下发',
  37. '20',
  38. '生产中',
  39. '30',
  40. '生产完成',
  41. '40',
  42. '关闭A') PLANSTATUS,
  43. T.UPPER_HEATPLAN_ID,
  44. T.PRO_PLAN_ID||'/'||T.GX_PLAN_NO PRO_PLAN_ID,
  45. T.GX_PLAN_NO,
  46. T.CCM_PRO_PLAN_ID ||'/'||T.CCM_GX_PLAN_NO CCM_PRO_PLAN_ID,
  47. T.CCM_GX_PLAN_NO,
  48. T.PLINE_CODE,
  49. T.PLINE_NAME,
  50. T.PROCESS_CODE_C,
  51. T.PROCESS_DESC_C,
  52. T.UPPER_PROCESS_CODE,
  53. T.NEXT_PROCESS_CODE,
  54. DECODE(T.ISENDGX, '0', '/', '1', '是') ISENDGX,
  55. DECODE(T.IF_MATCH_ODD, '0', '/', '1', '前轧管利库','4','后轧管利库','6','本工序精整利库','炼钢利库') IF_MATCH_ODD,
  56. DECODE(T.IF_DO_HEAT_PLAN, '0', '/', '1', '是') IF_DO_HEAT_PLAN,
  57. T.ORDER_SOURCE,
  58. T.ORD_LN_DLY_PK,
  59. T.ORDER_NO ||'/'||T.ORDER_SEQ ORDER_NO,
  60. T.ORDER_SEQ,
  61. T.DELIVERY_NO,
  62. T.REQ_BL_ID,
  63. T.IF_EXPORT,
  64. T.PRIORITY,
  65. T.PRIORITY_MEMO,
  66. T.PRO_MONTH,
  67. DECODE(T.IF_LEN_CONTROL, '0', '/', '1', '是') IF_LEN_CONTROL,
  68. DECODE(T.IF_MINUS_SIC_ROLL, '0', '/', '1', '是') IF_MINUS_SIC_ROLL,
  69. T.PROD_STANDARD,
  70. T.OUTPUT_STANDARD,
  71. T.DECISION,
  72. T.PROGY_MEMO,
  73. T.GOWHERE_CODE,
  74. T.GOWHERE_NAME,
  75. DECODE(T.OUTS_BILLET_FL, '1', '外购', '0', '自炼') OUTS_BILLET_FL,
  76. DECODE(T.GPTYPE, '1', '铸坯', '2', '锻坯') GPTYPE,
  77. T.INWL_ID,
  78. T.INWL_DESC,
  79. T.OUTWL_ID,
  80. T.OUTWL_DESC,
  81. T.GRADECODE,
  82. T.GRADENAME,
  83. T.STEELCODE,
  84. T.STEELNAME,
  85. T.PRODUCCODE,
  86. T.PRODUCNAME,
  87. T.MODEL_CODE,
  88. T.MODEL_DESC,
  89. T.DIAMETER,
  90. T.LEN_GP_SINGLE,
  91. T.WT_GP_SINGLE,
  92. T.PLN_INSINGLE_NUM,
  93. T.PLN_INSINGLE_WT,
  94. T.PLN_OUTSINGLE_NUM,
  95. T.PLN_OUTSINGLE_W,
  96. T.REDUCED_WT,
  97. T.OUTDIAMETER,
  98. T.WALLTHICK,
  99. T.OUTDIAMETER_ZG,
  100. T.WALLTHICK_ZG,
  101. T.AIMOUTDIAMETER,
  102. T.AIMWALLTHICK,
  103. T.THICKNESS_WALL,
  104. T.LEN_ROLL_MAX,
  105. T.LEN_ROLL_MIN,
  106. T.AIMLENGTH,
  107. T.ROLL_LENGTH,
  108. T.OUTNUM_CUT,
  109. DECODE(T.CUT_TYPE, '0', '被动', '1', '主动') CUT_TYPE,
  110. T1.LEN_CUTEND,
  111. T1.LEN_CUTHEAD,
  112. T1.DIAMETER_MANDREL,
  113. T1.PASS_CODE,
  114. T1.PASS_NAME,
  115. DECODE(T.IF_MONITOR, '0', '/', '1', '轧管利库','2','炼钢利库') IF_MONITOR,
  116. T.PRDCR_NO,
  117. T.MONITOR_POINT,
  118. T1.BOM,
  119. T.WHOLE_BACKLOG,
  120. T1.WHOLE_BACKLOG_DESC,
  121. T.CIC,
  122. T.PIC,
  123. T.SIC,
  124. T.DIC,
  125. T1.CRAFT_FILE_NO,
  126. T1.CRAFT_FILE_MAN,
  127. T1.CRAFT_SEQ,
  128. T.SEC_CRAFT_FILE_NO,
  129. T.STATION_ROAD,
  130. T.PRO_DAY,
  131. T.BAL_YEAR_MONTH,
  132. T.CREATE_NAME,
  133. TO_CHAR(T.CREATE_TIME, 'YYYY-MM-DD HH24:MI:SS') CREATE_TIME,
  134. T.UPDATE_NAME,
  135. TO_CHAR(T.UPDATE_TIME, 'YYYY-MM-DD HH24:MI:SS') UPDATE_TIME,
  136. T.DOWNMAN,
  137. TO_CHAR(T.DOWNTIME, 'YYYY-MM-DD HH24:MI:SS') DOWNTIME,
  138. DECODE(T.IS_LOAD, '0', '未上料', '1', '已上料') IS_LOAD,
  139. DECODE(T.PLN_TYPE, '0', '正常计划', '1', '试轧料') PLN_TYPE,
  140. T.INDEX_SEQ,T.FEED_HEAT_NO
  141. FROM PLN_ZY_ZG_M T,PLN_ORDER_ZG_S T1
  142. WHERE 1 = 1
  143. AND T.PRO_PLAN_ID=T1.PRO_PLAN_ID
  144. AND T.GX_PLAN_NO=T1.GX_PLAN_NO
  145. ]]>
  146. </query>
  147. <query id="FrmRollTubeLibraryZg.queryPlanStoveDc" desc="查询轧管实际炉计划">
  148. <![CDATA[
  149. SELECT
  150. T.HEAT_PLAN_NO,
  151. T.HEAT_PLAN_SQE,
  152. T.JUGDE_APPLY_CODE,
  153. T1.ZY_BATCH_ID,
  154. T.STOVE_NO,
  155. T.JUDGE_STOVE_NO,
  156. T.PRO_PLAN_ID,
  157. T.GX_PLAN_NO,
  158. T.PLINE_CODE,
  159. T.PLINE_NAME,
  160. T.DIAMETER,
  161. T.LEN_GP_SINGLE,
  162. T.WT_GP_SINGLE,
  163. T.CUT_NUM_GP,
  164. T.LENGTH_M,
  165. T.WEIGHT_M,
  166. T.PLAN_INDOUBLE_NUM,
  167. T.PLAN_INDOUBLE_WT,
  168. T.REAL_INDOUBLE_NUM,
  169. T.REAL_INDOUBLE_WT,
  170. T.FLAG_STOVE_NO,
  171. T.CREATE_NAME,
  172. TO_CHAR(T.CREATE_TIME, 'YYYY-MM-DD HH24:MI:SS') CREATE_TIME,
  173. T.UPDATE_NAME,
  174. TO_CHAR(T.UPDATE_TIME, 'YYYY-MM-DD HH24:MI:SS') UPDATE_TIME,
  175. T.FEED_HEAT_NO,T.CUT_TARGET,T.CUT_LENGTH,T.CUT_WEIGHT
  176. FROM PLN_ZY_ZG_C T,PLN_ORDER_ZG_S T1
  177. WHERE 1=1
  178. AND T.PRO_PLAN_ID=T1.PRO_PLAN_ID
  179. AND T.GX_PLAN_NO=T1.GX_PLAN_NO
  180. ]]>
  181. </query>
  182. <query id="FrmRollTubeLibraryZg.queryPlanOrderD" desc="查询轧管排产(界面)">
  183. <![CDATA[
  184. SELECT S.*,DECODE((SELECT COUNT(*) GPCOUNT
  185. FROM MAT_GP_M GP
  186. WHERE GP.PRODUCT_FLAG = '801401'
  187. AND ((GP.MAT_STATUS = '80150102' AND GP.JUDGE_RESULT_CODE = '40740701') OR INSTANCY_FLAG = '1')
  188. AND GP.QCM_STAUS = '00'
  189. AND GP.DIMATER NOT LIKE '%t%'
  190. AND GP.MNG_LOCK_FLAG = '0'
  191. AND GP.LOCK_FLAG = '0'
  192. AND GP.BELONG_CODE IN('002001001','002023005')
  193. AND INSTR(S.GRADE_ALL, GP.GRADENAME) > 0
  194. AND DECODE(GP.DIMATER,'251','250',GP.DIMATER) = DECODE(TO_CHAR(TO_NUMBER(S.DIAMETER_GP)),'251','250',TO_CHAR(TO_NUMBER(S.DIAMETER_GP)))
  195. AND S.IS_REPAIR_PLN = '/'),
  196. '0',
  197. '无库存',
  198. '有库存') GPCOUNT FROM (
  199. SELECT
  200. (SELECT LISTAGG(C1.GRADENAME, ',') WITHIN GROUP(ORDER BY C1.PRIORITY ASC, C1.GRADECODE)
  201. FROM (SELECT DISTINCT B.GRADENAME,
  202. B.GRADECODE,
  203. B.PRIORITY,
  204. C.CRAFT_SEQ,
  205. S.ORD_LN_DLY_PK,
  206. S.SUPPLY_UNIT_CODE,
  207. S.SUPPLY_UNIT
  208. FROM CRAFT_ORD_DESIGN_MSC_PL_GZ B,
  209. CRAFT_ORD_DESIGN_MSC_PL B1,
  210. pln_saleord s,
  211. CRAFT_ORD_DESIGN c
  212. WHERE B.DESGIN_KEY = B1.DESGIN_KEY
  213. AND B.MSC_PLINE = B1.MSC_PLINE
  214. AND C.ORD_LN_PK = S.ORD_LN_PK
  215. AND B.DESGIN_KEY = C.DESGIN_KEY
  216. ORDER BY B.PRIORITY ASC, B.GRADECODE ASC) C1
  217. WHERE C1.ORD_LN_DLY_PK = T.ORD_LN_DLY_PK
  218. AND C1.CRAFT_SEQ =T.CRAFT_SEQ) GRADE_ALL,
  219. D.TRANSIT_TYP,
  220. D.DELVRY_ADDR,
  221. D.VALIDFLAG,
  222. T.PRO_ORDER_NO,
  223. T.PRO_PLAN_ID,
  224. T.GX_PLAN_NO,
  225. T.PLAN_GROUP_ID,
  226. T.ORDER_SOURCE,
  227. T.ORD_LN_DLY_PK,
  228. T.PLN_DIVIDE_ID,
  229. DECODE(T.ISENDGX,
  230. '1',
  231. NULLIF(T.ORDER_NO || '/' || T.ORDER_SEQ, '/'),
  232. T.PRO_PLAN_ID) PRO_PLAN_NO,
  233. NULLIF(T.ORDER_NO || '/' || T.ORDER_SEQ, '/') ORDER_NO,
  234. T.ORDER_SEQ,
  235. T.DELIVERY_NO,
  236. T.PLINE_CODE,
  237. T.PLINE_NAME,
  238. T.STEELCODE,
  239. T.STEELNAME,
  240. T.GRADECODE,
  241. T.GRADENAME,
  242. T.OUTDIAMETER,
  243. T.WALLTHICK,
  244. T.LENGTHDISC,
  245. T.INWL_ID,
  246. T.INWL_DESC,
  247. T.OUTWL_ID,
  248. T.OUTWL_DESC,
  249. T.LEN_ROLL_MAX,
  250. T.LEN_ROLL_MIN,
  251. T.AIMOUTDIAMETER,
  252. T.AIMWALLTHICK,
  253. T.AIMLENGTH,
  254. T.DIAMETER_GP,
  255. T.LEN_GP_SINGLE,
  256. T.ROLL_LENGTH,
  257. NVL(T.LEN_CUTHEAD,0) LEN_CUTHEAD,
  258. NVL(T.LEN_CUTEND,0) LEN_CUTEND,
  259. T.OUTNUM_CUT,
  260. T.DIAMETER_MANDREL,
  261. T.PASS_CODE,
  262. T.PASS_NAME,
  263. T.IN_WEIGHT_S,
  264. T.IN_NUM_S,
  265. T.WEIGTH_S,
  266. T.NUM_S,
  267. T.ADD_WT_IN,
  268. T.ADD_NUM_IN,
  269. T.MATCH_WT_IN,
  270. T.MATCH_NUM_IN,
  271. DECODE(T.ISENDGX, '1', '是', '/') ISENDGX,
  272. DECODE(T.IF_MONITOR_ZG, '1', '是', '/') IF_MONITOR_ZG,
  273. T.PRDCR_NO,
  274. T.MONITOR_POINT,
  275. T.STATION_ROAD,
  276. T.PRO_MONTH,
  277. T.CIC,
  278. T.PIC,
  279. T.SIC,
  280. T.DIC,
  281. T.WIC,
  282. T.GIC,
  283. T.GX_PRO_SEQ,
  284. TO_CHAR(ROUND(TO_NUMBER(NVL(T.PLAN_USETIME, '0')) / 60, 2)) PLAN_USETIME,
  285. TO_CHAR(T.PLAN_TIME_B, 'YYYY-MM-DD HH24:MI:SS') PLAN_TIME_B,
  286. TO_CHAR(T.PLAN_TIME_E, 'YYYY-MM-DD HH24:MI:SS') PLAN_TIME_E,
  287. T.BATCHED_WT,
  288. T.BATCHED_NUM,
  289. T.FINISHWEIGHT,
  290. T.FINISHNUM,
  291. DECODE(T.EXE_STATUS,
  292. '0',
  293. '计划',
  294. '1',
  295. '生产中',
  296. '2',
  297. '已生产',
  298. '3' , '关闭A' , '') EXE_STATUS,
  299. DECODE(T.IS_REPAIR_PLN, '1', '是', '/') IS_REPAIR_PLN,
  300. T.REPAIR_TYPE,
  301. DECODE(T.IS_PLAN_OK, '1', '是', '/') IS_PLAN_OK,
  302. DECODE(T.GPREQ_IF_OK, '1', '是', '/') GPREQ_IF_OK,
  303. T.GPREQ_ID,
  304. T.ZY_BATCH_ID,
  305. T.CIC_GROUP_GP,
  306. T.PIC_GROUP_GP,
  307. T.SIC_GROUP_GP,
  308. T.DIC_GROUP_GP,
  309. T.WIC_GROUP_GP,
  310. T.GIC_GROUP_GP,
  311. T.CIC_GP,
  312. T.PIC_GP,
  313. T.SIC_GP,
  314. T.DIC_GP,
  315. T.WIC_GP,
  316. T.GIC_GP,
  317. T.IF_EXPORT,
  318. TO_CHAR(T.CREATE_TIME, 'YYYY-MM-DD HH24:MI:SS') CREATE_TIME,
  319. T.MEMO,
  320. TO_CHAR(T.ISSUED_TIME, 'YYYY-MM-DD HH24:MI:SS') ISSUED_TIME,
  321. T.ISSUED_MAN,
  322. TO_CHAR(T.LAST_UNDOWN_TIME, 'YYYY-MM-DD HH24:MI:SS') LAST_UNDOWN_TIME,
  323. T.LAST_UNDOWN_MAN,
  324. T.VERSION_NO,
  325. T.PROCESSING_COST,
  326. T.TOTAL_COST,
  327. DECODE(T.IF_STOVE_ISSUED, '1', '是', '/') IF_STOVE_ISSUED,
  328. TO_CHAR(T.STOVE_ISSUED_TIME, 'YYYY-MM-DD HH24:MI:SS') STOVE_ISSUED_TIME,
  329. T.STOVE_ISSUED_MAN,
  330. T.IS_ONLOAD_LINE,
  331. T.OUTDIAMETER_ZG,
  332. T.WALLTHICK_ZG,
  333. T.WHOLE_BACKLOG_DESC,
  334. T.MSC,
  335. T.INDEX_SEQ,
  336. T.BOM,
  337. (SELECT S1.CRAFT_PATH
  338. FROM CRAFT_FILE_LV2 S1
  339. WHERE INSTR(T1.CRAFT_FILE_LV2_D, S1.PK) > 0
  340. AND INSTR(S1.PLINE_CODE, T.PLINE_CODE) > 0
  341. AND S1.VALIDFLAG = '1'
  342. AND S1.PROCESS_CODE = 'D') CRAFT_FILE_LV2_G,
  343. (SELECT CD.CRAFT_PATH FROM CRAFT_ORD_DESIGN CD WHERE CD.ORD_LN_PK=T1.ORD_LN_PK AND CD.CRAFT_SEQ=T.CRAFT_SEQ) CRAFT_PATH,
  344. T.CRAFT_SEQ,
  345. T.CRAFT_FILE_NO,
  346. T.CRAFT_FILE_MAN,
  347. T1.PRODUCCODE,
  348. T1.PRODUCNAME,
  349. T1.STD_CODE,
  350. T1.STD_NAME,
  351. T1.STD_STYLE_DESC,
  352. T1.SPEC_CODE,
  353. T1.SPEC_NAME,
  354. T1.MODEL_DESC,
  355. DECODE(T.IF_LEN_CONTROL, '1', '是', '0', '/') IF_LEN_CONTROL,
  356. DECODE(T.IF_MINUS_SIC_ROLL, '1', '是', '0', '/') IF_MINUS_SIC_ROLL,
  357. T.TUBE_END_RATIO,
  358. T.GPREQ_NUM,
  359. T.GPREQ_WEIGHT,
  360. T.VERIFY1,
  361. T.VERIFY2,
  362. T.VERIFY3,
  363. NVL(T.WEIGTH_S_MIN, 0) WEIGTH_S_MIN,
  364. (SELECT T9.BASENAME
  365. FROM COM_BASE_INFO T9
  366. WHERE T9.BASECODE = T.PRIORITY) PRIORITY,
  367. T.PRIORITY_MEMO,
  368. NVL(T.PLANS_NUM, 0) PLANS_NUM,
  369. T.ORIGINAL_NUMBER,
  370. T1.FINAL_USER_DESC,
  371. T.PROD_STANDARD,
  372. T.OUTPUT_STANDARD,
  373. T.THICKNESS_WALL,
  374. T.DECISION,
  375. T.PROCESS_DESC_C,
  376. T.APPLY_NO,
  377. DECODE(T.APPLY_STATUS,
  378. '00',
  379. '作废',
  380. '10',
  381. '申请',
  382. '20',
  383. '审批通过',
  384. '30',
  385. '审批不通过') APPLY_STATUS,
  386. T.ISSUED_MEMO,
  387. DECODE(T.OUTS_BILLET_FL, '0', '自炼', '1', '外购') OUTS_BILLET_FL,
  388. T1.OUTS_STL_PIPE_FL,
  389. T1.LEN_NO,
  390. T1.LENGTHDISC_N,
  391. T1.LEN_NO_N,
  392. T.PROGY_MEMO,
  393. (SELECT P.GRADECODE_ALL
  394. FROM PLN_SALEORD_PROC P
  395. WHERE P.ORD_LN_DLY_PK = T.ORD_LN_DLY_PK
  396. AND P.PLN_DIVIDE_ID = T.PLN_DIVIDE_ID) GRADECODE_ALL,
  397. T1.PRD_CLS,
  398. T1.ORDERFROM,
  399. T1.PRODUCE_SORT,
  400. (SELECT SP.HR_CAPCTY
  401. FROM SLM_BASE_MATERIAL_D_PL SP
  402. WHERE SP.PLINE_CODE = T.PLINE_CODE
  403. AND SP.IN_MATERIAL_NO = T.INWL_ID
  404. AND SP.OUT_MATERIAL_NO = T.OUTWL_ID) HR_CAPCTY,
  405. NVL((SELECT SUM(M.PREDICT_TON)
  406. FROM MIL_PLAN M
  407. WHERE M.PRO_PLAN_ID = T.PRO_PLAN_ID
  408. AND M.GX_PLAN_NO = T.GX_PLAN_NO
  409. AND SUBSTR(M.JUDGE_STOVE_NO, -2) = '01'),
  410. 0) EXPECT_WT,
  411. NVL((SELECT SUM(M.PREDICT_PIECE)
  412. FROM MIL_PLAN M
  413. WHERE M.PRO_PLAN_ID = T.PRO_PLAN_ID
  414. AND M.GX_PLAN_NO = T.GX_PLAN_NO
  415. AND SUBSTR(M.JUDGE_STOVE_NO, -2) = '01'),
  416. 0) EXPECT_NUM,
  417. DECODE(T.PASSIVE,'1','主动','0','被动') PASSIVE,
  418. DECODE(B.CODE_JG_BL,'',B.CODE_DJ_BL,B.CODE_JG_BL) REQ_BL_ID,
  419. T.GRADECODE_LK,T.GRADENAME_LK,T.CIC_GROUP_LK,
  420. (SELECT GET_GP_MAT_NUM_ZL(T.PRO_PLAN_ID, T.GX_PLAN_NO) FROM DUAL) FURNA_NUM,
  421. (SELECT GET_GP_MAT_WT_ZL(T.PRO_PLAN_ID, T.GX_PLAN_NO) FROM DUAL) FURNA_WEIGHT,
  422. (SELECT GET_GP_PLNZGM_NUM(T.PRO_PLAN_ID, T.GX_PLAN_NO) FROM DUAL) LJ_NUM,
  423. (SELECT GET_GP_PLNZGM_WT(T.PRO_PLAN_ID, T.GX_PLAN_NO) FROM DUAL) LJ_WEIGHT,
  424. (SELECT GET_GP_MAT_NUM(T.PRO_PLAN_ID, T.GX_PLAN_NO) FROM DUAL) PEND_NUM,
  425. (SELECT GET_GP_MAT_WT(T.PRO_PLAN_ID, T.GX_PLAN_NO) FROM DUAL) PEND_WEIGHT,
  426. (SELECT GET_GP_WT_CK(T.PRO_PLAN_ID, T.GX_PLAN_NO) FROM DUAL) CK_WEIGHT,
  427. (SELECT GET_GP_NUM_CK(T.PRO_PLAN_ID, T.GX_PLAN_NO) FROM DUAL) CK_NUM,
  428. (SELECT GET_ZG_REDUCED_WT(T.PRO_PLAN_ID, T.GX_PLAN_NO) FROM DUAL) REDUCED_WT,
  429. T1.SUPPLY_UNIT_CODE,
  430. T1.SUPPLY_UNIT,
  431. DECODE(T1.TYPE_FLAG,'0','非双经销','1','双经销','2','定销订购','4','来料加工')TYPE_FLAG
  432. FROM PLN_ORDER_ZG_S T,
  433. (SELECT Q1.PRODUCCODE,
  434. Q1.PRODUCNAME,
  435. Q1.STD_CODE,
  436. Q1.STD_NAME,
  437. Q1.STD_STYLE_DESC,
  438. Q1.SPEC_CODE,
  439. Q1.SPEC_NAME,
  440. Q1.ORD_LN_DLY_PK,
  441. Q1.ORD_LN_PK,
  442. Q1.STEELCODE,
  443. Q1.STEELNAME,
  444. Q1.DELVRY_RANGE_TPE,
  445. Q1.DELVRY_RANGE_MAX,
  446. Q1.DELVRY_RANGE_MIN,
  447. Q1.DELVRY_QTY,
  448. Q1.MODEL_DESC,
  449. Q4.ABRVITION FINAL_USER_DESC,
  450. Q1.LENGTHMAX,
  451. Q1.LENGTHMIN,
  452. Q1.OUTS_BILLET_FL,
  453. Q1.OUTS_STL_PIPE_FL,
  454. Q1.LENGTHDISC_N,
  455. Q1.LEN_NO_N,
  456. Q1.LEN_NO,
  457. Q2.CRAFT_FILE_LV2_D,
  458. (SELECT A.PRODUC_DESC
  459. FROM COM_BASE_PRODUCT A
  460. WHERE A.PRODUCCODE = Q1.PRODUCCODE
  461. AND A.VALIDFLAG = '1') PRD_CLS,
  462. (SELECT A.BASENAME
  463. FROM COM_BASE_INFO A
  464. WHERE A.BASECODE = Q1.ORDERFROM) ORDERFROM,
  465. Q1.PRODUCE_SORT,
  466. Q1.SUPPLY_UNIT_CODE,
  467. Q1.SUPPLY_UNIT,
  468. Q1.TYPE_FLAG
  469. FROM PLN_SALEORD Q1,
  470. CRAFT_ORD_DESIGN Q2,
  471. CRAFT_ORD_DESIGN_APPOINT Q3,
  472. SLM_BASE_CUSTOMER Q4
  473. WHERE Q1.ORD_LN_PK = Q3.ORD_LN_PK(+)
  474. AND Q1.FINAL_USER = Q4.CUSTOMER_NO(+)
  475. AND Q1.ORD_LN_PK = Q2.ORD_LN_PK(+)
  476. AND Q2.VALIDFLAG(+) = '1') T1,
  477. (SELECT MIN(S.NEXT_GX) NEXT_GX,
  478. S.PRO_PLAN_ID,
  479. MIN(S.PLAN_GROUP_ID) PLAN_GROUP_ID
  480. FROM PLN_ORDER_ZG S
  481. GROUP BY S.PRO_PLAN_ID) T2,
  482. SLM_ORDER_LINE_DELIVERY D,PLN_PORDER_BL_REQ B
  483. WHERE T.ORD_LN_DLY_PK = T1.ORD_LN_DLY_PK(+)
  484. AND T.PRO_PLAN_ID = T2.PRO_PLAN_ID(+)
  485. AND T.ORD_LN_DLY_PK = D.ORD_LN_DLY_PK(+)
  486. AND T.ORD_LN_DLY_PK=B.REQ_BL_ID(+)
  487. AND T.IS_PLAN_OK='1'
  488. ]]>
  489. </query>
  490. <query id="FrmRollTubeLibraryZg.getStlChemicalStd" desc="查询轧管对应内控成分元素">
  491. <![CDATA[
  492. SELECT V.CHEM_CODE,
  493. V.CHEM_NAME,
  494. V.CHEM_TYPE,
  495. V.CHEM_FORMULA,
  496. V.STDMIN_SIGN || V.STDMIN STDMIN_SIGN,
  497. V.STDMAX_SIGN || V.STDMAX STDMAX_SIGN,
  498. V.STDTARGET,
  499. C.CHEM_SEQ,V.CIC
  500. FROM CRAFT_ORD_DESIGN_STD_CIC V, COM_BASE_CHEM C
  501. WHERE V.CHEM_CODE = C.CHEM_CODE
  502. --AND INSTR(?, V.CIC) > 0
  503. AND V.PROCESS_CODE = 'A'
  504. AND V.DESGIN_KEY = ?
  505. AND V.MSC_PLINE = ?
  506. AND V.SPECL_FL = '2'
  507. AND V.VALIDFLAG = '1'
  508. ORDER BY V.CIC,C.CHEM_SEQ ASC
  509. ]]>
  510. </query>
  511. <query id="FrmRollTubeLibraryZg.getPlnOrderZg" desc="查询轧管信息">
  512. <![CDATA[
  513. SELECT D.DESGIN_KEY, T.CRAFT_SEQ, T.CIC_GP, T.INDEX_SEQ,T.OUTWL_ID,T.INWL_ID,T.PLINE_CODE, T.CIC_GROUP_LK
  514. FROM PLN_ORDER_ZG_S T, PLN_SALEORD T1, CRAFT_ORD_DESIGN D
  515. WHERE T1.ORD_LN_DLY_PK = T.ORD_LN_DLY_PK
  516. AND D.ORD_LN_PK = T1.ORD_LN_PK
  517. AND D.CRAFT_SEQ = T.CRAFT_SEQ
  518. AND T.PRO_PLAN_ID =?
  519. AND T.GX_PLAN_NO = ?
  520. ]]>
  521. </query>
  522. <query id="FrmRollTubeLibraryZg.getStlChemicalData" desc="查询判定表成分元素">
  523. <![CDATA[
  524. SELECT T2.C,
  525. T2.SI,
  526. T2.MN,
  527. T2.P,
  528. T2.S,
  529. T2.NI,
  530. T2.CR,
  531. T2.CU,
  532. T2.ASN,
  533. T2.TI,
  534. T2.V,
  535. T2.MO,
  536. T2.B,
  537. T2.W,
  538. T2.AL,
  539. T2.ZN,
  540. T2.PB,
  541. T2.SN,
  542. T2.CA,
  543. T2.LA,
  544. T2.SB,
  545. T2.CE,
  546. T2.SE,
  547. T2.MG,
  548. T2.NB,
  549. T2.CD,
  550. T2.BI,
  551. T2.N,
  552. T2.H,
  553. T2.O,
  554. T2.FE,
  555. T2.ALT,
  556. T2.ALS,
  557. T2.ALINS,
  558. T2.BS,
  559. T2.BN,
  560. T2.MGO,
  561. T2.SIO2,
  562. T2.AL2O3,
  563. T2.TFEO,
  564. T2.FE2O3,
  565. T2.H2O,
  566. T2.CAF2,
  567. T2.P2O5,
  568. T2.TFE,
  569. T2.CR2O3,
  570. T2.TIO2,
  571. T2.MNO,
  572. T2.V2O5,
  573. T2.FEO,
  574. T2.CAO,
  575. T2.ZR,
  576. T2.CO,
  577. T2.SAMPLE_NO,
  578. T2.ASSAYNO,
  579. T2.STOVE_NO
  580. FROM QCM_JHY_ELEMENTS T2,
  581. QCM_LG_CHEMJUDGE T1,
  582. (SELECT T.JUDGE_STOVE_NO, T.CHEM_JUDGE_ID
  583. FROM MAT_GP_M T
  584. WHERE T.CHEM_JUDGE_ID IS NOT NULL
  585. GROUP BY T.JUDGE_STOVE_NO, T.CHEM_JUDGE_ID) M
  586. WHERE M.CHEM_JUDGE_ID= T1.CHEM_JUDGE_ID
  587. AND M.JUDGE_STOVE_NO = T1.JUDGE_STOVE_NO
  588. AND T1.ASSAYNO=T2.ASSAYNO
  589. AND T2.VALIDFLAG = '1'
  590. AND T1.JUDGE_STOVE_NO = ?
  591. AND T1.CHEM_JUDGE_ID= ?
  592. ORDER BY T2.CREATE_TIME DESC
  593. ]]>
  594. </query>
  595. <query id="FrmRollTubeLibraryZg.queryMatGpTrack" desc="查询脱单利库记录">
  596. <![CDATA[
  597. SELECT T.EVENT_ID,
  598. T.EVENT_DESC,
  599. T.FORM_NAME,
  600. T.CALL_FUNC_CODING,
  601. T.KEYVALUE_1,
  602. T.KEYVALUE_1_DESC,
  603. T.KEYVALUE_2,
  604. T.KEYVALUE_2_DESC2,
  605. T.KEYVALUE_3,
  606. T.KEYVALUE_3_DESC3,
  607. T.KEYVALUE_4,
  608. T.KEYVALUE_4_DESC4,
  609. T.KEYVALUE_5,
  610. T.KEYVALUE_5_DESC5,
  611. T.KEYVALUE_6,
  612. T.KEYVALUE_6_DESC6,
  613. T.KEYVALUE_7,
  614. T.KEYVALUE_7_DESC7,
  615. T.PRODUCT_FLAG,
  616. T.MAT_STATUS,
  617. T.STOVE_NO,
  618. T.FLAG_STOVE_NO,
  619. T.LOT_NO,
  620. T.JUDGE_STOVE_NO,
  621. T.GROUD_NO,
  622. T.BATCH_NO,
  623. T.CAST_NO,
  624. T.CCMID,
  625. T.GRADECODE,
  626. T.GRADENAME,
  627. T.STD_CODE,
  628. T.STD_NAME,
  629. T.ACT_DIMATER,
  630. T.ACT_HEIGHT,
  631. T.ACT_LEN,
  632. T.ACT_LEN_MIN,
  633. T.ACT_LEN_MAX,
  634. T.ACT_FIX_NUM,
  635. T.ACT_FIX_LEN,
  636. SUM(NVL(T.ACT_COUNT, 0)) ACT_COUNT,
  637. SUM(NVL(T.ACT_WEIGHT, 0)) ACT_WEIGHT,
  638. SUM(NVL(T.ACT_THEORY_WEIGHT, 0)) ACT_THEORY_WEIGHT,
  639. T.PRO_ORDER_NO,
  640. T.PRO_ORDER_ID,
  641. T.PRO_ORDER_NO1,
  642. T.PRO_ORDER_ID1,
  643. T.ORD_PK,
  644. T.ORD_LN_PK,
  645. T.ORD_LN_DLY_PK,
  646. T.ORDER_NO,
  647. T.ORDER_SEQ,
  648. T.ORDER_SEQ_NO,
  649. T.OLD_ORD_PK,
  650. T.OLD_ORD_LN_PK,
  651. T.OLD_ORD_LN_DLY_PK,
  652. T.OLD_ORDER_NO,
  653. T.OLD_ORDER_SEQ,
  654. T.OLD_ORDER_SEQ_NO,
  655. T.BELONG_CODE,
  656. T.BELONG_NAME,
  657. T.MEMO,
  658. T.CREATE_NAME,
  659. TO_CHAR(T.CREATE_TIME, 'YYYY-MM-DD HH24:MI:SS') CREATE_TIME,
  660. T.DEPARTMENT_CODE,
  661. T.DEPARTMENT_DESC,
  662. T.MANAGEMENT_NO,
  663. T.MANAGEMENT_NAME,
  664. T.OLD_JUDGE_STOVE_NO,
  665. T.OLD_GROUD_NO,
  666. T.OLD_BATCH_NO,
  667. T.OLD_GRADECODE,
  668. T.OLD_GRADENAME,
  669. T.OLD_STD_CODE,
  670. T.OLD_STD_NAME,
  671. T.OLD_STOVE_NO
  672. FROM MAT_GP_TRACK T
  673. WHERE 1=1
  674. ]]>
  675. </query>
  676. <query id="FrmRollTubeLibraryZg.queryPlanMZg" desc="查询轧管炉计划主">
  677. <![CDATA[
  678. SELECT * FROM PLN_ZY_ZG_M T WHERE 1=1
  679. ]]>
  680. </query>
  681. <query id="FrmRollTubeLibraryZg.queryPlanCZg" desc="查询轧管炉计划从">
  682. <![CDATA[
  683. SELECT
  684. T.HEAT_PLAN_NO,
  685. T.HEAT_PLAN_SQE,
  686. T.JUGDE_APPLY_CODE,
  687. T.ZY_BATCH_ID,
  688. T.STOVE_NO,
  689. T.JUDGE_STOVE_NO,
  690. T.PRO_PLAN_ID,
  691. T.GX_PLAN_NO,
  692. T.PLINE_CODE,
  693. T.PLINE_NAME,
  694. T.DIAMETER,
  695. T.LEN_GP_SINGLE,
  696. T.WT_GP_SINGLE,
  697. T.CUT_NUM_GP,
  698. T.LENGTH_M,
  699. T.WEIGHT_M,
  700. T.PLAN_INDOUBLE_NUM,
  701. T.PLAN_INDOUBLE_WT,
  702. T.REAL_INDOUBLE_NUM,
  703. T.REAL_INDOUBLE_WT,
  704. T.FLAG_STOVE_NO,
  705. T.CREATE_NAME,
  706. TO_CHAR(T.CREATE_TIME, 'YYYY-MM-DD HH24:MI:SS') CREATE_TIME,
  707. T.UPDATE_NAME,
  708. TO_CHAR(T.UPDATE_TIME, 'YYYY-MM-DD HH24:MI:SS') UPDATE_TIME,
  709. T.CUT_TARGET,NVL(T.CUT_LENGTH,0) CUT_LENGTH,NVL(T.CUT_WEIGHT,0) CUT_WEIGHT,T.LENGTH_M_OLD,T.PLAN_WEIGTH,T.CUT_NUM_OLD
  710. FROM PLN_ZY_ZG_C T
  711. WHERE 1=1
  712. ]]>
  713. </query>
  714. <query id="FrmRollTubeLibraryZg.queryPline" desc="查询产线环形炉最小">
  715. <![CDATA[
  716. SELECT NVL(T.LENGTH_MIN_RING,0) LENGTH_MIN_RING,NVL(T.LENGTH_MIN_RING,0) LENGTH_MAX_RINGM,T.PLINE_CODE,T.PLINE_NAME FROM COM_BASE_PLINE T WHERE T.PLINE_CODE=?
  717. ]]>
  718. </query>
  719. <query id="FrmRollTubeLibraryZg.updatePlnZgMOld" desc="修改该虚拟炉计划量">
  720. <![CDATA[
  721. UPDATE PLN_ZY_ZG_M T SET
  722. T.PLN_INSINGLE_NUM = TO_NUMBER(T.PLN_INSINGLE_NUM) - TO_NUMBER(?),
  723. T.PLN_INSINGLE_WT = TO_NUMBER(T.PLN_INSINGLE_WT) - TO_NUMBER(?),
  724. T.PLN_OUTSINGLE_NUM = TO_NUMBER(T.PLN_OUTSINGLE_NUM) - TO_NUMBER(?),
  725. T.PLN_OUTSINGLE_W = TO_NUMBER(T.PLN_OUTSINGLE_W) - TO_NUMBER(?)
  726. WHERE T.HEAT_PLAN_NO = ?
  727. ]]>
  728. </query>
  729. <query id = "FrmRollTubeLibraryZg.selectMatSetfoot" desc = "查询该材料号套尺材料">
  730. SELECT T.MAT_NO, T1.PLANSTATUS, T.SETFOOT_SEQ,T.MAT_STATUS
  731. FROM MAT_GP_M T
  732. LEFT JOIN PLN_ZY_ZG_M T1
  733. ON T.PRO_PLAN_ID_ZG = T1.PRO_PLAN_ID
  734. AND T.GX_PLAN_NO_ZG = T1.GX_PLAN_NO
  735. AND T.HEAT_PLAN_NO_NEXT = T1.HEAT_PLAN_NO
  736. WHERE T.MAT_NO_OLD = ?
  737. AND T.SETFOOT_SEQ > ?
  738. ORDER BY T.SETFOOT_SEQ ASC
  739. </query>
  740. <query id = "FrmRollTubeLibraryZg.deleteMatSetFoot" desc = "删除大于该套尺顺序号虚拟材料信息">
  741. DECLARE
  742. BEGIN
  743. DELETE FROM MAT_GP_M T WHERE T.MAT_NO = '#MAT_NO#';
  744. DELETE FROM YDM_GP_BUTTRESS T WHERE T.MAT_NO = '#MAT_NO#';
  745. END;
  746. </query>
  747. </queryMap>