FrmEddyCurrentTestingResult.xml 196 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904190519061907190819091910191119121913191419151916191719181919192019211922192319241925192619271928192919301931193219331934193519361937193819391940194119421943194419451946194719481949195019511952195319541955195619571958195919601961196219631964196519661967196819691970197119721973197419751976197719781979198019811982198319841985198619871988198919901991199219931994199519961997199819992000200120022003200420052006200720082009201020112012201320142015201620172018201920202021202220232024202520262027202820292030203120322033203420352036203720382039204020412042204320442045204620472048204920502051205220532054205520562057205820592060206120622063206420652066206720682069207020712072207320742075207620772078207920802081208220832084208520862087208820892090209120922093209420952096209720982099210021012102210321042105210621072108210921102111211221132114211521162117211821192120212121222123212421252126212721282129213021312132213321342135213621372138213921402141214221432144214521462147214821492150215121522153215421552156215721582159216021612162216321642165216621672168216921702171217221732174217521762177217821792180218121822183218421852186218721882189219021912192219321942195219621972198219922002201220222032204220522062207220822092210221122122213221422152216221722182219222022212222222322242225222622272228222922302231223222332234223522362237223822392240224122422243224422452246224722482249225022512252225322542255225622572258225922602261226222632264226522662267226822692270227122722273227422752276227722782279228022812282228322842285228622872288228922902291229222932294229522962297229822992300230123022303230423052306230723082309231023112312231323142315231623172318231923202321232223232324232523262327232823292330233123322333233423352336233723382339234023412342234323442345234623472348234923502351235223532354235523562357235823592360236123622363236423652366236723682369237023712372237323742375237623772378237923802381238223832384238523862387238823892390239123922393239423952396239723982399240024012402240324042405240624072408240924102411241224132414241524162417241824192420242124222423242424252426242724282429243024312432243324342435243624372438243924402441244224432444244524462447244824492450245124522453245424552456245724582459246024612462246324642465246624672468246924702471247224732474247524762477247824792480248124822483248424852486248724882489249024912492249324942495249624972498249925002501250225032504250525062507250825092510251125122513251425152516251725182519252025212522252325242525252625272528252925302531253225332534253525362537253825392540254125422543254425452546254725482549255025512552255325542555255625572558255925602561256225632564256525662567256825692570257125722573257425752576257725782579258025812582258325842585258625872588258925902591259225932594259525962597259825992600260126022603260426052606260726082609261026112612261326142615261626172618261926202621262226232624262526262627262826292630263126322633263426352636263726382639264026412642264326442645264626472648264926502651265226532654265526562657265826592660266126622663266426652666266726682669267026712672267326742675267626772678267926802681268226832684268526862687268826892690269126922693269426952696269726982699270027012702270327042705270627072708270927102711271227132714271527162717271827192720272127222723272427252726272727282729273027312732273327342735273627372738273927402741274227432744274527462747274827492750275127522753275427552756275727582759276027612762276327642765276627672768276927702771277227732774277527762777277827792780278127822783278427852786278727882789279027912792279327942795279627972798279928002801280228032804280528062807280828092810281128122813281428152816281728182819282028212822282328242825282628272828282928302831283228332834283528362837283828392840284128422843284428452846284728482849285028512852285328542855285628572858285928602861286228632864286528662867286828692870287128722873287428752876287728782879288028812882288328842885288628872888288928902891289228932894289528962897289828992900290129022903290429052906290729082909291029112912291329142915291629172918291929202921292229232924292529262927292829292930293129322933293429352936293729382939294029412942294329442945294629472948294929502951295229532954295529562957295829592960296129622963296429652966296729682969297029712972297329742975297629772978297929802981298229832984298529862987298829892990299129922993299429952996299729982999300030013002300330043005300630073008300930103011301230133014301530163017301830193020302130223023302430253026302730283029303030313032303330343035303630373038303930403041304230433044304530463047304830493050305130523053305430553056305730583059306030613062306330643065306630673068306930703071307230733074307530763077307830793080308130823083308430853086308730883089309030913092309330943095309630973098309931003101310231033104310531063107310831093110311131123113311431153116311731183119312031213122312331243125312631273128312931303131313231333134313531363137313831393140314131423143314431453146314731483149315031513152315331543155315631573158315931603161316231633164316531663167316831693170317131723173317431753176317731783179318031813182318331843185318631873188318931903191319231933194319531963197319831993200320132023203320432053206320732083209321032113212321332143215321632173218321932203221322232233224322532263227322832293230323132323233323432353236323732383239324032413242324332443245324632473248324932503251325232533254325532563257325832593260326132623263326432653266326732683269327032713272327332743275327632773278327932803281328232833284328532863287328832893290329132923293329432953296329732983299330033013302330333043305330633073308330933103311331233133314331533163317331833193320332133223323332433253326332733283329333033313332333333343335333633373338333933403341334233433344334533463347334833493350335133523353335433553356335733583359336033613362336333643365336633673368336933703371337233733374337533763377337833793380338133823383338433853386338733883389339033913392339333943395339633973398339934003401340234033404340534063407340834093410341134123413341434153416341734183419342034213422342334243425342634273428342934303431343234333434343534363437343834393440344134423443344434453446344734483449345034513452345334543455345634573458345934603461346234633464346534663467346834693470347134723473347434753476347734783479348034813482348334843485348634873488348934903491349234933494349534963497349834993500350135023503350435053506350735083509351035113512351335143515351635173518351935203521352235233524352535263527352835293530353135323533353435353536353735383539354035413542354335443545354635473548354935503551355235533554355535563557355835593560356135623563356435653566356735683569357035713572357335743575357635773578357935803581358235833584358535863587358835893590359135923593359435953596359735983599360036013602360336043605360636073608360936103611361236133614361536163617361836193620362136223623362436253626362736283629363036313632363336343635363636373638363936403641364236433644364536463647364836493650365136523653365436553656365736583659366036613662366336643665366636673668366936703671367236733674367536763677367836793680368136823683368436853686368736883689369036913692369336943695369636973698369937003701370237033704370537063707370837093710371137123713371437153716371737183719372037213722372337243725372637273728372937303731373237333734373537363737373837393740374137423743374437453746374737483749375037513752375337543755375637573758375937603761376237633764376537663767376837693770377137723773377437753776377737783779378037813782378337843785378637873788378937903791379237933794379537963797379837993800380138023803380438053806380738083809381038113812381338143815381638173818381938203821382238233824382538263827382838293830383138323833383438353836383738383839384038413842384338443845384638473848384938503851385238533854385538563857385838593860386138623863386438653866386738683869387038713872387338743875387638773878387938803881388238833884388538863887388838893890389138923893389438953896389738983899390039013902390339043905390639073908390939103911391239133914391539163917391839193920392139223923392439253926392739283929393039313932393339343935393639373938393939403941394239433944394539463947394839493950395139523953395439553956395739583959396039613962396339643965396639673968396939703971397239733974397539763977397839793980398139823983398439853986398739883989399039913992399339943995399639973998399940004001400240034004400540064007400840094010401140124013401440154016401740184019402040214022402340244025402640274028402940304031403240334034403540364037403840394040404140424043404440454046404740484049405040514052405340544055405640574058405940604061406240634064406540664067406840694070407140724073407440754076407740784079408040814082408340844085408640874088408940904091409240934094409540964097409840994100410141024103410441054106410741084109411041114112411341144115411641174118411941204121412241234124412541264127412841294130413141324133413441354136413741384139414041414142414341444145414641474148414941504151415241534154415541564157415841594160416141624163416441654166416741684169417041714172417341744175417641774178417941804181418241834184418541864187418841894190419141924193419441954196419741984199420042014202420342044205420642074208420942104211421242134214421542164217421842194220422142224223422442254226422742284229423042314232423342344235423642374238423942404241424242434244424542464247424842494250425142524253425442554256425742584259426042614262426342644265426642674268426942704271427242734274427542764277427842794280428142824283428442854286428742884289429042914292429342944295429642974298429943004301430243034304430543064307430843094310431143124313431443154316431743184319432043214322432343244325432643274328432943304331433243334334433543364337433843394340434143424343434443454346434743484349435043514352435343544355435643574358435943604361436243634364436543664367436843694370437143724373437443754376437743784379438043814382438343844385438643874388438943904391439243934394439543964397439843994400440144024403440444054406440744084409441044114412441344144415441644174418441944204421442244234424442544264427442844294430443144324433443444354436443744384439444044414442444344444445444644474448444944504451445244534454445544564457445844594460446144624463446444654466446744684469447044714472447344744475447644774478447944804481448244834484448544864487448844894490449144924493449444954496449744984499450045014502450345044505450645074508450945104511451245134514451545164517451845194520452145224523452445254526452745284529453045314532453345344535453645374538453945404541454245434544454545464547454845494550455145524553455445554556455745584559456045614562456345644565456645674568456945704571457245734574457545764577457845794580458145824583458445854586458745884589459045914592459345944595459645974598459946004601460246034604460546064607460846094610461146124613461446154616461746184619462046214622462346244625462646274628462946304631463246334634463546364637463846394640464146424643464446454646464746484649465046514652465346544655465646574658465946604661466246634664466546664667466846694670467146724673467446754676467746784679468046814682468346844685468646874688468946904691469246934694469546964697469846994700470147024703470447054706470747084709471047114712471347144715471647174718471947204721472247234724472547264727472847294730473147324733473447354736473747384739474047414742474347444745474647474748474947504751475247534754475547564757475847594760476147624763476447654766476747684769477047714772477347744775477647774778477947804781478247834784478547864787478847894790479147924793479447954796479747984799480048014802480348044805480648074808480948104811481248134814481548164817481848194820482148224823482448254826482748284829483048314832483348344835483648374838
  1. <?xml version="1.0" encoding="UTF-8"?>
  2. <queryMap desc="探伤实际操作">
  3. <query id="FrmEddyCurrentTestingResult.ETResultQuery" desc="探伤实际简单查询">
  4. <![CDATA[
  5. SELECT t.DETECTION_NUM1,
  6. t.DETECTION_NUM2,
  7. t.DETECTION_NUM3,
  8. t.SUSPECT_PRODUCT_NUM1,
  9. t.SUSPECT_PRODUCT_NUM2,
  10. t.SUSPECT_PRODUCT_NUM3,
  11. t.SCRAP_NUM1,
  12. t.QUALIFIED_NUM1,
  13. t.REINSPECTION_NUM1,
  14. t.REINSPECTION_QUALIFIED_NUM1,
  15. t.SCRAP_NUM2,
  16. t.QUALIFIED_NUM2,
  17. t.REINSPECTION_NUM2,
  18. t.REINSPECTION_QUALIFIED_NUM2,
  19. t.SCRAP_NUM3,
  20. t.QUALIFIED_NUM3,
  21. t.REINSPECTION_NUM3,
  22. t.REINSPECTION_QUALIFIED_NUM3,
  23. t.PRODUCT_STANDARDS,
  24. t.INSPECTION_STANDARD,
  25. t.TESTING_METHOD,
  26. t.CALIBRATION_METHOD,
  27. t.ARTIFICIAL_DEFECT_SHAPE,
  28. t.EXCITATION_FREQUENCY1,
  29. t.EXCITATION_FREQUENCY2,
  30. t.EXCITATION_FREQUENCY3,
  31. t.TESTING_SPEED1,
  32. t.TESTING_SPEED2,
  33. t.TESTING_SPEED3,
  34. t.DETECTION_NUM,
  35. t.SUSPECT_PRODUCT_NUM,
  36. t.SUSPICIOUS_REASON,
  37. t.REINSPECTION_NUM,
  38. t.REINSPECTION_QUALIFIED_NUM,
  39. t.SCRAP_NUM,
  40. t.SCRAP_REASON,
  41. t.QUALIFIED_NUM,
  42. t.USERID,
  43. t.SIGNID,
  44. t.COL_USER,
  45. t.COL_SHIFT,
  46. t.COL_GROUP,
  47. t.NODE_FUR_FLAG,
  48. t.NODE_FUR_FLAG1,
  49. t.NODE_FUR_FLAG2,
  50. t.NODE_FUR_FLAG3,
  51. TO_CHAR(t.START_TIME, 'YYYY-MM-DD HH24:MI:SS') START_TIME,
  52. t.INSPECTIONED_OFFLINE_NUM,
  53. t.SAMPLE_NUM,
  54. t.REMARK,
  55. t.PLINE_CODE,
  56. t.JUDGE_STOVE_NO,
  57. t.LOT_NO,
  58. t.RESULT_NO,
  59. T.USERID1,
  60. T.USERID2,
  61. t.USERID_GRADE1,
  62. t.USERID_GRADE2,
  63. T.USERID1JD,
  64. T.USERID2JD,
  65. t.USERID_GRADE1JD,
  66. t.USERID_GRADE2JD,
  67. t.ACCEPTANCE_GRADE,
  68. t.SAMPLE_NEWS,
  69. T.PRO_PLAN_ID,
  70. T.GX_PLAN_NO,
  71. T.NOTCH_INFO,
  72. T.NOTCH_LENGTH,
  73. T.NOTCH_WIDTH,
  74. T.NOTCH_DEPTH
  75. FROM MIL_ET_RESULT t
  76. WHERE 1 = 1
  77. AND t.judge_stove_no = ?
  78. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  79. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  80. --AND T.COL_SHIFT = ?
  81. --AND T.COL_GROUP = ?
  82. ]]>
  83. </query>
  84. <query id="FrmEddyCurrentTestingResult.GetMTResult" desc="查询MT探伤实绩">
  85. SELECT T.DETECTION_NUM1,
  86. T.DETECTION_NUM2,
  87. T.SUSPECT_PRODUCT_NUM1,
  88. T.SUSPECT_PRODUCT_NUM2,
  89. T.NODE_FUR_FLAG1,
  90. T.NODE_FUR_FLAG2,
  91. T.SCRAP_NUM2,
  92. T.QUALIFIED_NUM2,
  93. T.REINSPECTION_NUM2,
  94. T.REINSPECTION_QUALIFIED_NUM2,
  95. T.SCRAP_NUM1,
  96. T.QUALIFIED_NUM1,
  97. T.REINSPECTION_NUM1,
  98. T.REINSPECTION_QUALIFIED_NUM1,
  99. T.PRODUCT_STANDARDS,
  100. T.LO_SURFACE,
  101. T.LI_SURFACE,
  102. T.TO_SURFACE,
  103. T.TI_SURFACE,
  104. T.GROOVE_SHAPE,
  105. T.INSPECTION_STANDARD,
  106. T.LONGITUDINAL_CURRENT1,
  107. T.TRANSVERSE_CURRENT1,
  108. T.LONGITUDINAL_CURRENT2,
  109. T.TRANSVERSE_CURRENT2,
  110. T.SPEED1,
  111. T.SPEED2,
  112. T.DETECTION_SPEED1,
  113. T.DETECTION_SPEED2,
  114. T.DETECTION_NUM,
  115. T.ALARM_NUM,
  116. T.REINSPECTION_NUM,
  117. T.REINSPECTION_QUALIFIED_NUM,
  118. T.SCRAP_NUM,
  119. T.QUALIFIED_NUM,
  120. T.SIGNID,
  121. TO_CHAR(T.START_TIME, 'YYYY-MM-DD HH24:MI:SS') START_TIME,
  122. TO_CHAR(T.END_TIME, 'YYYY-MM-DD HH24:MI:SS') END_TIME,
  123. T.EXECUTIVE_PRODUCER,
  124. TO_CHAR(T.PRODUCER_TIME, 'YYYY-MM-DD HH24:MI:SS') PRODUCER_TIME,
  125. T.REMARK,
  126. T.REMARK1,
  127. T.NODE_FUR_FLAG,
  128. T.PLINE_CODE,
  129. T.JUDGE_STOVE_NO,
  130. T.LOT_NO,
  131. T.RESULT_NO,
  132. T.INSPECTIONED_OFFLINE_NUM,
  133. T.SAMPLE_NUM,
  134. --(SELECT T1.USER_NAME FROM MIL_SIGNATURE T1 WHERE T1.USER_ID = T.USERID1) USERID1,
  135. --(SELECT T1.USER_NAME FROM MIL_SIGNATURE T1 WHERE T1.USER_ID = T.USERID2) USERID2,
  136. t.USERID1,
  137. t.USERID2,
  138. T.USERID_GRADE1,
  139. T.USERID_GRADE2,
  140. t.USERID1jd,
  141. t.USERID2jd,
  142. T.USERID_GRADE1jd,
  143. T.USERID_GRADE2jd,
  144. T.STANDARDS_NO,
  145. T.PRO_PLAN_ID,
  146. T.GX_PLAN_NO,
  147. T.NOTCH_INFO,
  148. T.NOTCH_LENGTH,
  149. T.NOTCH_WIDTH,
  150. T.NOTCH_DEPTH,
  151. T.COVERAGE
  152. FROM MIL_MT_RESULT T
  153. WHERE 1 = 1
  154. AND T.judge_stove_no = ?
  155. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  156. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  157. --AND COL_SHIFT = ?
  158. -- AND COL_GROUP = ?
  159. </query>
  160. <query id="FrmEddyCurrentTestingResult.GetUTResult" desc ="查询UT探伤实绩">
  161. SELECT
  162. DETECTION_NUM1,
  163. DETECTION_NUM2,
  164. SUSPECT_PRODUCT_NUM1,
  165. SUSPECT_PRODUCT_NUM2,
  166. NODE_FUR_FLAG1,
  167. NODE_FUR_FLAG2,
  168. SCRAP_NUM2,
  169. QUALIFIED_NUM2,
  170. REINSPECTION_NUM2,
  171. REINSPECTION_QUALIFIED_NUM2,
  172. SCRAP_NUM1,
  173. QUALIFIED_NUM1,
  174. REINSPECTION_NUM1,
  175. REINSPECTION_QUALIFIED_NUM1,
  176. SIGNID,
  177. TO_CHAR(START_TIME, 'YYYY-MM-DD HH24:MI:SS') START_TIME,
  178. TO_CHAR(END_TIME, 'YYYY-MM-DD HH24:MI:SS') END_TIME,
  179. EXECUTIVE_PRODUCER,
  180. TO_CHAR(PRODUCER_TIME, 'YYYY-MM-DD HH24:MI:SS') PRODUCER_TIME,
  181. REMARK,
  182. PRODUCT_STANDARDS,
  183. INSTRUMENT_TYPE,
  184. PROBE_TYPE,
  185. SENSTIVITY,
  186. INHIBITION,
  187. COUPLING_AGENT,
  188. SURFACE_APPEARANCE,
  189. LO_SURFACE,
  190. LI_SURFACE,
  191. TO_SURFACE,
  192. TI_SURFACE,
  193. DETECTION_NUM,
  194. ALARM_NUM,
  195. REINSPECTION_NUM,
  196. REINSPECTION_QUALIFIED_NUM,
  197. SCRAP_NUM,
  198. QUALIFIED_NUM,
  199. NODE_FUR_FLAG
  200. FROM MIL_UL_RESUL
  201. WHERE
  202. 1=1
  203. AND judge_stove_no=?
  204. AND NVL(PRO_PLAN_ID, '/') = NVL(?, '/')
  205. AND NVL(GX_PLAN_NO, '/') = NVL(?, '/')
  206. </query>
  207. <query id = "EddyCurrentTestingResult.getRollCard168" desc = "查询168流通卡信息">
  208. <![CDATA[
  209. SELECT A.AFTER_SCRAP_NUM AS SCRAP_DBFEED,
  210. A.BEFORE_SCRAP_NUM AS SCRAP_FEED,
  211. A.FEED_NUM AS QUALIFIED_FEED,
  212. A.CUT_NUM AS QUALIFIED_DBFEED,
  213. B.SCRAP_NUM AS SCRAP_FUR,
  214. B.OUT_FUR_NUM AS QUALIFIED_FUR,
  215. C.SCRAP_NUM AS SCRAP_PER,
  216. C.PERFORATION_NUM AS QUALIFIED_PER,
  217. D.SCRAP_NUM AS SCRAP_ROLLING,
  218. D.QUALIFIED_NUM AS QUALIFIED_ROLLING,
  219. E.SCRAP_NUM AS SCRAP_REFUR,
  220. E.OUT_FUR_NUM AS QUALIFIED_REFUR,
  221. G.SCRAP_NUM AS SCRAP_SIZING,
  222. G.PRODUCT_NUM AS QUALIFIED_SIZING,
  223. H.SCRAP_NUM AS SCRAP_SAW_BE,
  224. H.CUT_NUM AS QUALIFIED_SAW_BE,
  225. H.SCRAP_DBNUM AS SCRAP_SAW,
  226. H.CUT_DBNUM AS QUALIFIED_SAW,
  227. I.SCRAP_NUM AS SCRAP_STRAIGHT,
  228. I.Qualified_Num AS QUALIFIED_STRAIGHT,
  229. I.OFFLINE_NUM_TOTAL AS OFFLINE_STRAIGHT,
  230. I.BACKLINE_NUM_TOTAL AS BACKLINE_STRAIGHT,
  231. --COALESCE(K.SCRAP_NUM,0) AS SCRAP_TESTING,
  232. --COALESCE(K.QUALIFIED_NUM,0) AS QUALIFIED_TESTING,
  233. --COALESCE(K.OFFLINE_NUM,0) AS OFFLINE_TESTING,
  234. --COALESCE(K.BACKLINE_NUM,0 ) AS BACKLINE_TESTING
  235. J.SCRAP_NUM AS SCRAP_TESTING,
  236. J.QUALIFIED_NUM AS QUALIFIED_TESTING,
  237. J.OFFLINE_NUM AS OFFLINE_TESTING,
  238. J.BACKLINE_NUM AS BACKLINE_TESTING,
  239. M.QUALIFIED_BRANCH AS QUALIFIED_BRANCH,
  240. M.OFFLINE_QUANTITY AS OFFLINE_QUANTITY,
  241. M.WASTE_QUANTITY AS WASTE_QUANTITY
  242. FROM MIL_FEEDSAW_RESULT A
  243. , MIL_FUR_RESULT B
  244. , MIL_PERFORATION_RESULT C
  245. , MIL_ROLLING_RESULT D
  246. , MIL_REFUR_RESULT E
  247. , MIL_SIZING_RESULT G
  248. , MIL_SAW_RESULT H
  249. , MIL_STRAIGHTENING_RESULT I
  250. , MIL_ET_RESULT J
  251. --, MIL_MT_RESULT K
  252. --, MIL_UL_RESUL L
  253. ,mil_surface_result M
  254. WHERE A.JUDGE_STOVE_NO = B.JUDGE_STOVE_NO (+)
  255. AND A.JUDGE_STOVE_NO = C.JUDGE_STOVE_NO (+)
  256. AND A.JUDGE_STOVE_NO = D.JUDGE_STOVE_NO (+)
  257. AND A.JUDGE_STOVE_NO = E.JUDGE_STOVE_NO (+)
  258. AND A.JUDGE_STOVE_NO = G.JUDGE_STOVE_NO (+)
  259. AND A.JUDGE_STOVE_NO = H.JUDGE_STOVE_NO (+)
  260. AND A.JUDGE_STOVE_NO = I.JUDGE_STOVE_NO (+)
  261. AND A.JUDGE_STOVE_NO = M.JUDGE_STOVE_NO (+)
  262. --AND I.JUDGE_STOVE_NO = K.JUDGE_STOVE_NO (+)
  263. AND A.JUDGE_STOVE_NO = J.JUDGE_STOVE_NO (+)
  264. --AND K.JUDGE_STOVE_NO = L.JUDGE_STOVE_NO (+)
  265. AND A.JUDGE_STOVE_NO = ?
  266. AND NVL(A.PRO_PLAN_ID, '/') = NVL(?, '/')
  267. AND NVL(A.GX_PLAN_NO, '/') = NVL(?, '/')
  268. ]]>
  269. </query>
  270. <query id = "EddyCurrentTestingResult.getRollCard168BackLine" desc = "返线流通卡">
  271. SELECT
  272. I.SCRAP_NUM AS SCRAP_STRAIGHT,
  273. I.Qualified_Num AS QUALIFIED_STRAIGHT,
  274. I.OFFLINE_NUM_TOTAL AS OFFLINE_STRAIGHT,
  275. I.BACKLINE_NUM_TOTAL AS BACKLINE_STRAIGHT,
  276. J.SCRAP_NUM AS SCRAP_TESTING,
  277. J.QUALIFIED_NUM AS QUALIFIED_TESTING,
  278. J.OFFLINE_NUM AS OFFLINE_TESTING,
  279. J.BACKLINE_NUM AS BACKLINE_TESTING,
  280. M.QUALIFIED_BRANCH AS QUALIFIED_BRANCH,
  281. M.OFFLINE_QUANTITY AS OFFLINE_QUANTITY,
  282. M.WASTE_QUANTITY AS WASTE_QUANTITY
  283. FROM MIL_STRAIGHTENING_RESULT I
  284. , MIL_ET_RESULT J
  285. , MIL_SURFACE_RESULT M
  286. WHERE I.JUDGE_STOVE_NO = J.JUDGE_STOVE_NO (+)
  287. AND I.JUDGE_STOVE_NO = M.JUDGE_STOVE_NO (+)
  288. AND I.JUDGE_STOVE_NO = ?
  289. AND NVL(I.PRO_PLAN_ID, '/') = NVL(?, '/')
  290. AND NVL(I.GX_PLAN_NO, '/') = NVL(?, '/')
  291. </query>
  292. <query id="FrmEddyCurrentTestingResult.UpdateMilPlanStatus" desc="更新主表Status">
  293. <![CDATA[
  294. update MIL_PLAN t set t.STATUS ='#STATUS#'
  295. where t.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  296. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  297. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  298. ]]>
  299. </query>
  300. <query id="FrmEddyCurrentTestingResult.getTestingPosition" desc="取探伤位置">
  301. <![CDATA[
  302. SELECT NVL(DECODE(MAX(D.POSITION_DESC), '管端', '1', '全长', '2', '0'), '0') TESTING_POSITION
  303. FROM MIL_PLAN T, CRAFT_ORD_DESIGN_STD_DIC D, CRAFT_ORD_DESIGN C
  304. WHERE C.DESGIN_KEY = D.DESGIN_KEY
  305. AND T.INDEX_SEQ = D.MSC_PLINE
  306. and D.PROCESS_CODE = 'D'
  307. AND C.VALIDFLAG = '1'
  308. AND D.SPECL_FL = '2'
  309. --AND D.PHY_CODE = 'P0044'
  310. AND SUBSTR(T.ORD_LN_DLY_PK, 1, 35) = C.ORD_LN_PK
  311. AND T.ID = ?
  312. ]]>
  313. </query>
  314. <query id="FrmEddyCurrentTestingResult.InsertETResult" desc="插入ET实绩">
  315. <![CDATA[
  316. insert into Mil_Et_Result
  317. (RESULT_NO,
  318. LOT_NO,
  319. STOVE_NO,
  320. JUDGE_STOVE_NO,
  321. PLINE_CODE,
  322. START_TIME,
  323. COL_MODE,
  324. COL_USER,
  325. COL_SHIFT,
  326. COL_GROUP,
  327. PRODUCT_STANDARDS,
  328. INSPECTION_STANDARD,
  329. TESTING_METHOD,
  330. CALIBRATION_METHOD,
  331. USERID,
  332. SIGNID,
  333. ARTIFICIAL_DEFECT_SHAPE,
  334. EXCITATION_FREQUENCY1,
  335. EXCITATION_FREQUENCY2,
  336. EXCITATION_FREQUENCY3,
  337. TESTING_SPEED1,
  338. TESTING_SPEED2,
  339. TESTING_SPEED3,
  340. PRO_PLAN_ID,
  341. GX_PLAN_NO,
  342. TESTING_POSITION)
  343. values
  344. ('#RESULT_NO#',
  345. '#LOT_NO#',
  346. '#STOVE_NO#',
  347. '#JUDGE_STOVE_NO#',
  348. '#PLINE_CODE#',
  349. SYSDATE,
  350. '#COL_MODE#',
  351. '#COL_USER#',
  352. '#COL_SHIFT#',
  353. '#COL_GROUP#',
  354. '#PRODUCT_STANDARDS#',
  355. '#INSPECTION_STANDARD#',
  356. '#TESTING_METHOD#',
  357. '#CALIBRATION_METHOD#',
  358. '#USERID#',
  359. '#SIGNID#',
  360. '#ARTIFICIAL_DEFECT_SHAPE#',
  361. '#EXCITATION_FREQUENCY1#',
  362. '#EXCITATION_FREQUENCY2#',
  363. '#EXCITATION_FREQUENCY3#',
  364. '#TESTING_SPEED1#',
  365. '#TESTING_SPEED2#',
  366. '#TESTING_SPEED3#',
  367. '#PRO_PLAN_ID#',
  368. '#GX_PLAN_NO#',
  369. '#TESTING_POSITION#')
  370. ]]>
  371. </query>
  372. <query id="FrmEddyCurrentTestingResult.InsertMTResult" desc="插入MT实绩">
  373. INSERT INTO MIL_MT_RESULT
  374. (RESULT_NO,
  375. LOT_NO,
  376. STOVE_NO,
  377. JUDGE_STOVE_NO,
  378. PLINE_CODE,
  379. PRODUCT_STANDARDS,
  380. LO_SURFACE,
  381. LI_SURFACE,
  382. TO_SURFACE,
  383. TI_SURFACE,
  384. GROOVE_SHAPE,
  385. INSPECTION_STANDARD,
  386. LONGITUDINAL_CURRENT1,
  387. TRANSVERSE_CURRENT1,
  388. LONGITUDINAL_CURRENT2,
  389. TRANSVERSE_CURRENT2,
  390. SPEED1,
  391. SPEED2,
  392. DETECTION_SPEED1,
  393. DETECTION_SPEED2,
  394. SIGNID,
  395. START_TIME,
  396. EXECUTIVE_PRODUCER,
  397. PRODUCER_TIME,
  398. COL_MODE,
  399. COL_TIME,
  400. COL_USER,
  401. COL_SHIFT,
  402. COL_GROUP,
  403. PRO_PLAN_ID,
  404. GX_PLAN_NO,
  405. TESTING_POSITION)
  406. VALUES
  407. ('#RESULT_NO#',
  408. '#LOT_NO#',
  409. '#STOVE_NO#',
  410. '#JUDGE_STOVE_NO#',
  411. '#PLINE_CODE#',
  412. '#PRODUCT_STANDARDS#',
  413. '#LO_SURFACE#',
  414. '#LI_SURFACE#',
  415. '#TO_SURFACE#',
  416. '#TI_SURFACE#',
  417. '#GROOVE_SHAPE#',
  418. '#INSPECTION_STANDARD#',
  419. '#LONGITUDINAL_CURRENT1#',
  420. '#TRANSVERSE_CURRENT1#',
  421. '#LONGITUDINAL_CURRENT2#',
  422. '#TRANSVERSE_CURRENT2#',
  423. '#SPEED1#',
  424. '#SPEED2#',
  425. '#DETECTION_SPEED1#',
  426. '#DETECTION_SPEED2#',
  427. '#SIGNID#',
  428. SYSDATE,
  429. '#EXECUTIVE_PRODUCER#',
  430. SYSDATE,
  431. '#COL_MODE#',
  432. SYSDATE,
  433. '#COL_USER#',
  434. '#COL_SHIFT#',
  435. '#COL_GROUP#',
  436. '#PRO_PLAN_ID#',
  437. '#GX_PLAN_NO#',
  438. '#TESTING_POSITION#')
  439. </query>
  440. <query id="FrmEddyCurrentTestingResult.InsertUTResult" desc="插入UT实绩">
  441. INSERT INTO MIL_UL_RESUL(
  442. RESULT_NO,
  443. SIGNID,
  444. START_TIME,
  445. EXECUTIVE_PRODUCER,
  446. PRODUCER_TIME,
  447. COL_MODE,
  448. COL_TIME,
  449. COL_USER,
  450. COL_SHIFT,
  451. COL_GROUP,
  452. LOT_NO,
  453. STOVE_NO,
  454. JUDGE_STOVE_NO,
  455. PLINE_CODE,
  456. PRODUCT_STANDARDS,
  457. INSTRUMENT_TYPE,
  458. PROBE_TYPE,
  459. SENSTIVITY,
  460. INHIBITION,
  461. COUPLING_AGENT,
  462. SURFACE_APPEARANCE,
  463. LO_SURFACE,
  464. LI_SURFACE,
  465. TO_SURFACE,
  466. TI_SURFACE,
  467. PRO_PLAN_ID,
  468. GX_PLAN_NO)
  469. VALUES(
  470. '#RESULT_NO#',
  471. '#SIGNID#',
  472. SYSDATE,
  473. '#EXECUTIVE_PRODUCER#',
  474. SYSDATE,
  475. '#COL_MODE#',
  476. SYSDATE,
  477. '#COL_USER#',
  478. '#COL_SHIFT#',
  479. '#COL_GROUP#',
  480. '#LOT_NO#',
  481. '#STOVE_NO#',
  482. '#JUDGE_STOVE_NO#',
  483. '#PLINE_CODE#',
  484. '#PRODUCT_STANDARDS#',
  485. '#INSTRUMENT_TYPE#',
  486. '#PROBE_TYPE#',
  487. '#SENSTIVITY#',
  488. '#INHIBITION#',
  489. '#COUPLING_AGENT#',
  490. '#SURFACE_APPEARANCE#',
  491. '#LO_SURFACE#',
  492. '#LI_SURFACE#',
  493. '#TO_SURFACE#',
  494. '#TI_SURFACE#',
  495. '#PRO_PLAN_ID#',
  496. '#GX_PLAN_NO#')
  497. </query>
  498. <query id="FrmEddyCurrentTestingResult.TestingRackQuery" desc="查询探伤跟踪记录">
  499. <![CDATA[
  500. SELECT
  501. MAT_NO,
  502. LOT_NO,
  503. STOVE_NO,
  504. JUDGE_STOVE_NO,
  505. STEELCODE,
  506. STEELNAME,
  507. GRADECODE,
  508. GRADENAME,
  509. PLINE_CODE,
  510. CASE STATUS
  511. WHEN '0' THEN '正常轧制'
  512. WHEN '1'
  513. THEN '判废'
  514. WHEN '2' THEN '报警'
  515. END AS STATUS,
  516. ALARM_REASON,
  517. SCRAP_REASON,
  518. TO_CHAR(START_INSPECTION_TIME,
  519. 'YYYY-MM-DD HH24:MI:SS') START_INSPECTION_TIME,
  520. TO_CHAR(END_INSPECTION_TIME, 'YYYY-MM-DD HH24:MI:SS')
  521. END_INSPECTION_TIME,
  522. CASE OFFLINE_FLAG
  523. WHEN '0' THEN '未下线'
  524. WHEN '1' THEN '下线'
  525. WHEN '2' THEN '返线'
  526. End AS OFFLINE_FLAG,
  527. TO_CHAR(OFFLINE_TIME, 'YYYY-MM-DD HH24:MI:SS')
  528. OFFLINE_TIME,
  529. CASE FOLLOW_FLAG
  530. WHEN '0' THEN '未跟队'
  531. WHEN '1' THEN '跟队'
  532. END
  533. AS FOLLOW_FLAG,
  534. CASE GROUP_FLAG
  535. WHEN '0' THEN '未组炉'
  536. WHEN '1'
  537. THEN '组炉'
  538. END AS GROUP_FLAG,
  539. REMARK,
  540. SEQ,
  541. RETEST_NUM,
  542. case COL_SHIFT
  543. WHEN '0' THEN '常白班'
  544. WHEN '1' THEN '早班'
  545. WHEN '2' THEN '中班'
  546. WHEN '3' THEN '晚班' end as COL_SHIFT,
  547. case COL_GROUP
  548. WHEN '1' THEN '甲'
  549. WHEN '2' THEN '乙'
  550. WHEN '3' THEN '丙'
  551. WHEN '4' THEN '丁' end as COL_GROUP,
  552. case SUSPECT_FLAG
  553. WHEN '0' THEN '正常轧制'
  554. WHEN '1' THEN '可疑'
  555. END AS SUSPECT_FLAG,
  556. case RECUT_FLAG
  557. WHEN '0' THEN '不再切'
  558. WHEN '1' THEN '再切'
  559. END AS RECUT_FLAG,
  560. RECUT_LENGTH,
  561. CASE CHANGE_FLAG
  562. WHEN '0' THEN ''
  563. WHEN '1' THEN '确认交班'
  564. WHEN '2' THEN '待接班确认'
  565. END AS CHANGE_FLAG,
  566. PIPE_LENGTH,
  567. DECODE(COL_NO,'1','1号操作台','2','2号操作台',3,'3号操作台') COL_NO,
  568. '交班'CHANGE_GROUP,
  569. '接班'TAKE_OVER,
  570. DECODE(OFFLINE_TYPE,'1','未探伤下线','2','已探伤下线')OFFLINE_TYPE,
  571. OFFLINE_REASON,
  572. DECODE(SAMPLE_FLAG,'0','正常','1','留样')SAMPLE_FLAG
  573. FROM MIL_TESTING_RACK
  574. WHERE
  575. 1=1
  576. AND JUDGE_STOVE_NO=?
  577. AND NVL(PRO_PLAN_ID, '/') = NVL(?, '/')
  578. AND NVL(GX_PLAN_NO, '/') = NVL(?, '/')
  579. --AND offline_flag in (0,?)
  580. --AND COL_NO=?
  581. ORDER BY SEQ ASC
  582. ]]>
  583. <!-- CASE ALARM_REASON
  584. WHEN '1'
  585. THEN 'LOD'
  586. WHEN '2' THEN 'LID'
  587. WHEN '3' THEN 'TOD'
  588. WHEN '4' THEN 'TID'
  589. END AS -->
  590. </query>
  591. <query id="FrmEddyCurrentTestingResult.CheckTestRack" desc="">
  592. SELECT * FROM MIL_TESTING_RACK
  593. WHERE
  594. 1=1
  595. AND JUDGE_STOVE_NO=?
  596. AND COL_NO=?
  597. ORDER BY SEQ ASC,STATUS ASC
  598. </query>
  599. <query id="FrmEddyCurrentTestingResult.AddScrapSlabSeq" desc="新增剔除管号序列">
  600. <![CDATA[
  601. INSERT INTO MIL_SLAB_SCRAP_SEQ(
  602. JUDGE_STOVE_NO,
  603. PROCESS_NO,
  604. SEQ,
  605. TIME,
  606. FLAG,
  607. REMARK,
  608. COL_MODE,
  609. COL_TIME,
  610. COL_USER,
  611. COL_SHIFT,
  612. COL_GROUP,
  613. COL_NO)
  614. VALUES(
  615. '#JUDGE_STOVE_NO#',
  616. '#PROCESS_NO#',
  617. '#SEQ#',
  618. SYSDATE,
  619. '#FLAG#',
  620. '#REMARK#',
  621. '#COL_MODE#',
  622. SYSDATE,
  623. '#COL_USER#',
  624. '#COL_SHIFT#',
  625. '#COL_GROUP#',
  626. '#COL_NO#')
  627. ]]>
  628. </query>
  629. <query id="FrmEddyCurrentTestingResult.UpdateFurStatue" desc="修改探伤跟踪表物料状态">
  630. UPDATE Mil_Testing_Rack T
  631. SET
  632. STATUS = '1',
  633. SCRAP_REASON='#SCRAP_REASON#',
  634. SCRAP_TIME=SYSDATE
  635. WHERE
  636. SEQ = '#SEQ#'
  637. AND JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  638. </query>
  639. <query id="FrmEddyCurrentTestingResult.UpdateETFurScrapNum1" desc="修改探伤实绩表剔除支数">
  640. UPDATE Mil_Et_Result SET
  641. SCRAP_NUM1 = SCRAP_NUM1 + 1,
  642. SCRAP_NUM = SCRAP_NUM+1,
  643. QUALIFIED_NUM1= (case nvl(QUALIFIED_NUM1, 0) when 0 then 0 else QUALIFIED_NUM1- 1 end),
  644. QUALIFIED_NUM= (case nvl(QUALIFIED_NUM, 0) when 0 then 0 else QUALIFIED_NUM - 1 end)
  645. WHERE
  646. JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  647. </query>
  648. <query id="FrmEddyCurrentTestingResult.UpdateETFurScrapNum2" desc="修改探伤实绩表剔除支数">
  649. UPDATE Mil_Et_Result SET
  650. SCRAP_NUM2 = SCRAP_NUM2 + 1,
  651. SCRAP_NUM = SCRAP_NUM + 1,
  652. QUALIFIED_NUM2= (case nvl(QUALIFIED_NUM2, 0) when 0 then 0 else QUALIFIED_NUM2- 1 end),
  653. QUALIFIED_NUM= (case nvl(QUALIFIED_NUM, 0) when 0 then 0 else QUALIFIED_NUM- 1 end)
  654. WHERE
  655. JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  656. </query>
  657. <query id="FrmEddyCurrentTestingResult.UpdateETFurScrapNum3" desc="修改探伤实绩表剔除支数">
  658. UPDATE Mil_Et_Result SET
  659. SCRAP_NUM3 = SCRAP_NUM3 + 1,
  660. SCRAP_NUM = SCRAP_NUM + 1,
  661. QUALIFIED_NUM3= (case nvl(QUALIFIED_NUM3, 0) when 0 then 0 else QUALIFIED_NUM3- 1 end),
  662. QUALIFIED_NUM= (case nvl(QUALIFIED_NUM, 0) when 0 then 0 else QUALIFIED_NUM- 1 end)
  663. WHERE
  664. JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  665. </query>
  666. <query id="FrmEddyCurrentTestingResult.UpdateMTFurScrapNum1" desc="修改探伤实绩表剔除支数">
  667. UPDATE Mil_Mt_Result SET
  668. SCRAP_NUM1 = SCRAP_NUM1 + 1,
  669. SCRAP_NUM = SCRAP_NUM + 1,
  670. QUALIFIED_NUM1= (case nvl(QUALIFIED_NUM1, 0) when 0 then 0 else QUALIFIED_NUM1 - 1 end),
  671. QUALIFIED_NUM= (case nvl(QUALIFIED_NUM, 0) when 0 then 0 else QUALIFIED_NUM - 1 end)
  672. WHERE
  673. JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  674. </query>
  675. <query id="FrmEddyCurrentTestingResult.UpdateMTFurScrapNum2" desc="修改探伤实绩表剔除支数">
  676. UPDATE Mil_Mt_Result SET
  677. SCRAP_NUM2 = SCRAP_NUM2 + 1,
  678. SCRAP_NUM = SCRAP_NUM + 1,
  679. QUALIFIED_NUM2 = (case nvl(QUALIFIED_NUM2, 0) when 0 then 0 else QUALIFIED_NUM2 - 1 end),
  680. QUALIFIED_NUM = (case nvl(QUALIFIED_NUM, 0) when 0 then 0 else QUALIFIED_NUM - 1 end)
  681. WHERE
  682. JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  683. </query>
  684. <query id="FrmEddyCurrentTestingResult.UpdateULFurScrapNum1" desc="修改探伤实绩表剔除支数">
  685. UPDATE Mil_Ul_Resul SET
  686. SCRAP_NUM1 =SCRAP_NUM1 + 1,
  687. SCRAP_NUM = SCRAP_NUM + 1,
  688. QUALIFIED_NUM1=(case nvl(QUALIFIED_NUM1, 0) when 0 then 0 else QUALIFIED_NUM1 - 1 end),
  689. QUALIFIED_NUM= (case nvl(QUALIFIED_NUM, 0) when 0 then 0 else QUALIFIED_NUM - 1 end)
  690. WHERE
  691. JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  692. </query>
  693. <query id="FrmEddyCurrentTestingResult.UpdateULFurScrapNum2" desc="修改探伤实绩表剔除支数">
  694. UPDATE Mil_Ul_Resul SET
  695. SCRAP_NUM2 =SCRAP_NUM2 + 1,
  696. SCRAP_NUM = SCRAP_NUM + 1,
  697. QUALIFIED_NUM2=(case nvl(QUALIFIED_NUM2, 0) when 0 then 0 else QUALIFIED_NUM2 - 1 end),
  698. QUALIFIED_NUM= (case nvl(QUALIFIED_NUM, 0) when 0 then 0 else QUALIFIED_NUM - 1 end)
  699. WHERE
  700. JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  701. </query>
  702. <query id="FrmEddyCurrentTestingResult.UPdateTestRAckStatus"
  703. desc="更新复探跟踪表(插入状态,复探原因,更新复探支数">
  704. update
  705. MIL_TESTING_RACK t
  706. set t.STATUS ='2',
  707. t.RETEST_NUM=RETEST_NUM+1
  708. where
  709. t.JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  710. AND t.SEQ='#SEQ#'
  711. </query>
  712. <query id="FrmEddyCurrentTestingResult.UPdateETResultREINSPECTION_NUM1"
  713. desc="探伤实绩表复探支数+1">
  714. update MIL_ET_RESULT t
  715. set t.reinspection_num1=t.reinspection_num1+1,
  716. t.reinspection_num=t.reinspection_num+1
  717. where
  718. t.JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  719. </query>
  720. <query id="FrmEddyCurrentTestingResult.UPdateETResultREINSPECTION_NUM2"
  721. desc="探伤实绩表复探支数+1">
  722. update MIL_ET_RESULT t
  723. set t.reinspection_num2=t.reinspection_num2+1,
  724. t.reinspection_num=t.reinspection_num+1
  725. where
  726. t.JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  727. </query>
  728. <query id="FrmEddyCurrentTestingResult.UPdateETResultREINSPECTION_NUM3"
  729. desc="探伤实绩表复探支数+1">
  730. update MIL_ET_RESULT t
  731. set t.reinspection_num3=t.reinspection_num3+1,
  732. t.reinspection_num=t.reinspection_num+1
  733. where
  734. t.JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  735. </query>
  736. <query id="FrmEddyCurrentTestingResult.UPdateMTResultREINSPECTION_NUM1" desc="探伤实绩表复探支数+1">
  737. update MIL_MT_RESULT t
  738. set
  739. t.REINSPECTION_NUM=REINSPECTION_NUM+1,
  740. t.reinspection_num1=t.reinspection_num1+1
  741. where
  742. t.JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  743. </query>
  744. <query id="FrmEddyCurrentTestingResult.UPdateMTResultREINSPECTION_NUM2" desc="探伤实绩表复探支数+1">
  745. update MIL_MT_RESULT t
  746. set
  747. t.REINSPECTION_NUM=REINSPECTION_NUM+1,
  748. t.reinspection_num2=t.reinspection_num2+1
  749. where
  750. t.JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  751. </query>
  752. <query id="FrmEddyCurrentTestingResult.UPdateUTResultREINSPECTION_NUM1" desc="探伤实绩表复探支数+1">
  753. update Mil_Ul_Resul t
  754. set
  755. t.REINSPECTION_NUM=REINSPECTION_NUM+1,
  756. t.reinspection_num1=t.reinspection_num1+1
  757. where
  758. t.JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  759. </query>
  760. <query id="FrmEddyCurrentTestingResult.UPdateUTResultREINSPECTION_NUM2" desc="探伤实绩表复探支数+1">
  761. update Mil_Ul_Resul t
  762. set
  763. t.REINSPECTION_NUM=REINSPECTION_NUM+1,
  764. t.reinspection_num2=t.reinspection_num2+1
  765. where
  766. t.JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  767. </query>
  768. <query id="FrmEddyCurrentTestingResult.UPdateTestRAckStatusBACK" desc="">
  769. update
  770. MIL_TESTING_RACK t
  771. set t.STATUS ='0',
  772. t.RETEST_NUM=0
  773. where
  774. t.JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  775. AND t.SEQ='#SEQ#'
  776. </query>
  777. <query id="FrmEddyCurrentTestingResult.UPdateTestRAckNumBACK" desc="">
  778. update
  779. MIL_TESTING_RACK t
  780. set
  781. t.RETEST_NUM=t.RETEST_NUM-1
  782. where
  783. t.JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  784. AND t.SEQ='#SEQ#'
  785. </query>
  786. <query id="FrmEddyCurrentTestingResult.UPdateETResultREINSPECTION_NUM1BACK"
  787. desc="探伤实绩表复探支数+1">
  788. update MIL_ET_RESULT t
  789. set t.reinspection_num1=t.reinspection_num1-1,
  790. t.reinspection_num=t.reinspection_num-1
  791. where
  792. t.JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  793. </query>
  794. <query id="FrmEddyCurrentTestingResult.UPdateETResultREINSPECTION_NUM2BACK"
  795. desc="探伤实绩表复探支数+1">
  796. update MIL_ET_RESULT t
  797. set t.reinspection_num2=t.reinspection_num2-1,
  798. t.reinspection_num=t.reinspection_num-1
  799. where
  800. t.JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  801. </query>
  802. <query id="FrmEddyCurrentTestingResult.UPdateETResultREINSPECTION_NUM3BACK"
  803. desc="探伤实绩表复探支数+1">
  804. update MIL_ET_RESULT t
  805. set t.reinspection_num3=t.reinspection_num3-1,
  806. t.reinspection_num=t.reinspection_num-1
  807. where
  808. t.JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  809. </query>
  810. <query id="FrmEddyCurrentTestingResult.UPdateMTResultREINSPECTION_NUM1BACK" desc="探伤实绩表复探支数+1">
  811. update MIL_MT_RESULT t
  812. set
  813. t.REINSPECTION_NUM=REINSPECTION_NUM-1,
  814. t.reinspection_num1=t.reinspection_num1-1
  815. where
  816. t.JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  817. </query>
  818. <query id="FrmEddyCurrentTestingResult.UPdateMTResultREINSPECTION_NUM2BACK" desc="探伤实绩表复探支数+1">
  819. update MIL_MT_RESULT t
  820. set
  821. t.REINSPECTION_NUM=REINSPECTION_NUM-1,
  822. t.reinspection_num2=t.reinspection_num2-1
  823. where
  824. t.JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  825. </query>
  826. <query id="FrmEddyCurrentTestingResult.UPdateUTResultREINSPECTION_NUM1BACK" desc="探伤实绩表复探支数+1">
  827. update Mil_Ul_Resul t
  828. set
  829. t.REINSPECTION_NUM=REINSPECTION_NUM-1,
  830. t.reinspection_num1=t.reinspection_num1-1
  831. where
  832. t.JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  833. </query>
  834. <query id="FrmEddyCurrentTestingResult.UPdateUTResultREINSPECTION_NUM2BACK" desc="探伤实绩表复探支数+1">
  835. update Mil_Ul_Resul t
  836. set
  837. t.REINSPECTION_NUM=REINSPECTION_NUM-1,
  838. t.reinspection_num2=t.reinspection_num2-1
  839. where
  840. t.JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  841. </query>
  842. <query id="FrmEddyCurrentTestingResult.UpdatETResult" desc="更新ET探伤实绩表">
  843. UPDATE MIL_ET_RESULT
  844. SET PRODUCT_STANDARDS = '#PRODUCT_STANDARDS#',
  845. INSPECTION_STANDARD = '#INSPECTION_STANDARD#',
  846. TESTING_METHOD = '#TESTING_METHOD#',
  847. CALIBRATION_METHOD = '#CALIBRATION_METHOD#',
  848. ARTIFICIAL_DEFECT_SHAPE = '#ARTIFICIAL_DEFECT_SHAPE#',
  849. EXCITATION_FREQUENCY1 = '#EXCITATION_FREQUENCY1#',
  850. EXCITATION_FREQUENCY2 = '#EXCITATION_FREQUENCY2#',
  851. EXCITATION_FREQUENCY3 = '#EXCITATION_FREQUENCY3#',
  852. TESTING_SPEED1 = '#TESTING_SPEED1#',
  853. TESTING_SPEED2 = '#TESTING_SPEED2#',
  854. TESTING_SPEED3 = '#TESTING_SPEED3#',
  855. EXECUTIVE_PRODUCER = '#EXECUTIVE_PRODUCER#',
  856. PRODUCER_TIME = '#PRODUCER_TIME#',
  857. PRODUCER_TEL = '#PRODUCER_TEL#',
  858. REMARK = '#REMARK#',
  859. USERID = '#USERID#',
  860. SIGNID = '#SIGNID#',
  861. TESTING_TIME = '#TESTING_TIME#',
  862. REMARK2 = '#REMARK2#',
  863. START_TIME = to_date('#START_TIME#',
  864. 'yyyy-mm-dd hh24:mi:ss')
  865. WHERE JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  866. AND NVL(PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  867. AND NVL(GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  868. </query>
  869. <query id="FrmEddyCurrentTestingResult.UpdatETResultnum1" desc="ET1#台更新支数">
  870. UPDATE MIL_ET_RESULT SET
  871. NODE_FUR_FLAG1='#NODE_FUR_FLAG1#',
  872. SCRAP_NUM1='#SCRAP_NUM1#',
  873. QUALIFIED_NUM1='#QUALIFIED_NUM1#',
  874. REINSPECTION_NUM1='#REINSPECTION_NUM1#',
  875. REINSPECTION_QUALIFIED_NUM1='#REINSPECTION_QUALIFIED_NUM1#',
  876. DETECTION_NUM1='#DETECTION_NUM1#',
  877. SUSPECT_PRODUCT_NUM1='#SUSPECT_PRODUCT_NUM1#',
  878. SCRAP_NUM='#SCRAP_NUM1#'+SCRAP_NUM2+SCRAP_NUM3,
  879. QUALIFIED_NUM='#QUALIFIED_NUM1#'+QUALIFIED_NUM2+QUALIFIED_NUM3,
  880. REINSPECTION_NUM='#REINSPECTION_NUM1#'+REINSPECTION_NUM2+REINSPECTION_NUM3,
  881. REINSPECTION_QUALIFIED_NUM='#REINSPECTION_QUALIFIED_NUM1#'+REINSPECTION_QUALIFIED_NUM2+REINSPECTION_QUALIFIED_NUM3,
  882. DETECTION_NUM='#DETECTION_NUM1#'+DETECTION_NUM2+DETECTION_NUM3,
  883. SUSPECT_PRODUCT_NUM='#SUSPECT_PRODUCT_NUM1#'+SUSPECT_PRODUCT_NUM2+SUSPECT_PRODUCT_NUM3,
  884. QA_TON=QA_TON+'#QA_TON#'
  885. WHERE JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  886. </query>
  887. <query id="FrmEddyCurrentTestingResult.UpdatETResultnum2" desc="ET2#台更新支数">
  888. UPDATE MIL_ET_RESULT SET
  889. NODE_FUR_FLAG2='#NODE_FUR_FLAG2#',
  890. SCRAP_NUM2='#SCRAP_NUM2#',
  891. QUALIFIED_NUM2='#QUALIFIED_NUM2#',
  892. REINSPECTION_NUM2='#REINSPECTION_NUM2#',
  893. REINSPECTION_QUALIFIED_NUM2='#REINSPECTION_QUALIFIED_NUM2#',
  894. DETECTION_NUM2='#DETECTION_NUM2#',
  895. SUSPECT_PRODUCT_NUM2='#SUSPECT_PRODUCT_NUM2#',
  896. SCRAP_NUM='#SCRAP_NUM2#'+SCRAP_NUM1+SCRAP_NUM3,
  897. QUALIFIED_NUM='#QUALIFIED_NUM2#'+QUALIFIED_NUM1+QUALIFIED_NUM3,
  898. REINSPECTION_NUM='#REINSPECTION_NUM2#'+REINSPECTION_NUM1+REINSPECTION_NUM3,
  899. REINSPECTION_QUALIFIED_NUM='#REINSPECTION_QUALIFIED_NUM2#'+REINSPECTION_QUALIFIED_NUM1+REINSPECTION_QUALIFIED_NUM3,
  900. DETECTION_NUM='#DETECTION_NUM2#'+DETECTION_NUM1+DETECTION_NUM3,
  901. SUSPECT_PRODUCT_NUM='#SUSPECT_PRODUCT_NUM2#'+SUSPECT_PRODUCT_NUM1+SUSPECT_PRODUCT_NUM3,
  902. QA_TON=QA_TON+'#QA_TON#'
  903. WHERE JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  904. </query>
  905. <query id="FrmEddyCurrentTestingResult.UpdatETResultnum3" desc="ET3#台更新支数">
  906. UPDATE MIL_ET_RESULT SET
  907. NODE_FUR_FLAG3='#NODE_FUR_FLAG3#',
  908. SCRAP_NUM3='#SCRAP_NUM3#',
  909. QUALIFIED_NUM3='#QUALIFIED_NUM3#',
  910. REINSPECTION_NUM3='#REINSPECTION_NUM3#',
  911. REINSPECTION_QUALIFIED_NUM3='#REINSPECTION_QUALIFIED_NUM3#',
  912. DETECTION_NUM3='#DETECTION_NUM3#',
  913. SUSPECT_PRODUCT_NUM3='#SUSPECT_PRODUCT_NUM3#',
  914. SCRAP_NUM='#SCRAP_NUM3#'+SCRAP_NUM1+SCRAP_NUM2,
  915. QUALIFIED_NUM='#QUALIFIED_NUM3#'+QUALIFIED_NUM1+QUALIFIED_NUM2,
  916. REINSPECTION_NUM='#REINSPECTION_NUM3#'+REINSPECTION_NUM1+REINSPECTION_NUM2,
  917. REINSPECTION_QUALIFIED_NUM='#REINSPECTION_QUALIFIED_NUM3#'+REINSPECTION_QUALIFIED_NUM1+REINSPECTION_QUALIFIED_NUM2,
  918. DETECTION_NUM='#DETECTION_NUM3#'+DETECTION_NUM1+DETECTION_NUM2,
  919. SUSPECT_PRODUCT_NUM='#SUSPECT_PRODUCT_NUM3#'+SUSPECT_PRODUCT_NUM1+SUSPECT_PRODUCT_NUM2,
  920. QA_TON=QA_TON+'#QA_TON#'
  921. WHERE JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  922. </query>
  923. <query id="FrmEddyCurrentTestingResult.UpdatMTResult" desc="更新MT探伤实绩表">
  924. UPDATE MIL_MT_RESULT
  925. SET PRODUCT_STANDARDS = '#PRODUCT_STANDARDS#',
  926. LO_SURFACE = '#LO_SURFACE#',
  927. LI_SURFACE = '#LI_SURFACE#',
  928. TO_SURFACE = '#TO_SURFACE#',
  929. TI_SURFACE = '#TI_SURFACE#',
  930. GROOVE_SHAPE = '#GROOVE_SHAPE#',
  931. INSPECTION_STANDARD = '#INSPECTION_STANDARD#',
  932. LONGITUDINAL_CURRENT1 = '#LONGITUDINAL_CURRENT1#',
  933. TRANSVERSE_CURRENT1 = '#TRANSVERSE_CURRENT1#',
  934. LONGITUDINAL_CURRENT2 = '#LONGITUDINAL_CURRENT2#',
  935. TRANSVERSE_CURRENT2 = '#TRANSVERSE_CURRENT2#',
  936. SPEED1 = '#SPEED1#',
  937. SPEED2 = '#SPEED2#',
  938. DETECTION_SPEED1 = '#DETECTION_SPEED1#',
  939. DETECTION_SPEED2 = '#DETECTION_SPEED2#',
  940. USERID = '#USERID#',
  941. SIGNID = '#SIGNID#',
  942. EXECUTIVE_PRODUCER = '#EXECUTIVE_PRODUCER#',
  943. PRODUCER_TEL = '#PRODUCER_TEL#',
  944. REMARK = '#REMARK#',
  945. START_TIME = to_date('#START_TIME#',
  946. 'yyyy-mm-dd hh24:mi:ss')
  947. WHERE JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  948. AND NVL(PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  949. AND NVL(GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  950. </query>
  951. <query id="FrmEddyCurrentTestingResult.UpdatMTResultnum1" desc="MT1#台更新支数">
  952. UPDATE MIL_MT_RESULT SET
  953. NODE_FUR_FLAG1='#NODE_FUR_FLAG1#',
  954. SCRAP_NUM1='#SCRAP_NUM1#',
  955. QUALIFIED_NUM1='#QUALIFIED_NUM1#',
  956. REINSPECTION_NUM1='#REINSPECTION_NUM1#',
  957. REINSPECTION_QUALIFIED_NUM1='#REINSPECTION_QUALIFIED_NUM1#',
  958. DETECTION_NUM1='#DETECTION_NUM1#',
  959. SUSPECT_PRODUCT_NUM1='#SUSPECT_PRODUCT_NUM1#',
  960. SCRAP_NUM='#SCRAP_NUM1#'+SCRAP_NUM2,
  961. QUALIFIED_NUM='#QUALIFIED_NUM1#'+QUALIFIED_NUM2,
  962. REINSPECTION_NUM='#REINSPECTION_NUM1#'+REINSPECTION_NUM2,
  963. REINSPECTION_QUALIFIED_NUM='#REINSPECTION_QUALIFIED_NUM1#'+REINSPECTION_QUALIFIED_NUM2,
  964. DETECTION_NUM='#DETECTION_NUM1#'+DETECTION_NUM2,
  965. ALARM_NUM='#SUSPECT_PRODUCT_NUM1#'+SUSPECT_PRODUCT_NUM2,
  966. QA_TON=QA_TON+'#QA_TON#'
  967. WHERE JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  968. </query>
  969. <query id="FrmEddyCurrentTestingResult.UpdatMTResultnum2" desc="MT2#台更新支数">
  970. UPDATE MIL_MT_RESULT SET
  971. NODE_FUR_FLAG2='#NODE_FUR_FLAG2#',
  972. SCRAP_NUM2='#SCRAP_NUM2#',
  973. QUALIFIED_NUM2='#QUALIFIED_NUM2#',
  974. REINSPECTION_NUM2='#REINSPECTION_NUM2#',
  975. REINSPECTION_QUALIFIED_NUM2='#REINSPECTION_QUALIFIED_NUM2#',
  976. DETECTION_NUM2='#DETECTION_NUM2#',
  977. SUSPECT_PRODUCT_NUM2='#SUSPECT_PRODUCT_NUM2#',
  978. SCRAP_NUM='#SCRAP_NUM2#'+SCRAP_NUM1,
  979. QUALIFIED_NUM='#QUALIFIED_NUM2#'+QUALIFIED_NUM1,
  980. REINSPECTION_NUM='#REINSPECTION_NUM2#'+REINSPECTION_NUM1,
  981. REINSPECTION_QUALIFIED_NUM='#REINSPECTION_QUALIFIED_NUM2#'+REINSPECTION_QUALIFIED_NUM1,
  982. DETECTION_NUM='#DETECTION_NUM2#'+DETECTION_NUM1,
  983. ALARM_NUM='#SUSPECT_PRODUCT_NUM2#'+SUSPECT_PRODUCT_NUM1,
  984. QA_TON=QA_TON+'#QA_TON#'
  985. WHERE JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  986. </query>
  987. <query id="FrmEddyCurrentTestingResult.UpdatUTResult" desc="更新UT探伤实绩">
  988. UPDATE MIL_UL_RESUL
  989. SET PRODUCT_STANDARDS = '#PRODUCT_STANDARDS#',
  990. INSTRUMENT_TYPE = '#INSTRUMENT_TYPE#',
  991. PROBE_TYPE = '#PROBE_TYPE#',
  992. SENSTIVITY = '#SENSTIVITY#',
  993. INHIBITION = '#INHIBITION#',
  994. COUPLING_AGENT = '#COUPLING_AGENT#',
  995. SURFACE_APPEARANCE = '#SURFACE_APPEARANCE#',
  996. LO_SURFACE = '#LO_SURFACE#',
  997. LI_SURFACE = '#LI_SURFACE#',
  998. TO_SURFACE = '#TO_SURFACE#',
  999. TI_SURFACE = '#TI_SURFACE#',
  1000. USERID = '#USERID#',
  1001. SIGNID = '#SIGNID#',
  1002. EXECUTIVE_PRODUCER = '#EXECUTIVE_PRODUCER#',
  1003. PRODUCER_TIME = SYSDATE,
  1004. PRODUCER_TEL = '#PRODUCER_TEL#',
  1005. REMARK = '#REMARK#',
  1006. START_TIME = to_date('#START_TIME#', 'yyyy-mm-dd hh24:mi:ss')
  1007. WHERE JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1008. AND NVL(PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  1009. AND NVL(GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  1010. </query>
  1011. <query id="FrmEddyCurrentTestingResult.UpdatUTResultnum1" desc="UT1#台更新支数">
  1012. UPDATE MIL_UL_RESUL
  1013. SET NODE_FUR_FLAG1 = '#NODE_FUR_FLAG1#',
  1014. SCRAP_NUM1 = '#SCRAP_NUM1#',
  1015. QUALIFIED_NUM1 = '#QUALIFIED_NUM1#',
  1016. REINSPECTION_NUM1 = '#REINSPECTION_NUM1#',
  1017. REINSPECTION_QUALIFIED_NUM1 = '#REINSPECTION_QUALIFIED_NUM1#',
  1018. DETECTION_NUM1 = '#DETECTION_NUM1#',
  1019. SUSPECT_PRODUCT_NUM1 = '#SUSPECT_PRODUCT_NUM1#',
  1020. SCRAP_NUM = '#SCRAP_NUM1#' + SCRAP_NUM2,
  1021. QUALIFIED_NUM = '#QUALIFIED_NUM1#' + QUALIFIED_NUM2,
  1022. REINSPECTION_NUM = '#REINSPECTION_NUM1#' +
  1023. REINSPECTION_NUM2,
  1024. REINSPECTION_QUALIFIED_NUM = '#REINSPECTION_QUALIFIED_NUM1#' +
  1025. REINSPECTION_QUALIFIED_NUM2,
  1026. DETECTION_NUM = '#DETECTION_NUM1#' + DETECTION_NUM2,
  1027. ALARM_NUM = '#SUSPECT_PRODUCT_NUM1#' +
  1028. SUSPECT_PRODUCT_NUM2,
  1029. QA_TON = QA_TON + '#QA_TON#'
  1030. WHERE JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1031. AND NVL(PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  1032. AND NVL(GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  1033. </query>
  1034. <query id="FrmEddyCurrentTestingResult.UpdatUTResultnum2" desc="UT2#台更新支数">
  1035. UPDATE MIL_UL_RESUL
  1036. SET NODE_FUR_FLAG2 = '#NODE_FUR_FLAG2#',
  1037. SCRAP_NUM2 = '#SCRAP_NUM2#',
  1038. QUALIFIED_NUM2 = '#QUALIFIED_NUM2#',
  1039. REINSPECTION_NUM2 = '#REINSPECTION_NUM2#',
  1040. REINSPECTION_QUALIFIED_NUM2 = '#REINSPECTION_QUALIFIED_NUM2#',
  1041. DETECTION_NUM2 = '#DETECTION_NUM2#',
  1042. SUSPECT_PRODUCT_NUM2 = '#SUSPECT_PRODUCT_NUM2#',
  1043. SCRAP_NUM = '#SCRAP_NUM2#' + SCRAP_NUM1,
  1044. QUALIFIED_NUM = '#QUALIFIED_NUM2#' + QUALIFIED_NUM1,
  1045. REINSPECTION_NUM = '#REINSPECTION_NUM2#' +
  1046. REINSPECTION_NUM1,
  1047. REINSPECTION_QUALIFIED_NUM = '#REINSPECTION_QUALIFIED_NUM2#' +
  1048. REINSPECTION_QUALIFIED_NUM1,
  1049. DETECTION_NUM = '#DETECTION_NUM2#' + DETECTION_NUM1,
  1050. ALARM_NUM = '#SUSPECT_PRODUCT_NUM2#' +
  1051. SUSPECT_PRODUCT_NUM1,
  1052. QA_TON = QA_TON + '#QA_TON#'
  1053. WHERE JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1054. AND NVL(PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  1055. AND NVL(GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  1056. </query>
  1057. <query id="FrmEddyCurrentTestingResult.GetMIL_STRAIGHTENING_RESULT"
  1058. desc="查询矫直实绩表">
  1059. select t.Node_Fur_Flag, QUALIFIED_NUM
  1060. from Mil_Straightening_Result t
  1061. where t.judge_stove_no = ?
  1062. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  1063. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  1064. </query>
  1065. <query id="FrmEddyCurrentTestingResult.UpdateETResultNODE" desc="更新实绩表(包括结炉时间,结炉状态)">
  1066. UPDATE MIL_ET_RESULT
  1067. SET PRODUCT_STANDARDS = '#PRODUCT_STANDARDS#',
  1068. INSPECTION_STANDARD = '#INSPECTION_STANDARD#',
  1069. TESTING_METHOD = '#TESTING_METHOD#',
  1070. CALIBRATION_METHOD = '#CALIBRATION_METHOD#',
  1071. ARTIFICIAL_DEFECT_SHAPE = '#ARTIFICIAL_DEFECT_SHAPE#',
  1072. EXCITATION_FREQUENCY1 = '#EXCITATION_FREQUENCY1#',
  1073. EXCITATION_FREQUENCY2 = '#EXCITATION_FREQUENCY2#',
  1074. EXCITATION_FREQUENCY3 = '#EXCITATION_FREQUENCY3#',
  1075. TESTING_SPEED1 = '#TESTING_SPEED1#',
  1076. TESTING_SPEED2 = '#TESTING_SPEED2#',
  1077. TESTING_SPEED3 = '#TESTING_SPEED3#',
  1078. DETECTION_NUM = '#DETECTION_NUM#',
  1079. SUSPECT_PRODUCT_NUM = '#SUSPECT_PRODUCT_NUM#',
  1080. SUSPICIOUS_REASON = '#SUSPICIOUS_REASON#',
  1081. REINSPECTION_NUM = '#REINSPECTION_NUM#',
  1082. REINSPECTION_QUALIFIED_NUM = '#REINSPECTION_QUALIFIED_NUM#',
  1083. SCRAP_NUM = '#SCRAP_NUM#',
  1084. SCRAP_REASON = '#SCRAP_REASON#',
  1085. QUALIFIED_NUM = '#QUALIFIED_NUM#',
  1086. EXECUTIVE_PRODUCER = '#EXECUTIVE_PRODUCER#',
  1087. PRODUCER_TIME = '#PRODUCER_TIME#',
  1088. PRODUCER_TEL = '#PRODUCER_TEL#',
  1089. REMARK = '#REMARK#',
  1090. USERID = '#USERID#',
  1091. SIGNID = '#SIGNID#',
  1092. TESTING_TIME = '#TESTING_TIME#',
  1093. REMARK2 = '#REMARK2#',
  1094. END_TIME = SYSDATE,
  1095. NODE_FUR_FLAG = '1'
  1096. WHERE JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1097. AND NVL(PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  1098. AND NVL(GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  1099. </query>
  1100. <query id="FrmEddyCurrentTestingResult.UpdateMTResultNODE" desc="更新MT结炉时间,结炉状态">
  1101. update MIL_MT_RESULT t set
  1102. t.end_time=SYSDATE,
  1103. t.node_fur_flag='1'
  1104. where t.JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  1105. </query>
  1106. <query id="FrmEddyCurrentTestingResult.UpdateUTResultNODE" desc="更新UT结炉时间,结炉状态">
  1107. update Mil_Ul_Resul t set
  1108. t.end_time=SYSDATE,
  1109. t.node_fur_flag='1'
  1110. where t.JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  1111. </query>
  1112. <query id="FrmEddyCurrentTestingResult.UpdateMilPlanNode" desc="更新主表NODE_STATUS">
  1113. update MIL_PLAN t set t.node_status='90'
  1114. WHERE JUDGE_STOVE_NO='#JUDGE_STOVE_NO#'
  1115. </query>
  1116. <query id="FrmEddyCurrentTestingResult.UpdateRackShift" desc="">
  1117. UPDATE MIL_TESTING_RACK T
  1118. SET
  1119. T.COL_USER = '#COL_USER#',
  1120. T.COL_SHIFT = '#COL_SHIFT#',
  1121. T.COL_GROUP = '#COL_GROUP#'
  1122. WHERE
  1123. T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1124. AND T.COL_USER is null
  1125. AND T.COL_SHIFT is null
  1126. AND T.COL_GROUP is null
  1127. AND T.MAT_NO is not null
  1128. </query>
  1129. <query id="FrmEddyCurrentTestingResult.UpdateETResultShift" desc="">
  1130. UPDATE MIL_ET_RESULT T
  1131. SET T.COL_SHIFT = '#COL_SHIFT#',
  1132. T.COL_GROUP = '#COL_GROUP#',
  1133. T.COL_USER = '#COL_USER#'
  1134. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1135. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  1136. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  1137. </query>
  1138. <query id="FrmEddyCurrentTestingResult.UpdateMTResultShift" desc="">
  1139. UPDATE MIL_MT_RESULT T
  1140. SET T.COL_SHIFT = '#COL_SHIFT#',
  1141. T.COL_GROUP = '#COL_GROUP#',
  1142. T.COL_USER = '#COL_USER#'
  1143. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1144. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  1145. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  1146. </query>
  1147. <query id="FrmEddyCurrentTestingResult.UpdateUTResultShift" desc="">
  1148. UPDATE MIL_UL_RESUL T
  1149. SET T.COL_SHIFT = '#COL_SHIFT#',
  1150. T.COL_GROUP = '#COL_GROUP#',
  1151. T.COL_USER = '#COL_USER#'
  1152. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1153. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  1154. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  1155. </query>
  1156. <query id = "FrmEddyCurrentTestingResult.UpdtaeRackShift" desc = "修改管号队列班次班组">
  1157. <![CDATA[
  1158. DECLARE
  1159. V_SEQ MIL_TESTING_RACK.SEQ%TYPE := 0;
  1160. V_OFFLINECOUNT MIL_TESTING_RACK.SEQ%TYPE := 0;
  1161. BEGIN
  1162. SELECT NVL(COUNT(1), 0)
  1163. INTO V_OFFLINECOUNT
  1164. FROM MIL_TESTING_RACK T
  1165. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1166. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  1167. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  1168. AND T.RESULT_NO = '#RESULT_NO#';
  1169. SELECT NVL(MAX(T.SEQ), 0)
  1170. INTO V_SEQ
  1171. FROM MIL_TESTING_RACK T
  1172. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1173. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  1174. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  1175. AND T.RESULT_NO = '#RESULT_NO#'
  1176. AND T.CHANGE_FLAG = '1';
  1177. UPDATE MIL_TESTING_RACK T
  1178. SET T.COL_SHIFT = '#COL_SHIFT#', T.COL_GROUP = '#COL_GROUP#'
  1179. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1180. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  1181. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  1182. AND T.OFFLINE_FLAG = '1'
  1183. AND T.COL_SHIFT IS NULL
  1184. AND T.COL_GROUP IS NULL;
  1185. UPDATE MIL_TESTING_RACK T
  1186. SET T.COL_SHIFT = '#COL_SHIFT#', T.COL_GROUP = '#COL_GROUP#'
  1187. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1188. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  1189. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  1190. AND T.OFFLINE_FLAG = '0'
  1191. AND T.COL_SHIFT IS NULL
  1192. AND T.COL_GROUP IS NULL
  1193. AND T.SEQ >= 1
  1194. AND ROWNUM <= #QUALIFIED_NUM# + #SCRAP_NUM# + #SAMPLE_NUM# +
  1195. V_OFFLINECOUNT - V_SEQ;
  1196. END;
  1197. ]]>
  1198. </query>
  1199. <query id="FrmEddyCurrentTestingResult.GetETResultNodeQuery" desc="查询结炉实绩">
  1200. SELECT
  1201. SCRAP_NUM1,
  1202. QUALIFIED_NUM1,
  1203. REINSPECTION_NUM1,
  1204. REINSPECTION_QUALIFIED_NUM1,
  1205. OFFLINE_NUM1,
  1206. BACKLINE_NUM1,
  1207. SCRAP_NUM2,
  1208. QUALIFIED_NUM2,
  1209. REINSPECTION_NUM2,
  1210. REINSPECTION_QUALIFIED_NUM2,
  1211. OFFLINE_NUM2,
  1212. BACKLINE_NUM2,
  1213. SCRAP_NUM3,
  1214. QUALIFIED_NUM3,
  1215. REINSPECTION_NUM3,
  1216. REINSPECTION_QUALIFIED_NUM3,
  1217. OFFLINE_NUM3,
  1218. BACKLINE_NUM3,
  1219. DETECTION_NUM1,
  1220. DETECTION_NUM2,
  1221. DETECTION_NUM3,
  1222. SUSPECT_PRODUCT_NUM1,
  1223. SUSPECT_PRODUCT_NUM2,
  1224. SUSPECT_PRODUCT_NUM3,
  1225. RESULT_NO,
  1226. LOT_NO,
  1227. STOVE_NO,
  1228. JUDGE_STOVE_NO,
  1229. PLINE_CODE,
  1230. BACKLINE_NUM,
  1231. OFFLINE_NUM,
  1232. PRODUCT_STANDARDS,
  1233. INSPECTION_STANDARD,
  1234. TESTING_METHOD,
  1235. CALIBRATION_METHOD,
  1236. ARTIFICIAL_DEFECT_SHAPE,
  1237. EXCITATION_FREQUENCY1,
  1238. EXCITATION_FREQUENCY2,
  1239. EXCITATION_FREQUENCY3,
  1240. TESTING_SPEED1,
  1241. TESTING_SPEED2,
  1242. TESTING_SPEED3,
  1243. DETECTION_NUM,
  1244. SUSPECT_PRODUCT_NUM,
  1245. REINSPECTION_NUM,
  1246. REINSPECTION_QUALIFIED_NUM,
  1247. SCRAP_NUM,
  1248. SCRAP_REASON,
  1249. QUALIFIED_NUM,
  1250. TO_CHAR(START_TIME, 'YYYY-MM-DD HH24:MI:SS') START_TIME,
  1251. TO_CHAR(END_TIME, 'YYYY-MM-DD HH24:MI:SS') END_TIME,
  1252. EXECUTIVE_PRODUCER,
  1253. TO_CHAR(PRODUCER_TIME, 'YYYY-MM-DD HH24:MI:SS') PRODUCER_TIME,
  1254. PRODUCER_TEL,
  1255. REMARK,
  1256. USERID,
  1257. SIGNID,
  1258. TO_CHAR(TESTING_TIME, 'YYYY-MM-DD HH24:MI:SS') TESTING_TIME,
  1259. DECODE(NODE_FUR_FLAG,'0','未结炉','1','结炉')NODE_FUR_FLAG,
  1260. REMARK2,
  1261. COL_MODE,
  1262. TO_CHAR(COL_TIME, 'YYYY-MM-DD HH24:MI:SS') COL_TIME,
  1263. COL_USER,
  1264. case COL_SHIFT
  1265. WHEN '0' THEN '常白班'
  1266. WHEN '1' THEN '早班'
  1267. WHEN '2' THEN '中班'
  1268. WHEN '3' THEN '晚班' end as COL_SHIFT,
  1269. case COL_GROUP
  1270. WHEN '1' THEN '甲'
  1271. WHEN '2' THEN '乙'
  1272. WHEN '3' THEN '丙'
  1273. WHEN '4' THEN '丁' end as COL_GROUP,
  1274. QA_TON,
  1275. CHANGE_NUM
  1276. FROM MIL_ET_RESULT
  1277. WHERE
  1278. 1=1
  1279. AND PLINE_CODE=?
  1280. AND COL_SHIFT=?
  1281. AND COL_GROUP=?
  1282. AND END_TIME BETWEEN TO_DATE(?,'YYYY-MM-DD HH24:MI:SS') AND TO_DATE(?,'YYYY-MM-DD HH24:MI:SS')
  1283. AND NODE_FUR_FLAG='1'
  1284. </query>
  1285. <query id="FrmEddyCurrentTestingResult.GetMTResultNodeQuery" desc="查询结炉实绩">
  1286. SELECT
  1287. SCRAP_NUM2,
  1288. QUALIFIED_NUM2,
  1289. REINSPECTION_NUM2,
  1290. REINSPECTION_QUALIFIED_NUM2,
  1291. OFFLINE_NUM2,
  1292. BACKLINE_NUM2,
  1293. SCRAP_NUM1,
  1294. QUALIFIED_NUM1,
  1295. REINSPECTION_NUM1,
  1296. REINSPECTION_QUALIFIED_NUM1,
  1297. OFFLINE_NUM1,
  1298. BACKLINE_NUM1,
  1299. DETECTION_NUM1,
  1300. DETECTION_NUM2,
  1301. SUSPECT_PRODUCT_NUM1,
  1302. SUSPECT_PRODUCT_NUM2,
  1303. BACKLINE_NUM,
  1304. OFFLINE_NUM,
  1305. COL_NO,
  1306. RESULT_NO,
  1307. LOT_NO,
  1308. STOVE_NO,
  1309. JUDGE_STOVE_NO,
  1310. PLINE_CODE,
  1311. PRODUCT_STANDARDS,
  1312. LO_SURFACE,
  1313. LI_SURFACE,
  1314. TO_SURFACE,
  1315. TI_SURFACE,
  1316. GROOVE_SHAPE,
  1317. INSPECTION_STANDARD,
  1318. LONGITUDINAL_CURRENT1,
  1319. TRANSVERSE_CURRENT1,
  1320. LONGITUDINAL_CURRENT2,
  1321. TRANSVERSE_CURRENT2,
  1322. SPEED1,
  1323. SPEED2,
  1324. DETECTION_SPEED1,
  1325. DETECTION_SPEED2,
  1326. DETECTION_NUM,
  1327. ALARM_NUM,
  1328. SUSPICIOUS_REASON,
  1329. REINSPECTION_NUM,
  1330. REINSPECTION_QUALIFIED_NUM,
  1331. SCRAP_NUM,
  1332. SCRAP_REASON,
  1333. QUALIFIED_NUM,
  1334. USERID,
  1335. SIGNID,
  1336. TO_CHAR(START_TIME, 'YYYY-MM-DD HH24:MI:SS') START_TIME,
  1337. TO_CHAR(END_TIME, 'YYYY-MM-DD HH24:MI:SS') END_TIME,
  1338. EXECUTIVE_PRODUCER,
  1339. TO_CHAR(PRODUCER_TIME, 'YYYY-MM-DD HH24:MI:SS') PRODUCER_TIME,
  1340. PRODUCER_TEL,
  1341. DECODE(NODE_FUR_FLAG,'0','未结炉','1','结炉')NODE_FUR_FLAG,
  1342. REMARK,
  1343. COL_MODE,
  1344. TO_CHAR(COL_TIME, 'YYYY-MM-DD HH24:MI:SS') COL_TIME,
  1345. COL_USER,
  1346. case COL_SHIFT
  1347. WHEN '0' THEN '常白班'
  1348. WHEN '1' THEN '早班'
  1349. WHEN '2' THEN '中班'
  1350. WHEN '3' THEN '晚班' end as COL_SHIFT,
  1351. case COL_GROUP
  1352. WHEN '1' THEN '甲'
  1353. WHEN '2' THEN '乙'
  1354. WHEN '3' THEN '丙'
  1355. WHEN '4' THEN '丁' end as COL_GROUP,
  1356. QA_TON,
  1357. CHANGE_NUM
  1358. FROM MIL_MT_RESULT
  1359. WHERE
  1360. 1=1
  1361. AND PLINE_CODE=?
  1362. AND COL_SHIFT=?
  1363. AND COL_GROUP=?
  1364. AND END_TIME BETWEEN TO_DATE(?,'YYYY-MM-DD HH24:MI:SS') AND TO_DATE(?,'YYYY-MM-DD HH24:MI:SS')
  1365. AND NODE_FUR_FLAG='1'
  1366. </query>
  1367. <query id="FrmEddyCurrentTestingResult.GetUTResultNodeQuery" desc="查询结炉实绩">
  1368. SELECT
  1369. SCRAP_NUM2,
  1370. QUALIFIED_NUM2,
  1371. REINSPECTION_NUM2,
  1372. REINSPECTION_QUALIFIED_NUM2,
  1373. OFFLINE_NUM2,
  1374. BACKLINE_NUM2,
  1375. SCRAP_NUM1,
  1376. QUALIFIED_NUM1,
  1377. REINSPECTION_NUM1,
  1378. REINSPECTION_QUALIFIED_NUM1,
  1379. OFFLINE_NUM1,
  1380. BACKLINE_NUM1,
  1381. DETECTION_NUM1,
  1382. DETECTION_NUM2,
  1383. SUSPECT_PRODUCT_NUM1,
  1384. SUSPECT_PRODUCT_NUM2,
  1385. BACKLINE_NUM,
  1386. OFFLINE_NUM,
  1387. COL_NO,
  1388. RESULT_NO,
  1389. LOT_NO,
  1390. STOVE_NO,
  1391. JUDGE_STOVE_NO,
  1392. PLINE_CODE,
  1393. PRODUCT_STANDARDS,
  1394. INSTRUMENT_TYPE,
  1395. PROBE_TYPE,
  1396. SENSTIVITY,
  1397. INHIBITION,
  1398. COUPLING_AGENT,
  1399. SURFACE_APPEARANCE,
  1400. LO_SURFACE,
  1401. LI_SURFACE,
  1402. TO_SURFACE,
  1403. TI_SURFACE,
  1404. DETECTION_NUM,
  1405. ALARM_NUM,
  1406. SUSPICIOUS_REASON,
  1407. REINSPECTION_NUM,
  1408. REINSPECTION_QUALIFIED_NUM,
  1409. SCRAP_NUM,
  1410. SCRAP_REASON,
  1411. QUALIFIED_NUM,
  1412. USERID,
  1413. SIGNID,
  1414. TO_CHAR(START_TIME, 'YYYY-MM-DD HH24:MI:SS') START_TIME,
  1415. TO_CHAR(END_TIME, 'YYYY-MM-DD HH24:MI:SS') END_TIME,
  1416. EXECUTIVE_PRODUCER,
  1417. TO_CHAR(PRODUCER_TIME, 'YYYY-MM-DD HH24:MI:SS') PRODUCER_TIME,
  1418. PRODUCER_TEL,
  1419. NODE_FUR_FLAG,
  1420. REMARK,
  1421. COL_MODE,
  1422. TO_CHAR(COL_TIME, 'YYYY-MM-DD HH24:MI:SS') COL_TIME,
  1423. COL_USER,
  1424. case COL_SHIFT
  1425. WHEN '0' THEN '常白班'
  1426. WHEN '1' THEN '早班'
  1427. WHEN '2' THEN '中班'
  1428. WHEN '3' THEN '晚班' end as COL_SHIFT,
  1429. case COL_GROUP
  1430. WHEN '1' THEN '甲'
  1431. WHEN '2' THEN '乙'
  1432. WHEN '3' THEN '丙'
  1433. WHEN '4' THEN '丁' end as COL_GROUP,
  1434. QA_TON,
  1435. CHANGE_NUM
  1436. FROM MIL_UL_RESUL
  1437. WHERE
  1438. 1=1
  1439. AND PLINE_CODE=?
  1440. AND COL_SHIFT=?
  1441. AND COL_GROUP=?
  1442. AND END_TIME BETWEEN TO_DATE(?,'YYYY-MM-DD HH24:MI:SS') AND TO_DATE(?,'YYYY-MM-DD HH24:MI:SS')
  1443. AND NODE_FUR_FLAG='1'
  1444. </query>
  1445. <query id="FrmEddyCurrentTestingResult.UpdateSawRackASRowNo" desc="更新分切管号队列表修改数据">
  1446. UPDATE MIL_SAW_RACK T
  1447. SET
  1448. T.ORDER_LENGTH = '#ORDER_LENGTH#',
  1449. T.CUT_HEAD_LENGTH = '#CUT_HEAD_LENGTH#',
  1450. T.CUT_TRAIL_LENGTH = '#CUT_TRAIL_LENGTH#',
  1451. T.SAW_NO = '#SAW_NO#',
  1452. T.SAW_NO_N = '#SAW_NO_N#',
  1453. T.LAST_ORDER_LENGTH = '#LAST_ORDER_LENGTH#',
  1454. T.CUT_TYPE = '#CUT_TYPE#',
  1455. T.REAL_ROLL_LENGTH = '#REAL_ROLL_LENGTH#'
  1456. WHERE
  1457. T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1458. AND T.SEQ = '#SEQ#'
  1459. AND T.ROW_NO='#ROW_NO#'
  1460. </query>
  1461. <query id="FrmEddyCurrentTestingResult.QunumET1" desc="">
  1462. UPDATE MIL_ET_RESULT T
  1463. SET
  1464. T.DETECTION_NUM = '#DETECTION_NUM1#'+DETECTION_NUM2+DETECTION_NUM3,
  1465. T.QUALIFIED_NUM = '#QUALIFIED_NUM1#'+QUALIFIED_NUM2+QUALIFIED_NUM3,
  1466. T.QUALIFIED_NUM1 = '#QUALIFIED_NUM1#',
  1467. T.DETECTION_NUM1 = '#DETECTION_NUM1#'
  1468. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1469. </query>
  1470. <query id="FrmEddyCurrentTestingResult.QunumET2" desc="">
  1471. UPDATE MIL_ET_RESULT T
  1472. SET
  1473. T.DETECTION_NUM = '#DETECTION_NUM2#'+DETECTION_NUM1+DETECTION_NUM3,
  1474. T.QUALIFIED_NUM = '#QUALIFIED_NUM2#'+QUALIFIED_NUM1+QUALIFIED_NUM3,
  1475. T.QUALIFIED_NUM2 = '#QUALIFIED_NUM2#',
  1476. T.DETECTION_NUM2 = '#DETECTION_NUM2#'
  1477. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1478. </query>
  1479. <query id="FrmEddyCurrentTestingResult.QunumET3" desc="">
  1480. UPDATE MIL_ET_RESULT T
  1481. SET
  1482. T.DETECTION_NUM = '#DETECTION_NUM3#'+DETECTION_NUM1+DETECTION_NUM2,
  1483. T.QUALIFIED_NUM = '#QUALIFIED_NUM3#'+QUALIFIED_NUM1+QUALIFIED_NUM2,
  1484. T.QUALIFIED_NUM3 = '#QUALIFIED_NUM3#',
  1485. T.DETECTION_NUM3 = '#DETECTION_NUM3#'
  1486. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1487. </query>
  1488. <query id="FrmEddyCurrentTestingResult.QunumMT1" desc="">
  1489. UPDATE MIL_MT_RESULT T
  1490. SET
  1491. T.DETECTION_NUM = '#DETECTION_NUM1#'+DETECTION_NUM2,
  1492. T.QUALIFIED_NUM = '#QUALIFIED_NUM1#'+QUALIFIED_NUM2,
  1493. T.QUALIFIED_NUM1 = '#QUALIFIED_NUM1#',
  1494. T.DETECTION_NUM1 = '#DETECTION_NUM1#'
  1495. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1496. </query>
  1497. <query id="FrmEddyCurrentTestingResult.QunumMT2" desc="">
  1498. UPDATE MIL_MT_RESULT T
  1499. SET
  1500. T.DETECTION_NUM = '#DETECTION_NUM2#'+DETECTION_NUM1,
  1501. T.QUALIFIED_NUM = '#QUALIFIED_NUM2#'+QUALIFIED_NUM1,
  1502. T.QUALIFIED_NUM2 = '#QUALIFIED_NUM2#',
  1503. T.DETECTION_NUM2 = '#DETECTION_NUM2#'
  1504. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1505. </query>
  1506. <query id="FrmEddyCurrentTestingResult.QunumUT1" desc="">
  1507. UPDATE MIL_UL_RESUL T
  1508. SET
  1509. T.DETECTION_NUM = '#DETECTION_NUM1#'+DETECTION_NUM2,
  1510. T.QUALIFIED_NUM = '#QUALIFIED_NUM1#'+QUALIFIED_NUM2,
  1511. T.QUALIFIED_NUM1 = '#QUALIFIED_NUM1#',
  1512. T.DETECTION_NUM1 = '#DETECTION_NUM1#'
  1513. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1514. </query>
  1515. <query id="FrmEddyCurrentTestingResult.QunumUT2" desc="">
  1516. UPDATE MIL_UL_RESUL T
  1517. SET
  1518. T.DETECTION_NUM = '#DETECTION_NUM2#'+DETECTION_NUM1,
  1519. T.QUALIFIED_NUM = '#QUALIFIED_NUM2#'+QUALIFIED_NUM1,
  1520. T.QUALIFIED_NUM2 = '#QUALIFIED_NUM2#',
  1521. T.DETECTION_NUM2 = '#DETECTION_NUM2#'
  1522. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1523. </query>
  1524. <query id="FrmEddyCurrentTestingResult.CheckIpAddressisin" desc="">
  1525. SELECT
  1526. T.IP_ADDRESS1,
  1527. T.IP_ADDRESS2,
  1528. T.PROCESS_NO,
  1529. T.OPERAT_CODE,
  1530. T.OPERAT_NAME,
  1531. T.PLINE_CODE,
  1532. T.REMARK,
  1533. T.IP_ADDRESS3,
  1534. T.IP_ADDRESS4
  1535. FROM MIL_BASE_ADDRESS T
  1536. WHERE
  1537. T.PROCESS_NO != '#PROCESS_NO#'
  1538. OR T.OPERAT_CODE != '#OPERAT_CODE#'
  1539. AND T.PLINE_CODE = '#PLINE_CODE#'
  1540. </query>
  1541. <query id="FrmEddyCurrentTestingResult.Insertdetail1" desc="">
  1542. INSERT INTO MIL_TESTING_RESULT_DETAIL(
  1543. RESULT_NO,
  1544. LOT_NO,
  1545. STOVE_NO,
  1546. JUDGE_STOVE_NO,
  1547. PLINE_CODE,
  1548. START_TIME,
  1549. COL_USER,
  1550. COL_SHIFT,
  1551. COL_GROUP,
  1552. SCRAP_NUM1,
  1553. QUALIFIED_NUM1,
  1554. REINSPECTION_NUM1,
  1555. REINSPECTION_QUALIFIED_NUM1,
  1556. DETECTION_NUM1,
  1557. SUSPECT_PRODUCT_NUM1,
  1558. RECUT_NUM1,
  1559. SCRAP_NUM,
  1560. QUALIFIED_NUM,
  1561. REINSPECTION_NUM,
  1562. REINSPECTION_QUALIFIED_NUM,
  1563. DETECTION_NUM,
  1564. SUSPECT_PRODUCT_NUM,
  1565. RECUT_NUM)
  1566. VALUES(
  1567. '#RESULT_NO#',
  1568. '#LOT_NO#',
  1569. '#STOVE_NO#',
  1570. '#JUDGE_STOVE_NO#',
  1571. '#PLINE_CODE#',
  1572. SYSDATE,
  1573. '#COL_USER#',
  1574. '#COL_SHIFT#',
  1575. '#COL_GROUP#',
  1576. '#SCRAP_NUM1#',
  1577. '#QUALIFIED_NUM1#',
  1578. '#REINSPECTION_NUM1#',
  1579. '#REINSPECTION_QUALIFIED_NUM1#',
  1580. '#DETECTION_NUM1#',
  1581. '#SUSPECT_PRODUCT_NUM1#',
  1582. '#RECUT_NUM1#',
  1583. '#SCRAP_NUM1#',
  1584. '#QUALIFIED_NUM1#',
  1585. '#REINSPECTION_NUM1#',
  1586. '#REINSPECTION_QUALIFIED_NUM1#',
  1587. '#DETECTION_NUM1#',
  1588. '#SUSPECT_PRODUCT_NUM1#',
  1589. '#RECUT_NUM1#')
  1590. </query>
  1591. <query id="FrmEddyCurrentTestingResult.Insertdetail2" desc="">
  1592. INSERT INTO MIL_TESTING_RESULT_DETAIL(
  1593. RESULT_NO,
  1594. LOT_NO,
  1595. STOVE_NO,
  1596. JUDGE_STOVE_NO,
  1597. PLINE_CODE,
  1598. START_TIME,
  1599. COL_USER,
  1600. COL_SHIFT,
  1601. COL_GROUP,
  1602. SCRAP_NUM2,
  1603. QUALIFIED_NUM2,
  1604. REINSPECTION_NUM2,
  1605. REINSPECTION_QUALIFIED_NUM2,
  1606. DETECTION_NUM2,
  1607. SUSPECT_PRODUCT_NUM2,
  1608. RECUT_NUM2,
  1609. SCRAP_NUM,
  1610. QUALIFIED_NUM,
  1611. REINSPECTION_NUM,
  1612. REINSPECTION_QUALIFIED_NUM,
  1613. DETECTION_NUM,
  1614. SUSPECT_PRODUCT_NUM,
  1615. RECUT_NUM)
  1616. VALUES(
  1617. '#RESULT_NO#',
  1618. '#LOT_NO#',
  1619. '#STOVE_NO#',
  1620. '#JUDGE_STOVE_NO#',
  1621. '#PLINE_CODE#',
  1622. SYSDATE,
  1623. '#COL_USER#',
  1624. '#COL_SHIFT#',
  1625. '#COL_GROUP#',
  1626. '#SCRAP_NUM2#',
  1627. '#QUALIFIED_NUM2#',
  1628. '#REINSPECTION_NUM2#',
  1629. '#REINSPECTION_QUALIFIED_NUM2#',
  1630. '#DETECTION_NUM2#',
  1631. '#SUSPECT_PRODUCT_NUM2#',
  1632. '#RECUT_NUM2#',
  1633. '#SCRAP_NUM2#',
  1634. '#QUALIFIED_NUM2#',
  1635. '#REINSPECTION_NUM2#',
  1636. '#REINSPECTION_QUALIFIED_NUM2#',
  1637. '#DETECTION_NUM2#',
  1638. '#SUSPECT_PRODUCT_NUM2#',
  1639. '#RECUT_NUM2#')
  1640. </query>
  1641. <query id="FrmEddyCurrentTestingResult.Insertdetail3" desc="">
  1642. INSERT INTO MIL_TESTING_RESULT_DETAIL(
  1643. RESULT_NO,
  1644. LOT_NO,
  1645. STOVE_NO,
  1646. JUDGE_STOVE_NO,
  1647. PLINE_CODE,
  1648. START_TIME,
  1649. COL_USER,
  1650. COL_SHIFT,
  1651. COL_GROUP,
  1652. SCRAP_NUM3,
  1653. QUALIFIED_NUM3,
  1654. REINSPECTION_NUM3,
  1655. REINSPECTION_QUALIFIED_NUM3,
  1656. DETECTION_NUM3,
  1657. SUSPECT_PRODUCT_NUM3,
  1658. RECUT_NUM3,
  1659. SCRAP_NUM,
  1660. QUALIFIED_NUM,
  1661. REINSPECTION_NUM,
  1662. REINSPECTION_QUALIFIED_NUM,
  1663. DETECTION_NUM,
  1664. SUSPECT_PRODUCT_NUM,
  1665. RECUT_NUM)
  1666. VALUES(
  1667. '#RESULT_NO#',
  1668. '#LOT_NO#',
  1669. '#STOVE_NO#',
  1670. '#JUDGE_STOVE_NO#',
  1671. '#PLINE_CODE#',
  1672. SYSDATE,
  1673. '#COL_USER#',
  1674. '#COL_SHIFT#',
  1675. '#COL_GROUP#',
  1676. '#SCRAP_NUM3#',
  1677. '#QUALIFIED_NUM3#',
  1678. '#REINSPECTION_NUM3#',
  1679. '#REINSPECTION_QUALIFIED_NUM3#',
  1680. '#DETECTION_NUM3#',
  1681. '#SUSPECT_PRODUCT_NUM3#',
  1682. '#RECUT_NUM3#',
  1683. '#SCRAP_NUM3#',
  1684. '#QUALIFIED_NUM3#',
  1685. '#REINSPECTION_NUM3#',
  1686. '#REINSPECTION_QUALIFIED_NUM3#',
  1687. '#DETECTION_NUM3#',
  1688. '#SUSPECT_PRODUCT_NUM3#',
  1689. '#RECUT_NUM3#')
  1690. </query>
  1691. <query id="FrmEddyCurrentTestingResult.Insertdetaildse" desc="">
  1692. INSERT INTO MIL_TESTING_RESULT_DETAIL_DES(
  1693. RESULT_NO,
  1694. LOT_NO,
  1695. STOVE_NO,
  1696. JUDGE_STOVE_NO,
  1697. PLINE_CODE,
  1698. COL_USER,
  1699. COL_SHIFT,
  1700. COL_GROUP,
  1701. REASON,
  1702. REASON_NUMBER,
  1703. REASON_FLAG,
  1704. COL_NO)
  1705. VALUES(
  1706. '#RESULT_NO#',
  1707. '#LOT_NO#',
  1708. '#STOVE_NO#',
  1709. '#JUDGE_STOVE_NO#',
  1710. '#PLINE_CODE#',
  1711. '#COL_USER#',
  1712. '#COL_SHIFT#',
  1713. '#COL_GROUP#',
  1714. '#REASON#',
  1715. '#REASON_NUMBER#',
  1716. '#REASON_FLAG#',
  1717. '#COL_NO#')
  1718. </query>
  1719. <query id = "EddyCurrentTestingResult.doQueryOffine" desc = "查询是否存在下线支数">
  1720. SELECT T.JUDGE_STOVE_NO
  1721. FROM MIL_TESTING_RACK T
  1722. WHERE T.JUDGE_STOVE_NO = ?
  1723. AND T.PLINE_CODE = ?
  1724. AND T.OFFLINE_FLAG = '1'
  1725. AND (T.OFFLINE_TYPE = '1' or T.OFFLINE_TYPE = '2')
  1726. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  1727. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  1728. </query>
  1729. <query id = "EddyCurrentTestingResult.selectStraith" desc = "查询矫直合格支数">
  1730. SELECT T.QUALIFIED_NUM FROM MIL_STRAIGHTENING_RESULT T WHERE T.JUDGE_STOVE_NO = ?
  1731. </query>
  1732. <query id = "EddyCurrentTestingResult.insertSeq" desc = "插入剔除品序号">
  1733. </query>
  1734. <query id = "EddyCurrentTestingResult.getMtDetail" desc = "查询班次班组下的实绩">
  1735. SELECT
  1736. RECUT_LEN3,
  1737. TEST_NUM1,
  1738. TEST_NUM2,
  1739. TEST_NUM3,
  1740. REINSPECTION_NUM3,
  1741. REINSPECTION_QUALIFIED_NUM3,
  1742. OFFLINE_NUM3,
  1743. BACKLINE_NUM3,
  1744. DETECTION_NUM3,
  1745. SUSPECT_PRODUCT_NUM3,
  1746. RECUT_NUM3,
  1747. SCRAP_NUM,
  1748. QUALIFIED_NUM,
  1749. REINSPECTION_NUM,
  1750. REINSPECTION_QUALIFIED_NUM,
  1751. OFFLINE_NUM,
  1752. RECUT_LEN2,
  1753. DETECTION_NUM,
  1754. SUSPECT_PRODUCT_NUM,
  1755. RECUT_NUM,
  1756. REMARK,
  1757. COL_NO,
  1758. RECUT_LEN1,
  1759. RESULT_NO,
  1760. LOT_NO,
  1761. STOVE_NO,
  1762. JUDGE_STOVE_NO,
  1763. PLINE_CODE,
  1764. TO_CHAR(START_TIME, 'YYYY-MM-DD HH24:MI:SS') START_TIME,
  1765. TO_CHAR(END_TIME, 'YYYY-MM-DD HH24:MI:SS') END_TIME,
  1766. COL_USER,
  1767. COL_SHIFT,
  1768. COL_GROUP,
  1769. SCRAP_NUM1,
  1770. QUALIFIED_NUM1,
  1771. REINSPECTION_NUM1,
  1772. REINSPECTION_QUALIFIED_NUM1,
  1773. OFFLINE_NUM1,
  1774. BACKLINE_NUM1,
  1775. DETECTION_NUM1,
  1776. SUSPECT_PRODUCT_NUM1,
  1777. RECUT_NUM1,
  1778. SCRAP_NUM2,
  1779. QUALIFIED_NUM2,
  1780. REINSPECTION_NUM2,
  1781. REINSPECTION_QUALIFIED_NUM2,
  1782. OFFLINE_NUM2,
  1783. BACKLINE_NUM2,
  1784. DETECTION_NUM2,
  1785. SUSPECT_PRODUCT_NUM2,
  1786. RECUT_NUM2,
  1787. SCRAP_NUM3,
  1788. QUALIFIED_NUM3,
  1789. SAMPLE_NUM1,
  1790. SAMPLE_NUM2,
  1791. SAMPLE_NUM3
  1792. FROM MIL_TESTING_RESULT_DETAIL
  1793. WHERE JUDGE_STOVE_NO = ?
  1794. AND COL_SHIFT = ?
  1795. AND COL_GROUP = ?
  1796. AND NVL(PRO_PLAN_ID, '/') = NVL(?, '/')
  1797. AND NVL(GX_PLAN_NO, '/') = NVL(?, '/')
  1798. </query>
  1799. <query id = "EddyCurrentTestingResult.doQueryAlarmNum" desc = "查询可疑品">
  1800. SELECT T.REASON,T.REASON_NUMBER AS ACT_COUNT,'True' CHK
  1801. FROM MIL_TESTING_RESULT_DETAIL_DES T
  1802. WHERE T.RESULT_NO = ?
  1803. AND T.LOT_NO = ?
  1804. AND T.JUDGE_STOVE_NO = ?
  1805. AND T.COL_SHIFT = ?
  1806. AND T.COL_GROUP = ?
  1807. AND T.COL_NO = ?
  1808. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  1809. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  1810. AND T.REASON_FLAG = '可疑'
  1811. </query>
  1812. <query id = "EddyCurrentTestingResult.doQueryScrapNumS" desc = "查询剔除品">
  1813. SELECT T.REASON,T.REASON1,T.REASON_NUMBER AS ACT_COUNT,'True' CHK
  1814. FROM MIL_TESTING_RESULT_DETAIL_DES T
  1815. WHERE T.RESULT_NO = ?
  1816. AND T.LOT_NO = ?
  1817. AND T.JUDGE_STOVE_NO = ?
  1818. AND T.COL_SHIFT = ?
  1819. AND T.COL_GROUP = ?
  1820. AND T.COL_NO = ?
  1821. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  1822. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  1823. AND T.REASON_FLAG = '剔除'
  1824. </query>
  1825. <query id = "EddyCurrentTestingResult.doQueryOffineNum" desc = "查询已探伤下线支数">
  1826. SELECT T.REASON,T.REASON_NUMBER AS ACT_COUNT,'True' CHK
  1827. FROM MIL_TESTING_RESULT_DETAIL_DES T
  1828. WHERE T.RESULT_NO = ?
  1829. AND T.LOT_NO = ?
  1830. AND T.JUDGE_STOVE_NO = ?
  1831. AND T.COL_SHIFT = ?
  1832. AND T.COL_GROUP = ?
  1833. AND T.COL_NO = ?
  1834. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  1835. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  1836. AND T.REASON_FLAG = '下线'
  1837. </query>
  1838. <query id = "saveScrapData.deleteSql" desc = "回滚该台所有可疑品下状态">
  1839. <![CDATA[
  1840. DECLARE
  1841. V_OUT MIL_TESTING_RESULT_DETAIL_DES.REASON_NUMBER%TYPE := 0;
  1842. V_OFFOUT MIL_TESTING_RESULT_DETAIL_DES.REASON_NUMBER%TYPE := 0;
  1843. V_COUNT MIL_TESTING_RESULT_DETAIL_DES.REASON_NUMBER%TYPE := 0;
  1844. V_OFFLINECOUNT MIL_TESTING_RESULT_DETAIL_DES.REASON_NUMBER%TYPE := 0;
  1845. V_DETAILCOUNT MIL_TESTING_RESULT_DETAIL_DES.REASON_NUMBER%TYPE := 0;
  1846. V_REASON_NUMBER MIL_TESTING_RESULT_DETAIL_DES.REASON_NUMBER%TYPE := 0;
  1847. V_RESULT_NO MIL_TESTING_RESULT_DETAIL_DES.RESULT_NO%TYPE := ?;
  1848. V_JUDGE_STOVE_NO MIL_TESTING_RESULT_DETAIL_DES.JUDGE_STOVE_NO%TYPE := ?;
  1849. V_COL_SHIFT MIL_TESTING_RESULT_DETAIL_DES.COL_SHIFT%TYPE := ?;
  1850. V_COL_GROUP MIL_TESTING_RESULT_DETAIL_DES.COL_GROUP%TYPE := ?;
  1851. V_COL_NO MIL_TESTING_RESULT_DETAIL_DES.COL_NO%TYPE := ?;
  1852. V_PRO_PLAN_ID MIL_TESTING_RESULT_DETAIL_DES.PRO_PLAN_ID%TYPE := ?;
  1853. V_GX_PLAN_NO MIL_TESTING_RESULT_DETAIL_DES.GX_PLAN_NO%TYPE := ?;
  1854. BEGIN
  1855. SELECT NVL(COUNT(1), 0)
  1856. INTO V_OUT
  1857. FROM MIL_TESTING_RESULT_DETAIL_DES T
  1858. WHERE T.RESULT_NO = V_RESULT_NO
  1859. AND T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  1860. AND T.COL_SHIFT = V_COL_SHIFT
  1861. AND T.COL_GROUP = V_COL_GROUP
  1862. AND T.COL_NO = V_COL_NO
  1863. AND NVL(T.PRO_PLAN_ID, '/') = NVL(V_PRO_PLAN_ID, '/')
  1864. AND NVL(T.GX_PLAN_NO, '/') = NVL(V_GX_PLAN_NO, '/')
  1865. AND T.REASON_FLAG = '下线';
  1866. IF (V_OUT > 0) THEN
  1867. SELECT NVL(SUM(T.REASON_NUMBER), 0)
  1868. INTO V_COUNT
  1869. FROM MIL_TESTING_RESULT_DETAIL_DES T
  1870. WHERE T.RESULT_NO = V_RESULT_NO
  1871. AND T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  1872. AND T.COL_SHIFT = V_COL_SHIFT
  1873. AND T.COL_GROUP = V_COL_GROUP
  1874. AND T.COL_NO = V_COL_NO
  1875. AND NVL(T.PRO_PLAN_ID, '/') = NVL(V_PRO_PLAN_ID, '/')
  1876. AND NVL(T.GX_PLAN_NO, '/') = NVL(V_GX_PLAN_NO, '/')
  1877. AND T.REASON_FLAG = '下线';
  1878. END IF;
  1879. DELETE FROM MIL_SLAB_SCRAP_SEQ T
  1880. WHERE T.RESULT_NO = V_RESULT_NO
  1881. AND T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  1882. AND T.COL_SHIFT = V_COL_SHIFT
  1883. AND T.COL_GROUP = V_COL_GROUP
  1884. AND T.COL_NO = V_COL_NO
  1885. AND NVL(T.PRO_PLAN_ID, '/') = NVL(V_PRO_PLAN_ID, '/')
  1886. AND NVL(T.GX_PLAN_NO, '/') = NVL(V_GX_PLAN_NO, '/')
  1887. AND T.PROCESS_NO = '10';
  1888. IF (V_COUNT > 0) THEN
  1889. UPDATE MIL_OFFLINE_RESLUT T
  1890. SET T.ZP_HEIGHT = TO_NUMBER(T.ZP_HEIGHT) -
  1891. TO_NUMBER(V_COUNT * T.ZP_HEIGHT / T.OFFLINE_NUM),
  1892. T.OFFLINE_NUM = TO_NUMBER(T.OFFLINE_NUM) - TO_NUMBER(V_COUNT)
  1893. WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  1894. AND NVL(T.PRO_PLAN_ID, '/') = NVL(V_PRO_PLAN_ID, '/')
  1895. AND NVL(T.GX_PLAN_NO, '/') = NVL(V_GX_PLAN_NO, '/')
  1896. AND T.OFFLINE_PRO = 'TS'
  1897. AND T.OFFLINE_TYPE = '2';
  1898. END IF;
  1899. UPDATE MIL_MT_RESULT T
  1900. SET T.INSPECTIONED_OFFLINE_NUM = TO_NUMBER(T.INSPECTIONED_OFFLINE_NUM) -
  1901. TO_NUMBER(V_COUNT)
  1902. WHERE T.RESULT_NO = V_RESULT_NO;
  1903. SELECT NVL(COUNT(1), 0)
  1904. INTO V_OFFOUT
  1905. FROM MIL_OFFLINE_RESLUT T
  1906. WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  1907. AND NVL(T.PRO_PLAN_ID, '/') = NVL(V_PRO_PLAN_ID, '/')
  1908. AND NVL(T.GX_PLAN_NO, '/') = NVL(V_GX_PLAN_NO, '/')
  1909. AND T.OFFLINE_PRO = 'TS'
  1910. AND T.OFFLINE_TYPE = '2';
  1911. IF (V_OFFOUT > 0) THEN
  1912. SELECT T.OFFLINE_NUM
  1913. INTO V_OFFLINECOUNT
  1914. FROM MIL_OFFLINE_RESLUT T
  1915. WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  1916. AND NVL(T.PRO_PLAN_ID, '/') = NVL(V_PRO_PLAN_ID, '/')
  1917. AND NVL(T.GX_PLAN_NO, '/') = NVL(V_GX_PLAN_NO, '/')
  1918. AND T.OFFLINE_PRO = 'TS'
  1919. AND T.OFFLINE_TYPE = '2';
  1920. END IF;
  1921. IF (V_OFFLINECOUNT = 0) THEN
  1922. DELETE FROM MIL_OFFLINE_RESLUT T
  1923. WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  1924. AND NVL(T.PRO_PLAN_ID, '/') = NVL(V_PRO_PLAN_ID, '/')
  1925. AND NVL(T.GX_PLAN_NO, '/') = NVL(V_GX_PLAN_NO, '/')
  1926. AND T.OFFLINE_PRO = 'TS'
  1927. AND T.OFFLINE_TYPE = '2';
  1928. END IF;
  1929. SELECT NVL(COUNT(1), 0)
  1930. INTO V_DETAILCOUNT
  1931. FROM MIL_TESTING_RESULT_DETAIL_DES T
  1932. WHERE T.RESULT_NO = V_RESULT_NO
  1933. AND T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  1934. AND T.COL_SHIFT = V_COL_SHIFT
  1935. AND T.COL_GROUP = V_COL_GROUP
  1936. AND T.COL_NO = V_COL_NO
  1937. AND NVL(T.PRO_PLAN_ID, '/') = NVL(V_PRO_PLAN_ID, '/')
  1938. AND NVL(T.GX_PLAN_NO, '/') = NVL(V_GX_PLAN_NO, '/')
  1939. AND T.REASON_FLAG = '可疑';
  1940. IF (V_DETAILCOUNT > 0) THEN
  1941. SELECT NVL(SUM(T.REASON_NUMBER), 0)
  1942. INTO V_REASON_NUMBER
  1943. FROM MIL_TESTING_RESULT_DETAIL_DES T
  1944. WHERE T.RESULT_NO = V_RESULT_NO
  1945. AND T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  1946. AND T.COL_SHIFT = V_COL_SHIFT
  1947. AND T.COL_GROUP = V_COL_GROUP
  1948. AND T.COL_NO = V_COL_NO
  1949. AND NVL(T.PRO_PLAN_ID, '/') = NVL(V_PRO_PLAN_ID, '/')
  1950. AND NVL(T.GX_PLAN_NO, '/') = NVL(V_GX_PLAN_NO, '/')
  1951. AND T.REASON_FLAG = '可疑';
  1952. UPDATE MIL_TESTING_RACK T
  1953. SET T.STATUS = '0',
  1954. T.COL_NO = '',
  1955. T.ALARM_REASON = '',
  1956. T.SCRAP_REASON = '',
  1957. T.SUSPECT_FLAG = '0',
  1958. T.OFFLINE_TYPE = '0',
  1959. T.OFFLINE_REASON = '',
  1960. T.RECUT_LENGTH = '',
  1961. T.RECUT_FLAG = '0',
  1962. T.OFFLINE_FLAG = '0',
  1963. T.SAMPLE_FLAG = '0'
  1964. WHERE T.RESULT_NO = V_RESULT_NO
  1965. AND T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  1966. AND T.COL_NO = V_COL_NO
  1967. AND NVL(T.PRO_PLAN_ID, '/') = NVL(V_PRO_PLAN_ID, '/')
  1968. AND NVL(T.GX_PLAN_NO, '/') = NVL(V_GX_PLAN_NO, '/')
  1969. AND T.SUSPECT_FLAG = '1'
  1970. AND ROWNUM <= V_REASON_NUMBER;
  1971. FOR MYROW1 IN (SELECT *
  1972. FROM (SELECT T.MAT_NO
  1973. FROM MAT_BC_M T, YDM_BC_BUTTRESS S
  1974. WHERE T.MAT_NO = S.MAT_NO
  1975. AND T.ZG_STOVE_SQE = V_JUDGE_STOVE_NO
  1976. AND T.QCM_STAUS = '11'
  1977. AND T.PRODUCT_FLAG = '801401'
  1978. AND T.MAT_STATUS = '80150104'
  1979. ORDER BY T.MAT_NO DESC)
  1980. WHERE ROWNUM <= V_COUNT) LOOP
  1981. DELETE FROM MAT_BC_M T WHERE T.MAT_NO = MYROW1.MAT_NO;
  1982. DELETE FROM YDM_BC_BUTTRESS T WHERE T.MAT_NO = MYROW1.MAT_NO;
  1983. DELETE FROM YDM_BC_INLIST T WHERE T.MAT_NO = MYROW1.MAT_NO;
  1984. END LOOP;
  1985. END IF;
  1986. DELETE FROM MIL_TESTING_RESULT_DETAIL_DES T
  1987. WHERE T.RESULT_NO = V_RESULT_NO
  1988. AND T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  1989. AND T.COL_SHIFT = V_COL_SHIFT
  1990. AND T.COL_GROUP = V_COL_GROUP
  1991. AND T.COL_NO = V_COL_NO
  1992. AND NVL(T.PRO_PLAN_ID, '/') = NVL(V_PRO_PLAN_ID, '/')
  1993. AND NVL(T.GX_PLAN_NO, '/') = NVL(V_GX_PLAN_NO, '/');
  1994. END;
  1995. ]]>
  1996. </query>
  1997. <query id = "saveScrapData.alarmNum" desc = "保存可疑品支数">
  1998. <![CDATA[
  1999. DECLARE
  2000. V_COUNT MIL_TESTING_RESULT_DETAIL_DES.REASON_NUMBER%TYPE := NULL;
  2001. BEGIN
  2002. INSERT INTO MIL_TESTING_RESULT_DETAIL_DES
  2003. (RESULT_NO,
  2004. LOT_NO,
  2005. JUDGE_STOVE_NO,
  2006. PLINE_CODE,
  2007. COL_SHIFT,
  2008. COL_GROUP,
  2009. REASON,
  2010. REASON_NUMBER,
  2011. REASON_FLAG,
  2012. COL_NO,
  2013. PRO_PLAN_ID,
  2014. GX_PLAN_NO)
  2015. VALUES
  2016. (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?);
  2017. FOR ALARMROW1 IN (SELECT SEQ
  2018. FROM (SELECT T.SEQ
  2019. FROM MIL_TESTING_RACK T,
  2020. PORT_MIL_BATCH_SAMPLE_RESULT T1
  2021. WHERE T.RESULT_NO = ?
  2022. AND T.JUDGE_STOVE_NO = ?
  2023. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  2024. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  2025. --AND T.COL_SHIFT IS NULL
  2026. --AND T.COL_GROUP IS NULL
  2027. AND T.MAT_NO = T1.MAT_NO(+)
  2028. AND T.JUDGE_STOVE_NO = T1.JUDGE_STOVE_NO(+)
  2029. AND T.OFFLINE_FLAG = '0'
  2030. AND T.STATUS = '0'
  2031. AND T.RETEST_NUM = '0'
  2032. AND T.RECUT_FLAG = '0'
  2033. AND T.SUSPECT_FLAG = '0'
  2034. AND T.SAMPLE_FLAG = '0'
  2035. ORDER BY T1.IS_SAMPLE_PIPE, T.MAT_NO)
  2036. WHERE ROWNUM <= ?) LOOP
  2037. UPDATE MIL_TESTING_RACK T
  2038. SET T.STATUS = '2',
  2039. T.COL_NO = ?,
  2040. T.ALARM_REASON = ?,
  2041. T.SUSPECT_FLAG = '1'
  2042. WHERE T.RESULT_NO = ?
  2043. AND T.JUDGE_STOVE_NO = ?
  2044. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  2045. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  2046. AND T.SEQ = ALARMROW1.SEQ;
  2047. END LOOP;
  2048. END;
  2049. ]]>
  2050. </query>
  2051. <query id = "saveScrapData.scrapNum" desc = "保存剔除品">
  2052. <![CDATA[
  2053. DECLARE
  2054. V_COUNT MIL_TESTING_RESULT_DETAIL_DES.REASON_NUMBER%TYPE := NULL;
  2055. BEGIN
  2056. INSERT INTO MIL_TESTING_RESULT_DETAIL_DES
  2057. (RESULT_NO,
  2058. LOT_NO,
  2059. JUDGE_STOVE_NO,
  2060. PLINE_CODE,
  2061. COL_SHIFT,
  2062. COL_GROUP,
  2063. REASON,
  2064. REASON_NUMBER,
  2065. REASON_FLAG,
  2066. COL_NO,
  2067. REASON1,
  2068. PRO_PLAN_ID,
  2069. GX_PLAN_NO)
  2070. VALUES
  2071. (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?);
  2072. IF (? = 'C010') THEN
  2073. FOR SCRAPROW1 IN (SELECT SEQ
  2074. FROM (SELECT T.SEQ
  2075. FROM MIL_TESTING_RACK T
  2076. WHERE T.RESULT_NO = ?
  2077. AND T.JUDGE_STOVE_NO = ?
  2078. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  2079. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  2080. --AND T.COL_SHIFT IS NULL
  2081. --AND T.COL_GROUP IS NULL
  2082. AND T.OFFLINE_FLAG = '0'
  2083. AND T.SUSPECT_FLAG = '1'
  2084. AND T.STATUS = '2'
  2085. AND T.ALARM_REASON = ?
  2086. AND T.COL_NO = ?
  2087. ORDER BY T.SEQ ASC)
  2088. WHERE ROWNUM <= ?) LOOP
  2089. INSERT INTO MIL_SLAB_SCRAP_SEQ
  2090. (COL_NO,
  2091. COL_TYPE,
  2092. JUDGE_STOVE_NO,
  2093. PROCESS_NO,
  2094. SEQ,
  2095. TIME,
  2096. FLAG,
  2097. COL_MODE,
  2098. COL_TIME,
  2099. COL_USER,
  2100. COL_SHIFT,
  2101. COL_GROUP,
  2102. RESULT_NO,
  2103. PRO_PLAN_ID,
  2104. GX_PLAN_NO)
  2105. VALUES
  2106. (?,
  2107. ?,
  2108. ?,
  2109. ?,
  2110. SCRAPROW1.SEQ,
  2111. SYSDATE,
  2112. ?,
  2113. ?,
  2114. SYSDATE,
  2115. ?,
  2116. ?,
  2117. ?,
  2118. ?,
  2119. ?,
  2120. ?);
  2121. UPDATE MIL_TESTING_RACK T
  2122. SET T.STATUS = '1', T.COL_NO = ?, T.SCRAP_REASON = ?
  2123. WHERE T.RESULT_NO = ?
  2124. AND T.JUDGE_STOVE_NO = ?
  2125. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  2126. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  2127. AND T.SEQ = SCRAPROW1.SEQ;
  2128. END LOOP;
  2129. ELSE
  2130. FOR SCRAPROW2 IN (SELECT SEQ
  2131. FROM (SELECT T.SEQ
  2132. FROM MIL_TESTING_RACK T
  2133. WHERE T.RESULT_NO = ?
  2134. AND T.JUDGE_STOVE_NO = ?
  2135. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  2136. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  2137. --AND T.COL_SHIFT IS NULL
  2138. --AND T.COL_GROUP IS NULL
  2139. AND T.OFFLINE_FLAG = '0'
  2140. AND T.SUSPECT_FLAG = '1'
  2141. AND T.STATUS = '2'
  2142. AND T.ALARM_REASON = ?
  2143. AND T.COL_NO = ?
  2144. ORDER BY T.SEQ ASC)
  2145. WHERE ROWNUM <= ?) LOOP
  2146. INSERT INTO MIL_SLAB_SCRAP_SEQ
  2147. (COL_NO,
  2148. COL_TYPE,
  2149. JUDGE_STOVE_NO,
  2150. PROCESS_NO,
  2151. SEQ,
  2152. TIME,
  2153. FLAG,
  2154. COL_MODE,
  2155. COL_TIME,
  2156. COL_USER,
  2157. COL_SHIFT,
  2158. COL_GROUP,
  2159. RESULT_NO,
  2160. PRO_PLAN_ID,
  2161. GX_PLAN_NO)
  2162. VALUES
  2163. (?,
  2164. ?,
  2165. ?,
  2166. ?,
  2167. SCRAPROW2.SEQ,
  2168. SYSDATE,
  2169. ?,
  2170. ?,
  2171. SYSDATE,
  2172. ?,
  2173. ?,
  2174. ?,
  2175. ?,
  2176. ?,
  2177. ?);
  2178. UPDATE MIL_TESTING_RACK T
  2179. SET T.STATUS = '1', T.COL_NO = ?, T.SCRAP_REASON = ?
  2180. WHERE T.RESULT_NO = ?
  2181. AND T.JUDGE_STOVE_NO = ?
  2182. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  2183. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  2184. AND T.SEQ = SCRAPROW2.SEQ;
  2185. END LOOP;
  2186. END IF;
  2187. END;
  2188. ]]>
  2189. </query>
  2190. <query id = "saveScrapData.offlineNum" desc = "保存下线品">
  2191. <![CDATA[
  2192. DECLARE
  2193. V_COUNT MIL_TESTING_RESULT_DETAIL_DES.REASON_NUMBER%TYPE := NULL;
  2194. BEGIN
  2195. INSERT INTO MIL_TESTING_RESULT_DETAIL_DES
  2196. (RESULT_NO,
  2197. LOT_NO,
  2198. JUDGE_STOVE_NO,
  2199. PLINE_CODE,
  2200. COL_SHIFT,
  2201. COL_GROUP,
  2202. REASON,
  2203. REASON_NUMBER,
  2204. REASON_FLAG,
  2205. COL_NO,
  2206. PRO_PLAN_ID,
  2207. GX_PLAN_NO)
  2208. VALUES
  2209. (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?);
  2210. FOR SCRAPROW1 IN (SELECT SEQ
  2211. FROM (SELECT T.SEQ
  2212. FROM MIL_TESTING_RACK T
  2213. WHERE T.RESULT_NO = ?
  2214. AND T.JUDGE_STOVE_NO = ?
  2215. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  2216. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  2217. --AND T.COL_SHIFT IS NULL
  2218. --AND T.COL_GROUP IS NULL
  2219. AND T.OFFLINE_FLAG = '0'
  2220. AND T.STATUS = '2'
  2221. AND T.COL_NO = ?
  2222. ORDER BY T.SEQ ASC)
  2223. WHERE ROWNUM <= ?) LOOP
  2224. UPDATE MIL_TESTING_RACK T
  2225. SET T.OFFLINE_FLAG = '1',
  2226. T.OFFLINE_TYPE = '2',
  2227. T.COL_NO = ?,
  2228. T.OFFLINE_REASON = ?,
  2229. T.OFFLINE_TIME = sysdate
  2230. WHERE T.RESULT_NO = ?
  2231. AND T.JUDGE_STOVE_NO = ?
  2232. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  2233. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  2234. AND T.SEQ = SCRAPROW1.SEQ;
  2235. INSERT INTO MIL_SLAB_SCRAP_SEQ
  2236. (COL_NO,
  2237. COL_TYPE,
  2238. JUDGE_STOVE_NO,
  2239. PROCESS_NO,
  2240. SEQ,
  2241. TIME,
  2242. FLAG,
  2243. COL_MODE,
  2244. COL_TIME,
  2245. COL_USER,
  2246. COL_SHIFT,
  2247. COL_GROUP,
  2248. RESULT_NO,
  2249. OFFLINE_TYPE,
  2250. PRO_PLAN_ID,
  2251. GX_PLAN_NO)
  2252. VALUES
  2253. (?,
  2254. ?,
  2255. ?,
  2256. ?,
  2257. SCRAPROW1.SEQ,
  2258. SYSDATE,
  2259. ?,
  2260. ?,
  2261. SYSDATE,
  2262. ?,
  2263. ?,
  2264. ?,
  2265. ?,
  2266. '2',
  2267. ?,
  2268. ?);
  2269. END LOOP;
  2270. UPDATE MIL_MT_RESULT T
  2271. SET T.INSPECTIONED_OFFLINE_NUM = TO_NUMBER(T.INSPECTIONED_OFFLINE_NUM) +
  2272. TO_NUMBER(?)
  2273. WHERE T.RESULT_NO = ?
  2274. AND T.JUDGE_STOVE_NO = ?
  2275. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  2276. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/');
  2277. UPDATE MIL_ET_RESULT T
  2278. SET T.INSPECTIONED_OFFLINE_NUM = TO_NUMBER(T.INSPECTIONED_OFFLINE_NUM) +
  2279. TO_NUMBER(?)
  2280. WHERE T.RESULT_NO = ?
  2281. AND T.JUDGE_STOVE_NO = ?
  2282. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  2283. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/');
  2284. END;
  2285. ]]>
  2286. </query>
  2287. <query id = "saveScrapData.insertOffResult" desc = "插入下线表">
  2288. DECLARE
  2289. V_COUNT MIL_TESTING_RESULT_DETAIL_DES.REASON_NUMBER%TYPE := 0;
  2290. V_PIPSIZE MIL_PLAN.PIPE_SIZE%TYPE := NULL;
  2291. V_TARGET_LENGTH MIL_PLAN.TARGET_LENGTH%TYPE := NULL;
  2292. V_ID MIL_PLAN.ID%TYPE := ?;
  2293. V_JUDGE_STOVE_NO MIL_OFFLINE_RESLUT.JUDGE_STOVE_NO%TYPE := ?;
  2294. V_PRO_PLAN_ID MIL_OFFLINE_RESLUT.PRO_PLAN_ID%TYPE := NULL;
  2295. V_GX_PLAN_NO MIL_OFFLINE_RESLUT.GX_PLAN_NO%TYPE := NULL;
  2296. V_OFFLINE_DOC MIL_OFFLINE_RESLUT.OFFLINE_DOC%TYPE := NULL;
  2297. BEGIN
  2298. SELECT T.PRO_PLAN_ID, T.GX_PLAN_NO
  2299. INTO V_PRO_PLAN_ID, V_GX_PLAN_NO
  2300. FROM MIL_PLAN T
  2301. WHERE T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO
  2302. AND T.ID = V_ID;
  2303. SELECT T.PIPE_SIZE, T.TARGET_LENGTH
  2304. INTO V_PIPSIZE, V_TARGET_LENGTH
  2305. FROM MIL_PLAN T
  2306. WHERE T.ID = V_ID
  2307. AND T.JUDGE_STOVE_NO = V_JUDGE_STOVE_NO;
  2308. SELECT NVL(COUNT(1), 0)
  2309. INTO V_COUNT
  2310. FROM MIL_OFFLINE_RESLUT T
  2311. WHERE T.JUDGE_STOVE_NO = ?
  2312. AND T.OFFLINE_PRO = 'TS'
  2313. AND T.OFFLINE_TYPE = '2';
  2314. SELECT 'D' || TO_CHAR(SYSDATE, 'YYYYMM') ||
  2315. LPAD(NVL(MAX(SUBSTR(T.OFFLINE_DOC, 8, 4)), 0) + 1, 4, 0)
  2316. INTO V_OFFLINE_DOC
  2317. FROM MIL_OFFLINE_RESLUT T
  2318. WHERE TO_CHAR(T.OFFLINE_TIME, 'YYYYMM') = TO_CHAR(SYSDATE, 'YYYYMM');
  2319. IF (V_COUNT > 0) THEN
  2320. UPDATE MIL_OFFLINE_RESLUT T
  2321. SET T.OFFLINE_NUM = TO_NUMBER(T.OFFLINE_NUM) + TO_NUMBER(?),
  2322. T.ZP_HEIGHT = TO_NUMBER(T.ZP_HEIGHT) +
  2323. to_number(substr(0.02466 *
  2324. SUBSTR(V_PIPSIZE,
  2325. INSTR(V_PIPSIZE, '*') + 1) *
  2326. (SUBSTR(V_PIPSIZE,
  2327. 0,
  2328. INSTR(V_PIPSIZE, '*') - 1) -
  2329. SUBSTR(V_PIPSIZE,
  2330. INSTR(V_PIPSIZE, '*') + 1)) / 1000,
  2331. 0,
  2332. instr(0.02466 *
  2333. SUBSTR(V_PIPSIZE,
  2334. INSTR(V_PIPSIZE, '*') + 1) *
  2335. (SUBSTR(V_PIPSIZE,
  2336. 0,
  2337. INSTR(V_PIPSIZE, '*') - 1) -
  2338. SUBSTR(V_PIPSIZE,
  2339. INSTR(V_PIPSIZE, '*') + 1)) / 1000,
  2340. '.') + 3)) * to_number(?) *
  2341. to_number(V_TARGET_LENGTH)
  2342. WHERE T.JUDGE_STOVE_NO = ?
  2343. AND T.OFFLINE_PRO = 'TS'
  2344. AND T.OFFLINE_TYPE = '2';
  2345. ELSE
  2346. FOR MYROW IN (SELECT *
  2347. FROM MIL_PLAN T
  2348. WHERE T.ID = ?
  2349. AND T.JUDGE_STOVE_NO = ?) LOOP
  2350. INSERT INTO MIL_OFFLINE_RESLUT
  2351. (RECHECK_NUM,
  2352. PRODUCNAME,
  2353. STEELCODE,
  2354. STEELNAME,
  2355. GRADECODE,
  2356. GRADENAME,
  2357. SPEC_CODE,
  2358. SPEC_NAME,
  2359. MODEL_CODE,
  2360. MODEL_DESC,
  2361. STD_CODE,
  2362. STD_NAME,
  2363. STD_STYLE,
  2364. STD_STYLE_DESC,
  2365. ACT_LEN_RANGE,
  2366. CONTRACT_NO,
  2367. PRODUCCODE,
  2368. INSTORAGE_NUM,
  2369. QUALIFIED_NUM,
  2370. SCRAP_NUM,
  2371. ZP_M_LH,
  2372. LOT_NO,
  2373. STOVE_NO,
  2374. JUDGE_STOVE_NO,
  2375. DIAMETER,
  2376. THICKNESS,
  2377. LENGTH,
  2378. PLINE_CODE,
  2379. OFFLINE_PRO,
  2380. REAL_TIME_STATUS,
  2381. OFFLINE_NUM,
  2382. BACKLINE_NUM,
  2383. GROUP_NUM,
  2384. FINAL_NUM,
  2385. ZP_FLAG,
  2386. STATUS,
  2387. TYPE_FLAG,
  2388. OFFLINE_TIME,
  2389. REMARK,
  2390. COL_USER,
  2391. COL_SHIFT,
  2392. COL_GROUP,
  2393. ZP_HEIGHT,
  2394. OFFLINE_TYPE,
  2395. TARGET,
  2396. IMP_PROCESS,
  2397. PRO_PLAN_ID,
  2398. GX_PLAN_NO,
  2399. OFFLINE_DOC,
  2400. LOAD_JUDGE_STOVE_NO)
  2401. VALUES
  2402. ('0',
  2403. MYROW.VARIETIES,
  2404. MYROW.STEELCODE,
  2405. MYROW.STEELNAME,
  2406. MYROW.GRADECODE,
  2407. MYROW.GRADENAME,
  2408. MYROW.PIPE_SIZE_CODE,
  2409. MYROW.PIPE_SIZE,
  2410. MYROW.BUCKLE_TYPE_CODE,
  2411. MYROW.BUCKLE_TYPE,
  2412. MYROW.ROLL_STANDRAD_CODE,
  2413. MYROW.ROLL_STANDRAD,
  2414. MYROW.STD_STYLE,
  2415. MYROW.STD_STYLE_DESC,
  2416. MYROW.LENGTH_RANGE,
  2417. MYROW.CONTRACT_NO,
  2418. MYROW.VARIETIES_CODE,
  2419. '0',
  2420. '0',
  2421. '0',
  2422. '',
  2423. MYROW.LOT_NO,
  2424. MYROW.STOVE_NO,
  2425. MYROW.JUDGE_STOVE_NO,
  2426. SUBSTR(MYROW.PIPE_SIZE, 0, INSTR(MYROW.PIPE_SIZE, '*') - 1),
  2427. SUBSTR(MYROW.PIPE_SIZE, INSTR(MYROW.PIPE_SIZE, '*') + 1),
  2428. MYROW.TARGET_LENGTH,
  2429. MYROW.PLINE_CODE,
  2430. 'TS',
  2431. '0',
  2432. ?,
  2433. '0',
  2434. '0',
  2435. '',
  2436. '0',
  2437. '0',
  2438. '0',
  2439. SYSDATE,
  2440. '',
  2441. ?,
  2442. ?,
  2443. ?,
  2444. to_number(substr(0.02466 *
  2445. SUBSTR(MYROW.PIPE_SIZE,
  2446. INSTR(MYROW.PIPE_SIZE, '*') + 1) *
  2447. (SUBSTR(MYROW.PIPE_SIZE,
  2448. 0,
  2449. INSTR(MYROW.PIPE_SIZE, '*') - 1) -
  2450. SUBSTR(MYROW.PIPE_SIZE,
  2451. INSTR(MYROW.PIPE_SIZE, '*') + 1)) / 1000,
  2452. 0,
  2453. instr(0.02466 *
  2454. SUBSTR(MYROW.PIPE_SIZE,
  2455. INSTR(MYROW.PIPE_SIZE, '*') + 1) *
  2456. (SUBSTR(MYROW.PIPE_SIZE,
  2457. 0,
  2458. INSTR(MYROW.PIPE_SIZE, '*') - 1) -
  2459. SUBSTR(MYROW.PIPE_SIZE,
  2460. INSTR(MYROW.PIPE_SIZE, '*') + 1)) / 1000,
  2461. '.') + 3)) * to_number(?) *
  2462. to_number(MYROW.TARGET_LENGTH),
  2463. '2',
  2464. MYROW.TARGET,
  2465. MYROW.IMP_PROCESS,
  2466. V_PRO_PLAN_ID,
  2467. V_GX_PLAN_NO,
  2468. ?,
  2469. MYROW.FEED_HEAT_NO);
  2470. END LOOP;
  2471. END IF;
  2472. END;
  2473. </query>
  2474. <query id = "EddyCurrentTestingResult.saveMtResult" desc = "保存漏磁探伤实绩">
  2475. <![CDATA[
  2476. DECLARE
  2477. V_COUNT MIL_TESTING_RESULT_DETAIL_DES.REASON_NUMBER%TYPE := NULL;
  2478. V_DETECTION_NUM1 MIL_TESTING_RESULT_DETAIL.DETECTION_NUM1%TYPE := NULL;
  2479. V_SCRAP_NUM1 MIL_TESTING_RESULT_DETAIL.SCRAP_NUM1%TYPE := NULL;
  2480. V_QUALIFIED_NUM1 MIL_TESTING_RESULT_DETAIL.QUALIFIED_NUM1%TYPE := NULL;
  2481. V_REINSPECTION_NUM1 MIL_TESTING_RESULT_DETAIL.REINSPECTION_NUM1%TYPE := NULL;
  2482. V_SUSPECT_PRODUCT_NUM1 MIL_TESTING_RESULT_DETAIL.SUSPECT_PRODUCT_NUM1%TYPE := NULL;
  2483. V_RECUT_NUM1 MIL_TESTING_RESULT_DETAIL.RECUT_NUM1%TYPE := NULL;
  2484. V_RECUT_LEN1 MIL_TESTING_RESULT_DETAIL.RECUT_LEN1%TYPE := NULL;
  2485. V_TEST_NUM1 MIL_TESTING_RESULT_DETAIL.TEST_NUM1%TYPE := NULL;
  2486. V_REINSPECTION_QUALIFIED_NUM1 MIL_TESTING_RESULT_DETAIL.REINSPECTION_QUALIFIED_NUM1%TYPE := NULL;
  2487. V_SAMPLE_NUM1 MIL_TESTING_RESULT_DETAIL.SAMPLE_NUM1%TYPE := NULL;
  2488. V_DETECTION_NUM2 MIL_TESTING_RESULT_DETAIL.DETECTION_NUM2%TYPE := NULL;
  2489. V_SCRAP_NUM2 MIL_TESTING_RESULT_DETAIL.SCRAP_NUM2%TYPE := NULL;
  2490. V_QUALIFIED_NUM2 MIL_TESTING_RESULT_DETAIL.QUALIFIED_NUM2%TYPE := NULL;
  2491. V_REINSPECTION_NUM2 MIL_TESTING_RESULT_DETAIL.REINSPECTION_NUM2%TYPE := NULL;
  2492. V_SUSPECT_PRODUCT_NUM2 MIL_TESTING_RESULT_DETAIL.SUSPECT_PRODUCT_NUM2%TYPE := NULL;
  2493. V_RECUT_NUM2 MIL_TESTING_RESULT_DETAIL.RECUT_NUM2%TYPE := NULL;
  2494. V_RECUT_LEN2 MIL_TESTING_RESULT_DETAIL.RECUT_LEN2%TYPE := NULL;
  2495. V_TEST_NUM2 MIL_TESTING_RESULT_DETAIL.TEST_NUM2%TYPE := NULL;
  2496. V_REINSPECTION_QUALIFIED_NUM2 MIL_TESTING_RESULT_DETAIL.REINSPECTION_QUALIFIED_NUM2%TYPE := NULL;
  2497. V_SAMPLE_NUM2 MIL_TESTING_RESULT_DETAIL.SAMPLE_NUM2%TYPE := NULL;
  2498. V_RACKCOUNT MIL_TESTING_RESULT_DETAIL_DES.REASON_NUMBER%TYPE := NULL;
  2499. V_QUALIFIED_NUM MIL_TESTING_RESULT_DETAIL_DES.REASON_NUMBER%TYPE := NULL;
  2500. BEGIN
  2501. --查询实绩字表是否已存在实绩
  2502. SELECT NVL(COUNT(1), 0)
  2503. INTO V_COUNT
  2504. FROM MIL_TESTING_RESULT_DETAIL T
  2505. WHERE T.RESULT_NO = '#RESULT_NO#'
  2506. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2507. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  2508. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  2509. AND T.COL_SHIFT = '#COL_SHIFT#'
  2510. AND T.COL_GROUP = '#COL_GROUP#';
  2511. SELECT T.QUALIFIED_NUM
  2512. INTO V_QUALIFIED_NUM
  2513. FROM MIL_MT_RESULT T
  2514. WHERE T.RESULT_NO = '#RESULT_NO#'
  2515. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2516. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  2517. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/');
  2518. IF (V_COUNT > 0) THEN
  2519. --存在看是哪个操作台
  2520. IF ('#COL_NO#' = '1') THEN
  2521. SELECT T.DETECTION_NUM1,
  2522. T.SCRAP_NUM1,
  2523. T.QUALIFIED_NUM1,
  2524. T.REINSPECTION_NUM1,
  2525. T.SUSPECT_PRODUCT_NUM1,
  2526. T.RECUT_NUM1,
  2527. T.REINSPECTION_QUALIFIED_NUM1,
  2528. T.SAMPLE_NUM1
  2529. INTO V_DETECTION_NUM1,
  2530. V_SCRAP_NUM1,
  2531. V_QUALIFIED_NUM1,
  2532. V_REINSPECTION_NUM1,
  2533. V_SUSPECT_PRODUCT_NUM1,
  2534. V_RECUT_NUM1,
  2535. V_REINSPECTION_QUALIFIED_NUM1,
  2536. V_SAMPLE_NUM1
  2537. FROM MIL_TESTING_RESULT_DETAIL T
  2538. WHERE T.RESULT_NO = '#RESULT_NO#'
  2539. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2540. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  2541. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  2542. AND T.COL_SHIFT = '#COL_SHIFT#'
  2543. AND T.COL_GROUP = '#COL_GROUP#';
  2544. --把该班次班组原支数在实绩主表减去
  2545. IF (V_QUALIFIED_NUM > 0) THEN
  2546. UPDATE MIL_MT_RESULT T
  2547. SET T.DETECTION_NUM = TO_NUMBER(T.DETECTION_NUM) -
  2548. TO_NUMBER(V_DETECTION_NUM1),
  2549. T.SCRAP_NUM = TO_NUMBER(T.SCRAP_NUM) -
  2550. TO_NUMBER(V_SCRAP_NUM1),
  2551. T.QUALIFIED_NUM = TO_NUMBER(T.QUALIFIED_NUM) -
  2552. TO_NUMBER(V_QUALIFIED_NUM1),
  2553. T.REINSPECTION_NUM = TO_NUMBER(T.REINSPECTION_NUM) -
  2554. TO_NUMBER(V_REINSPECTION_NUM1),
  2555. T.ALARM_NUM = TO_NUMBER(T.ALARM_NUM) -
  2556. TO_NUMBER(V_SUSPECT_PRODUCT_NUM1),
  2557. T.RECUT_NUM = TO_NUMBER(T.RECUT_NUM) -
  2558. TO_NUMBER(V_RECUT_NUM1),
  2559. T.QA_TON = TO_NUMBER(T.QA_TON) -
  2560. TO_NUMBER(T.QA_TON /
  2561. QUALIFIED_NUM) *
  2562. TO_NUMBER(V_QUALIFIED_NUM1),
  2563. T.REINSPECTION_QUALIFIED_NUM = TO_NUMBER(T.REINSPECTION_QUALIFIED_NUM) -
  2564. TO_NUMBER(V_REINSPECTION_QUALIFIED_NUM1),
  2565. T.SAMPLE_NUM = TO_NUMBER(T.SAMPLE_NUM) -
  2566. TO_NUMBER(V_SAMPLE_NUM1)
  2567. WHERE T.RESULT_NO = '#RESULT_NO#'
  2568. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2569. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  2570. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/');
  2571. ELSIF (V_QUALIFIED_NUM = 0) THEN
  2572. UPDATE MIL_MT_RESULT T
  2573. SET T.DETECTION_NUM = TO_NUMBER(T.DETECTION_NUM) -
  2574. TO_NUMBER(V_DETECTION_NUM1),
  2575. T.SCRAP_NUM = TO_NUMBER(T.SCRAP_NUM) -
  2576. TO_NUMBER(V_SCRAP_NUM1),
  2577. T.QUALIFIED_NUM = TO_NUMBER(T.QUALIFIED_NUM) -
  2578. TO_NUMBER(V_QUALIFIED_NUM1),
  2579. T.REINSPECTION_NUM = TO_NUMBER(T.REINSPECTION_NUM) -
  2580. TO_NUMBER(V_REINSPECTION_NUM1),
  2581. T.ALARM_NUM = TO_NUMBER(T.ALARM_NUM) -
  2582. TO_NUMBER(V_SUSPECT_PRODUCT_NUM1),
  2583. T.RECUT_NUM = TO_NUMBER(T.RECUT_NUM) -
  2584. TO_NUMBER(V_RECUT_NUM1),
  2585. T.REINSPECTION_QUALIFIED_NUM = TO_NUMBER(T.REINSPECTION_QUALIFIED_NUM) -
  2586. TO_NUMBER(V_REINSPECTION_QUALIFIED_NUM1),
  2587. T.SAMPLE_NUM = TO_NUMBER(T.SAMPLE_NUM) -
  2588. TO_NUMBER(V_SAMPLE_NUM1)
  2589. WHERE T.RESULT_NO = '#RESULT_NO#'
  2590. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2591. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  2592. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/');
  2593. END IF;
  2594. --把实绩主表的支数增加
  2595. UPDATE MIL_MT_RESULT T
  2596. SET T.DETECTION_NUM = TO_NUMBER(T.DETECTION_NUM) +
  2597. TO_NUMBER('#DETECTION_NUM1#'),
  2598. T.SCRAP_NUM = TO_NUMBER(T.SCRAP_NUM) +
  2599. TO_NUMBER('#SCRAP_NUM1#'),
  2600. T.QUALIFIED_NUM = TO_NUMBER(T.QUALIFIED_NUM) +
  2601. TO_NUMBER('#QUALIFIED_NUM1#'),
  2602. T.REINSPECTION_NUM = TO_NUMBER(T.REINSPECTION_NUM) +
  2603. TO_NUMBER('#REINSPECTION_NUM1#'),
  2604. T.ALARM_NUM = TO_NUMBER(T.ALARM_NUM) +
  2605. TO_NUMBER('#SUSPECT_PRODUCT_NUM1#'),
  2606. T.RECUT_NUM = TO_NUMBER(T.RECUT_NUM) +
  2607. TO_NUMBER('#RECUT_NUM1#'),
  2608. T.QA_TON = TO_NUMBER(T.QA_TON) +
  2609. TO_NUMBER('#QA_TON#'),
  2610. T.REINSPECTION_QUALIFIED_NUM = TO_NUMBER(T.REINSPECTION_QUALIFIED_NUM) +
  2611. TO_NUMBER('#REINSPECTION_QUALIFIED_NUM1#'),
  2612. T.SAMPLE_NUM = TO_NUMBER(T.SAMPLE_NUM) +
  2613. TO_NUMBER('#SAMPLE_NUM1#'),
  2614. T.PRODUCT_STANDARDS = '#PRODUCT_STANDARDS#',
  2615. T.LO_SURFACE = '#LO_SURFACE#',
  2616. T.LI_SURFACE = '#LI_SURFACE#',
  2617. T.TO_SURFACE = '#TO_SURFACE#',
  2618. T.TI_SURFACE = '#TI_SURFACE#',
  2619. T.GROOVE_SHAPE = '#GROOVE_SHAPE#',
  2620. T.INSPECTION_STANDARD = '#INSPECTION_STANDARD#',
  2621. T.LONGITUDINAL_CURRENT1 = '#LONGITUDINAL_CURRENT1#',
  2622. T.TRANSVERSE_CURRENT1 = '#TRANSVERSE_CURRENT1#',
  2623. T.LONGITUDINAL_CURRENT2 = '#LONGITUDINAL_CURRENT2#',
  2624. T.TRANSVERSE_CURRENT2 = '#TRANSVERSE_CURRENT2#',
  2625. T.SPEED1 = '#SPEED1#',
  2626. T.SPEED2 = '#SPEED2#',
  2627. T.DETECTION_SPEED1 = '#DETECTION_SPEED1#',
  2628. T.DETECTION_SPEED2 = '#DETECTION_SPEED2#',
  2629. T.REMARK = '#REMARK#',
  2630. T.REMARK1 = '#REMARK1#',
  2631. T.NOTCH_INFO = '#NOTCH_INFO#',
  2632. T.NOTCH_LENGTH = '#NOTCH_LENGTH#',
  2633. T.NOTCH_WIDTH = '#NOTCH_WIDTH#',
  2634. T.NOTCH_DEPTH = '#NOTCH_DEPTH#',
  2635. T.NOTCH_FX = '#NOTCH_FX#',
  2636. T.COVERAGE = '#COVERAGE#',
  2637. T.SAMPLE_NO = '#SAMPLE_NO#',
  2638. T.SIGNID = '#SIGNID#',
  2639. T.SIGNID_GRADE = '2',
  2640. T.USERID1 = '#USERID1#',
  2641. T.USERID2 = '#USERID2#',
  2642. T.USERID_GRADE1 = '#USERID_GRADE1#',
  2643. T.USERID_GRADE2 = '#USERID_GRADE2#',
  2644. T.USERID1JD = '#USERID1JD#',
  2645. T.USERID2JD = '#USERID2JD#',
  2646. T.USERID_GRADE1JD = '#USERID_GRADE1JD#',
  2647. T.USERID_GRADE2JD = '#USERID_GRADE2JD#',
  2648. T.STANDARDS_NO = '#STANDARDS_NO#'
  2649. WHERE T.RESULT_NO = '#RESULT_NO#'
  2650. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2651. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  2652. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/');
  2653. --修改实绩子表
  2654. UPDATE MIL_TESTING_RESULT_DETAIL T
  2655. SET T.DETECTION_NUM1 = '#DETECTION_NUM1#',
  2656. T.SCRAP_NUM1 = '#SCRAP_NUM1#',
  2657. T.QUALIFIED_NUM1 = '#QUALIFIED_NUM1#',
  2658. T.REINSPECTION_NUM1 = '#REINSPECTION_NUM1#',
  2659. T.REINSPECTION_QUALIFIED_NUM1 = '#REINSPECTION_QUALIFIED_NUM1#',
  2660. T.SUSPECT_PRODUCT_NUM1 = '#SUSPECT_PRODUCT_NUM1#',
  2661. T.RECUT_NUM1 = '#RECUT_NUM1#',
  2662. T.RECUT_LEN1 = '#RECUT_LEN1#',
  2663. T.TEST_NUM1 = '#TEST_NUM1#',
  2664. T.SAMPLE_NUM1 = '#SAMPLE_NUM1#',
  2665. T.COL_USER = '#COL_USER#'
  2666. WHERE T.RESULT_NO = '#RESULT_NO#'
  2667. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2668. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  2669. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  2670. AND T.COL_SHIFT = '#COL_SHIFT#'
  2671. AND T.COL_GROUP = '#COL_GROUP#';
  2672. --处理1号台管号队列
  2673. SELECT NVL(COUNT(1), 0)
  2674. INTO V_RACKCOUNT
  2675. FROM MIL_TESTING_RACK T
  2676. WHERE T.RESULT_NO = '#RESULT_NO#'
  2677. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2678. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  2679. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  2680. AND T.COL_SHIFT IS NULL
  2681. AND T.COL_GROUP IS NULL;
  2682. IF (V_RACKCOUNT > 0) THEN
  2683. UPDATE MIL_TESTING_RACK T
  2684. SET T.RETEST_NUM = '0',
  2685. T.RECUT_LENGTH = '',
  2686. T.RECUT_FLAG = '0',
  2687. T.SAMPLE_FLAG = '0'
  2688. WHERE T.RESULT_NO = '#RESULT_NO#'
  2689. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2690. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  2691. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  2692. AND T.COL_SHIFT IS NULL
  2693. AND T.COL_GROUP IS NULL;
  2694. FOR MYROW IN (SELECT SEQ
  2695. FROM (SELECT T.SEQ
  2696. FROM MIL_TESTING_RACK T
  2697. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2698. AND NVL(T.PRO_PLAN_ID, '/') =
  2699. NVL('#PRO_PLAN_ID#', '/')
  2700. AND NVL(T.GX_PLAN_NO, '/') =
  2701. NVL('#GX_PLAN_NO#', '/')
  2702. AND T.RESULT_NO = '#RESULT_NO#'
  2703. AND T.SUSPECT_FLAG = '1'
  2704. AND T.RETEST_NUM = '0'
  2705. AND T.OFFLINE_FLAG = '0'
  2706. AND T.COL_NO = '#COL_NO#'
  2707. AND T.COL_SHIFT IS NULL
  2708. AND T.COL_GROUP IS NULL
  2709. ORDER BY T.SEQ ASC)
  2710. WHERE ROWNUM <= #REINSPECTION_NUM1#) LOOP
  2711. UPDATE MIL_TESTING_RACK T
  2712. SET T.RETEST_NUM = '#TEST_NUM1#'
  2713. WHERE T.RESULT_NO = '#RESULT_NO#'
  2714. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2715. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  2716. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  2717. AND T.SEQ = MYROW.SEQ;
  2718. END LOOP;
  2719. FOR MYROW1 IN (SELECT SEQ
  2720. FROM (SELECT T.SEQ
  2721. FROM MIL_TESTING_RACK T
  2722. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2723. AND NVL(T.PRO_PLAN_ID, '/') =
  2724. NVL('#PRO_PLAN_ID#', '/')
  2725. AND NVL(T.GX_PLAN_NO, '/') =
  2726. NVL('#GX_PLAN_NO#', '/')
  2727. AND T.RESULT_NO = '#RESULT_NO#'
  2728. AND T.SUSPECT_FLAG = '1'
  2729. AND T.OFFLINE_FLAG = '0'
  2730. AND T.RECUT_FLAG = '0'
  2731. AND T.COL_NO = '#COL_NO#'
  2732. AND T.STATUS = '2'
  2733. AND T.COL_SHIFT IS NULL
  2734. AND T.COL_GROUP IS NULL
  2735. ORDER BY T.SEQ ASC)
  2736. WHERE ROWNUM <= #RECUT_NUM1#) LOOP
  2737. UPDATE MIL_TESTING_RACK T
  2738. SET T.RECUT_LENGTH = '#RECUT_LEN1#', T.RECUT_FLAG = '1'
  2739. WHERE T.RESULT_NO = '#RESULT_NO#'
  2740. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2741. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  2742. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  2743. AND T.SEQ = MYROW1.SEQ;
  2744. END LOOP;
  2745. FOR MYROW4 IN (SELECT SEQ
  2746. FROM (SELECT T.SEQ
  2747. FROM MIL_TESTING_RACK T
  2748. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2749. AND NVL(T.PRO_PLAN_ID, '/') =
  2750. NVL('#PRO_PLAN_ID#', '/')
  2751. AND NVL(T.GX_PLAN_NO, '/') =
  2752. NVL('#GX_PLAN_NO#', '/')
  2753. AND T.RESULT_NO = '#RESULT_NO#'
  2754. AND T.SUSPECT_FLAG = '0'
  2755. AND T.OFFLINE_FLAG = '0'
  2756. AND T.COL_SHIFT IS NULL
  2757. AND T.COL_GROUP IS NULL
  2758. ORDER BY T.SEQ ASC)
  2759. WHERE ROWNUM <= #SAMPLE_NUM1#) LOOP
  2760. UPDATE MIL_TESTING_RACK T
  2761. SET T.SAMPLE_FLAG = '1'
  2762. WHERE T.RESULT_NO = '#RESULT_NO#'
  2763. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2764. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  2765. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  2766. AND T.SEQ = MYROW4.SEQ;
  2767. END LOOP;
  2768. ELSE
  2769. FOR MYROW2 IN (SELECT SEQ
  2770. FROM (SELECT T.SEQ
  2771. FROM MIL_TESTING_RACK T
  2772. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2773. AND NVL(T.PRO_PLAN_ID, '/') =
  2774. NVL('#PRO_PLAN_ID#', '/')
  2775. AND NVL(T.GX_PLAN_NO, '/') =
  2776. NVL('#GX_PLAN_NO#', '/')
  2777. AND T.RESULT_NO = '#RESULT_NO#'
  2778. AND T.SUSPECT_FLAG = '1'
  2779. AND T.RETEST_NUM = '0'
  2780. AND T.OFFLINE_FLAG = '0'
  2781. AND T.COL_NO = '#COL_NO#'
  2782. ORDER BY T.SEQ ASC)
  2783. WHERE ROWNUM <= #REINSPECTION_NUM1#) LOOP
  2784. UPDATE MIL_TESTING_RACK T
  2785. SET T.RETEST_NUM = '#TEST_NUM1#'
  2786. WHERE T.RESULT_NO = '#RESULT_NO#'
  2787. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2788. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  2789. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  2790. AND T.SEQ = MYROW2.SEQ;
  2791. END LOOP;
  2792. FOR MYROW3 IN (SELECT SEQ
  2793. FROM (SELECT T.SEQ
  2794. FROM MIL_TESTING_RACK T
  2795. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2796. AND NVL(T.PRO_PLAN_ID, '/') =
  2797. NVL('#PRO_PLAN_ID#', '/')
  2798. AND NVL(T.GX_PLAN_NO, '/') =
  2799. NVL('#GX_PLAN_NO#', '/')
  2800. AND T.RESULT_NO = '#RESULT_NO#'
  2801. AND T.SUSPECT_FLAG = '1'
  2802. AND T.RECUT_FLAG = '0'
  2803. AND T.OFFLINE_FLAG = '0'
  2804. AND T.STATUS = '2'
  2805. AND T.COL_NO = '#COL_NO#'
  2806. ORDER BY T.SEQ ASC)
  2807. WHERE ROWNUM <= #RECUT_NUM1#) LOOP
  2808. UPDATE MIL_TESTING_RACK T
  2809. SET T.RECUT_LENGTH = '#RECUT_LEN1#', T.RECUT_FLAG = '1'
  2810. WHERE T.RESULT_NO = '#RESULT_NO#'
  2811. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2812. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  2813. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  2814. AND T.SEQ = MYROW3.SEQ;
  2815. END LOOP;
  2816. FOR MYROW5 IN (SELECT SEQ
  2817. FROM (SELECT T.SEQ
  2818. FROM MIL_TESTING_RACK T
  2819. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2820. AND NVL(T.PRO_PLAN_ID, '/') =
  2821. NVL('#PRO_PLAN_ID#', '/')
  2822. AND NVL(T.GX_PLAN_NO, '/') =
  2823. NVL('#GX_PLAN_NO#', '/')
  2824. AND T.RESULT_NO = '#RESULT_NO#'
  2825. AND T.SUSPECT_FLAG = '0'
  2826. AND T.OFFLINE_FLAG = '0'
  2827. AND T.COL_SHIFT IS NULL
  2828. AND T.COL_GROUP IS NULL
  2829. ORDER BY T.SEQ ASC)
  2830. WHERE ROWNUM <= #SAMPLE_NUM1#) LOOP
  2831. UPDATE MIL_TESTING_RACK T
  2832. SET T.SAMPLE_FLAG = '1'
  2833. WHERE T.RESULT_NO = '#RESULT_NO#'
  2834. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2835. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  2836. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  2837. AND T.SEQ = MYROW5.SEQ;
  2838. END LOOP;
  2839. END IF;
  2840. ELSE
  2841. --258二号操作台
  2842. SELECT T.DETECTION_NUM2,
  2843. T.SCRAP_NUM2,
  2844. T.QUALIFIED_NUM2,
  2845. T.REINSPECTION_NUM2,
  2846. T.SUSPECT_PRODUCT_NUM2,
  2847. T.RECUT_NUM2,
  2848. T.REINSPECTION_QUALIFIED_NUM2,
  2849. T.SAMPLE_NUM2
  2850. INTO V_DETECTION_NUM2,
  2851. V_SCRAP_NUM2,
  2852. V_QUALIFIED_NUM2,
  2853. V_REINSPECTION_NUM2,
  2854. V_SUSPECT_PRODUCT_NUM2,
  2855. V_RECUT_NUM2,
  2856. V_REINSPECTION_QUALIFIED_NUM2,
  2857. V_SAMPLE_NUM2
  2858. FROM MIL_TESTING_RESULT_DETAIL T
  2859. WHERE T.RESULT_NO = '#RESULT_NO#'
  2860. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2861. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  2862. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  2863. AND T.COL_SHIFT = '#COL_SHIFT#'
  2864. AND T.COL_GROUP = '#COL_GROUP#';
  2865. IF (V_QUALIFIED_NUM > 0) THEN
  2866. UPDATE MIL_MT_RESULT T
  2867. SET T.DETECTION_NUM = TO_NUMBER(T.DETECTION_NUM) -
  2868. TO_NUMBER(V_DETECTION_NUM2),
  2869. T.SCRAP_NUM = TO_NUMBER(T.SCRAP_NUM) -
  2870. TO_NUMBER(V_SCRAP_NUM2),
  2871. T.QUALIFIED_NUM = TO_NUMBER(T.QUALIFIED_NUM) -
  2872. TO_NUMBER(V_QUALIFIED_NUM2),
  2873. T.REINSPECTION_NUM = TO_NUMBER(T.REINSPECTION_NUM) -
  2874. TO_NUMBER(V_REINSPECTION_NUM2),
  2875. T.ALARM_NUM = TO_NUMBER(T.ALARM_NUM) -
  2876. TO_NUMBER(V_SUSPECT_PRODUCT_NUM2),
  2877. T.RECUT_NUM = TO_NUMBER(T.RECUT_NUM) -
  2878. TO_NUMBER(V_RECUT_NUM2),
  2879. T.QA_TON = TO_NUMBER(T.QA_TON) -
  2880. TO_NUMBER(T.QA_TON /
  2881. QUALIFIED_NUM) *
  2882. TO_NUMBER(V_QUALIFIED_NUM2),
  2883. T.REINSPECTION_QUALIFIED_NUM = TO_NUMBER(T.REINSPECTION_QUALIFIED_NUM) -
  2884. TO_NUMBER(V_REINSPECTION_QUALIFIED_NUM2),
  2885. T.SAMPLE_NUM = TO_NUMBER(T.SAMPLE_NUM) -
  2886. TO_NUMBER(V_SAMPLE_NUM2)
  2887. WHERE T.RESULT_NO = '#RESULT_NO#'
  2888. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2889. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  2890. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/');
  2891. END IF;
  2892. UPDATE MIL_MT_RESULT T
  2893. SET T.DETECTION_NUM = TO_NUMBER(T.DETECTION_NUM) +
  2894. TO_NUMBER('#DETECTION_NUM2#'),
  2895. T.SCRAP_NUM = TO_NUMBER(T.SCRAP_NUM) +
  2896. TO_NUMBER('#SCRAP_NUM2#'),
  2897. T.QUALIFIED_NUM = TO_NUMBER(T.QUALIFIED_NUM) +
  2898. TO_NUMBER('#QUALIFIED_NUM2#'),
  2899. T.REINSPECTION_NUM = TO_NUMBER(T.REINSPECTION_NUM) +
  2900. TO_NUMBER('#REINSPECTION_NUM2#'),
  2901. T.ALARM_NUM = TO_NUMBER(T.ALARM_NUM) +
  2902. TO_NUMBER('#SUSPECT_PRODUCT_NUM2#'),
  2903. T.RECUT_NUM = TO_NUMBER(T.RECUT_NUM) +
  2904. TO_NUMBER('#RECUT_NUM2#'),
  2905. T.QA_TON = TO_NUMBER(T.QA_TON) +
  2906. TO_NUMBER('#QA_TON#'),
  2907. T.REINSPECTION_QUALIFIED_NUM = TO_NUMBER(T.REINSPECTION_QUALIFIED_NUM) +
  2908. TO_NUMBER('#REINSPECTION_QUALIFIED_NUM2#'),
  2909. T.SAMPLE_NUM = TO_NUMBER(T.SAMPLE_NUM) +
  2910. TO_NUMBER('#SAMPLE_NUM2#'),
  2911. T.PRODUCT_STANDARDS = '#PRODUCT_STANDARDS#',
  2912. T.LO_SURFACE = '#LO_SURFACE#',
  2913. T.LI_SURFACE = '#LI_SURFACE#',
  2914. T.TO_SURFACE = '#TO_SURFACE#',
  2915. T.TI_SURFACE = '#TI_SURFACE#',
  2916. T.GROOVE_SHAPE = '#GROOVE_SHAPE#',
  2917. T.INSPECTION_STANDARD = '#INSPECTION_STANDARD#',
  2918. T.LONGITUDINAL_CURRENT1 = '#LONGITUDINAL_CURRENT1#',
  2919. T.TRANSVERSE_CURRENT1 = '#TRANSVERSE_CURRENT1#',
  2920. T.LONGITUDINAL_CURRENT2 = '#LONGITUDINAL_CURRENT2#',
  2921. T.TRANSVERSE_CURRENT2 = '#TRANSVERSE_CURRENT2#',
  2922. T.SPEED1 = '#SPEED1#',
  2923. T.SPEED2 = '#SPEED2#',
  2924. T.DETECTION_SPEED1 = '#DETECTION_SPEED1#',
  2925. T.DETECTION_SPEED2 = '#DETECTION_SPEED2#',
  2926. T.REMARK = '#REMARK#',
  2927. T.REMARK1 = '#REMARK1#',
  2928. T.NOTCH_INFO = '#NOTCH_INFO#',
  2929. T.NOTCH_LENGTH = '#NOTCH_LENGTH#',
  2930. T.NOTCH_WIDTH = '#NOTCH_WIDTH#',
  2931. T.NOTCH_DEPTH = '#NOTCH_DEPTH#',
  2932. T.NOTCH_FX = '#NOTCH_FX#',
  2933. T.COVERAGE = '#COVERAGE#',
  2934. T.SAMPLE_NO = '#SAMPLE_NO#',
  2935. T.SIGNID = '#SIGNID#',
  2936. T.SIGNID_GRADE = '2',
  2937. T.USERID1 = '#USERID1#',
  2938. T.USERID2 = '#USERID2#',
  2939. T.USERID_GRADE1 = '#USERID_GRADE1#',
  2940. T.USERID_GRADE2 = '#USERID_GRADE2#',
  2941. T.USERID1JD = '#USERID1JD#',
  2942. T.USERID2JD = '#USERID2JD#',
  2943. T.USERID_GRADE1JD = '#USERID_GRADE1JD#',
  2944. T.USERID_GRADE2JD = '#USERID_GRADE2JD#',
  2945. T.STANDARDS_NO = '#STANDARDS_NO#'
  2946. WHERE T.RESULT_NO = '#RESULT_NO#'
  2947. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2948. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  2949. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/');
  2950. UPDATE MIL_TESTING_RESULT_DETAIL T
  2951. SET T.DETECTION_NUM2 = '#DETECTION_NUM2#',
  2952. T.SCRAP_NUM2 = '#SCRAP_NUM2#',
  2953. T.QUALIFIED_NUM2 = '#QUALIFIED_NUM2#',
  2954. T.REINSPECTION_NUM2 = '#REINSPECTION_NUM2#',
  2955. T.REINSPECTION_QUALIFIED_NUM2 = '#REINSPECTION_QUALIFIED_NUM2#',
  2956. T.SUSPECT_PRODUCT_NUM2 = '#SUSPECT_PRODUCT_NUM2#',
  2957. T.RECUT_NUM2 = '#RECUT_NUM2#',
  2958. T.RECUT_LEN2 = '#RECUT_LEN2#',
  2959. T.TEST_NUM2 = '#TEST_NUM2#',
  2960. T.SAMPLE_NUM2 = '#SAMPLE_NUM2#',
  2961. T.COL_USER = '#COL_USER#'
  2962. WHERE T.RESULT_NO = '#RESULT_NO#'
  2963. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2964. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  2965. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  2966. AND T.COL_SHIFT = '#COL_SHIFT#'
  2967. AND T.COL_GROUP = '#COL_GROUP#';
  2968. --处理二号台管号队列
  2969. SELECT NVL(COUNT(1), 0)
  2970. INTO V_RACKCOUNT
  2971. FROM MIL_TESTING_RACK T
  2972. WHERE T.RESULT_NO = '#RESULT_NO#'
  2973. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2974. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  2975. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  2976. AND T.COL_SHIFT = '#COL_SHIFT#'
  2977. AND T.COL_GROUP = '#COL_GROUP#';
  2978. IF (V_RACKCOUNT > 0) THEN
  2979. UPDATE MIL_TESTING_RACK T
  2980. SET T.RETEST_NUM = '0',
  2981. T.RECUT_LENGTH = '',
  2982. T.RECUT_FLAG = '0',
  2983. T.SAMPLE_FLAG = '0'
  2984. WHERE T.RESULT_NO = '#RESULT_NO#'
  2985. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2986. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  2987. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  2988. AND T.COL_SHIFT = '#COL_SHIFT#'
  2989. AND T.COL_GROUP = '#COL_GROUP#';
  2990. FOR MYROW IN (SELECT SEQ
  2991. FROM (SELECT T.SEQ
  2992. FROM MIL_TESTING_RACK T
  2993. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2994. AND NVL(T.PRO_PLAN_ID, '/') =
  2995. NVL('#PRO_PLAN_ID#', '/')
  2996. AND NVL(T.GX_PLAN_NO, '/') =
  2997. NVL('#GX_PLAN_NO#', '/')
  2998. AND T.RESULT_NO = '#RESULT_NO#'
  2999. AND T.SUSPECT_FLAG = '1'
  3000. AND T.RETEST_NUM = '0'
  3001. AND T.OFFLINE_FLAG = '0'
  3002. AND T.COL_NO = '#COL_NO#'
  3003. AND T.COL_SHIFT = '#COL_SHIFT#'
  3004. AND T.COL_GROUP = '#COL_GROUP#'
  3005. ORDER BY T.SEQ ASC)
  3006. WHERE ROWNUM <= #REINSPECTION_NUM2#) LOOP
  3007. UPDATE MIL_TESTING_RACK T
  3008. SET T.RETEST_NUM = '#TEST_NUM2#'
  3009. WHERE T.RESULT_NO = '#RESULT_NO#'
  3010. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3011. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3012. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  3013. AND T.SEQ = MYROW.SEQ;
  3014. END LOOP;
  3015. FOR MYROW1 IN (SELECT SEQ
  3016. FROM (SELECT T.SEQ
  3017. FROM MIL_TESTING_RACK T
  3018. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3019. AND NVL(T.PRO_PLAN_ID, '/') =
  3020. NVL('#PRO_PLAN_ID#', '/')
  3021. AND NVL(T.GX_PLAN_NO, '/') =
  3022. NVL('#GX_PLAN_NO#', '/')
  3023. AND T.RESULT_NO = '#RESULT_NO#'
  3024. AND T.STATUS = '0'
  3025. AND T.RECUT_FLAG = '0'
  3026. AND T.OFFLINE_FLAG = '0'
  3027. AND T.STATUS = '2'
  3028. AND T.COL_NO = '#COL_NO#'
  3029. AND T.COL_SHIFT = '#COL_SHIFT#'
  3030. AND T.COL_GROUP = '#COL_GROUP#'
  3031. ORDER BY T.SEQ ASC)
  3032. WHERE ROWNUM <= #RECUT_NUM2#) LOOP
  3033. UPDATE MIL_TESTING_RACK T
  3034. SET T.RECUT_LENGTH = '#RECUT_LEN2#', T.RECUT_FLAG = '1'
  3035. WHERE T.RESULT_NO = '#RESULT_NO#'
  3036. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3037. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3038. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  3039. AND T.SEQ = MYROW1.SEQ;
  3040. END LOOP;
  3041. FOR MYROW4 IN (SELECT SEQ
  3042. FROM (SELECT T.SEQ
  3043. FROM MIL_TESTING_RACK T
  3044. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3045. AND NVL(T.PRO_PLAN_ID, '/') =
  3046. NVL('#PRO_PLAN_ID#', '/')
  3047. AND NVL(T.GX_PLAN_NO, '/') =
  3048. NVL('#GX_PLAN_NO#', '/')
  3049. AND T.RESULT_NO = '#RESULT_NO#'
  3050. AND T.SUSPECT_FLAG = '0'
  3051. AND T.OFFLINE_FLAG = '0'
  3052. AND T.COL_SHIFT IS NULL
  3053. AND T.COL_GROUP IS NULL
  3054. ORDER BY T.SEQ ASC)
  3055. WHERE ROWNUM <= #SAMPLE_NUM2#) LOOP
  3056. UPDATE MIL_TESTING_RACK T
  3057. SET T.SAMPLE_FLAG = '1'
  3058. WHERE T.RESULT_NO = '#RESULT_NO#'
  3059. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3060. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3061. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  3062. AND T.SEQ = MYROW4.SEQ;
  3063. END LOOP;
  3064. ELSE
  3065. FOR MYROW2 IN (SELECT SEQ
  3066. FROM (SELECT T.SEQ
  3067. FROM MIL_TESTING_RACK T
  3068. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3069. AND NVL(T.PRO_PLAN_ID, '/') =
  3070. NVL('#PRO_PLAN_ID#', '/')
  3071. AND NVL(T.GX_PLAN_NO, '/') =
  3072. NVL('#GX_PLAN_NO#', '/')
  3073. AND T.RESULT_NO = '#RESULT_NO#'
  3074. AND T.SUSPECT_FLAG = '1'
  3075. AND T.RETEST_NUM = '0'
  3076. AND T.OFFLINE_FLAG = '0'
  3077. AND T.COL_NO = '#COL_NO#'
  3078. AND T.COL_SHIFT IS NULL
  3079. AND T.COL_GROUP IS NULL
  3080. ORDER BY T.SEQ ASC)
  3081. WHERE ROWNUM <= #REINSPECTION_NUM2#) LOOP
  3082. UPDATE MIL_TESTING_RACK T
  3083. SET T.RETEST_NUM = '#TEST_NUM2#'
  3084. WHERE T.RESULT_NO = '#RESULT_NO#'
  3085. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3086. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3087. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  3088. AND T.SEQ = MYROW2.SEQ;
  3089. END LOOP;
  3090. FOR MYROW3 IN (SELECT SEQ
  3091. FROM (SELECT T.SEQ
  3092. FROM MIL_TESTING_RACK T
  3093. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3094. AND NVL(T.PRO_PLAN_ID, '/') =
  3095. NVL('#PRO_PLAN_ID#', '/')
  3096. AND NVL(T.GX_PLAN_NO, '/') =
  3097. NVL('#GX_PLAN_NO#', '/')
  3098. AND T.RESULT_NO = '#RESULT_NO#'
  3099. AND T.SUSPECT_FLAG = '1'
  3100. AND T.RECUT_FLAG = '0'
  3101. AND T.OFFLINE_FLAG = '0'
  3102. AND T.STATUS = '2'
  3103. AND T.COL_NO = '#COL_NO#'
  3104. AND T.COL_SHIFT IS NULL
  3105. AND T.COL_GROUP IS NULL
  3106. ORDER BY T.SEQ ASC)
  3107. WHERE ROWNUM <= #RECUT_NUM2#) LOOP
  3108. UPDATE MIL_TESTING_RACK T
  3109. SET T.RECUT_LENGTH = '#RECUT_LEN2#', T.RECUT_FLAG = '1'
  3110. WHERE T.RESULT_NO = '#RESULT_NO#'
  3111. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3112. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3113. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  3114. AND T.SEQ = MYROW3.SEQ;
  3115. END LOOP;
  3116. FOR MYROW4 IN (SELECT SEQ
  3117. FROM (SELECT T.SEQ
  3118. FROM MIL_TESTING_RACK T
  3119. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3120. AND NVL(T.PRO_PLAN_ID, '/') =
  3121. NVL('#PRO_PLAN_ID#', '/')
  3122. AND NVL(T.GX_PLAN_NO, '/') =
  3123. NVL('#GX_PLAN_NO#', '/')
  3124. AND T.RESULT_NO = '#RESULT_NO#'
  3125. AND T.SUSPECT_FLAG = '0'
  3126. AND T.OFFLINE_FLAG = '0'
  3127. AND T.COL_SHIFT IS NULL
  3128. AND T.COL_GROUP IS NULL
  3129. ORDER BY T.SEQ ASC)
  3130. WHERE ROWNUM <= #SAMPLE_NUM2#) LOOP
  3131. UPDATE MIL_TESTING_RACK T
  3132. SET T.SAMPLE_FLAG = '1'
  3133. WHERE T.RESULT_NO = '#RESULT_NO#'
  3134. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3135. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3136. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  3137. AND T.SEQ = MYROW4.SEQ;
  3138. END LOOP;
  3139. END IF;
  3140. END IF;
  3141. ELSE
  3142. IF ('#COL_NO#' = '1') THEN
  3143. INSERT INTO MIL_TESTING_RESULT_DETAIL
  3144. (TEST_NUM1,
  3145. RECUT_LEN1,
  3146. RESULT_NO,
  3147. LOT_NO,
  3148. JUDGE_STOVE_NO,
  3149. PLINE_CODE,
  3150. START_TIME,
  3151. END_TIME,
  3152. COL_USER,
  3153. COL_SHIFT,
  3154. COL_GROUP,
  3155. SCRAP_NUM1,
  3156. QUALIFIED_NUM1,
  3157. REINSPECTION_NUM1,
  3158. REINSPECTION_QUALIFIED_NUM1,
  3159. OFFLINE_NUM1,
  3160. BACKLINE_NUM1,
  3161. DETECTION_NUM1,
  3162. SUSPECT_PRODUCT_NUM1,
  3163. RECUT_NUM1,
  3164. SAMPLE_NUM1,
  3165. PRO_PLAN_ID,
  3166. GX_PLAN_NO)
  3167. VALUES
  3168. ('#TEST_NUM1#',
  3169. '#RECUT_LEN1#',
  3170. '#RESULT_NO#',
  3171. '#LOT_NO#',
  3172. '#JUDGE_STOVE_NO#',
  3173. '#PLINE_CODE#',
  3174. SYSDATE,
  3175. SYSDATE,
  3176. '#COL_USER#',
  3177. '#COL_SHIFT#',
  3178. '#COL_GROUP#',
  3179. '#SCRAP_NUM1#',
  3180. '#QUALIFIED_NUM1#',
  3181. '#REINSPECTION_NUM1#',
  3182. '#REINSPECTION_QUALIFIED_NUM1#',
  3183. '#OFFLINE_NUM1#',
  3184. '#BACKLINE_NUM1#',
  3185. '#DETECTION_NUM1#',
  3186. '#SUSPECT_PRODUCT_NUM1#',
  3187. '#RECUT_NUM1#',
  3188. '#SAMPLE_NUM1#',
  3189. '#PRO_PLAN_ID#',
  3190. '#GX_PLAN_NO#');
  3191. UPDATE MIL_MT_RESULT T
  3192. SET T.DETECTION_NUM = TO_NUMBER(T.DETECTION_NUM) +
  3193. TO_NUMBER('#DETECTION_NUM1#'),
  3194. T.SCRAP_NUM = TO_NUMBER(T.SCRAP_NUM) +
  3195. TO_NUMBER('#SCRAP_NUM1#'),
  3196. T.QUALIFIED_NUM = TO_NUMBER(T.QUALIFIED_NUM) +
  3197. TO_NUMBER('#QUALIFIED_NUM1#'),
  3198. T.REINSPECTION_NUM = TO_NUMBER(T.REINSPECTION_NUM) +
  3199. TO_NUMBER('#REINSPECTION_NUM1#'),
  3200. T.ALARM_NUM = TO_NUMBER(T.ALARM_NUM) +
  3201. TO_NUMBER('#SUSPECT_PRODUCT_NUM1#'),
  3202. T.RECUT_NUM = TO_NUMBER(T.RECUT_NUM) +
  3203. TO_NUMBER('#RECUT_NUM1#'),
  3204. T.QA_TON = TO_NUMBER(T.QA_TON) +
  3205. TO_NUMBER('#QA_TON#'),
  3206. T.REINSPECTION_QUALIFIED_NUM = TO_NUMBER(T.REINSPECTION_QUALIFIED_NUM) +
  3207. TO_NUMBER('#REINSPECTION_QUALIFIED_NUM1#'),
  3208. T.SAMPLE_NUM = TO_NUMBER(T.SAMPLE_NUM) +
  3209. TO_NUMBER('#SAMPLE_NUM1#'),
  3210. T.PRODUCT_STANDARDS = '#PRODUCT_STANDARDS#',
  3211. T.LO_SURFACE = '#LO_SURFACE#',
  3212. T.LI_SURFACE = '#LI_SURFACE#',
  3213. T.TO_SURFACE = '#TO_SURFACE#',
  3214. T.TI_SURFACE = '#TI_SURFACE#',
  3215. T.GROOVE_SHAPE = '#GROOVE_SHAPE#',
  3216. T.INSPECTION_STANDARD = '#INSPECTION_STANDARD#',
  3217. T.LONGITUDINAL_CURRENT1 = '#LONGITUDINAL_CURRENT1#',
  3218. T.TRANSVERSE_CURRENT1 = '#TRANSVERSE_CURRENT1#',
  3219. T.LONGITUDINAL_CURRENT2 = '#LONGITUDINAL_CURRENT2#',
  3220. T.TRANSVERSE_CURRENT2 = '#TRANSVERSE_CURRENT2#',
  3221. T.SPEED1 = '#SPEED1#',
  3222. T.SPEED2 = '#SPEED2#',
  3223. T.DETECTION_SPEED1 = '#DETECTION_SPEED1#',
  3224. T.DETECTION_SPEED2 = '#DETECTION_SPEED2#',
  3225. T.REMARK = '#REMARK#',
  3226. T.REMARK1 = '#REMARK1#',
  3227. T.NOTCH_INFO = '#NOTCH_INFO#',
  3228. T.NOTCH_LENGTH = '#NOTCH_LENGTH#',
  3229. T.NOTCH_WIDTH = '#NOTCH_WIDTH#',
  3230. T.NOTCH_DEPTH = '#NOTCH_DEPTH#',
  3231. T.NOTCH_FX = '#NOTCH_FX#',
  3232. T.COVERAGE = '#COVERAGE#',
  3233. T.SAMPLE_NO = '#SAMPLE_NO#',
  3234. T.SIGNID = '#SIGNID#',
  3235. T.SIGNID_GRADE = '2',
  3236. T.USERID1 = '#USERID1#',
  3237. T.USERID2 = '#USERID2#',
  3238. T.USERID_GRADE1 = '#USERID_GRADE1#',
  3239. T.USERID_GRADE2 = '#USERID_GRADE2#',
  3240. T.USERID1JD = '#USERID1JD#',
  3241. T.USERID2JD = '#USERID2JD#',
  3242. T.USERID_GRADE1JD = '#USERID_GRADE1JD#',
  3243. T.USERID_GRADE2JD = '#USERID_GRADE2JD#',
  3244. T.STANDARDS_NO = '#STANDARDS_NO#'
  3245. WHERE T.RESULT_NO = '#RESULT_NO#'
  3246. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3247. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3248. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/');
  3249. FOR MYROW IN (SELECT SEQ
  3250. FROM (SELECT T.SEQ
  3251. FROM MIL_TESTING_RACK T
  3252. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3253. AND NVL(T.PRO_PLAN_ID, '/') =
  3254. NVL('#PRO_PLAN_ID#', '/')
  3255. AND NVL(T.GX_PLAN_NO, '/') =
  3256. NVL('#GX_PLAN_NO#', '/')
  3257. AND T.RESULT_NO = '#RESULT_NO#'
  3258. AND T.SUSPECT_FLAG = '1'
  3259. AND T.RETEST_NUM = '0'
  3260. AND T.OFFLINE_FLAG = '0'
  3261. AND T.COL_NO = '#COL_NO#'
  3262. AND T.COL_SHIFT IS NULL
  3263. AND T.COL_GROUP IS NULL
  3264. ORDER BY T.SEQ ASC)
  3265. WHERE ROWNUM <= #REINSPECTION_NUM1#) LOOP
  3266. UPDATE MIL_TESTING_RACK T
  3267. SET T.RETEST_NUM = '#TEST_NUM1#'
  3268. WHERE T.RESULT_NO = '#RESULT_NO#'
  3269. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3270. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3271. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  3272. AND T.SEQ = MYROW.SEQ;
  3273. END LOOP;
  3274. FOR MYROW1 IN (SELECT SEQ
  3275. FROM (SELECT T.SEQ
  3276. FROM MIL_TESTING_RACK T
  3277. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3278. AND NVL(T.PRO_PLAN_ID, '/') =
  3279. NVL('#PRO_PLAN_ID#', '/')
  3280. AND NVL(T.GX_PLAN_NO, '/') =
  3281. NVL('#GX_PLAN_NO#', '/')
  3282. AND T.RESULT_NO = '#RESULT_NO#'
  3283. AND T.SUSPECT_FLAG = '1'
  3284. AND T.STATUS = '2'
  3285. AND T.RECUT_FLAG = '0'
  3286. AND T.OFFLINE_FLAG = '0'
  3287. AND T.COL_NO = '#COL_NO#'
  3288. AND T.COL_SHIFT IS NULL
  3289. AND T.COL_GROUP IS NULL
  3290. ORDER BY T.SEQ ASC)
  3291. WHERE ROWNUM <= #RECUT_NUM1#) LOOP
  3292. UPDATE MIL_TESTING_RACK T
  3293. SET T.RECUT_LENGTH = '#RECUT_LEN1#', T.RECUT_FLAG = '1'
  3294. WHERE T.RESULT_NO = '#RESULT_NO#'
  3295. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3296. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3297. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  3298. AND T.SEQ = MYROW1.SEQ;
  3299. END LOOP;
  3300. FOR MYROW4 IN (SELECT SEQ
  3301. FROM (SELECT T.SEQ
  3302. FROM MIL_TESTING_RACK T
  3303. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3304. AND NVL(T.PRO_PLAN_ID, '/') =
  3305. NVL('#PRO_PLAN_ID#', '/')
  3306. AND NVL(T.GX_PLAN_NO, '/') =
  3307. NVL('#GX_PLAN_NO#', '/')
  3308. AND T.RESULT_NO = '#RESULT_NO#'
  3309. AND T.SUSPECT_FLAG = '0'
  3310. AND T.OFFLINE_FLAG = '0'
  3311. AND T.COL_SHIFT IS NULL
  3312. AND T.COL_GROUP IS NULL
  3313. ORDER BY T.SEQ ASC)
  3314. WHERE ROWNUM <= #SAMPLE_NUM1#) LOOP
  3315. UPDATE MIL_TESTING_RACK T
  3316. SET T.SAMPLE_FLAG = '1'
  3317. WHERE T.RESULT_NO = '#RESULT_NO#'
  3318. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3319. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3320. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  3321. AND T.SEQ = MYROW4.SEQ;
  3322. END LOOP;
  3323. ELSE
  3324. INSERT INTO MIL_TESTING_RESULT_DETAIL
  3325. (TEST_NUM2,
  3326. RECUT_LEN2,
  3327. RESULT_NO,
  3328. LOT_NO,
  3329. STOVE_NO,
  3330. JUDGE_STOVE_NO,
  3331. PLINE_CODE,
  3332. START_TIME,
  3333. END_TIME,
  3334. COL_USER,
  3335. COL_SHIFT,
  3336. COL_GROUP,
  3337. SCRAP_NUM2,
  3338. QUALIFIED_NUM2,
  3339. REINSPECTION_NUM2,
  3340. REINSPECTION_QUALIFIED_NUM2,
  3341. OFFLINE_NUM2,
  3342. BACKLINE_NUM2,
  3343. DETECTION_NUM2,
  3344. SUSPECT_PRODUCT_NUM2,
  3345. RECUT_NUM2,
  3346. SAMPLE_NUM2,
  3347. PRO_PLAN_ID,
  3348. GX_PLAN_NO)
  3349. VALUES
  3350. ('#TEST_NUM2#',
  3351. '#RECUT_LEN2#',
  3352. '#RESULT_NO#',
  3353. '#LOT_NO#',
  3354. '#STOVE_NO#',
  3355. '#JUDGE_STOVE_NO#',
  3356. '#PLINE_CODE#',
  3357. SYSDATE,
  3358. SYSDATE,
  3359. '#COL_USER#',
  3360. '#COL_SHIFT#',
  3361. '#COL_GROUP#',
  3362. '#SCRAP_NUM2#',
  3363. '#QUALIFIED_NUM2#',
  3364. '#REINSPECTION_NUM2#',
  3365. '#REINSPECTION_QUALIFIED_NUM2#',
  3366. '#OFFLINE_NUM2#',
  3367. '#BACKLINE_NUM2#',
  3368. '#DETECTION_NUM2#',
  3369. '#SUSPECT_PRODUCT_NUM2#',
  3370. '#RECUT_NUM2#',
  3371. '#SAMPLE_NUM2#',
  3372. '#PRO_PLAN_ID#',
  3373. '#GX_PLAN_NO#');
  3374. UPDATE MIL_MT_RESULT T
  3375. SET T.DETECTION_NUM = TO_NUMBER(T.DETECTION_NUM) +
  3376. TO_NUMBER('#DETECTION_NUM2#'),
  3377. T.SCRAP_NUM = TO_NUMBER(T.SCRAP_NUM) +
  3378. TO_NUMBER('#SCRAP_NUM2#'),
  3379. T.QUALIFIED_NUM = TO_NUMBER(T.QUALIFIED_NUM) +
  3380. TO_NUMBER('#QUALIFIED_NUM2#'),
  3381. T.REINSPECTION_NUM = TO_NUMBER(T.REINSPECTION_NUM) +
  3382. TO_NUMBER('#REINSPECTION_NUM2#'),
  3383. T.ALARM_NUM = TO_NUMBER(T.ALARM_NUM) +
  3384. TO_NUMBER('#SUSPECT_PRODUCT_NUM2#'),
  3385. T.RECUT_NUM = TO_NUMBER(T.RECUT_NUM) +
  3386. TO_NUMBER('#RECUT_NUM2#'),
  3387. T.QA_TON = TO_NUMBER(T.QA_TON) +
  3388. TO_NUMBER('#QA_TON#'),
  3389. T.REINSPECTION_QUALIFIED_NUM = TO_NUMBER(T.REINSPECTION_QUALIFIED_NUM) +
  3390. TO_NUMBER('#REINSPECTION_QUALIFIED_NUM2#'),
  3391. T.SAMPLE_NUM = TO_NUMBER(T.SAMPLE_NUM) +
  3392. TO_NUMBER('#SAMPLE_NUM2#'),
  3393. T.PRODUCT_STANDARDS = '#PRODUCT_STANDARDS#',
  3394. T.LO_SURFACE = '#LO_SURFACE#',
  3395. T.LI_SURFACE = '#LI_SURFACE#',
  3396. T.TO_SURFACE = '#TO_SURFACE#',
  3397. T.TI_SURFACE = '#TI_SURFACE#',
  3398. T.GROOVE_SHAPE = '#GROOVE_SHAPE#',
  3399. T.INSPECTION_STANDARD = '#INSPECTION_STANDARD#',
  3400. T.LONGITUDINAL_CURRENT1 = '#LONGITUDINAL_CURRENT1#',
  3401. T.TRANSVERSE_CURRENT1 = '#TRANSVERSE_CURRENT1#',
  3402. T.LONGITUDINAL_CURRENT2 = '#LONGITUDINAL_CURRENT2#',
  3403. T.TRANSVERSE_CURRENT2 = '#TRANSVERSE_CURRENT2#',
  3404. T.SPEED1 = '#SPEED1#',
  3405. T.SPEED2 = '#SPEED2#',
  3406. T.DETECTION_SPEED1 = '#DETECTION_SPEED1#',
  3407. T.DETECTION_SPEED2 = '#DETECTION_SPEED2#',
  3408. T.REMARK = '#REMARK#',
  3409. T.REMARK1 = '#REMARK1#',
  3410. T.NOTCH_INFO = '#NOTCH_INFO#',
  3411. T.NOTCH_LENGTH = '#NOTCH_LENGTH#',
  3412. T.NOTCH_WIDTH = '#NOTCH_WIDTH#',
  3413. T.NOTCH_DEPTH = '#NOTCH_DEPTH#',
  3414. T.NOTCH_FX = '#NOTCH_FX#',
  3415. T.COVERAGE = '#COVERAGE#',
  3416. T.SAMPLE_NO = '#SAMPLE_NO#',
  3417. T.SIGNID = '#SIGNID#',
  3418. T.SIGNID_GRADE = '2',
  3419. T.USERID1 = '#USERID1#',
  3420. T.USERID2 = '#USERID2#',
  3421. T.USERID_GRADE1 = '#USERID_GRADE1#',
  3422. T.USERID_GRADE2 = '#USERID_GRADE2#',
  3423. T.USERID1JD = '#USERID1JD#',
  3424. T.USERID2JD = '#USERID2JD#',
  3425. T.USERID_GRADE1JD = '#USERID_GRADE1JD#',
  3426. T.USERID_GRADE2JD = '#USERID_GRADE2JD#',
  3427. T.STANDARDS_NO = '#STANDARDS_NO#'
  3428. WHERE T.RESULT_NO = '#RESULT_NO#'
  3429. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3430. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3431. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/');
  3432. FOR MYROW IN (SELECT SEQ
  3433. FROM (SELECT T.SEQ
  3434. FROM MIL_TESTING_RACK T
  3435. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3436. AND NVL(T.PRO_PLAN_ID, '/') =
  3437. NVL('#PRO_PLAN_ID#', '/')
  3438. AND NVL(T.GX_PLAN_NO, '/') =
  3439. NVL('#GX_PLAN_NO#', '/')
  3440. AND T.RESULT_NO = '#RESULT_NO#'
  3441. AND T.SUSPECT_FLAG = '1'
  3442. AND T.RETEST_NUM = '0'
  3443. AND T.COL_NO = '#COL_NO#'
  3444. AND T.OFFLINE_FLAG = '0'
  3445. AND T.COL_SHIFT IS NULL
  3446. AND T.COL_GROUP IS NULL
  3447. ORDER BY T.SEQ ASC)
  3448. WHERE ROWNUM <= #REINSPECTION_NUM2#) LOOP
  3449. UPDATE MIL_TESTING_RACK T
  3450. SET T.RETEST_NUM = '#TEST_NUM2#'
  3451. WHERE T.RESULT_NO = '#RESULT_NO#'
  3452. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3453. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3454. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  3455. AND T.SEQ = MYROW.SEQ;
  3456. END LOOP;
  3457. FOR MYROW1 IN (SELECT SEQ
  3458. FROM (SELECT T.SEQ
  3459. FROM MIL_TESTING_RACK T
  3460. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3461. AND NVL(T.PRO_PLAN_ID, '/') =
  3462. NVL('#PRO_PLAN_ID#', '/')
  3463. AND NVL(T.GX_PLAN_NO, '/') =
  3464. NVL('#GX_PLAN_NO#', '/')
  3465. AND T.RESULT_NO = '#RESULT_NO#'
  3466. AND T.SUSPECT_FLAG = '1'
  3467. AND T.RECUT_FLAG = '0'
  3468. AND T.OFFLINE_FLAG = '0'
  3469. AND T.STATUS = '2'
  3470. AND T.COL_NO = '#COL_NO#'
  3471. AND T.COL_SHIFT IS NULL
  3472. AND T.COL_GROUP IS NULL
  3473. ORDER BY T.SEQ ASC)
  3474. WHERE ROWNUM <= #RECUT_NUM2#) LOOP
  3475. UPDATE MIL_TESTING_RACK T
  3476. SET T.RECUT_LENGTH = '#RECUT_LEN2#', T.RECUT_FLAG = '1'
  3477. WHERE T.RESULT_NO = '#RESULT_NO#'
  3478. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3479. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3480. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  3481. AND T.SEQ = MYROW1.SEQ;
  3482. END LOOP;
  3483. FOR MYROW4 IN (SELECT SEQ
  3484. FROM (SELECT T.SEQ
  3485. FROM MIL_TESTING_RACK T
  3486. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3487. AND NVL(T.PRO_PLAN_ID, '/') =
  3488. NVL('#PRO_PLAN_ID#', '/')
  3489. AND NVL(T.GX_PLAN_NO, '/') =
  3490. NVL('#GX_PLAN_NO#', '/')
  3491. AND T.RESULT_NO = '#RESULT_NO#'
  3492. AND T.SUSPECT_FLAG = '0'
  3493. AND T.OFFLINE_FLAG = '0'
  3494. AND T.COL_SHIFT IS NULL
  3495. AND T.COL_GROUP IS NULL
  3496. ORDER BY T.SEQ ASC)
  3497. WHERE ROWNUM <= #SAMPLE_NUM2#) LOOP
  3498. UPDATE MIL_TESTING_RACK T
  3499. SET T.SAMPLE_FLAG = '1'
  3500. WHERE T.RESULT_NO = '#RESULT_NO#'
  3501. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3502. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3503. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  3504. AND T.SEQ = MYROW4.SEQ;
  3505. END LOOP;
  3506. END IF;
  3507. END IF;
  3508. END;
  3509. ]]>
  3510. </query>
  3511. <query id = "EddyCurrentTestingResult.saveEtResult" desc = "保存涡流探伤实绩">
  3512. <![CDATA[
  3513. DECLARE
  3514. V_COUNT MIL_TESTING_RESULT_DETAIL_DES.REASON_NUMBER%TYPE := NULL;
  3515. V_DETECTION_NUM1 MIL_TESTING_RESULT_DETAIL.DETECTION_NUM1%TYPE := NULL;
  3516. V_SCRAP_NUM1 MIL_TESTING_RESULT_DETAIL.SCRAP_NUM1%TYPE := NULL;
  3517. V_QUALIFIED_NUM1 MIL_TESTING_RESULT_DETAIL.QUALIFIED_NUM1%TYPE := NULL;
  3518. V_REINSPECTION_NUM1 MIL_TESTING_RESULT_DETAIL.REINSPECTION_NUM1%TYPE := NULL;
  3519. V_SUSPECT_PRODUCT_NUM1 MIL_TESTING_RESULT_DETAIL.SUSPECT_PRODUCT_NUM1%TYPE := NULL;
  3520. V_REINSPECTION_QUALIFIED_NUM1 MIL_TESTING_RESULT_DETAIL.REINSPECTION_QUALIFIED_NUM1%TYPE := NULL;
  3521. V_SAMPLE_NUM1 MIL_TESTING_RESULT_DETAIL.SAMPLE_NUM1%TYPE := NULL;
  3522. V_DETECTION_NUM2 MIL_TESTING_RESULT_DETAIL.DETECTION_NUM2%TYPE := NULL;
  3523. V_SCRAP_NUM2 MIL_TESTING_RESULT_DETAIL.SCRAP_NUM2%TYPE := NULL;
  3524. V_QUALIFIED_NUM2 MIL_TESTING_RESULT_DETAIL.QUALIFIED_NUM2%TYPE := NULL;
  3525. V_REINSPECTION_NUM2 MIL_TESTING_RESULT_DETAIL.REINSPECTION_NUM2%TYPE := NULL;
  3526. V_SUSPECT_PRODUCT_NUM2 MIL_TESTING_RESULT_DETAIL.SUSPECT_PRODUCT_NUM2%TYPE := NULL;
  3527. V_REINSPECTION_QUALIFIED_NUM2 MIL_TESTING_RESULT_DETAIL.REINSPECTION_QUALIFIED_NUM2%TYPE := NULL;
  3528. V_SAMPLE_NUM2 MIL_TESTING_RESULT_DETAIL.SAMPLE_NUM2%TYPE := NULL;
  3529. V_DETECTION_NUM3 MIL_TESTING_RESULT_DETAIL.DETECTION_NUM1%TYPE := NULL;
  3530. V_SCRAP_NUM3 MIL_TESTING_RESULT_DETAIL.SCRAP_NUM1%TYPE := NULL;
  3531. V_QUALIFIED_NUM3 MIL_TESTING_RESULT_DETAIL.QUALIFIED_NUM1%TYPE := NULL;
  3532. V_REINSPECTION_NUM3 MIL_TESTING_RESULT_DETAIL.REINSPECTION_NUM1%TYPE := NULL;
  3533. V_SUSPECT_PRODUCT_NUM3 MIL_TESTING_RESULT_DETAIL.SUSPECT_PRODUCT_NUM1%TYPE := NULL;
  3534. V_REINSPECTION_QUALIFIED_NUM3 MIL_TESTING_RESULT_DETAIL.REINSPECTION_QUALIFIED_NUM1%TYPE := NULL;
  3535. V_SAMPLE_NUM3 MIL_TESTING_RESULT_DETAIL.SAMPLE_NUM1%TYPE := NULL;
  3536. V_RACKCOUNT MIL_TESTING_RESULT_DETAIL_DES.REASON_NUMBER%TYPE := NULL;
  3537. V_QUALIFIED_NUM MIL_TESTING_RESULT_DETAIL_DES.REASON_NUMBER%TYPE := NULL;
  3538. BEGIN
  3539. --查询实绩字表是否已存在实绩
  3540. SELECT NVL(COUNT(1), 0)
  3541. INTO V_COUNT
  3542. FROM MIL_TESTING_RESULT_DETAIL T
  3543. WHERE T.RESULT_NO = '#RESULT_NO#'
  3544. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3545. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3546. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  3547. AND T.COL_SHIFT = '#COL_SHIFT#'
  3548. AND T.COL_GROUP = '#COL_GROUP#';
  3549. SELECT T.QUALIFIED_NUM
  3550. INTO V_QUALIFIED_NUM
  3551. FROM MIL_ET_RESULT T
  3552. WHERE T.RESULT_NO = '#RESULT_NO#'
  3553. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3554. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3555. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/');
  3556. IF (V_COUNT > 0) THEN
  3557. --存在看是哪个操作台
  3558. IF ('#COL_NO#' = '1') THEN
  3559. SELECT T.DETECTION_NUM1,
  3560. T.SCRAP_NUM1,
  3561. T.QUALIFIED_NUM1,
  3562. T.REINSPECTION_NUM1,
  3563. T.SUSPECT_PRODUCT_NUM1,
  3564. T.REINSPECTION_QUALIFIED_NUM1,
  3565. T.SAMPLE_NUM1
  3566. INTO V_DETECTION_NUM1,
  3567. V_SCRAP_NUM1,
  3568. V_QUALIFIED_NUM1,
  3569. V_REINSPECTION_NUM1,
  3570. V_SUSPECT_PRODUCT_NUM1,
  3571. V_REINSPECTION_QUALIFIED_NUM1,
  3572. V_SAMPLE_NUM1
  3573. FROM MIL_TESTING_RESULT_DETAIL T
  3574. WHERE T.RESULT_NO = '#RESULT_NO#'
  3575. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3576. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3577. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  3578. AND T.COL_SHIFT = '#COL_SHIFT#'
  3579. AND T.COL_GROUP = '#COL_GROUP#';
  3580. --把该班次班组原支数在实绩主表减去
  3581. IF (V_QUALIFIED_NUM > 0) THEN
  3582. UPDATE MIL_ET_RESULT T
  3583. SET T.DETECTION_NUM = TO_NUMBER(T.DETECTION_NUM) -
  3584. TO_NUMBER(V_DETECTION_NUM1),
  3585. T.SCRAP_NUM = TO_NUMBER(T.SCRAP_NUM) -
  3586. TO_NUMBER(V_SCRAP_NUM1),
  3587. T.QUALIFIED_NUM = TO_NUMBER(T.QUALIFIED_NUM) -
  3588. TO_NUMBER(V_QUALIFIED_NUM1),
  3589. T.REINSPECTION_NUM = TO_NUMBER(T.REINSPECTION_NUM) -
  3590. TO_NUMBER(V_REINSPECTION_NUM1),
  3591. T.SUSPECT_PRODUCT_NUM = TO_NUMBER(T.SUSPECT_PRODUCT_NUM) -
  3592. TO_NUMBER(V_SUSPECT_PRODUCT_NUM1),
  3593. T.QA_TON = TO_NUMBER(T.QA_TON) -
  3594. TO_NUMBER(T.QA_TON /
  3595. QUALIFIED_NUM) *
  3596. TO_NUMBER(V_QUALIFIED_NUM1),
  3597. T.REINSPECTION_QUALIFIED_NUM = TO_NUMBER(T.REINSPECTION_QUALIFIED_NUM) -
  3598. TO_NUMBER(V_REINSPECTION_QUALIFIED_NUM1),
  3599. T.SAMPLE_NUM = TO_NUMBER(T.SAMPLE_NUM) -
  3600. TO_NUMBER(V_SAMPLE_NUM1)
  3601. WHERE T.RESULT_NO = '#RESULT_NO#'
  3602. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3603. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3604. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/');
  3605. ELSIF (V_QUALIFIED_NUM = 0) THEN
  3606. UPDATE MIL_ET_RESULT T
  3607. SET T.DETECTION_NUM = TO_NUMBER(T.DETECTION_NUM) -
  3608. TO_NUMBER(V_DETECTION_NUM1),
  3609. T.SCRAP_NUM = TO_NUMBER(T.SCRAP_NUM) -
  3610. TO_NUMBER(V_SCRAP_NUM1),
  3611. T.QUALIFIED_NUM = TO_NUMBER(T.QUALIFIED_NUM) -
  3612. TO_NUMBER(V_QUALIFIED_NUM1),
  3613. T.REINSPECTION_NUM = TO_NUMBER(T.REINSPECTION_NUM) -
  3614. TO_NUMBER(V_REINSPECTION_NUM1),
  3615. T.SUSPECT_PRODUCT_NUM = TO_NUMBER(T.SUSPECT_PRODUCT_NUM) -
  3616. TO_NUMBER(V_SUSPECT_PRODUCT_NUM1),
  3617. T.REINSPECTION_QUALIFIED_NUM = TO_NUMBER(T.REINSPECTION_QUALIFIED_NUM) -
  3618. TO_NUMBER(V_REINSPECTION_QUALIFIED_NUM1),
  3619. T.SAMPLE_NUM = TO_NUMBER(T.SAMPLE_NUM) -
  3620. TO_NUMBER(V_SAMPLE_NUM1)
  3621. WHERE T.RESULT_NO = '#RESULT_NO#'
  3622. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3623. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3624. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/');
  3625. END IF;
  3626. --把实绩主表的支数增加
  3627. UPDATE MIL_ET_RESULT T
  3628. SET T.DETECTION_NUM = TO_NUMBER(T.DETECTION_NUM) +
  3629. TO_NUMBER('#DETECTION_NUM1#'),
  3630. T.SCRAP_NUM = TO_NUMBER(T.SCRAP_NUM) +
  3631. TO_NUMBER('#SCRAP_NUM1#'),
  3632. T.QUALIFIED_NUM = TO_NUMBER(T.QUALIFIED_NUM) +
  3633. TO_NUMBER('#QUALIFIED_NUM1#'),
  3634. T.REINSPECTION_NUM = TO_NUMBER(T.REINSPECTION_NUM) +
  3635. TO_NUMBER('#REINSPECTION_NUM1#'),
  3636. T.SUSPECT_PRODUCT_NUM = TO_NUMBER(T.SUSPECT_PRODUCT_NUM) +
  3637. TO_NUMBER('#SUSPECT_PRODUCT_NUM1#'),
  3638. T.QA_TON = TO_NUMBER(T.QA_TON) +
  3639. TO_NUMBER('#QA_TON#'),
  3640. T.REINSPECTION_QUALIFIED_NUM = TO_NUMBER(T.REINSPECTION_QUALIFIED_NUM) +
  3641. TO_NUMBER('#REINSPECTION_QUALIFIED_NUM1#'),
  3642. T.SAMPLE_NUM = TO_NUMBER(T.SAMPLE_NUM) +
  3643. TO_NUMBER('#SAMPLE_NUM1#'),
  3644. T.PRODUCT_STANDARDS = '#PRODUCT_STANDARDS#',
  3645. T.INSPECTION_STANDARD = '#INSPECTION_STANDARD#',
  3646. T.TESTING_METHOD = '#TESTING_METHOD#',
  3647. T.CALIBRATION_METHOD = '#CALIBRATION_METHOD#',
  3648. T.ARTIFICIAL_DEFECT_SHAPE = '#ARTIFICIAL_DEFECT_SHAPE#',
  3649. T.EXCITATION_FREQUENCY1 = '#EXCITATION_FREQUENCY1#',
  3650. T.EXCITATION_FREQUENCY2 = '#EXCITATION_FREQUENCY2#',
  3651. T.EXCITATION_FREQUENCY3 = '#EXCITATION_FREQUENCY3#',
  3652. T.TESTING_SPEED1 = '#TESTING_SPEED1#',
  3653. T.TESTING_SPEED2 = '#TESTING_SPEED2#',
  3654. T.TESTING_SPEED3 = '#TESTING_SPEED3#',
  3655. T.USERID = '#USERID#',
  3656. T.SIGNID = '#SIGNID#',
  3657. T.ACCEPTANCE_GRADE = '#ACCEPTANCE_GRADE#',
  3658. T.USERID1 = '#USERID1#',
  3659. T.USERID2 = '#USERID2#',
  3660. T.USERID_GRADE1 = '#USERID_GRADE1#',
  3661. T.USERID_GRADE2 = '#USERID_GRADE2#',
  3662. T.USERID1JD = '#USERID1JD#',
  3663. T.USERID2JD = '#USERID2JD#',
  3664. T.USERID_GRADE1JD = '#USERID_GRADE1JD#',
  3665. T.USERID_GRADE2JD = '#USERID_GRADE2JD#',
  3666. T.REMARK = '#REMARK#',
  3667. T.NOTCH_INFO = '#NOTCH_INFO#',
  3668. T.NOTCH_LENGTH = '#NOTCH_LENGTH#',
  3669. T.NOTCH_WIDTH = '#NOTCH_WIDTH#',
  3670. T.NOTCH_DEPTH = '#NOTCH_DEPTH#',
  3671. T.SAMPLE_NEWS = '#SAMPLE_NEWS#'
  3672. WHERE T.RESULT_NO = '#RESULT_NO#'
  3673. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3674. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3675. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/');
  3676. --修改实绩子表
  3677. UPDATE MIL_TESTING_RESULT_DETAIL T
  3678. SET T.DETECTION_NUM1 = '#DETECTION_NUM1#',
  3679. T.SCRAP_NUM1 = '#SCRAP_NUM1#',
  3680. T.QUALIFIED_NUM1 = '#QUALIFIED_NUM1#',
  3681. T.REINSPECTION_NUM1 = '#REINSPECTION_NUM1#',
  3682. T.REINSPECTION_QUALIFIED_NUM1 = '#REINSPECTION_QUALIFIED_NUM1#',
  3683. T.SUSPECT_PRODUCT_NUM1 = '#SUSPECT_PRODUCT_NUM1#',
  3684. T.SAMPLE_NUM1 = '#SAMPLE_NUM1#',
  3685. T.COL_USER = '#COL_USER#'
  3686. WHERE T.RESULT_NO = '#RESULT_NO#'
  3687. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3688. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3689. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  3690. AND T.COL_SHIFT = '#COL_SHIFT#'
  3691. AND T.COL_GROUP = '#COL_GROUP#';
  3692. --处理1号台管号队列
  3693. SELECT NVL(COUNT(1), 0)
  3694. INTO V_RACKCOUNT
  3695. FROM MIL_TESTING_RACK T
  3696. WHERE T.RESULT_NO = '#RESULT_NO#'
  3697. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3698. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3699. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  3700. AND T.COL_SHIFT IS NULL
  3701. AND T.COL_GROUP IS NULL;
  3702. IF (V_RACKCOUNT > 0) THEN
  3703. UPDATE MIL_TESTING_RACK T
  3704. SET T.RETEST_NUM = '0',
  3705. T.RECUT_LENGTH = '',
  3706. T.RECUT_FLAG = '0',
  3707. T.SAMPLE_FLAG = '0'
  3708. WHERE T.RESULT_NO = '#RESULT_NO#'
  3709. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3710. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3711. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  3712. AND T.COL_SHIFT IS NULL
  3713. AND T.COL_GROUP IS NULL;
  3714. --留样支数
  3715. FOR MYROW4 IN (SELECT SEQ
  3716. FROM (SELECT T.SEQ
  3717. FROM MIL_TESTING_RACK T
  3718. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3719. AND T.RESULT_NO = '#RESULT_NO#'
  3720. AND NVL(T.PRO_PLAN_ID, '/') =
  3721. NVL('#PRO_PLAN_ID#', '/')
  3722. AND NVL(T.GX_PLAN_NO, '/') =
  3723. NVL('#GX_PLAN_NO#', '/')
  3724. AND T.SUSPECT_FLAG = '0'
  3725. AND T.OFFLINE_FLAG = '0'
  3726. AND T.COL_SHIFT IS NULL
  3727. AND T.COL_GROUP IS NULL
  3728. ORDER BY T.SEQ ASC)
  3729. WHERE ROWNUM <= #SAMPLE_NUM1#) LOOP
  3730. UPDATE MIL_TESTING_RACK T
  3731. SET T.SAMPLE_FLAG = '1'
  3732. WHERE T.RESULT_NO = '#RESULT_NO#'
  3733. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3734. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3735. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  3736. AND T.SEQ = MYROW4.SEQ;
  3737. END LOOP;
  3738. ELSE
  3739. FOR MYROW5 IN (SELECT SEQ
  3740. FROM (SELECT T.SEQ
  3741. FROM MIL_TESTING_RACK T
  3742. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3743. AND T.RESULT_NO = '#RESULT_NO#'
  3744. AND NVL(T.PRO_PLAN_ID, '/') =
  3745. NVL('#PRO_PLAN_ID#', '/')
  3746. AND NVL(T.GX_PLAN_NO, '/') =
  3747. NVL('#GX_PLAN_NO#', '/')
  3748. AND T.SUSPECT_FLAG = '0'
  3749. AND T.OFFLINE_FLAG = '0'
  3750. AND T.COL_SHIFT IS NULL
  3751. AND T.COL_GROUP IS NULL
  3752. ORDER BY T.SEQ ASC)
  3753. WHERE ROWNUM <= #SAMPLE_NUM1#) LOOP
  3754. UPDATE MIL_TESTING_RACK T
  3755. SET T.SAMPLE_FLAG = '1'
  3756. WHERE T.RESULT_NO = '#RESULT_NO#'
  3757. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3758. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3759. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  3760. AND T.SEQ = MYROW5.SEQ;
  3761. END LOOP;
  3762. END IF;
  3763. ELSIF ('#COL_NO#' = '2') THEN
  3764. --168二号操作台
  3765. SELECT T.DETECTION_NUM2,
  3766. T.SCRAP_NUM2,
  3767. T.QUALIFIED_NUM2,
  3768. T.REINSPECTION_NUM2,
  3769. T.SUSPECT_PRODUCT_NUM2,
  3770. T.REINSPECTION_QUALIFIED_NUM2,
  3771. T.SAMPLE_NUM2
  3772. INTO V_DETECTION_NUM2,
  3773. V_SCRAP_NUM2,
  3774. V_QUALIFIED_NUM2,
  3775. V_REINSPECTION_NUM2,
  3776. V_SUSPECT_PRODUCT_NUM2,
  3777. V_REINSPECTION_QUALIFIED_NUM2,
  3778. V_SAMPLE_NUM2
  3779. FROM MIL_TESTING_RESULT_DETAIL T
  3780. WHERE T.RESULT_NO = '#RESULT_NO#'
  3781. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3782. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3783. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  3784. AND T.COL_SHIFT = '#COL_SHIFT#'
  3785. AND T.COL_GROUP = '#COL_GROUP#';
  3786. IF (V_QUALIFIED_NUM > 0) THEN
  3787. UPDATE MIL_ET_RESULT T
  3788. SET T.DETECTION_NUM = TO_NUMBER(T.DETECTION_NUM) -
  3789. TO_NUMBER(V_DETECTION_NUM2),
  3790. T.SCRAP_NUM = TO_NUMBER(T.SCRAP_NUM) -
  3791. TO_NUMBER(V_SCRAP_NUM2),
  3792. T.QUALIFIED_NUM = TO_NUMBER(T.QUALIFIED_NUM) -
  3793. TO_NUMBER(V_QUALIFIED_NUM2),
  3794. T.REINSPECTION_NUM = TO_NUMBER(T.REINSPECTION_NUM) -
  3795. TO_NUMBER(V_REINSPECTION_NUM2),
  3796. T.SUSPECT_PRODUCT_NUM = TO_NUMBER(T.SUSPECT_PRODUCT_NUM) -
  3797. TO_NUMBER(V_SUSPECT_PRODUCT_NUM2),
  3798. T.QA_TON = TO_NUMBER(T.QA_TON) -
  3799. TO_NUMBER(T.QA_TON /
  3800. QUALIFIED_NUM) *
  3801. TO_NUMBER(V_QUALIFIED_NUM2),
  3802. T.REINSPECTION_QUALIFIED_NUM = TO_NUMBER(T.REINSPECTION_QUALIFIED_NUM) -
  3803. TO_NUMBER(V_REINSPECTION_QUALIFIED_NUM2),
  3804. T.SAMPLE_NUM = TO_NUMBER(T.SAMPLE_NUM) -
  3805. TO_NUMBER(V_SAMPLE_NUM2)
  3806. WHERE T.RESULT_NO = '#RESULT_NO#'
  3807. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3808. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3809. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/');
  3810. END IF;
  3811. UPDATE MIL_ET_RESULT T
  3812. SET T.DETECTION_NUM = TO_NUMBER(T.DETECTION_NUM) +
  3813. TO_NUMBER('#DETECTION_NUM2#'),
  3814. T.SCRAP_NUM = TO_NUMBER(T.SCRAP_NUM) +
  3815. TO_NUMBER('#SCRAP_NUM2#'),
  3816. T.QUALIFIED_NUM = TO_NUMBER(T.QUALIFIED_NUM) +
  3817. TO_NUMBER('#QUALIFIED_NUM2#'),
  3818. T.REINSPECTION_NUM = TO_NUMBER(T.REINSPECTION_NUM) +
  3819. TO_NUMBER('#REINSPECTION_NUM2#'),
  3820. T.SUSPECT_PRODUCT_NUM = TO_NUMBER(T.SUSPECT_PRODUCT_NUM) +
  3821. TO_NUMBER('#SUSPECT_PRODUCT_NUM2#'),
  3822. T.QA_TON = TO_NUMBER(T.QA_TON) +
  3823. TO_NUMBER('#QA_TON#'),
  3824. T.REINSPECTION_QUALIFIED_NUM = TO_NUMBER(T.REINSPECTION_QUALIFIED_NUM) +
  3825. TO_NUMBER('#REINSPECTION_QUALIFIED_NUM2#'),
  3826. T.SAMPLE_NUM = TO_NUMBER(T.SAMPLE_NUM) +
  3827. TO_NUMBER('#SAMPLE_NUM2#'),
  3828. T.PRODUCT_STANDARDS = '#PRODUCT_STANDARDS#',
  3829. T.INSPECTION_STANDARD = '#INSPECTION_STANDARD#',
  3830. T.TESTING_METHOD = '#TESTING_METHOD#',
  3831. T.CALIBRATION_METHOD = '#CALIBRATION_METHOD#',
  3832. T.ARTIFICIAL_DEFECT_SHAPE = '#ARTIFICIAL_DEFECT_SHAPE#',
  3833. T.EXCITATION_FREQUENCY1 = '#EXCITATION_FREQUENCY1#',
  3834. T.EXCITATION_FREQUENCY2 = '#EXCITATION_FREQUENCY2#',
  3835. T.EXCITATION_FREQUENCY3 = '#EXCITATION_FREQUENCY3#',
  3836. T.TESTING_SPEED1 = '#TESTING_SPEED1#',
  3837. T.TESTING_SPEED2 = '#TESTING_SPEED2#',
  3838. T.TESTING_SPEED3 = '#TESTING_SPEED3#',
  3839. T.USERID = '#USERID#',
  3840. T.SIGNID = '#SIGNID#',
  3841. T.ACCEPTANCE_GRADE = '#ACCEPTANCE_GRADE#',
  3842. T.USERID1 = '#USERID1#',
  3843. T.USERID2 = '#USERID2#',
  3844. T.USERID_GRADE1 = '#USERID_GRADE1#',
  3845. T.USERID_GRADE2 = '#USERID_GRADE2#',
  3846. T.USERID1JD = '#USERID1JD#',
  3847. T.USERID2JD = '#USERID2JD#',
  3848. T.USERID_GRADE1JD = '#USERID_GRADE1JD#',
  3849. T.USERID_GRADE2JD = '#USERID_GRADE2JD#',
  3850. T.REMARK = '#REMARK#',
  3851. T.NOTCH_INFO = '#NOTCH_INFO#',
  3852. T.NOTCH_LENGTH = '#NOTCH_LENGTH#',
  3853. T.NOTCH_WIDTH = '#NOTCH_WIDTH#',
  3854. T.NOTCH_DEPTH = '#NOTCH_DEPTH#',
  3855. T.SAMPLE_NEWS = '#SAMPLE_NEWS#'
  3856. WHERE T.RESULT_NO = '#RESULT_NO#'
  3857. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3858. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3859. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/');
  3860. UPDATE MIL_TESTING_RESULT_DETAIL T
  3861. SET T.DETECTION_NUM2 = '#DETECTION_NUM2#',
  3862. T.SCRAP_NUM2 = '#SCRAP_NUM2#',
  3863. T.QUALIFIED_NUM2 = '#QUALIFIED_NUM2#',
  3864. T.REINSPECTION_NUM2 = '#REINSPECTION_NUM2#',
  3865. T.REINSPECTION_QUALIFIED_NUM2 = '#REINSPECTION_QUALIFIED_NUM2#',
  3866. T.SUSPECT_PRODUCT_NUM2 = '#SUSPECT_PRODUCT_NUM2#',
  3867. T.SAMPLE_NUM2 = '#SAMPLE_NUM2#',
  3868. T.COL_USER = '#COL_USER#'
  3869. WHERE T.RESULT_NO = '#RESULT_NO#'
  3870. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3871. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3872. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  3873. AND T.COL_SHIFT = '#COL_SHIFT#'
  3874. AND T.COL_GROUP = '#COL_GROUP#';
  3875. --处理二号台管号队列
  3876. SELECT NVL(COUNT(1), 0)
  3877. INTO V_RACKCOUNT
  3878. FROM MIL_TESTING_RACK T
  3879. WHERE T.RESULT_NO = '#RESULT_NO#'
  3880. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3881. AND T.COL_SHIFT = '#COL_SHIFT#'
  3882. AND T.COL_GROUP = '#COL_GROUP#';
  3883. IF (V_RACKCOUNT > 0) THEN
  3884. UPDATE MIL_TESTING_RACK T
  3885. SET T.RETEST_NUM = '0',
  3886. T.RECUT_LENGTH = '',
  3887. T.RECUT_FLAG = '0',
  3888. T.SAMPLE_FLAG = '0'
  3889. WHERE T.RESULT_NO = '#RESULT_NO#'
  3890. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3891. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3892. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  3893. AND T.COL_SHIFT = '#COL_SHIFT#'
  3894. AND T.COL_GROUP = '#COL_GROUP#';
  3895. FOR MYROW4 IN (SELECT SEQ
  3896. FROM (SELECT T.SEQ
  3897. FROM MIL_TESTING_RACK T
  3898. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3899. AND NVL(T.PRO_PLAN_ID, '/') =
  3900. NVL('#PRO_PLAN_ID#', '/')
  3901. AND NVL(T.GX_PLAN_NO, '/') =
  3902. NVL('#GX_PLAN_NO#', '/')
  3903. AND T.RESULT_NO = '#RESULT_NO#'
  3904. AND T.SUSPECT_FLAG = '0'
  3905. AND T.OFFLINE_FLAG = '0'
  3906. AND T.COL_SHIFT IS NULL
  3907. AND T.COL_GROUP IS NULL
  3908. ORDER BY T.SEQ ASC)
  3909. WHERE ROWNUM <= #SAMPLE_NUM2#) LOOP
  3910. UPDATE MIL_TESTING_RACK T
  3911. SET T.SAMPLE_FLAG = '1'
  3912. WHERE T.RESULT_NO = '#RESULT_NO#'
  3913. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3914. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3915. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  3916. AND T.SEQ = MYROW4.SEQ;
  3917. END LOOP;
  3918. ELSE
  3919. FOR MYROW4 IN (SELECT SEQ
  3920. FROM (SELECT T.SEQ
  3921. FROM MIL_TESTING_RACK T
  3922. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3923. AND NVL(T.PRO_PLAN_ID, '/') =
  3924. NVL('#PRO_PLAN_ID#', '/')
  3925. AND NVL(T.GX_PLAN_NO, '/') =
  3926. NVL('#GX_PLAN_NO#', '/')
  3927. AND T.RESULT_NO = '#RESULT_NO#'
  3928. AND T.SUSPECT_FLAG = '0'
  3929. AND T.OFFLINE_FLAG = '0'
  3930. AND T.COL_SHIFT IS NULL
  3931. AND T.COL_GROUP IS NULL
  3932. ORDER BY T.SEQ ASC)
  3933. WHERE ROWNUM <= #SAMPLE_NUM2#) LOOP
  3934. UPDATE MIL_TESTING_RACK T
  3935. SET T.SAMPLE_FLAG = '1'
  3936. WHERE T.RESULT_NO = '#RESULT_NO#'
  3937. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3938. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3939. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  3940. AND T.SEQ = MYROW4.SEQ;
  3941. END LOOP;
  3942. END IF;
  3943. ELSE
  3944. SELECT T.DETECTION_NUM3,
  3945. T.SCRAP_NUM3,
  3946. T.QUALIFIED_NUM3,
  3947. T.REINSPECTION_NUM3,
  3948. T.SUSPECT_PRODUCT_NUM3,
  3949. T.REINSPECTION_QUALIFIED_NUM3,
  3950. T.SAMPLE_NUM3
  3951. INTO V_DETECTION_NUM3,
  3952. V_SCRAP_NUM3,
  3953. V_QUALIFIED_NUM3,
  3954. V_REINSPECTION_NUM3,
  3955. V_SUSPECT_PRODUCT_NUM3,
  3956. V_REINSPECTION_QUALIFIED_NUM3,
  3957. V_SAMPLE_NUM3
  3958. FROM MIL_TESTING_RESULT_DETAIL T
  3959. WHERE T.RESULT_NO = '#RESULT_NO#'
  3960. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3961. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3962. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  3963. AND T.COL_SHIFT = '#COL_SHIFT#'
  3964. AND T.COL_GROUP = '#COL_GROUP#';
  3965. IF (V_QUALIFIED_NUM > 0) THEN
  3966. UPDATE MIL_ET_RESULT T
  3967. SET T.DETECTION_NUM = TO_NUMBER(T.DETECTION_NUM) -
  3968. TO_NUMBER(V_DETECTION_NUM3),
  3969. T.SCRAP_NUM = TO_NUMBER(T.SCRAP_NUM) -
  3970. TO_NUMBER(V_SCRAP_NUM3),
  3971. T.QUALIFIED_NUM = TO_NUMBER(T.QUALIFIED_NUM) -
  3972. TO_NUMBER(V_QUALIFIED_NUM3),
  3973. T.REINSPECTION_NUM = TO_NUMBER(T.REINSPECTION_NUM) -
  3974. TO_NUMBER(V_REINSPECTION_NUM3),
  3975. T.SUSPECT_PRODUCT_NUM = TO_NUMBER(T.SUSPECT_PRODUCT_NUM) -
  3976. TO_NUMBER(V_SUSPECT_PRODUCT_NUM3),
  3977. T.QA_TON = TO_NUMBER(T.QA_TON) -
  3978. TO_NUMBER(T.QA_TON /
  3979. QUALIFIED_NUM) *
  3980. TO_NUMBER(V_QUALIFIED_NUM3),
  3981. T.REINSPECTION_QUALIFIED_NUM = TO_NUMBER(T.REINSPECTION_QUALIFIED_NUM) -
  3982. TO_NUMBER(V_REINSPECTION_QUALIFIED_NUM3),
  3983. T.SAMPLE_NUM = TO_NUMBER(T.SAMPLE_NUM) -
  3984. TO_NUMBER(V_SAMPLE_NUM3)
  3985. WHERE T.RESULT_NO = '#RESULT_NO#'
  3986. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3987. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  3988. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/');
  3989. END IF;
  3990. UPDATE MIL_ET_RESULT T
  3991. SET T.DETECTION_NUM = TO_NUMBER(T.DETECTION_NUM) +
  3992. TO_NUMBER('#DETECTION_NUM3#'),
  3993. T.SCRAP_NUM = TO_NUMBER(T.SCRAP_NUM) +
  3994. TO_NUMBER('#SCRAP_NUM3#'),
  3995. T.QUALIFIED_NUM = TO_NUMBER(T.QUALIFIED_NUM) +
  3996. TO_NUMBER('#QUALIFIED_NUM3#'),
  3997. T.REINSPECTION_NUM = TO_NUMBER(T.REINSPECTION_NUM) +
  3998. TO_NUMBER('#REINSPECTION_NUM3#'),
  3999. T.SUSPECT_PRODUCT_NUM = TO_NUMBER(T.SUSPECT_PRODUCT_NUM) +
  4000. TO_NUMBER('#SUSPECT_PRODUCT_NUM3#'),
  4001. T.QA_TON = TO_NUMBER(T.QA_TON) +
  4002. TO_NUMBER('#QA_TON#'),
  4003. T.REINSPECTION_QUALIFIED_NUM = TO_NUMBER(T.REINSPECTION_QUALIFIED_NUM) +
  4004. TO_NUMBER('#REINSPECTION_QUALIFIED_NUM3#'),
  4005. T.SAMPLE_NUM = TO_NUMBER(T.SAMPLE_NUM) +
  4006. TO_NUMBER('#SAMPLE_NUM3#'),
  4007. T.PRODUCT_STANDARDS = '#PRODUCT_STANDARDS#',
  4008. T.INSPECTION_STANDARD = '#INSPECTION_STANDARD#',
  4009. T.TESTING_METHOD = '#TESTING_METHOD#',
  4010. T.CALIBRATION_METHOD = '#CALIBRATION_METHOD#',
  4011. T.ARTIFICIAL_DEFECT_SHAPE = '#ARTIFICIAL_DEFECT_SHAPE#',
  4012. T.EXCITATION_FREQUENCY1 = '#EXCITATION_FREQUENCY1#',
  4013. T.EXCITATION_FREQUENCY2 = '#EXCITATION_FREQUENCY2#',
  4014. T.EXCITATION_FREQUENCY3 = '#EXCITATION_FREQUENCY3#',
  4015. T.TESTING_SPEED1 = '#TESTING_SPEED1#',
  4016. T.TESTING_SPEED2 = '#TESTING_SPEED2#',
  4017. T.TESTING_SPEED3 = '#TESTING_SPEED3#',
  4018. T.USERID = '#USERID#',
  4019. T.SIGNID = '#SIGNID#',
  4020. T.ACCEPTANCE_GRADE = '#ACCEPTANCE_GRADE#',
  4021. T.USERID1 = '#USERID1#',
  4022. T.USERID2 = '#USERID2#',
  4023. T.USERID_GRADE1 = '#USERID_GRADE1#',
  4024. T.USERID_GRADE2 = '#USERID_GRADE2#',
  4025. T.USERID1JD = '#USERID1JD#',
  4026. T.USERID2JD = '#USERID2JD#',
  4027. T.USERID_GRADE1JD = '#USERID_GRADE1JD#',
  4028. T.USERID_GRADE2JD = '#USERID_GRADE2JD#',
  4029. T.REMARK = '#REMARK#',
  4030. T.NOTCH_INFO = '#NOTCH_INFO#',
  4031. T.NOTCH_LENGTH = '#NOTCH_LENGTH#',
  4032. T.NOTCH_WIDTH = '#NOTCH_WIDTH#',
  4033. T.NOTCH_DEPTH = '#NOTCH_DEPTH#',
  4034. T.SAMPLE_NEWS = '#SAMPLE_NEWS#'
  4035. WHERE T.RESULT_NO = '#RESULT_NO#'
  4036. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  4037. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  4038. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/');
  4039. UPDATE MIL_TESTING_RESULT_DETAIL T
  4040. SET T.DETECTION_NUM3 = '#DETECTION_NUM3#',
  4041. T.SCRAP_NUM3 = '#SCRAP_NUM3#',
  4042. T.QUALIFIED_NUM3 = '#QUALIFIED_NUM3#',
  4043. T.REINSPECTION_NUM3 = '#REINSPECTION_NUM3#',
  4044. T.REINSPECTION_QUALIFIED_NUM3 = '#REINSPECTION_QUALIFIED_NUM3#',
  4045. T.SUSPECT_PRODUCT_NUM3 = '#SUSPECT_PRODUCT_NUM3#',
  4046. T.SAMPLE_NUM3 = '#SAMPLE_NUM3#',
  4047. T.COL_USER = '#COL_USER#'
  4048. WHERE T.RESULT_NO = '#RESULT_NO#'
  4049. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  4050. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  4051. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  4052. AND T.COL_SHIFT = '#COL_SHIFT#'
  4053. AND T.COL_GROUP = '#COL_GROUP#';
  4054. --处理三号台管号队列
  4055. SELECT NVL(COUNT(1), 0)
  4056. INTO V_RACKCOUNT
  4057. FROM MIL_TESTING_RACK T
  4058. WHERE T.RESULT_NO = '#RESULT_NO#'
  4059. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  4060. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  4061. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  4062. AND T.COL_SHIFT = '#COL_SHIFT#'
  4063. AND T.COL_GROUP = '#COL_GROUP#';
  4064. IF (V_RACKCOUNT > 0) THEN
  4065. UPDATE MIL_TESTING_RACK T
  4066. SET T.RETEST_NUM = '0',
  4067. T.RECUT_LENGTH = '',
  4068. T.RECUT_FLAG = '0',
  4069. T.SAMPLE_FLAG = '0'
  4070. WHERE T.RESULT_NO = '#RESULT_NO#'
  4071. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  4072. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  4073. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  4074. AND T.COL_SHIFT = '#COL_SHIFT#'
  4075. AND T.COL_GROUP = '#COL_GROUP#';
  4076. FOR MYROW4 IN (SELECT SEQ
  4077. FROM (SELECT T.SEQ
  4078. FROM MIL_TESTING_RACK T
  4079. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  4080. AND NVL(T.PRO_PLAN_ID, '/') =
  4081. NVL('#PRO_PLAN_ID#', '/')
  4082. AND NVL(T.GX_PLAN_NO, '/') =
  4083. NVL('#GX_PLAN_NO#', '/')
  4084. AND T.RESULT_NO = '#RESULT_NO#'
  4085. AND T.SUSPECT_FLAG = '0'
  4086. AND T.OFFLINE_FLAG = '0'
  4087. AND T.COL_SHIFT IS NULL
  4088. AND T.COL_GROUP IS NULL
  4089. ORDER BY T.SEQ ASC)
  4090. WHERE ROWNUM <= #SAMPLE_NUM3#) LOOP
  4091. UPDATE MIL_TESTING_RACK T
  4092. SET T.SAMPLE_FLAG = '1'
  4093. WHERE T.RESULT_NO = '#RESULT_NO#'
  4094. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  4095. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  4096. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  4097. AND T.SEQ = MYROW4.SEQ;
  4098. END LOOP;
  4099. ELSE
  4100. FOR MYROW4 IN (SELECT SEQ
  4101. FROM (SELECT T.SEQ
  4102. FROM MIL_TESTING_RACK T
  4103. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  4104. AND NVL(T.PRO_PLAN_ID, '/') =
  4105. NVL('#PRO_PLAN_ID#', '/')
  4106. AND NVL(T.GX_PLAN_NO, '/') =
  4107. NVL('#GX_PLAN_NO#', '/')
  4108. AND T.RESULT_NO = '#RESULT_NO#'
  4109. AND T.SUSPECT_FLAG = '0'
  4110. AND T.OFFLINE_FLAG = '0'
  4111. AND T.COL_SHIFT IS NULL
  4112. AND T.COL_GROUP IS NULL
  4113. ORDER BY T.SEQ ASC)
  4114. WHERE ROWNUM <= #SAMPLE_NUM3#) LOOP
  4115. UPDATE MIL_TESTING_RACK T
  4116. SET T.SAMPLE_FLAG = '1'
  4117. WHERE T.RESULT_NO = '#RESULT_NO#'
  4118. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  4119. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  4120. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  4121. AND T.SEQ = MYROW4.SEQ;
  4122. END LOOP;
  4123. END IF;
  4124. END IF;
  4125. ELSE
  4126. IF ('#COL_NO#' = '1') THEN
  4127. INSERT INTO MIL_TESTING_RESULT_DETAIL
  4128. (RESULT_NO,
  4129. LOT_NO,
  4130. JUDGE_STOVE_NO,
  4131. PLINE_CODE,
  4132. START_TIME,
  4133. END_TIME,
  4134. COL_USER,
  4135. COL_SHIFT,
  4136. COL_GROUP,
  4137. SCRAP_NUM1,
  4138. QUALIFIED_NUM1,
  4139. REINSPECTION_NUM1,
  4140. REINSPECTION_QUALIFIED_NUM1,
  4141. OFFLINE_NUM1,
  4142. BACKLINE_NUM1,
  4143. DETECTION_NUM1,
  4144. SUSPECT_PRODUCT_NUM1,
  4145. SAMPLE_NUM1,
  4146. PRO_PLAN_ID,
  4147. GX_PLAN_NO)
  4148. VALUES
  4149. ('#RESULT_NO#',
  4150. '#LOT_NO#',
  4151. '#JUDGE_STOVE_NO#',
  4152. '#PLINE_CODE#',
  4153. SYSDATE,
  4154. SYSDATE,
  4155. '#COL_USER#',
  4156. '#COL_SHIFT#',
  4157. '#COL_GROUP#',
  4158. '#SCRAP_NUM1#',
  4159. '#QUALIFIED_NUM1#',
  4160. '#REINSPECTION_NUM1#',
  4161. '#REINSPECTION_QUALIFIED_NUM1#',
  4162. '#OFFLINE_NUM1#',
  4163. '#BACKLINE_NUM1#',
  4164. '#DETECTION_NUM1#',
  4165. '#SUSPECT_PRODUCT_NUM1#',
  4166. '#SAMPLE_NUM1#',
  4167. '#PRO_PLAN_ID#',
  4168. '#GX_PLAN_NO#');
  4169. UPDATE MIL_ET_RESULT T
  4170. SET T.DETECTION_NUM = TO_NUMBER(T.DETECTION_NUM) +
  4171. TO_NUMBER('#DETECTION_NUM1#'),
  4172. T.SCRAP_NUM = TO_NUMBER(T.SCRAP_NUM) +
  4173. TO_NUMBER('#SCRAP_NUM1#'),
  4174. T.QUALIFIED_NUM = TO_NUMBER(T.QUALIFIED_NUM) +
  4175. TO_NUMBER('#QUALIFIED_NUM1#'),
  4176. T.REINSPECTION_NUM = TO_NUMBER(T.REINSPECTION_NUM) +
  4177. TO_NUMBER('#REINSPECTION_NUM1#'),
  4178. T.SUSPECT_PRODUCT_NUM = TO_NUMBER(T.SUSPECT_PRODUCT_NUM) +
  4179. TO_NUMBER('#SUSPECT_PRODUCT_NUM1#'),
  4180. T.QA_TON = TO_NUMBER(T.QA_TON) +
  4181. TO_NUMBER('#QA_TON#'),
  4182. T.REINSPECTION_QUALIFIED_NUM = TO_NUMBER(T.REINSPECTION_QUALIFIED_NUM) +
  4183. TO_NUMBER('#REINSPECTION_QUALIFIED_NUM1#'),
  4184. T.SAMPLE_NUM = TO_NUMBER(T.SAMPLE_NUM) +
  4185. TO_NUMBER('#SAMPLE_NUM1#'),
  4186. T.PRODUCT_STANDARDS = '#PRODUCT_STANDARDS#',
  4187. T.INSPECTION_STANDARD = '#INSPECTION_STANDARD#',
  4188. T.TESTING_METHOD = '#TESTING_METHOD#',
  4189. T.CALIBRATION_METHOD = '#CALIBRATION_METHOD#',
  4190. T.ARTIFICIAL_DEFECT_SHAPE = '#ARTIFICIAL_DEFECT_SHAPE#',
  4191. T.EXCITATION_FREQUENCY1 = '#EXCITATION_FREQUENCY1#',
  4192. T.EXCITATION_FREQUENCY2 = '#EXCITATION_FREQUENCY2#',
  4193. T.EXCITATION_FREQUENCY3 = '#EXCITATION_FREQUENCY3#',
  4194. T.TESTING_SPEED1 = '#TESTING_SPEED1#',
  4195. T.TESTING_SPEED2 = '#TESTING_SPEED2#',
  4196. T.TESTING_SPEED3 = '#TESTING_SPEED3#',
  4197. T.USERID = '#USERID#',
  4198. T.SIGNID = '#SIGNID#',
  4199. T.ACCEPTANCE_GRADE = '#ACCEPTANCE_GRADE#',
  4200. T.USERID1 = '#USERID1#',
  4201. T.USERID2 = '#USERID2#',
  4202. T.USERID_GRADE1 = '#USERID_GRADE1#',
  4203. T.USERID_GRADE2 = '#USERID_GRADE2#',
  4204. T.USERID1JD = '#USERID1JD#',
  4205. T.USERID2JD = '#USERID2JD#',
  4206. T.USERID_GRADE1JD = '#USERID_GRADE1JD#',
  4207. T.USERID_GRADE2JD = '#USERID_GRADE2JD#',
  4208. T.REMARK = '#REMARK#',
  4209. T.NOTCH_INFO = '#NOTCH_INFO#',
  4210. T.NOTCH_LENGTH = '#NOTCH_LENGTH#',
  4211. T.NOTCH_WIDTH = '#NOTCH_WIDTH#',
  4212. T.NOTCH_DEPTH = '#NOTCH_DEPTH#',
  4213. T.SAMPLE_NEWS = '#SAMPLE_NEWS#'
  4214. WHERE T.RESULT_NO = '#RESULT_NO#'
  4215. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  4216. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  4217. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/');
  4218. FOR MYROW4 IN (SELECT SEQ
  4219. FROM (SELECT T.SEQ
  4220. FROM MIL_TESTING_RACK T
  4221. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  4222. AND NVL(T.PRO_PLAN_ID, '/') =
  4223. NVL('#PRO_PLAN_ID#', '/')
  4224. AND NVL(T.GX_PLAN_NO, '/') =
  4225. NVL('#GX_PLAN_NO#', '/')
  4226. AND T.RESULT_NO = '#RESULT_NO#'
  4227. AND T.SUSPECT_FLAG = '0'
  4228. AND T.OFFLINE_FLAG = '0'
  4229. AND T.COL_SHIFT IS NULL
  4230. AND T.COL_GROUP IS NULL
  4231. ORDER BY T.SEQ ASC)
  4232. WHERE ROWNUM <= #SAMPLE_NUM1#) LOOP
  4233. UPDATE MIL_TESTING_RACK T
  4234. SET T.SAMPLE_FLAG = '1'
  4235. WHERE T.RESULT_NO = '#RESULT_NO#'
  4236. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  4237. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  4238. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  4239. AND T.SEQ = MYROW4.SEQ;
  4240. END LOOP;
  4241. ELSIF ('#COL_NO#' = '2') THEN
  4242. INSERT INTO MIL_TESTING_RESULT_DETAIL
  4243. (RESULT_NO,
  4244. LOT_NO,
  4245. STOVE_NO,
  4246. JUDGE_STOVE_NO,
  4247. PLINE_CODE,
  4248. START_TIME,
  4249. END_TIME,
  4250. COL_USER,
  4251. COL_SHIFT,
  4252. COL_GROUP,
  4253. SCRAP_NUM2,
  4254. QUALIFIED_NUM2,
  4255. REINSPECTION_NUM2,
  4256. REINSPECTION_QUALIFIED_NUM2,
  4257. OFFLINE_NUM2,
  4258. BACKLINE_NUM2,
  4259. DETECTION_NUM2,
  4260. SUSPECT_PRODUCT_NUM2,
  4261. SAMPLE_NUM2,
  4262. PRO_PLAN_ID,
  4263. GX_PLAN_NO)
  4264. VALUES
  4265. ('#RESULT_NO#',
  4266. '#LOT_NO#',
  4267. '#STOVE_NO#',
  4268. '#JUDGE_STOVE_NO#',
  4269. '#PLINE_CODE#',
  4270. SYSDATE,
  4271. SYSDATE,
  4272. '#COL_USER#',
  4273. '#COL_SHIFT#',
  4274. '#COL_GROUP#',
  4275. '#SCRAP_NUM2#',
  4276. '#QUALIFIED_NUM2#',
  4277. '#REINSPECTION_NUM2#',
  4278. '#REINSPECTION_QUALIFIED_NUM2#',
  4279. '#OFFLINE_NUM2#',
  4280. '#BACKLINE_NUM2#',
  4281. '#DETECTION_NUM2#',
  4282. '#SUSPECT_PRODUCT_NUM2#',
  4283. '#SAMPLE_NUM2#',
  4284. '#PRO_PLAN_ID#',
  4285. '#GX_PLAN_NO#');
  4286. UPDATE MIL_ET_RESULT T
  4287. SET T.DETECTION_NUM = TO_NUMBER(T.DETECTION_NUM) +
  4288. TO_NUMBER('#DETECTION_NUM2#'),
  4289. T.SCRAP_NUM = TO_NUMBER(T.SCRAP_NUM) +
  4290. TO_NUMBER('#SCRAP_NUM2#'),
  4291. T.QUALIFIED_NUM = TO_NUMBER(T.QUALIFIED_NUM) +
  4292. TO_NUMBER('#QUALIFIED_NUM2#'),
  4293. T.REINSPECTION_NUM = TO_NUMBER(T.REINSPECTION_NUM) +
  4294. TO_NUMBER('#REINSPECTION_NUM2#'),
  4295. T.SUSPECT_PRODUCT_NUM = TO_NUMBER(T.SUSPECT_PRODUCT_NUM) +
  4296. TO_NUMBER('#SUSPECT_PRODUCT_NUM2#'),
  4297. T.QA_TON = TO_NUMBER(T.QA_TON) +
  4298. TO_NUMBER('#QA_TON#'),
  4299. T.REINSPECTION_QUALIFIED_NUM = TO_NUMBER(T.REINSPECTION_QUALIFIED_NUM) +
  4300. TO_NUMBER('#REINSPECTION_QUALIFIED_NUM2#'),
  4301. T.SAMPLE_NUM = TO_NUMBER(T.SAMPLE_NUM) +
  4302. TO_NUMBER('#SAMPLE_NUM2#'),
  4303. T.PRODUCT_STANDARDS = '#PRODUCT_STANDARDS#',
  4304. T.INSPECTION_STANDARD = '#INSPECTION_STANDARD#',
  4305. T.TESTING_METHOD = '#TESTING_METHOD#',
  4306. T.CALIBRATION_METHOD = '#CALIBRATION_METHOD#',
  4307. T.ARTIFICIAL_DEFECT_SHAPE = '#ARTIFICIAL_DEFECT_SHAPE#',
  4308. T.EXCITATION_FREQUENCY1 = '#EXCITATION_FREQUENCY1#',
  4309. T.EXCITATION_FREQUENCY2 = '#EXCITATION_FREQUENCY2#',
  4310. T.EXCITATION_FREQUENCY3 = '#EXCITATION_FREQUENCY3#',
  4311. T.TESTING_SPEED1 = '#TESTING_SPEED1#',
  4312. T.TESTING_SPEED2 = '#TESTING_SPEED2#',
  4313. T.TESTING_SPEED3 = '#TESTING_SPEED3#',
  4314. T.USERID = '#USERID#',
  4315. T.SIGNID = '#SIGNID#',
  4316. T.ACCEPTANCE_GRADE = '#ACCEPTANCE_GRADE#',
  4317. T.USERID1 = '#USERID1#',
  4318. T.USERID2 = '#USERID2#',
  4319. T.USERID_GRADE1 = '#USERID_GRADE1#',
  4320. T.USERID_GRADE2 = '#USERID_GRADE2#',
  4321. T.USERID1JD = '#USERID1JD#',
  4322. T.USERID2JD = '#USERID2JD#',
  4323. T.USERID_GRADE1JD = '#USERID_GRADE1JD#',
  4324. T.USERID_GRADE2JD = '#USERID_GRADE2JD#',
  4325. T.REMARK = '#REMARK#',
  4326. T.NOTCH_INFO = '#NOTCH_INFO#',
  4327. T.NOTCH_LENGTH = '#NOTCH_LENGTH#',
  4328. T.NOTCH_WIDTH = '#NOTCH_WIDTH#',
  4329. T.NOTCH_DEPTH = '#NOTCH_DEPTH#',
  4330. T.SAMPLE_NEWS = '#SAMPLE_NEWS#'
  4331. WHERE T.RESULT_NO = '#RESULT_NO#'
  4332. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  4333. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  4334. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/');
  4335. FOR MYROW4 IN (SELECT SEQ
  4336. FROM (SELECT T.SEQ
  4337. FROM MIL_TESTING_RACK T
  4338. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  4339. AND NVL(T.PRO_PLAN_ID, '/') =
  4340. NVL('#PRO_PLAN_ID#', '/')
  4341. AND NVL(T.GX_PLAN_NO, '/') =
  4342. NVL('#GX_PLAN_NO#', '/')
  4343. AND T.RESULT_NO = '#RESULT_NO#'
  4344. AND T.SUSPECT_FLAG = '0'
  4345. AND T.OFFLINE_FLAG = '0'
  4346. AND T.COL_SHIFT IS NULL
  4347. AND T.COL_GROUP IS NULL
  4348. ORDER BY T.SEQ ASC)
  4349. WHERE ROWNUM <= #SAMPLE_NUM2#) LOOP
  4350. UPDATE MIL_TESTING_RACK T
  4351. SET T.SAMPLE_FLAG = '1'
  4352. WHERE T.RESULT_NO = '#RESULT_NO#'
  4353. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  4354. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  4355. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  4356. AND T.SEQ = MYROW4.SEQ;
  4357. END LOOP;
  4358. ELSE
  4359. INSERT INTO MIL_TESTING_RESULT_DETAIL
  4360. (RESULT_NO,
  4361. LOT_NO,
  4362. STOVE_NO,
  4363. JUDGE_STOVE_NO,
  4364. PLINE_CODE,
  4365. START_TIME,
  4366. END_TIME,
  4367. COL_USER,
  4368. COL_SHIFT,
  4369. COL_GROUP,
  4370. SCRAP_NUM3,
  4371. QUALIFIED_NUM3,
  4372. REINSPECTION_NUM3,
  4373. REINSPECTION_QUALIFIED_NUM3,
  4374. OFFLINE_NUM3,
  4375. BACKLINE_NUM3,
  4376. DETECTION_NUM3,
  4377. SUSPECT_PRODUCT_NUM3,
  4378. SAMPLE_NUM3,
  4379. PRO_PLAN_ID,
  4380. GX_PLAN_NO)
  4381. VALUES
  4382. ('#RESULT_NO#',
  4383. '#LOT_NO#',
  4384. '#STOVE_NO#',
  4385. '#JUDGE_STOVE_NO#',
  4386. '#PLINE_CODE#',
  4387. SYSDATE,
  4388. SYSDATE,
  4389. '#COL_USER#',
  4390. '#COL_SHIFT#',
  4391. '#COL_GROUP#',
  4392. '#SCRAP_NUM3#',
  4393. '#QUALIFIED_NUM3#',
  4394. '#REINSPECTION_NUM3#',
  4395. '#REINSPECTION_QUALIFIED_NUM3#',
  4396. '#OFFLINE_NUM3#',
  4397. '#BACKLINE_NUM3#',
  4398. '#DETECTION_NUM3#',
  4399. '#SUSPECT_PRODUCT_NUM3#',
  4400. '#SAMPLE_NUM3#',
  4401. '#PRO_PLAN_ID#',
  4402. '#GX_PLAN_NO#');
  4403. UPDATE MIL_ET_RESULT T
  4404. SET T.DETECTION_NUM = TO_NUMBER(T.DETECTION_NUM) +
  4405. TO_NUMBER('#DETECTION_NUM3#'),
  4406. T.SCRAP_NUM = TO_NUMBER(T.SCRAP_NUM) +
  4407. TO_NUMBER('#SCRAP_NUM3#'),
  4408. T.QUALIFIED_NUM = TO_NUMBER(T.QUALIFIED_NUM) +
  4409. TO_NUMBER('#QUALIFIED_NUM3#'),
  4410. T.REINSPECTION_NUM = TO_NUMBER(T.REINSPECTION_NUM) +
  4411. TO_NUMBER('#REINSPECTION_NUM3#'),
  4412. T.SUSPECT_PRODUCT_NUM = TO_NUMBER(T.SUSPECT_PRODUCT_NUM) +
  4413. TO_NUMBER('#SUSPECT_PRODUCT_NUM3#'),
  4414. T.QA_TON = TO_NUMBER(T.QA_TON) +
  4415. TO_NUMBER('#QA_TON#'),
  4416. T.REINSPECTION_QUALIFIED_NUM = TO_NUMBER(T.REINSPECTION_QUALIFIED_NUM) +
  4417. TO_NUMBER('#REINSPECTION_QUALIFIED_NUM3#'),
  4418. T.SAMPLE_NUM = TO_NUMBER(T.SAMPLE_NUM) +
  4419. TO_NUMBER('#SAMPLE_NUM3#'),
  4420. T.PRODUCT_STANDARDS = '#PRODUCT_STANDARDS#',
  4421. T.INSPECTION_STANDARD = '#INSPECTION_STANDARD#',
  4422. T.TESTING_METHOD = '#TESTING_METHOD#',
  4423. T.CALIBRATION_METHOD = '#CALIBRATION_METHOD#',
  4424. T.ARTIFICIAL_DEFECT_SHAPE = '#ARTIFICIAL_DEFECT_SHAPE#',
  4425. T.EXCITATION_FREQUENCY1 = '#EXCITATION_FREQUENCY1#',
  4426. T.EXCITATION_FREQUENCY2 = '#EXCITATION_FREQUENCY2#',
  4427. T.EXCITATION_FREQUENCY3 = '#EXCITATION_FREQUENCY3#',
  4428. T.TESTING_SPEED1 = '#TESTING_SPEED1#',
  4429. T.TESTING_SPEED2 = '#TESTING_SPEED2#',
  4430. T.TESTING_SPEED3 = '#TESTING_SPEED3#',
  4431. T.USERID = '#USERID#',
  4432. T.SIGNID = '#SIGNID#',
  4433. T.ACCEPTANCE_GRADE = '#ACCEPTANCE_GRADE#',
  4434. T.USERID1 = '#USERID1#',
  4435. T.USERID2 = '#USERID2#',
  4436. T.USERID_GRADE1 = '#USERID_GRADE1#',
  4437. T.USERID_GRADE2 = '#USERID_GRADE2#',
  4438. T.USERID1JD = '#USERID1JD#',
  4439. T.USERID2JD = '#USERID2JD#',
  4440. T.USERID_GRADE1JD = '#USERID_GRADE1JD#',
  4441. T.USERID_GRADE2JD = '#USERID_GRADE2JD#',
  4442. T.REMARK = '#REMARK#',
  4443. T.NOTCH_INFO = '#NOTCH_INFO#',
  4444. T.NOTCH_LENGTH = '#NOTCH_LENGTH#',
  4445. T.NOTCH_WIDTH = '#NOTCH_WIDTH#',
  4446. T.NOTCH_DEPTH = '#NOTCH_DEPTH#',
  4447. T.SAMPLE_NEWS = '#SAMPLE_NEWS#'
  4448. WHERE T.RESULT_NO = '#RESULT_NO#'
  4449. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  4450. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  4451. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/');
  4452. FOR MYROW4 IN (SELECT SEQ
  4453. FROM (SELECT T.SEQ
  4454. FROM MIL_TESTING_RACK T
  4455. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  4456. AND NVL(T.PRO_PLAN_ID, '/') =
  4457. NVL('#PRO_PLAN_ID#', '/')
  4458. AND NVL(T.GX_PLAN_NO, '/') =
  4459. NVL('#GX_PLAN_NO#', '/')
  4460. AND T.RESULT_NO = '#RESULT_NO#'
  4461. AND T.SUSPECT_FLAG = '0'
  4462. AND T.OFFLINE_FLAG = '0'
  4463. AND T.COL_SHIFT IS NULL
  4464. AND T.COL_GROUP IS NULL
  4465. ORDER BY T.SEQ ASC)
  4466. WHERE ROWNUM <= #SAMPLE_NUM3#) LOOP
  4467. UPDATE MIL_TESTING_RACK T
  4468. SET T.SAMPLE_FLAG = '1'
  4469. WHERE T.RESULT_NO = '#RESULT_NO#'
  4470. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  4471. AND NVL(T.PRO_PLAN_ID, '/') = NVL('#PRO_PLAN_ID#', '/')
  4472. AND NVL(T.GX_PLAN_NO, '/') = NVL('#GX_PLAN_NO#', '/')
  4473. AND T.SEQ = MYROW4.SEQ;
  4474. END LOOP;
  4475. END IF;
  4476. END IF;
  4477. END;
  4478. ]]>
  4479. </query>
  4480. <query id = "EddyCurrentTestingResult.doQueryAlarm" desc = "查询可疑支数(漏磁)">
  4481. SELECT SUM(T.ALARM_NUM) ALARM_NUM, SUM(S.REASON_NUMBER) REASON_NUMBER
  4482. FROM MIL_MT_RESULT T
  4483. LEFT JOIN (SELECT JUDGE_STOVE_NO,
  4484. RESULT_NO,
  4485. REASON_FLAG,
  4486. NVL(SUM(REASON_NUMBER), 0) REASON_NUMBER
  4487. FROM MIL_TESTING_RESULT_DETAIL_DES
  4488. GROUP BY JUDGE_STOVE_NO, RESULT_NO, REASON_FLAG) S
  4489. ON T.JUDGE_STOVE_NO = S.JUDGE_STOVE_NO
  4490. AND T.RESULT_NO = S.RESULT_NO
  4491. WHERE T.JUDGE_STOVE_NO = ?
  4492. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  4493. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  4494. AND S.REASON_FLAG = '可疑'
  4495. </query>
  4496. <query id = "EddyCurrentTestingResult.doQueryAlarm1" desc = "查询可疑支数(涡流)">
  4497. SELECT SUM(T.SUSPECT_PRODUCT_NUM) ALARM_NUM,
  4498. SUM(S.REASON_NUMBER) REASON_NUMBER
  4499. FROM MIL_ET_RESULT T
  4500. LEFT JOIN (SELECT JUDGE_STOVE_NO,
  4501. RESULT_NO,
  4502. REASON_FLAG,
  4503. NVL(SUM(REASON_NUMBER), 0) REASON_NUMBER
  4504. FROM MIL_TESTING_RESULT_DETAIL_DES
  4505. GROUP BY JUDGE_STOVE_NO, RESULT_NO, REASON_FLAG) S
  4506. ON T.JUDGE_STOVE_NO = S.JUDGE_STOVE_NO
  4507. AND T.RESULT_NO = S.RESULT_NO
  4508. WHERE T.JUDGE_STOVE_NO = ?
  4509. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  4510. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  4511. AND S.REASON_FLAG = '可疑'
  4512. </query>
  4513. <query id = "EddyCurrentTestingResult.doQuerySCRAPNUM" desc = "查询剔除支数(漏磁)">
  4514. SELECT SUM(T.SCRAP_NUM) SCRAP_NUM,
  4515. SUM(S.REASON_NUMBER) REASON_NUMBER,
  4516. SUM(P.ACT_COUNT) ACT_COUNT
  4517. FROM MIL_MT_RESULT T
  4518. LEFT JOIN (SELECT JUDGE_STOVE_NO,
  4519. RESULT_NO,
  4520. REASON_FLAG,
  4521. NVL(SUM(REASON_NUMBER), 0) REASON_NUMBER
  4522. FROM MIL_TESTING_RESULT_DETAIL_DES
  4523. GROUP BY JUDGE_STOVE_NO, RESULT_NO, REASON_FLAG) S
  4524. ON T.JUDGE_STOVE_NO = S.JUDGE_STOVE_NO
  4525. AND T.RESULT_NO = S.RESULT_NO
  4526. LEFT JOIN (SELECT P.JUDGE_STOVE_NO, P.PLAN_ID, SUM(P.ACT_COUNT) ACT_COUNT
  4527. FROM PORT_MIL_BATCH_SAMPLE_RESULT P
  4528. WHERE P.STATUS = '2'
  4529. AND P.OP_PROCESS = '10'
  4530. GROUP BY P.JUDGE_STOVE_NO, P.PLAN_ID) P
  4531. ON T.JUDGE_STOVE_NO = P.JUDGE_STOVE_NO
  4532. AND T.RESULT_NO = P.PLAN_ID
  4533. WHERE T.JUDGE_STOVE_NO = ?
  4534. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  4535. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  4536. AND S.REASON_FLAG = '剔除'
  4537. </query>
  4538. <query id = "EddyCurrentTestingResult.doQuerySCRAPNUM1" desc = "查询剔除支数(涡流)">
  4539. SELECT SUM(T.SCRAP_NUM) SCRAP_NUM,
  4540. SUM(S.REASON_NUMBER) REASON_NUMBER,
  4541. SUM(P.ACT_COUNT) ACT_COUNT
  4542. FROM MIL_ET_RESULT T
  4543. LEFT JOIN (SELECT JUDGE_STOVE_NO,
  4544. RESULT_NO,
  4545. REASON_FLAG,
  4546. NVL(SUM(REASON_NUMBER), 0) REASON_NUMBER
  4547. FROM MIL_TESTING_RESULT_DETAIL_DES
  4548. GROUP BY JUDGE_STOVE_NO, RESULT_NO, REASON_FLAG) S
  4549. ON T.JUDGE_STOVE_NO = S.JUDGE_STOVE_NO
  4550. AND T.RESULT_NO = S.RESULT_NO
  4551. LEFT JOIN (SELECT P.JUDGE_STOVE_NO, P.PLAN_ID, SUM(P.ACT_COUNT) ACT_COUNT
  4552. FROM PORT_MIL_BATCH_SAMPLE_RESULT P
  4553. WHERE P.STATUS = '2'
  4554. AND P.OP_PROCESS = '10'
  4555. GROUP BY P.JUDGE_STOVE_NO, P.PLAN_ID) P
  4556. ON T.JUDGE_STOVE_NO = P.JUDGE_STOVE_NO
  4557. AND T.RESULT_NO = P.PLAN_ID
  4558. WHERE T.JUDGE_STOVE_NO = ?
  4559. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  4560. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  4561. AND S.REASON_FLAG = '剔除'
  4562. </query>
  4563. <query id = "EddyCurrentTestingResult.getMtResultNum" desc = "查询探伤总支数(MT)">
  4564. SELECT (T.QUALIFIED_NUM + T.SCRAP_NUM + T.OFFLINE_NUM + T.SAMPLE_NUM +
  4565. T.INSPECTIONED_OFFLINE_NUM) AS TOTALCOUNT
  4566. FROM MIL_MT_RESULT T
  4567. WHERE T.JUDGE_STOVE_NO = ?
  4568. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  4569. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  4570. </query>
  4571. <query id = "EddyCurrentTestingResult.getMtResultNum1" desc = "查询探伤总支数(ET)">
  4572. SELECT (T.QUALIFIED_NUM + T.SCRAP_NUM + T.OFFLINE_NUM + T.SAMPLE_NUM +
  4573. T.INSPECTIONED_OFFLINE_NUM) AS TOTALCOUNT
  4574. FROM MIL_ET_RESULT T
  4575. WHERE T.JUDGE_STOVE_NO = ?
  4576. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  4577. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  4578. </query>
  4579. <query id = "EddyCurrentTestingResult.doQuerySize" desc = "查询几何尺寸记录">
  4580. <![CDATA[
  4581. SELECT T.JUDGE_STOVE_NO
  4582. FROM MIL_SIZE_CHECK_DEATIL T
  4583. WHERE T.JUDGE_STOVE_NO LIKE ? || '%'
  4584. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  4585. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  4586. ]]>
  4587. </query>
  4588. <query id = "NodeBack.UpdateShift" desc = "回退清除班次班组">
  4589. DECLARE
  4590. V_SEQ MIL_TESTING_RACK.SEQ%TYPE := 0;
  4591. BEGIN
  4592. SELECT NVL(MAX(T.SEQ),0)INTO V_SEQ FROM MIL_TESTING_RACK T WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.RESULT_NO = '#RESULT_NO#' AND T.CHANGE_FLAG = '1';
  4593. IF(V_SEQ = 0)THEN
  4594. UPDATE MIL_TESTING_RACK T SET T.COL_SHIFT = '',T.COL_GROUP = '' WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.RESULT_NO = '#RESULT_NO#';
  4595. ELSE
  4596. UPDATE MIL_TESTING_RACK T SET T.COL_SHIFT = '',T.COL_GROUP = '' WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#' AND T.RESULT_NO = '#RESULT_NO#' AND T.SEQ > V_SEQ;
  4597. END IF;
  4598. END;
  4599. </query>
  4600. <query id = "EddyCurrentTestingResult.selectBackLineNum" desc = "查询是否存在返线支数">
  4601. SELECT T.JUDGE_STOVE_NO
  4602. FROM MIL_TESTING_RACK T
  4603. WHERE T.RESULT_NO = ?
  4604. AND T.JUDGE_STOVE_NO = ?
  4605. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  4606. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  4607. AND T.OFFLINE_FLAG = '2'
  4608. </query>
  4609. <query id = "EddyCurrentTestingResult.doQueryMtResult" desc = "查询部分实绩">
  4610. SELECT T.DETECTION_NUM,
  4611. T.ALARM_NUM,
  4612. T.SCRAP_NUM,
  4613. T.INSPECTIONED_OFFLINE_NUM,
  4614. T.SAMPLE_NUM
  4615. FROM MIL_MT_RESULT T
  4616. WHERE T.RESULT_NO = ?
  4617. AND T.JUDGE_STOVE_NO = ?
  4618. </query>
  4619. <query id = "EddyCurrentTestingResult.doQueryEtResult" desc = "查询部分实绩">
  4620. SELECT T.DETECTION_NUM,
  4621. T.SUSPECT_PRODUCT_NUM,
  4622. T.SCRAP_NUM,
  4623. T.INSPECTIONED_OFFLINE_NUM,
  4624. T.SAMPLE_NUM
  4625. FROM MIL_ET_RESULT T
  4626. WHERE T.RESULT_NO = ?
  4627. </query>
  4628. <query id = "EddyCurrentTestingResult.doQueryTestedNum" desc = "查询已探下线支数">
  4629. SELECT NVL(T.REASON_NUMBER, 0) REASON_NUMBER
  4630. FROM MIL_TESTING_RESULT_DETAIL_DES T
  4631. WHERE T.RESULT_NO = ?
  4632. AND T.COL_SHIFT = ?
  4633. AND T.COL_GROUP = ?
  4634. AND T.COL_NO = ?
  4635. AND T.REASON_FLAG = '下线'
  4636. </query>
  4637. <query id = "EddyCurrentTestingResult.doQueryResultStaus" desc = "查询结炉状态">
  4638. <![CDATA[
  4639. SELECT T.NODE_FUR_FLAG
  4640. FROM #RESULT# T
  4641. WHERE T.RESULT_NO = ?
  4642. AND T.JUDGE_STOVE_NO = ?
  4643. AND T.PLINE_CODE = ?
  4644. AND T.PRO_PLAN_ID || '&' LIKE '%' || ? || '%'
  4645. AND T.GX_PLAN_NO || '&' LIKE '%' || ? || '%'
  4646. ]]>
  4647. </query>
  4648. <query id = "EddyCurrentTestingResult.doQueryOfflineNum" desc = "查询已探下线支数">
  4649. SELECT T.REASON_NUMBER
  4650. FROM MIL_TESTING_RESULT_DETAIL_DES T
  4651. WHERE T.RESULT_NO = ?
  4652. AND T.COL_SHIFT = ?
  4653. AND T.COL_GROUP = ?
  4654. AND T.COL_NO = ?
  4655. AND T.REASON_FLAG = '下线'
  4656. </query>
  4657. <query id = "EddyCurrentTestingResult.doQuerySeq" desc = "查询进程管号队列">
  4658. SELECT ROWNUM SEQ, T.ORDER_LENGTH
  4659. FROM PORT_MIL_BATCH_SAMPLE_RESULT T
  4660. WHERE T.PLAN_ID = ?
  4661. AND T.JUDGE_STOVE_NO = ?
  4662. AND T.STATUS = '0'
  4663. ORDER BY T.MAT_NO ASC
  4664. </query>
  4665. <query id = "updateProcessTest.selectMilSlabSeqCount" desc = "查询已探下线支数">
  4666. <![CDATA[
  4667. SELECT NVL(SUM(T.REASON_NUMBER), 0) ACOUNT
  4668. FROM MIL_TESTING_RESULT_DETAIL_DES T
  4669. WHERE T.JUDGE_STOVE_NO = ?
  4670. AND T.PRO_PLAN_ID || '&' LIKE '%' || ? || '%'
  4671. AND T.GX_PLAN_NO || '&' LIKE '%' || ? || '%'
  4672. AND T.REASON_FLAG = '下线'
  4673. ]]>
  4674. </query>
  4675. <query id = "EddyCurrentTestingResult.selectMilPlanData" desc = "查询炉计划信息">
  4676. <![CDATA[
  4677. SELECT T.*
  4678. FROM MIL_PLAN T
  4679. WHERE T.JUDGE_STOVE_NO = ?
  4680. AND T.PRO_PLAN_ID || '&' LIKE '%' || ? || '%'
  4681. AND T.GX_PLAN_NO || '&' LIKE '%' || ? || '%'
  4682. ]]>
  4683. </query>
  4684. <query id = "EddyCurrentTestingResult.selectMilOfflineGroup" desc = "查询是否有组炉">
  4685. SELECT NVL(SUM(T.GROUP_NUM), 0)
  4686. FROM MIL_OFFLINE_RESLUT T
  4687. WHERE T.JUDGE_STOVE_NO = ?
  4688. AND NVL(T.PRO_PLAN_ID, '/') = NVL(?, '/')
  4689. AND NVL(T.GX_PLAN_NO, '/') = NVL(?, '/')
  4690. AND T.OFFLINE_PRO = 'TS'
  4691. </query>
  4692. <query id = "EddyCurrentTestingResult.insertScrapSlab" desc = "插入废管">
  4693. <![CDATA[
  4694. DECLARE
  4695. CURSOR OPOrder_Cursor IS
  4696. SELECT ROWNUM SEQ, MAT_NO, PIPE_LENGTH, JUDGE_STOVE_NO
  4697. from (SELECT T.SEQ, T.MAT_NO, T.PIPE_LENGTH, T.JUDGE_STOVE_NO
  4698. FROM MIL_TESTING_RACK T
  4699. WHERE T.JUDGE_STOVE_NO = ?
  4700. AND T.PRO_PLAN_ID || '&' LIKE '%' || ? || '%'
  4701. AND T.GX_PLAN_NO || '&' LIKE '%' || ? || '%'
  4702. AND T.STATUS = '1'
  4703. ORDER BY T.SEQ ASC);
  4704. curOPOrder OPOrder_Cursor%RowType;
  4705. BEGIN
  4706. open OPOrder_Cursor;
  4707. LOOP
  4708. fetch OPOrder_Cursor
  4709. into curOPOrder;
  4710. EXIT WHEN OPOrder_Cursor%NOTFOUND;
  4711. insert into mil_slab_scrap
  4712. (judge_stove_no,
  4713. process_no,
  4714. mat_no,
  4715. pline_code,
  4716. PRO_PLAN_ID,
  4717. GX_PLAN_NO)
  4718. values
  4719. (curOPOrder.JUDGE_STOVE_NO, '10', curOPOrder.MAT_NO, ?, ?, ?);
  4720. END LOOP;
  4721. close OPOrder_Cursor;
  4722. END;
  4723. ]]>
  4724. </query>
  4725. <query id = "EddyCurrentTestingResult.assignmentMatNo" desc = "赋值材料号到表检">
  4726. <![CDATA[
  4727. DECLARE
  4728. CURSOR OPOrder_Cursor IS
  4729. SELECT ROWNUM SEQ, MAT_NO, Order_Length
  4730. from (SELECT T.SEQ, T.MAT_NO, T.Order_Length
  4731. FROM PORT_MIL_BATCH_SAMPLE_RESULT T
  4732. WHERE T.JUDGE_STOVE_NO = ?
  4733. AND T.PRO_PLAN_ID || '&' LIKE '%' || ? || '%'
  4734. AND T.GX_PLAN_NO || '&' LIKE '%' || ? || '%'
  4735. AND (T.STATUS = '0' OR T.STATUS = '3' AND T.OP_PROCESS = '12')
  4736. ORDER BY T.BATCH_NO DESC, T.IS_SAMPLE_PIPE, T.SEQ ASC);
  4737. curOPOrder OPOrder_Cursor%RowType;
  4738. BEGIN
  4739. open OPOrder_Cursor;
  4740. LOOP
  4741. fetch OPOrder_Cursor
  4742. into curOPOrder;
  4743. EXIT WHEN OPOrder_Cursor%NOTFOUND;
  4744. UPDATE MIL_QA_RACK T
  4745. SET T.MAT_NO = curOPOrder.MAT_NO,
  4746. T.PIPE_LENGTH = curOPOrder.Order_Length
  4747. WHERE T.JUDGE_STOVE_NO = ?
  4748. AND T.PRO_PLAN_ID || '&' LIKE '%' || ? || '%'
  4749. AND T.GX_PLAN_NO || '&' LIKE '%' || ? || '%'
  4750. AND T.SEQ = curOPOrder.SEQ;
  4751. END LOOP;
  4752. close OPOrder_Cursor;
  4753. END;
  4754. ]]>
  4755. </query>
  4756. <query id = "EddyCurrentTestingResult.doQueryGrade" desc = "查询绑定操作者等级">
  4757. SELECT T.USER_NAME, T.USERID_GRADE,T.USER_ID
  4758. FROM MIL_SIGNATURE T
  4759. WHERE T.COL_GROUP = ?
  4760. AND T.PROCESS_NO = ?
  4761. AND T.PLINE_CODE = ?
  4762. </query>
  4763. <query id = "EddyCurrentTestingResult.doQueryGrade2" desc = "查询绑定签发者">
  4764. SELECT T.USER_NAME, T.USERID_GRADE,T.USER_ID
  4765. FROM MIL_SIGNATURE T
  4766. WHERE T.PROCESS_NO = ?
  4767. AND T.PLINE_CODE = ?
  4768. AND T.USERID_GRADE like '%2%'
  4769. </query>
  4770. <query id = "EddyCurrentTestingResult.doQueryGradejd" desc = "查询绑定监督者">
  4771. SELECT T.USER_NAME, T.USERID_GRADE,T.USER_ID
  4772. FROM MIL_SIGNATURE T
  4773. WHERE T.PROCESS_NO = ?
  4774. AND T.PLINE_CODE = ?
  4775. AND T.USERID_GRADE like '%2%'
  4776. </query>
  4777. <query id = "EddyCurrentTestingResult.doQueryGrade1" desc = "查询操作者等级1">
  4778. SELECT T.USERID_GRADE
  4779. FROM MIL_SIGNATURE T
  4780. WHERE T.USER_ID = ?
  4781. </query>
  4782. <query id = "EddyCurrentTestingResult.SelectPipeSizeLen" desc = "查询轧管规格/长度">
  4783. SELECT T.* FROM MIL_PLAN T WHERE T.JUDGE_STOVE_NO = ?
  4784. </query>
  4785. <query id = "EddyCurrentTestingResult.SelectofflineDoc" desc = "离线单号">
  4786. SELECT T.OFFLINE_DOC
  4787. FROM MIL_OFFLINE_RESLUT T
  4788. WHERE T.JUDGE_STOVE_NO = ?
  4789. AND T.PRO_PLAN_ID = ?
  4790. AND T.GX_PLAN_NO = ?
  4791. AND T.OFFLINE_PRO = 'TS'
  4792. </query>
  4793. </queryMap>