FrmMilBatchSampleNew.xml 113 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691269226932694269526962697269826992700270127022703270427052706270727082709271027112712271327142715271627172718271927202721272227232724272527262727272827292730273127322733273427352736273727382739274027412742274327442745274627472748274927502751275227532754275527562757275827592760276127622763276427652766276727682769277027712772277327742775277627772778277927802781278227832784278527862787278827892790279127922793279427952796279727982799280028012802280328042805280628072808280928102811281228132814281528162817281828192820282128222823282428252826282728282829283028312832283328342835283628372838283928402841284228432844284528462847284828492850285128522853285428552856285728582859286028612862286328642865286628672868286928702871287228732874287528762877287828792880288128822883288428852886288728882889289028912892289328942895289628972898289929002901290229032904290529062907290829092910291129122913291429152916291729182919292029212922292329242925292629272928292929302931293229332934293529362937293829392940294129422943294429452946294729482949295029512952295329542955295629572958295929602961296229632964296529662967296829692970297129722973297429752976297729782979298029812982298329842985298629872988298929902991299229932994299529962997299829993000300130023003300430053006300730083009301030113012301330143015301630173018301930203021302230233024302530263027302830293030303130323033303430353036303730383039304030413042304330443045304630473048304930503051305230533054305530563057305830593060306130623063306430653066306730683069307030713072307330743075307630773078307930803081308230833084308530863087308830893090309130923093309430953096309730983099310031013102310331043105310631073108310931103111311231133114311531163117311831193120312131223123312431253126312731283129313031313132313331343135313631373138313931403141314231433144314531463147314831493150315131523153315431553156315731583159316031613162316331643165316631673168316931703171317231733174317531763177317831793180318131823183318431853186318731883189319031913192319331943195319631973198319932003201320232033204320532063207320832093210321132123213321432153216321732183219322032213222322332243225322632273228322932303231323232333234323532363237323832393240324132423243324432453246324732483249325032513252325332543255325632573258325932603261326232633264326532663267326832693270327132723273327432753276327732783279328032813282328332843285328632873288328932903291329232933294329532963297329832993300330133023303330433053306330733083309331033113312331333143315331633173318331933203321332233233324332533263327332833293330333133323333333433353336333733383339334033413342334333443345334633473348334933503351335233533354335533563357335833593360336133623363336433653366336733683369337033713372337333743375337633773378337933803381338233833384338533863387338833893390339133923393339433953396339733983399340034013402340334043405340634073408340934103411341234133414341534163417341834193420342134223423342434253426342734283429343034313432343334343435343634373438343934403441344234433444344534463447344834493450345134523453345434553456345734583459346034613462346334643465346634673468346934703471347234733474347534763477347834793480348134823483348434853486348734883489349034913492349334943495349634973498349935003501350235033504350535063507350835093510351135123513351435153516351735183519352035213522352335243525352635273528352935303531353235333534353535363537353835393540354135423543354435453546354735483549355035513552355335543555355635573558355935603561356235633564356535663567356835693570357135723573357435753576357735783579358035813582358335843585358635873588358935903591359235933594359535963597359835993600360136023603360436053606360736083609361036113612361336143615361636173618361936203621362236233624362536263627362836293630363136323633363436353636363736383639364036413642364336443645364636473648364936503651365236533654365536563657365836593660366136623663366436653666366736683669367036713672367336743675367636773678367936803681368236833684368536863687368836893690369136923693369436953696369736983699370037013702370337043705370637073708370937103711371237133714371537163717371837193720372137223723372437253726372737283729373037313732373337343735373637373738373937403741374237433744374537463747374837493750375137523753375437553756375737583759376037613762376337643765376637673768376937703771377237733774377537763777377837793780378137823783378437853786378737883789379037913792379337943795379637973798379938003801380238033804380538063807380838093810381138123813381438153816381738183819382038213822382338243825382638273828382938303831383238333834383538363837383838393840384138423843384438453846384738483849385038513852385338543855385638573858385938603861386238633864386538663867386838693870387138723873387438753876387738783879388038813882388338843885
  1. <?xml version="1.0" encoding="UTF-8"?>
  2. <queryMap desc = "轧管分批取样">
  3. <query id = "FrmMilBatchSampleNew.doQueryPlan" desc = "查询轧管炉计划">
  4. <![CDATA[
  5. SELECT T.*,
  6. (SELECT C.CRAFT_PATH
  7. FROM CRAFT_ORD_DESIGN C
  8. WHERE C.ORD_LN_PK = T.ORD_LN_PK
  9. AND C.CRAFT_SEQ = T.CRAFT_SEQ) CRAFT_PATH,
  10. (SELECT T1.PLINE_NAME
  11. FROM COM_BASE_PLINE T1
  12. WHERE T1.PLINE_CODE = T.PLINE_CODE) PLINE_NAME
  13. FROM (SELECT T.*,
  14. S.ORD_LN_PK,
  15. SUBSTR(T.JUDGE_STOVE_NO, 1, LENGTH(T.JUDGE_STOVE_NO) - 3) JUDGE_STOVE_NO_DESC,
  16. (SELECT T1.ABRVITION
  17. FROM SLM_BASE_CUSTOMER T1
  18. WHERE T1.CUSTOMER_NO = S.FINAL_USER) ABRVITION,
  19. (SELECT S.PDEPT_NAME
  20. FROM SLM_ORDER_LINE_PRDCR_LST T2, SLM_BASE_PRDCR_DEPT S
  21. WHERE T2.PDEPT_NO = S.PDEPT_NO
  22. AND T2.PROCESS_CODE = 'D'
  23. AND T2.PRDCR_NO = T.PRDCR_NO
  24. AND ROWNUM = 1) PDEPT_NAME
  25. FROM MIL_PLAN T
  26. LEFT JOIN PLN_SALEORD S
  27. ON SUBSTR(T.ORD_LN_DLY_PK,
  28. 1,
  29. DECODE(INSTR(T.ORD_LN_DLY_PK, '-'),
  30. 0,
  31. LENGTH(T.ORD_LN_DLY_PK),
  32. INSTR(T.ORD_LN_DLY_PK, '-', -1) - 1)) =
  33. S.ORD_LN_DLY_PK
  34. AND T.JUDGE_STOVE_NO =
  35. REGEXP_REPLACE(T.JUDGE_STOVE_NO, '-.*', '') || '-01') T
  36. WHERE T.STATUS != '00'
  37. --AND T.TYPE = '0'
  38. --AND T.BACK_SLAB_FLAG <> '2'
  39. AND T.IS_BATCH =
  40. (SELECT MAX(P1.IS_BATCH)
  41. FROM MIL_PLAN P1
  42. WHERE P1.ID = T.ID
  43. AND REGEXP_REPLACE(P1.JUDGE_STOVE_NO, '-.*', '') =
  44. REGEXP_REPLACE(T.JUDGE_STOVE_NO, '-.*', ''))
  45. ]]>
  46. </query>
  47. <query id = "FrmMilBatchSampleNew.doQueryPlan2" desc = "查询轧管炉计划">
  48. <![CDATA[
  49. SELECT T.*,
  50. (SELECT C.CRAFT_PATH
  51. FROM CRAFT_ORD_DESIGN C
  52. WHERE C.ORD_LN_PK = T.ORD_LN_PK
  53. AND C.CRAFT_SEQ = T.CRAFT_SEQ) CRAFT_PATH,
  54. (SELECT T1.PLINE_NAME
  55. FROM COM_BASE_PLINE T1
  56. WHERE T1.PLINE_CODE = T.PLINE_CODE) PLINE_NAME
  57. FROM (SELECT T.*,
  58. S.ORD_LN_PK,
  59. SUBSTR(T.JUDGE_STOVE_NO, 1, LENGTH(T.JUDGE_STOVE_NO) - 3) JUDGE_STOVE_NO_DESC,
  60. (SELECT T1.ABRVITION
  61. FROM SLM_BASE_CUSTOMER T1
  62. WHERE T1.CUSTOMER_NO = S.FINAL_USER) ABRVITION,
  63. (SELECT S.PDEPT_NAME
  64. FROM SLM_ORDER_LINE_PRDCR_LST T2, SLM_BASE_PRDCR_DEPT S
  65. WHERE T2.PDEPT_NO = S.PDEPT_NO
  66. AND T2.PROCESS_CODE = 'D'
  67. AND T2.PRDCR_NO = T.PRDCR_NO
  68. AND ROWNUM = 1) PDEPT_NAME
  69. FROM MIL_PLAN T
  70. LEFT JOIN PLN_SALEORD S
  71. ON SUBSTR(T.ORD_LN_DLY_PK,
  72. 1,
  73. DECODE(INSTR(T.ORD_LN_DLY_PK, '-'),
  74. 0,
  75. LENGTH(T.ORD_LN_DLY_PK),
  76. INSTR(T.ORD_LN_DLY_PK, '-', -1) - 1)) =
  77. S.ORD_LN_DLY_PK
  78. AND T.JUDGE_STOVE_NO =
  79. REGEXP_REPLACE(T.JUDGE_STOVE_NO, '-.*', '') || '-01') T
  80. WHERE T.STATUS != '00'
  81. --AND T.TYPE = '0'
  82. --AND T.BACK_SLAB_FLAG <> '2'
  83. AND (T.PIC IS NOT NULL OR T.IF_PRODUCT = '1')
  84. ]]>
  85. </query>
  86. <!--
  87. SELECT T.*,
  88. (SELECT C.CRAFT_PATH
  89. FROM CRAFT_ORD_DESIGN C
  90. WHERE C.ORD_LN_PK = T.ORD_LN_PK
  91. AND C.CRAFT_SEQ = T.CRAFT_SEQ) CRAFT_PATH
  92. FROM (SELECT T.*,
  93. S.ORD_LN_PK,
  94. Z.CRAFT_FILE_NO,
  95. Z.PLINE_NAME,
  96. Z.IF_MONITOR,
  97. SUBSTR(T.JUDGE_STOVE_NO, 1, LENGTH(T.JUDGE_STOVE_NO) - 3) JUDGE_STOVE_NO_DESC,
  98. (SELECT T1.ABRVITION
  99. FROM SLM_BASE_CUSTOMER T1
  100. WHERE T1.CUSTOMER_NO = S.FINAL_USER) ABRVITION,
  101. (SELECT S.PDEPT_NAME
  102. FROM SLM_ORDER_LINE_PRDCR_LST T, SLM_BASE_PRDCR_DEPT S
  103. WHERE T.PDEPT_NO = S.PDEPT_NO
  104. AND T.PROCESS_CODE = 'D'
  105. AND T.PRDCR_NO = Z.PRDCR_NO
  106. AND ROWNUM = 1)PDEPT_NAME
  107. FROM MIL_PLAN T, PLN_SALEORD S, PLN_ZY_ZG_M Z
  108. WHERE SUBSTR(T.ORD_LN_DLY_PK,
  109. 1,
  110. DECODE(INSTR(T.ORD_LN_DLY_PK, '-'),
  111. 0,
  112. LENGTH(T.ORD_LN_DLY_PK),
  113. INSTR(T.ORD_LN_DLY_PK, '-', -1) - 1)) =
  114. S.ORD_LN_DLY_PK
  115. AND T.ID = Z.HEAT_PLAN_NO
  116. AND T.JUDGE_STOVE_NO = REGEXP_REPLACE(T.JUDGE_STOVE_NO, '-.*', '') || '-01'
  117. AND Z.ORD_LN_DLY_PK = S.ORD_LN_DLY_PK) T
  118. WHERE 1 = 1
  119. AND T.STATUS != '00'
  120. AND T.TYPE = '0'
  121. -->
  122. <query id = "FrmMilBatchSampleNew.doQueryPipeBaseInfo" desc = "查询已生成委托信息">
  123. SELECT T.LOT_NO, T.HEAT_NO JUDGE_STOVE_NO_DESC, T.CHECK_NO,DECODE(T.CRAFT_SOURCE,'0','生产样','1','首日检','3','生产预备样')CRAFT_SOURCE,
  124. T.LOT_NO_GROUP,TO_CHAR(T.CONSIGN_TIME,'YYYY-MM-DD HH24:MI:SS')CONSIGN_TIME,T.CONSIGN_NAME,
  125. T.CONTRACT_NO
  126. FROM PIPE_CHECKCONSIGN_BASEINFO T
  127. WHERE T.PROCESS_CODE = 'D'
  128. AND T.CRAFT_SOURCE IN('0','1','3')
  129. AND T.CHECK_COUNT = '0'
  130. </query>
  131. <query id = "FrmMilBatchSampleNew.doQueryRepeate" desc = "查询可复取样信息">
  132. SELECT T.CHECK_NO,T.LOT_NO,T.JUDGE_STOVE_NO,MAX(T.IS_SAMPLE)IS_SAMPLE,MAX(T.PLINE_CODE)PLINE_CODE FROM PIPE_CHECKCONSIGN_NOQUALIFIED T WHERE 1 = 1
  133. </query>
  134. <query id = "FrmMilBatchSampleNew.doQueryBasePlan" desc = "查询炉计划基础信息">
  135. SELECT T.*,(SELECT T1.PLINE_NAME FROM COM_BASE_PLINE T1 WHERE T1.PLINE_CODE = T.PLINE_CODE)PLINE_NAME
  136. FROM MIL_PLAN T WHERE T.ID = ? AND T.JUDGE_STOVE_NO = ?
  137. </query>
  138. <query id = "FrmMilBatchSampleNew.doQueryBasePlan1" desc = "查询炉计划基础信息">
  139. SELECT T.*,(SELECT T1.PLINE_NAME FROM COM_BASE_PLINE T1 WHERE T1.PLINE_CODE = T.PLINE_CODE)PLINE_NAME
  140. FROM MIL_PLAN T WHERE T.LOT_NO = ? AND T.JUDGE_STOVE_NO = ? || '-01'
  141. AND T.CONTRACT_NO = ?
  142. </query>
  143. <query id = "FrmMilBatchSampleNew.SelectNoquaileFlag" desc = "查询复取样标识">
  144. SELECT T.IS_SAMPLE
  145. FROM PIPE_CHECKCONSIGN_NOQUALIFIED T
  146. WHERE T.LOT_NO = '#LOT_NO#'
  147. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  148. AND T.CHECK_NO = '#CHECK_NO#'
  149. AND ROWNUM = 1
  150. </query>
  151. <query id = "FrmMilBatchSampleNew.doQueryRack" desc = "查询管号队列">
  152. <![CDATA[
  153. SELECT ROWNUM SEQ,
  154. MAT_NO,
  155. SAMPLE_PIPE_LEN_A,
  156. SAMPLE_PIPE_LEN_B,
  157. PLAN_ID,
  158. JUDGE_STOVE_NO,
  159. BATCH_NO,
  160. CRAFT_SOURCE,
  161. STATUS,
  162. IS_SAMPLE_PIPE
  163. FROM (SELECT T.MAT_NO,
  164. T.SAMPLE_PIPE_LEN_A,
  165. T.SAMPLE_PIPE_LEN_B,
  166. T.PLAN_ID,
  167. T.JUDGE_STOVE_NO,
  168. T.BATCH_NO,
  169. DECODE(T.CRAFT_SOURCE,
  170. '0',
  171. '生产样',
  172. '1',
  173. '首日检',
  174. '2',
  175. '生产加样') CRAFT_SOURCE,
  176. DECODE(T.STATUS, '0', '是', '否') STATUS,
  177. T.IS_SAMPLE_PIPE
  178. FROM PORT_MIL_BATCH_SAMPLE_RESULT T
  179. WHERE T.PLAN_ID = ?
  180. AND T.JUDGE_STOVE_NO = ?
  181. AND T.STATUS <> '1'
  182. ORDER BY T.STATUS ASC, T.MAT_NO)
  183. ]]>
  184. </query>
  185. <query id = "FrmMilBatchSampleNew.doQueryRack1" desc = "查询管号队列">
  186. <![CDATA[
  187. SELECT ROWNUM SEQ,
  188. MAT_NO,
  189. SAMPLE_PIPE_LEN_A,
  190. SAMPLE_PIPE_LEN_B,
  191. PLAN_ID,
  192. JUDGE_STOVE_NO,
  193. BATCH_NO,
  194. CRAFT_SOURCE,
  195. STATUS,
  196. IS_SAMPLE_PIPE
  197. FROM (SELECT T.MAT_NO,
  198. T.SAMPLE_PIPE_LEN_A,
  199. T.SAMPLE_PIPE_LEN_B,
  200. T.PLAN_ID,
  201. T.JUDGE_STOVE_NO,
  202. T.BATCH_NO,
  203. DECODE(T.CRAFT_SOURCE,
  204. '0',
  205. '生产样',
  206. '1',
  207. '首日检',
  208. '2',
  209. '生产加样') CRAFT_SOURCE,
  210. DECODE(T.STATUS, '0', '是', '否') STATUS,
  211. T.IS_SAMPLE_PIPE
  212. FROM PORT_MIL_BATCH_SAMPLE_RESULT T
  213. WHERE T.LOT_NO = ?
  214. AND T.JUDGE_STOVE_NO = ?
  215. AND T.STATUS<>'1'
  216. ORDER BY T.STATUS ASC,T.MAT_NO)
  217. ]]>
  218. </query>
  219. <query id = "FrmMilBatchSampleNew.doQueryRepeatRack" desc = "查询管号队列(复取样)">
  220. <![CDATA[
  221. SELECT ROWNUM SEQ,
  222. MAT_NO,
  223. RESAMPLE_PIPE_LEN_A,
  224. RESAMPLE_PIPE_LEN_B,
  225. SAMPLE_PIPE_LEN_A,
  226. SAMPLE_PIPE_LEN_B,
  227. PLAN_ID,
  228. JUDGE_STOVE_NO,
  229. BATCH_NO,
  230. STATUS,
  231. IS_SAMPLE_PIPE
  232. FROM (SELECT T.MAT_NO,
  233. T.RESAMPLE_PIPE_LEN_A,
  234. T.RESAMPLE_PIPE_LEN_B,
  235. T.SAMPLE_PIPE_LEN_A,
  236. T.SAMPLE_PIPE_LEN_B,
  237. T.PLAN_ID,
  238. T.JUDGE_STOVE_NO,
  239. T.BATCH_NO,
  240. DECODE(T.STATUS, '0', '是', '否') STATUS,
  241. T.IS_SAMPLE_PIPE
  242. FROM PORT_MIL_BATCH_SAMPLE_RESULT T
  243. WHERE T.JUDGE_STOVE_NO = ? || '-01'
  244. AND T.STATUS<>'1'
  245. ORDER BY T.STATUS ASC,T.MAT_NO)
  246. ]]>
  247. </query>
  248. <query id = "FrmMilBatchSampleNew.doQueryCheckPlan" desc = "查询检验计划主表信息">
  249. SELECT T.*
  250. FROM CRAFT_SAMPLING_M T WHERE T.PROCESS_CODE = 'D'
  251. AND T.ORD_LN_PK = ?
  252. AND T.CRAFT_NO = ?
  253. AND T.CRAFT_SEQ = ?
  254. AND (T.STOVE_NUM = ? OR T.STOVE_NUM IS NULL)
  255. ORDER BY T.SAMPLE_LENGTH ASC
  256. </query>
  257. <query id = "FrmMilBatchSampleNew.doQueryCheckPlanDetial" desc = "查询检验计划从表信息">
  258. SELECT T.*
  259. FROM CRAFT_SAMPLING_DETAIL T WHERE T.PROCESS_CODE = 'D'
  260. AND T.ORD_LN_PK = ?
  261. AND T.CRAFT_NO = ?
  262. AND T.CRAFT_SEQ = ?
  263. </query>
  264. <query id = "FrmMilBatchSampleNew.updateMilPlan" desc = "修改炉计划标识">
  265. UPDATE MIL_PLAN T
  266. SET T.IS_BATCH = '#IS_BATCH#'
  267. WHERE T.ID = '#ID#'
  268. AND REGEXP_REPLACE(T.JUDGE_STOVE_NO, '-.*', '') = REGEXP_REPLACE('#JUDGE_STOVE_NO#', '-.*', '')
  269. </query>
  270. <query id = "FrmMilBatchSampleNew.updatePortMilResult" desc = "修改样管管号队列">
  271. UPDATE PORT_MIL_BATCH_SAMPLE_RESULT T
  272. SET T.IS_SAMPLE_PIPE = '#IS_SAMPLE_PIPE#',
  273. T.SAMPLE_PIPE_LEN_A = '#SAMPLE_PIPE_LEN_A#',
  274. T.BATCH_NO = '#BATCH_NO#',
  275. T.PHY_CODE_GROUP = '#PHY_CODE_GROUP#',
  276. T.SAMPLE_PIPE_LEN_B = '#SAMPLE_PIPE_LEN_B#',
  277. T.PHY_CODE_GROUPB = '#PHY_CODE_GROUPB#',
  278. T.SAMPLE_PIPE_LEN = TO_NUMBER(NVL('#SAMPLE_PIPE_LEN_A#',0))+TO_NUMBER(NVL('#SAMPLE_PIPE_LEN_B#',0)),
  279. T.GET_SAMPLE_NAME = '#GET_SAMPLE_NAME#',
  280. T.GET_SAMPLE_TIME = TO_DATE('#GET_SAMPLE_TIME#','YYYY-MM-DD HH24:MI:SS'),
  281. T.GET_SAMPLE_SHIFT = '#GET_SAMPLE_SHIFT#',
  282. T.GET_SAMPLE_CLASS = '#GET_SAMPLE_CLASS#',
  283. T.CRAFT_SOURCE = '#CRAFT_SOURCE#',
  284. T.IS_BATCH = '2'
  285. WHERE T.PLAN_ID = '#PLAN_ID#'
  286. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  287. AND T.MAT_NO = '#MAT_NO#'
  288. </query>
  289. <query id = "FrmMilBatchSampleNew.updatePortMilResultSample" desc = "取样完成修改管号队列">
  290. UPDATE PORT_MIL_BATCH_SAMPLE_RESULT T
  291. SET T.IS_SAMPLE_PIPE = '#IS_SAMPLE_PIPE#',
  292. T.SAMPLE_PIPE_LEN_A = '#SAMPLE_PIPE_LEN_A#',
  293. T.PHY_CODE_GROUP = '#PHY_CODE_GROUP#',
  294. T.SAMPLE_PIPE_LEN_B = '#SAMPLE_PIPE_LEN_B#',
  295. T.PHY_CODE_GROUPB = '#PHY_CODE_GROUPB#',
  296. T.SAMPLE_PIPE_LEN = TO_NUMBER(NVL('#SAMPLE_PIPE_LEN_A#',0))+TO_NUMBER(NVL('#SAMPLE_PIPE_LEN_B#',0)),
  297. T.GET_SAMPLE_NAME = '#GET_SAMPLE_NAME#',
  298. T.GET_SAMPLE_TIME = TO_DATE('#GET_SAMPLE_TIME#','YYYY-MM-DD HH24:MI:SS'),
  299. T.GET_SAMPLE_SHIFT = '#GET_SAMPLE_SHIFT#',
  300. T.GET_SAMPLE_CLASS = '#GET_SAMPLE_CLASS#',
  301. T.CRAFT_SOURCE = '#CRAFT_SOURCE#',
  302. T.IS_BATCH = '2'
  303. WHERE T.PLAN_ID = '#PLAN_ID#'
  304. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  305. AND T.MAT_NO = '#MAT_NO#'
  306. </query>
  307. <query id = "FrmMilBatchSampleNew.updatePortMilResultReSample" desc = "复取样完成修改管号队列">
  308. UPDATE PORT_MIL_BATCH_SAMPLE_RESULT T
  309. SET T.IS_SAMPLE_PIPE = '#IS_SAMPLE_PIPE#',
  310. T.RESAMPLE_PIPE_LEN_A = '#RESAMPLE_PIPE_LEN_A#',
  311. T.RESAMPLE_PIPE_LEN_B = '#RESAMPLE_PIPE_LEN_B#',
  312. T.SAMPLE_PIPE_LEN = TO_NUMBER(NVL(T.SAMPLE_PIPE_LEN,0)) + TO_NUMBER(NVL('#RESAMPLE_PIPE_LEN_A#',0))+TO_NUMBER(NVL('#RESAMPLE_PIPE_LEN_B#',0)),
  313. T.RE_GET_SAMPLE_NAME = '#RE_GET_SAMPLE_NAME#',
  314. T.RE_GET_SAMPLE_TIME = TO_DATE('#RE_GET_SAMPLE_TIME#','YYYY-MM-DD HH24:MI:SS'),
  315. T.RE_GET_SAMPLE_STATUS = '#RE_GET_SAMPLE_STATUS#'
  316. WHERE T.PLAN_ID = '#PLAN_ID#'
  317. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  318. AND T.MAT_NO = '#MAT_NO#'
  319. </query>
  320. <query id = "FrmMilBatchSampleNew.CancelupdatePortMilResultReSample" desc = "撤销复取样完成修改管号队列">
  321. UPDATE PORT_MIL_BATCH_SAMPLE_RESULT T
  322. SET T.IS_SAMPLE_PIPE = '#IS_SAMPLE_PIPE#',
  323. T.RESAMPLE_PIPE_LEN_A = '#RESAMPLE_PIPE_LEN_A#',
  324. T.RESAMPLE_PIPE_LEN_B = '#RESAMPLE_PIPE_LEN_B#',
  325. T.SAMPLE_PIPE_LEN = TO_NUMBER(NVL(T.SAMPLE_PIPE_LEN,0)) - TO_NUMBER(NVL('#RESAMPLE_PIPE_LEN_A#',0))-TO_NUMBER(NVL('#RESAMPLE_PIPE_LEN_B#',0)),
  326. T.RE_GET_SAMPLE_NAME = '#RE_GET_SAMPLE_NAME#',
  327. T.RE_GET_SAMPLE_TIME = TO_DATE('#RE_GET_SAMPLE_TIME#','YYYY-MM-DD HH24:MI:SS'),
  328. T.RE_GET_SAMPLE_STATUS = '#RE_GET_SAMPLE_STATUS#'
  329. WHERE T.PLAN_ID = '#PLAN_ID#'
  330. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  331. AND T.MAT_NO = '#MAT_NO#'
  332. </query>
  333. <query id = "FrmMilBatchSampleNew.updatePortMilReNoQuial" desc = "修改复取样信息">
  334. UPDATE PIPE_CHECKCONSIGN_NOQUALIFIED T
  335. SET T.IS_SAMPLE = '#IS_SAMPLE#'
  336. WHERE T.LOT_NO = '#LOT_NO#'
  337. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  338. AND T.CHECK_NO = '#CHECK_NO#'
  339. </query>
  340. <query id = "FrmMilBatchSampleNew.updateMilPortBacth" desc = "分批完成修改进程管号队列">
  341. UPDATE PORT_MIL_BATCH_SAMPLE_RESULT T
  342. SET
  343. T.BATCH_NO = '#BATCH_NO#'
  344. WHERE T.PLAN_ID = '#PLAN_ID#'
  345. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  346. AND T.MAT_NO = '#MAT_NO#'
  347. </query>
  348. <query id = "FrmMilBatchSampleNew.selectIsBacth" desc = "查询分批取样标识">
  349. SELECT T.IS_BATCH FROM MIL_PLAN T WHERE T.ID = '#ID#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  350. </query>
  351. <query id = "FrmMilBatchSampleNew.cancelBatchSeting" desc = "撤销分批取样">
  352. DECLARE
  353. BEGIN
  354. UPDATE MIL_PLAN T
  355. SET T.IS_BATCH = '0'
  356. WHERE T.ID = '#ID#'
  357. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#';
  358. UPDATE PORT_MIL_BATCH_SAMPLE_RESULT T
  359. SET T.BATCH_NO = '',
  360. T.IS_SAMPLE_PIPE = '0',
  361. T.SAMPLE_PIPE_LEN = '',
  362. T.SAMPLE_PIPE_LEN_A = '',
  363. T.SAMPLE_PIPE_LEN_B = '',
  364. T.GET_SAMPLE_NAME = '',
  365. T.GET_SAMPLE_TIME = '',
  366. T.GET_SAMPLE_SHIFT = '',
  367. T.GET_SAMPLE_CLASS = '',
  368. T.CRAFT_SOURCE = '',
  369. T.IS_BATCH = ''
  370. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#';
  371. END;
  372. </query>
  373. <query id = "FrmMilBatchSampleNew.cancelGetSample" desc = "撤销取样">
  374. DECLARE
  375. BEGIN
  376. UPDATE MIL_PLAN T
  377. SET T.IS_BATCH = '1'
  378. WHERE T.ID = '#ID#'
  379. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#';
  380. UPDATE PORT_MIL_BATCH_SAMPLE_RESULT T
  381. SET T.IS_SAMPLE_PIPE = '0', T.SAMPLE_PIPE_LEN = '',T.SAMPLE_PIPE_LEN_A = '',T.SAMPLE_PIPE_LEN_B = '',
  382. T.GET_SAMPLE_NAME = '',
  383. T.GET_SAMPLE_TIME = '',
  384. T.GET_SAMPLE_SHIFT = '',
  385. T.CRAFT_SOURCE = '',
  386. T.GET_SAMPLE_CLASS = ''
  387. WHERE T.PLAN_ID = '#ID#'
  388. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#';
  389. END;
  390. </query>
  391. <query id = "FrmMilBatchSampleNew.cancelGetSample1" desc = "撤销取样">
  392. DECLARE
  393. BEGIN
  394. UPDATE MIL_PLAN T
  395. SET T.IS_BATCH = '1'
  396. WHERE T.LOT_NO = '#LOT_NO#'
  397. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  398. AND T.IS_BATCH = '2';
  399. UPDATE PORT_MIL_BATCH_SAMPLE_RESULT T
  400. SET T.IS_SAMPLE_PIPE = '0', T.SAMPLE_PIPE_LEN = '',T.SAMPLE_PIPE_LEN_A = '',T.SAMPLE_PIPE_LEN_B = '',
  401. T.GET_SAMPLE_NAME = '',
  402. T.GET_SAMPLE_TIME = '',
  403. T.GET_SAMPLE_SHIFT = '',
  404. T.GET_SAMPLE_CLASS = '',
  405. T.CRAFT_SOURCE = '',
  406. T.IS_BATCH = ''
  407. WHERE T.LOT_NO = '#LOT_NO#'
  408. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  409. AND T.IS_BATCH = '2';
  410. END;
  411. </query>
  412. <query id = "FrmMilBatchSampleNew.cancelBatch" desc = "撤销分批">
  413. DECLARE
  414. BEGIN
  415. UPDATE MIL_PLAN T
  416. SET T.IS_BATCH = '0'
  417. WHERE T.ID = '#ID#'
  418. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#';
  419. UPDATE PORT_MIL_BATCH_SAMPLE_RESULT T
  420. SET T.BATCH_NO = '',
  421. T.IS_SAMPLE_PIPE = '0',
  422. T.SAMPLE_PIPE_LEN = '',
  423. T.SAMPLE_PIPE_LEN_A = '',
  424. T.SAMPLE_PIPE_LEN_B = '',
  425. T.GET_SAMPLE_NAME = '',
  426. T.GET_SAMPLE_TIME = '',
  427. T.GET_SAMPLE_SHIFT = '',
  428. T.GET_SAMPLE_CLASS = '',
  429. T.CRAFT_SOURCE = '',
  430. T.IS_BATCH = ''
  431. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#';
  432. END;
  433. </query>
  434. <query id = "FrmMilBatchSampleNew.doQuerySampleInfo" desc = "查询样管基础信息">
  435. SELECT BATCH_NO,
  436. MAT_NO,
  437. SAMPLE_PIPE_LEN_A,
  438. SAMPLE_PIPE_LEN_B,
  439. PHY_CODE_GROUP,
  440. PHY_CODE_GROUPB
  441. FROM PORT_MIL_BATCH_SAMPLE_RESULT T
  442. WHERE IS_SAMPLE_PIPE = '1'
  443. AND IS_VALID = '1'
  444. AND PLAN_ID = ?
  445. AND JUDGE_STOVE_NO = ?
  446. AND T.CRAFT_SOURCE = ?
  447. AND (IS_BATCH = '2' OR IS_BATCH IS NULL)
  448. ORDER BY BATCH_NO, MAT_NO
  449. </query>
  450. <query id = "FrmMilBatchSampleNew.doQuerySampleInfo1" desc = "查询样管基础信息">
  451. SELECT BATCH_NO,
  452. MAT_NO,
  453. SAMPLE_PIPE_LEN_A,
  454. SAMPLE_PIPE_LEN_B,
  455. PHY_CODE_GROUP,
  456. PHY_CODE_GROUPB
  457. FROM PORT_MIL_BATCH_SAMPLE_RESULT T
  458. WHERE IS_SAMPLE_PIPE = '1'
  459. AND IS_VALID = '1'
  460. AND LOT_NO = ?
  461. AND JUDGE_STOVE_NO = ?
  462. AND T.CRAFT_SOURCE = ?
  463. AND IS_BATCH = '2'
  464. ORDER BY BATCH_NO, MAT_NO
  465. </query>
  466. <query id = "FrmMilBatchSampleNew.doQueryResampleInfo" desc = "查询复样样管基础信息">
  467. SELECT
  468. BATCH_NO,
  469. MAT_NO,
  470. RESAMPLE_PIPE_LEN_A,
  471. RESAMPLE_PIPE_LEN_B,
  472. REPHY_CODE_GROUP,
  473. REPHY_CODE_GROUPB
  474. FROM PORT_MIL_BATCH_SAMPLE_RESULT
  475. WHERE IS_SAMPLE_PIPE = '1'
  476. AND IS_VALID = '1'
  477. AND JUDGE_STOVE_NO = ? || '-01'
  478. AND RE_GET_SAMPLE_STATUS = '1'
  479. ORDER BY BATCH_NO,MAT_NO
  480. </query>
  481. <query id = "FrmMilBatchSampleNew.doQueryReChemPhy" desc = "查询复取样试样组">
  482. SELECT T.PHY_CODE_MAX,
  483. T.PHY_NAME_MAX
  484. FROM PIPE_CHECKCONSIGN_NOQUALIFIED T
  485. WHERE T.LOT_NO = ?
  486. AND T.JUDGE_STOVE_NO = ?
  487. AND T.CHECK_NO = ?
  488. GROUP BY T.PHY_CODE_MAX,T.PHY_NAME_MAX
  489. </query>
  490. <query id = "FrmMilBatchSampleNew.doQueryChemSRJ" desc = "查询首日检成分信息">
  491. SELECT T.DESGIN_KEY,
  492. T.CIC,
  493. T.USE_CODE,
  494. T.USE_DESC,
  495. T.SPECL_FL,
  496. T.INDEX_SEQ,
  497. T.CHEM_CODE,
  498. T.CHEM_NAME,
  499. T.CHEM_TYPE,
  500. T.CHEM_FORMULA,
  501. T.ISCHECK,
  502. T.ISJUDGE,
  503. T.ISQUOTE,
  504. T.COMPLEX_TYPE,
  505. T.STDMIN_SIGN,
  506. T.STDMIN,
  507. T.STDMAX_SIGN,
  508. T.STDMAX,
  509. T.STDTARGET,
  510. T.MODEL_CODE,
  511. T.MODEL_DESC,
  512. T.STDMEMO,
  513. T.ELE_CODE,
  514. T.ELE_NAME,
  515. T.ELE_MIN_SIGN,
  516. T.ELE_MIN,
  517. T.ELE_MAX_SIGN,
  518. T.ELE_MAX,
  519. T.SIZE_CODE2,
  520. T.SIZE_NAME2,
  521. T.SIZE_MIN_SIGN2,
  522. T.SIZE_MIN2,
  523. T.SIZE_MAX_SIGN2,
  524. T.SIZE_MAX2,
  525. T.SIZE_CODE,
  526. T.SIZE_NAME,
  527. T.SIZE_MIN_SIGN,
  528. T.SIZE_MIN,
  529. T.SIZE_MAX_SIGN,
  530. T.SIZE_MAX,
  531. T.SPEC_JG,
  532. T.SPEC_JG_DESC,
  533. T.REP_CODE,
  534. T.REP_NAME,
  535. T.REP_MIN_SIGN,
  536. T.REP_MIN,
  537. T.REP_MAX_SIGN,
  538. T.REP_MAX,
  539. T.REP_VAL
  540. FROM MIL_PLAN S,
  541. PLN_SALEORD T2,
  542. CRAFT_ORD_DESIGN T3,
  543. CRAFT_ORD_DESIGN_STD_CIC T
  544. WHERE SUBSTR(S.ORD_LN_DLY_PK,
  545. 1,
  546. DECODE(INSTR(S.ORD_LN_DLY_PK, '-'),
  547. 0,
  548. LENGTH(S.ORD_LN_DLY_PK),
  549. INSTR(S.ORD_LN_DLY_PK, '-', -1) - 1)) = T2.ORD_LN_DLY_PK
  550. AND T2.ORD_LN_PK = T3.ORD_LN_PK
  551. AND T3.CRAFT_SEQ = S.CRAFT_SEQ
  552. AND T3.DESGIN_KEY = T.DESGIN_KEY
  553. AND T.MSC_PLINE = S.INDEX_SEQ
  554. AND T.CHEM_TYPE = 'A'
  555. AND (S.CIC = T.CIC AND S.IF_PRODUCT = '1' OR T.CRAFT_SOURCE = '2')
  556. AND (T.ISCHECK = '1' OR T.ISJUDGE = '1')
  557. AND T.PROCESS_CODE = 'A'
  558. AND T.CRAFT_SOURCE = '2'
  559. AND S.PRO_PLAN_ID = ?
  560. AND S.GX_PLAN_NO = ?
  561. AND S.JUDGE_STOVE_NO = ?
  562. </query>
  563. <query id = "FrmMilBatchSampleNew.doQueryChem" desc = "查询成分信息">
  564. SELECT T.DESGIN_KEY,
  565. T.CIC,
  566. T.USE_CODE,
  567. T.USE_DESC,
  568. T.SPECL_FL,
  569. T.INDEX_SEQ,
  570. T.CHEM_CODE,
  571. T.CHEM_NAME,
  572. T.CHEM_TYPE,
  573. T.CHEM_FORMULA,
  574. T.ISCHECK,
  575. T.ISJUDGE,
  576. T.ISQUOTE,
  577. T.COMPLEX_TYPE,
  578. T.STDMIN_SIGN,
  579. T.STDMIN,
  580. T.STDMAX_SIGN,
  581. T.STDMAX,
  582. T.STDTARGET,
  583. T.MODEL_CODE,
  584. T.MODEL_DESC,
  585. T.STDMEMO,
  586. T.ELE_CODE,
  587. T.ELE_NAME,
  588. T.ELE_MIN_SIGN,
  589. T.ELE_MIN,
  590. T.ELE_MAX_SIGN,
  591. T.ELE_MAX,
  592. T.SIZE_CODE2,
  593. T.SIZE_NAME2,
  594. T.SIZE_MIN_SIGN2,
  595. T.SIZE_MIN2,
  596. T.SIZE_MAX_SIGN2,
  597. T.SIZE_MAX2,
  598. T.SIZE_CODE,
  599. T.SIZE_NAME,
  600. T.SIZE_MIN_SIGN,
  601. T.SIZE_MIN,
  602. T.SIZE_MAX_SIGN,
  603. T.SIZE_MAX,
  604. T.SPEC_JG,
  605. T.SPEC_JG_DESC,
  606. T.REP_CODE,
  607. T.REP_NAME,
  608. T.REP_MIN_SIGN,
  609. T.REP_MIN,
  610. T.REP_MAX_SIGN,
  611. T.REP_MAX,
  612. T.REP_VAL
  613. FROM MIL_PLAN S,
  614. PLN_SALEORD T2,
  615. CRAFT_ORD_DESIGN T3,
  616. CRAFT_ORD_DESIGN_STD_CIC T
  617. WHERE SUBSTR(S.ORD_LN_DLY_PK,
  618. 1,
  619. DECODE(INSTR(S.ORD_LN_DLY_PK, '-'),
  620. 0,
  621. LENGTH(S.ORD_LN_DLY_PK),
  622. INSTR(S.ORD_LN_DLY_PK, '-', -1) - 1)) = T2.ORD_LN_DLY_PK
  623. AND T2.ORD_LN_PK = T3.ORD_LN_PK
  624. AND T3.CRAFT_SEQ = S.CRAFT_SEQ
  625. AND T3.DESGIN_KEY = T.DESGIN_KEY
  626. AND T.MSC_PLINE = S.INDEX_SEQ
  627. AND T.CHEM_TYPE = 'A'
  628. AND T.CHEM_CODE NOT IN ('C012', 'C013', 'C014')
  629. AND S.CIC = T.CIC
  630. AND (T.ISCHECK = '1' OR T.ISJUDGE = '1')
  631. AND S.IF_PRODUCT = '1'
  632. AND T.PROCESS_CODE = 'A'
  633. AND S.PRO_PLAN_ID = ?
  634. AND S.GX_PLAN_NO = ?
  635. AND S.JUDGE_STOVE_NO = ?
  636. UNION ALL
  637. SELECT T.DESGIN_KEY,
  638. T.CIC,
  639. T.USE_CODE,
  640. T.USE_DESC,
  641. T.SPECL_FL,
  642. T.INDEX_SEQ,
  643. T.CHEM_CODE,
  644. T.CHEM_NAME,
  645. T.CHEM_TYPE,
  646. T.CHEM_FORMULA,
  647. T.ISCHECK,
  648. T.ISJUDGE,
  649. T.ISQUOTE,
  650. T.COMPLEX_TYPE,
  651. T.STDMIN_SIGN,
  652. T.STDMIN,
  653. T.STDMAX_SIGN,
  654. T.STDMAX,
  655. T.STDTARGET,
  656. T.MODEL_CODE,
  657. T.MODEL_DESC,
  658. T.STDMEMO,
  659. T.ELE_CODE,
  660. T.ELE_NAME,
  661. T.ELE_MIN_SIGN,
  662. T.ELE_MIN,
  663. T.ELE_MAX_SIGN,
  664. T.ELE_MAX,
  665. T.SIZE_CODE2,
  666. T.SIZE_NAME2,
  667. T.SIZE_MIN_SIGN2,
  668. T.SIZE_MIN2,
  669. T.SIZE_MAX_SIGN2,
  670. T.SIZE_MAX2,
  671. T.SIZE_CODE,
  672. T.SIZE_NAME,
  673. T.SIZE_MIN_SIGN,
  674. T.SIZE_MIN,
  675. T.SIZE_MAX_SIGN,
  676. T.SIZE_MAX,
  677. T.SPEC_JG,
  678. T.SPEC_JG_DESC,
  679. T.REP_CODE,
  680. T.REP_NAME,
  681. T.REP_MIN_SIGN,
  682. T.REP_MIN,
  683. T.REP_MAX_SIGN,
  684. T.REP_MAX,
  685. T.REP_VAL
  686. FROM MIL_PLAN S,
  687. PLN_SALEORD T2,
  688. CRAFT_ORD_DESIGN T3,
  689. CRAFT_ORD_DESIGN_STD_CIC T
  690. WHERE SUBSTR(S.ORD_LN_DLY_PK,
  691. 1,
  692. DECODE(INSTR(S.ORD_LN_DLY_PK, '-'),
  693. 0,
  694. LENGTH(S.ORD_LN_DLY_PK),
  695. INSTR(S.ORD_LN_DLY_PK, '-', -1) - 1)) = T2.ORD_LN_DLY_PK
  696. AND T2.ORD_LN_PK = T3.ORD_LN_PK
  697. AND T3.CRAFT_SEQ = S.CRAFT_SEQ
  698. AND T3.DESGIN_KEY = T.DESGIN_KEY
  699. AND T.CHEM_TYPE = 'A'
  700. AND T.CHEM_CODE IN ('C012', 'C013', 'C014')
  701. AND T.SPECL_FL = '1'
  702. AND (T.ISCHECK = '1' OR T.ISJUDGE = '1')
  703. AND S.IF_PRODUCT = '1'
  704. AND S.PRO_PLAN_ID = ?
  705. AND S.GX_PLAN_NO = ?
  706. AND S.JUDGE_STOVE_NO = ?
  707. UNION ALL
  708. SELECT T.DESGIN_KEY,
  709. T.CIC,
  710. T.USE_CODE,
  711. T.USE_DESC,
  712. T.SPECL_FL,
  713. T.INDEX_SEQ,
  714. T.CHEM_CODE,
  715. T.CHEM_NAME,
  716. T.CHEM_TYPE,
  717. T.CHEM_FORMULA,
  718. T.ISCHECK,
  719. T.ISJUDGE,
  720. T.ISQUOTE,
  721. T.COMPLEX_TYPE,
  722. T.STDMIN_SIGN,
  723. T.STDMIN,
  724. T.STDMAX_SIGN,
  725. T.STDMAX,
  726. T.STDTARGET,
  727. T.MODEL_CODE,
  728. T.MODEL_DESC,
  729. T.STDMEMO,
  730. T.ELE_CODE,
  731. T.ELE_NAME,
  732. T.ELE_MIN_SIGN,
  733. T.ELE_MIN,
  734. T.ELE_MAX_SIGN,
  735. T.ELE_MAX,
  736. T.SIZE_CODE2,
  737. T.SIZE_NAME2,
  738. T.SIZE_MIN_SIGN2,
  739. T.SIZE_MIN2,
  740. T.SIZE_MAX_SIGN2,
  741. T.SIZE_MAX2,
  742. T.SIZE_CODE,
  743. T.SIZE_NAME,
  744. T.SIZE_MIN_SIGN,
  745. T.SIZE_MIN,
  746. T.SIZE_MAX_SIGN,
  747. T.SIZE_MAX,
  748. T.SPEC_JG,
  749. T.SPEC_JG_DESC,
  750. T.REP_CODE,
  751. T.REP_NAME,
  752. T.REP_MIN_SIGN,
  753. T.REP_MIN,
  754. T.REP_MAX_SIGN,
  755. T.REP_MAX,
  756. T.REP_VAL
  757. FROM MIL_PLAN S,
  758. PLN_SALEORD T2,
  759. CRAFT_ORD_DESIGN T3,
  760. CRAFT_ORD_DESIGN_STD_CIC T
  761. WHERE SUBSTR(S.ORD_LN_DLY_PK,
  762. 1,
  763. DECODE(INSTR(S.ORD_LN_DLY_PK, '-'),
  764. 0,
  765. LENGTH(S.ORD_LN_DLY_PK),
  766. INSTR(S.ORD_LN_DLY_PK, '-', -1) - 1)) = T2.ORD_LN_DLY_PK
  767. AND T2.ORD_LN_PK = T3.ORD_LN_PK
  768. AND T3.CRAFT_SEQ = S.CRAFT_SEQ
  769. AND T3.DESGIN_KEY = T.DESGIN_KEY
  770. AND T.CHEM_TYPE = 'A'
  771. AND T.CHEM_CODE IN ('C012', 'C013', 'C014')
  772. AND T.SPECL_FL = '0'
  773. AND (T.ISCHECK = '1' OR T.ISJUDGE = '1')
  774. AND NOT EXISTS (SELECT 1
  775. FROM CRAFT_ORD_DESIGN_STD_CIC E2
  776. WHERE E2.CHEM_CODE = T.CHEM_CODE
  777. AND E2.DESGIN_KEY = T.DESGIN_KEY
  778. AND E2.SPECL_FL = '1')
  779. AND S.IF_PRODUCT = '1'
  780. AND S.PRO_PLAN_ID = ?
  781. AND S.GX_PLAN_NO = ?
  782. AND S.JUDGE_STOVE_NO = ?
  783. </query>
  784. <query id = "FrmMilBatchSampleNew.doQueryPhy" desc = "查询理化详细信息">
  785. SELECT *
  786. FROM (SELECT T.DESGIN_KEY,
  787. T.PIC,
  788. T.SPECL_FL,
  789. T.INDEX_SEQ,
  790. T.PHY_CODE_MAX,
  791. T.PHY_NAME_MAX,
  792. (SELECT A.PHY_DEPTID
  793. FROM COM_BASE_PHY_B A, COM_BASE_PHY_C B
  794. WHERE T.PHY_CODE_MIN = B.PHY_CODE
  795. AND A.PHY_CODE = B.PHY_TYPE_M
  796. AND A.VALIDFLAG = '1'
  797. AND B.VALIDFLAG = '1') DEPT_ID,
  798. T.PHY_CODE_MIN,
  799. T.PHY_NAME_MIN,
  800. T.PHY_CODE_MIN ||
  801. NVL2(S1.SPLINE_ITEM_CODE_F, '_' || S1.SPLINE_ITEM_CODE_F, S1.SPLINE_ITEM_CODE_S) ||
  802. NVL2(T.ITEM_CODE_W, '_' || T.ITEM_CODE_W, S1.SPLINE_ITEM_CODE_S) ||
  803. NVL2(S1.SPLINE_ITEM_CODE_S, '_' || S1.SPLINE_ITEM_CODE_S, S1.SPLINE_ITEM_CODE_S) SAMPLE_KEY, --试样组方向温度尺寸
  804. T.PHY_NAME_MIN ||
  805. NVL2(S1.SPLINE_ITEM_NAME_F, '_' || S1.SPLINE_ITEM_NAME_F, S1.SPLINE_ITEM_NAME_F) ||
  806. NVL2(T.ITEM_NAME_W, '_' || T.ITEM_NAME_W, T.ITEM_NAME_W) ||
  807. NVL2(S1.SPLINE_ITEM_NAME_S, '_' || S1.SPLINE_ITEM_NAME_S, S1.SPLINE_ITEM_NAME_S) SAMPLE_KEY_DESC, --试样组描述
  808. T.PHY_CODE,
  809. T.PHY_NAME,
  810. (SELECT D.ORDER_SEQ FROM COM_BASE_PHY D WHERE D.PHY_CODE = T.PHY_CODE)ORDER_SEQ,
  811. T.ITEM_CODE_F,
  812. T.ITEM_NAME_F,
  813. T.ITEM_CODE_W,
  814. T.ITEM_NAME_W,
  815. T.ITEM_CODE_S,
  816. T.ITEM_NAME_S,
  817. S1.RATE,
  818. S1.DESC_RATE,
  819. S1.SPLINE_ITEM_CODE_S,
  820. S1.SPLINE_ITEM_NAME_S,
  821. S1.SPLINE_ITEM_CODE_F,
  822. S1.SPLINE_ITEM_NAME_F,
  823. T.GROUP_SEQ,
  824. T.ISCHECK,
  825. T.ISQUOTE,
  826. T.RESULT_COUNT,
  827. T.ISJUDGE,
  828. T.PHY_TYPE,
  829. T.PHY_FORMULA,
  830. T.STDMIN_SIGN,
  831. T.STDMIN,
  832. T.STDMAX_SIGN,
  833. T.STDMAX,
  834. T.JUDGE_BASIS,
  835. T.DELIVERYSTATE,
  836. T.MODEL_CODE,
  837. T.MODEL_DESC,
  838. T.STDMEMO,
  839. T.SIZE_CODE,
  840. T.SIZE_NAME,
  841. T.SIZE_MIN_SIGN,
  842. T.SIZE_MIN,
  843. T.SIZE_MAX_SIGN,
  844. T.SIZE_MAX,
  845. T.SIZE_CODE2,
  846. T.SIZE_NAME2,
  847. T.SIZE_MIN_SIGN2,
  848. T.SIZE_MIN2,
  849. T.SIZE_MAX_SIGN2,
  850. T.SIZE_MAX2,
  851. T.SPEC_JG,
  852. T.SPEC_JG_DESC,
  853. T.ADDCONDITION,
  854. T.ADDSTDCON_CODE,
  855. T.ADDSTD_MIN_SIGN,
  856. T.ADDSTD_MIN,
  857. T.ADDSTD_MAX_SIGN,
  858. T.ADDSTD_MAX,
  859. T.ADDPERCENT,
  860. T.STDMIN_SIGN2,
  861. T.STDMIN2,
  862. T.STDMAX_SIGN2,
  863. T.STDMAX2,
  864. T.STD_CHOOSE,
  865. T.BILLET_SAMPLE,
  866. (SELECT DISTINCT PHY_UNIT
  867. FROM COM_BASE_PHY T5
  868. WHERE T5.VALIDFLAG = '1'
  869. AND T5.PHY_CODE = T.PHY_CODE) PHY_UNIT,
  870. ROW_NUMBER() OVER(PARTITION BY T.DESGIN_KEY, T.PHY_CODE_MAX, T.PHY_CODE_MIN, T.PHY_CODE, T.ITEM_CODE_F, T.ITEM_CODE_W, T.ITEM_CODE_S ORDER BY T.SPECL_FL DESC) RN
  871. FROM MIL_PLAN S,
  872. PLN_SALEORD T2,
  873. CRAFT_ORD_DESIGN T3,
  874. CRAFT_ORD_DESIGN_STD_PIC T,
  875. CRAFT_ORD_DESIGN_STD_PIC_SMP S1
  876. WHERE SUBSTR(S.ORD_LN_DLY_PK,
  877. 1,
  878. DECODE(INSTR(S.ORD_LN_DLY_PK, '-'),
  879. 0,
  880. LENGTH(S.ORD_LN_DLY_PK),
  881. INSTR(S.ORD_LN_DLY_PK, '-', -1) - 1))= T2.ORD_LN_DLY_PK
  882. AND T2.ORD_LN_PK = T3.ORD_LN_PK
  883. AND T3.CRAFT_SEQ = S.CRAFT_SEQ
  884. AND T3.DESGIN_KEY = T.DESGIN_KEY
  885. AND T.MSC_PLINE = S.INDEX_SEQ
  886. AND (T.PIC = S.PIC OR T.CRAFT_SOURCE = '2')
  887. AND T.DESGIN_KEY = S1.DESGIN_KEY
  888. AND T.PHY_CODE_MIN = S1.PHY_CODE_MIN
  889. AND NVL(T.ITEM_CODE_F,'1') = NVL(S1.ITEM_CODE_F,'1')
  890. AND NVL(T.ITEM_CODE_W,'1') = NVL(S1.ITEM_CODE_W,'1')
  891. AND NVL(T.ITEM_CODE_S,'1') = NVL(S1.ITEM_CODE_C,'1')
  892. AND T.PROCESS_CODE = 'D'
  893. AND S.PRO_PLAN_ID = ?
  894. AND S.GX_PLAN_NO = ?
  895. AND T.PIC = ?
  896. AND S1.CRAFT_SOURCE = '0'
  897. AND REGEXP_REPLACE(S.JUDGE_STOVE_NO, '-.*', '') = ?) T
  898. WHERE RN = '1'
  899. --ORDER BY T.PHY_CODE_MAX,
  900. -- T.PHY_CODE_MIN,
  901. -- T.PHY_CODE,
  902. -- T.ITEM_CODE_F,
  903. -- T.ITEM_CODE_W,
  904. -- T.ITEM_CODE_S
  905. </query>
  906. <query id = "FrmMilBatchSampleNew.doQueryPhySRJ" desc = "查询理化详细信息">
  907. SELECT *
  908. FROM (SELECT T.DESGIN_KEY,
  909. T.PIC,
  910. T.SPECL_FL,
  911. T.INDEX_SEQ,
  912. T.PHY_CODE_MAX,
  913. T.PHY_NAME_MAX,
  914. (SELECT A.PHY_DEPTID
  915. FROM COM_BASE_PHY_B A, COM_BASE_PHY_C B
  916. WHERE T.PHY_CODE_MIN = B.PHY_CODE
  917. AND A.PHY_CODE = B.PHY_TYPE_M
  918. AND A.VALIDFLAG = '1'
  919. AND B.VALIDFLAG = '1') DEPT_ID,
  920. T.PHY_CODE_MIN,
  921. T.PHY_NAME_MIN,
  922. T.PHY_CODE_MIN ||
  923. NVL2(S1.SPLINE_ITEM_CODE_F, '_' || S1.SPLINE_ITEM_CODE_F, S1.SPLINE_ITEM_CODE_S) ||
  924. NVL2(T.ITEM_CODE_W, '_' || T.ITEM_CODE_W, S1.SPLINE_ITEM_CODE_S) ||
  925. NVL2(S1.SPLINE_ITEM_CODE_S, '_' || S1.SPLINE_ITEM_CODE_S, S1.SPLINE_ITEM_CODE_S) SAMPLE_KEY, --试样组方向温度尺寸
  926. T.PHY_NAME_MIN ||
  927. NVL2(S1.SPLINE_ITEM_NAME_F, '_' || S1.SPLINE_ITEM_NAME_F, S1.SPLINE_ITEM_NAME_F) ||
  928. NVL2(T.ITEM_NAME_W, '_' || T.ITEM_NAME_W, T.ITEM_NAME_W) ||
  929. NVL2(S1.SPLINE_ITEM_NAME_S, '_' || S1.SPLINE_ITEM_NAME_S, S1.SPLINE_ITEM_NAME_S) SAMPLE_KEY_DESC, --试样组描述
  930. T.PHY_CODE,
  931. T.PHY_NAME,
  932. (SELECT D.ORDER_SEQ FROM COM_BASE_PHY D WHERE D.PHY_CODE = T.PHY_CODE)ORDER_SEQ,
  933. T.ITEM_CODE_F,
  934. T.ITEM_NAME_F,
  935. T.ITEM_CODE_W,
  936. T.ITEM_NAME_W,
  937. T.ITEM_CODE_S,
  938. T.ITEM_NAME_S,
  939. S1.RATE,
  940. S1.DESC_RATE,
  941. S1.SPLINE_ITEM_CODE_S,
  942. S1.SPLINE_ITEM_NAME_S,
  943. S1.SPLINE_ITEM_CODE_F,
  944. S1.SPLINE_ITEM_NAME_F,
  945. T.GROUP_SEQ,
  946. T.ISCHECK,
  947. T.ISQUOTE,
  948. T.RESULT_COUNT,
  949. T.ISJUDGE,
  950. T.PHY_TYPE,
  951. T.PHY_FORMULA,
  952. T.STDMIN_SIGN,
  953. T.STDMIN,
  954. T.STDMAX_SIGN,
  955. T.STDMAX,
  956. T.JUDGE_BASIS,
  957. T.DELIVERYSTATE,
  958. T.MODEL_CODE,
  959. T.MODEL_DESC,
  960. T.STDMEMO,
  961. T.SIZE_CODE,
  962. T.SIZE_NAME,
  963. T.SIZE_MIN_SIGN,
  964. T.SIZE_MIN,
  965. T.SIZE_MAX_SIGN,
  966. T.SIZE_MAX,
  967. T.SIZE_CODE2,
  968. T.SIZE_NAME2,
  969. T.SIZE_MIN_SIGN2,
  970. T.SIZE_MIN2,
  971. T.SIZE_MAX_SIGN2,
  972. T.SIZE_MAX2,
  973. T.SPEC_JG,
  974. T.SPEC_JG_DESC,
  975. T.ADDCONDITION,
  976. T.ADDSTDCON_CODE,
  977. T.ADDSTD_MIN_SIGN,
  978. T.ADDSTD_MIN,
  979. T.ADDSTD_MAX_SIGN,
  980. T.ADDSTD_MAX,
  981. T.ADDPERCENT,
  982. T.STDMIN_SIGN2,
  983. T.STDMIN2,
  984. T.STDMAX_SIGN2,
  985. T.STDMAX2,
  986. T.STD_CHOOSE,
  987. T.BILLET_SAMPLE,
  988. (SELECT DISTINCT PHY_UNIT
  989. FROM COM_BASE_PHY T5
  990. WHERE T5.VALIDFLAG = '1'
  991. AND T5.PHY_CODE = T.PHY_CODE) PHY_UNIT,
  992. ROW_NUMBER() OVER(PARTITION BY T.DESGIN_KEY, T.PHY_CODE_MAX, T.PHY_CODE_MIN, T.PHY_CODE, T.ITEM_CODE_F, T.ITEM_CODE_W, T.ITEM_CODE_S ORDER BY T.SPECL_FL DESC) RN
  993. FROM MIL_PLAN S,
  994. PLN_SALEORD T2,
  995. CRAFT_ORD_DESIGN T3,
  996. CRAFT_ORD_DESIGN_STD_PIC T,
  997. CRAFT_ORD_DESIGN_STD_PIC_SMP S1
  998. WHERE SUBSTR(S.ORD_LN_DLY_PK,
  999. 1,
  1000. DECODE(INSTR(S.ORD_LN_DLY_PK, '-'),
  1001. 0,
  1002. LENGTH(S.ORD_LN_DLY_PK),
  1003. INSTR(S.ORD_LN_DLY_PK, '-', -1) - 1))= T2.ORD_LN_DLY_PK
  1004. AND T2.ORD_LN_PK = T3.ORD_LN_PK
  1005. AND T3.CRAFT_SEQ = S.CRAFT_SEQ
  1006. AND T3.DESGIN_KEY = T.DESGIN_KEY
  1007. AND T.MSC_PLINE = S.INDEX_SEQ
  1008. AND (T.PIC = S.PIC OR T.CRAFT_SOURCE = '2')
  1009. AND T.DESGIN_KEY = S1.DESGIN_KEY
  1010. AND T.PHY_CODE_MIN = S1.PHY_CODE_MIN
  1011. AND NVL(T.ITEM_CODE_F,'1') = NVL(S1.ITEM_CODE_F,'1')
  1012. AND NVL(T.ITEM_CODE_W,'1') = NVL(S1.ITEM_CODE_W,'1')
  1013. AND NVL(T.ITEM_CODE_S,'1') = NVL(S1.ITEM_CODE_C,'1')
  1014. AND T.PROCESS_CODE = 'D'
  1015. AND S.PRO_PLAN_ID = ?
  1016. AND S.GX_PLAN_NO = ?
  1017. AND S1.CRAFT_SOURCE = '2'
  1018. AND REGEXP_REPLACE(S.JUDGE_STOVE_NO, '-.*', '') = ?) T
  1019. WHERE RN = '1'
  1020. --ORDER BY T.PHY_CODE_MAX,
  1021. -- T.PHY_CODE_MIN,
  1022. -- T.PHY_CODE,
  1023. -- T.ITEM_CODE_F,
  1024. -- T.ITEM_CODE_W,
  1025. -- T.ITEM_CODE_S
  1026. </query>
  1027. <query id = "FrmMilBatchSampleNew.doQueryPhyRate" desc = "查询取样频次">
  1028. SELECT *
  1029. FROM (SELECT T.DESGIN_KEY,
  1030. T.PIC,
  1031. T.SPECL_FL,
  1032. T.INDEX_SEQ,
  1033. T.PHY_CODE_MAX,
  1034. T.PHY_NAME_MAX,
  1035. (SELECT A.PHY_DEPTID
  1036. FROM COM_BASE_PHY_B A, COM_BASE_PHY_C B
  1037. WHERE T.PHY_CODE_MIN = B.PHY_CODE
  1038. AND A.PHY_CODE = B.PHY_TYPE_M
  1039. AND A.VALIDFLAG = '1'
  1040. AND B.VALIDFLAG = '1') DEPT_ID,
  1041. T.PHY_CODE_MIN,
  1042. T.PHY_NAME_MIN,
  1043. T.PHY_CODE,
  1044. T.PHY_NAME,
  1045. S1.RATE,
  1046. S1.DESC_RATE,
  1047. S1.TOP_STOVE,
  1048. S1.LOOP_VALUE,
  1049. ROW_NUMBER() OVER(PARTITION BY T.DESGIN_KEY, T.PHY_CODE_MAX, T.PHY_CODE_MIN ORDER BY T.SPECL_FL DESC) RN
  1050. FROM MIL_PLAN S,
  1051. PLN_SALEORD T2,
  1052. CRAFT_ORD_DESIGN T3,
  1053. CRAFT_ORD_DESIGN_STD_PIC T,
  1054. CRAFT_ORD_DESIGN_STD_PIC_SMP S1
  1055. WHERE SUBSTR(S.ORD_LN_DLY_PK,
  1056. 1,
  1057. DECODE(INSTR(S.ORD_LN_DLY_PK, '-'),
  1058. 0,
  1059. LENGTH(S.ORD_LN_DLY_PK),
  1060. INSTR(S.ORD_LN_DLY_PK, '-', -1) - 1)) = T2.ORD_LN_DLY_PK
  1061. AND T2.ORD_LN_PK = T3.ORD_LN_PK
  1062. AND T3.CRAFT_SEQ = S.CRAFT_SEQ
  1063. AND T3.DESGIN_KEY = T.DESGIN_KEY
  1064. AND T.MSC_PLINE = S.INDEX_SEQ
  1065. AND (T.PIC = S.PIC OR T.CRAFT_SOURCE = '2')
  1066. AND T.DESGIN_KEY = S1.DESGIN_KEY
  1067. AND T.PHY_CODE_MIN = S1.PHY_CODE_MIN
  1068. AND NVL(T.ITEM_CODE_F,'1') = NVL(S1.ITEM_CODE_F,'1')
  1069. AND NVL(T.ITEM_CODE_W,'1') = NVL(S1.ITEM_CODE_W,'1')
  1070. AND NVL(T.ITEM_CODE_S,'1') = NVL(S1.ITEM_CODE_C,'1')
  1071. AND T.PROCESS_CODE = 'D'
  1072. AND T.CRAFT_SOURCE = ?
  1073. AND S.PRO_PLAN_ID = ?
  1074. AND S.GX_PLAN_NO = ?
  1075. AND REGEXP_REPLACE(S.JUDGE_STOVE_NO, '-.*', '') = ?) T
  1076. WHERE RN = '1'
  1077. </query>
  1078. <query id = "FrmMilBatchSampleNew.CheckConsingCount" desc = "查询已委托炉数">
  1079. SELECT NVL(COUNT(1),0)ACOUNT
  1080. FROM PIPE_CHECKCONSIGN_BASEINFO T
  1081. WHERE T.LOT_NO = '#LOT_NO#'
  1082. AND T.PROCESS_CODE = 'D'
  1083. </query>
  1084. <query id = "FrmMilBatchSampleNew.SelectSeqCheckNo" desc = "查询取第几炉结果作为当前炉的结果">
  1085. SELECT CHECK_NO FROM (SELECT ROWNUM SEQ,CHECK_NO FROM ( SELECT T.CHECK_NO
  1086. FROM PIPE_CHECKCONSIGN_BASEINFO T
  1087. WHERE T.LOT_NO = '#LOT_NO#'
  1088. AND T.PROCESS_CODE = 'D'
  1089. AND T.CHECK_COUNT = '0'
  1090. ORDER BY T.CONSIGN_TIME ASC)) WHERE SEQ = ?
  1091. </query>
  1092. <query id = "FrmMilBatchSampleNew.doQueryPhySamp" desc = "查询取样要求">
  1093. SELECT T.*
  1094. FROM (SELECT T.*,
  1095. ROW_NUMBER() OVER(PARTITION BY T.DESGIN_KEY, T.PHY_CODE_MIN,T.ITEM_CODE_F,T.ITEM_CODE_W,
  1096. T.ITEM_CODE_C ORDER BY T.SPECL_FL DESC) RN
  1097. FROM (SELECT (SELECT A.PHY_CODE
  1098. FROM COM_BASE_PHY_B A, COM_BASE_PHY_C B
  1099. WHERE T.PHY_CODE_MIN = B.PHY_CODE
  1100. AND A.PHY_CODE = B.PHY_TYPE_M
  1101. AND A.VALIDFLAG = '1'
  1102. AND B.VALIDFLAG = '1') PHY_CODE_MAX,
  1103. (SELECT A.PHY_TYPE
  1104. FROM COM_BASE_PHY_B A, COM_BASE_PHY_C B
  1105. WHERE T.PHY_CODE_MIN = B.PHY_CODE
  1106. AND A.PHY_CODE = B.PHY_TYPE_M
  1107. AND A.VALIDFLAG = '1'
  1108. AND B.VALIDFLAG = '1') PHY_NAME_MAX,
  1109. (SELECT B.PHY_DEPTID
  1110. FROM COM_BASE_PHY_B A, COM_BASE_PHY_C B
  1111. WHERE T.PHY_CODE_MIN = B.PHY_CODE
  1112. AND A.PHY_CODE = B.PHY_TYPE_M
  1113. AND A.VALIDFLAG = '1'
  1114. AND B.VALIDFLAG = '1') DEPT_ID,
  1115. T.DESGIN_KEY,
  1116. T.PIC,
  1117. T.SIC,
  1118. T.PHY_CODE_MIN,
  1119. T.PHY_NAME_MIN,
  1120. T.STD_CODE,
  1121. T.STD_NAME,
  1122. T.LENGTH,
  1123. T.DESC_LENGTH,
  1124. T.RATE,
  1125. T.DESC_RATE,
  1126. T.SSC_CONDITION,
  1127. T.TOP_STOVE,
  1128. T.LOOP_VALUE,
  1129. T.DESC_COUNT,
  1130. T.POSITION,
  1131. T.DESC_POSITION,
  1132. T.SAMPLE_COUNT,
  1133. T.MEMO,
  1134. T.SAMPLE_STYLE,
  1135. T.BATCH_CNT,
  1136. T.WIDTH,
  1137. T.BATCH_UNIT,
  1138. T.EIC,
  1139. T.PHY_DIR,
  1140. T.SIZE_DESC,
  1141. T.ITEM_CODE_F,
  1142. T.ITEM_CODE_W,
  1143. T.ITEM_CODE_C,
  1144. T.STD_CODE_TEST,
  1145. T.STD_NAME_TEST,
  1146. T.SPLINE_ITEM_CODE_S,
  1147. T.SPLINE_ITEM_NAME_S,
  1148. T.SPLINE_ITEM_CODE_F,
  1149. T.SPLINE_ITEM_NAME_F,
  1150. DECODE(T.SAMPLE_STYLE,
  1151. '408101',
  1152. '片状',
  1153. '408102',
  1154. '环状') AS DESC_SAMPLE_STYLE,
  1155. (SELECT SPLINE_NO
  1156. FROM COM_BASE_SPLINE C
  1157. WHERE C.EIC = T.EIC) SPLINE_NO, --试样编码
  1158. (SELECT DISTINCT M.SPECL_FL
  1159. FROM CRAFT_ORD_DESIGN_STD_PIC M
  1160. WHERE M.DESGIN_KEY = T.DESGIN_KEY
  1161. AND M.PIC = T.PIC) SPECL_FL
  1162. FROM MIL_PLAN S,
  1163. PLN_SALEORD T2,
  1164. CRAFT_ORD_DESIGN T3,
  1165. CRAFT_ORD_DESIGN_STD_PIC_SMP T
  1166. WHERE SUBSTR(S.ORD_LN_DLY_PK,
  1167. 1,
  1168. DECODE(INSTR(S.ORD_LN_DLY_PK, '-'),
  1169. 0,
  1170. LENGTH(S.ORD_LN_DLY_PK),
  1171. INSTR(S.ORD_LN_DLY_PK, '-', -1) - 1)) = T2.ORD_LN_DLY_PK
  1172. AND T2.ORD_LN_PK = T3.ORD_LN_PK
  1173. AND T3.CRAFT_SEQ = S.CRAFT_SEQ
  1174. AND T3.DESGIN_KEY = T.DESGIN_KEY
  1175. AND T.MSC_PLINE = S.INDEX_SEQ
  1176. AND T.PROCESS_CODE = 'D'
  1177. AND S.PRO_PLAN_ID = ?
  1178. AND S.GX_PLAN_NO = ?
  1179. AND S.JUDGE_STOVE_NO = ?
  1180. AND T.PHY_CODE_MIN = ?) T) T
  1181. WHERE RN = '1'
  1182. ORDER BY T.PHY_CODE_MAX,
  1183. T.PHY_CODE_MIN,
  1184. T.ITEM_CODE_F,
  1185. T.ITEM_CODE_W,
  1186. T.ITEM_CODE_C
  1187. </query>
  1188. <query id = "FrmMilBatchSampleNew.getCheckNo" desc = "生成检验编号">
  1189. SELECT ? || REGEXP_REPLACE('#JUDGE_STOVE_NO#', '-.*', '') ||
  1190. LPAD(NVL(MAX(REPLACE(T.CHECK_NO,
  1191. ? ||
  1192. REGEXP_REPLACE('#JUDGE_STOVE_NO#', '-.*', ''),
  1193. '')),
  1194. 0) + 1,
  1195. 1,
  1196. 0) CHECK_NO
  1197. FROM PIPE_CHECKCONSIGN_BASEINFO T
  1198. WHERE T.HEAT_NO = REGEXP_REPLACE('#JUDGE_STOVE_NO#', '-.*', '')
  1199. AND T.PROCESS_CODE = ?
  1200. AND T.CRAFT_SOURCE IN ('0', '1')
  1201. </query>
  1202. <query id = "FrmMilBatchSampleNew.getCheckNoPline" desc = "查询产线代表的产线字母">
  1203. SELECT T.CHECK_NO_SHORT FROM COM_BASE_PLINE T WHERE T.PLINE_CODE = '#PLINE_CODE#'
  1204. </query>
  1205. <query id = "FrmMilBatchSampleNew.getSampleNo" desc = "生成试样号">
  1206. SELECT ?||
  1207. LPAD(NVL( SUBSTR(MAX(TO_NUMBER(REGEXP_REPLACE(t.sample_no, '[^0-9]'))), 5, 6), 0) + 1, 5, 0) SAMPLE_NO
  1208. FROM PIPE_CHECKCONSIGN_DETAIL T
  1209. WHERE T.SAMPLE_NO LIKE ?||'%'
  1210. </query>
  1211. <query id = "FrmMilBatchSampleNew.getStartLetter" desc = "查询产线对应字母">
  1212. SELECT S.SPLINE_DESC FROM COM_BASE_PLINE S WHERE S.PLINE_CODE = ?
  1213. </query>
  1214. <query id = "FrmMilBatchSampleNew.insertBaseInfo" desc = "新增委托基础信息表">
  1215. INSERT INTO PIPE_CHECKCONSIGN_BASEINFO
  1216. (CHECK_NO,
  1217. HEAT_NO,
  1218. STEEL_GRADE,
  1219. STEEL_NO,
  1220. PRODUCT_NAME,
  1221. CRAFT_FILE_NO,
  1222. PRODUCT_STD,
  1223. CONTRACT_NO,
  1224. DIMATER,
  1225. HEIGHT,
  1226. BUCKLE_TYPE,
  1227. PROCESS_STATUS,
  1228. GET_NAME,
  1229. GET_TIME,
  1230. CONSIGN_DEPT,
  1231. CONSIGN_NAME,
  1232. CONSIGN_TIME,
  1233. CONSIGNDEPT_SEND_NAME,
  1234. CONSIGNDEPT_SEND_TIME,
  1235. ISPRODUCER,
  1236. SPEC_REQ,
  1237. FLAG,
  1238. REMARK,
  1239. STOVE_NO,
  1240. LOT_NO,
  1241. CRAFT_PATH,
  1242. PLINE_CODE,
  1243. PRODUCER_DEPT,
  1244. FINAL_USER_DESC,
  1245. PROCESS_CODE,
  1246. CRAFT_SOURCE,
  1247. INDEX_SEQ,
  1248. PIC,
  1249. CIC,
  1250. LOT_NO_GROUP,
  1251. HEAT_PLAN_NO,
  1252. SUPPLY_UNIT_CODE,
  1253. SUPPLY_UNIT,
  1254. PRDCR_NO,
  1255. JH_FLAG)
  1256. VALUES
  1257. ('#CHECK_NO#',
  1258. '#HEAT_NO#',
  1259. '#STEEL_GRADE#',
  1260. '#STEEL_NO#',
  1261. '#PRODUCT_NAME#',
  1262. '#CRAFT_FILE_NO#',
  1263. '#PRODUCT_STD#',
  1264. '#CONTRACT_NO#',
  1265. '#DIMATER#',
  1266. '#HEIGHT#',
  1267. '#BUCKLE_TYPE#',
  1268. '#PROCESS_STATUS#',
  1269. '#GET_NAME#',
  1270. SYSDATE,
  1271. '#CONSIGN_DEPT#',
  1272. '#GET_NAME#',
  1273. SYSDATE,
  1274. '#GET_NAME#',
  1275. SYSDATE,
  1276. '#ISPRODUCER#',
  1277. '#SPEC_REQ#',
  1278. '#FLAG#',
  1279. '#REMARK#',
  1280. '#STOVE_NO#',
  1281. '#LOT_NO#',
  1282. '#CRAFT_PATH#',
  1283. '#PLINE_CODE#',
  1284. '#PRODUCER_DEPT#',
  1285. '#FINAL_USER_DESC#',
  1286. '#PROCESS_CODE#',
  1287. '#CRAFT_SOURCE#',
  1288. '#INDEX_SEQ#',
  1289. '#PIC#',
  1290. '#CIC#',
  1291. '#LOT_NO_GROUP#',
  1292. '#HEAT_PLAN_NO#',
  1293. '#SUPPLY_UNIT_CODE#',
  1294. '#SUPPLY_UNIT#',
  1295. '#PRDCR_NO#',
  1296. '#JH_FLAG#')
  1297. </query>
  1298. <query id = "FrmMilBatchSampleNew.updateBaseInfoDetial" desc = "修改Detial详细信息">
  1299. UPDATE PIPE_CHECKCONSIGN_DETAIL
  1300. SET SAMPLE_NO = '#SAMPLE_NO#',
  1301. SAMPLE_NO_MIN = '#SAMPLE_NO_MIN#',
  1302. BATCH_NO = '#BATCH_NO#',
  1303. SAMPLE_BARCODE = '#SAMPLE_BARCODE#',
  1304. SAMPLE_LEN = '#SAMPLE_LEN#',
  1305. PHY_CODE_MAX = '#PHY_CODE_MAX#',
  1306. PHY_NAME_MAX = '#PHY_NAME_MAX#',
  1307. DEPT_ID = '#DEPT_ID#',
  1308. SAMPLE_COUNT = '#SAMPLE_COUNT#',
  1309. CHECK_STD = '#CHECK_STD#',
  1310. LENGTH = '#LENGTH#',
  1311. WIDTH = '#WIDTH#',
  1312. EIC = '#EIC#',
  1313. PHY_DIR = '#PHY_DIR#',
  1314. SIZE_DESC = '#SIZE_DESC#',
  1315. ISRCL = '#ISRCL#',
  1316. IS_NOTICE_PRODUCER = '#IS_NOTICE_PRODUCER#',
  1317. MAT_NO = '#MAT_NO#',
  1318. FOR_CHECK_NO = '#FOR_CHECK_NO#',
  1319. FLAG = '#FLAG#',
  1320. RATE = '#RATE#',
  1321. DESC_RATE = '#DESC_RATE#',
  1322. SSC_CONDITION = '#SSC_CONDITION#',
  1323. VALIDFLAG = '#VALIDFLAG#',
  1324. JG_SEND_NAME = '#JG_SEND_NAME#',
  1325. JG_SEND_TIME = '#JG_SEND_TIME#',
  1326. HEAD_MAT_NO = '#HEAD_MAT_NO#',
  1327. BAR_CODE = '#BAR_CODE#',
  1328. TS_SAMPLE_REMARK = '#TS_SAMPLE_REMARK#',
  1329. SPEC_FLAG = '#SPEC_FLAG#',
  1330. WHERE CHECK_NO = '#CHECK_NO#'
  1331. </query>
  1332. <query id = "FrmMilBatchSampleNew.insertBaseInfoDetial" desc= "新增Detial详细信息">
  1333. INSERT INTO PIPE_CHECKCONSIGN_DETAIL
  1334. (CHECK_NO,
  1335. SAMPLE_NO,
  1336. SAMPLE_NO_MIN,
  1337. BATCH_NO,
  1338. SAMPLE_BARCODE,
  1339. SAMPLE_LEN,
  1340. PHY_CODE_MAX,
  1341. PHY_NAME_MAX,
  1342. DEPT_ID,
  1343. SAMPLE_COUNT,
  1344. CHECK_STD,
  1345. LENGTH,
  1346. WIDTH,
  1347. EIC,
  1348. PHY_DIR,
  1349. SIZE_DESC,
  1350. ISRCL,
  1351. IS_NOTICE_PRODUCER,
  1352. MAT_NO,
  1353. FOR_CHECK_NO,
  1354. FLAG,
  1355. RATE,
  1356. DESC_RATE,
  1357. SSC_CONDITION,
  1358. VALIDFLAG,
  1359. JG_SEND_NAME,
  1360. JG_SEND_TIME,
  1361. HEAD_MAT_NO,
  1362. BAR_CODE,
  1363. TS_SAMPLE_REMARK,
  1364. SPEC_FLAG)
  1365. VALUES
  1366. ('#CHECK_NO#',
  1367. '#SAMPLE_NO#',
  1368. '#SAMPLE_NO_MIN#',
  1369. '#BATCH_NO#',
  1370. '#SAMPLE_BARCODE#',
  1371. '#SAMPLE_LEN#',
  1372. '#PHY_CODE_MAX#',
  1373. '#PHY_NAME_MAX#',
  1374. '#DEPT_ID#',
  1375. '#SAMPLE_COUNT#',
  1376. '#CHECK_STD#',
  1377. '#LENGTH#',
  1378. '#WIDTH#',
  1379. '#EIC#',
  1380. '#PHY_DIR#',
  1381. '#SIZE_DESC#',
  1382. '#ISRCL#',
  1383. '#IS_NOTICE_PRODUCER#',
  1384. '#MAT_NO#',
  1385. '#FOR_CHECK_NO#',
  1386. '#FLAG#',
  1387. '#RATE#',
  1388. '#DESC_RATE#',
  1389. '#SSC_CONDITION#',
  1390. '#VALIDFLAG#',
  1391. '#JG_SEND_NAME#',
  1392. TO_DATE('#JG_SEND_TIME#','YYYY-MM-DD HH24:MI:SS'),
  1393. '#HEAD_MAT_NO#',
  1394. '#BAR_CODE#',
  1395. '#TS_SAMPLE_REMARK#',
  1396. '#SPEC_FLAG#')
  1397. </query>
  1398. <query id = "FrmMilBatchSampleNew.insertBaseInfoQcmDetial" desc = "插入产销Detial">
  1399. DECLARE
  1400. P_RATE VARCHAR2(20);
  1401. BEGIN
  1402. --新增二层表
  1403. INSERT INTO QCM_ZC_CHECKCONSIGN_DETAIL
  1404. (CHECK_NO,
  1405. BATCH_NO,
  1406. SAMPLE_NO,
  1407. PHY_CODE_MAX,
  1408. PHY_NAME_MAX,
  1409. RATE,
  1410. DESC_RATE,
  1411. EIC,
  1412. SAMPLE_COUNT,
  1413. SAMPLE_LEN,
  1414. MAT_NO,
  1415. HEAD_MAT_NO,
  1416. BAR_CODE,
  1417. VALIDFLAG)
  1418. VALUES
  1419. ('#CHECK_NO#',
  1420. '#BATCH_NO#',
  1421. '#SAMPLE_NO#',
  1422. '#PHY_CODE_MAX#',
  1423. '#PHY_NAME_MAX#',
  1424. '#RATE#',
  1425. '#DESC_RATE#',
  1426. '#EIC#',
  1427. '#SAMPLE_COUNT#',
  1428. '#SAMPLE_LEN#',
  1429. '#MAT_NO#',
  1430. '#HEAD_MAT_NO#',
  1431. '#BAR_CODE#',
  1432. '#VALIDFLAG#');
  1433. --更新炉批结果表
  1434. SELECT T.RATE
  1435. INTO P_RATE
  1436. FROM QCM_ZC_CHECKCONSIGN_DETAIL T
  1437. WHERE T.CHECK_NO = '#CHECK_NO#'
  1438. AND T.BATCH_NO = '#BATCH_NO#'
  1439. AND T.PHY_CODE_MAX = '#PHY_CODE_MAX#'
  1440. AND ROWNUM = 1;
  1441. IF P_RATE = '408601' THEN
  1442. FOR V IN (SELECT D.JUDGE_STOVE_NO,
  1443. D.BATCH_NO,
  1444. D.PROCESS_CODE,
  1445. D.ORD_LN_DLY_PK,
  1446. D.CRAFT_SOURCE
  1447. FROM QCM_ZC_CHECKCONSIGN C, QCM_ZC_CHECKCONSIGN D
  1448. WHERE C.CHECK_NO = '#CHECK_NO#'
  1449. AND C.BATCH_NO = '#BATCH_NO#'
  1450. AND D.LOT_NO = C.LOT_NO
  1451. AND (C.LOT_NO_GROUP IS NULL OR
  1452. C.LOT_NO_GROUP = D.LOT_NO_GROUP)
  1453. AND D.PROCESS_CODE = C.PROCESS_CODE
  1454. AND D.ORD_LN_DLY_PK = C.ORD_LN_DLY_PK
  1455. GROUP BY D.JUDGE_STOVE_NO,
  1456. D.BATCH_NO,
  1457. D.PROCESS_CODE,
  1458. D.ORD_LN_DLY_PK,
  1459. D.CRAFT_SOURCE) LOOP
  1460. UPDATE QCM_BC_BATCH_RESULT A
  1461. SET A.JUDGE_RESULT_CODE = NULL
  1462. WHERE A.JUDGE_STOVE_NO = V.JUDGE_STOVE_NO
  1463. AND A.BATCH_NO = V.BATCH_NO
  1464. AND A.PROCESS_CODE = V.PROCESS_CODE
  1465. AND A.ORD_LN_DLY_PK = V.ORD_LN_DLY_PK
  1466. AND A.CRAFT_SOURCE = V.CRAFT_SOURCE;
  1467. END LOOP;
  1468. ELSIF P_RATE = '408603' THEN
  1469. FOR V IN (SELECT D.JUDGE_STOVE_NO,
  1470. D.BATCH_NO,
  1471. D.PROCESS_CODE,
  1472. D.ORD_LN_DLY_PK,
  1473. D.CRAFT_SOURCE
  1474. FROM QCM_ZC_CHECKCONSIGN C, QCM_ZC_CHECKCONSIGN D
  1475. WHERE C.CHECK_NO = '#CHECK_NO#'
  1476. AND C.BATCH_NO = '#BATCH_NO#'
  1477. AND D.JUDGE_STOVE_NO = C.JUDGE_STOVE_NO
  1478. AND D.PROCESS_CODE = C.PROCESS_CODE
  1479. AND D.ORD_LN_DLY_PK = C.ORD_LN_DLY_PK
  1480. GROUP BY D.JUDGE_STOVE_NO,
  1481. D.BATCH_NO,
  1482. D.PROCESS_CODE,
  1483. D.ORD_LN_DLY_PK,
  1484. D.CRAFT_SOURCE) LOOP
  1485. UPDATE QCM_BC_BATCH_RESULT A
  1486. SET A.JUDGE_RESULT_CODE = NULL
  1487. WHERE A.JUDGE_STOVE_NO = V.JUDGE_STOVE_NO
  1488. AND A.BATCH_NO = V.BATCH_NO
  1489. AND A.PROCESS_CODE = V.PROCESS_CODE
  1490. AND A.ORD_LN_DLY_PK = V.ORD_LN_DLY_PK
  1491. AND A.CRAFT_SOURCE = V.CRAFT_SOURCE;
  1492. END LOOP;
  1493. ELSE
  1494. FOR V IN (SELECT C.JUDGE_STOVE_NO,
  1495. C.BATCH_NO,
  1496. C.PROCESS_CODE,
  1497. C.ORD_LN_DLY_PK,
  1498. C.CRAFT_SOURCE
  1499. FROM QCM_ZC_CHECKCONSIGN C
  1500. WHERE C.CHECK_NO = '#CHECK_NO#'
  1501. AND C.BATCH_NO = '#BATCH_NO#'
  1502. GROUP BY C.JUDGE_STOVE_NO,
  1503. C.BATCH_NO,
  1504. C.PROCESS_CODE,
  1505. C.ORD_LN_DLY_PK,
  1506. C.CRAFT_SOURCE) LOOP
  1507. UPDATE QCM_BC_BATCH_RESULT A
  1508. SET A.JUDGE_RESULT_CODE = NULL
  1509. WHERE A.JUDGE_STOVE_NO = V.JUDGE_STOVE_NO
  1510. AND A.BATCH_NO = V.BATCH_NO
  1511. AND A.PROCESS_CODE = V.PROCESS_CODE
  1512. AND A.ORD_LN_DLY_PK = V.ORD_LN_DLY_PK
  1513. AND A.CRAFT_SOURCE = V.CRAFT_SOURCE;
  1514. END LOOP;
  1515. END IF;
  1516. END;
  1517. </query>
  1518. <query id = "FrmMilBatchSampleNew.insertBaseInfoChem" desc = "新增成分详细信息">
  1519. INSERT INTO PIPE_CHECKCONSIGN_CHEMDETAIL
  1520. (CHECK_NO,
  1521. SAMPLE_NO,
  1522. BATCH_NO,
  1523. CHEM_CODE,
  1524. CHEM_NAME,
  1525. ISCHECK,
  1526. ISJUDGE,
  1527. ISQUOTE,
  1528. STDMIN_SIGN,
  1529. STDMIN,
  1530. STDMAX_SIGN,
  1531. STDMAX,
  1532. STDTARGET)
  1533. VALUES
  1534. ('#CHECK_NO#',
  1535. '#SAMPLE_NO#',
  1536. '#BATCH_NO#',
  1537. '#CHEM_CODE#',
  1538. '#CHEM_NAME#',
  1539. '#ISCHECK#',
  1540. '#ISJUDGE#',
  1541. '#ISQUOTE#',
  1542. '#STDMIN_SIGN#',
  1543. '#STDMIN#',
  1544. '#STDMAX_SIGN#',
  1545. '#STDMAX#',
  1546. '#STDTARGET#')
  1547. </query>
  1548. <query id = "FrmMilBatchSampleNew.updateBaseInfoPhy" desc = "修改理化详细信息">
  1549. UPDATE PIPE_CHECKCONSIGN_PHYDETAIL
  1550. SET SAMPLE_NO = '#SAMPLE_NO#',
  1551. BATCH_NO = '#BATCH_NO#',
  1552. INDEX_SEQ = '#INDEX_SEQ#',
  1553. DEPT_ID = '#DEPT_ID#',
  1554. PHY_CODE_MAX = '#PHY_CODE_MAX#',
  1555. PHY_NAME_MAX = '#PHY_NAME_MAX#',
  1556. PHY_CODE_MIN = '#PHY_CODE_MIN#',
  1557. PHY_NAME_MIN = '#PHY_NAME_MIN#',
  1558. PHY_CODE = '#PHY_CODE#',
  1559. PHY_NAME = '#PHY_NAME#',
  1560. PHY_UNIT = '#PHY_UNIT#',
  1561. ITEM_CODE_F = '#ITEM_CODE_F#',
  1562. ITEM_NAME_F = '#ITEM_NAME_F#',
  1563. ITEM_CODE_W = '#ITEM_CODE_W#',
  1564. ITEM_NAME_W = '#ITEM_NAME_W#',
  1565. ITEM_CODE_S = '#ITEM_CODE_S#',
  1566. ITEM_NAME_S = '#ITEM_NAME_S#',
  1567. ISCHECK = '#ISCHECK#',
  1568. ISQUOTE = '#ISQUOTE#',
  1569. ISJUDGE = '#ISJUDGE#',
  1570. RESULT_COUNT = '#RESULT_COUNT#',
  1571. STDMIN_SIGN = '#STDMIN_SIGN#',
  1572. STDMIN = '#STDMIN#',
  1573. STDMAX_SIGN = '#STDMAX_SIGN#',
  1574. STDMAX = '#STDMAX#',
  1575. JUDGE_BASIS = '#JUDGE_BASIS#',
  1576. STDMEMO = '#STDMEMO#',
  1577. BILLET_SAMPLE = '#BILLET_SAMPLE#',
  1578. SEQ = '#SEQ#',
  1579. SPLINE_ITEM_CODE_S = '#SPLINE_ITEM_CODE_S#',
  1580. SPLINE_ITEM_NAME_S = '#SPLINE_ITEM_NAME_S#',
  1581. SPLINE_ITEM_CODE_F = '#SPLINE_ITEM_CODE_F#',
  1582. SPLINE_ITEM_NAME_F = '#SPLINE_ITEM_NAME_F#'
  1583. WHERE CHECK_NO = '#CHECK_NO#'
  1584. </query>
  1585. <query id = "FrmMilBatchSampleNew.insertBaseInfoPhy" desc = "新增理化详细信息">
  1586. INSERT INTO PIPE_CHECKCONSIGN_PHYDETAIL
  1587. (CHECK_NO,
  1588. SAMPLE_NO,
  1589. BATCH_NO,
  1590. INDEX_SEQ,
  1591. DEPT_ID,
  1592. PHY_CODE_MAX,
  1593. PHY_NAME_MAX,
  1594. PHY_CODE_MIN,
  1595. PHY_NAME_MIN,
  1596. PHY_CODE,
  1597. PHY_NAME,
  1598. PHY_UNIT,
  1599. ITEM_CODE_F,
  1600. ITEM_NAME_F,
  1601. ITEM_CODE_W,
  1602. ITEM_NAME_W,
  1603. ITEM_CODE_S,
  1604. ITEM_NAME_S,
  1605. ISCHECK,
  1606. ISQUOTE,
  1607. ISJUDGE,
  1608. RESULT_COUNT,
  1609. STDMIN_SIGN,
  1610. STDMIN,
  1611. STDMAX_SIGN,
  1612. STDMAX,
  1613. JUDGE_BASIS,
  1614. STDMEMO,
  1615. BILLET_SAMPLE,
  1616. SEQ,
  1617. SPLINE_ITEM_CODE_S,
  1618. SPLINE_ITEM_NAME_S,
  1619. SPLINE_ITEM_CODE_F,
  1620. SPLINE_ITEM_NAME_F)
  1621. VALUES
  1622. ('#CHECK_NO#',
  1623. '#SAMPLE_NO#',
  1624. '#BATCH_NO#',
  1625. '#INDEX_SEQ#',
  1626. '#DEPT_ID#',
  1627. '#PHY_CODE_MAX#',
  1628. '#PHY_NAME_MAX#',
  1629. '#PHY_CODE_MIN#',
  1630. '#PHY_NAME_MIN#',
  1631. '#PHY_CODE#',
  1632. '#PHY_NAME#',
  1633. '#PHY_UNIT#',
  1634. '#ITEM_CODE_F#',
  1635. '#ITEM_NAME_F#',
  1636. '#ITEM_CODE_W#',
  1637. '#ITEM_NAME_W#',
  1638. '#ITEM_CODE_S#',
  1639. '#ITEM_NAME_S#',
  1640. '#ISCHECK#',
  1641. '#ISQUOTE#',
  1642. '#ISJUDGE#',
  1643. '#RESULT_COUNT#',
  1644. '#STDMIN_SIGN#',
  1645. '#STDMIN#',
  1646. '#STDMAX_SIGN#',
  1647. '#STDMAX#',
  1648. '#JUDGE_BASIS#',
  1649. '#STDMEMO#',
  1650. '#BILLET_SAMPLE#',
  1651. '#SEQ#',
  1652. '#SPLINE_ITEM_CODE_S#',
  1653. '#SPLINE_ITEM_NAME_S#',
  1654. '#SPLINE_ITEM_CODE_F#',
  1655. '#SPLINE_ITEM_NAME_F#')
  1656. </query>
  1657. <query id = "FrmMilBatchSampleNew.addSscdParm" desc = "新增SSC-D实验参数表">
  1658. INSERT INTO PIPE_CHECKCONSIGN_SSCD_PARM
  1659. (REULST_NO,
  1660. CHECK_NO,
  1661. SAMPLE_NO,
  1662. PHY_CODE_MAX,
  1663. SEQ,
  1664. HRC1,
  1665. HRC2,
  1666. HRC3,
  1667. SAMPLE_LENGTH,
  1668. SAMPLE_THICKNESS,
  1669. ABDOMINAL_WALL_THICKNESS,
  1670. EDGE_PITCH,
  1671. INITIAL_CRACK_LENGTH,
  1672. SAMPLE_WIDTH,
  1673. WIDTH_AFTER_LOAD,
  1674. CRACK_LENGTH_AFTER_TEST1,
  1675. CRACK_LENGTH_AFTER_TEST2,
  1676. CRACK_LENGTH_AFTER_TEST3,
  1677. INTEGER1,
  1678. KISCC,
  1679. KISCC_AVG,
  1680. CREATE_TIME,
  1681. CRACK_LENGTH,
  1682. HRC_AV,
  1683. CRACK_LENGTH_AFTER_TEST4,
  1684. CRACK_LENGTH_AFTER_TEST5)
  1685. VALUES
  1686. ('#REULST_NO#',
  1687. '#CHECK_NO#',
  1688. '#SAMPLE_NO#',
  1689. '#PHY_CODE_MAX#',
  1690. '#SEQ#',
  1691. '#HRC1#',
  1692. '#HRC2#',
  1693. '#HRC3#',
  1694. '#SAMPLE_LENGTH#',
  1695. '#SAMPLE_THICKNESS#',
  1696. '#ABDOMINAL_WALL_THICKNESS#',
  1697. '#EDGE_PITCH#',
  1698. '#INITIAL_CRACK_LENGTH#',
  1699. '#SAMPLE_WIDTH#',
  1700. '#WIDTH_AFTER_LOAD#',
  1701. '#CRACK_LENGTH_AFTER_TEST1#',
  1702. '#CRACK_LENGTH_AFTER_TEST2#',
  1703. '#CRACK_LENGTH_AFTER_TEST3#',
  1704. '#INTEGER1#',
  1705. '#KISCC#',
  1706. '#KISCC_AVG#',
  1707. '#CREATE_TIME#',
  1708. '#CRACK_LENGTH#',
  1709. '#HRC_AV#',
  1710. '#CRACK_LENGTH_AFTER_TEST4#',
  1711. '#CRACK_LENGTH_AFTER_TEST5#')
  1712. </query>
  1713. <query id = "FrmMilBatchSampleNew.updateMilPlanIsBatch1" desc = "修改炉计划标识">
  1714. UPDATE MIL_PLAN T SET T.IS_BATCH = '#IS_BATCH#',T.CHECK_NO = '#CHECK_NO#' WHERE T.LOT_NO = '#LOT_NO#'
  1715. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1716. AND T.ID = '#ID#'
  1717. </query>
  1718. <query id = "FrmMilBatchSampleNew.updateMilPlanIsBatch" desc = "修改炉计划标识">
  1719. UPDATE MIL_PLAN T SET T.IS_BATCH = '#IS_BATCH#',T.CHECK_NO = '' WHERE T.LOT_NO = '#LOT_NO#'
  1720. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1721. AND T.CHECK_NO = '#CHECK_NO#'
  1722. </query>
  1723. <query id = "FrmMilBatchSampleNew.doQueryDetialSampleNo" desc = "查询检验委托试样组信息">
  1724. SELECT S.*
  1725. FROM PIPE_CHECKCONSIGN_BASEINFO T, PIPE_CHECKCONSIGN_DETAIL S
  1726. WHERE T.CHECK_NO = S.CHECK_NO
  1727. AND S.CHECK_NO = ?
  1728. AND T.CHECK_COUNT = ?
  1729. AND T.PROCESS_CODE = ?
  1730. ORDER BY S.BATCH_NO,S.SAMPLE_NO
  1731. </query>
  1732. <query id = "FrmMilBatchSampleNew.selectBaseInfoFlag" desc = "查询委托基础表标识">
  1733. <![CDATA[
  1734. SELECT COUNT(1)ACOUNT FROM PIPE_CHECKCONSIGN_DETAIL T WHERE T.CHECK_NO = '#CHECK_NO#' AND T.FLAG > '0'
  1735. AND T.PHY_CODE_MAX <>'ONH'
  1736. ]]>
  1737. </query>
  1738. <query id = "FrmMilBatchSampleNew.selectReBaseInfoFlag" desc = "查询复取样委托基础表标识">
  1739. SELECT T.FLAG FROM PIPE_CHECKCONSIGN_BASEINFO T WHERE T.CHECK_NO = '#NEW_CHECK_NO#' AND T.VALIDFLAG = '1'
  1740. </query>
  1741. <query id = "FrmMilBatchSampleNew.deleteBaseInfo" desc = "撤销委托">
  1742. DECLARE
  1743. BEGIN
  1744. DELETE FROM PIPE_CHECKCONSIGN_DETAIL T WHERE T.CHECK_NO = '#CHECK_NO#';
  1745. DELETE FROM PIPE_CHECKCONSIGN_CHEMDETAIL T
  1746. WHERE T.CHECK_NO = '#CHECK_NO#';
  1747. DELETE FROM PIPE_CHECKCONSIGN_PHYDETAIL T
  1748. WHERE T.CHECK_NO = '#CHECK_NO#';
  1749. DELETE FROM PIPE_CHECKCONSIGN_BASEINFO T
  1750. WHERE T.CHECK_NO = '#CHECK_NO#';
  1751. END;
  1752. </query>
  1753. <query id = "FrmMilBatchSampleNew.doQueryRepeateInformation" desc = "查询复取样详细信息">
  1754. SELECT T.CHECK_NO,
  1755. T.PHY_CODE_MAX,
  1756. T.PHY_NAME_MAX,
  1757. T.LOT_NO,
  1758. T.JUDGE_STOVE_NO,
  1759. T.BATCH_NO,
  1760. DECODE(T.IS_ORIGINAL, '0', '否', '1', '是')IS_ORIGINAL,
  1761. T.SAMPLE_COUNT,
  1762. T.ITEM_CODE_F,
  1763. T.ITEM_NAME_F,
  1764. T.ITEM_CODE_W,
  1765. T.ITEM_NAME_W,
  1766. T.ITEM_CODE_S,
  1767. T.ITEM_NAME_S
  1768. FROM PIPE_CHECKCONSIGN_NOQUALIFIED T
  1769. WHERE T.CHECK_NO = ?
  1770. AND T.JUDGE_STOVE_NO = ?
  1771. GROUP BY T.CHECK_NO,
  1772. T.PHY_CODE_MAX,
  1773. T.PHY_NAME_MAX,
  1774. T.LOT_NO,
  1775. T.JUDGE_STOVE_NO,
  1776. T.BATCH_NO,
  1777. T.IS_ORIGINAL,
  1778. T.SAMPLE_COUNT,
  1779. T.ITEM_CODE_F,
  1780. T.ITEM_NAME_F,
  1781. T.ITEM_CODE_W,
  1782. T.ITEM_NAME_W,
  1783. T.ITEM_CODE_S,
  1784. T.ITEM_NAME_S
  1785. </query>
  1786. <query id = "FrmMilBatchSampleNew.SelectRepeateFrimFlag" desc = "查询不合信息标识">
  1787. SELECT T.IS_SAMPLE FROM PIPE_CHECKCONSIGN_NOQUALIFIED T WHERE T.CHECK_NO = '#CHECK_NO#' AND ROWNUM = 1
  1788. </query>
  1789. <query id = "FrmMilBatchSampleNew.SelectNoQualified" desc = "查询不合试样组">
  1790. SELECT T.CHECK_NO,
  1791. T.SAMPLE_NO,
  1792. T.JUDGE_STOVE_NO,
  1793. T.BATCH_NO
  1794. FROM PIPE_CHECKCONSIGN_NOQUALIFIED T
  1795. WHERE T.CHECK_NO = ?
  1796. GROUP BY T.CHECK_NO,
  1797. T.SAMPLE_NO,
  1798. T.JUDGE_STOVE_NO,
  1799. T.BATCH_NO
  1800. ORDER BY T.SAMPLE_NO ASC
  1801. </query>
  1802. <query id = "FrmMilBatchSampleNew.insertBaseInfoSql" desc = "插入委托基础表">
  1803. DECLARE
  1804. BEGIN
  1805. FOR MYROW IN (SELECT *
  1806. FROM PIPE_CHECKCONSIGN_BASEINFO T
  1807. WHERE T.CHECK_NO = '#CHECK_NO#') LOOP
  1808. INSERT INTO PIPE_CHECKCONSIGN_BASEINFO
  1809. (CHECK_NO,
  1810. LOT_NO,
  1811. STOVE_NO,
  1812. HEAT_NO,
  1813. STEEL_GRADE,
  1814. STEEL_NO,
  1815. PRODUCT_NAME,
  1816. PRODUCT_STD,
  1817. CRAFT_FILE_NO,
  1818. CONTRACT_NO,
  1819. CHECK_COUNT,
  1820. PLINE_CODE,
  1821. DIMATER,
  1822. HEIGHT,
  1823. BUCKLE_TYPE,
  1824. PROCESS_STATUS,
  1825. CONSIGN_DEPT,
  1826. CONSIGN_NAME,
  1827. CONSIGN_TIME,
  1828. ISPRODUCER,
  1829. SPEC_REQ,
  1830. GET_NAME,
  1831. GET_TIME,
  1832. CONSIGNDEPT_SEND_NAME,
  1833. CONSIGNDEPT_SEND_TIME,
  1834. JG_RECEIVE_NAME,
  1835. JG_RECEIVE_TIME,
  1836. IS_RUSH,
  1837. RUSH_NAME,
  1838. RUSH_TIME,
  1839. FLAG,
  1840. SAMPLE_REMARK,
  1841. REMARK,
  1842. DATA_TYPE,
  1843. VALIDFLAG,
  1844. CRAFT_PATH,
  1845. PRODUCER_DEPT,
  1846. FINAL_USER_DESC,
  1847. STD_STYLE_DESC,
  1848. CAILI_PATH,
  1849. FUSHI_PATH,
  1850. JINWU_PATH,
  1851. GONGCHENG_PATH,
  1852. DIBEI_PATH,
  1853. HUAXUE_PATH,
  1854. PROCESS_CODE,
  1855. MERGER_NO,
  1856. CRAFT_SOURCE,
  1857. JG_PRINT_COUNT,
  1858. JG_PRINT_NAME,
  1859. JG_PRINT_TIME,
  1860. INDEX_SEQ,
  1861. PIC,
  1862. CIC,
  1863. LOT_NO_GROUP,
  1864. CAILI_PATH_FUJIAN,
  1865. JINWU_PATH_FUJIAN,
  1866. HEAT_PLAN_NO,
  1867. BATCH_NO,
  1868. SUPPLY_UNIT_CODE,
  1869. SUPPLY_UNIT)
  1870. VALUES
  1871. ('#NEW_CHECK_NO#',
  1872. MYROW.LOT_NO,
  1873. MYROW.STOVE_NO,
  1874. MYROW.HEAT_NO,
  1875. MYROW.STEEL_GRADE,
  1876. MYROW.STEEL_NO,
  1877. MYROW.PRODUCT_NAME,
  1878. MYROW.PRODUCT_STD,
  1879. MYROW.CRAFT_FILE_NO,
  1880. MYROW.CONTRACT_NO,
  1881. '#CHECK_COUNT#',
  1882. MYROW.PLINE_CODE,
  1883. MYROW.DIMATER,
  1884. MYROW.HEIGHT,
  1885. MYROW.BUCKLE_TYPE,
  1886. MYROW.PROCESS_STATUS,
  1887. '#CONSIGN_DEPT#',
  1888. '#CONSIGN_NAME#',
  1889. SYSDATE,
  1890. MYROW.ISPRODUCER,
  1891. MYROW.SPEC_REQ,
  1892. MYROW.GET_NAME,
  1893. SYSDATE,
  1894. '#CONSIGN_NAME#',
  1895. SYSDATE,
  1896. '',
  1897. '',
  1898. MYROW.IS_RUSH,
  1899. MYROW.RUSH_NAME,
  1900. MYROW.RUSH_TIME,
  1901. '#FLAG#',
  1902. MYROW.SAMPLE_REMARK,
  1903. MYROW.REMARK || '#REMARK#',
  1904. MYROW.DATA_TYPE,
  1905. MYROW.VALIDFLAG,
  1906. MYROW.CRAFT_PATH,
  1907. MYROW.PRODUCER_DEPT,
  1908. MYROW.FINAL_USER_DESC,
  1909. MYROW.STD_STYLE_DESC,
  1910. '',
  1911. '',
  1912. '',
  1913. '',
  1914. '',
  1915. '',
  1916. MYROW.PROCESS_CODE,
  1917. '',
  1918. MYROW.CRAFT_SOURCE,
  1919. '',
  1920. '',
  1921. '',
  1922. MYROW.INDEX_SEQ,
  1923. MYROW.PIC,
  1924. MYROW.CIC,
  1925. MYROW.LOT_NO_GROUP,
  1926. '',
  1927. '',
  1928. MYROW.HEAT_PLAN_NO,
  1929. MYROW.BATCH_NO,
  1930. MYROW.SUPPLY_UNIT_CODE,
  1931. MYROW.SUPPLY_UNIT);
  1932. END LOOP;
  1933. UPDATE PIPE_CHECKCONSIGN_NOQUALIFIED T
  1934. SET T.IS_SAMPLE = '3'
  1935. WHERE T.CHECK_NO = '#CHECK_NO#';
  1936. END;
  1937. </query>
  1938. <query id = "FrmMilBatchSampleNew.updateBaseInfoSql" desc = "根据实验编号修改委托基础表">
  1939. UPDATE PIPE_CHECKCONSIGN_BASEINFO
  1940. SET
  1941. LOT_NO = '#LOT_NO#',
  1942. STOVE_NO = '#STOVE_NO#',
  1943. HEAT_NO = '#HEAT_NO#',
  1944. STEEL_GRADE = '#STEEL_GRADE#',
  1945. STEEL_NO = '#STEEL_NO#',
  1946. PRODUCT_NAME = '#PRODUCT_NAME#',
  1947. PRODUCT_STD = '#PRODUCT_STD#',
  1948. CRAFT_FILE_NO = '#CRAFT_FILE_NO#',
  1949. CONTRACT_NO = '#CONTRACT_NO#',
  1950. CHECK_COUNT = '#CHECK_COUNT#',
  1951. PLINE_CODE = '#PLINE_CODE#',
  1952. DIMATER = '#DIMATER#',
  1953. HEIGHT = '#HEIGHT#',
  1954. BUCKLE_TYPE = '#BUCKLE_TYPE#',
  1955. PROCESS_STATUS = '#PROCESS_STATUS#',
  1956. CONSIGN_DEPT = '#CONSIGN_DEPT#',
  1957. CONSIGN_NAME = '#CONSIGN_NAME#',
  1958. ISPRODUCER = '#ISPRODUCER#',
  1959. SPEC_REQ = '#SPEC_REQ#',
  1960. GET_NAME = '#GET_NAME#',
  1961. GET_TIME = '#GET_TIME#',
  1962. CONSIGNDEPT_SEND_NAME = '#CONSIGNDEPT_SEND_NAME#',
  1963. JG_RECEIVE_NAME = '#JG_RECEIVE_NAME#',
  1964. IS_RUSH = '#IS_RUSH#',
  1965. RUSH_NAME = '#RUSH_NAME#',
  1966. FLAG = '#FLAG#',
  1967. SAMPLE_REMARK = '#SAMPLE_REMARK#',
  1968. REMARK = '#REMARK#',
  1969. DATA_TYPE = '#DATA_TYPE#',
  1970. VALIDFLAG = '#VALIDFLAG#',
  1971. CRAFT_PATH = '#CRAFT_PATH#',
  1972. PRODUCER_DEPT = '#PRODUCER_DEPT#',
  1973. FINAL_USER_DESC = '#FINAL_USER_DESC#',
  1974. STD_STYLE_DESC = '#STD_STYLE_DESC#',
  1975. CAILI_PATH = '#CAILI_PATH#',
  1976. FUSHI_PATH = '#FUSHI_PATH#',
  1977. JINWU_PATH = '#JINWU_PATH#',
  1978. GONGCHENG_PATH = '#GONGCHENG_PATH#',
  1979. DIBEI_PATH = '#DIBEI_PATH#',
  1980. HUAXUE_PATH = '#HUAXUE_PATH#',
  1981. PROCESS_CODE = '#PROCESS_CODE#',
  1982. MERGER_NO = '#MERGER_NO#',
  1983. CRAFT_SOURCE = '#CRAFT_SOURCE#',
  1984. JG_PRINT_COUNT = '#JG_PRINT_COUNT#',
  1985. JG_PRINT_NAME = '#JG_PRINT_NAME#',
  1986. INDEX_SEQ = '#INDEX_SEQ#',
  1987. PIC = '#PIC#',
  1988. CIC = '#CIC#',
  1989. LOT_NO_GROUP = '#LOT_NO_GROUP#',
  1990. CAILI_PATH_FUJIAN = '#CAILI_PATH_FUJIAN#',
  1991. JINWU_PATH_FUJIAN = '#JINWU_PATH_FUJIAN#',
  1992. HEAT_PLAN_NO = '#HEAT_PLAN_NO#',
  1993. BATCH_NO = '#BATCH_NO#',
  1994. SUPPLY_UNIT_CODE = '#SUPPLY_UNIT_CODE#',
  1995. SUPPLY_UNIT = '#SUPPLY_UNIT#'
  1996. WHERE CHECK_NO = '#CHECK_NO#'
  1997. </query>
  1998. <query id = "FrmMilBatchSampleNew.SelectCheckDetial" desc = "查询不合试样组">
  1999. SELECT T.CHECK_NO,
  2000. T.SAMPLE_NO,
  2001. T.JUDGE_STOVE_NO,
  2002. T.BATCH_NO,
  2003. T.PHY_CODE_MAX,
  2004. T.PHY_NAME_MAX,
  2005. S.MAT_NO
  2006. FROM PIPE_CHECKCONSIGN_NOQUALIFIED T, PIPE_CHECKCONSIGN_DETAIL S
  2007. WHERE T.CHECK_NO = S.CHECK_NO
  2008. AND T.SAMPLE_NO = S.SAMPLE_NO
  2009. AND T.CHECK_NO = ?
  2010. AND T.SAMPLE_NO = ?
  2011. GROUP BY T.CHECK_NO,
  2012. T.SAMPLE_NO,
  2013. T.JUDGE_STOVE_NO,
  2014. T.BATCH_NO,
  2015. T.PHY_CODE_MAX,
  2016. T.PHY_NAME_MAX,
  2017. S.MAT_NO
  2018. </query>
  2019. <query id = "FrmMilBatchSampleNew.insertChemSql" desc = "写化学具体检验项">
  2020. INSERT INTO PIPE_CHECKCONSIGN_CHEMDETAIL
  2021. SELECT '#NEW_CHECK_NO#',
  2022. '#NEW_SAMPLE_NO#',
  2023. CHEM_CODE,
  2024. CHEM_NAME,
  2025. CHEM_TYPE,
  2026. ISCHECK,
  2027. ISJUDGE,
  2028. ISQUOTE,
  2029. COMPLEX_TYPE,
  2030. CHEM_FORMULA,
  2031. STDMIN_SIGN,
  2032. STDMIN,
  2033. STDMAX_SIGN,
  2034. STDMAX,
  2035. STDTARGET,
  2036. STDMEMO,
  2037. ELE_CODE,
  2038. ELE_NAME,
  2039. ELE_MIN_SIGN,
  2040. ELE_MIN,
  2041. ELE_MAX_SIGN,
  2042. ELE_MAX,
  2043. REP_CODE,
  2044. REP_NAME,
  2045. REP_MIN_SIGN,
  2046. REP_MIN,
  2047. REP_MAX_SIGN,
  2048. REP_MAX,
  2049. REP_VAL,
  2050. SELECT_STEEL_NO,
  2051. '#STD_STEEL_STD_VALUE#',
  2052. '#STD_STEEL_PROCESS_VALUE#',
  2053. '#ROUND_VALUE#',
  2054. '#PROCESS_VALUE#',
  2055. '#AUDIT_VALUE#',
  2056. '#QUOTE_VALUE#',
  2057. REMARK,
  2058. '',
  2059. '',
  2060. '',
  2061. '',
  2062. '',
  2063. '',
  2064. '#IS_CJ#',
  2065. BATCH_NO
  2066. FROM PIPE_CHECKCONSIGN_CHEMDETAIL T
  2067. WHERE T.CHECK_NO = '#CHECK_NO#'
  2068. AND T.SAMPLE_NO = '#SAMPLE_NO#'
  2069. AND T.CHEM_CODE = '#CHEM_CODE#'
  2070. </query>
  2071. <query id = "FrmMilBatchSampleNew.insertPhySql" desc = "插入理化具体检验项">
  2072. INSERT INTO PIPE_CHECKCONSIGN_PHYDETAIL
  2073. SELECT SYS_GUID(),
  2074. '#NEW_CHECK_NO#',
  2075. BATCH_NO,
  2076. '#NEW_SAMPLE_NO#',
  2077. INDEX_SEQ,
  2078. DEPT_ID,
  2079. PHY_CODE_MAX,
  2080. PHY_NAME_MAX,
  2081. PHY_CODE_MIN,
  2082. PHY_NAME_MIN,
  2083. PHY_CODE,
  2084. PHY_NAME,
  2085. PHY_UNIT,
  2086. ITEM_CODE_F,
  2087. ITEM_NAME_F,
  2088. ITEM_CODE_W,
  2089. ITEM_NAME_W,
  2090. ITEM_CODE_S,
  2091. ITEM_NAME_S,
  2092. GROUP_SEQ,
  2093. RESULT_COUNT,
  2094. ISCHECK,
  2095. ISJUDGE,
  2096. ISQUOTE,
  2097. PHY_TYPE,
  2098. PHY_FORMULA,
  2099. STDMIN_SIGN,
  2100. STDMIN,
  2101. STDMAX_SIGN,
  2102. STDMAX,
  2103. JUDGE_BASIS,
  2104. STDMIN_SIGN2,
  2105. STDMIN2,
  2106. STDMAX_SIGN2,
  2107. STDMAX2,
  2108. STD_CHOOSE,
  2109. STDMEMO,
  2110. ADDCONDITION,
  2111. ADDSTDCON_CODE,
  2112. ADDSTD_MIN_SIGN,
  2113. ADDSTD_MIN,
  2114. ADDSTD_MAX_SIGN,
  2115. ADDSTD_MAX,
  2116. ADDPERCENT,
  2117. BILLET_SAMPLE,
  2118. REMARK,
  2119. '#VALUE1#',
  2120. '#VALUE2#',
  2121. '#VALUE3#',
  2122. '#VALUE4#',
  2123. '#VALUE5#',
  2124. '#VALUE6#',
  2125. '#VALUE7#',
  2126. '#VALUE8#',
  2127. '#VALUE9#',
  2128. '#VALUE10#',
  2129. '#VALUE11#',
  2130. '#VALUE12#',
  2131. '#VALUE13#',
  2132. '#VALUE14#',
  2133. '#VALUE15#',
  2134. '#AVERAGE_VALUE#',
  2135. '#IS_GOOD#',
  2136. '#IS_DEFECT#'
  2137. FROM PIPE_CHECKCONSIGN_PHYDETAIL T
  2138. WHERE T.CHECK_NO = '#CHECK_NO#'
  2139. AND T.SAMPLE_NO = '#SAMPLE_NO#'
  2140. AND T.PHY_CODE_MAX = '#PHY_CODE_MAX#'
  2141. </query>
  2142. <query id = "FrmMilBatchSampleNew.insertCheckDetial" desc = "新增复取样试样组信息">
  2143. INSERT INTO PIPE_CHECKCONSIGN_DETAIL
  2144. SELECT
  2145. '#NEW_CHECK_NO#',
  2146. T.BATCH_NO,
  2147. '#NEW_SAMPLE_NO#',
  2148. T.SAMPLE_NO_MIN,
  2149. T.SAMPLE_BARCODE,
  2150. T.SAMPLE_LEN,
  2151. T.CHECK_STD,
  2152. T.PHY_CODE_MAX,
  2153. T.PHY_NAME_MAX,
  2154. T.SAMPLE_COUNT,
  2155. T.DEPT_ID,
  2156. T.LENGTH,
  2157. T.WIDTH,
  2158. T.EIC,
  2159. T.PHY_DIR,
  2160. T.SIZE_DESC,
  2161. '',
  2162. '',
  2163. '',
  2164. '',
  2165. '',
  2166. '',
  2167. '',
  2168. '',
  2169. '',
  2170. '',
  2171. '',
  2172. '',
  2173. '',
  2174. T.ISRCL,
  2175. T.RCL_MOVE_REMARK,
  2176. T.IS_NOTICE_PRODUCER,
  2177. T.NOTICE_PRODUCER_REMARK,
  2178. T.IS_RESAMPLE_REST,
  2179. T.RESAMPLE_REST_REMARK,
  2180. '#SPEC_FLAG#',
  2181. T.SPEC_MOVE_REMARK,
  2182. '#FLAG#',
  2183. T.SAMPLE_REMARK,
  2184. '#REMARK#',
  2185. '',
  2186. '',
  2187. '#MAT_NO#',
  2188. ''
  2189. FROM PIPE_CHECKCONSIGN_DETAIL T
  2190. WHERE T.CHECK_NO = '#CHECK_NO#'
  2191. AND T.SAMPLE_NO = '#SAMPLE_NO#'
  2192. AND T.PHY_CODE_MAX = '#PHY_CODE_MAX#'
  2193. </query>
  2194. <query id = "FrmMilBatchSampleNew.updateMatBcIsSample" desc = "重新标记样管">
  2195. DECLARE
  2196. V_MAT_NO MAT_BC_M.ZG_MAT_NO%TYPE := NULL;
  2197. BEGIN
  2198. UPDATE MAT_BC_M T
  2199. SET T.QCM_STAUS = '22',
  2200. T.JUDGE_RESULT_CODE = '40740705',
  2201. T.JUDGE_RESULT = '废品',
  2202. T.JUDGE_MAKER = 'SYSTEM'
  2203. WHERE T.ZG_MAT_NO = '#MAT_NO#'
  2204. AND T.BATCH_NO = '#BATCH_NO#'
  2205. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#';
  2206. UPDATE PORT_MIL_BATCH_SAMPLE_RESULT T
  2207. SET T.STATUS = '2'
  2208. WHERE T.MAT_NO = '#MAT_NO#'
  2209. AND T.STATUS = '0';
  2210. SELECT MAT_NO
  2211. INTO V_MAT_NO
  2212. FROM (SELECT T.MAT_NO
  2213. FROM PORT_MIL_BATCH_SAMPLE_RESULT T
  2214. WHERE REGEXP_REPLACE(T.JUDGE_STOVE_NO, '-.*', '') = '#JUDGE_STOVE_NO#'
  2215. AND T.BATCH_NO = '#BATCH_NO#'
  2216. AND T.STATUS = '0'
  2217. AND T.IS_SAMPLE_PIPE = '0'
  2218. ORDER BY T.MAT_NO ASC)
  2219. WHERE ROWNUM = 1;
  2220. UPDATE PORT_MIL_BATCH_SAMPLE_RESULT T
  2221. SET T.IS_SAMPLE_PIPE = '1'
  2222. WHERE T.MAT_NO = V_MAT_NO;
  2223. UPDATE MAT_BC_M T SET T.SAMPLE_FLAG = '1' WHERE T.ZG_MAT_NO = V_MAT_NO;
  2224. END;
  2225. </query>
  2226. <query id = "FrmMilBatchSampleNew.SelectNewSample" desc = "查询出的新样管">
  2227. SELECT * FROM (SELECT T.MAT_NO
  2228. FROM PORT_MIL_BATCH_SAMPLE_RESULT T
  2229. WHERE REGEXP_REPLACE(T.JUDGE_STOVE_NO, '-.*', '') = '#JUDGE_STOVE_NO#'
  2230. AND T.BATCH_NO = '#BATCH_NO#'
  2231. AND T.STATUS = '0'
  2232. AND T.IS_SAMPLE_PIPE = '0'
  2233. ORDER BY T.MAT_NO ASC)
  2234. WHERE ROWNUM = 1
  2235. </query>
  2236. <query id = "FrmMilBatchSampleNew.deletePipeSql" desc = "删除检化验数据">
  2237. DECLARE
  2238. BEGIN
  2239. DELETE FROM PIPE_CHECKCONSIGN_BASEINFO T WHERE T.CHECK_NO = '#NEW_CHECK_NO#';
  2240. DELETE FROM PIPE_CHECKCONSIGN_DETAIL T WHERE T.CHECK_NO = '#NEW_CHECK_NO#';
  2241. DELETE FROM PIPE_CHECKCONSIGN_CHEMDETAIL T
  2242. WHERE T.CHECK_NO = '#NEW_CHECK_NO#';
  2243. DELETE FROM PIPE_CHECKCONSIGN_PHYDETAIL T
  2244. WHERE T.CHECK_NO = '#NEW_CHECK_NO#';
  2245. UPDATE PIPE_CHECKCONSIGN_NOQUALIFIED T
  2246. SET T.IS_SAMPLE = '#IS_SAMPLE#'
  2247. WHERE T.CHECK_NO = '#CHECK_NO#';
  2248. END;
  2249. </query>
  2250. <query id = "FrmMilBatchSampleNew.SelectMatNo" desc = "查询复样管号">
  2251. SELECT T.CHECK_NO, T.MAT_NO
  2252. FROM PIPE_CHECKCONSIGN_DETAIL T
  2253. WHERE T.CHECK_NO = '#CHECK_NO#'
  2254. GROUP BY T.CHECK_NO, T.MAT_NO
  2255. </query>
  2256. <query id = "FrmMilBatchSampleNew.updatePortSql" desc = "删除新样管">
  2257. DECLARE
  2258. BEGIN
  2259. UPDATE PORT_MIL_BATCH_SAMPLE_RESULT T
  2260. SET T.IS_SAMPLE_PIPE = '0'
  2261. WHERE T.MAT_NO = '#MAT_NO#'
  2262. AND T.STATUS = '0';
  2263. UPDATE MAT_BC_M T
  2264. SET T.QCM_STAUS = '00',
  2265. T.JUDGE_RESULT_CODE = '',
  2266. T.JUDGE_RESULT = '',
  2267. T.JUDGE_MAKER = ''
  2268. WHERE T.ZG_MAT_NO = '#MAT_NO#';
  2269. END;
  2270. </query>
  2271. <query id = "FrmMilBatchSampleNew.updatePortOldSql" desc = "恢复旧样管">
  2272. DECLARE
  2273. BEGIN
  2274. UPDATE PORT_MIL_BATCH_SAMPLE_RESULT T
  2275. SET T.STATUS = '0'
  2276. WHERE T.MAT_NO = '#MAT_NO#'
  2277. AND T.STATUS = '2'
  2278. AND T.IS_SAMPLE_PIPE = '1';
  2279. UPDATE MAT_BC_M T
  2280. SET T.QCM_STAUS = '00',
  2281. T.JUDGE_RESULT_CODE = '',
  2282. T.JUDGE_RESULT = '',
  2283. T.JUDGE_MAKER = ''
  2284. WHERE T.ZG_MAT_NO = '#MAT_NO#';
  2285. END;
  2286. </query>
  2287. <query id = "FrmMilBatchSampleNew.SelectNoQualtfied" desc = "查询所有不合化学元素">
  2288. SELECT *
  2289. FROM PIPE_CHECKCONSIGN_NOQUALIFIED T
  2290. WHERE T.CHECK_NO = ?
  2291. AND T.SAMPLE_NO = ?
  2292. AND T.PHY_CODE_MAX = ?
  2293. AND (T.JF_QUALIFIED = '0' OR T.NK_QUALIFIED = '0')
  2294. </query>
  2295. <query id = "FrmMilBatchSampleNew.insertQcmZcConsing" desc = "写产销检验记录">
  2296. INSERT INTO QCM_ZC_CHECKCONSIGN(
  2297. CHECK_NO,
  2298. LOT_NO,
  2299. JUDGE_STOVE_NO,
  2300. BATCH_NO,
  2301. STOVE_NO,
  2302. PROCESS_CODE,
  2303. PLINE_CODE,
  2304. PLINE_NAME,
  2305. MATERIAL_NO,
  2306. MATERIAL_NAME,
  2307. PRODUCCODE,
  2308. PRODUCNAME,
  2309. STEELCODE,
  2310. STEELNAME,
  2311. GRADECODE,
  2312. GRADENAME,
  2313. SPEC_CODE,
  2314. SPEC_NAME,
  2315. MODEL_CODE,
  2316. MODEL_DESC,
  2317. STD_CODE,
  2318. STD_NAME,
  2319. STD_STYLE,
  2320. STD_STYLE_DESC,
  2321. ACT_DIMATER,
  2322. ACT_HEIGHT,
  2323. ACT_LEN_MIN,
  2324. ACT_LEN_MAX,
  2325. PRO_ORDER_ID,
  2326. GX_PLAN_NO,
  2327. ORD_LN_DLY_PK,
  2328. CRAF_NO,
  2329. CRAFT_SEQ,
  2330. INDEX_SEQ,
  2331. STEEL_STANDRAD,
  2332. CIC,
  2333. PIC,
  2334. BAL_YEAR_MONTH,
  2335. CONSIGN_NAME,
  2336. CONSIGN_TIME,
  2337. CONSIGN_MEMO,
  2338. TARGET,
  2339. CRAFT_SOURCE,
  2340. LOT_NO_GROUP)
  2341. VALUES(
  2342. '#CHECK_NO#',
  2343. '#LOT_NO#',
  2344. '#JUDGE_STOVE_NO#',
  2345. '#BATCH_NO#',
  2346. '#STOVE_NO#',
  2347. '#PROCESS_CODE#',
  2348. '#PLINE_CODE#',
  2349. '#PLINE_NAME#',
  2350. '#MATERIAL_NO#',
  2351. '#MATERIAL_NAME#',
  2352. '#PRODUCCODE#',
  2353. '#PRODUCNAME#',
  2354. '#STEELCODE#',
  2355. '#STEELNAME#',
  2356. '#GRADECODE#',
  2357. '#GRADENAME#',
  2358. '#SPEC_CODE#',
  2359. '#SPEC_NAME#',
  2360. '#MODEL_CODE#',
  2361. '#MODEL_DESC#',
  2362. '#STD_CODE#',
  2363. '#STD_NAME#',
  2364. '#STD_STYLE#',
  2365. '#STD_STYLE_DESC#',
  2366. '#ACT_DIMATER#',
  2367. '#ACT_HEIGHT#',
  2368. '#ACT_LEN_MIN#',
  2369. '#ACT_LEN_MAX#',
  2370. '#PRO_ORDER_ID#',
  2371. '#GX_PLAN_NO#',
  2372. '#ORD_LN_DLY_PK#',
  2373. '#CRAF_NO#',
  2374. '#CRAFT_SEQ#',
  2375. '#INDEX_SEQ#',
  2376. '#STEEL_STANDRAD#',
  2377. '#CIC#',
  2378. '#PIC#',
  2379. '#BAL_YEAR_MONTH#',
  2380. '#CONSIGN_NAME#',
  2381. TO_DATE('#CONSIGN_TIME#','YYYY-MM-DD HH24:MI:SS'),
  2382. '#CONSIGN_MEMO#',
  2383. '#TARGET#',
  2384. '#CRAFT_SOURCE#',
  2385. '#LOT_NO_GROUP#')
  2386. </query>
  2387. <query id = "FrmMilBatchSampleNew.SelectPlnZyZgM" desc = "查询轧管炉计划">
  2388. SELECT * FROM PLN_ZY_ZG_M T WHERE T.HEAT_PLAN_NO = '#ID#'
  2389. </query>
  2390. <query id = "FrmMilBatchSampleNew.deleteConsingCheckNo" desc = "删除产销检验记录">
  2391. DECLARE
  2392. BEGIN
  2393. FOR V IN (SELECT A.CHECK_NO, A.JUDGE_STOVE_NO, A.BATCH_NO
  2394. FROM QCM_ZC_CHECKCONSIGN A
  2395. WHERE A.CHECK_NO = '#CHECK_NO#') LOOP
  2396. UPDATE QCM_JHY_ELEMENTS T
  2397. SET T.LG_JUDGE_FLAG = '00'
  2398. WHERE T.JUDGE_STOVE_NO = V.JUDGE_STOVE_NO
  2399. AND T.BATCH_NO = V.BATCH_NO
  2400. AND T.SAMPLE_ID = V.CHECK_NO;
  2401. UPDATE QCM_JHY_PHYRESULT T
  2402. SET T.JUDGE_FLAG = '00'
  2403. WHERE T.JUDGE_STOVE_NO = V.JUDGE_STOVE_NO
  2404. AND T.BATCH_NO = V.BATCH_NO
  2405. AND T.SAMPLE_ID = V.CHECK_NO;
  2406. END LOOP;
  2407. DELETE FROM QCM_ZC_CHECKCONSIGN T WHERE T.CHECK_NO = '#CHECK_NO#';
  2408. DELETE FROM QCM_ZC_CHECKCONSIGN_DETAIL T WHERE T.CHECK_NO = '#CHECK_NO#';
  2409. END;
  2410. </query>
  2411. <query id = "FrmMilBatchSampleNew.doQueryPhyCodeMax" desc = "查询试样组下的炉批">
  2412. SELECT T.CHECK_NO,S.HEAT_NO,T.BATCH_NO
  2413. FROM PIPE_CHECKCONSIGN_BASEINFO S,
  2414. (SELECT T1.CHECK_NO, T1.BATCH_NO
  2415. FROM PIPE_CHECKCONSIGN_DETAIL T1
  2416. WHERE 1= 1 #PHY_CODE_MAX#
  2417. AND T1.FOR_CHECK_NO IS NULL)T
  2418. WHERE S.CHECK_NO = T.CHECK_NO
  2419. AND S.LOT_NO = ?
  2420. GROUP BY S.HEAT_NO,T.BATCH_NO,T.CHECK_NO
  2421. ORDER BY T.CHECK_NO,S.HEAT_NO
  2422. </query>
  2423. <query id = "FrmMilBatchSampleNew.copyQcmZcConsing" desc = "复取样委托写产销">
  2424. DECLARE
  2425. BEGIN
  2426. --新增105委托表
  2427. INSERT INTO QCM_ZC_CHECKCONSIGN
  2428. (CHECK_NO,
  2429. LOT_NO,
  2430. JUDGE_STOVE_NO,
  2431. BATCH_NO,
  2432. STOVE_NO,
  2433. PROCESS_CODE,
  2434. PLINE_CODE,
  2435. PLINE_NAME,
  2436. ACT_COUNT,
  2437. ACT_WEIGHT,
  2438. ACT_THEORY_WEIGHT,
  2439. CHEM_RESULT_CODE,
  2440. PHY_RESULT_CODE,
  2441. CHEM_RESULT_PATH,
  2442. PHY_RESULT_PATH,
  2443. MATERIAL_NO,
  2444. MATERIAL_NAME,
  2445. PRODUCCODE,
  2446. PRODUCNAME,
  2447. STEELCODE,
  2448. STEELNAME,
  2449. GRADECODE,
  2450. GRADENAME,
  2451. SPEC_CODE,
  2452. SPEC_NAME,
  2453. MODEL_CODE,
  2454. MODEL_DESC,
  2455. STD_CODE,
  2456. STD_NAME,
  2457. STD_STYLE,
  2458. STD_STYLE_DESC,
  2459. ACT_DIMATER,
  2460. ACT_HEIGHT,
  2461. ACT_LEN_MIN,
  2462. ACT_LEN_MAX,
  2463. PRO_ORDER_ID,
  2464. GX_PLAN_NO,
  2465. ORD_LN_DLY_PK,
  2466. CRAF_NO,
  2467. CRAFT_SEQ,
  2468. INDEX_SEQ,
  2469. STEEL_STANDRAD,
  2470. CIC,
  2471. PIC,
  2472. BAL_YEAR_MONTH,
  2473. LK_FLAG,
  2474. JUDGE_MEMO,
  2475. JUDGE_TIME,
  2476. JUDGE_MAKER,
  2477. AUDIT_RESULT,
  2478. AUDIT_MEMO,
  2479. CHEM_JUDGE_ID,
  2480. PHY_JUDGE_ID,
  2481. VALIDFLAG,
  2482. CONSIGN_NAME,
  2483. CONSIGN_TIME,
  2484. CONSIGN_MEMO,
  2485. CAILI_PATH,
  2486. FUSHI_PATH,
  2487. JINWU_PATH,
  2488. GONGCHENG_PATH,
  2489. DIBEI_PATH,
  2490. HUAXUE_PATH,
  2491. JUDGE_RESULT_CODE,
  2492. IS_FLAG,
  2493. CYCLES_FLAG,
  2494. RESAMPLE,
  2495. TARGET,
  2496. CRAFT_SOURCE,
  2497. IS_NO_SSC,
  2498. APPLY_RESAMPLE,
  2499. IS_NO_HIC,
  2500. LOT_NO_GROUP,
  2501. QUOTE_STATE)
  2502. (SELECT 'F' || '#CHECK_NO#',
  2503. LOT_NO,
  2504. JUDGE_STOVE_NO,
  2505. BATCH_NO,
  2506. STOVE_NO,
  2507. PROCESS_CODE,
  2508. PLINE_CODE,
  2509. PLINE_NAME,
  2510. ACT_COUNT,
  2511. ACT_WEIGHT,
  2512. ACT_THEORY_WEIGHT,
  2513. '',
  2514. '',
  2515. CHEM_RESULT_PATH,
  2516. PHY_RESULT_PATH,
  2517. MATERIAL_NO,
  2518. MATERIAL_NAME,
  2519. PRODUCCODE,
  2520. PRODUCNAME,
  2521. STEELCODE,
  2522. STEELNAME,
  2523. GRADECODE,
  2524. GRADENAME,
  2525. SPEC_CODE,
  2526. SPEC_NAME,
  2527. MODEL_CODE,
  2528. MODEL_DESC,
  2529. STD_CODE,
  2530. STD_NAME,
  2531. STD_STYLE,
  2532. STD_STYLE_DESC,
  2533. ACT_DIMATER,
  2534. ACT_HEIGHT,
  2535. ACT_LEN_MIN,
  2536. ACT_LEN_MAX,
  2537. PRO_ORDER_ID,
  2538. GX_PLAN_NO,
  2539. ORD_LN_DLY_PK,
  2540. CRAF_NO,
  2541. CRAFT_SEQ,
  2542. INDEX_SEQ,
  2543. STEEL_STANDRAD,
  2544. CIC,
  2545. PIC,
  2546. BAL_YEAR_MONTH,
  2547. '0',
  2548. '',
  2549. '',
  2550. '',
  2551. '',
  2552. '',
  2553. '',
  2554. '',
  2555. '00',
  2556. '#CONSIGN_NAME#',
  2557. SYSDATE,
  2558. '',
  2559. '',
  2560. '',
  2561. '',
  2562. '',
  2563. '',
  2564. '',
  2565. '',
  2566. '0',
  2567. '0',
  2568. '0',
  2569. TARGET,
  2570. CRAFT_SOURCE,
  2571. '',
  2572. '',
  2573. '',
  2574. LOT_NO_GROUP,
  2575. '0'
  2576. FROM QCM_ZC_CHECKCONSIGN T
  2577. WHERE T.CHECK_NO = '#CHECK_NO#'
  2578. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2579. AND T.BATCH_NO = '#BATCH_NO#');
  2580. FOR V2 IN (SELECT T.CRAFT_SOURCE,
  2581. T.PROCESS_CODE,
  2582. T.ORD_LN_DLY_PK,
  2583. (SELECT CASE
  2584. WHEN MIN(T2.PLINE_CODE) = 'C063' OR
  2585. MIN(T2.PLINE_CODE) = 'C064' THEN
  2586. '1'
  2587. ELSE
  2588. '0'
  2589. END
  2590. FROM QCM_GP_JUDGE_APPLY T2
  2591. WHERE T2.STOVE_NO = T.STOVE_NO
  2592. AND T2.IS_FLAG = '0') GP_TYPE
  2593. FROM QCM_ZC_CHECKCONSIGN T
  2594. WHERE T.CHECK_NO = '#CHECK_NO#'
  2595. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2596. AND T.BATCH_NO = '#BATCH_NO#') LOOP
  2597. --如果是首日检需要更新合同行+产线下的所有炉批
  2598. IF V2.CRAFT_SOURCE = '1' THEN
  2599. FOR V IN (SELECT D.JUDGE_STOVE_NO,
  2600. D.BATCH_NO,
  2601. D.PROCESS_CODE,
  2602. D.ORD_LN_DLY_PK,
  2603. D.CRAFT_SOURCE
  2604. FROM QCM_ZC_CHECKCONSIGN C,
  2605. QCM_ZC_CHECKCONSIGN D,
  2606. PLN_SALEORD E,
  2607. PLN_SALEORD E2
  2608. WHERE C.CHECK_NO = '#CHECK_NO#'
  2609. AND C.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2610. AND C.BATCH_NO = '#BATCH_NO#'
  2611. AND E.ORD_LN_DLY_PK = C.ORD_LN_DLY_PK
  2612. AND E2.ORD_LN_PK = E.ORD_LN_PK
  2613. AND D.ORD_LN_DLY_PK = E2.ORD_LN_DLY_PK
  2614. AND D.PLINE_CODE = C.PLINE_CODE
  2615. AND (V2.GP_TYPE IS NULL OR V2.GP_TYPE = '0' AND EXISTS
  2616. (SELECT 1
  2617. FROM QCM_GP_JUDGE_APPLY E3
  2618. WHERE E3.STOVE_NO = D.STOVE_NO
  2619. AND E3.IS_FLAG = '0'
  2620. AND E3.PLINE_CODE NOT IN ('C063', 'C064')) OR
  2621. V2.GP_TYPE = '1' AND EXISTS
  2622. (SELECT 1
  2623. FROM QCM_GP_JUDGE_APPLY E3
  2624. WHERE E3.STOVE_NO = D.STOVE_NO
  2625. AND E3.IS_FLAG = '0'
  2626. AND E3.PLINE_CODE IN ('C063', 'C064')))
  2627. GROUP BY D.JUDGE_STOVE_NO,
  2628. D.BATCH_NO,
  2629. D.PROCESS_CODE,
  2630. D.ORD_LN_DLY_PK,
  2631. D.CRAFT_SOURCE) LOOP
  2632. --更新炉批结果表
  2633. UPDATE QCM_BC_BATCH_RESULT A
  2634. SET A.JUDGE_RESULT_CODE = NULL
  2635. WHERE A.JUDGE_STOVE_NO = V.JUDGE_STOVE_NO
  2636. AND A.BATCH_NO = V.BATCH_NO
  2637. AND A.PROCESS_CODE = V.PROCESS_CODE
  2638. AND A.ORD_LN_DLY_PK = V.ORD_LN_DLY_PK
  2639. AND A.CRAFT_SOURCE = V.CRAFT_SOURCE;
  2640. --去复样直接把综合判定结果置空
  2641. UPDATE QCM_ZG_JUGDE_APPLY T
  2642. SET T.JUDGE_RESULT_CODE = NULL,
  2643. T.JUDGE_RESULT = NULL,
  2644. T.JUDGE_MAKER = NULL,
  2645. T.JUDGE_RESULT_TIME = NULL
  2646. WHERE T.JUDGE_STOVE_NO = V.JUDGE_STOVE_NO
  2647. AND T.BATCH_NO = V.BATCH_NO
  2648. AND T.PROCESS_CODE = V.PROCESS_CODE
  2649. AND T.ORD_LN_DLY_PK = V.ORD_LN_DLY_PK;
  2650. END LOOP;
  2651. ELSE
  2652. --去复样直接把综合判定结果置空
  2653. UPDATE QCM_ZG_JUGDE_APPLY T
  2654. SET T.JUDGE_RESULT_CODE = NULL,
  2655. T.JUDGE_RESULT = NULL,
  2656. T.JUDGE_MAKER = NULL,
  2657. T.JUDGE_RESULT_TIME = NULL
  2658. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  2659. AND T.BATCH_NO = '#BATCH_NO#'
  2660. AND T.PROCESS_CODE = V2.PROCESS_CODE
  2661. AND T.ORD_LN_DLY_PK = V2.ORD_LN_DLY_PK;
  2662. END IF;
  2663. END LOOP;
  2664. END;
  2665. </query>
  2666. <query id = "FrmMilBatchSampleNew.copyPipeDetialInformation" desc = "复取样写入子表">
  2667. INSERT INTO PIPE_CHECKCONSIGN_DETAIL
  2668. (CHECK_NO,
  2669. BATCH_NO,
  2670. SAMPLE_NO,
  2671. SAMPLE_NO_MIN,
  2672. SAMPLE_BARCODE,
  2673. SAMPLE_LEN,
  2674. CHECK_STD,
  2675. PHY_CODE_MAX,
  2676. PHY_NAME_MAX,
  2677. SAMPLE_COUNT,
  2678. DEPT_ID,
  2679. LENGTH,
  2680. WIDTH,
  2681. EIC,
  2682. PHY_DIR,
  2683. SIZE_DESC,
  2684. JG_SEND_NAME,
  2685. JG_SEND_TIME,
  2686. LAB_RECEIVE_NAME,
  2687. LAB_RECEIVE_TIME,
  2688. CHECK_TEMP,
  2689. DEVICE_NO,
  2690. DEVICE_NAME,
  2691. CHECK_SHIFT,
  2692. CHECK_CLASS,
  2693. CHECK_NAME,
  2694. CHECK_TIME,
  2695. AUDIT_NAME,
  2696. AUDIT_TIME,
  2697. ISRCL,
  2698. RCL_MOVE_REMARK,
  2699. IS_NOTICE_PRODUCER,
  2700. NOTICE_PRODUCER_REMARK,
  2701. IS_RESAMPLE_REST,
  2702. RESAMPLE_REST_REMARK,
  2703. SPEC_FLAG,
  2704. SPEC_MOVE_REMARK,
  2705. FLAG,
  2706. SAMPLE_REMARK,
  2707. REMARK,
  2708. FORMUAL_NO,
  2709. FORMUAL_NAME,
  2710. MAT_NO,
  2711. SAMPLE_TYPE,
  2712. FOR_CHECK_NO,
  2713. VALIDFLAG,
  2714. CHECK_HUMIDITY,
  2715. STD_STEEL_NO,
  2716. STD_STEEL_TYPE,
  2717. STD_STEEL_VALUE,
  2718. ACTUAL_VALUE,
  2719. HARDNESS_TYPE,
  2720. RATE,
  2721. DESC_RATE,
  2722. SSC_CONDITION,
  2723. JG_SEND_SHIFT,
  2724. JG_SEND_GROUP,
  2725. JG_PRINT_COUNT,
  2726. RCL_AUDIT_NAME,
  2727. RCL_AUDIT_TIME,
  2728. ORIGINAL_AREA,
  2729. LAB_PRINT_COUNT,
  2730. RCL_FLAG,
  2731. FILE_PATH1,
  2732. FILE_PATH2,
  2733. HEAD_MAT_NO,
  2734. BAR_CODE,
  2735. SAMPLE_STYLE,
  2736. MERG_NAME,
  2737. MERG_TIME,
  2738. BACK_MEMO)
  2739. (SELECT 'F' || '#CHECK_NO#',
  2740. BATCH_NO,
  2741. '#SAMPLE_NO#',
  2742. '',
  2743. '',
  2744. '#SAMPLE_LEN#',
  2745. CHECK_STD,
  2746. PHY_CODE_MAX,
  2747. PHY_NAME_MAX,
  2748. SAMPLE_COUNT,
  2749. DEPT_ID,
  2750. LENGTH,
  2751. WIDTH,
  2752. EIC,
  2753. PHY_DIR,
  2754. SIZE_DESC,
  2755. '',
  2756. '',
  2757. '',
  2758. '',
  2759. '',
  2760. '',
  2761. '',
  2762. '',
  2763. '',
  2764. '',
  2765. '',
  2766. '',
  2767. '',
  2768. ISRCL,
  2769. RCL_MOVE_REMARK,
  2770. IS_NOTICE_PRODUCER,
  2771. NOTICE_PRODUCER_REMARK,
  2772. '0',
  2773. RESAMPLE_REST_REMARK,
  2774. SPEC_FLAG,
  2775. SPEC_MOVE_REMARK,
  2776. '#FLAG#',
  2777. '',
  2778. '',
  2779. '',
  2780. '',
  2781. '#MAT_NO#',
  2782. '',
  2783. '',
  2784. '#VALIDFLAG#',
  2785. '',
  2786. '',
  2787. '',
  2788. '',
  2789. '',
  2790. '',
  2791. RATE,
  2792. DESC_RATE,
  2793. SSC_CONDITION,
  2794. '',
  2795. '',
  2796. '0',
  2797. '',
  2798. '',
  2799. '',
  2800. '',
  2801. '',
  2802. '',
  2803. '',
  2804. '#HEAD_MAT_NO#',
  2805. '#BAR_CODE#',
  2806. '',
  2807. '',
  2808. '',
  2809. ''
  2810. FROM PIPE_CHECKCONSIGN_DETAIL T
  2811. WHERE T.CHECK_NO = '#CHECK_NO#'
  2812. AND T.BATCH_NO = '#BATCH_NO#'
  2813. AND T.PHY_CODE_MAX = '#PHY_CODE_MAX#'
  2814. AND T.SAMPLE_NO = '#OLD_SAMPLE_NO#')
  2815. </query>
  2816. <query id = "FrmMilBatchSampleNew.copyPipeDetialInformationHx" desc = "复取样写入子表">
  2817. INSERT INTO PIPE_CHECKCONSIGN_DETAIL
  2818. (CHECK_NO,
  2819. BATCH_NO,
  2820. SAMPLE_NO,
  2821. SAMPLE_NO_MIN,
  2822. SAMPLE_BARCODE,
  2823. SAMPLE_LEN,
  2824. CHECK_STD,
  2825. PHY_CODE_MAX,
  2826. PHY_NAME_MAX,
  2827. SAMPLE_COUNT,
  2828. DEPT_ID,
  2829. LENGTH,
  2830. WIDTH,
  2831. EIC,
  2832. PHY_DIR,
  2833. SIZE_DESC,
  2834. JG_SEND_NAME,
  2835. JG_SEND_TIME,
  2836. LAB_RECEIVE_NAME,
  2837. LAB_RECEIVE_TIME,
  2838. CHECK_TEMP,
  2839. DEVICE_NO,
  2840. DEVICE_NAME,
  2841. CHECK_SHIFT,
  2842. CHECK_CLASS,
  2843. CHECK_NAME,
  2844. CHECK_TIME,
  2845. AUDIT_NAME,
  2846. AUDIT_TIME,
  2847. ISRCL,
  2848. RCL_MOVE_REMARK,
  2849. IS_NOTICE_PRODUCER,
  2850. NOTICE_PRODUCER_REMARK,
  2851. IS_RESAMPLE_REST,
  2852. RESAMPLE_REST_REMARK,
  2853. SPEC_FLAG,
  2854. SPEC_MOVE_REMARK,
  2855. FLAG,
  2856. SAMPLE_REMARK,
  2857. REMARK,
  2858. FORMUAL_NO,
  2859. FORMUAL_NAME,
  2860. MAT_NO,
  2861. SAMPLE_TYPE,
  2862. FOR_CHECK_NO,
  2863. VALIDFLAG,
  2864. CHECK_HUMIDITY,
  2865. STD_STEEL_NO,
  2866. STD_STEEL_TYPE,
  2867. STD_STEEL_VALUE,
  2868. ACTUAL_VALUE,
  2869. HARDNESS_TYPE,
  2870. RATE,
  2871. DESC_RATE,
  2872. SSC_CONDITION,
  2873. JG_SEND_SHIFT,
  2874. JG_SEND_GROUP,
  2875. JG_PRINT_COUNT,
  2876. RCL_AUDIT_NAME,
  2877. RCL_AUDIT_TIME,
  2878. ORIGINAL_AREA,
  2879. LAB_PRINT_COUNT,
  2880. RCL_FLAG,
  2881. FILE_PATH1,
  2882. FILE_PATH2,
  2883. HEAD_MAT_NO,
  2884. BAR_CODE,
  2885. SAMPLE_STYLE,
  2886. MERG_NAME,
  2887. MERG_TIME,
  2888. BACK_MEMO)
  2889. (SELECT 'F' || '#CHECK_NO#',
  2890. BATCH_NO,
  2891. '#SAMPLE_NO#',
  2892. '',
  2893. '',
  2894. '#SAMPLE_LEN#',
  2895. CHECK_STD,
  2896. PHY_CODE_MAX,
  2897. PHY_NAME_MAX,
  2898. SAMPLE_COUNT,
  2899. DEPT_ID,
  2900. LENGTH,
  2901. WIDTH,
  2902. EIC,
  2903. PHY_DIR,
  2904. SIZE_DESC,
  2905. '',
  2906. '',
  2907. '',
  2908. '',
  2909. '',
  2910. '',
  2911. '',
  2912. '',
  2913. '',
  2914. '',
  2915. '',
  2916. '',
  2917. '',
  2918. ISRCL,
  2919. RCL_MOVE_REMARK,
  2920. IS_NOTICE_PRODUCER,
  2921. NOTICE_PRODUCER_REMARK,
  2922. '0',
  2923. RESAMPLE_REST_REMARK,
  2924. SPEC_FLAG,
  2925. SPEC_MOVE_REMARK,
  2926. '#FLAG#',
  2927. '',
  2928. '',
  2929. '',
  2930. '',
  2931. '#MAT_NO#',
  2932. '',
  2933. '',
  2934. '0',
  2935. '',
  2936. '',
  2937. '',
  2938. '',
  2939. '',
  2940. '',
  2941. RATE,
  2942. DESC_RATE,
  2943. SSC_CONDITION,
  2944. '',
  2945. '',
  2946. '0',
  2947. '',
  2948. '',
  2949. '',
  2950. '',
  2951. '',
  2952. '',
  2953. '',
  2954. '#HEAD_MAT_NO#',
  2955. '#BAR_CODE#',
  2956. '',
  2957. '',
  2958. '',
  2959. ''
  2960. FROM PIPE_CHECKCONSIGN_DETAIL T
  2961. WHERE T.CHECK_NO = '#CHECK_NO#'
  2962. AND T.BATCH_NO = '#BATCH_NO#'
  2963. AND T.PHY_CODE_MAX = '#PHY_CODE_MAX#'
  2964. AND T.VALIDFLAG = '0'
  2965. AND ROWNUM = 1)
  2966. </query>
  2967. <query id = "FrmMilBatchSampleNew.copyQcmDetialInformationHx" desc = "复验委托写产销子表">
  2968. DECLARE
  2969. P_RATE VARCHAR2(20);
  2970. BEGIN
  2971. --新增二层表
  2972. INSERT INTO QCM_ZC_CHECKCONSIGN_DETAIL
  2973. (CHECK_NO,
  2974. BATCH_NO,
  2975. SAMPLE_NO,
  2976. PHY_CODE_MAX,
  2977. PHY_NAME_MAX,
  2978. RATE,
  2979. DESC_RATE,
  2980. EIC,
  2981. SAMPLE_NO_MIN,
  2982. SAMPLE_COUNT,
  2983. SAMPLE_LEN,
  2984. MAT_NO,
  2985. HEAD_MAT_NO,
  2986. BAR_CODE,
  2987. NK_RESULT,
  2988. JF_RESULT,
  2989. RESULT_SOURCE,
  2990. IS_QUOTE,
  2991. VALIDFLAG)
  2992. (SELECT 'F' || '#CHECK_NO#',
  2993. BATCH_NO,
  2994. '#SAMPLE_NO#',
  2995. PHY_CODE_MAX,
  2996. PHY_NAME_MAX,
  2997. RATE,
  2998. DESC_RATE,
  2999. EIC,
  3000. SAMPLE_NO_MIN,
  3001. SAMPLE_COUNT,
  3002. SAMPLE_LEN,
  3003. '#MAT_NO#',
  3004. '#HEAD_MAT_NO#',
  3005. '#BAR_CODE#',
  3006. '',
  3007. '',
  3008. '0',
  3009. '0',
  3010. '#VALIDFLAG#'
  3011. FROM QCM_ZC_CHECKCONSIGN_DETAIL T
  3012. WHERE T.CHECK_NO = '#CHECK_NO#'
  3013. AND T.BATCH_NO = '#BATCH_NO#'
  3014. AND T.PHY_CODE_MAX = '#PHY_CODE_MAX#'
  3015. AND ROWNUM = 1);
  3016. --更新炉批结果表
  3017. SELECT T.RATE
  3018. INTO P_RATE
  3019. FROM QCM_ZC_CHECKCONSIGN_DETAIL T
  3020. WHERE T.CHECK_NO = '#CHECK_NO#'
  3021. AND T.BATCH_NO = '#BATCH_NO#'
  3022. AND T.PHY_CODE_MAX = '#PHY_CODE_MAX#'
  3023. AND ROWNUM = 1;
  3024. IF P_RATE = '408601' THEN
  3025. FOR V IN (SELECT D.JUDGE_STOVE_NO,
  3026. D.BATCH_NO,
  3027. D.PROCESS_CODE,
  3028. D.ORD_LN_DLY_PK,
  3029. D.CRAFT_SOURCE
  3030. FROM QCM_ZC_CHECKCONSIGN C, QCM_ZC_CHECKCONSIGN D
  3031. WHERE C.CHECK_NO = '#CHECK_NO#'
  3032. AND C.BATCH_NO = '#BATCH_NO#'
  3033. AND D.LOT_NO = C.LOT_NO
  3034. AND (C.LOT_NO_GROUP IS NULL OR
  3035. C.LOT_NO_GROUP = D.LOT_NO_GROUP)
  3036. AND D.PROCESS_CODE = C.PROCESS_CODE
  3037. AND D.ORD_LN_DLY_PK = C.ORD_LN_DLY_PK
  3038. GROUP BY D.JUDGE_STOVE_NO,
  3039. D.BATCH_NO,
  3040. D.PROCESS_CODE,
  3041. D.ORD_LN_DLY_PK,
  3042. D.CRAFT_SOURCE) LOOP
  3043. UPDATE QCM_BC_BATCH_RESULT A
  3044. SET A.JUDGE_RESULT_CODE = NULL
  3045. WHERE A.JUDGE_STOVE_NO = V.JUDGE_STOVE_NO
  3046. AND A.BATCH_NO = V.BATCH_NO
  3047. AND A.PROCESS_CODE = V.PROCESS_CODE
  3048. AND A.ORD_LN_DLY_PK = V.ORD_LN_DLY_PK
  3049. AND A.CRAFT_SOURCE = V.CRAFT_SOURCE;
  3050. END LOOP;
  3051. ELSIF P_RATE = '408603' THEN
  3052. FOR V IN (SELECT D.JUDGE_STOVE_NO,
  3053. D.BATCH_NO,
  3054. D.PROCESS_CODE,
  3055. D.ORD_LN_DLY_PK,
  3056. D.CRAFT_SOURCE
  3057. FROM QCM_ZC_CHECKCONSIGN C, QCM_ZC_CHECKCONSIGN D
  3058. WHERE C.CHECK_NO = '#CHECK_NO#'
  3059. AND C.BATCH_NO = '#BATCH_NO#'
  3060. AND D.JUDGE_STOVE_NO = C.JUDGE_STOVE_NO
  3061. AND D.PROCESS_CODE = C.PROCESS_CODE
  3062. AND D.ORD_LN_DLY_PK = C.ORD_LN_DLY_PK
  3063. GROUP BY D.JUDGE_STOVE_NO,
  3064. D.BATCH_NO,
  3065. D.PROCESS_CODE,
  3066. D.ORD_LN_DLY_PK,
  3067. D.CRAFT_SOURCE) LOOP
  3068. UPDATE QCM_BC_BATCH_RESULT A
  3069. SET A.JUDGE_RESULT_CODE = NULL
  3070. WHERE A.JUDGE_STOVE_NO = V.JUDGE_STOVE_NO
  3071. AND A.BATCH_NO = V.BATCH_NO
  3072. AND A.PROCESS_CODE = V.PROCESS_CODE
  3073. AND A.ORD_LN_DLY_PK = V.ORD_LN_DLY_PK
  3074. AND A.CRAFT_SOURCE = V.CRAFT_SOURCE;
  3075. END LOOP;
  3076. ELSE
  3077. FOR V IN (SELECT C.JUDGE_STOVE_NO,
  3078. C.BATCH_NO,
  3079. C.PROCESS_CODE,
  3080. C.ORD_LN_DLY_PK,
  3081. C.CRAFT_SOURCE
  3082. FROM QCM_ZC_CHECKCONSIGN C
  3083. WHERE C.CHECK_NO = '#CHECK_NO#'
  3084. AND C.BATCH_NO = '#BATCH_NO#'
  3085. GROUP BY C.JUDGE_STOVE_NO,
  3086. C.BATCH_NO,
  3087. C.PROCESS_CODE,
  3088. C.ORD_LN_DLY_PK,
  3089. C.CRAFT_SOURCE) LOOP
  3090. UPDATE QCM_BC_BATCH_RESULT A
  3091. SET A.JUDGE_RESULT_CODE = NULL
  3092. WHERE A.JUDGE_STOVE_NO = V.JUDGE_STOVE_NO
  3093. AND A.BATCH_NO = V.BATCH_NO
  3094. AND A.PROCESS_CODE = V.PROCESS_CODE
  3095. AND A.ORD_LN_DLY_PK = V.ORD_LN_DLY_PK
  3096. AND A.CRAFT_SOURCE = V.CRAFT_SOURCE;
  3097. END LOOP;
  3098. END IF;
  3099. END;
  3100. </query>
  3101. <query id = "FrmMilBatchSampleNew.copyQcmDetialInformation" desc = "复验委托写产销子表">
  3102. DECLARE
  3103. P_RATE VARCHAR2(20);
  3104. BEGIN
  3105. --新增二层表
  3106. INSERT INTO QCM_ZC_CHECKCONSIGN_DETAIL
  3107. (CHECK_NO,
  3108. BATCH_NO,
  3109. SAMPLE_NO,
  3110. PHY_CODE_MAX,
  3111. PHY_NAME_MAX,
  3112. RATE,
  3113. DESC_RATE,
  3114. EIC,
  3115. SAMPLE_NO_MIN,
  3116. SAMPLE_COUNT,
  3117. SAMPLE_LEN,
  3118. MAT_NO,
  3119. HEAD_MAT_NO,
  3120. BAR_CODE,
  3121. NK_RESULT,
  3122. JF_RESULT,
  3123. RESULT_SOURCE,
  3124. IS_QUOTE,
  3125. VALIDFLAG)
  3126. (SELECT 'F' || '#CHECK_NO#',
  3127. BATCH_NO,
  3128. '#SAMPLE_NO#',
  3129. PHY_CODE_MAX,
  3130. PHY_NAME_MAX,
  3131. RATE,
  3132. DESC_RATE,
  3133. EIC,
  3134. SAMPLE_NO_MIN,
  3135. SAMPLE_COUNT,
  3136. SAMPLE_LEN,
  3137. '#MAT_NO#',
  3138. '#HEAD_MAT_NO#',
  3139. '#BAR_CODE#',
  3140. '',
  3141. '',
  3142. '0',
  3143. '0',
  3144. '1'
  3145. FROM QCM_ZC_CHECKCONSIGN_DETAIL T
  3146. WHERE T.CHECK_NO = '#CHECK_NO#'
  3147. AND T.BATCH_NO = '#BATCH_NO#'
  3148. AND T.PHY_CODE_MAX = '#PHY_CODE_MAX#'
  3149. AND T.SAMPLE_NO = '#OLD_SAMPLE_NO#');
  3150. --更新炉批结果表
  3151. SELECT T.RATE
  3152. INTO P_RATE
  3153. FROM QCM_ZC_CHECKCONSIGN_DETAIL T
  3154. WHERE T.CHECK_NO = '#CHECK_NO#'
  3155. AND T.BATCH_NO = '#BATCH_NO#'
  3156. AND T.PHY_CODE_MAX = '#PHY_CODE_MAX#'
  3157. AND T.SAMPLE_NO = '#OLD_SAMPLE_NO#';
  3158. IF P_RATE = '408601' THEN
  3159. FOR V IN (SELECT D.JUDGE_STOVE_NO,
  3160. D.BATCH_NO,
  3161. D.PROCESS_CODE,
  3162. D.ORD_LN_DLY_PK,
  3163. D.CRAFT_SOURCE
  3164. FROM QCM_ZC_CHECKCONSIGN C, QCM_ZC_CHECKCONSIGN D
  3165. WHERE C.CHECK_NO = '#CHECK_NO#'
  3166. AND C.BATCH_NO = '#BATCH_NO#'
  3167. AND D.LOT_NO = C.LOT_NO
  3168. AND (C.LOT_NO_GROUP IS NULL OR
  3169. C.LOT_NO_GROUP = D.LOT_NO_GROUP)
  3170. AND D.PROCESS_CODE = C.PROCESS_CODE
  3171. AND D.ORD_LN_DLY_PK = C.ORD_LN_DLY_PK
  3172. GROUP BY D.JUDGE_STOVE_NO,
  3173. D.BATCH_NO,
  3174. D.PROCESS_CODE,
  3175. D.ORD_LN_DLY_PK,
  3176. D.CRAFT_SOURCE) LOOP
  3177. UPDATE QCM_BC_BATCH_RESULT A
  3178. SET A.JUDGE_RESULT_CODE = NULL
  3179. WHERE A.JUDGE_STOVE_NO = V.JUDGE_STOVE_NO
  3180. AND A.BATCH_NO = V.BATCH_NO
  3181. AND A.PROCESS_CODE = V.PROCESS_CODE
  3182. AND A.ORD_LN_DLY_PK = V.ORD_LN_DLY_PK
  3183. AND A.CRAFT_SOURCE = V.CRAFT_SOURCE;
  3184. END LOOP;
  3185. ELSIF P_RATE = '408603' THEN
  3186. FOR V IN (SELECT D.JUDGE_STOVE_NO,
  3187. D.BATCH_NO,
  3188. D.PROCESS_CODE,
  3189. D.ORD_LN_DLY_PK,
  3190. D.CRAFT_SOURCE
  3191. FROM QCM_ZC_CHECKCONSIGN C, QCM_ZC_CHECKCONSIGN D
  3192. WHERE C.CHECK_NO = '#CHECK_NO#'
  3193. AND C.BATCH_NO = '#BATCH_NO#'
  3194. AND D.JUDGE_STOVE_NO = C.JUDGE_STOVE_NO
  3195. AND D.PROCESS_CODE = C.PROCESS_CODE
  3196. AND D.ORD_LN_DLY_PK = C.ORD_LN_DLY_PK
  3197. GROUP BY D.JUDGE_STOVE_NO,
  3198. D.BATCH_NO,
  3199. D.PROCESS_CODE,
  3200. D.ORD_LN_DLY_PK,
  3201. D.CRAFT_SOURCE) LOOP
  3202. UPDATE QCM_BC_BATCH_RESULT A
  3203. SET A.JUDGE_RESULT_CODE = NULL
  3204. WHERE A.JUDGE_STOVE_NO = V.JUDGE_STOVE_NO
  3205. AND A.BATCH_NO = V.BATCH_NO
  3206. AND A.PROCESS_CODE = V.PROCESS_CODE
  3207. AND A.ORD_LN_DLY_PK = V.ORD_LN_DLY_PK
  3208. AND A.CRAFT_SOURCE = V.CRAFT_SOURCE;
  3209. END LOOP;
  3210. ELSE
  3211. FOR V IN (SELECT C.JUDGE_STOVE_NO,
  3212. C.BATCH_NO,
  3213. C.PROCESS_CODE,
  3214. C.ORD_LN_DLY_PK,
  3215. C.CRAFT_SOURCE
  3216. FROM QCM_ZC_CHECKCONSIGN C
  3217. WHERE C.CHECK_NO = '#CHECK_NO#'
  3218. AND C.BATCH_NO = '#BATCH_NO#'
  3219. GROUP BY C.JUDGE_STOVE_NO,
  3220. C.BATCH_NO,
  3221. C.PROCESS_CODE,
  3222. C.ORD_LN_DLY_PK,
  3223. C.CRAFT_SOURCE) LOOP
  3224. UPDATE QCM_BC_BATCH_RESULT A
  3225. SET A.JUDGE_RESULT_CODE = NULL
  3226. WHERE A.JUDGE_STOVE_NO = V.JUDGE_STOVE_NO
  3227. AND A.BATCH_NO = V.BATCH_NO
  3228. AND A.PROCESS_CODE = V.PROCESS_CODE
  3229. AND A.ORD_LN_DLY_PK = V.ORD_LN_DLY_PK
  3230. AND A.CRAFT_SOURCE = V.CRAFT_SOURCE;
  3231. END LOOP;
  3232. END IF;
  3233. END;
  3234. </query>
  3235. <query id = "FrmMilBatchSampleNew.copyPipeChemDetial" desc = "复取样成分子表">
  3236. INSERT INTO PIPE_CHECKCONSIGN_CHEMDETAIL
  3237. (CHECK_NO,
  3238. SAMPLE_NO,
  3239. CHEM_CODE,
  3240. CHEM_NAME,
  3241. CHEM_TYPE,
  3242. ISCHECK,
  3243. ISJUDGE,
  3244. ISQUOTE,
  3245. COMPLEX_TYPE,
  3246. CHEM_FORMULA,
  3247. STDMIN_SIGN,
  3248. STDMIN,
  3249. STDMAX_SIGN,
  3250. STDMAX,
  3251. STDTARGET,
  3252. STDMEMO,
  3253. ELE_CODE,
  3254. ELE_NAME,
  3255. ELE_MIN_SIGN,
  3256. ELE_MIN,
  3257. ELE_MAX_SIGN,
  3258. ELE_MAX,
  3259. REP_CODE,
  3260. REP_NAME,
  3261. REP_MIN_SIGN,
  3262. REP_MIN,
  3263. REP_MAX_SIGN,
  3264. REP_MAX,
  3265. REP_VAL,
  3266. SELECT_STEEL_NO,
  3267. STD_STEEL_STD_VALUE,
  3268. STD_STEEL_PROCESS_VALUE,
  3269. ROUND_VALUE,
  3270. PROCESS_VALUE,
  3271. AUDIT_VALUE,
  3272. QUOTE_VALUE,
  3273. REMARK,
  3274. CHECK_CLASS,
  3275. CHECK_TEMP,
  3276. DEVICE_NO,
  3277. DEVICE_NAME,
  3278. AUDIT_NAME,
  3279. AUDIT_TIME,
  3280. IS_CJ,
  3281. BATCH_NO)
  3282. (SELECT 'F' || '#CHECK_NO#',
  3283. '#SAMPLE_NO#',
  3284. CHEM_CODE,
  3285. CHEM_NAME,
  3286. CHEM_TYPE,
  3287. ISCHECK,
  3288. ISJUDGE,
  3289. ISQUOTE,
  3290. COMPLEX_TYPE,
  3291. CHEM_FORMULA,
  3292. STDMIN_SIGN,
  3293. STDMIN,
  3294. STDMAX_SIGN,
  3295. STDMAX,
  3296. STDTARGET,
  3297. STDMEMO,
  3298. ELE_CODE,
  3299. ELE_NAME,
  3300. ELE_MIN_SIGN,
  3301. ELE_MIN,
  3302. ELE_MAX_SIGN,
  3303. ELE_MAX,
  3304. REP_CODE,
  3305. REP_NAME,
  3306. REP_MIN_SIGN,
  3307. REP_MIN,
  3308. REP_MAX_SIGN,
  3309. REP_MAX,
  3310. REP_VAL,
  3311. '',
  3312. '',
  3313. '',
  3314. '',
  3315. '',
  3316. '',
  3317. '',
  3318. REMARK,
  3319. '',
  3320. '',
  3321. '',
  3322. '',
  3323. '',
  3324. '',
  3325. '0',
  3326. BATCH_NO
  3327. FROM PIPE_CHECKCONSIGN_CHEMDETAIL T
  3328. WHERE T.CHECK_NO = '#CHECK_NO#'
  3329. AND T.BATCH_NO = '#BATCH_NO#'
  3330. AND T.CHEM_CODE = '#CHEM_CODE#'
  3331. AND ROWNUM = 1)
  3332. </query>
  3333. <query id = "FrmMilBatchSampleNew.copyPipePhyDetial" desc = "复取样写理化子表">
  3334. INSERT INTO PIPE_CHECKCONSIGN_PHYDETAIL
  3335. (PHYDETAIL_ID,
  3336. CHECK_NO,
  3337. BATCH_NO,
  3338. SAMPLE_NO,
  3339. INDEX_SEQ,
  3340. DEPT_ID,
  3341. PHY_CODE_MAX,
  3342. PHY_NAME_MAX,
  3343. PHY_CODE_MIN,
  3344. PHY_NAME_MIN,
  3345. PHY_CODE,
  3346. PHY_NAME,
  3347. PHY_UNIT,
  3348. ITEM_CODE_F,
  3349. ITEM_NAME_F,
  3350. ITEM_CODE_W,
  3351. ITEM_NAME_W,
  3352. ITEM_CODE_S,
  3353. ITEM_NAME_S,
  3354. GROUP_SEQ,
  3355. RESULT_COUNT,
  3356. ISCHECK,
  3357. ISJUDGE,
  3358. ISQUOTE,
  3359. PHY_TYPE,
  3360. PHY_FORMULA,
  3361. STDMIN_SIGN,
  3362. STDMIN,
  3363. STDMAX_SIGN,
  3364. STDMAX,
  3365. JUDGE_BASIS,
  3366. STDMIN_SIGN2,
  3367. STDMIN2,
  3368. STDMAX_SIGN2,
  3369. STDMAX2,
  3370. STD_CHOOSE,
  3371. STDMEMO,
  3372. ADDCONDITION,
  3373. ADDSTDCON_CODE,
  3374. ADDSTD_MIN_SIGN,
  3375. ADDSTD_MIN,
  3376. ADDSTD_MAX_SIGN,
  3377. ADDSTD_MAX,
  3378. ADDPERCENT,
  3379. BILLET_SAMPLE,
  3380. VALUE1,
  3381. VALUE2,
  3382. VALUE3,
  3383. VALUE4,
  3384. VALUE5,
  3385. VALUE6,
  3386. VALUE7,
  3387. VALUE8,
  3388. VALUE9,
  3389. VALUE10,
  3390. VALUE11,
  3391. VALUE12,
  3392. VALUE13,
  3393. VALUE14,
  3394. VALUE15,
  3395. AVERAGE_VALUE,
  3396. IS_GOOD,
  3397. IS_DEFECT,
  3398. CALCULATION_FORMULA,
  3399. SEQ,
  3400. PHY_CODE_DIR,
  3401. PHY_NAME_DIR,
  3402. SPLINE_ITEM_CODE_S,
  3403. SPLINE_ITEM_NAME_S,
  3404. SPLINE_ITEM_CODE_F,
  3405. SPLINE_ITEM_NAME_F)
  3406. (SELECT SYS_GUID(),
  3407. 'F'||'#CHECK_NO#',
  3408. MAX(BATCH_NO)BATCH_NO,
  3409. '#SAMPLE_NO#',
  3410. MAX(INDEX_SEQ)INDEX_SEQ,
  3411. MAX(DEPT_ID)DEPT_ID,
  3412. MAX(PHY_CODE_MAX)PHY_CODE_MAX,
  3413. MAX(PHY_NAME_MAX)PHY_NAME_MAX,
  3414. MAX(PHY_CODE_MIN)PHY_CODE_MIN,
  3415. MAX(PHY_NAME_MIN)PHY_NAME_MIN,
  3416. PHY_CODE,
  3417. PHY_NAME,
  3418. MAX(PHY_UNIT)PHY_UNIT,
  3419. MAX(ITEM_CODE_F)ITEM_CODE_F,
  3420. MAX(ITEM_NAME_F)ITEM_NAME_F,
  3421. MAX(ITEM_CODE_W)ITEM_CODE_W,
  3422. MAX(ITEM_NAME_W)ITEM_NAME_W,
  3423. MAX(ITEM_CODE_S)ITEM_CODE_S,
  3424. MAX(ITEM_NAME_S)ITEM_NAME_S,
  3425. MAX(GROUP_SEQ)GROUP_SEQ,
  3426. MAX(RESULT_COUNT)RESULT_COUNT,
  3427. MAX(ISCHECK)ISCHECK,
  3428. MAX(ISJUDGE)ISJUDGE,
  3429. MAX(ISQUOTE)ISQUOTE,
  3430. MAX(PHY_TYPE)PHY_TYPE,
  3431. MAX(PHY_FORMULA)PHY_FORMULA,
  3432. MAX(STDMIN_SIGN)STDMIN_SIGN,
  3433. MAX(STDMIN)STDMIN,
  3434. MAX(STDMAX_SIGN)STDMAX_SIGN,
  3435. MAX(STDMAX)STDMAX,
  3436. MAX(JUDGE_BASIS)JUDGE_BASIS,
  3437. MAX(STDMIN_SIGN2)STDMIN_SIGN2,
  3438. MAX(STDMIN2)STDMIN2,
  3439. MAX(STDMAX_SIGN2)STDMAX_SIGN2,
  3440. MAX(STDMAX2)STDMAX2,
  3441. MAX(STD_CHOOSE)STD_CHOOSE,
  3442. MAX(STDMEMO)STDMEMO,
  3443. MAX(ADDCONDITION)ADDCONDITION,
  3444. MAX(ADDSTDCON_CODE)ADDSTDCON_CODE,
  3445. MAX(ADDSTD_MIN_SIGN)ADDSTD_MIN_SIGN,
  3446. MAX(ADDSTD_MIN)ADDSTD_MIN,
  3447. MAX(ADDSTD_MAX_SIGN)ADDSTD_MAX_SIGN,
  3448. MAX(ADDSTD_MAX)ADDSTD_MAX,
  3449. MAX(ADDPERCENT)ADDPERCENT,
  3450. MAX(BILLET_SAMPLE)BILLET_SAMPLE,
  3451. '',
  3452. '',
  3453. '',
  3454. '',
  3455. '',
  3456. '',
  3457. '',
  3458. '',
  3459. '',
  3460. '',
  3461. '',
  3462. '',
  3463. '',
  3464. '',
  3465. '',
  3466. '',
  3467. '',
  3468. '',
  3469. '',
  3470. MAX(SEQ)SEQ,
  3471. '',
  3472. '',
  3473. MAX(SPLINE_ITEM_CODE_S),
  3474. MAX(SPLINE_ITEM_NAME_S),
  3475. MAX(SPLINE_ITEM_CODE_F),
  3476. MAX(SPLINE_ITEM_NAME_F)
  3477. FROM PIPE_CHECKCONSIGN_PHYDETAIL T
  3478. WHERE T.CHECK_NO = '#CHECK_NO#'
  3479. AND T.BATCH_NO = '#BATCH_NO#'
  3480. AND T.PHY_CODE_MAX = '#PHY_CODE_MAX#'
  3481. AND T.SAMPLE_NO = '#OLD_SAMPLE_NO#'
  3482. GROUP BY T.PHY_CODE,T.PHY_NAME)
  3483. </query>
  3484. <query id = "FrmMilBatchSampleNew.selectNoquialPhyCode" desc = "查询复样检验项">
  3485. SELECT *
  3486. FROM PIPE_CHECKCONSIGN_NOQUALIFIED T
  3487. WHERE T.CHECK_NO = '#CHECK_NO#'
  3488. AND T.LOT_NO = '#LOT_NO#'
  3489. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3490. </query>
  3491. <query id = "FrmMilBatchSampleNew.selectNoquialPhyCodeNew" desc = "查询复样检验项">
  3492. SELECT DISTINCT T.CHECK_NO,
  3493. T.PHY_CODE_MAX,
  3494. T.PHY_NAME_MAX,
  3495. T.PHY_CODE_MIN,
  3496. T.PHY_NAME_MIN,
  3497. T.PHY_CODE,
  3498. T.PHY_NAME,
  3499. T.LOT_NO,
  3500. T.JUDGE_STOVE_NO,
  3501. -- T.BATCH_NO,
  3502. T.PLINE_CODE,
  3503. T.CREATE_NAME
  3504. FROM PIPE_CHECKCONSIGN_NOQUALIFIED T
  3505. WHERE T.CHECK_NO = '#CHECK_NO#'
  3506. AND T.LOT_NO = '#LOT_NO#'
  3507. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3508. </query>
  3509. <query id = "FrmMilBatchSampleNew.selectNoquialPhyCodeHx" desc = "查询复样检验项">
  3510. SELECT T.PHY_CODE_MAX,
  3511. T.PHY_NAME_MAX,
  3512. T.PHY_CODE_MIN,
  3513. T.PHY_NAME_MIN,
  3514. T.PHY_CODE,
  3515. T.PHY_NAME
  3516. FROM PIPE_CHECKCONSIGN_NOQUALIFIED T
  3517. WHERE T.CHECK_NO = '#CHECK_NO#'
  3518. AND T.LOT_NO = '#LOT_NO#'
  3519. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3520. GROUP BY T.PHY_CODE_MAX,
  3521. T.PHY_NAME_MAX,
  3522. T.PHY_CODE_MIN,
  3523. T.PHY_NAME_MIN,
  3524. T.PHY_CODE,
  3525. T.PHY_NAME
  3526. </query>
  3527. <query id = "FrmMilBatchSampleNew.selectNoquialPhyInfomation" desc = "查询复取样理化试样组信息">
  3528. SELECT T.CHECK_NO,T.PHY_CODE_MAX,T.PHY_NAME_MAX,T.ITEM_CODE_F,T.ITEM_NAME_F,T.ITEM_CODE_W,T.ITEM_NAME_W,
  3529. T.ITEM_CODE_S,T.ITEM_NAME_S
  3530. FROM PIPE_CHECKCONSIGN_NOQUALIFIED T
  3531. WHERE T.CHECK_NO = '#CHECK_NO#'
  3532. AND T.LOT_NO = '#LOT_NO#'
  3533. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3534. AND T.PHY_CODE_MAX = ?
  3535. AND T.BATCH_NO = ?
  3536. GROUP BY T.CHECK_NO,T.PHY_CODE_MAX,T.PHY_NAME_MAX,T.ITEM_CODE_F,T.ITEM_NAME_F,T.ITEM_CODE_W,T.ITEM_NAME_W,
  3537. T.ITEM_CODE_S,T.ITEM_NAME_S
  3538. </query>
  3539. <query id = "FrmMilBatchSampleNew.selectNoquialSampleNo" desc = "查询试样号">
  3540. SELECT T.SAMPLE_NO
  3541. FROM PIPE_CHECKCONSIGN_NOQUALIFIED T
  3542. WHERE T.PHY_CODE_MAX = ?
  3543. AND NVL(T.ITEM_CODE_F, '1') = NVL(?, '1')
  3544. AND NVL(T.ITEM_CODE_W, '1') = NVL(?, '1')
  3545. AND NVL(T.ITEM_CODE_S, '1') = NVL(?, '1')
  3546. AND T.CHECK_NO = ?
  3547. AND T.BATCH_NO = ?
  3548. AND ROWNUM = 1
  3549. </query>
  3550. <query id = "FrmMilBatchSampleNew.updatePortCopyMat" desc = "修改管号队列复取样状态">
  3551. UPDATE PORT_MIL_BATCH_SAMPLE_RESULT T
  3552. SET T.RE_GET_SAMPLE_STATUS = '#RE_GET_SAMPLE_STATUS#'
  3553. WHERE T.LOT_NO = '#LOT_NO#'
  3554. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3555. AND T.MAT_NO = '#MAT_NO#'
  3556. </query>
  3557. <query id = "FrmMilBatchSampleNew.updateFlagSql" desc = "修改状态、删除产销委托数据">
  3558. DECLARE
  3559. BEGIN
  3560. UPDATE PORT_MIL_BATCH_SAMPLE_RESULT T
  3561. SET T.RE_GET_SAMPLE_STATUS = '1'
  3562. WHERE T.LOT_NO = '#LOT_NO#'
  3563. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3564. AND T.RE_GET_SAMPLE_STATUS = '2';
  3565. --更新炉批结果表
  3566. FOR V2 IN (SELECT T.*
  3567. FROM QCM_ZC_CHECKCONSIGN_DETAIL T
  3568. WHERE T.CHECK_NO = '#NEW_CHECK_NO#') LOOP
  3569. IF V2.RATE = '408601' THEN
  3570. FOR V IN (SELECT D.JUDGE_STOVE_NO,
  3571. D.BATCH_NO,
  3572. D.PROCESS_CODE,
  3573. D.ORD_LN_DLY_PK,
  3574. D.CRAFT_SOURCE
  3575. FROM QCM_ZC_CHECKCONSIGN C, QCM_ZC_CHECKCONSIGN D
  3576. WHERE C.CHECK_NO = V2.CHECK_NO
  3577. AND C.BATCH_NO = V2.BATCH_NO
  3578. AND D.LOT_NO = C.LOT_NO
  3579. AND (C.LOT_NO_GROUP IS NULL OR
  3580. C.LOT_NO_GROUP = D.LOT_NO_GROUP)
  3581. AND D.PROCESS_CODE = C.PROCESS_CODE
  3582. AND D.ORD_LN_DLY_PK = C.ORD_LN_DLY_PK
  3583. GROUP BY D.JUDGE_STOVE_NO,
  3584. D.BATCH_NO,
  3585. D.PROCESS_CODE,
  3586. D.ORD_LN_DLY_PK,
  3587. D.CRAFT_SOURCE) LOOP
  3588. UPDATE QCM_BC_BATCH_RESULT A
  3589. SET A.JUDGE_RESULT_CODE = '40740704'
  3590. WHERE A.JUDGE_STOVE_NO = V.JUDGE_STOVE_NO
  3591. AND A.BATCH_NO = V.BATCH_NO
  3592. AND A.PROCESS_CODE = V.PROCESS_CODE
  3593. AND A.ORD_LN_DLY_PK = V.ORD_LN_DLY_PK
  3594. AND A.CRAFT_SOURCE = V.CRAFT_SOURCE;
  3595. END LOOP;
  3596. ELSIF V2.RATE = '408603' THEN
  3597. FOR V IN (SELECT D.JUDGE_STOVE_NO,
  3598. D.BATCH_NO,
  3599. D.PROCESS_CODE,
  3600. D.ORD_LN_DLY_PK,
  3601. D.CRAFT_SOURCE
  3602. FROM QCM_ZC_CHECKCONSIGN C, QCM_ZC_CHECKCONSIGN D
  3603. WHERE C.CHECK_NO = V2.CHECK_NO
  3604. AND C.BATCH_NO = V2.BATCH_NO
  3605. AND D.JUDGE_STOVE_NO = C.JUDGE_STOVE_NO
  3606. AND D.PROCESS_CODE = C.PROCESS_CODE
  3607. AND D.ORD_LN_DLY_PK = C.ORD_LN_DLY_PK
  3608. GROUP BY D.JUDGE_STOVE_NO,
  3609. D.BATCH_NO,
  3610. D.PROCESS_CODE,
  3611. D.ORD_LN_DLY_PK,
  3612. D.CRAFT_SOURCE) LOOP
  3613. UPDATE QCM_BC_BATCH_RESULT A
  3614. SET A.JUDGE_RESULT_CODE = '40740704'
  3615. WHERE A.JUDGE_STOVE_NO = V.JUDGE_STOVE_NO
  3616. AND A.BATCH_NO = V.BATCH_NO
  3617. AND A.PROCESS_CODE = V.PROCESS_CODE
  3618. AND A.ORD_LN_DLY_PK = V.ORD_LN_DLY_PK
  3619. AND A.CRAFT_SOURCE = V.CRAFT_SOURCE;
  3620. END LOOP;
  3621. ELSE
  3622. FOR V IN (SELECT C.JUDGE_STOVE_NO,
  3623. C.BATCH_NO,
  3624. C.PROCESS_CODE,
  3625. C.ORD_LN_DLY_PK,
  3626. C.CRAFT_SOURCE
  3627. FROM QCM_ZC_CHECKCONSIGN C
  3628. WHERE C.CHECK_NO = V2.CHECK_NO
  3629. AND C.BATCH_NO = V2.BATCH_NO
  3630. GROUP BY C.JUDGE_STOVE_NO,
  3631. C.BATCH_NO,
  3632. C.PROCESS_CODE,
  3633. C.ORD_LN_DLY_PK,
  3634. C.CRAFT_SOURCE) LOOP
  3635. UPDATE QCM_BC_BATCH_RESULT A
  3636. SET A.JUDGE_RESULT_CODE = '40740704'
  3637. WHERE A.JUDGE_STOVE_NO = V.JUDGE_STOVE_NO
  3638. AND A.BATCH_NO = V.BATCH_NO
  3639. AND A.PROCESS_CODE = V.PROCESS_CODE
  3640. AND A.ORD_LN_DLY_PK = V.ORD_LN_DLY_PK
  3641. AND A.CRAFT_SOURCE = V.CRAFT_SOURCE;
  3642. END LOOP;
  3643. END IF;
  3644. END LOOP;
  3645. -- 委托表
  3646. DELETE FROM QCM_ZC_CHECKCONSIGN T WHERE T.CHECK_NO = '#NEW_CHECK_NO#';
  3647. DELETE FROM QCM_ZC_CHECKCONSIGN_DETAIL T
  3648. WHERE T.CHECK_NO = '#NEW_CHECK_NO#';
  3649. END;
  3650. </query>
  3651. <query id = "FrmMilBatchSampleNew.updateMilPortIsBatch" desc = "修改管号队列表已委托">
  3652. UPDATE PORT_MIL_BATCH_SAMPLE_RESULT T
  3653. SET T.IS_BATCH = '#IS_BATCH#',
  3654. T.CHECK_NO = DECODE(T.CHECK_NO,
  3655. NULL,
  3656. '#CHECK_NO#',
  3657. T.CHECK_NO || ',' || '#CHECK_NO#')
  3658. WHERE T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3659. AND T.LOT_NO = '#LOT_NO#'
  3660. AND T.BATCH_NO = '#BATCH_NO#'
  3661. AND T.MAT_NO = '#MAT_NO#'
  3662. </query>
  3663. <query id = "FrmMilBatchSampleNew.querypipeCheckconsignPhydetail">
  3664. select phydetail_id,
  3665. check_no,
  3666. batch_no,
  3667. sample_no,
  3668. index_seq,
  3669. dept_id,
  3670. phy_code_max,
  3671. phy_name_max,
  3672. phy_code_min,
  3673. phy_name_min,
  3674. phy_code,
  3675. phy_name,
  3676. phy_unit,
  3677. item_code_f,
  3678. item_name_f,
  3679. item_code_w,
  3680. item_name_w,
  3681. item_code_s,
  3682. item_name_s,
  3683. group_seq,
  3684. result_count,
  3685. ischeck,
  3686. isjudge,
  3687. isquote,
  3688. phy_type,
  3689. phy_formula,
  3690. stdmin_sign,
  3691. stdmin,
  3692. stdmax_sign,
  3693. stdmax,
  3694. judge_basis,
  3695. stdmin_sign2,
  3696. stdmin2,
  3697. stdmax_sign2,
  3698. stdmax2,
  3699. std_choose,
  3700. stdmemo,
  3701. addcondition,
  3702. addstdcon_code,
  3703. addstd_min_sign,
  3704. addstd_min,
  3705. addstd_max_sign,
  3706. addstd_max,
  3707. addpercent,
  3708. billet_sample,
  3709. remark,
  3710. value1,
  3711. value2,
  3712. value3,
  3713. value4,
  3714. value5,
  3715. value6,
  3716. value7,
  3717. value8,
  3718. value9,
  3719. value10,
  3720. value11,
  3721. value12,
  3722. value13,
  3723. value14,
  3724. value15,
  3725. average_value,
  3726. is_good,
  3727. is_defect,
  3728. calculation_formula,
  3729. seq,
  3730. phy_code_dir,
  3731. phy_name_dir,
  3732. spline_item_code_s,
  3733. spline_item_name_s,
  3734. spline_item_code_f,
  3735. spline_item_name_f,
  3736. value_ksi,
  3737. value_psi,
  3738. value_f2,
  3739. value_f3,
  3740. average_value_f,
  3741. common,
  3742. sample_jb,
  3743. notch_shape,
  3744. notch_type
  3745. from pipe_checkconsign_phydetail
  3746. where check_no = ?
  3747. </query>
  3748. <query id = "FrmMilBatchSampleNew.queryPipeCheckconsignDetail">
  3749. select check_no,
  3750. batch_no,
  3751. sample_no,
  3752. sample_no_min,
  3753. sample_barcode,
  3754. sample_len,
  3755. check_std,
  3756. phy_code_max,
  3757. phy_name_max,
  3758. sample_count,
  3759. dept_id,
  3760. length,
  3761. width,
  3762. eic,
  3763. phy_dir,
  3764. size_desc,
  3765. jg_send_name,
  3766. jg_send_time,
  3767. lab_receive_name,
  3768. lab_receive_time,
  3769. check_temp,
  3770. device_no,
  3771. device_name,
  3772. check_shift,
  3773. check_class,
  3774. check_name,
  3775. check_time,
  3776. audit_name,
  3777. audit_time,
  3778. isrcl,
  3779. rcl_move_remark,
  3780. is_notice_producer,
  3781. notice_producer_remark,
  3782. is_resample_rest,
  3783. resample_rest_remark,
  3784. spec_flag,
  3785. spec_move_remark,
  3786. flag,
  3787. sample_remark,
  3788. remark,
  3789. formual_no,
  3790. formual_name,
  3791. mat_no,
  3792. sample_type,
  3793. for_check_no,
  3794. validflag,
  3795. check_humidity,
  3796. std_steel_no,
  3797. std_steel_type,
  3798. std_steel_value,
  3799. actual_value,
  3800. hardness_type,
  3801. rate,
  3802. desc_rate,
  3803. ssc_condition,
  3804. jg_send_shift,
  3805. jg_send_group,
  3806. jg_print_count,
  3807. rcl_audit_name,
  3808. rcl_audit_time,
  3809. original_area,
  3810. lab_print_count,
  3811. rcl_flag,
  3812. file_path1,
  3813. file_path2,
  3814. head_mat_no,
  3815. bar_code,
  3816. sample_style,
  3817. merg_name,
  3818. merg_time,
  3819. back_memo,
  3820. update_name,
  3821. update_time,
  3822. content,
  3823. ts_sample_remark,
  3824. ts_remark,
  3825. file_path3,
  3826. file_path4,
  3827. rcl_audit_shift,
  3828. rcl_audit_class,
  3829. insert_flag,
  3830. hand_over_name,
  3831. take_over_name,
  3832. production_situation,
  3833. rcl_confirm_name,
  3834. rcl_confirm_time
  3835. from pipe_checkconsign_detail
  3836. where check_no = ?
  3837. </query>
  3838. <query id = "FrmMilBatchSampleNew.cancelUpdateMilPortIsBatch" desc = "修改管号队列">
  3839. UPDATE PORT_MIL_BATCH_SAMPLE_RESULT T SET T.IS_BATCH = '2',T.CHECK_NO = ''
  3840. WHERE T.LOT_NO = '#LOT_NO#' AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  3841. AND T.CHECK_NO = '#CHECK_NO#'
  3842. </query>
  3843. <query id = "FrmMilBatchSampleNew.doQueryPrdcrNo" desc = "查询监制编号">
  3844. select (select max(t1.flag_jhd)
  3845. from CRAFT_ORD_DESIGN t1
  3846. where t1.ord_ln_pk =
  3847. substr(t.ord_ln_dly_pk, 1, length(t.ord_ln_dly_pk) - 3)
  3848. and t1.craft_seq = t.craft_seq) jhFlag,
  3849. t.*
  3850. from PLN_ORDER_ZG_S t
  3851. WHERE T.PRO_PLAN_ID = ?
  3852. AND T.GX_PLAN_NO = ?
  3853. </query>
  3854. </queryMap>