Surface_Insp.xml 61 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905
  1. <?xml version="1.0" encoding="UTF-8"?>
  2. <queryMap desc="人工质检">
  3. <query id="SurFace_Insp.SurFaceQuery" desc="人工质检 信息查询">
  4. <![CDATA[
  5. SELECT
  6. RESULT_NO,
  7. JUDGE_STOVE_NO,
  8. LOT_NO,
  9. PLINE_CODE,
  10. TYPE,
  11. TARGET_DIAMETER,
  12. TARGET_THICKNESS,
  13. TARGET_LENGTH,
  14. PIPE_DIAM_MIN,
  15. PIPE_THICKNESS_MAX,
  16. PIPE_DIAM_MAX,
  17. PIPE_THICKNESS_MIN,
  18. NON_ROUNDNESS,
  19. UNEVEN_DEGREE,
  20. LENGTH,
  21. WEIGHT,
  22. DIRECTOR_QUANTITY,
  23. OFFLINE_QUANTITY,
  24. INSPECTOR,
  25. WASTE_QUANTITY,
  26. QUALIFIED_BRANCH,
  27. QUALIFIED_TONS,
  28. HEAD_STRAIGHT,
  29. BODY_STRAIGHT,
  30. ELLIPSE_DEGREE,
  31. PATTERN_NUMBER,
  32. PHY_PROPERTIES,
  33. EXECUTIVE_PRODUCER,
  34. TO_CHAR(PRODUCER_TIME, 'YYYY-MM-DD HH24:MI:SS') PRODUCER_TIME,
  35. PRODUCER_TEL,
  36. REMARK,
  37. CASE COL_MODE
  38. WHEN '0' THEN '接口采集'
  39. WHEN '1' THEN '人工录入'
  40. END AS COL_MODE,
  41. QA_TYPE,
  42. TO_CHAR(COL_TIME, 'YYYY-MM-DD HH24:MI:SS') COL_TIME,
  43. COL_USER,
  44. COL_SHIFT,
  45. COL_GROUP,
  46. TO_CHAR(START_TIME, 'YYYY-MM-DD HH24:MI:SS') START_TIME,
  47. TO_CHAR(END_TIME, 'YYYY-MM-DD HH24:MI:SS') END_TIME,
  48. NODE_FUR_FLAG,
  49. SIMPLE_RATE
  50. FROM MIL_SURFACE_RESULT WHERE
  51. LOT_NO || '&' LIKE '%' || ? || '%'
  52. AND JUDGE_STOVE_NO || '&' LIKE '%' || ? || '%'
  53. ]]>
  54. </query>
  55. <query id="SurFace_Insp.GetQAResult" desc="人工质检 信息查询">
  56. <![CDATA[
  57. SELECT T.RESULT_NO,
  58. T.JUDGE_STOVE_NO,
  59. T.LOT_NO,
  60. T.PLINE_CODE,
  61. T.TYPE,
  62. T.TARGET_DIAMETER,
  63. T.TARGET_THICKNESS,
  64. T.TARGET_LENGTH,
  65. T.PIPE_DIAM_MIN,
  66. T.PIPE_THICKNESS_MAX,
  67. T.PIPE_DIAM_MAX,
  68. T.PIPE_THICKNESS_MIN,
  69. T.NON_ROUNDNESS,
  70. T.UNEVEN_DEGREE,
  71. T.LENGTH,
  72. T.WEIGHT,
  73. T.DIRECTOR_QUANTITY,
  74. T.OFFLINE_QUANTITY,
  75. T.INSPECTOR,
  76. T.WASTE_QUANTITY,
  77. T.QUALIFIED_BRANCH,
  78. T.QUALIFIED_TONS,
  79. T.HEAD_STRAIGHT,
  80. T.BODY_STRAIGHT,
  81. T.ELLIPSE_DEGREE,
  82. T.PATTERN_NUMBER,
  83. T.PHY_PROPERTIES,
  84. T.EXECUTIVE_PRODUCER,
  85. TO_CHAR(T.PRODUCER_TIME, 'YYYY-MM-DD HH24:MI:SS') PRODUCER_TIME,
  86. T.PRODUCER_TEL,
  87. T.REMARK,
  88. T.COL_MODE,
  89. TO_CHAR(T.COL_TIME, 'YYYY-MM-DD HH24:MI:SS') COL_TIME,
  90. T.COL_USER,
  91. T.COL_SHIFT,
  92. T.COL_GROUP,
  93. TO_CHAR(T.START_TIME, 'YYYY-MM-DD HH24:MI:SS') START_TIME,
  94. TO_CHAR(T.END_TIME, 'YYYY-MM-DD HH24:MI:SS') END_TIME,
  95. T.NODE_FUR_FLAG,
  96. T.SIMPLE_RATE,
  97. TO_CHAR(T.QA_TIME, 'YYYY-MM-DD HH24:MI:SS') QA_TIME,
  98. T.HEIGHT_RATE,
  99. DECODE(T.SIZE_CHECK,'0','尺寸未抽检','1','尺寸已抽检')SIZE_CHECK
  100. FROM MIL_SURFACE_RESULT T
  101. WHERE
  102. T.JUDGE_STOVE_NO = ?
  103. AND T.RESULT_NO = ?
  104. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  105. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  106. ]]>
  107. </query>
  108. <query id="SurFace_Insp.ADD_SurFaceQuery" desc="开始质检">
  109. <![CDATA[
  110. INSERT INTO MIL_SURFACE_RESULT(
  111. RESULT_NO,
  112. LOT_NO,
  113. JUDGE_STOVE_NO,
  114. PLINE_CODE,
  115. START_TIME,
  116. SIZE_CHECK,
  117. PRO_PLAN_ID,
  118. GX_PLAN_NO
  119. )
  120. VALUES(
  121. '#RESULT_NO#',
  122. '#ROLL_LOT_NO#',
  123. '#HEAT_NO#',
  124. '#PLINE_CODE#',
  125. SYSDATE,
  126. '#SIZE_CHECK#',
  127. '#PRO_PLAN_ID#',
  128. '#GX_PLAN_NO#'
  129. )
  130. ]]>
  131. </query>
  132. <query id="SurFace_Insp.Upd_SurFaceQuery_1" desc="开始质检改变上料信息表状态">
  133. <![CDATA[
  134. UPDATE MIL_PLAN SET
  135. STATUS='#STATUS#'
  136. WHERE
  137. JUDGE_STOVE_NO='#JUDGE_STOVE_NO#' AND
  138. LOT_NO='#LOT_NO#'
  139. AND NVL(PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  140. AND NVL(GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  141. ]]>
  142. </query>
  143. <query id="SurFace_Insp.ZLXSQuery" desc="开始质检改变上料信息表状态">
  144. <![CDATA[
  145. SELECT HEIGHT_RATE,OFFLINE_QUANTITY,WASTE_QUANTITY FROM MIL_SURFACE_RESULT WHERE JUDGE_STOVE_NO = ? AND RESULT_NO = ? AND DEFECT_CHECK = '1'
  146. ]]>
  147. </query>
  148. <query id="SurFace_Insp.Upd_SurFaceQuery" desc="保存质检信息">
  149. <![CDATA[
  150. UPDATE MIL_SURFACE_RESULT
  151. SET REMARK = '#REMARK#' , COL_SHIFT = '#COL_SHIFT#' ,
  152. COL_GROUP = '#COL_GROUP#' , COL_USER = '#COL_USER#' ,
  153. DIRECTOR_QUANTITY = '#DIRECTOR_QUANTITY#' ,
  154. QUALIFIED_TONS = '#QUALIFIED_TONS#' ,
  155. WASTE_QUANTITY = '#WASTE_QUANTITY#' ,
  156. OFFLINE_QUANTITY = '#OFFLINE_QUANTITY#' ,
  157. EXECUTIVE_PRODUCER = '#EXECUTIVE_PRODUCER#' ,
  158. UNEVEN_DEGREE = '#UNEVEN_DEGREE#',
  159. NON_ROUNDNESS = '#NON_ROUNDNESS#' ,
  160. PIPE_DIAM_MAX = '#PIPE_DIAM_MAX#' ,
  161. PIPE_DIAM_MIN = '#PIPE_DIAM_MIN#' ,
  162. PIPE_THICKNESS_MAX = '#PIPE_THICKNESS_MAX#' ,
  163. PIPE_THICKNESS_MIN = '#PIPE_THICKNESS_MIN#' ,
  164. HEAD_STRAIGHT = '#HEAD_STRAIGHT#' ,
  165. BODY_STRAIGHT = '#BODY_STRAIGHT#' , LENGTH = '#LENGTH#' ,
  166. QUALIFIED_BRANCH = '#QUALIFIED_BRANCH#' ,
  167. WEIGHT = '#WEIGHT#'
  168. WHERE LOT_NO = '#ROLL_LOT_NO#'
  169. AND JUDGE_STOVE_NO = '#HEAT_NO#'
  170. AND NVL(PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  171. AND NVL(GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  172. ]]>
  173. </query>
  174. <query id="SurFace_Insp.Node_SurFaceQuery" desc="结炉">
  175. <![CDATA[
  176. UPDATE MIL_SURFACE_RESULT
  177. SET NODE_FUR_FLAG = '#NODE_FLAG#',
  178. COL_GROUP = '#COL_GROUP#',
  179. COL_SHIFT = '#COL_SHIFT#',
  180. COL_USER = '#COL_USER#',
  181. END_TIME = SYSDATE,
  182. USER_ID = '#USER_ID#'
  183. WHERE LOT_NO = '#ROLL_LOT_NO#'
  184. AND JUDGE_STOVE_NO = '#HEAT_NO#'
  185. AND NVL(PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  186. AND NVL(GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  187. ]]>
  188. </query>
  189. <query id="SurFace_Insp.Upd_Node_SurFaceQuery" desc="改变结炉状态">
  190. <![CDATA[
  191. UPDATE MIL_PLAN
  192. SET NODE_STATUS = '#NODE_STATUS#'
  193. WHERE JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  194. AND LOT_NO = '#LOT_NO#'
  195. AND NVL(PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  196. AND NVL(GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  197. ]]>
  198. </query>
  199. <query id = "SurFace_Insp.updateGroup" desc = "结炉写班次班组">
  200. <![CDATA[
  201. DECLARE
  202. V_SEQ MIL_TESTING_RACK.SEQ%TYPE := 0;
  203. BEGIN
  204. SELECT NVL(MAX(T.SEQ), 0)
  205. INTO V_SEQ
  206. FROM MIL_QA_RACK T
  207. WHERE T.JUDGE_STOVE_NO = '#HEAT_NO#'
  208. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  209. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  210. AND T.CHANGE_FLAG = '1';
  211. UPDATE MIL_QA_RACK T
  212. SET T.COL_SHIFT = '#COL_SHIFT#', T.COL_GROUP = '#COL_GROUP#'
  213. WHERE T.JUDGE_STOVE_NO = '#HEAT_NO#'
  214. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  215. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  216. AND T.OFFLINE_FLAG = '1'
  217. AND T.COL_SHIFT IS NULL
  218. AND T.COL_GROUP IS NULL;
  219. UPDATE MIL_QA_RACK T
  220. SET T.COL_SHIFT = '#COL_SHIFT#', T.COL_GROUP = '#COL_GROUP#'
  221. WHERE T.JUDGE_STOVE_NO = '#HEAT_NO#'
  222. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  223. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  224. AND T.OFFLINE_FLAG = '0'
  225. AND T.COL_SHIFT IS NULL
  226. AND T.COL_GROUP IS NULL
  227. AND T.SEQ >= 1
  228. AND ROWNUM <= #QUALIFIED_BRANCH# - V_SEQ;
  229. UPDATE MIL_SURFACE_RESULT T
  230. SET T.COL_SHIFT = '#COL_SHIFT#', T.COL_GROUP = '#COL_GROUP#'
  231. WHERE T.JUDGE_STOVE_NO = '#HEAT_NO#'
  232. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  233. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/');
  234. END;
  235. ]]>
  236. </query>
  237. <query id = "SurFace_Insp.updatePortSample" desc = "结炉写黄狗腿那边的取样分批表">
  238. DECLARE
  239. BEGIN
  240. FOR MYROW IN (SELECT ROWNUM SEQ,T1.MAT_NO FROM (SELECT MAT_NO
  241. FROM MIL_QA_RACK T
  242. WHERE T.JUDGE_STOVE_NO = '#HEAT_NO#'
  243. AND T.RESULT_NO = '#RESULT_NO#'
  244. AND T.MAT_NO IS NOT NULL
  245. AND T.OFFLINE_FLAG = '0'
  246. AND T.STATUS = '0'
  247. ORDER BY T.SEQ ASC)T1) LOOP
  248. UPDATE PORT_MIL_BATCH_SAMPLE_RESULT T
  249. SET T.MAT_NO = MYROW.MAT_NO
  250. WHERE T.JUDGE_STOVE_NO = '#HEAT_NO#'
  251. AND T.PLAN_ID = '#RESULT_NO#'
  252. AND T.SEQ = MYROW.SEQ;
  253. END LOOP;
  254. END;
  255. </query>
  256. <query id="SurFace_Insp.SurfaceResult_query" desc="人工质检实绩信息查询">
  257. <![CDATA[
  258. SELECT
  259. RESULT_NO,
  260. JUDGE_STOVE_NO,
  261. LOT_NO,
  262. PLINE_CODE,
  263. TYPE,
  264. TARGET_DIAMETER,
  265. TARGET_THICKNESS,
  266. TARGET_LENGTH,
  267. PIPE_DIAM_MIN,
  268. PIPE_THICKNESS_MAX,
  269. PIPE_DIAM_MAX,
  270. PIPE_THICKNESS_MIN,
  271. NON_ROUNDNESS,
  272. UNEVEN_DEGREE,
  273. LENGTH,
  274. WEIGHT,
  275. DIRECTOR_QUANTITY,
  276. OFFLINE_QUANTITY,
  277. INSPECTOR,
  278. WASTE_QUANTITY,
  279. QUALIFIED_BRANCH,
  280. QUALIFIED_TONS,
  281. HEAD_STRAIGHT,
  282. BODY_STRAIGHT,
  283. ELLIPSE_DEGREE,
  284. PATTERN_NUMBER,
  285. PHY_PROPERTIES,
  286. EXECUTIVE_PRODUCER,
  287. TO_CHAR(PRODUCER_TIME, 'YYYY-MM-DD HH24:MI:SS') PRODUCER_TIME,
  288. PRODUCER_TEL,
  289. REMARK,
  290. CASE COL_MODE
  291. WHEN '0' THEN '接口采集'
  292. WHEN '1' THEN '人工录入'
  293. END AS COL_MODE,
  294. TO_CHAR(COL_TIME, 'YYYY-MM-DD HH24:MI:SS') COL_TIME,
  295. COL_USER,
  296. CASE COL_SHIFT
  297. WHEN '0' THEN '常白班'
  298. WHEN '1' THEN '早班'
  299. WHEN '2' THEN '中班'
  300. WHEN '3' THEN '晚班'
  301. END AS COL_SHIFT,
  302. CASE COL_GROUP
  303. WHEN '1' THEN '甲'
  304. WHEN '2' THEN '乙'
  305. WHEN '3' THEN '丙'
  306. WHEN '4' THEN '丁'
  307. END AS COL_GROUP,
  308. TO_CHAR(START_TIME,'YYYY-MM-SS HH24:MI:SS')START_TIME,
  309. TO_CHAR(END_TIME,'YYYY-MM-SS HH24:MI:SS')END_TIME,
  310. NODE_FUR_FLAG
  311. FROM MIL_SURFACE_RESULT WHERE
  312. PLINE_CODE=? AND
  313. COL_SHIFT=? AND
  314. COL_GROUP=? AND
  315. END_TIME BETWEEN TO_DATE(?,'YYYY-MM-DD HH24:MI:SS') AND TO_DATE(?,'YYYY-MM-DD HH24:MI:SS') AND
  316. NODE_FUR_FLAG='1'
  317. ]]>
  318. </query>
  319. <query id="SurFace_Insp.getSurfaceRackSeq" desc="质检上料管号队列">
  320. <![CDATA[
  321. SELECT
  322. SIMPLE_LOT_NO,
  323. MAT_NO,
  324. LOT_NO,
  325. STOVE_NO,
  326. JUDGE_STOVE_NO,
  327. STEELCODE,
  328. STEELNAME,
  329. GRADECODE,
  330. GRADENAME,
  331. PLINE_CODE,
  332. case STATUS when
  333. '0' then '正常轧制' when
  334. '1' then '剔除' when
  335. --'2' then '二检剔除' when
  336. '2' then '下线' when
  337. '4' then '最终下线'
  338. END AS STATUS,
  339. QA_FLAG,
  340. SCRAP_REASON,
  341. TO_CHAR(START_TIME, 'YYYY-MM-DD HH24:MI:SS') START_TIME,
  342. TO_CHAR(END_TIME, 'YYYY-MM-DD HH24:MI:SS') END_TIME,
  343. DECODE(OFFLINE_FLAG,'0','未下线','1','下线')OFFLINE_FLAG,
  344. TO_CHAR(OFFLINE_TIME, 'YYYY-MM-DD HH24:MI:SS') OFFLINE_TIME,
  345. FOLLOW_FLAG,
  346. FOLLOW_HEAT_NO,
  347. TO_CHAR(FOLLOW_TIME, 'YYYY-MM-DD HH24:MI:SS') FOLLOW_TIME,
  348. GROUP_FLAG,
  349. BEFORE_HEAT_NO,
  350. BEFORE_MAT_NO,
  351. REMARK,
  352. COL_MODE,
  353. TO_CHAR(COL_TIME, 'YYYY-MM-DD HH24:MI:SS') COL_TIME,
  354. COL_USER,
  355. case COL_GROUP
  356. WHEN '1' THEN '甲'
  357. WHEN '2' THEN '乙'
  358. WHEN '3' THEN '丙'
  359. WHEN '4' THEN '丁' end as COL_GROUP,
  360. case COL_SHIFT
  361. WHEN '0' THEN '常白班'
  362. WHEN '1' THEN '早班'
  363. WHEN '2' THEN '中班'
  364. WHEN '3' THEN '晚班'
  365. end as COL_SHIFT,
  366. SEQ,
  367. TO_CHAR(QA_TIME, 'YYYY-MM-DD HH24:MI:SS') QA_TIME,
  368. CASE CHANGE_FLAG
  369. WHEN '0' THEN ''
  370. WHEN '1' THEN '确认交班'
  371. WHEN '2' THEN '待接班确认'
  372. END AS CHANGE_FLAG,
  373. '交班'CHANGE_GROUP,
  374. '接班'TAKE_OVER
  375. FROM MIL_QA_RACK
  376. WHERE JUDGE_STOVE_NO=? order by SEQ ASC
  377. ]]>
  378. </query>
  379. <query id="SurFace_Insp.getSurfaceRackSeq1" desc="质检上料管号队列">
  380. <![CDATA[
  381. SELECT
  382. SIMPLE_LOT_NO,
  383. MAT_NO,
  384. LOT_NO,
  385. STOVE_NO,
  386. JUDGE_STOVE_NO,
  387. STEELCODE,
  388. STEELNAME,
  389. GRADECODE,
  390. GRADENAME,
  391. PLINE_CODE,
  392. case STATUS when
  393. '0' then '正常轧制' when
  394. '1' then '一检剔除' when
  395. '2' then '二检剔除' when
  396. '3' then '下线' when
  397. '4' then '最终下线'
  398. END AS STATUS,
  399. case OFFLINE_FLAG_F when
  400. '0' then '正常轧制' when
  401. '1' then '一检下线' WHEN
  402. '2' then '剔除'
  403. END AS OFFLINE_FLAG_F,
  404. QA_FLAG,
  405. SCRAP_REASON,
  406. TO_CHAR(START_TIME, 'YYYY-MM-DD HH24:MI:SS') START_TIME,
  407. TO_CHAR(END_TIME, 'YYYY-MM-DD HH24:MI:SS') END_TIME,
  408. OFFLINE_FLAG,
  409. TO_CHAR(OFFLINE_TIME, 'YYYY-MM-DD HH24:MI:SS') OFFLINE_TIME,
  410. FOLLOW_FLAG,
  411. FOLLOW_HEAT_NO,
  412. TO_CHAR(FOLLOW_TIME, 'YYYY-MM-DD HH24:MI:SS') FOLLOW_TIME,
  413. GROUP_FLAG,
  414. BEFORE_HEAT_NO,
  415. BEFORE_MAT_NO,
  416. REMARK,
  417. COL_MODE,
  418. TO_CHAR(COL_TIME, 'YYYY-MM-DD HH24:MI:SS') COL_TIME,
  419. COL_USER,
  420. case COL_GROUP
  421. WHEN '1' THEN '甲'
  422. WHEN '2' THEN '乙'
  423. WHEN '3' THEN '丙'
  424. WHEN '4' THEN '丁' end as COL_GROUP,
  425. case COL_SHIFT
  426. WHEN '0' THEN '常白班'
  427. WHEN '1' THEN '早班'
  428. WHEN '2' THEN '中班'
  429. WHEN '3' THEN '晚班'
  430. end as COL_SHIFT,
  431. SEQ,
  432. TO_CHAR(QA_TIME, 'YYYY-MM-DD HH24:MI:SS') QA_TIME
  433. FROM MIL_QA_RACK
  434. WHERE JUDGE_STOVE_NO=? order by OFFLINE_FLAG_F desc
  435. ]]>
  436. </query>
  437. <query id="SurFace_Insp.PipeDefectQuery" desc="管号队列缺陷项查询">
  438. <![CDATA[
  439. SELECT
  440. DEFECT_NAME1,
  441. DEFECT_NAME2,
  442. DEFECT_NAME3,
  443. DEFECT_NAME4,
  444. DEFECT_NAME5
  445. FROM MIL_QA_DEFECT
  446. WHERE
  447. JUDGE_STOVE_NO = ?
  448. and RESULT_NO = ?
  449. and SAMPLE_PIPE_SEQ = ?
  450. and FLAG = ?
  451. ]]>
  452. </query>
  453. <query id="SurFace_Insp.AddMIL_QA_DEFECT" desc="抽检表插入">
  454. <![CDATA[
  455. insert into MIL_QA_DEFECT
  456. (
  457. JUDGE_STOVE_NO,
  458. SAMPLE_PIPE_NO,
  459. DEFECT,
  460. SAMPLE_PIPE_SEQ
  461. )
  462. values
  463. (
  464. '#JUDGE_STOVE_NO#',
  465. '#SAMPLE_PIPE_NO#',
  466. '#DEFECT#',
  467. '#SAMPLE_PIPE_SEQ#'
  468. )
  469. ]]>
  470. </query>
  471. <query id="SurFace_Insp.getDefect" desc="获取质检缺陷项列表">
  472. <![CDATA[
  473. select * from MIL_QA_DEFECT where JUDGE_STOVE_NO=? order by SAMPLE_PIPE_SEQ,DEFECT,defect
  474. ]]>
  475. </query>
  476. <query id="SurFace_Insp.UpdateSurfaceResultNumF" desc="抽检后更新质检实绩信息 总检量,合格支,合格吨,废品量,下线量,重量系数">
  477. <![CDATA[
  478. UPDATE MIL_SURFACE_RESULT T
  479. SET T.DIRECTOR_QUANTITY = '#DIRECTOR_QUANTITY#',
  480. T.OFFLINE_QUANTITY = '#OFFLINE_QUANTITY#',
  481. T.INSPECTOR = '#INSPECTOR#',
  482. T.WASTE_QUANTITY = '#WASTE_QUANTITY#',
  483. T.QUALIFIED_BRANCH = '#QUALIFIED_BRANCH#',
  484. T.QUALIFIED_TONS = '#QUALIFIED_TONS#',
  485. T.HEIGHT_RATE = '#HEIGHT_RATE#'
  486. WHERE T.RESULT_NO = '#RESULT_NO#'
  487. AND T.JUDGE_STOVE_NO = '#HEAT_NO#'
  488. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  489. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  490. ]]>
  491. </query>
  492. <query id="SurFace_Insp.UpdateSurfaceResultNumS" desc="抽检后更新质检实绩信息 总检量,合格支,合格吨,废品量,下线量,重量系数">
  493. <![CDATA[
  494. UPDATE MIL_SURFACE_RESULT T
  495. SET T.DIRECTOR_QUANTITY = '#DIRECTOR_QUANTITY#',
  496. T.OFFLINE_QUANTITY = '#OFFLINE_QUANTITY#',
  497. T.INSPECTOR = '#INSPECTOR#',
  498. T.WASTE_QUANTITY = '#WASTE_QUANTITY#',
  499. T.QUALIFIED_BRANCH = '#QUALIFIED_BRANCH#',
  500. T.QUALIFIED_TONS = '#QUALIFIED_TONS#',
  501. T.HEIGHT_RATE = '#HEIGHT_RATE#'
  502. WHERE T.RESULT_NO = '#RESULT_NO#'
  503. AND T.JUDGE_STOVE_NO = '#HEAT_NO#'
  504. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  505. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  506. ]]>
  507. </query>
  508. <query id="SurFace_Insp.UpdMIL_QA_DEFECT" desc="修改质检结果">
  509. <![CDATA[
  510. UPDATE MIL_QA_DEFECT SET
  511. IS_QUELIFIED='#IS_QUELIFIED#'
  512. WHERE
  513. JUDGE_STOVE_NO='#JUDGE_STOVE_NO#' AND
  514. SAMPLE_PIPE_SEQ='#SAMPLE_PIPE_SEQ#' AND
  515. DEFECT='#DEFECT#'
  516. ]]>
  517. </query>
  518. <query id="SurFace_Insp.getDefect_by_MIL_QA_DEFECT" desc="查询上料管号缺陷项抽检记录">
  519. <![CDATA[
  520. select DEFECT,
  521. CASE IS_QUELIFIED
  522. WHEN 0 THEN '不合格'
  523. WHEN 1 THEN '合格'
  524. END AS IS_QUELIFIED
  525. from MIL_QA_DEFECT where JUDGE_STOVE_NO='#JUDGE_STOVE_NO#' AND SAMPLE_PIPE_SEQ='#SAMPLE_PIPE_SEQ#'
  526. ]]>
  527. </query>
  528. <query id="SurFace_Insp.getMIL_SIZE_CHECK_DEATIL" desc="几何尺寸抽查记录">
  529. <![CDATA[
  530. select * from mil_size_check_deatil where JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  531. ]]>
  532. </query>
  533. <query id="SurFace_Insp.getDefect_statistics" desc="抽检统计">
  534. <![CDATA[
  535. select defect,sum(IS_QUELIFIED) as QUELIFIED,(count(defect)-sum(IS_QUELIFIED)) as unQUELIFIED,count(defect) from mil_qa_defect t where judge_stove_no=? group by defect
  536. ]]>
  537. </query>
  538. <query id="SurFace_Insp.Upd_MIL_SIZE_CHECK_DEATIL" desc="新增几何尺寸抽查记录">
  539. <![CDATA[
  540. INSERT INTO MIL_SIZE_CHECK_DEATIL
  541. (RESULT_NO,
  542. JUDGE_STOVE_NO,
  543. SAMPLE_PIPE_NO,
  544. D1,
  545. D2,
  546. S1,
  547. S2,
  548. S3,
  549. S4,
  550. NON_ROUNDNESS,
  551. UNEVEN_DEGREE,
  552. LOCATION,
  553. SAMPLE_PIPE_SEQ,
  554. PRO_PLAN_ID,
  555. GX_PLAN_NO)
  556. VALUES
  557. ('#RESULT_NO#',
  558. '#JUDGE_STOVE_NO#',
  559. '#SAMPLE_PIPE_NO#',
  560. '#D1#',
  561. '#D2#',
  562. '#S1#',
  563. '#S2#',
  564. '#S3#',
  565. '#S4#',
  566. '#NON_ROUNDNESS#',
  567. '#UNEVEN_DEGREE#',
  568. '#LOCATION#',
  569. '#SAMPLE_PIPE_SEQ#',
  570. '#PRO_PLAN_ID#',
  571. '#GX_PLAN_NO#')
  572. ]]>
  573. </query>
  574. <query id="SurFace_Insp.AddMilSizeCheckDeatilEntity" desc="更新几何尺寸抽查记录">
  575. <![CDATA[
  576. INSERT INTO MIL_SIZE_CHECK_DEATIL
  577. (
  578. JUDGE_STOVE_NO,
  579. SAMPLE_PIPE_NO,
  580. SAMPLE_PIPE_SEQ
  581. )
  582. VALUES
  583. (
  584. '#JUDGE_STOVE_NO#',
  585. '#SAMPLE_PIPE_NO#',
  586. '#SAMPLE_PIPE_SEQ#'
  587. )
  588. ]]>
  589. </query>
  590. <query id="SurFace_Insp.get_Chk_Active" desc="获取上料表选中的抽检项">
  591. <![CDATA[
  592. select * from MIL_QA_DEFECT where JUDGE_STOVE_NO=?
  593. ]]>
  594. </query>
  595. <query id="SurFace_Insp.DelMIL_QA_DEFECT" desc="删除质检缺陷项表相应炉号记录">
  596. <![CDATA[
  597. delete from MIL_QA_DEFECT Where JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  598. ]]>
  599. </query>
  600. <query id="SurFace_Insp.DelMilSizeCheckDeatilEntity" desc="删除相应炉号的管号抽检项">
  601. <![CDATA[
  602. delete from MIL_SIZE_CHECK_DEATIL Where JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  603. ]]>
  604. </query>
  605. <query id="SurFace_Insp.Upd_MIL_SURFACE_RESULT_ChkRate" desc="保存抽检率到质检表MIL_SURFACE_RESULT">
  606. <![CDATA[
  607. Update MIL_SURFACE_RESULT set SIMPLE_RATE='#SIMPLE_RATE#' Where JUDGE_STOVE_NO='#HEAT_NO#'
  608. ]]>
  609. </query>
  610. <query id="SurFace_Insp.update_SurFace_QUALIFIED_BRANCH" desc="更新质检合格支">
  611. <![CDATA[
  612. Update MIL_SURFACE_RESULT set QUALIFIED_BRANCH=? Where JUDGE_STOVE_NO=?
  613. ]]>
  614. </query>
  615. <query id="SurFace_Insp.getMIL_CHECK_DEATIL" desc="查询质检抽检数据">
  616. <![CDATA[
  617. select * from mil_check_deatil where JUDGE_STOVE_NO=?
  618. ]]>
  619. </query>
  620. <query id="SurFace_Insp.SaveMIL_CHECK_DEATIL" desc="更新质检抽检数据">
  621. <![CDATA[
  622. Update MIL_CHECK_DEATIL set WASTE_BRANCH='#WASTE_BRANCH#',WASTE_TONS='#WASTE_TONS#',OFFLINE_PRODUCT='#OFFLINE_PRODUCT#'
  623. Where JUDGE_STOVE_NO='#JUDGE_STOVE_NO#' and DEFECT_ITEM='#DEFECT_ITEM#'
  624. ]]>
  625. </query>
  626. <query id="SurFace_Insp.getMIL_CHECK_DEATIL_Statictis" desc="统计废品量">
  627. <![CDATA[
  628. select sum(WASTE_BRANCH) WASTE_BRANCH ,sum(OFFLINE_PRODUCT) OFFLINE_PRODUCT from mil_check_deatil where JUDGE_STOVE_NO=?
  629. ]]>
  630. </query>
  631. <query id="SurFace_Insp.getMIL_MT_RESULT" desc="查询MT总检量">
  632. <![CDATA[
  633. select QUALIFIED_NUM from mil_mt_result where JUDGE_STOVE_NO=? and NODE_FUR_FLAG='1'
  634. ]]>
  635. </query>
  636. <query id="SurFace_Insp.getMIL_ET_RESULT" desc="查询ET总检量">
  637. <![CDATA[
  638. select QUALIFIED_NUM from mil_et_result where JUDGE_STOVE_NO=? and NODE_FUR_FLAG='1'
  639. ]]>
  640. </query>
  641. <query id="SurFace_Insp.getMIL_BASE_DEFECT_ITEM" desc="查询缺陷项信息">
  642. <![CDATA[
  643. select DEFECT_ITEM_CODE,DEFECT_ITEM_NAME,decode(defect_level,'0','常用','1','不常用') defect_level from mil_base_defect_item t
  644. ]]>
  645. </query>
  646. <query id="SurFace_Insp.AddMIL_BASE_DEFECT_ITEM" desc="添加缺陷项">
  647. <![CDATA[
  648. insert into MIL_BASE_DEFECT_ITEM values(?,?,?,?)
  649. ]]>
  650. </query>
  651. <query id="SurFace_Insp.UpdMIL_BASE_DEFECT_ITEM" desc="更新缺陷项">
  652. <![CDATA[
  653. update mil_base_defect_item set DEFECT_ITEM_CODE=?, DEFECT_ITEM_NAME=?,DEFECT_LEVEL=?,PLINE_CODE=? where DEFECT_ITEM_CODE=?
  654. ]]>
  655. </query>
  656. <query id="SurFace_Insp.DelMIL_BASE_DEFECT_ITEM" desc="删除缺陷项">
  657. <![CDATA[
  658. delete from mil_base_defect_item where DEFECT_ITEM_CODE=?
  659. ]]>
  660. </query>
  661. <query id="SurFace_Insp.getMIL_BASE_INSPECTOR" desc="查询质检员信息">
  662. <![CDATA[
  663. select INSPECTOR_CODE,INSPECTOR_NAME,PLINE_CODE,decode(COL_SHIFT,'0','早','1','中','2','晚') COL_SHIFT,decode(COL_GROUP,'0','甲','1','乙','2','丙','3','丁') COL_GROUP from mil_base_inspector t
  664. ]]>
  665. </query>
  666. <query id="SurFace_Insp.AddMIL_BASE_INSPECTOR" desc="添加质检员">
  667. <![CDATA[
  668. insert into mil_base_inspector values(?,?,?,?,?)
  669. ]]>
  670. </query>
  671. <query id="SurFace_Insp.UpdMIL_BASE_INSPECTOR" desc="更新质检员">
  672. <![CDATA[
  673. update mil_base_inspector set INSPECTOR_CODE=?, INSPECTOR_NAME=?,COL_SHIFT=?,COL_GROUP=?,PLINE_CODE=? where INSPECTOR_CODE=?
  674. ]]>
  675. </query>
  676. <query id="SurFace_Insp.DelMIL_BASE_INSPECTOR" desc="删除质检员">
  677. <![CDATA[
  678. delete from mil_base_inspector where INSPECTOR_CODE=?
  679. ]]>
  680. </query>
  681. <query id="SurFace_Insp.DelMIL_CHECK_DEATIL" desc="删除相应炉号的抽检项">
  682. <![CDATA[
  683. delete from MIL_CHECK_DEATIL where JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  684. ]]>
  685. </query>
  686. <query id="SurFace_Insp.InsMIL_QA_DEFECT" desc="添加相应炉号的抽检项">
  687. <![CDATA[
  688. insert into MIL_CHECK_DEATIL values('#JUDGE_STOVE_NO#','#DEFECT_ITEM#','#WASTE_BRANCH#','#WASTE_TONS#','#OFFLINE_PRODUCT#','#DEFECT_CODE#')
  689. ]]>
  690. </query>
  691. <query id="SurFace_Insp.checkedDefectItemQuery" desc="缺陷项查询">
  692. <![CDATA[
  693. select t.basename,
  694. t.basecode,
  695. t.sortcode,
  696. '添加' ADD_ITEM,
  697. '0' WASTENUM,
  698. '0' OFFNUM,
  699. case t.memo
  700. WHEN '0' THEN
  701. '常用'
  702. WHEN '1' THEN
  703. '不常用'
  704. END AS memo
  705. from com_base_info t
  706. where t.SORTCODE = 5003
  707. AND T.VALIDFLAG = '1'
  708. and t.memo || '&' LIKE '%' || ? || '%'
  709. and t.basename || '&' LIKE '%' || ? || '%'
  710. ]]>
  711. </query>
  712. <query id="SurFace_Insp.ItemQuery" desc="缺陷项查询">
  713. <![CDATA[
  714. SELECT DEFECT_ITEM,
  715. WASTE_BRANCH,
  716. WASTE_TONS,
  717. OFFLINE_PRODUCT,
  718. DEFECT_CODE,
  719. SUM(NVL(WASTE_BRANCH, 0)) TWASTE_BRANCH,
  720. SUM(NVL(WASTE_TONS, 0)) TWASTE_TONS,
  721. SUM(NVL(OFFLINE_PRODUCT, 0)) TOFFLINE_PRODUCT,
  722. JUDGE_STOVE_NO
  723. FROM MIL_CHECK_DEATIL_SIMPLE
  724. WHERE JUDGE_STOVE_NO = ?
  725. AND RESULT_NO = ?
  726. GROUP BY DEFECT_ITEM,
  727. WASTE_BRANCH,
  728. WASTE_TONS,
  729. OFFLINE_PRODUCT,
  730. DEFECT_CODE,
  731. JUDGE_STOVE_NO
  732. ]]>
  733. </query>
  734. <query id="SurFace_Insp.SizeCheckQuery" desc="查询抽检管记录">
  735. <![CDATA[
  736. SELECT a.SAMPLE_PIPE_NO,
  737. a.D1,
  738. a.D2,
  739. a.S1,
  740. a.S2,
  741. a.S3,
  742. a.S4,
  743. A.NON_ROUNDNESS,
  744. A.UNEVEN_DEGREE,
  745. --case a.LOCATION
  746. --WHEN '1' THEN '管体'
  747. --WHEN '0' THEN '管端'
  748. --END AS LOCATION,
  749. a.LOCATION,
  750. a.SAMPLE_PIPE_SEQ,
  751. '删除' AS BTN_DELETE
  752. FROM MIL_SIZE_CHECK_DEATIL a
  753. WHERE a.JUDGE_STOVE_NO || '&' LIKE '%' || ? || '%'
  754. AND NVL(A.PRO_PLAN_ID, '/') = NVL(?, '/')
  755. AND NVL(A.GX_PLAN_NO, '/') = NVL(?, '/')
  756. --and a.result_no = ?
  757. ]]>
  758. </query>
  759. <query id="SurFace_Insp.checkMatNoQuery" desc="查询质检管号队列">
  760. <![CDATA[
  761. SELECT a.SEQ, a.MAT_NO
  762. FROM MIL_QA_RACK a
  763. WHERE a.JUDGE_STOVE_NO = ?
  764. and a.RESULT_NO = ?
  765. AND NVL(A.PRO_PLAN_ID, '/') = NVL(?, '/')
  766. AND NVL(A.GX_PLAN_NO, '/') = NVL(?, '/')
  767. ]]>
  768. </query>
  769. <query id="SurFace_Insp.GetQAResult1" desc="查询质检实绩">
  770. <![CDATA[
  771. SELECT
  772. T.RESULT_NO,
  773. T.JUDGE_STOVE_NO,
  774. T.LOT_NO,
  775. T.PLINE_CODE,
  776. T.TYPE,
  777. T.TARGET_DIAMETER,
  778. T.TARGET_THICKNESS,
  779. T.TARGET_LENGTH,
  780. T.PIPE_DIAM_MIN,
  781. T.PIPE_THICKNESS_MAX,
  782. T.PIPE_DIAM_MAX,
  783. T.PIPE_THICKNESS_MIN,
  784. T.NON_ROUNDNESS,
  785. T.UNEVEN_DEGREE,
  786. T.LENGTH,
  787. T.WEIGHT,
  788. T.DIRECTOR_QUANTITY,
  789. T.OFFLINE_QUANTITY,
  790. T.INSPECTOR,
  791. T.WASTE_QUANTITY,
  792. T.QUALIFIED_BRANCH,
  793. T.QUALIFIED_TONS,
  794. T.HEAD_STRAIGHT,
  795. T.BODY_STRAIGHT,
  796. T.ELLIPSE_DEGREE,
  797. T.PATTERN_NUMBER,
  798. T.PHY_PROPERTIES,
  799. T.EXECUTIVE_PRODUCER,
  800. TO_CHAR(T.PRODUCER_TIME, 'YYYY-MM-DD HH24:MI:SS') PRODUCER_TIME,
  801. T.PRODUCER_TEL,
  802. T.REMARK,
  803. T.COL_MODE,
  804. TO_CHAR(T.COL_TIME, 'YYYY-MM-DD HH24:MI:SS') COL_TIME,
  805. T.COL_USER,
  806. T.COL_SHIFT,
  807. T.COL_GROUP,
  808. TO_CHAR(T.START_TIME, 'YYYY-MM-DD HH24:MI:SS') START_TIME,
  809. TO_CHAR(T.END_TIME, 'YYYY-MM-DD HH24:MI:SS') END_TIME,
  810. T.NODE_FUR_FLAG,
  811. T.SIMPLE_RATE,
  812. TO_CHAR(T.QA_TIME, 'YYYY-MM-DD HH24:MI:SS') QA_TIME,
  813. T.HEIGHT_RATE,
  814. T.DEFECT_CHECK,
  815. T.SIZE_CHECK,
  816. T.QA_TYPE,
  817. T.DIRECTOR_QUANTITY_F,
  818. T.OFFLINE_QUANTITY_F,
  819. T.INSPECTOR_F,
  820. T.WASTE_QUANTITY_F,
  821. T.QUALIFIED_BRANCH_F,
  822. T.QUALIFIED_TONS_F,
  823. T.DIRECTOR_QUANTITY_S,
  824. T.OFFLINE_QUANTITY_S,
  825. T.INSPECTOR_S,
  826. T.WASTE_QUANTITY_S,
  827. T.QUALIFIED_BRANCH_S,
  828. T.QUALIFIED_TONS_S
  829. FROM MIL_SURFACE_RESULT T
  830. WHERE
  831. T.RESULT_NO = '#RESULT_NO#'
  832. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  833. ]]>
  834. </query>
  835. <query id="SurFace_Insp.InsertDefectData" desc="缺陷项数据插入">
  836. <![CDATA[
  837. INSERT INTO MIL_CHECK_DEATIL(
  838. JUDGE_STOVE_NO,
  839. RESULT_NO,
  840. DEFECT_ITEM,
  841. WASTE_BRANCH,
  842. WASTE_TONS,
  843. OFFLINE_PRODUCT,
  844. DEFECT_CODE,
  845. FLAG)
  846. VALUES(
  847. '#JUDGE_STOVE_NO#',
  848. '#RESULT_NO#',
  849. '#DEFECT_ITEM#',
  850. '#WASTE_BRANCH#',
  851. '#WASTE_TONS#',
  852. '#OFFLINE_PRODUCT#',
  853. '#DEFECT_CODE#',
  854. '#FLAG#')
  855. ]]>
  856. </query>
  857. <query id="SurFace_Insp.InsertDefectDataSimple" desc="缺陷项数据插入">
  858. <![CDATA[
  859. INSERT INTO MIL_CHECK_DEATIL_SIMPLE(
  860. JUDGE_STOVE_NO,
  861. RESULT_NO,
  862. DEFECT_ITEM,
  863. WASTE_BRANCH,
  864. WASTE_TONS,
  865. OFFLINE_PRODUCT,
  866. SIMPLE_LOT_NO,
  867. DEFECT_CODE)
  868. VALUES(
  869. '#JUDGE_STOVE_NO#',
  870. '#RESULT_NO#',
  871. '#DEFECT_ITEM#',
  872. '#WASTE_BRANCH#',
  873. '#WASTE_TONS#',
  874. '#OFFLINE_PRODUCT#',
  875. '#SIMPLE_LOT_NO#',
  876. '#DEFECT_CODE#')
  877. ]]>
  878. </query>
  879. <query id="SurFace_Insp.DeleteDefectData" desc="缺陷项数据删除">
  880. <![CDATA[
  881. DELETE MIL_CHECK_DEATIL WHERE JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' and Result_no = '#RESULT_NO#'
  882. ]]>
  883. </query>
  884. <query id = "SurfaceInspectionResult.getDefectData" desc = "查询缺陷项">
  885. SELECT T.JUDGE_STOVE_NO,
  886. T.DEFECT_ITEM,
  887. T.WASTE_BRANCH,
  888. T.WASTE_TONS,
  889. T.SIMPLE_LOT_NO,
  890. T.OFFLINE_PRODUCT
  891. FROM MIL_CHECK_DEATIL_SIMPLE T
  892. WHERE T.JUDGE_STOVE_NO = ?
  893. </query>
  894. <query id = "SurfaceInspectionResult.doInsetDefectData" desc = "登记缺陷项">
  895. <![CDATA[
  896. DECLARE
  897. V_COUNT MIL_OFFLINE_RESLUT.OFFLINE_NUM%TYPE := NULL;
  898. V_JUDGE_STOVE_NO MIL_OFFLINE_RESLUT.JUDGE_STOVE_NO%TYPE := ?;
  899. V_PRO_PLAN_ID MIL_OFFLINE_RESLUT.PRO_PLAN_ID%TYPE := ?;
  900. V_GX_PLAN_NO MIL_OFFLINE_RESLUT.GX_PLAN_NO%TYPE := ?;
  901. BEGIN
  902. INSERT INTO MIL_CHECK_DEATIL_SIMPLE
  903. (JUDGE_STOVE_NO,
  904. DEFECT_ITEM,
  905. WASTE_BRANCH,
  906. WASTE_TONS,
  907. OFFLINE_PRODUCT,
  908. DEFECT_CODE,
  909. RESULT_NO,
  910. SIMPLE_LOT_NO,
  911. PRO_PLAN_ID,
  912. GX_PLAN_NO)
  913. VALUES
  914. (V_JUDGE_STOVE_NO, ?, ?, ?, ?, ?, ?, '', V_PRO_PLAN_ID, V_GX_PLAN_NO);
  915. UPDATE MIL_SURFACE_RESULT T
  916. SET T.OFFLINE_QUANTITY = TO_NUMBER(T.OFFLINE_QUANTITY) + TO_NUMBER(?),
  917. T.WASTE_QUANTITY = TO_NUMBER(T.WASTE_QUANTITY) + TO_NUMBER(?)
  918. WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  919. AND NVL(T.PRO_PLAN_ID, '/') = NVL(V_PRO_PLAN_ID, '/')
  920. AND NVL(T.GX_PLAN_NO, '/') = NVL(V_GX_PLAN_NO, '/');
  921. FOR MYROWOFFLINE IN (SELECT *
  922. FROM (SELECT T.SEQ,
  923. T.JUDGE_STOVE_NO,
  924. TO_NUMBER(DECODE(T.SEQ,
  925. '1',
  926. '9999',
  927. '2',
  928. '9999',
  929. T.SEQ)) RN
  930. FROM MIL_QA_RACK T
  931. WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  932. --AND T.COL_SHIFT IS NULL
  933. --AND T.COL_GROUP IS NULL
  934. AND T.OFFLINE_FLAG = '0'
  935. AND T.STATUS = '0'
  936. ORDER BY NVL(T.MAT_NO, 0) DESC, RN)
  937. WHERE ROWNUM <= ?) LOOP
  938. UPDATE MIL_QA_RACK T
  939. SET T.OFFLINE_FLAG = '1', T.STATUS = '2'
  940. WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  941. AND NVL(T.PRO_PLAN_ID, '/') = NVL(V_PRO_PLAN_ID, '/')
  942. AND NVL(T.GX_PLAN_NO, '/') = NVL(V_GX_PLAN_NO, '/')
  943. AND T.SEQ = MYROWOFFLINE.SEQ;
  944. INSERT INTO MIL_SLAB_SCRAP_SEQ
  945. (JUDGE_STOVE_NO,
  946. PROCESS_NO,
  947. SEQ,
  948. TIME,
  949. FLAG,
  950. REMARK,
  951. COL_MODE,
  952. COL_TIME,
  953. COL_USER,
  954. COL_SHIFT,
  955. COL_GROUP,
  956. COL_NO,
  957. COL_TYPE,
  958. PRO_PLAN_ID,
  959. GX_PLAN_NO)
  960. VALUES
  961. (MYROWOFFLINE.JUDGE_STOVE_NO,
  962. '11',
  963. MYROWOFFLINE.SEQ,
  964. SYSDATE,
  965. '0',
  966. '',
  967. '1',
  968. SYSDATE,
  969. ?,
  970. ?,
  971. ?,
  972. '0',
  973. '1',
  974. V_PRO_PLAN_ID,
  975. V_GX_PLAN_NO);
  976. END LOOP;
  977. FOR MYROWSCRAP IN (SELECT *
  978. FROM (SELECT T.SEQ,
  979. T.JUDGE_STOVE_NO,
  980. TO_NUMBER(DECODE(T.SEQ,
  981. '1',
  982. '9999',
  983. '2',
  984. '9999',
  985. T.SEQ)) RN
  986. FROM MIL_QA_RACK T
  987. WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  988. AND NVL(T.PRO_PLAN_ID, '/') =
  989. NVL(V_PRO_PLAN_ID, '/')
  990. AND NVL(T.GX_PLAN_NO, '/') =
  991. NVL(V_GX_PLAN_NO, '/')
  992. --AND T.COL_SHIFT IS NULL
  993. --AND T.COL_GROUP IS NULL
  994. AND T.OFFLINE_FLAG = '0'
  995. AND T.STATUS = '0'
  996. ORDER BY NVL(T.MAT_NO, 0) DESC, RN)
  997. WHERE ROWNUM <= ?) LOOP
  998. UPDATE MIL_QA_RACK T
  999. SET T.STATUS = '1'
  1000. WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  1001. AND NVL(T.PRO_PLAN_ID, '/') = NVL(V_PRO_PLAN_ID, '/')
  1002. AND NVL(T.GX_PLAN_NO, '/') = NVL(V_GX_PLAN_NO, '/')
  1003. AND T.SEQ = MYROWSCRAP.SEQ;
  1004. INSERT INTO MIL_SLAB_SCRAP_SEQ
  1005. (JUDGE_STOVE_NO,
  1006. PROCESS_NO,
  1007. SEQ,
  1008. TIME,
  1009. FLAG,
  1010. REMARK,
  1011. COL_MODE,
  1012. COL_TIME,
  1013. COL_USER,
  1014. COL_SHIFT,
  1015. COL_GROUP,
  1016. COL_NO,
  1017. COL_TYPE,
  1018. PRO_PLAN_ID,
  1019. GX_PLAN_NO)
  1020. VALUES
  1021. (MYROWSCRAP.JUDGE_STOVE_NO,
  1022. '11',
  1023. MYROWSCRAP.SEQ,
  1024. SYSDATE,
  1025. '0',
  1026. '',
  1027. '1',
  1028. SYSDATE,
  1029. ?,
  1030. ?,
  1031. ?,
  1032. '0',
  1033. '0',
  1034. V_PRO_PLAN_ID,
  1035. V_GX_PLAN_NO);
  1036. END LOOP;
  1037. IF (to_number(?) > 0) THEN
  1038. SELECT COUNT(1)
  1039. INTO V_COUNT
  1040. FROM MIL_OFFLINE_RESLUT T
  1041. WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  1042. AND NVL(T.PRO_PLAN_ID, '/') = NVL(V_PRO_PLAN_ID, '/')
  1043. AND NVL(T.GX_PLAN_NO, '/') = NVL(V_GX_PLAN_NO, '/')
  1044. AND T.STATUS = '0'
  1045. AND T.OFFLINE_PRO = 'ZJ';
  1046. IF (V_COUNT > 0) THEN
  1047. UPDATE MIL_OFFLINE_RESLUT T
  1048. SET T.OFFLINE_NUM = TO_NUMBER(T.OFFLINE_NUM) + TO_NUMBER(?)
  1049. WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  1050. AND NVL(T.PRO_PLAN_ID, '/') = NVL(V_PRO_PLAN_ID, '/')
  1051. AND NVL(T.GX_PLAN_NO, '/') = NVL(V_GX_PLAN_NO, '/')
  1052. AND T.STATUS = '0'
  1053. AND T.OFFLINE_PRO = 'ZJ';
  1054. ELSE
  1055. FOR MYROW IN (SELECT *
  1056. FROM MIL_PLAN T
  1057. WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  1058. AND NVL(T.PRO_PLAN_ID, '/') = NVL(V_PRO_PLAN_ID, '/')
  1059. AND NVL(T.GX_PLAN_NO, '/') = NVL(V_GX_PLAN_NO, '/')) LOOP
  1060. INSERT INTO MIL_OFFLINE_RESLUT
  1061. (RECHECK_NUM,
  1062. PRODUCNAME,
  1063. STEELCODE,
  1064. STEELNAME,
  1065. GRADECODE,
  1066. GRADENAME,
  1067. SPEC_CODE,
  1068. SPEC_NAME,
  1069. MODEL_CODE,
  1070. MODEL_DESC,
  1071. STD_CODE,
  1072. STD_NAME,
  1073. STD_STYLE,
  1074. STD_STYLE_DESC,
  1075. ACT_LEN_RANGE,
  1076. CONTRACT_NO,
  1077. PRODUCCODE,
  1078. INSTORAGE_NUM,
  1079. QUALIFIED_NUM,
  1080. SCRAP_NUM,
  1081. ZP_M_LH,
  1082. LOT_NO,
  1083. STOVE_NO,
  1084. JUDGE_STOVE_NO,
  1085. DIAMETER,
  1086. THICKNESS,
  1087. LENGTH,
  1088. PLINE_CODE,
  1089. OFFLINE_PRO,
  1090. REAL_TIME_STATUS,
  1091. OFFLINE_NUM,
  1092. BACKLINE_NUM,
  1093. GROUP_NUM,
  1094. FINAL_NUM,
  1095. ZP_FLAG,
  1096. STATUS,
  1097. TYPE_FLAG,
  1098. OFFLINE_TIME,
  1099. REMARK,
  1100. COL_USER,
  1101. COL_SHIFT,
  1102. COL_GROUP,
  1103. ZP_HEIGHT,
  1104. TARGET,
  1105. IMP_PROCESS,
  1106. PRO_PLAN_ID,
  1107. GX_PLAN_NO,
  1108. OFFLINE_DOC,
  1109. LOAD_JUDGE_STOVE_NO)
  1110. VALUES
  1111. ('0',
  1112. MYROW.VARIETIES,
  1113. MYROW.STEELCODE,
  1114. MYROW.STEELNAME,
  1115. MYROW.GRADECODE,
  1116. MYROW.GRADENAME,
  1117. MYROW.PIPE_SIZE_CODE,
  1118. REPLACE(MYROW.PIPE_SIZE, '*', 'x'),
  1119. MYROW.BUCKLE_TYPE_CODE,
  1120. MYROW.BUCKLE_TYPE,
  1121. MYROW.ROLL_STANDRAD_CODE,
  1122. MYROW.ROLL_STANDRAD,
  1123. MYROW.STD_STYLE,
  1124. MYROW.STD_STYLE_DESC,
  1125. MYROW.LENGTH_RANGE,
  1126. MYROW.CONTRACT_NO,
  1127. MYROW.VARIETIES_CODE,
  1128. '0',
  1129. '0',
  1130. '0',
  1131. '',
  1132. MYROW.LOT_NO,
  1133. MYROW.STOVE_NO,
  1134. MYROW.JUDGE_STOVE_NO,
  1135. SUBSTR(MYROW.PIPE_SIZE, 0, INSTR(MYROW.PIPE_SIZE, '*') - 1),
  1136. SUBSTR(MYROW.PIPE_SIZE, INSTR(MYROW.PIPE_SIZE, '*') + 1),
  1137. MYROW.TARGET_LENGTH,
  1138. MYROW.PLINE_CODE,
  1139. 'ZJ',
  1140. '0',
  1141. ?,
  1142. '0',
  1143. '0',
  1144. '0',
  1145. '0',
  1146. '0',
  1147. '0',
  1148. SYSDATE,
  1149. '',
  1150. ?,
  1151. ?,
  1152. ?,
  1153. to_number(substr(0.02466 *
  1154. SUBSTR(MYROW.PIPE_SIZE,
  1155. INSTR(MYROW.PIPE_SIZE, '*') + 1) *
  1156. (SUBSTR(MYROW.PIPE_SIZE,
  1157. 0,
  1158. INSTR(MYROW.PIPE_SIZE, '*') - 1) -
  1159. SUBSTR(MYROW.PIPE_SIZE,
  1160. INSTR(MYROW.PIPE_SIZE, '*') + 1)) / 1000,
  1161. 0,
  1162. instr(0.02466 *
  1163. SUBSTR(MYROW.PIPE_SIZE,
  1164. INSTR(MYROW.PIPE_SIZE, '*') + 1) *
  1165. (SUBSTR(MYROW.PIPE_SIZE,
  1166. 0,
  1167. INSTR(MYROW.PIPE_SIZE, '*') - 1) -
  1168. SUBSTR(MYROW.PIPE_SIZE,
  1169. INSTR(MYROW.PIPE_SIZE, '*') + 1)) / 1000,
  1170. '.') + 3)) * to_number(?) *
  1171. to_number(MYROW.TARGET_LENGTH),
  1172. MYROW.TARGET,
  1173. MYROW.IMP_PROCESS,
  1174. V_PRO_PLAN_ID,
  1175. V_GX_PLAN_NO,
  1176. ?,
  1177. MYROW.FEED_HEAT_NO);
  1178. END LOOP;
  1179. END IF;
  1180. END IF;
  1181. END;
  1182. ]]>
  1183. </query>
  1184. <query id = "doInsetDefectData.selectDefect" desc = "查询是否已存在该缺陷">
  1185. SELECT NVL(COUNT(1), 0) ACOUNT
  1186. FROM MIL_CHECK_DEATIL_SIMPLE T
  1187. WHERE T.JUDGE_STOVE_NO = ?
  1188. AND T.DEFECT_CODE = ?
  1189. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  1190. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  1191. </query>
  1192. <query id = "SurfaceInspectionResult.doDeleteDefect" desc = "移除缺陷项">
  1193. <![CDATA[
  1194. DECLARE
  1195. V_COUNT MIL_OFFLINE_RESLUT.OFFLINE_NUM%TYPE := NULL;
  1196. V_COUNT2 MIL_OFFLINE_RESLUT.OFFLINE_NUM%TYPE := NULL;
  1197. V_JUDGE_STOVE_NO MIL_CHECK_DEATIL_SIMPLE.JUDGE_STOVE_NO%TYPE := ?;
  1198. V_DEFECT_CODE MIL_CHECK_DEATIL_SIMPLE.DEFECT_CODE%TYPE := ?;
  1199. V_OFFLINE_QUANTITY MIL_CHECK_DEATIL_SIMPLE.OFFLINE_PRODUCT%TYPE := ?;
  1200. V_WASTE_QUANTITY MIL_CHECK_DEATIL_SIMPLE.WASTE_BRANCH%TYPE := ?;
  1201. BEGIN
  1202. SELECT TO_NUMBER(OFFLINE_PRODUCT) - TO_NUMBER(V_OFFLINE_QUANTITY)
  1203. INTO V_COUNT2
  1204. FROM MIL_CHECK_DEATIL_SIMPLE T
  1205. WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  1206. AND T.DEFECT_CODE = V_DEFECT_CODE;
  1207. IF (V_COUNT2 > 0) THEN
  1208. UPDATE MIL_CHECK_DEATIL_SIMPLE T
  1209. SET T.OFFLINE_PRODUCT = TO_NUMBER(T.OFFLINE_PRODUCT) -
  1210. TO_NUMBER(V_OFFLINE_QUANTITY),
  1211. T.WASTE_BRANCH = TO_NUMBER(T.WASTE_BRANCH) -
  1212. TO_NUMBER(V_OFFLINE_QUANTITY)
  1213. WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  1214. AND T.DEFECT_CODE = V_DEFECT_CODE;
  1215. ELSE
  1216. DELETE FROM MIL_CHECK_DEATIL_SIMPLE T
  1217. WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  1218. AND T.DEFECT_CODE = V_DEFECT_CODE;
  1219. END IF;
  1220. UPDATE MIL_SURFACE_RESULT T
  1221. SET T.OFFLINE_QUANTITY = TO_NUMBER(T.OFFLINE_QUANTITY) -
  1222. TO_NUMBER(V_OFFLINE_QUANTITY),
  1223. T.WASTE_QUANTITY = TO_NUMBER(T.WASTE_QUANTITY) -
  1224. TO_NUMBER(V_OFFLINE_QUANTITY)
  1225. WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO;
  1226. UPDATE MIL_OFFLINE_RESLUT T
  1227. SET T.OFFLINE_NUM = TO_NUMBER(T.OFFLINE_NUM) -
  1228. TO_NUMBER(V_OFFLINE_QUANTITY),
  1229. T.ZP_HEIGHT = TO_NUMBER(T.ZP_HEIGHT) -
  1230. TO_NUMBER(TO_NUMBER(T.ZP_HEIGHT) *
  1231. TO_NUMBER(V_OFFLINE_QUANTITY) /
  1232. TO_NUMBER(T.OFFLINE_NUM))
  1233. WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  1234. AND T.OFFLINE_PRO = 'ZJ'
  1235. AND T.STATUS = '0';
  1236. IF (V_OFFLINE_QUANTITY > 0) THEN
  1237. FOR OFFROW IN (SELECT *
  1238. FROM (SELECT T.SEQ
  1239. FROM MIL_SLAB_SCRAP_SEQ T
  1240. WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  1241. AND T.PROCESS_NO = '11'
  1242. AND T.COL_TYPE = '1'
  1243. ORDER BY T.SEQ DESC)
  1244. WHERE ROWNUM <= V_OFFLINE_QUANTITY) LOOP
  1245. UPDATE MIL_QA_RACK T
  1246. SET T.OFFLINE_FLAG = '0', T.STATUS = '0'
  1247. WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  1248. AND T.SEQ = OFFROW.SEQ;
  1249. DELETE FROM MIL_SLAB_SCRAP_SEQ T
  1250. WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  1251. AND T.SEQ = OFFROW.SEQ;
  1252. END LOOP;
  1253. END IF;
  1254. IF (V_WASTE_QUANTITY > 0) THEN
  1255. FOR SCRAPROW IN (SELECT *
  1256. FROM (SELECT T.SEQ
  1257. FROM MIL_SLAB_SCRAP_SEQ T
  1258. WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  1259. AND T.PROCESS_NO = '11'
  1260. AND T.COL_TYPE = '0'
  1261. ORDER BY T.SEQ DESC)
  1262. WHERE ROWNUM <= V_WASTE_QUANTITY) LOOP
  1263. UPDATE MIL_QA_RACK T
  1264. SET T.STATUS = '0'
  1265. WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  1266. AND T.SEQ = SCRAPROW.SEQ;
  1267. DELETE FROM MIL_SLAB_SCRAP_SEQ T
  1268. WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  1269. AND T.SEQ = SCRAPROW.SEQ;
  1270. END LOOP;
  1271. END IF;
  1272. IF (V_OFFLINE_QUANTITY > 0) THEN
  1273. SELECT T.OFFLINE_NUM
  1274. INTO V_COUNT
  1275. FROM MIL_OFFLINE_RESLUT T
  1276. WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  1277. AND T.STATUS = '0'
  1278. AND T.OFFLINE_PRO = 'ZJ';
  1279. IF (V_COUNT = 0) THEN
  1280. DELETE FROM MIL_OFFLINE_RESLUT T
  1281. WHERE JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  1282. AND T.STATUS = '0'
  1283. AND OFFLINE_PRO = 'ZJ';
  1284. END IF;
  1285. END IF;
  1286. END;
  1287. ]]>
  1288. </query>
  1289. <query id = "SurfaceInspectionResult.getTestingResult" desc = "查询探伤是否已结炉支数验证">
  1290. SELECT NODE_FUR_FLAG, QUALIFIED_NUM
  1291. FROM (SELECT T.NODE_FUR_FLAG, T.QUALIFIED_NUM
  1292. FROM MIL_MT_RESULT T
  1293. WHERE T.JUDGE_STOVE_NO = ?
  1294. AND T.LOT_NO = ?
  1295. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  1296. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  1297. UNION ALL
  1298. SELECT T.NODE_FUR_FLAG, T.QUALIFIED_NUM
  1299. FROM MIL_ET_RESULT T
  1300. WHERE T.JUDGE_STOVE_NO = ?
  1301. AND T.LOT_NO = ?
  1302. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  1303. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  1304. UNION ALL
  1305. SELECT T.NODE_FUR_FLAG, T.QUALIFIED_NUM
  1306. FROM MIL_UL_RESUL T
  1307. WHERE T.JUDGE_STOVE_NO = ?
  1308. AND T.LOT_NO = ?
  1309. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  1310. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/'))
  1311. </query>
  1312. <query id = "SurfaceInspectionResult.doDeleteMatData" desc = "删除虚拟库存">
  1313. <![CDATA[
  1314. DECLARE
  1315. V_COUNT MIL_OFFLINE_RESLUT.OFFLINE_NUM%TYPE := NULL;
  1316. V_ZG_STOVE_SQE MAT_BC_M.ZG_STOVE_SQE%TYPE := ?;
  1317. BEGIN
  1318. FOR MYROW IN (SELECT *
  1319. FROM (SELECT T.MAT_NO
  1320. FROM MAT_BC_M T, YDM_BC_BUTTRESS S
  1321. WHERE T.MAT_NO = S.MAT_NO
  1322. AND T.ZG_STOVE_SQE = V_ZG_STOVE_SQE
  1323. AND T.QCM_STAUS = '11'
  1324. AND (S.STORAGE_NO =
  1325. (SELECT C.OUT_REPOSITORY
  1326. FROM COM_BASE_PLINE C
  1327. WHERE C.PLINE_CODE = T.PLINE_CODE) OR
  1328. S.STORAGE_NO IN ('BZJ1', 'BZJ2'))
  1329. ORDER BY T.MAT_NO DESC)
  1330. WHERE ROWNUM <= ?) LOOP
  1331. DELETE FROM MAT_BC_M T
  1332. WHERE T.MAT_NO = MYROW.MAT_NO
  1333. AND T.ZG_STOVE_SQE = V_ZG_STOVE_SQE
  1334. AND ROWNUM = 1;
  1335. DELETE FROM YDM_BC_BUTTRESS T
  1336. WHERE T.MAT_NO = MYROW.MAT_NO
  1337. AND ROWNUM = 1;
  1338. DELETE FROM YDM_BC_INLIST T
  1339. WHERE T.MAT_NO = MYROW.MAT_NO
  1340. AND ROWNUM = 1;
  1341. END LOOP;
  1342. END;
  1343. ]]>
  1344. </query>
  1345. <query id = "SurfaceInspectionResult.doQueryCount" desc = "查询待处理是否已有转移的支数">
  1346. <![CDATA[
  1347. SELECT NVL(MAX(CASE
  1348. WHEN S.STORAGE_NO = C.OUT_REPOSITORY THEN
  1349. 0
  1350. ELSE
  1351. 1
  1352. END),
  1353. 0) ISOK
  1354. FROM MAT_BC_M T, YDM_BC_BUTTRESS S, COM_BASE_PLINE C
  1355. WHERE T.MAT_NO = S.MAT_NO
  1356. AND T.PLINE_CODE = C.PLINE_CODE
  1357. AND T.QCM_STAUS = '11'
  1358. AND T.ZG_STOVE_SQE = ?
  1359. AND T.OFFLINE_DOC = ?
  1360. ]]>
  1361. </query>
  1362. <query id = "SurfaceInspectionResult.doQueryBackCount" desc = "查询可撤销的支数">
  1363. <![CDATA[
  1364. SELECT COUNT(*) ACOUNT
  1365. FROM MAT_BC_M T, YDM_BC_BUTTRESS S, COM_BASE_PLINE C
  1366. WHERE T.MAT_NO = S.MAT_NO
  1367. AND T.PLINE_CODE = C.PLINE_CODE
  1368. AND T.QCM_STAUS = '11'
  1369. AND (S.STORAGE_NO = C.OUT_REPOSITORY OR S.STORAGE_NO IN ('BZJ1', 'BZJ2'))
  1370. AND T.ZG_STOVE_SQE = ?
  1371. ]]>
  1372. </query>
  1373. <query id = "SurfaceInspectionResult.doQueryOffCount" desc = "查询离线的支数">
  1374. <![CDATA[
  1375. SELECT COUNT(*) ACOUNT
  1376. FROM MAT_BC_M T, YDM_BC_BUTTRESS S, COM_BASE_PLINE C
  1377. WHERE T.MAT_NO = S.MAT_NO
  1378. AND T.PLINE_CODE = C.PLINE_CODE
  1379. AND T.QCM_STAUS = '11'
  1380. AND T.ZG_STOVE_SQE = ?
  1381. ]]>
  1382. </query>
  1383. <query id = "SurfaceInspectionResult.getSurfaceResult" desc = "查询表检支数">
  1384. SELECT NVL(T.OFFLINE_QUANTITY, 0) + NVL(T.WASTE_QUANTITY, 0) +
  1385. NVL(T.QUALIFIED_BRANCH, 0) AS SURFACENUM
  1386. FROM MIL_SURFACE_RESULT T
  1387. WHERE T.JUDGE_STOVE_NO = ?
  1388. AND T.LOT_NO = ?
  1389. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  1390. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  1391. </query>
  1392. <query id = "SurfaceInspectionResult.doQueryOffline" desc = "查询下线支数是否已进行处理">
  1393. SELECT T.OFFLINE_NUM
  1394. FROM MIL_OFFLINE_RESLUT T
  1395. WHERE T.JUDGE_STOVE_NO = ?
  1396. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  1397. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  1398. AND T.OFFLINE_PRO = 'ZJ'
  1399. AND T.STATUS = '0'
  1400. </query>
  1401. <query id = "SurfaceInspectionResult.getCheckDetail" desc = "移除缺陷时查询该缺陷是否已保存">
  1402. SELECT * FROM MIL_CHECK_DEATIL_SIMPLE T WHERE T.JUDGE_STOVE_NO = ? AND T.DEFECT_CODE = ?
  1403. </query>
  1404. <query id = "SurFace_Insp.doQueryRollCard" desc = "查询复检流通卡">
  1405. SELECT M.QUALIFIED_BRANCH AS QUALIFIED_BRANCH,
  1406. M.OFFLINE_QUANTITY AS OFFLINE_QUANTITY,
  1407. M.WASTE_QUANTITY AS WASTE_QUANTITY
  1408. FROM mil_surface_result M
  1409. WHERE M.JUDGE_STOVE_NO = ?
  1410. AND NVL(M.PRO_PLAN_ID, '/') = NVL(?, '/')
  1411. AND NVL(M.GX_PLAN_NO, '/') = NVL(?, '/')
  1412. </query>
  1413. <query id = "SurFace_Insp.doQueryRollCardTest" desc = "查询探伤返线流通卡">
  1414. SELECT I.SCRAP_NUM AS SCRAP_STRAIGHT,
  1415. I.Qualified_Num AS QUALIFIED_STRAIGHT,
  1416. I.OFFLINE_NUM_TOTAL AS OFFLINE_STRAIGHT,
  1417. I.BACKLINE_NUM_TOTAL AS BACKLINE_STRAIGHT,
  1418. K.SCRAP_NUM AS SCRAP_TESTING,
  1419. K.QUALIFIED_NUM AS QUALIFIED_TESTING,
  1420. K.OFFLINE_NUM AS OFFLINE_TESTING,
  1421. K.BACKLINE_NUM AS BACKLINE_TESTING,
  1422. M.QUALIFIED_BRANCH AS QUALIFIED_BRANCH,
  1423. M.OFFLINE_QUANTITY AS OFFLINE_QUANTITY,
  1424. M.WASTE_QUANTITY AS WASTE_QUANTITY
  1425. FROM MIL_STRAIGHTENING_RESULT I, MIL_MT_RESULT K, mil_surface_result M
  1426. WHERE I.JUDGE_STOVE_NO = K.JUDGE_STOVE_NO(+)
  1427. AND I.JUDGE_STOVE_NO = M.JUDGE_STOVE_NO(+)
  1428. AND I.JUDGE_STOVE_NO = ?
  1429. AND NVL(I.PRO_PLAN_ID, '/') = NVL(?, '/')
  1430. AND NVL(I.GX_PLAN_NO, '/') = NVL(?, '/')
  1431. </query>
  1432. <query id = "SurFace_Insp.getRollCard168Test" desc = "168探伤返线流通卡">
  1433. SELECT
  1434. I.SCRAP_NUM AS SCRAP_STRAIGHT,
  1435. I.Qualified_Num AS QUALIFIED_STRAIGHT,
  1436. I.OFFLINE_NUM_TOTAL AS OFFLINE_STRAIGHT,
  1437. I.BACKLINE_NUM_TOTAL AS BACKLINE_STRAIGHT,
  1438. K.SCRAP_NUM AS SCRAP_TESTING,
  1439. K.QUALIFIED_NUM AS QUALIFIED_TESTING,
  1440. K.OFFLINE_NUM AS OFFLINE_TESTING,
  1441. K.BACKLINE_NUM AS BACKLINE_TESTING,
  1442. M.QUALIFIED_BRANCH AS QUALIFIED_BRANCH,
  1443. M.OFFLINE_QUANTITY AS OFFLINE_QUANTITY,
  1444. M.WASTE_QUANTITY AS WASTE_QUANTITY
  1445. FROM MIL_STRAIGHTENING_RESULT I,
  1446. MIL_ET_RESULT K,
  1447. mil_surface_result M
  1448. WHERE I.JUDGE_STOVE_NO = K.JUDGE_STOVE_NO(+)
  1449. AND I.JUDGE_STOVE_NO = M.JUDGE_STOVE_NO(+)
  1450. AND I.JUDGE_STOVE_NO = ?
  1451. AND NVL(I.PRO_PLAN_ID, '/') = NVL(?, '/')
  1452. AND NVL(I.GX_PLAN_NO, '/') = NVL(?, '/')
  1453. </query>
  1454. <query id = "SurFace_Insp.getRollingCardTest" desc = "超声探伤返线流通卡">
  1455. SELECT
  1456. I.SCRAP_NUM AS SCRAP_STRAIGHT,
  1457. I.Qualified_Num AS QUALIFIED_STRAIGHT,
  1458. I.OFFLINE_NUM_TOTAL AS OFFLINE_STRAIGHT,
  1459. I.BACKLINE_NUM_TOTAL AS BACKLINE_STRAIGHT,
  1460. K.SCRAP_NUM AS SCRAP_TESTING,
  1461. K.QUALIFIED_NUM AS QUALIFIED_TESTING,
  1462. K.OFFLINE_NUM AS OFFLINE_TESTING,
  1463. K.BACKLINE_NUM AS BACKLINE_TESTING,
  1464. M.QUALIFIED_BRANCH AS QUALIFIED_BRANCH,
  1465. M.OFFLINE_QUANTITY AS OFFLINE_QUANTITY,
  1466. M.WASTE_QUANTITY AS WASTE_QUANTITY
  1467. FROM MIL_STRAIGHTENING_RESULT I,
  1468. MIL_UL_RESUL K,
  1469. mil_surface_result M
  1470. WHERE I.JUDGE_STOVE_NO = K.JUDGE_STOVE_NO(+)
  1471. AND I.JUDGE_STOVE_NO = M.JUDGE_STOVE_NO(+)
  1472. AND I.JUDGE_STOVE_NO = ?
  1473. AND NVL(I.PRO_PLAN_ID, '/') = NVL(?, '/')
  1474. AND NVL(I.GX_PLAN_NO, '/') = NVL(?, '/')
  1475. </query>
  1476. <query id = "SurFace_Insp.getMilPlan" desc = "查询返线计划表支" >
  1477. SELECT T.BRANCH, T.TON
  1478. FROM MIL_PLAN T
  1479. WHERE T.JUDGE_STOVE_NO = ?
  1480. AND T.ID = ?
  1481. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  1482. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  1483. </query>
  1484. <query id = "doInsetDefectData.selectMilPlanSpece" desc = "查询计划规格、长度">
  1485. SELECT T.PIPE_SIZE, T.TARGET_LENGTH
  1486. FROM MIL_PLAN T
  1487. WHERE T.JUDGE_STOVE_NO = ?
  1488. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  1489. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  1490. </query>
  1491. <query id = "SurfaceInspectionResult.selectBackLineNum" desc = "查询管号队列中是否有生成质检委托">
  1492. <![CDATA[
  1493. select t.*
  1494. from mil_offline_result_detia t
  1495. where t.id = ?
  1496. and t.judge_stove_no = ?
  1497. AND T.JUDGE_STOVE_NO <> T.BACK_JUDGE_STOVE_NO
  1498. and t.operation_type <> '1'
  1499. ]]>
  1500. </query>
  1501. <query id = "SurfaceInspectionResult.doQueryTestResult" desc = "查询探伤合格支数">
  1502. SELECT T.QUALIFIED_NUM FROM #TABLENAME# T WHERE T.RESULT_NO = ?
  1503. </query>
  1504. <query id = "SurfaceInspectionResult.doQuerySufaceD" desc = "查询表面检验D1\D2最大最小">
  1505. <![CDATA[
  1506. SELECT MAX(M1)M1,MIN(M2)M2
  1507. FROM (SELECT MAX(T.D1) M1,MIN(T.D1)M2
  1508. FROM MIL_SIZE_CHECK_DEATIL T
  1509. WHERE T.JUDGE_STOVE_NO like ? || '%'
  1510. UNION ALL (SELECT MAX(T.D2) M1,MIN(T.D2)M2
  1511. FROM MIL_SIZE_CHECK_DEATIL T
  1512. WHERE T.JUDGE_STOVE_NO like ? || '%'))
  1513. ]]>
  1514. </query>
  1515. <query id = "SurfaceInspectionResult.doQuerySufaceS" desc = "查询表检检验壁厚最大最小">
  1516. <![CDATA[
  1517. SELECT MAX(S1)S1,MIN(S2)S2
  1518. FROM (SELECT MAX(T.S1) S1,MIN(T.S1)S2
  1519. FROM MIL_SIZE_CHECK_DEATIL T
  1520. WHERE T.JUDGE_STOVE_NO like ? || '%'
  1521. UNION ALL (SELECT MAX(T.S2) S2,MIN(T.S2)S2
  1522. FROM MIL_SIZE_CHECK_DEATIL T
  1523. WHERE T.JUDGE_STOVE_NO like ? || '%')
  1524. UNION ALL
  1525. SELECT MAX(T.S3)S1,MIN(T.S3)S2 FROM MIL_SIZE_CHECK_DEATIL T WHERE T.JUDGE_STOVE_NO like ? || '%'
  1526. UNION ALL
  1527. SELECT MAX(T.S4)S1,MIN(T.S4)S2 FROM MIL_SIZE_CHECK_DEATIL T WHERE T.JUDGE_STOVE_NO like ? || '%'
  1528. )
  1529. ]]>
  1530. </query>
  1531. <query id = "SurfaceInspectionResult.selectMinMaxD" desc = "获取平均值外径">
  1532. SELECT (TO_NUMBER(NVL(M1, 0)) + TO_NUMBER(NVL(M2, 0))) / 2 AS DIMATER
  1533. FROM (SELECT MAX(M1) M1, MIN(M2) M2
  1534. FROM (SELECT MAX(T.D1) M1, MIN(T.D1) M2
  1535. FROM MIL_SIZE_CHECK_DEATIL T
  1536. WHERE REGEXP_REPLACE(T.JUDGE_STOVE_NO, '-.*', '') = ?
  1537. UNION ALL (SELECT MAX(T.D2) M1, MIN(T.D2) M2
  1538. FROM MIL_SIZE_CHECK_DEATIL T
  1539. WHERE REGEXP_REPLACE(T.JUDGE_STOVE_NO, '-.*', '') = ?)))
  1540. </query>
  1541. <query id = "SurfaceInspectionResult.selectMinMaxS" desc = "获取平均值壁厚">
  1542. SELECT (TO_NUMBER(NVL(S1,0))+TO_NUMBER(NVL(S2,0)))/2 AS HEIGHT
  1543. FROM (
  1544. SELECT MAX(S1) S1, MIN(S2) S2
  1545. FROM (SELECT MAX(T.S1) S1, MIN(T.S1) S2
  1546. FROM MIL_SIZE_CHECK_DEATIL T
  1547. WHERE REGEXP_REPLACE(T.JUDGE_STOVE_NO, '-.*', '') = ?
  1548. UNION ALL (SELECT MAX(T.S2) S2, MIN(T.S2) S2
  1549. FROM MIL_SIZE_CHECK_DEATIL T
  1550. WHERE REGEXP_REPLACE(T.JUDGE_STOVE_NO, '-.*', '') = ?)
  1551. UNION ALL
  1552. SELECT MAX(T.S3) S1, MIN(T.S3) S2
  1553. FROM MIL_SIZE_CHECK_DEATIL T
  1554. WHERE REGEXP_REPLACE(T.JUDGE_STOVE_NO, '-.*', '') = ?
  1555. UNION ALL
  1556. SELECT MAX(T.S4) S1, MIN(T.S4) S2
  1557. FROM MIL_SIZE_CHECK_DEATIL T
  1558. WHERE REGEXP_REPLACE(T.JUDGE_STOVE_NO, '-.*', '') = ?)
  1559. )
  1560. </query>
  1561. <query id = "SurfaceInspectionResult.updateActWgt" desc = "修改重量">
  1562. UPDATE PORT_MIL_BATCH_SAMPLE_RESULT T
  1563. SET T.ACT_THEORY_WEIGHT = ROUND(0.02466 * TO_NUMBER(?) *
  1564. (TO_NUMBER(?) - TO_NUMBER(?)) *
  1565. TO_NUMBER(NVL(T.ORDER_LENGTH,0))/1000,3)
  1566. WHERE REGEXP_REPLACE(T.JUDGE_STOVE_NO, '-.*', '') = ?
  1567. </query>
  1568. <query id = "SurfaceInspectionResult.doQueryBackFlag" desc = "查询计划是否为返线计划">
  1569. SELECT T.BACK_PLAN_FLAG
  1570. FROM MIL_PLAN T
  1571. WHERE T.ID = ?
  1572. AND T.JUDGE_STOVE_NO = ?
  1573. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  1574. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  1575. </query>
  1576. <query id = "SurfaceInspectionResult.doQueryPlanBratch" desc = "查询计划支数">
  1577. SELECT T.BRANCH AS QUALIFIED_NUM FROM MIL_PLAN T WHERE T.ID = ? AND T.PLINE_CODE = ?
  1578. </query>
  1579. <query id = "SurfaceInspectionResult.doQueryProcessNum" desc = "查询进程表支数">
  1580. SELECT SUM(T.ACT_COUNT)ACT_COUNT
  1581. FROM PORT_MIL_BATCH_SAMPLE_RESULT T
  1582. WHERE T.PLAN_ID = ?
  1583. AND T.JUDGE_STOVE_NO = ?
  1584. AND (T.STATUS = '0' OR (T.STATUS IN ('2','3') AND T.OP_PROCESS = '11'))
  1585. </query>
  1586. <query id = "SurfaceInspectionResult.doInsetMatData" desc = "表检下线入虚拟库存">
  1587. DECLARE
  1588. V_TIME MIL_OFFLINE_RESLUT.OFFLINE_TIME%TYPE := SYSDATE;
  1589. V_JUDGE_STOVE_NO MIL_PLAN.JUDGE_STOVE_NO%TYPE := ?;
  1590. V_BATCH_NO PORT_MIL_BATCH_SAMPLE_RESULT.BATCH_NO%TYPE := ?;
  1591. V_JUDGE_STOVE_NO_ZP MIL_PLAN.JUDGE_STOVE_NO%TYPE := NULL; --组炉炉号
  1592. V_COUNT MIL_PLAN.CRAFT_SEQ%TYPE := 0;
  1593. BEGIN
  1594. select COUNT(1)
  1595. INTO V_COUNT
  1596. from MIL_OFFLINE_GROUP t
  1597. WHERE REGEXP_REPLACE(T.ZP_JUDGE_STOVE_NO, '-.*', '') = V_JUDGE_STOVE_NO;
  1598. IF (V_COUNT > 0) THEN
  1599. select REGEXP_REPLACE(T.ZP_M_LH, '-.*', '')
  1600. INTO V_JUDGE_STOVE_NO_ZP
  1601. from MIL_OFFLINE_GROUP t
  1602. WHERE REGEXP_REPLACE(T.ZP_JUDGE_STOVE_NO, '-.*', '') =
  1603. V_JUDGE_STOVE_NO
  1604. AND ROWNUM = 1;
  1605. END IF;
  1606. INSERT INTO YDM_BC_BUTTRESS
  1607. (JUDGE_STOVE_NO,
  1608. BATCH_NO,
  1609. BATCH_GROUD_NO,
  1610. STORAGE_NO,
  1611. LOCATION_NO,
  1612. STORAGE_TYPE_NO,
  1613. STORAGE_TYPE_NAME,
  1614. CREATE_NAME,
  1615. MAT_NO,
  1616. CREATE_TIME,
  1617. MANAGEMENT_NO,
  1618. MANAGEMENT_NAME,
  1619. DEPARTMENT_CODE,
  1620. DEPARTMENT_DESC)
  1621. VALUES
  1622. (V_JUDGE_STOVE_NO, V_BATCH_NO, ?, ?, ?, ?, ?, ?, ?, V_TIME, ?, ?, ?, ?);
  1623. FOR MYROW IN (SELECT A.*,
  1624. B.ORD_PK,
  1625. B.ORD_LN_PK,
  1626. (SELECT MAX(M.PIPE_SIZE_CODE)
  1627. FROM MIL_PLAN M
  1628. WHERE REGEXP_REPLACE(JUDGE_STOVE_NO, '-.*', '') =
  1629. A.FEED_HEAT_NO) SPEC_CODE,
  1630. (SELECT MAX(M.ROLL_STANDRAD_CODE)
  1631. FROM MIL_PLAN M
  1632. WHERE REGEXP_REPLACE(JUDGE_STOVE_NO, '-.*', '') =
  1633. A.FEED_HEAT_NO) STD_CODE,
  1634. (SELECT MAX(M.STD_STYLE)
  1635. FROM MIL_PLAN M
  1636. WHERE REGEXP_REPLACE(JUDGE_STOVE_NO, '-.*', '') =
  1637. A.FEED_HEAT_NO) STD_STYLE,
  1638. (SELECT DECODE(H.ORDER_TYP, '120108', '1', '0')
  1639. FROM SLM_ORDER_HEAD H
  1640. WHERE H.ORD_PK = B.ORD_PK) ORDER_TYP
  1641. FROM PLN_ZY_ZG_M A, SLM_ORDER_LINE_DELIVERY B
  1642. WHERE A.ORD_LN_DLY_PK = B.ORD_LN_DLY_PK(+)
  1643. AND A.IF_FLAG = '0'
  1644. AND A.PLANSTATUS > '00'
  1645. AND A.FEED_HEAT_NO =
  1646. NVL(V_JUDGE_STOVE_NO_ZP, V_JUDGE_STOVE_NO)) LOOP
  1647. INSERT INTO MAT_BC_M
  1648. (JUDGE_STOVE_NO,
  1649. STOVE_NO,
  1650. BATCH_NO,
  1651. BATCH_GROUD_NO,
  1652. ACT_COUNT,
  1653. ACT_WEIGHT,
  1654. CREATE_TIME,
  1655. MAT_NO,
  1656. PRODUCT_FLAG,
  1657. MAT_STATUS,
  1658. PLINE_CODE,
  1659. PLINE_NAME,
  1660. QCM_STAUS,
  1661. HEAT_PLAN_NO,
  1662. ZG_STOVE_SQE,
  1663. PRODUCCODE,
  1664. PRODUCNAME,
  1665. STEELCODE,
  1666. STEELNAME,
  1667. SPEC_CODE,
  1668. SPEC_NAME,
  1669. GRADECODE,
  1670. GRADENAME,
  1671. MODEL_CODE,
  1672. MODEL_DESC,
  1673. STD_CODE,
  1674. STD_NAME,
  1675. BELONG_CODE,
  1676. BELONG_NAME,
  1677. STD_STYLE,
  1678. STD_STYLE_DESC,
  1679. ACT_DIMATER,
  1680. ACT_HEIGHT,
  1681. ACT_LEN_MIN,
  1682. ACT_LEN_MAX,
  1683. LOT_NO,
  1684. PRO_ORDER_NO,
  1685. ACT_LEN,
  1686. TARGET,
  1687. PROCESS_STATUS,
  1688. FLAG_STOVE_NO_ZG,
  1689. INSTOCK_TIME,
  1690. PRO_ORDER_ID,
  1691. GX_PLAN_NO,
  1692. MATERIAL_NO,
  1693. MATERIAL_NAME,
  1694. INPUT_MATERIAL_NO,
  1695. INPUT_MATERIAL_NAME,
  1696. CIC,
  1697. JUDGE_STD_DES,
  1698. CRAFT_SEQ,
  1699. PROCESS_CDOE,
  1700. PROCESS_DESC,
  1701. ORDER_NO,
  1702. ORDER_SEQ,
  1703. ORDER_SEQ_NO,
  1704. ORD_PK,
  1705. ORD_LN_PK,
  1706. ORD_LN_DLY_PK,
  1707. OFFLINE_DOC,
  1708. IS_DEALER,
  1709. MAT_GOWHERE_CODE,
  1710. MAT_GOWHERE_NAME,
  1711. BELONG_CODE_RESPONSE,
  1712. BELONG_NAME_RESPONSE)
  1713. VALUES
  1714. (?,
  1715. MYROW.Stove_No,
  1716. ?,
  1717. ?,
  1718. ?,
  1719. ?,
  1720. TO_DATE(?, 'YYYY-MM-DD HH24:MI:SS'),
  1721. ?,
  1722. ?,
  1723. ?,
  1724. ?,
  1725. ?,
  1726. ?,
  1727. ?,
  1728. ?,
  1729. NVL(?, MYROW.PRODUCCODE),
  1730. ?,
  1731. NVL(?, MYROW.STEELCODE),
  1732. ?,
  1733. NVL(?, MYROW.SPEC_CODE),
  1734. ?,
  1735. NVL(?, MYROW.GRADECODE),
  1736. ?,
  1737. NVL(?, MYROW.MODEL_CODE),
  1738. ?,
  1739. NVL(?, MYROW.STD_CODE),
  1740. ?,
  1741. ?,
  1742. ?,
  1743. NVL(?, MYROW.STD_STYLE),
  1744. ?,
  1745. ?,
  1746. ?,
  1747. ?,
  1748. ?,
  1749. ?,
  1750. ?,
  1751. ?,
  1752. ?,
  1753. ?,
  1754. ?,
  1755. SYSDATE,
  1756. ?,
  1757. ?,
  1758. ?,
  1759. ?,
  1760. ?,
  1761. ?,
  1762. ?,
  1763. ?,
  1764. ?,
  1765. 'D',
  1766. '轧制',
  1767. MYROW.ORDER_NO,
  1768. MYROW.ORDER_SEQ,
  1769. MYROW.DELIVERY_NO,
  1770. MYROW.ORD_PK,
  1771. MYROW.ORD_LN_PK,
  1772. MYROW.ORD_LN_DLY_PK,
  1773. ?,
  1774. MYROW.ORDER_TYP,
  1775. NVL(MYROW.GOWHERE_CODE, '/'),
  1776. NVL(MYROW.GOWHERE_NAME, '/'),
  1777. MYROW.PLINE_CODE,
  1778. MYROW.PLINE_NAME);
  1779. END LOOP;
  1780. END;
  1781. </query>
  1782. <query id = "SurfaceInspectionResult.selectMilPlanData" desc = "查询炉计划信息">
  1783. SELECT T.*
  1784. FROM MIL_PLAN T
  1785. WHERE T.ID = ?
  1786. AND T.JUDGE_STOVE_NO = ?
  1787. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  1788. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  1789. </query>
  1790. <query id = "SurfaceInspectionResult.doQueryPort" desc = "查询进程合格状态支数">
  1791. SELECT NVL(SUM(T.ACT_COUNT), 0) QUALIFIED_NUM
  1792. FROM PORT_MIL_BATCH_SAMPLE_RESULT T
  1793. WHERE T.PLAN_ID = ?
  1794. AND T.PLINE_CODE = ?
  1795. AND T.STATUS = '0'
  1796. --AND T.INSTORE_FLAG = '0'
  1797. </query>
  1798. <query id = "SurfaceInspectionResult.doQueryNodeS" desc = "查询是否结炉">
  1799. SELECT T.NODE_FUR_FLAG FROM #RESULT# T WHERE T.RESULT_NO = ?
  1800. </query>
  1801. <query id = "SurfaceInspectionResult.doQueryPortWgt" desc = "获取进程重量">
  1802. <![CDATA[
  1803. SELECT NVL(SUM(T.ACT_THEORY_WEIGHT), 0) ACT_THEORY_WEIGHT
  1804. FROM PORT_MIL_BATCH_SAMPLE_RESULT T
  1805. WHERE T.PLAN_ID = ?
  1806. AND T.STATUS = '0'
  1807. AND ROWNUM <= ?
  1808. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  1809. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  1810. ]]>
  1811. </query>
  1812. <query id = "SurfaceInspectionResult.doQueryChcekSize" desc = "查询几何尺寸">
  1813. <![CDATA[
  1814. SELECT T.JUDGE_STOVE_NO
  1815. FROM MIL_SIZE_CHECK_DEATIL T
  1816. WHERE REGEXP_REPLACE(T.JUDGE_STOVE_NO, '-.*', '') = ?
  1817. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  1818. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  1819. ]]>
  1820. </query>
  1821. <query id = "SurfaceInspectionResult.doDeleteSlabScrap" desc = "删除slab表">
  1822. <![CDATA[
  1823. DELETE FROM MIL_SLAB_SCRAP T
  1824. WHERE T.JUDGE_STOVE_NO = ?
  1825. AND T.PRO_PLAN_ID || '&' LIKE '%' || ? || '%'
  1826. AND T.GX_PLAN_NO || '&' LIKE '%' || ? || '%'
  1827. AND T.PROCESS_NO = '10'
  1828. ]]>
  1829. </query>
  1830. <query id = "SurfaceInspectionResult.doQueryProcessSeq" desc = "全程途径码最后一道工序">
  1831. SELECT SUBSTR(T.PROCESS_SEQ,INSTR(T.PROCESS_SEQ,'-',-1,1)+1)PROCESS_SEQ FROM PLN_SALEORD_PROC T WHERE T.ORD_LN_DLY_PK ||'-'||T.PLN_DIVIDE_ID = ?
  1832. </query>
  1833. <query id = "startBack.selectMilOfflineZp" desc = "查询是否为组炉信息">
  1834. SELECT T.ZP_FLAG
  1835. FROM MIL_OFFLINE_RESLUT T
  1836. WHERE T.JUDGE_STOVE_NO = ?
  1837. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  1838. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  1839. AND T.OFFLINE_PRO = 'ZJ'
  1840. </query>
  1841. <query id = "SurFace_Insp.getIsAgain" desc = "是否跟队(天淮)">
  1842. <![CDATA[
  1843. select COUNT(1) ACOUNT
  1844. from MIL_SURFACE_RESULT t
  1845. WHERE REGEXP_REPLACE(T.JUDGE_STOVE_NO, '-.*', '') = ?
  1846. AND T.PLINE_CODE = ?
  1847. ]]>
  1848. </query>
  1849. </queryMap>