rpt.ashx 180 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691269226932694269526962697269826992700270127022703270427052706270727082709271027112712271327142715271627172718271927202721272227232724272527262727272827292730273127322733273427352736273727382739274027412742274327442745274627472748274927502751275227532754275527562757275827592760276127622763276427652766276727682769277027712772277327742775277627772778277927802781278227832784278527862787278827892790279127922793279427952796279727982799280028012802280328042805280628072808280928102811281228132814281528162817281828192820282128222823282428252826282728282829283028312832283328342835283628372838283928402841284228432844284528462847284828492850285128522853285428552856285728582859286028612862286328642865286628672868286928702871287228732874287528762877287828792880288128822883288428852886288728882889289028912892289328942895289628972898289929002901290229032904290529062907290829092910291129122913291429152916291729182919292029212922292329242925292629272928292929302931293229332934293529362937293829392940294129422943294429452946294729482949295029512952295329542955295629572958295929602961296229632964296529662967296829692970297129722973297429752976297729782979298029812982298329842985298629872988298929902991299229932994299529962997299829993000300130023003300430053006300730083009301030113012301330143015301630173018301930203021302230233024302530263027302830293030303130323033303430353036303730383039304030413042304330443045304630473048304930503051305230533054305530563057305830593060306130623063306430653066306730683069307030713072307330743075307630773078307930803081308230833084308530863087308830893090309130923093309430953096309730983099310031013102310331043105310631073108310931103111311231133114311531163117311831193120312131223123312431253126312731283129313031313132313331343135313631373138313931403141314231433144314531463147314831493150315131523153315431553156315731583159316031613162316331643165316631673168316931703171317231733174317531763177317831793180318131823183318431853186318731883189319031913192319331943195319631973198319932003201320232033204320532063207320832093210321132123213321432153216321732183219322032213222322332243225322632273228322932303231323232333234323532363237323832393240324132423243324432453246324732483249325032513252325332543255325632573258325932603261326232633264326532663267326832693270327132723273327432753276327732783279328032813282328332843285328632873288328932903291329232933294329532963297329832993300330133023303330433053306330733083309331033113312331333143315331633173318331933203321332233233324332533263327332833293330333133323333333433353336333733383339334033413342334333443345
  1. <%@ WebHandler Language="C#" Class="rpt" %>
  2. using System;
  3. using System.Web;
  4. using System.Web.SessionState;
  5. using System.Data;
  6. using System.Text;
  7. using System.Collections;
  8. using System.Collections.Generic;
  9. using Newtonsoft.Json;
  10. using Newtonsoft.Json.Linq;
  11. using Curtain.DataAccess;
  12. using DK.XuWei.WebMes;
  13. public class rpt : IHttpHandler, IReadOnlySessionState
  14. {
  15. public void ProcessRequest(HttpContext context)
  16. {
  17. context.Response.ContentType = "text/plain";
  18. using(IDataAccess conn = DataAccess.Create())
  19. {
  20. int nodetype1;
  21. //主表
  22. if(context.Request["m"].ToString()=="0")
  23. {
  24. DateTime dateBegin = Convert.ToDateTime(context.Request["datebeginMaster"]);
  25. DateTime dateEnd = Convert.ToDateTime(context.Request["dateendMaster"]).AddDays(1);
  26. DateTime dbegin = dateBegin;
  27. string totalMaster = context.Request["totalMaster"].ToString();
  28. string datestr = "";
  29. if (totalMaster == "YYYYMMDD") {
  30. datestr += " SELECT " + "'" + dateBegin.Year + "'||'" + (dateBegin.Month + "").PadLeft(2, '0') + "'||'" + (dateBegin.Day + "").PadLeft(2, '0') + "' AS 时间 FROM DUAL ";
  31. while (dbegin < dateEnd.AddDays(-1)) {
  32. dbegin = dbegin.AddDays(1);
  33. datestr += " UNION SELECT " + "'" + dbegin.Year + "'||'" + (dbegin.Month + "").PadLeft(2, '0') + "'||'" + (dbegin.Day + "").PadLeft(2, '0') + "' AS 时间 FROM DUAL ";
  34. }
  35. datestr += " UNION SELECT '合计' AS 时间 FROM DUAL ";
  36. } else if (totalMaster == "YYYYMM") {
  37. datestr += " SELECT " + "'" + dateBegin.Year + "'||'" + (dateBegin.Month + "").PadLeft(2, '0') + "' AS 时间 FROM DUAL ";
  38. //while (dbegin.Month < dateEnd.AddDays(-1).Month) {
  39. // dbegin = dbegin.AddMonths(1);
  40. // datestr += " UNION SELECT " + "'" + dbegin.Year + "'||'" + (dbegin.Month + "").PadLeft(2, '0') + "' AS 时间 FROM DUAL ";
  41. //}
  42. DateTime start = Convert.ToDateTime(dateBegin.ToShortDateString());
  43. DateTime end = Convert.ToDateTime(dateEnd.ToShortDateString());
  44. TimeSpan sp = end.Subtract(start);
  45. while (DateTime.DaysInMonth(dateEnd.AddDays(-1).Year,dateEnd.AddDays(-1).Month)< sp.Days + dateBegin.Day - 1) {
  46. dbegin = dbegin.AddMonths(1);
  47. sp = end.Subtract(Convert.ToDateTime(dbegin.ToShortDateString()));
  48. datestr += " UNION SELECT " + "'" + dbegin.Year + "'||'" + (dbegin.Month + "").PadLeft(2, '0') + "' AS 时间 FROM DUAL ";
  49. }
  50. datestr += " UNION SELECT '合计' AS 时间 FROM DUAL ";
  51. }
  52. string groutinglineId = context.Request["groutinglineMaster[]"] is object ? context.Request["groutinglineMaster[]"].ToString() : "0,0";
  53. if (groutinglineId == "0,0" && (context.Request["groutinglineMaster"] is object)) groutinglineId = context.Request["groutinglineMaster"].ToString();
  54. if (groutinglineId == "") groutinglineId = "0,0";
  55. string goodsId = context.Request["goodsMaster[]"] is object ? context.Request["goodsMaster[]"].ToString() : "0,0";
  56. if (goodsId == "0,0" && (context.Request["goodsMaster"] is object)) goodsId = context.Request["goodsMaster"].ToString();
  57. if (goodsId == "") goodsId = "0,0";
  58. string highFlag = context.Request["highFlagMaster"];
  59. if (highFlag == "") highFlag = "-1";
  60. string testType = context.Request["testMaster"];
  61. if (testType == "2") testType = "";
  62. string testFlagMaster = context.Request["testFlagMaster"];
  63. if (testFlagMaster == "2") testFlagMaster = "";
  64. string testmouldflag = " ";
  65. if (testType == "0")
  66. {
  67. testmouldflag = " AND GDD.TESTMOULDFLAG = '0' ";
  68. }
  69. else if (testType == "1")
  70. {
  71. testmouldflag = " AND GDD.TESTMOULDFLAG = '1' ";
  72. }
  73. string testflagmaster = " ";
  74. if (testFlagMaster == "0")
  75. {
  76. testflagmaster = " AND GDD.TESTFLAG = '0' ";
  77. }
  78. else if (testFlagMaster == "1")
  79. {
  80. testflagmaster = " AND GDD.TESTFLAG = '1' ";
  81. }
  82. //读取报表数据
  83. string sqlStr = @"
  84. WITH
  85. 拼接日期 AS
  86. ({DATESTR}),
  87. 注浆数 AS
  88. (
  89. SELECT
  90. GROUPING_ID (TO_CHAR(GH.CREATETIME, 'YYYYMM')) AS GID,
  91. NVL(TO_CHAR(GH.CREATETIME, 'YYYYMM'),'合计') AS 时间,
  92. SUM(CASE WHEN (INSTR(GDD.GROUTINGLINECODE, 'A') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  93. AND INSTR(GT.GOODSTYPECODE, '001002') = 1 AND GH.DATATYPE = 1 THEN 1 ELSE
  94. CASE WHEN (INSTR(GDD.GROUTINGLINECODE, 'A') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  95. AND INSTR(GT.GOODSTYPECODE, '001002') = 1 AND GH.DATATYPE != 1 THEN -1 END
  96. END) AS 注浆数_一部全部,
  97. SUM(CASE WHEN (INSTR(GDD.GROUTINGLINECODE, 'B') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  98. AND INSTR(GT.GOODSTYPECODE, '001001') = 1 AND GH.DATATYPE = 1 THEN 1 ELSE
  99. CASE WHEN (INSTR(GDD.GROUTINGLINECODE, 'B') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  100. AND INSTR(GT.GOODSTYPECODE, '001001') = 1 AND GH.DATATYPE != 1 THEN -1 END
  101. END ) AS 注浆数_二部全部,
  102. SUM(CASE WHEN INSTR(GDD.GROUTINGLINECODE, 'C') = 1 AND GH.DATATYPE = 1 THEN 1 ELSE
  103. CASE WHEN INSTR(GDD.GROUTINGLINECODE, 'C') = 1 AND GH.DATATYPE != 1 THEN -1 END
  104. END ) 注浆数_三部全部
  105. FROM TP_PM_GOODSCHANGEHISTORY GH
  106. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  107. ON GDD.GROUTINGDAILYDETAILID = GH.GROUTINGDAILYDETAILID
  108. INNER JOIN TP_MST_USER U
  109. ON U.USERID = GH.USERID
  110. INNER JOIN TP_MST_GOODS G
  111. ON G.GOODSID = GH.GOODSID
  112. INNER JOIN TP_MST_GOODSTYPE GT
  113. ON G.GOODSTYPEID = GT.GOODSTYPEID
  114. INNER JOIN TP_PC_GROUTINGLINE GL
  115. ON GDD.GROUTINGLINEID = GL.GROUTINGLINEID
  116. WHERE GH.CREATETIME >= @DATEBEGIN@
  117. AND GH.CREATETIME < @DATEEND@
  118. AND (G.GOODSID IN (0,0) OR '0,0' = '0,0')
  119. AND (GDD.GROUTINGLINEID IN (0,0) OR '0,0' = '0,0')
  120. AND (GL.HIGHPRESSUREFLAG = @HIGHPRESSUREFLAG@ OR @HIGHPRESSUREFLAG@ = '-1')
  121. {TESTMOULDFLAG}
  122. {TESTFLAG}
  123. AND GH.DATATYPE IN (1, 2)
  124. AND G.SCRAPSUMFLAG = '1'
  125. GROUP BY GROUPING SETS (TO_CHAR(GH.CREATETIME, 'YYYYMM'),())
  126. ),
  127. 成型报损 AS
  128. (
  129. SELECT
  130. GROUPING_ID (TO_CHAR(GH.CREATETIME, 'YYYYMM')) AS GID,
  131. NVL(TO_CHAR(GH.CREATETIME, 'YYYYMM'),'合计') AS 时间,
  132. SUM(CASE WHEN (INSTR(GDD.GROUTINGLINECODE, 'A') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  133. AND INSTR(GT.GOODSTYPECODE, '001002') = 1 AND GH.DATATYPE = 3 THEN 1 ELSE
  134. CASE WHEN (INSTR(GDD.GROUTINGLINECODE, 'A') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  135. AND INSTR(GT.GOODSTYPECODE, '001002') = 1 AND GH.DATATYPE != 3 THEN -1 END
  136. END) AS 成型报损_一部全部,
  137. SUM(CASE WHEN (INSTR(GDD.GROUTINGLINECODE, 'B') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  138. AND INSTR(GT.GOODSTYPECODE, '001001') = 1 AND GH.DATATYPE = 3 THEN 1 ELSE
  139. CASE WHEN (INSTR(GDD.GROUTINGLINECODE, 'B') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  140. AND INSTR(GT.GOODSTYPECODE, '001001') = 1 AND GH.DATATYPE != 3 THEN -1 END
  141. END ) AS 成型报损_二部全部,
  142. SUM(CASE WHEN INSTR(GDD.GROUTINGLINECODE, 'C') = 1 AND GH.DATATYPE = 3 THEN 1 ELSE
  143. CASE WHEN INSTR(GDD.GROUTINGLINECODE, 'C') = 1 AND GH.DATATYPE != 3 THEN -1 END
  144. END ) 成型报损_三部全部
  145. FROM
  146. TP_PM_GOODSCHANGEHISTORY GH
  147. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON GDD.GROUTINGDAILYDETAILID = GH.GROUTINGDAILYDETAILID
  148. INNER JOIN TP_MST_USER U ON U.USERID = GH.USERID
  149. INNER JOIN TP_MST_GOODS G ON G.GOODSID = GH.GOODSID
  150. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID
  151. INNER JOIN TP_PC_GROUTINGLINE GL ON GDD.GROUTINGLINEID = GL.GROUTINGLINEID
  152. WHERE
  153. GH.CREATETIME >= @DATEBEGIN@
  154. AND GH.CREATETIME < @DATEEND@
  155. AND (G.GOODSID IN (0,0) OR '0,0' = '0,0')
  156. AND (GDD.GROUTINGLINEID IN (0,0) OR '0,0' = '0,0')
  157. AND (@HIGHPRESSUREFLAG@ = '-1' OR GL.HIGHPRESSUREFLAG = @HIGHPRESSUREFLAG@ )
  158. {TESTMOULDFLAG}
  159. {TESTFLAG}
  160. AND GH.DATATYPE IN ( 3, 4 )
  161. AND G.SCRAPSUMFLAG = '1'
  162. GROUP BY GROUPING SETS (TO_CHAR(GH.CREATETIME, 'YYYYMM'),())
  163. ),
  164. 半检不合格 AS
  165. (
  166. SELECT
  167. GROUPING_ID (T.时间) AS GID,
  168. NVL(T.时间,'合计') AS 时间,
  169. SUM(T.一车间) 半检不合格_一部全部,
  170. SUM(T.二车间) 半检不合格_二部全部,
  171. SUM(T.三车间) 半检不合格_三部全部
  172. FROM(
  173. SELECT
  174. SUM(CASE WHEN (INSTR(GDD.GROUTINGLINECODE, 'A') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  175. AND INSTR(GT.GOODSTYPECODE, '001002') = 1 THEN 1 ELSE 0
  176. END) AS 一车间,
  177. SUM(CASE WHEN (INSTR(GDD.GROUTINGLINECODE, 'B') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  178. AND INSTR(GT.GOODSTYPECODE, '001001') = 1 THEN 1 ELSE 0
  179. END ) AS 二车间,
  180. SUM(CASE WHEN INSTR(GDD.GROUTINGLINECODE, 'C') = 1 THEN 1 ELSE 0
  181. END ) 三车间,
  182. TO_CHAR(SP.AUDITDATE, 'YYYYMM') 时间
  183. FROM
  184. TP_PM_SCRAPPRODUCT SP
  185. INNER JOIN TSAP_HEGII_DATAITEM HGDI ON HGDI.DATACODE IN ( 20,30,40 )
  186. AND HGDI.ITEMTYPE = 2
  187. AND HGDI.ITEMID = SP.PROCEDUREID
  188. INNER JOIN TP_PM_PRODUCTIONDATA PD ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  189. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  190. INNER JOIN TP_MST_GOODS G ON G.GOODSID = GDD.GOODSID
  191. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID
  192. INNER JOIN TP_PC_GROUTINGLINE GL ON GDD.GROUTINGLINEID = GL.GROUTINGLINEID
  193. WHERE
  194. SP.AUDITSTATUS = 1
  195. AND SP.AUDITDATE >= @DATEBEGIN@
  196. AND SP.AUDITDATE < @DATEEND@
  197. AND (G.GOODSID IN (0,0) OR '0,0' = '0,0')
  198. AND (GDD.GROUTINGLINEID IN (0,0) OR '0,0' = '0,0')
  199. AND (GL.HIGHPRESSUREFLAG = @HIGHPRESSUREFLAG@ OR @HIGHPRESSUREFLAG@ = '-1')
  200. {TESTMOULDFLAG}
  201. {TESTFLAG}
  202. AND SP.SCRAPTYPE IN (2)
  203. GROUP BY TO_CHAR(SP.AUDITDATE, 'YYYYMM')
  204. UNION ALL-- 工序报损撤销
  205. SELECT
  206. SUM(CASE WHEN (INSTR(GDD.GROUTINGLINECODE, 'A') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  207. AND INSTR(GT.GOODSTYPECODE, '001002') = 1 THEN -1 ELSE 0
  208. END) AS 一车间,
  209. SUM(CASE WHEN (INSTR(GDD.GROUTINGLINECODE, 'B') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  210. AND INSTR(GT.GOODSTYPECODE, '001001') = 1 THEN -1 ELSE 0
  211. END ) AS 二车间,
  212. SUM(CASE WHEN INSTR(GDD.GROUTINGLINECODE, 'C') = 1 THEN -1 ELSE 0
  213. END ) 三车间,
  214. TO_CHAR(SP.BACKOUTTIME, 'YYYYMM') 时间
  215. FROM
  216. TP_PM_SCRAPPRODUCT SP
  217. INNER JOIN TSAP_HEGII_DATAITEM HGDI ON HGDI.DATACODE IN ( 20,30,40 )
  218. AND HGDI.ITEMTYPE = 2
  219. AND HGDI.ITEMID = SP.PROCEDUREID
  220. INNER JOIN TP_PM_PRODUCTIONDATA PD ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  221. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  222. INNER JOIN TP_MST_GOODS G ON G.GOODSID = GDD.GOODSID
  223. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID
  224. INNER JOIN TP_PC_GROUTINGLINE GL ON GDD.GROUTINGLINEID = GL.GROUTINGLINEID
  225. WHERE
  226. SP.AUDITSTATUS = 1
  227. AND SP.VALUEFLAG = '0'
  228. AND SP.SCRAPTYPE IN (2)
  229. AND SP.BACKOUTTIME >= @DATEBEGIN@
  230. AND SP.BACKOUTTIME < @DATEEND@
  231. AND (G.GOODSID IN (0,0) OR '0,0' = '0,0')
  232. AND (GDD.GROUTINGLINEID IN (0,0) OR '0,0' = '0,0')
  233. AND (GL.HIGHPRESSUREFLAG = @HIGHPRESSUREFLAG@ OR @HIGHPRESSUREFLAG@ = '-1')
  234. {TESTMOULDFLAG}
  235. {TESTFLAG}
  236. GROUP BY TO_CHAR(SP.BACKOUTTIME, 'YYYYMM')
  237. -- AND SP.SCRAPTYPE IN (0, 2, 3)
  238. UNION ALL
  239. -- 干补报损
  240. ---------------------------------------------------
  241. SELECT
  242. COUNT(CASE WHEN WORKSHOP = 1 THEN 1 ELSE 0 END) 一车间,
  243. COUNT(CASE WHEN WORKSHOP = 2 THEN 1 ELSE 0 END) 二车间,
  244. COUNT(CASE WHEN WORKSHOP = 3 THEN 1 ELSE 0 END) 三车间,
  245. TO_CHAR(AUDITDATE, 'YYYYMM') 时间
  246. --COUNT( * ) SCRAPNUM
  247. FROM
  248. (
  249. SELECT
  250. SP.GOODSCODE,
  251. GDD.MATERIALCODE SAPCODE,
  252. PD.USERCODE,
  253. CASE
  254. WHEN HGDI.WORKSHOP = 2
  255. AND INSTR( GT.GOODSTYPECODE, '001002' ) = 1 THEN
  256. 1
  257. WHEN HGDI.WORKSHOP = 2
  258. AND INSTR( GT.GOODSTYPECODE, '001001' ) = 1 THEN
  259. 2
  260. WHEN HGDI.WORKSHOP = 3 THEN
  261. 3 ELSE 4
  262. END AS WORKSHOP,
  263. GDD.TESTMOULDFLAG,
  264. G.GOODS_LINE_CODE,
  265. SP.AUDITDATE,
  266. TO_CHAR( SP.AUDITDATE, 'yymm' ) || '5000E' AS CHARG --TO_CHAR(SP.AUDITDATE, 'yyyymm') AS CHARG
  267. FROM
  268. (
  269. SELECT
  270. T.*
  271. FROM
  272. (
  273. SELECT
  274. SP.BARCODE,
  275. SP.GOODSCODE,
  276. SP.GROUTINGDAILYDETAILID,
  277. PD.PROCEDUREID,
  278. PD.PRODUCTIONDATAID,
  279. SP.AUDITDATE,
  280. RANK ( ) OVER ( PARTITION BY SP.BARCODE ORDER BY PD.PRODUCTIONDATAID DESC ) AS RK
  281. FROM
  282. TP_PM_SCRAPPRODUCT SP
  283. INNER JOIN TP_PM_PRODUCTIONDATA PD ON SP.BARCODE = PD.BARCODE -- 不包含干补工序
  284. AND PD.PROCEDUREID <> 18 -- 要找干补之前的工序
  285. AND PD.PRODUCTIONDATAID < SP.PRODUCTIONDATAID
  286. AND PD.VALUEFLAG = '1'
  287. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  288. INNER JOIN TP_MST_GOODS G ON G.GOODSID = GDD.GOODSID
  289. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID
  290. INNER JOIN TP_PC_GROUTINGLINE GL ON GDD.GROUTINGLINEID = GL.GROUTINGLINEID
  291. WHERE
  292. SP.AUDITSTATUS = 1
  293. AND SP.PROCEDUREID = 18
  294. AND SP.SCRAPTYPE IN (2)
  295. AND SP.AUDITDATE >= @DATEBEGIN@
  296. AND SP.AUDITDATE < @DATEEND@
  297. AND (G.GOODSID IN (0,0) OR '0,0' = '0,0')
  298. AND (GDD.GROUTINGLINEID IN (0,0) OR '0,0' = '0,0')
  299. AND (GL.HIGHPRESSUREFLAG = @HIGHPRESSUREFLAG@ OR @HIGHPRESSUREFLAG@ = '-1')
  300. {TESTMOULDFLAG}
  301. {TESTFLAG}
  302. ) T
  303. WHERE
  304. T.RK <= 1
  305. ) SP
  306. INNER JOIN TSAP_HEGII_DATAITEM HGDI ON HGDI.DATACODE IN ( 20,30,40 )
  307. AND HGDI.ITEMTYPE = 2
  308. AND HGDI.ITEMID = SP.PROCEDUREID
  309. INNER JOIN TP_PM_PRODUCTIONDATA PD ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  310. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  311. INNER JOIN TP_MST_GOODS G ON G.GOODSID = PD.GOODSID
  312. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID
  313. ) GROUP BY TO_CHAR(AUDITDATE, 'YYYYMM') )T GROUP BY
  314. GROUPING SETS ( T.时间, ( ) )
  315. ),
  316. 复检不合格 AS
  317. (
  318. SELECT
  319. GROUPING_ID (T.时间) AS GID,
  320. NVL(T.时间,'合计') AS 时间,
  321. SUM(T.一车间) 复检不合格_一部全部,
  322. SUM(T.二车间) 复检不合格_二部全部,
  323. SUM(T.三车间) 复检不合格_三部全部
  324. FROM(
  325. SELECT
  326. SUM(CASE WHEN (INSTR(GDD.GROUTINGLINECODE, 'A') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  327. AND INSTR(GT.GOODSTYPECODE, '001002') = 1 THEN 1 ELSE 0
  328. END) AS 一车间,
  329. SUM(CASE WHEN (INSTR(GDD.GROUTINGLINECODE, 'B') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  330. AND INSTR(GT.GOODSTYPECODE, '001001') = 1 THEN 1 ELSE 0
  331. END ) AS 二车间,
  332. SUM(CASE WHEN INSTR(GDD.GROUTINGLINECODE, 'C') = 1 THEN 1 ELSE 0
  333. END ) 三车间,
  334. TO_CHAR(SP.AUDITDATE, 'YYYYMM') 时间
  335. FROM
  336. TP_PM_SCRAPPRODUCT SP
  337. INNER JOIN TSAP_HEGII_DATAITEM HGDI ON HGDI.DATACODE IN ( 20,30,40 )
  338. AND HGDI.ITEMTYPE = 2
  339. AND HGDI.ITEMID = SP.PROCEDUREID
  340. INNER JOIN TP_PM_PRODUCTIONDATA PD ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  341. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  342. INNER JOIN TP_MST_GOODS G ON G.GOODSID = GDD.GOODSID
  343. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID
  344. INNER JOIN TP_PC_GROUTINGLINE GL ON GDD.GROUTINGLINEID = GL.GROUTINGLINEID
  345. WHERE
  346. SP.AUDITSTATUS = 1
  347. AND SP.AUDITDATE >= @DATEBEGIN@
  348. AND SP.AUDITDATE < @DATEEND@
  349. AND (G.GOODSID IN (0,0) OR '0,0' = '0,0')
  350. AND (GDD.GROUTINGLINEID IN (0,0) OR '0,0' = '0,0')
  351. AND (GL.HIGHPRESSUREFLAG = @HIGHPRESSUREFLAG@ OR @HIGHPRESSUREFLAG@ = '-1')
  352. {TESTMOULDFLAG}
  353. {TESTFLAG}
  354. AND SP.SCRAPTYPE IN (3)
  355. GROUP BY TO_CHAR(SP.AUDITDATE, 'YYYYMM')
  356. UNION ALL-- 工序报损撤销
  357. SELECT
  358. SUM(CASE WHEN (INSTR(GDD.GROUTINGLINECODE, 'A') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  359. AND INSTR(GT.GOODSTYPECODE, '001002') = 1 THEN -1 ELSE 0
  360. END) AS 一车间,
  361. SUM(CASE WHEN (INSTR(GDD.GROUTINGLINECODE, 'B') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  362. AND INSTR(GT.GOODSTYPECODE, '001001') = 1 THEN -1 ELSE 0
  363. END ) AS 二车间,
  364. SUM(CASE WHEN INSTR(GDD.GROUTINGLINECODE, 'C') = 1 THEN -1 ELSE 0
  365. END ) 三车间,
  366. TO_CHAR(SP.BACKOUTTIME, 'YYYYMM') 时间
  367. FROM
  368. TP_PM_SCRAPPRODUCT SP
  369. INNER JOIN TSAP_HEGII_DATAITEM HGDI ON HGDI.DATACODE IN ( 20,30,40 )
  370. AND HGDI.ITEMTYPE = 2
  371. AND HGDI.ITEMID = SP.PROCEDUREID
  372. INNER JOIN TP_PM_PRODUCTIONDATA PD ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  373. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  374. INNER JOIN TP_MST_GOODS G ON G.GOODSID = GDD.GOODSID
  375. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID
  376. INNER JOIN TP_PC_GROUTINGLINE GL ON GDD.GROUTINGLINEID = GL.GROUTINGLINEID
  377. WHERE
  378. SP.AUDITSTATUS = 1
  379. AND SP.VALUEFLAG = '0'
  380. AND SP.SCRAPTYPE IN (3)
  381. AND SP.BACKOUTTIME >= @DATEBEGIN@
  382. AND SP.BACKOUTTIME < @DATEEND@
  383. AND (G.GOODSID IN (0,0) OR '0,0' = '0,0')
  384. AND (GDD.GROUTINGLINEID IN (0,0) OR '0,0' = '0,0')
  385. AND (GL.HIGHPRESSUREFLAG = @HIGHPRESSUREFLAG@ OR @HIGHPRESSUREFLAG@ = '-1')
  386. {TESTMOULDFLAG}
  387. {TESTFLAG}
  388. GROUP BY TO_CHAR(SP.BACKOUTTIME, 'YYYYMM')
  389. -- AND SP.SCRAPTYPE IN (0, 2, 3)
  390. UNION ALL
  391. -- 干补报损
  392. ---------------------------------------------------
  393. SELECT
  394. COUNT(CASE WHEN WORKSHOP = 1 THEN 1 ELSE 0 END) 一车间,
  395. COUNT(CASE WHEN WORKSHOP = 2 THEN 1 ELSE 0 END) 二车间,
  396. COUNT(CASE WHEN WORKSHOP = 3 THEN 1 ELSE 0 END) 三车间,
  397. TO_CHAR(AUDITDATE, 'YYYYMM') 时间
  398. FROM
  399. (
  400. SELECT
  401. SP.GOODSCODE,
  402. GDD.MATERIALCODE SAPCODE,
  403. PD.USERCODE,
  404. CASE
  405. WHEN HGDI.WORKSHOP = 2
  406. AND INSTR( GT.GOODSTYPECODE, '001002' ) = 1 THEN
  407. 1
  408. WHEN HGDI.WORKSHOP = 2
  409. AND INSTR( GT.GOODSTYPECODE, '001001' ) = 1 THEN
  410. 2
  411. WHEN HGDI.WORKSHOP = 3 THEN
  412. 3 ELSE 4
  413. END AS WORKSHOP,
  414. GDD.TESTMOULDFLAG,
  415. G.GOODS_LINE_CODE,
  416. SP.AUDITDATE
  417. FROM
  418. (
  419. SELECT
  420. T.*
  421. FROM
  422. (
  423. SELECT
  424. SP.BARCODE,
  425. SP.GOODSCODE,
  426. SP.GROUTINGDAILYDETAILID,
  427. PD.PROCEDUREID,
  428. PD.PRODUCTIONDATAID,
  429. SP.AUDITDATE,
  430. RANK ( ) OVER ( PARTITION BY SP.BARCODE ORDER BY PD.PRODUCTIONDATAID DESC ) AS RK
  431. FROM
  432. TP_PM_SCRAPPRODUCT SP
  433. INNER JOIN TP_PM_PRODUCTIONDATA PD ON SP.BARCODE = PD.BARCODE -- 不包含干补工序
  434. AND PD.PROCEDUREID <> 18 -- 要找干补之前的工序
  435. AND PD.PRODUCTIONDATAID < SP.PRODUCTIONDATAID
  436. AND PD.VALUEFLAG = '1'
  437. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  438. INNER JOIN TP_MST_GOODS G ON G.GOODSID = GDD.GOODSID
  439. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID
  440. INNER JOIN TP_PC_GROUTINGLINE GL ON GDD.GROUTINGLINEID = GL.GROUTINGLINEID
  441. WHERE
  442. SP.AUDITSTATUS = 1
  443. AND SP.PROCEDUREID = 18
  444. AND SP.SCRAPTYPE IN (3)
  445. AND SP.AUDITDATE >= @DATEBEGIN@
  446. AND SP.AUDITDATE < @DATEEND@
  447. AND (G.GOODSID IN (0,0) OR '0,0' = '0,0')
  448. AND (GDD.GROUTINGLINEID IN (0,0) OR '0,0' = '0,0')
  449. AND (GL.HIGHPRESSUREFLAG = @HIGHPRESSUREFLAG@ OR @HIGHPRESSUREFLAG@ = '-1')
  450. {TESTMOULDFLAG}
  451. {TESTFLAG}
  452. ) T
  453. WHERE
  454. T.RK <= 1
  455. ) SP
  456. INNER JOIN TSAP_HEGII_DATAITEM HGDI ON HGDI.DATACODE IN ( 20,30,40 )
  457. AND HGDI.ITEMTYPE = 2
  458. AND HGDI.ITEMID = SP.PROCEDUREID
  459. INNER JOIN TP_PM_PRODUCTIONDATA PD ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  460. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  461. INNER JOIN TP_MST_GOODS G ON G.GOODSID = PD.GOODSID
  462. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID
  463. ) GROUP BY TO_CHAR(AUDITDATE, 'YYYYMM')
  464. )T GROUP BY
  465. GROUPING SETS ( T.时间, ( ) )
  466. ),
  467. 半成品损坯数 AS
  468. (
  469. SELECT
  470. GROUPING_ID (T.时间) AS GID,
  471. NVL(T.时间,'合计') AS 时间,
  472. SUM(T.一车间) 半成品损坯数_一部全部,
  473. SUM(T.二车间) 半成品损坯数_二部全部,
  474. SUM(T.三车间) 半成品损坯数_三部全部
  475. FROM(
  476. SELECT
  477. SUM( CASE WHEN HGDI.WORKSHOP = 2
  478. AND INSTR(GT.GOODSTYPECODE, '001002') = 1 THEN
  479. 1 ELSE 0
  480. END) AS 一车间,
  481. SUM(CASE WHEN HGDI.WORKSHOP = 2
  482. AND INSTR(GT.GOODSTYPECODE, '001001') = 1 THEN
  483. 1 ELSE 0
  484. END ) AS 二车间,
  485. SUM(CASE WHEN HGDI.WORKSHOP = 3 THEN 1 ELSE 0
  486. END ) 三车间,
  487. TO_CHAR(SP.AUDITDATE, 'YYYYMM') 时间
  488. FROM
  489. TP_PM_SCRAPPRODUCT SP
  490. INNER JOIN TSAP_HEGII_DATAITEM HGDI ON HGDI.DATACODE IN ( 20,30,40 )
  491. AND HGDI.ITEMTYPE = 2
  492. AND HGDI.ITEMID = SP.PROCEDUREID
  493. INNER JOIN TP_PM_PRODUCTIONDATA PD ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  494. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  495. INNER JOIN TP_MST_GOODS G ON G.GOODSID = GDD.GOODSID
  496. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID
  497. INNER JOIN TP_PC_GROUTINGLINE GL ON GDD.GROUTINGLINEID = GL.GROUTINGLINEID
  498. WHERE
  499. SP.AUDITSTATUS = 1
  500. AND SP.AUDITDATE >= @DATEBEGIN@
  501. AND SP.AUDITDATE < @DATEEND@
  502. AND (G.GOODSID IN (0,0) OR '0,0' = '0,0')
  503. AND (GDD.GROUTINGLINEID IN (0,0) OR '0,0' = '0,0')
  504. AND (GL.HIGHPRESSUREFLAG = @HIGHPRESSUREFLAG@ OR @HIGHPRESSUREFLAG@ = '-1')
  505. {TESTMOULDFLAG}
  506. {TESTFLAG}
  507. AND SP.SCRAPTYPE IN (0)
  508. GROUP BY TO_CHAR(SP.AUDITDATE, 'YYYYMM')
  509. UNION ALL-- 工序报损撤销
  510. SELECT
  511. SUM( CASE WHEN HGDI.WORKSHOP = 2
  512. AND INSTR(GT.GOODSTYPECODE, '001002') = 1 THEN
  513. -1 ELSE 0
  514. END) AS 一车间,
  515. SUM(CASE WHEN HGDI.WORKSHOP = 2
  516. AND INSTR(GT.GOODSTYPECODE, '001001') = 1 THEN
  517. -1 ELSE 0
  518. END ) AS 二车间,
  519. SUM(CASE WHEN HGDI.WORKSHOP = 3 THEN -1 ELSE 0
  520. END ) 三车间,
  521. TO_CHAR(SP.BACKOUTTIME, 'YYYYMM') 时间
  522. FROM
  523. TP_PM_SCRAPPRODUCT SP
  524. INNER JOIN TSAP_HEGII_DATAITEM HGDI ON HGDI.DATACODE IN ( 20,30,40 )
  525. AND HGDI.ITEMTYPE = 2
  526. AND HGDI.ITEMID = SP.PROCEDUREID
  527. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  528. INNER JOIN TP_MST_GOODS G ON G.GOODSID = GDD.GOODSID
  529. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID
  530. INNER JOIN TP_PC_GROUTINGLINE GL ON GDD.GROUTINGLINEID = GL.GROUTINGLINEID
  531. WHERE
  532. SP.AUDITSTATUS = 1
  533. AND SP.VALUEFLAG = '0'
  534. AND SP.SCRAPTYPE IN (0)
  535. AND SP.BACKOUTTIME >= @DATEBEGIN@
  536. AND SP.BACKOUTTIME < @DATEEND@ -- AND SP.SCRAPTYPE IN (0, 2, 3)
  537. AND (G.GOODSID IN (0,0) OR '0,0' = '0,0')
  538. AND (GDD.GROUTINGLINEID IN (0,0) OR '0,0' = '0,0')
  539. AND (GL.HIGHPRESSUREFLAG = @HIGHPRESSUREFLAG@ OR @HIGHPRESSUREFLAG@ = '-1')
  540. {TESTMOULDFLAG}
  541. {TESTFLAG}
  542. GROUP BY TO_CHAR(SP.BACKOUTTIME, 'YYYYMM') UNION ALL
  543. -- 干补报损
  544. ---------------------------------------------------
  545. SELECT
  546. SUM(CASE WHEN WORKSHOP = 1 THEN 1 ELSE 0 END) 一车间,
  547. SUM(CASE WHEN WORKSHOP = 2 THEN 1 ELSE 0 END) 二车间,
  548. SUM(CASE WHEN WORKSHOP = 3 THEN 1 ELSE 0 END) 三车间,
  549. TO_CHAR(AUDITDATE, 'YYYYMM') 时间
  550. FROM
  551. (
  552. SELECT
  553. SP.GOODSCODE,
  554. GDD.MATERIALCODE SAPCODE,
  555. PD.USERCODE,
  556. CASE
  557. WHEN HGDI.WORKSHOP = 2
  558. AND INSTR( GT.GOODSTYPECODE, '001002' ) = 1 THEN
  559. 1
  560. WHEN HGDI.WORKSHOP = 2
  561. AND INSTR( GT.GOODSTYPECODE, '001001' ) = 1 THEN
  562. 2
  563. WHEN HGDI.WORKSHOP = 3 THEN
  564. 3 ELSE 4
  565. END AS WORKSHOP,
  566. GDD.TESTMOULDFLAG,
  567. G.GOODS_LINE_CODE,
  568. SP.AUDITDATE
  569. FROM
  570. (
  571. SELECT
  572. T.*
  573. FROM
  574. (
  575. SELECT
  576. SP.BARCODE,
  577. SP.GOODSCODE,
  578. SP.GROUTINGDAILYDETAILID,
  579. PD.PROCEDUREID,
  580. PD.PRODUCTIONDATAID,
  581. SP.AUDITDATE,
  582. RANK ( ) OVER ( PARTITION BY SP.BARCODE ORDER BY PD.PRODUCTIONDATAID DESC ) AS RK
  583. FROM
  584. TP_PM_SCRAPPRODUCT SP
  585. INNER JOIN TP_PM_PRODUCTIONDATA PD ON SP.BARCODE = PD.BARCODE -- 不包含干补工序
  586. AND PD.PROCEDUREID <> 18 -- 要找干补之前的工序
  587. AND PD.PRODUCTIONDATAID < SP.PRODUCTIONDATAID
  588. AND PD.VALUEFLAG = '1'
  589. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  590. INNER JOIN TP_MST_GOODS G ON G.GOODSID = GDD.GOODSID
  591. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID
  592. INNER JOIN TP_PC_GROUTINGLINE GL ON GDD.GROUTINGLINEID = GL.GROUTINGLINEID
  593. WHERE
  594. SP.AUDITSTATUS = 1
  595. AND SP.PROCEDUREID = 18
  596. AND SP.SCRAPTYPE IN (0)
  597. AND SP.AUDITDATE >= @DATEBEGIN@
  598. AND SP.AUDITDATE < @DATEEND@
  599. AND (G.GOODSID IN (0,0) OR '0,0' = '0,0')
  600. AND (GDD.GROUTINGLINEID IN (0,0) OR '0,0' = '0,0')
  601. AND (GL.HIGHPRESSUREFLAG = @HIGHPRESSUREFLAG@ OR @HIGHPRESSUREFLAG@ = '-1')
  602. {TESTMOULDFLAG}
  603. {TESTFLAG}
  604. ) T
  605. WHERE
  606. T.RK <= 1
  607. ) SP
  608. INNER JOIN TSAP_HEGII_DATAITEM HGDI ON HGDI.DATACODE IN ( 20,30,40 )
  609. AND HGDI.ITEMTYPE = 2
  610. AND HGDI.ITEMID = SP.PROCEDUREID
  611. INNER JOIN TP_PM_PRODUCTIONDATA PD ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  612. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  613. INNER JOIN TP_MST_GOODS G ON G.GOODSID = PD.GOODSID
  614. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID
  615. ) GROUP BY TO_CHAR(AUDITDATE, 'YYYYMM')
  616. )T GROUP BY
  617. GROUPING SETS ( T.时间, ( ) )
  618. ),
  619. 干补回收数 AS
  620. (
  621. SELECT
  622. GROUPING_ID (T.时间) AS GID,
  623. NVL(T.时间,'合计') AS 时间,
  624. SUM(T.一车间) 干补回收数_一部全部,
  625. SUM(T.二车间) 干补回收数_二部全部,
  626. SUM(T.三车间) 干补回收数_三部全部
  627. FROM(
  628. SELECT
  629. SUM(CASE WHEN (INSTR(GDD.GROUTINGLINECODE, 'A') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  630. AND INSTR(GT.GOODSTYPECODE, '001002') = 1 THEN 1 ELSE 0
  631. END) AS 一车间,
  632. SUM(CASE WHEN (INSTR(GDD.GROUTINGLINECODE, 'B') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  633. AND INSTR(GT.GOODSTYPECODE, '001001') = 1 THEN 1 ELSE 0
  634. END ) AS 二车间,
  635. SUM(CASE WHEN INSTR(GDD.GROUTINGLINECODE, 'C') = 1 THEN 1 ELSE 0
  636. END ) 三车间,
  637. TO_CHAR(SP.SPECIALREPAIRTIME, 'YYYYMM') 时间
  638. FROM
  639. TP_PM_SCRAPPRODUCT SP
  640. INNER JOIN TSAP_HEGII_DATAITEM HGDI ON HGDI.DATACODE IN ( '20', '30', '40' )
  641. AND HGDI.ITEMTYPE = 2
  642. AND HGDI.ITEMID = SP.PROCEDUREID
  643. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  644. INNER JOIN TP_MST_GOODS G ON G.GOODSID = GDD.GOODSID
  645. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID
  646. INNER JOIN TP_PC_GROUTINGLINE GL ON GDD.GROUTINGLINEID = GL.GROUTINGLINEID
  647. WHERE
  648. SP.AUDITSTATUS = 1
  649. AND SP.GOODSLEVELTYPEID = 9
  650. AND SP.SPECIALREPAIRTIME >= @DATEBEGIN@
  651. AND SP.SPECIALREPAIRTIME < @DATEEND@
  652. AND (G.GOODSID IN (0,0) OR '0,0' = '0,0')
  653. AND (GDD.GROUTINGLINEID IN (0,0) OR '0,0' = '0,0')
  654. AND (GL.HIGHPRESSUREFLAG = @HIGHPRESSUREFLAG@ OR @HIGHPRESSUREFLAG@ = '-1')
  655. {TESTMOULDFLAG}
  656. {TESTFLAG}
  657. GROUP BY TO_CHAR(SP.SPECIALREPAIRTIME, 'YYYYMM'))T GROUP BY
  658. GROUPING SETS ( T.时间, ( ) )
  659. ),
  660. 出窑数 AS
  661. (
  662. SELECT
  663. GROUPING_ID (TT2.时间) AS GID,
  664. NVL(TT2.时间,'合计') AS 时间,
  665. SUM(TT2.出窑数_一部全部) 出窑数_一部全部,
  666. SUM(TT2.出窑数_二部全部) 出窑数_二部全部,
  667. SUM(TT2.出窑数_三部全部) 出窑数_三部全部
  668. FROM(
  669. SELECT
  670. TO_CHAR(TT.CREATETIME, 'YYYYMM') AS 时间,
  671. SUM(CASE WHEN TT.WORKSHOP = 1 THEN 1 ELSE 0 END) 出窑数_一部全部,
  672. SUM(CASE WHEN TT.WORKSHOP = 2 THEN 1 ELSE 0 END) 出窑数_二部全部,
  673. SUM(CASE WHEN TT.WORKSHOP = 3 THEN 1 ELSE 0 END) 出窑数_三部全部
  674. FROM(
  675. SELECT CASE
  676. WHEN T.IS3 > 0 THEN
  677. 3
  678. WHEN INSTR(T.GOODSTYPECODE, '001002') = 1 THEN
  679. 1
  680. WHEN INSTR(T.GOODSTYPECODE, '001001') = 1 THEN
  681. 2
  682. ELSE
  683. 2
  684. END AS WORKSHOP,
  685. T.*
  686. FROM (SELECT DISTINCT PD.BARCODE,
  687. PD.GOODSCODE,
  688. PD.CREATETIME,
  689. GDD.MATERIALCODE SAPCODE,
  690. PD.USERCODE,
  691. DECODE(GDD.TESTMOULDFLAG, 0, 'C', 1, 'Y', '-') AS TESTMOULDFLAG,
  692. G.GOODS_LINE_CODE,
  693. TO_CHAR(PD.CREATETIME, 'yymm') || '5000E' AS CHARG,
  694. --TO_CHAR(PD.CREATETIME, 'yyyymm') AS CHARG,
  695. HGDI.WORKSHOP AS HGDIWORKSHOP,
  696. GT.GOODSTYPECODE,
  697. -- 如果3#卸窑(103),就是3车间的
  698. (SELECT COUNT(1)
  699. FROM TP_PM_PRODUCTIONDATA PD2
  700. WHERE PD2.BARCODE = PD.BARCODE
  701. AND PD2.PROCEDUREID = 103) AS IS3
  702. FROM TP_PM_PRODUCTIONDATA PD
  703. INNER JOIN TSAP_HEGII_DATAITEM HGDI
  704. ON HGDI.DATACODE = '50'
  705. AND HGDI.ITEMTYPE = 1
  706. AND HGDI.ITEMID = PD.PROCEDUREID -- 3#成检交接(本烧重烧共用,且可以改判)
  707. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  708. ON GDD.GROUTINGDAILYDETAILID = PD.GROUTINGDAILYDETAILID
  709. INNER JOIN TP_MST_GOODS G
  710. ON G.GOODSID = PD.GOODSID
  711. INNER JOIN TP_MST_GOODSTYPE GT
  712. ON G.GOODSTYPEID = GT.GOODSTYPEID
  713. INNER JOIN TP_PC_GROUTINGLINE GL ON GDD.GROUTINGLINEID = GL.GROUTINGLINEID
  714. WHERE PD.CREATETIME >= @DATEBEGIN@
  715. AND PD.CREATETIME < @DATEEND@
  716. AND (G.GOODSID IN (0,0) OR '0,0' = '0,0')
  717. AND (GDD.GROUTINGLINEID IN (0,0) OR '0,0' = '0,0')
  718. AND (GL.HIGHPRESSUREFLAG = @HIGHPRESSUREFLAG@ OR @HIGHPRESSUREFLAG@ = '-1')
  719. {TESTMOULDFLAG}
  720. {TESTFLAG}
  721. AND PD.ISREFIRE = '0'
  722. AND PD.Islengbu = '0'
  723. --AND PD.KILNID IN(1,2,5)-- 取本烧的窑炉
  724. --AND ((HGDI.ITEMID <> 104 AND PD.VALUEFLAG = '1') OR
  725. -- (HGDI.ITEMID = 104 AND PD.ISREFIRE = '0' AND
  726. -- PD.CHECKFLAG = '1'))) T
  727. AND ((HGDI.ITEMID = 11 AND (PD.CHECKFLAG = '1' OR PD.CHECKFLAG IS NULL))
  728. OR (HGDI.ITEMID = 104 AND PD.CHECKFLAG = '1')) ) T )TT
  729. GROUP BY TO_CHAR(TT.CREATETIME, 'YYYYMM') )TT2 GROUP BY
  730. GROUPING SETS ( TT2.时间, ( ) )
  731. ),
  732. 回收数 AS
  733. (
  734. SELECT
  735. GROUPING_ID (TT2.时间) AS GID,
  736. NVL(TT2.时间,'合计') AS 时间,
  737. SUM(TT2.回收数_一部全部) 回收数_一部全部,
  738. SUM(TT2.回收数_二部全部) 回收数_二部全部,
  739. SUM(TT2.回收数_三部全部) 回收数_三部全部
  740. FROM(
  741. SELECT
  742. TT.CHARG AS 时间,
  743. SUM(CASE WHEN TT.WORKSHOP = 1 AND TT.RECYCLINGFLAG = '1' THEN 1 ELSE 0 END) 回收数_一部全部,
  744. SUM(CASE WHEN TT.WORKSHOP = 2 AND TT.RECYCLINGFLAG = '1' THEN 1 ELSE 0 END) 回收数_二部全部,
  745. SUM(CASE WHEN TT.WORKSHOP = 3 AND TT.RECYCLINGFLAG = '1' THEN 1 ELSE 0 END) 回收数_三部全部
  746. FROM(
  747. SELECT BAR.GOODSCODE,
  748. BAR.MATERIALCODE SAPCODE,
  749. GH.FHUSERCODE USERCODE,
  750. O.ORDERNO,
  751. BAR.RECYCLINGFLAG,
  752. BAR.TESTMOULDFLAG,
  753. DECODE(BAR.TESTMOULDFLAG
  754. ,'0'
  755. ,''
  756. ,DECODE(G.GOODS_LINE_CODE, 'G', 'A', 'M', 'A', 'L', 'B', '')) AS ZSCS,
  757. CASE
  758. WHEN O.ORDERID IS NULL
  759. OR O.ORDERNO LIKE 'HEGII%' THEN
  760. ' '
  761. WHEN INSTR(O.ORDERNO, '/') = 0 THEN
  762. TO_CHAR(O.ORDERNO)
  763. ELSE
  764. TO_CHAR(SUBSTR(O.ORDERNO, 1, INSTR(O.ORDERNO, '/') - 1))
  765. END ORDERCODE -- 销售凭证
  766. ,
  767. CASE
  768. WHEN O.ORDERID IS NULL
  769. OR O.ORDERNO LIKE 'HEGII%'
  770. OR INSTR(O.ORDERNO, '/') = 0 THEN
  771. '0'
  772. WHEN INSTR(O.ORDERNO, '#') = 0 THEN
  773. TO_CHAR(SUBSTR(O.ORDERNO, INSTR(O.ORDERNO, '/') + 1))
  774. ELSE
  775. TO_CHAR(SUBSTR(O.ORDERNO
  776. ,INSTR(O.ORDERNO, '/') + 1
  777. ,INSTR(O.ORDERNO, '#') - INSTR(O.ORDERNO, '/') - 1))
  778. END ORDERITEM,
  779. CASE
  780. WHEN (INSTR(BAR.GROUTINGLINECODE, 'A') = 1 OR
  781. INSTR(BAR.GROUTINGLINECODE, 'D') = 1)
  782. AND INSTR(GT.GOODSTYPECODE, '001002') = 1 THEN
  783. 1
  784. WHEN (INSTR(BAR.GROUTINGLINECODE, 'B') = 1 OR
  785. INSTR(BAR.GROUTINGLINECODE, 'D') = 1)
  786. AND INSTR(GT.GOODSTYPECODE, '001001') = 1 THEN
  787. 2
  788. WHEN INSTR(BAR.GROUTINGLINECODE, 'C') = 1 THEN
  789. 3
  790. ELSE
  791. 0
  792. END AS WORKSHOP,
  793. TO_CHAR(GH.FHTIME, 'YYYYMM') AS CHARG
  794. FROM TP_PM_GROUTINGDAILYDETAIL BAR
  795. INNER JOIN TP_PM_FINISHEDPRODUCT GH
  796. ON BAR.GROUTINGDAILYDETAILID = GH.GROUTINGDAILYDETAILID
  797. INNER JOIN TP_MST_GOODS G
  798. ON G.GOODSID = BAR.GOODSID
  799. INNER JOIN TP_MST_GOODSTYPE GT
  800. ON GT.GOODSTYPEID = G.GOODSTYPEID
  801. LEFT JOIN TP_PM_ORDER O
  802. ON O.ORDERID = GH.FHORDERID
  803. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  804. ON GDD.GROUTINGDAILYDETAILID = BAR.GROUTINGDAILYDETAILID
  805. INNER JOIN TP_PC_GROUTINGLINE GL ON GDD.GROUTINGLINEID = GL.GROUTINGLINEID
  806. WHERE GH.FHUSERID IS NOT NULL
  807. AND GH.FHTIME >= @DATEBEGIN@
  808. AND (G.GOODSID IN (0,0) OR '0,0' = '0,0')
  809. AND (GDD.GROUTINGLINEID IN (0,0) OR '0,0' = '0,0')
  810. AND (GL.HIGHPRESSUREFLAG = @HIGHPRESSUREFLAG@ OR @HIGHPRESSUREFLAG@ = '-1')
  811. {TESTMOULDFLAG}
  812. {TESTFLAG}
  813. AND GH.FHTIME < @DATEEND@ )TT GROUP BY TT.CHARG )TT2 GROUP BY
  814. GROUPING SETS ( TT2.时间, ( ) )
  815. ),
  816. 入库数 AS
  817. (
  818. SELECT
  819. GROUPING_ID (TT2.时间) AS GID,
  820. NVL(TT2.时间,'合计') AS 时间,
  821. SUM(TT2.入库数_一部全部) 入库数_一部全部,
  822. SUM(TT2.入库数_二部全部) 入库数_二部全部,
  823. SUM(TT2.入库数_三部全部) 入库数_三部全部
  824. FROM(
  825. SELECT
  826. TT.CHARG AS 时间,
  827. SUM(CASE WHEN TT.WORKSHOP = 1 AND TT.RECYCLINGFLAG = '0' THEN 1 ELSE 0 END) 入库数_一部全部,
  828. SUM(CASE WHEN TT.WORKSHOP = 2 AND TT.RECYCLINGFLAG = '0' THEN 1 ELSE 0 END) 入库数_二部全部,
  829. SUM(CASE WHEN TT.WORKSHOP = 3 AND TT.RECYCLINGFLAG = '0' THEN 1 ELSE 0 END) 入库数_三部全部
  830. FROM(
  831. SELECT BAR.GOODSCODE,
  832. BAR.MATERIALCODE SAPCODE,
  833. GH.FHUSERCODE USERCODE,
  834. O.ORDERNO,
  835. BAR.RECYCLINGFLAG,
  836. BAR.TESTMOULDFLAG,
  837. DECODE(BAR.TESTMOULDFLAG
  838. ,'0'
  839. ,''
  840. ,DECODE(G.GOODS_LINE_CODE, 'G', 'A', 'M', 'A', 'L', 'B', '')) AS ZSCS,
  841. CASE
  842. WHEN O.ORDERID IS NULL
  843. OR O.ORDERNO LIKE 'HEGII%' THEN
  844. ' '
  845. WHEN INSTR(O.ORDERNO, '/') = 0 THEN
  846. TO_CHAR(O.ORDERNO)
  847. ELSE
  848. TO_CHAR(SUBSTR(O.ORDERNO, 1, INSTR(O.ORDERNO, '/') - 1))
  849. END ORDERCODE -- 销售凭证
  850. ,
  851. CASE
  852. WHEN O.ORDERID IS NULL
  853. OR O.ORDERNO LIKE 'HEGII%'
  854. OR INSTR(O.ORDERNO, '/') = 0 THEN
  855. '0'
  856. WHEN INSTR(O.ORDERNO, '#') = 0 THEN
  857. TO_CHAR(SUBSTR(O.ORDERNO, INSTR(O.ORDERNO, '/') + 1))
  858. ELSE
  859. TO_CHAR(SUBSTR(O.ORDERNO
  860. ,INSTR(O.ORDERNO, '/') + 1
  861. ,INSTR(O.ORDERNO, '#') - INSTR(O.ORDERNO, '/') - 1))
  862. END ORDERITEM,
  863. CASE
  864. WHEN (INSTR(BAR.GROUTINGLINECODE, 'A') = 1 OR
  865. INSTR(BAR.GROUTINGLINECODE, 'D') = 1)
  866. AND INSTR(GT.GOODSTYPECODE, '001002') = 1 THEN
  867. 1
  868. WHEN (INSTR(BAR.GROUTINGLINECODE, 'B') = 1 OR
  869. INSTR(BAR.GROUTINGLINECODE, 'D') = 1)
  870. AND INSTR(GT.GOODSTYPECODE, '001001') = 1 THEN
  871. 2
  872. WHEN INSTR(BAR.GROUTINGLINECODE, 'C') = 1 THEN
  873. 3
  874. ELSE
  875. 0
  876. END AS WORKSHOP,
  877. TO_CHAR(GH.FHTIME, 'YYYYMM') AS CHARG
  878. FROM TP_PM_GROUTINGDAILYDETAIL BAR
  879. INNER JOIN TP_PM_FINISHEDPRODUCT GH
  880. ON BAR.GROUTINGDAILYDETAILID = GH.GROUTINGDAILYDETAILID
  881. INNER JOIN TP_MST_GOODS G
  882. ON G.GOODSID = BAR.GOODSID
  883. INNER JOIN TP_MST_GOODSTYPE GT
  884. ON GT.GOODSTYPEID = G.GOODSTYPEID
  885. LEFT JOIN TP_PM_ORDER O
  886. ON O.ORDERID = GH.FHORDERID
  887. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  888. ON GDD.GROUTINGDAILYDETAILID = BAR.GROUTINGDAILYDETAILID
  889. INNER JOIN TP_PC_GROUTINGLINE GL ON GDD.GROUTINGLINEID = GL.GROUTINGLINEID
  890. WHERE GH.FHUSERID IS NOT NULL
  891. AND GH.FHTIME >= @DATEBEGIN@
  892. AND GH.FHTIME < @DATEEND@
  893. AND (G.GOODSID IN (0,0) OR '0,0' = '0,0')
  894. AND (GDD.GROUTINGLINEID IN (0,0) OR '0,0' = '0,0')
  895. AND (GL.HIGHPRESSUREFLAG = @HIGHPRESSUREFLAG@ OR @HIGHPRESSUREFLAG@ = '-1')
  896. {TESTMOULDFLAG}
  897. {TESTFLAG}
  898. )TT GROUP BY TT.CHARG)TT2 GROUP BY
  899. GROUPING SETS ( TT2.时间, ( ) )
  900. ),
  901. 质量登记次品数 AS
  902. (
  903. SELECT
  904. GROUPING_ID (TT2.时间) AS GID,
  905. NVL(TT2.时间,'合计') AS 时间,
  906. SUM(TT2.质量登记次品数_一部全部) 质量登记次品数_一部全部,
  907. SUM(TT2.质量登记次品数_二部全部) 质量登记次品数_二部全部,
  908. SUM(TT2.质量登记次品数_三部全部) 质量登记次品数_三部全部
  909. FROM(
  910. SELECT
  911. TT.CHARG AS 时间,
  912. SUM(CASE WHEN TT.WORKSHOP = 1 THEN SCRAPNUM ELSE 0 END) 质量登记次品数_一部全部,
  913. SUM(CASE WHEN TT.WORKSHOP = 2 THEN SCRAPNUM ELSE 0 END) 质量登记次品数_二部全部,
  914. SUM(CASE WHEN TT.WORKSHOP = 3 THEN SCRAPNUM ELSE 0 END) 质量登记次品数_三部全部
  915. FROM(
  916. SELECT GOODSCODE,
  917. SAPCODE,
  918. USERCODE,
  919. 0 OUTPUTNUM,
  920. COUNT(*) SCRAPNUM,
  921. 0 CLEANUPNUM,
  922. 0 REPAIRNUM,
  923. WORKSHOP,
  924. TESTMOULDFLAG,
  925. GOODS_LINE_CODE,
  926. CHARG
  927. FROM (SELECT CASE
  928. WHEN T.IS3 > 0 THEN
  929. 3
  930. WHEN T.HGDIWORKSHOP = 2
  931. AND INSTR(T.GOODSTYPECODE, '001002') = 1 THEN
  932. 1
  933. WHEN T.HGDIWORKSHOP = 2
  934. AND INSTR(T.GOODSTYPECODE, '001001') = 1 THEN
  935. 2
  936. WHEN T.HGDIWORKSHOP = 3 THEN
  937. 3
  938. ELSE
  939. 2
  940. END AS WORKSHOP,
  941. T.*
  942. FROM (SELECT SP.BARCODE,
  943. SP.GOODSCODE,
  944. GDD.MATERIALCODE SAPCODE,
  945. PD.USERCODE,
  946. GT.GOODSTYPECODE,
  947. DECODE(GDD.TESTMOULDFLAG, 0, 'C', 1, 'Y', '-') AS TESTMOULDFLAG,
  948. G.GOODS_LINE_CODE,
  949. TO_CHAR(SP.AUDITDATE, 'YYYYMM') AS CHARG,
  950. --TO_CHAR(SP.AUDITDATE, 'yyyymm') AS CHARG,
  951. HGDI.WORKSHOP AS HGDIWORKSHOP,
  952. -- 如果参与了重烧,则判断这个条码是否走过3#卸窑
  953. (SELECT COUNT(1)
  954. FROM TP_PM_PRODUCTIONDATA PD2
  955. WHERE PD2.BARCODE = PD.BARCODE
  956. AND PD2.PROCEDUREID = 103
  957. -- 重烧相关的ID
  958. AND SP.PROCEDUREID IN (14, 16, 57, 58, 59, 60,113)) AS IS3
  959. FROM TP_PM_SCRAPPRODUCT SP
  960. INNER JOIN TSAP_HEGII_DATAITEM HGDI
  961. ON HGDI.DATACODE = '50'
  962. AND HGDI.ITEMTYPE = 2
  963. AND HGDI.ITEMID = SP.PROCEDUREID
  964. INNER JOIN TP_PM_PRODUCTIONDATA PD
  965. ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  966. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  967. ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  968. INNER JOIN TP_MST_GOODS G
  969. ON G.GOODSID = PD.GOODSID
  970. INNER JOIN TP_MST_GOODSTYPE GT
  971. ON G.GOODSTYPEID = GT.GOODSTYPEID
  972. INNER JOIN TP_PC_GROUTINGLINE GL ON GDD.GROUTINGLINEID = GL.GROUTINGLINEID
  973. WHERE SP.AUDITSTATUS = 1
  974. AND SP.AUDITDATE >= @DATEBEGIN@
  975. AND SP.AUDITDATE < @DATEEND@
  976. AND (G.GOODSID IN (0,0) OR '0,0' = '0,0')
  977. AND (GDD.GROUTINGLINEID IN (0,0) OR '0,0' = '0,0')
  978. AND (GL.HIGHPRESSUREFLAG = @HIGHPRESSUREFLAG@ OR @HIGHPRESSUREFLAG@ = '-1')
  979. {TESTMOULDFLAG}
  980. {TESTFLAG}
  981. AND PD.ISREFIRE = 0
  982. AND SP.GOODSLEVELTYPEID in (7)
  983. --AND SP.SCRAPTYPE = 1
  984. --AND SP.SCRAPTYPE IN (0, 2, 3)
  985. ) T)
  986. GROUP BY GOODSCODE,
  987. SAPCODE,
  988. USERCODE,
  989. WORKSHOP,
  990. TESTMOULDFLAG,
  991. GOODS_LINE_CODE,
  992. CHARG
  993. ---------------------------------------------------
  994. UNION ALL
  995. -- 工序报损撤销
  996. ---------------------------------------------------
  997. SELECT GOODSCODE,
  998. SAPCODE,
  999. USERCODE,
  1000. 0 OUTPUTNUM,
  1001. 0 - COUNT(*) SCRAPNUM,
  1002. 0 CLEANUPNUM,
  1003. 0 REPAIRNUM,
  1004. WORKSHOP,
  1005. TESTMOULDFLAG,
  1006. GOODS_LINE_CODE,
  1007. CHARG
  1008. FROM (SELECT CASE
  1009. WHEN T.IS3 > 0 THEN
  1010. 3
  1011. WHEN T.HGDIWORKSHOP = 2
  1012. AND INSTR(T.GOODSTYPECODE, '001002') = 1 THEN
  1013. 1
  1014. WHEN T.HGDIWORKSHOP = 2
  1015. AND INSTR(T.GOODSTYPECODE, '001001') = 1 THEN
  1016. 2
  1017. WHEN T.HGDIWORKSHOP = 3 THEN
  1018. 3
  1019. ELSE
  1020. 2
  1021. END AS WORKSHOP,
  1022. T.*
  1023. FROM (SELECT SP.BARCODE,
  1024. SP.GOODSCODE,
  1025. GDD.MATERIALCODE SAPCODE,
  1026. PD.USERCODE,
  1027. GT.GOODSTYPECODE,
  1028. DECODE(GDD.TESTMOULDFLAG, 0, 'C', 1, 'Y', '-') AS TESTMOULDFLAG,
  1029. G.GOODS_LINE_CODE,
  1030. TO_CHAR(SP.BACKOUTTIME, 'YYYYMM') AS CHARG,
  1031. --TO_CHAR(SP.AUDITDATE, 'yyyymm') AS CHARG,
  1032. HGDI.WORKSHOP AS HGDIWORKSHOP,
  1033. -- 如果参与了重烧,则判断这个条码是否走过3#卸窑
  1034. (SELECT COUNT(1)
  1035. FROM TP_PM_PRODUCTIONDATA PD2
  1036. WHERE PD2.BARCODE = PD.BARCODE
  1037. AND PD2.PROCEDUREID = 103
  1038. -- 重烧相关的ID
  1039. AND SP.PROCEDUREID IN (14, 16, 57, 58, 59, 60,113)) AS IS3
  1040. FROM TP_PM_SCRAPPRODUCT SP
  1041. INNER JOIN TSAP_HEGII_DATAITEM HGDI
  1042. ON HGDI.DATACODE = '50'
  1043. AND HGDI.ITEMTYPE = 2
  1044. AND HGDI.ITEMID = SP.PROCEDUREID
  1045. INNER JOIN TP_PM_PRODUCTIONDATA PD
  1046. ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  1047. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  1048. ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  1049. INNER JOIN TP_MST_GOODS G
  1050. ON G.GOODSID = PD.GOODSID
  1051. INNER JOIN TP_MST_GOODSTYPE GT
  1052. ON G.GOODSTYPEID = GT.GOODSTYPEID
  1053. INNER JOIN TP_PC_GROUTINGLINE GL ON GDD.GROUTINGLINEID = GL.GROUTINGLINEID
  1054. WHERE SP.AUDITSTATUS = 1
  1055. AND SP.BACKOUTTIME >= @DATEBEGIN@
  1056. AND SP.BACKOUTTIME < @DATEEND@
  1057. AND (G.GOODSID IN (0,0) OR '0,0' = '0,0')
  1058. AND (GDD.GROUTINGLINEID IN (0,0) OR '0,0' = '0,0')
  1059. AND (GL.HIGHPRESSUREFLAG = @HIGHPRESSUREFLAG@ OR @HIGHPRESSUREFLAG@ = '-1')
  1060. {TESTMOULDFLAG}
  1061. {TESTFLAG}
  1062. AND PD.ISREFIRE = 0
  1063. AND SP.GOODSLEVELTYPEID in (7)
  1064. --AND SP.SCRAPTYPE = 1
  1065. --AND SP.SCRAPTYPE IN (0, 2, 3)
  1066. ) T)
  1067. GROUP BY GOODSCODE,
  1068. SAPCODE,
  1069. USERCODE,
  1070. WORKSHOP,
  1071. TESTMOULDFLAG,
  1072. GOODS_LINE_CODE,
  1073. CHARG
  1074. ---------------------------------------------------
  1075. UNION ALL
  1076. -- 干补报损
  1077. ---------------------------------------------------
  1078. SELECT GOODSCODE,
  1079. SAPCODE,
  1080. USERCODE,
  1081. 0 OUTPUTNUM,
  1082. COUNT(*) SCRAPNUM,
  1083. 0 CLEANUPNUM,
  1084. 0 REPAIRNUM,
  1085. WORKSHOP,
  1086. TESTMOULDFLAG,
  1087. GOODS_LINE_CODE,
  1088. CHARG
  1089. FROM (SELECT SP.GOODSCODE,
  1090. GDD.MATERIALCODE SAPCODE,
  1091. PD.USERCODE,
  1092. CASE
  1093. WHEN HGDI.WORKSHOP = 2
  1094. AND INSTR(GT.GOODSTYPECODE, '001002') = 1 THEN
  1095. 1
  1096. WHEN HGDI.WORKSHOP = 2
  1097. AND INSTR(GT.GOODSTYPECODE, '001001') = 1 THEN
  1098. 2
  1099. WHEN HGDI.WORKSHOP = 3 THEN
  1100. 3
  1101. ELSE
  1102. 4
  1103. END AS WORKSHOP,
  1104. DECODE(GDD.TESTMOULDFLAG, 0, 'C', 1, 'Y', '-') AS TESTMOULDFLAG,
  1105. G.GOODS_LINE_CODE,
  1106. TO_CHAR(SP.AUDITDATE, 'YYYYMM') AS CHARG
  1107. --TO_CHAR(SP.AUDITDATE, 'yyyymm') AS CHARG
  1108. FROM (SELECT T.*
  1109. FROM (SELECT SP.BARCODE,
  1110. SP.GOODSCODE,
  1111. SP.GROUTINGDAILYDETAILID,
  1112. PD.PROCEDUREID,
  1113. PD.PRODUCTIONDATAID,
  1114. SP.AUDITDATE,
  1115. RANK() OVER(PARTITION BY SP.BARCODE ORDER BY PD.PRODUCTIONDATAID DESC) AS RK
  1116. FROM TP_PM_SCRAPPRODUCT SP
  1117. INNER JOIN TP_PM_PRODUCTIONDATA PD ON SP.BARCODE = PD.BARCODE
  1118. -- 不包含干补工序
  1119. AND PD.PROCEDUREID <> 18
  1120. -- 要找干补之前的工序
  1121. AND PD.PRODUCTIONDATAID < SP.PRODUCTIONDATAID
  1122. AND PD.VALUEFLAG = '1'
  1123. INNER JOIN TP_MST_GOODS G
  1124. ON G.GOODSID = PD.GOODSID
  1125. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  1126. ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  1127. INNER JOIN TP_PC_GROUTINGLINE GL ON GDD.GROUTINGLINEID = GL.GROUTINGLINEID
  1128. WHERE SP.AUDITSTATUS = 1
  1129. AND SP.PROCEDUREID = 18
  1130. AND PD.ISREFIRE = 0
  1131. AND SP.GOODSLEVELTYPEID in (7)
  1132. --AND SP.SCRAPTYPE = 1
  1133. AND SP.AUDITDATE >= @DATEBEGIN@
  1134. AND SP.AUDITDATE < @DATEEND@
  1135. AND (G.GOODSID IN (0,0) OR '0,0' = '0,0')
  1136. AND (GDD.GROUTINGLINEID IN (0,0) OR '0,0' = '0,0')
  1137. AND (GL.HIGHPRESSUREFLAG = @HIGHPRESSUREFLAG@ OR @HIGHPRESSUREFLAG@ = '-1')
  1138. {TESTMOULDFLAG}
  1139. {TESTFLAG}
  1140. ) T
  1141. WHERE T.RK <= 1) SP
  1142. INNER JOIN TSAP_HEGII_DATAITEM HGDI
  1143. ON HGDI.DATACODE = '50'
  1144. AND HGDI.ITEMTYPE = 2
  1145. AND HGDI.ITEMID = SP.PROCEDUREID
  1146. INNER JOIN TP_PM_PRODUCTIONDATA PD
  1147. ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  1148. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  1149. ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  1150. INNER JOIN TP_MST_GOODS G
  1151. ON G.GOODSID = PD.GOODSID
  1152. INNER JOIN TP_MST_GOODSTYPE GT
  1153. ON G.GOODSTYPEID = GT.GOODSTYPEID)
  1154. GROUP BY GOODSCODE,
  1155. SAPCODE,
  1156. USERCODE,
  1157. WORKSHOP,
  1158. TESTMOULDFLAG,
  1159. GOODS_LINE_CODE,
  1160. CHARG)TT
  1161. GROUP BY TT.CHARG )TT2 GROUP BY GROUPING SETS ( TT2.时间, ( ) )
  1162. ),
  1163. 质量登记损坏数 AS
  1164. (
  1165. SELECT
  1166. GROUPING_ID (TT2.时间) AS GID,
  1167. NVL(TT2.时间,'合计') AS 时间,
  1168. SUM(TT2.质量登记损坏数_一部全部) 质量登记损坏数_一部全部,
  1169. SUM(TT2.质量登记损坏数_二部全部) 质量登记损坏数_二部全部,
  1170. SUM(TT2.质量登记损坏数_三部全部) 质量登记损坏数_三部全部
  1171. FROM(
  1172. SELECT
  1173. TT.CHARG AS 时间,
  1174. SUM(CASE WHEN TT.WORKSHOP = 1 THEN SCRAPNUM ELSE 0 END) 质量登记损坏数_一部全部,
  1175. SUM(CASE WHEN TT.WORKSHOP = 2 THEN SCRAPNUM ELSE 0 END) 质量登记损坏数_二部全部,
  1176. SUM(CASE WHEN TT.WORKSHOP = 3 THEN SCRAPNUM ELSE 0 END) 质量登记损坏数_三部全部
  1177. FROM(
  1178. SELECT GOODSCODE,
  1179. SAPCODE,
  1180. USERCODE,
  1181. 0 OUTPUTNUM,
  1182. COUNT(*) SCRAPNUM,
  1183. 0 CLEANUPNUM,
  1184. 0 REPAIRNUM,
  1185. WORKSHOP,
  1186. TESTMOULDFLAG,
  1187. GOODS_LINE_CODE,
  1188. CHARG
  1189. FROM (SELECT CASE
  1190. WHEN T.IS3 > 0 THEN
  1191. 3
  1192. WHEN T.HGDIWORKSHOP = 2
  1193. AND INSTR(T.GOODSTYPECODE, '001002') = 1 THEN
  1194. 1
  1195. WHEN T.HGDIWORKSHOP = 2
  1196. AND INSTR(T.GOODSTYPECODE, '001001') = 1 THEN
  1197. 2
  1198. WHEN T.HGDIWORKSHOP = 3 THEN
  1199. 3
  1200. ELSE
  1201. 2
  1202. END AS WORKSHOP,
  1203. T.*
  1204. FROM (SELECT SP.BARCODE,
  1205. SP.GOODSCODE,
  1206. GDD.MATERIALCODE SAPCODE,
  1207. PD.USERCODE,
  1208. GT.GOODSTYPECODE,
  1209. DECODE(GDD.TESTMOULDFLAG, 0, 'C', 1, 'Y', '-') AS TESTMOULDFLAG,
  1210. G.GOODS_LINE_CODE,
  1211. TO_CHAR(SP.AUDITDATE, 'YYYYMM') AS CHARG,
  1212. --TO_CHAR(SP.AUDITDATE, 'yyyymm') AS CHARG,
  1213. HGDI.WORKSHOP AS HGDIWORKSHOP,
  1214. -- 如果参与了重烧,则判断这个条码是否走过3#卸窑
  1215. (SELECT COUNT(1)
  1216. FROM TP_PM_PRODUCTIONDATA PD2
  1217. WHERE PD2.BARCODE = PD.BARCODE
  1218. AND PD2.PROCEDUREID = 103
  1219. -- 重烧相关的ID
  1220. AND SP.PROCEDUREID IN (14, 16, 57, 58, 59, 60,113)) AS IS3
  1221. FROM TP_PM_SCRAPPRODUCT SP
  1222. INNER JOIN TSAP_HEGII_DATAITEM HGDI
  1223. ON HGDI.DATACODE = '50'
  1224. AND HGDI.ITEMTYPE = 2
  1225. AND HGDI.ITEMID = SP.PROCEDUREID
  1226. INNER JOIN TP_PM_PRODUCTIONDATA PD
  1227. ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  1228. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  1229. ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  1230. INNER JOIN TP_MST_GOODS G
  1231. ON G.GOODSID = PD.GOODSID
  1232. INNER JOIN TP_MST_GOODSTYPE GT
  1233. ON G.GOODSTYPEID = GT.GOODSTYPEID
  1234. INNER JOIN TP_PC_GROUTINGLINE GL ON GDD.GROUTINGLINEID = GL.GROUTINGLINEID
  1235. WHERE SP.AUDITSTATUS = 1
  1236. AND SP.AUDITDATE >= @DATEBEGIN@
  1237. AND SP.AUDITDATE < @DATEEND@
  1238. AND (G.GOODSID IN (0,0) OR '0,0' = '0,0')
  1239. AND (GDD.GROUTINGLINEID IN (0,0) OR '0,0' = '0,0')
  1240. AND (GL.HIGHPRESSUREFLAG = @HIGHPRESSUREFLAG@ OR @HIGHPRESSUREFLAG@ = '-1')
  1241. {TESTMOULDFLAG}
  1242. {TESTFLAG}
  1243. AND PD.ISREFIRE = 0
  1244. AND SP.GOODSLEVELTYPEID in (8,9)
  1245. --AND SP.SCRAPTYPE = 1
  1246. --AND SP.SCRAPTYPE IN (0, 2, 3)
  1247. ) T)
  1248. GROUP BY GOODSCODE,
  1249. SAPCODE,
  1250. USERCODE,
  1251. WORKSHOP,
  1252. TESTMOULDFLAG,
  1253. GOODS_LINE_CODE,
  1254. CHARG
  1255. ---------------------------------------------------
  1256. UNION ALL
  1257. -- 工序报损撤销
  1258. ---------------------------------------------------
  1259. SELECT GOODSCODE,
  1260. SAPCODE,
  1261. USERCODE,
  1262. 0 OUTPUTNUM,
  1263. 0 - COUNT(*) SCRAPNUM,
  1264. 0 CLEANUPNUM,
  1265. 0 REPAIRNUM,
  1266. WORKSHOP,
  1267. TESTMOULDFLAG,
  1268. GOODS_LINE_CODE,
  1269. CHARG
  1270. FROM (SELECT CASE
  1271. WHEN T.IS3 > 0 THEN
  1272. 3
  1273. WHEN T.HGDIWORKSHOP = 2
  1274. AND INSTR(T.GOODSTYPECODE, '001002') = 1 THEN
  1275. 1
  1276. WHEN T.HGDIWORKSHOP = 2
  1277. AND INSTR(T.GOODSTYPECODE, '001001') = 1 THEN
  1278. 2
  1279. WHEN T.HGDIWORKSHOP = 3 THEN
  1280. 3
  1281. ELSE
  1282. 2
  1283. END AS WORKSHOP,
  1284. T.*
  1285. FROM (SELECT SP.BARCODE,
  1286. SP.GOODSCODE,
  1287. GDD.MATERIALCODE SAPCODE,
  1288. PD.USERCODE,
  1289. GT.GOODSTYPECODE,
  1290. DECODE(GDD.TESTMOULDFLAG, 0, 'C', 1, 'Y', '-') AS TESTMOULDFLAG,
  1291. G.GOODS_LINE_CODE,
  1292. TO_CHAR(SP.BACKOUTTIME, 'YYYYMM') AS CHARG,
  1293. --TO_CHAR(SP.AUDITDATE, 'yyyymm') AS CHARG,
  1294. HGDI.WORKSHOP AS HGDIWORKSHOP,
  1295. -- 如果参与了重烧,则判断这个条码是否走过3#卸窑
  1296. (SELECT COUNT(1)
  1297. FROM TP_PM_PRODUCTIONDATA PD2
  1298. WHERE PD2.BARCODE = PD.BARCODE
  1299. AND PD2.PROCEDUREID = 103
  1300. -- 重烧相关的ID
  1301. AND SP.PROCEDUREID IN (14, 16, 57, 58, 59, 60,113)) AS IS3
  1302. FROM TP_PM_SCRAPPRODUCT SP
  1303. INNER JOIN TSAP_HEGII_DATAITEM HGDI
  1304. ON HGDI.DATACODE = '50'
  1305. AND HGDI.ITEMTYPE = 2
  1306. AND HGDI.ITEMID = SP.PROCEDUREID
  1307. INNER JOIN TP_PM_PRODUCTIONDATA PD
  1308. ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  1309. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  1310. ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  1311. INNER JOIN TP_MST_GOODS G
  1312. ON G.GOODSID = PD.GOODSID
  1313. INNER JOIN TP_MST_GOODSTYPE GT
  1314. ON G.GOODSTYPEID = GT.GOODSTYPEID
  1315. INNER JOIN TP_PC_GROUTINGLINE GL ON GDD.GROUTINGLINEID = GL.GROUTINGLINEID
  1316. WHERE SP.AUDITSTATUS = 1
  1317. AND SP.BACKOUTTIME >= @DATEBEGIN@
  1318. AND SP.BACKOUTTIME < @DATEEND@
  1319. AND (G.GOODSID IN (0,0) OR '0,0' = '0,0')
  1320. AND (GDD.GROUTINGLINEID IN (0,0) OR '0,0' = '0,0')
  1321. AND (GL.HIGHPRESSUREFLAG = @HIGHPRESSUREFLAG@ OR @HIGHPRESSUREFLAG@ = '-1')
  1322. {TESTMOULDFLAG}
  1323. {TESTFLAG}
  1324. AND PD.ISREFIRE = 0
  1325. AND SP.GOODSLEVELTYPEID in (8,9)
  1326. --AND SP.SCRAPTYPE = 1
  1327. --AND SP.SCRAPTYPE IN (0, 2, 3)
  1328. ) T)
  1329. GROUP BY GOODSCODE,
  1330. SAPCODE,
  1331. USERCODE,
  1332. WORKSHOP,
  1333. TESTMOULDFLAG,
  1334. GOODS_LINE_CODE,
  1335. CHARG
  1336. ---------------------------------------------------
  1337. UNION ALL
  1338. -- 干补报损
  1339. ---------------------------------------------------
  1340. SELECT GOODSCODE,
  1341. SAPCODE,
  1342. USERCODE,
  1343. 0 OUTPUTNUM,
  1344. COUNT(*) SCRAPNUM,
  1345. 0 CLEANUPNUM,
  1346. 0 REPAIRNUM,
  1347. WORKSHOP,
  1348. TESTMOULDFLAG,
  1349. GOODS_LINE_CODE,
  1350. CHARG
  1351. FROM (SELECT SP.GOODSCODE,
  1352. GDD.MATERIALCODE SAPCODE,
  1353. PD.USERCODE,
  1354. CASE
  1355. WHEN HGDI.WORKSHOP = 2
  1356. AND INSTR(GT.GOODSTYPECODE, '001002') = 1 THEN
  1357. 1
  1358. WHEN HGDI.WORKSHOP = 2
  1359. AND INSTR(GT.GOODSTYPECODE, '001001') = 1 THEN
  1360. 2
  1361. WHEN HGDI.WORKSHOP = 3 THEN
  1362. 3
  1363. ELSE
  1364. 4
  1365. END AS WORKSHOP,
  1366. DECODE(GDD.TESTMOULDFLAG, 0, 'C', 1, 'Y', '-') AS TESTMOULDFLAG,
  1367. G.GOODS_LINE_CODE,
  1368. TO_CHAR(SP.AUDITDATE, 'YYYYMM') AS CHARG
  1369. --TO_CHAR(SP.AUDITDATE, 'yyyymm') AS CHARG
  1370. FROM (SELECT T.*
  1371. FROM (SELECT SP.BARCODE,
  1372. SP.GOODSCODE,
  1373. SP.GROUTINGDAILYDETAILID,
  1374. PD.PROCEDUREID,
  1375. PD.PRODUCTIONDATAID,
  1376. SP.AUDITDATE,
  1377. RANK() OVER(PARTITION BY SP.BARCODE ORDER BY PD.PRODUCTIONDATAID DESC) AS RK
  1378. FROM TP_PM_SCRAPPRODUCT SP
  1379. INNER JOIN TP_PM_PRODUCTIONDATA PD ON SP.BARCODE = PD.BARCODE
  1380. -- 不包含干补工序
  1381. AND PD.PROCEDUREID <> 18
  1382. -- 要找干补之前的工序
  1383. AND PD.PRODUCTIONDATAID < SP.PRODUCTIONDATAID
  1384. AND PD.VALUEFLAG = '1'
  1385. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  1386. ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  1387. INNER JOIN TP_MST_GOODS G
  1388. ON G.GOODSID = PD.GOODSID
  1389. INNER JOIN TP_MST_GOODSTYPE GT
  1390. ON G.GOODSTYPEID = GT.GOODSTYPEID
  1391. INNER JOIN TP_PC_GROUTINGLINE GL ON GDD.GROUTINGLINEID = GL.GROUTINGLINEID
  1392. WHERE SP.AUDITSTATUS = 1
  1393. AND SP.PROCEDUREID = 18
  1394. AND PD.ISREFIRE = 0
  1395. AND SP.GOODSLEVELTYPEID in (8,9)
  1396. --AND SP.SCRAPTYPE = 1
  1397. AND SP.AUDITDATE >= @DATEBEGIN@
  1398. AND SP.AUDITDATE < @DATEEND@
  1399. AND (G.GOODSID IN (0,0) OR '0,0' = '0,0')
  1400. AND (GDD.GROUTINGLINEID IN (0,0) OR '0,0' = '0,0')
  1401. AND (GL.HIGHPRESSUREFLAG = @HIGHPRESSUREFLAG@ OR @HIGHPRESSUREFLAG@ = '-1')
  1402. {TESTMOULDFLAG}
  1403. {TESTFLAG}
  1404. ) T
  1405. WHERE T.RK <= 1) SP
  1406. INNER JOIN TSAP_HEGII_DATAITEM HGDI
  1407. ON HGDI.DATACODE = '50'
  1408. AND HGDI.ITEMTYPE = 2
  1409. AND HGDI.ITEMID = SP.PROCEDUREID
  1410. INNER JOIN TP_PM_PRODUCTIONDATA PD
  1411. ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  1412. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  1413. ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  1414. INNER JOIN TP_MST_GOODS G
  1415. ON G.GOODSID = PD.GOODSID
  1416. INNER JOIN TP_MST_GOODSTYPE GT
  1417. ON G.GOODSTYPEID = GT.GOODSTYPEID)
  1418. GROUP BY GOODSCODE,
  1419. SAPCODE,
  1420. USERCODE,
  1421. WORKSHOP,
  1422. TESTMOULDFLAG,
  1423. GOODS_LINE_CODE,
  1424. CHARG
  1425. )TT
  1426. GROUP BY TT.CHARG )TT2 GROUP BY GROUPING SETS ( TT2.时间, ( ) )
  1427. ),
  1428. 重烧登记次品数 AS
  1429. (
  1430. SELECT
  1431. GROUPING_ID (TT2.时间) AS GID,
  1432. NVL(TT2.时间,'合计') AS 时间,
  1433. SUM(TT2.重烧登记次品数_一部全部) 重烧登记次品数_一部全部,
  1434. SUM(TT2.重烧登记次品数_二部全部) 重烧登记次品数_二部全部,
  1435. SUM(TT2.重烧登记次品数_三部全部) 重烧登记次品数_三部全部
  1436. FROM(
  1437. SELECT
  1438. TT.CHARG AS 时间,
  1439. SUM(CASE WHEN TT.WORKSHOP = 1 THEN SCRAPNUM ELSE 0 END) 重烧登记次品数_一部全部,
  1440. SUM(CASE WHEN TT.WORKSHOP = 2 THEN SCRAPNUM ELSE 0 END) 重烧登记次品数_二部全部,
  1441. SUM(CASE WHEN TT.WORKSHOP = 3 THEN SCRAPNUM ELSE 0 END) 重烧登记次品数_三部全部
  1442. FROM(
  1443. SELECT GOODSCODE,
  1444. SAPCODE,
  1445. USERCODE,
  1446. 0 OUTPUTNUM,
  1447. COUNT(*) SCRAPNUM,
  1448. 0 CLEANUPNUM,
  1449. 0 REPAIRNUM,
  1450. WORKSHOP,
  1451. TESTMOULDFLAG,
  1452. GOODS_LINE_CODE,
  1453. CHARG
  1454. FROM (SELECT CASE
  1455. WHEN T.IS3 > 0 THEN
  1456. 3
  1457. WHEN T.HGDIWORKSHOP = 2
  1458. AND INSTR(T.GOODSTYPECODE, '001002') = 1 THEN
  1459. 1
  1460. WHEN T.HGDIWORKSHOP = 2
  1461. AND INSTR(T.GOODSTYPECODE, '001001') = 1 THEN
  1462. 2
  1463. WHEN T.HGDIWORKSHOP = 3 THEN
  1464. 3
  1465. ELSE
  1466. 2
  1467. END AS WORKSHOP,
  1468. T.*
  1469. FROM (SELECT SP.BARCODE,
  1470. SP.GOODSCODE,
  1471. GDD.MATERIALCODE SAPCODE,
  1472. PD.USERCODE,
  1473. GT.GOODSTYPECODE,
  1474. DECODE(GDD.TESTMOULDFLAG, 0, 'C', 1, 'Y', '-') AS TESTMOULDFLAG,
  1475. G.GOODS_LINE_CODE,
  1476. TO_CHAR(SP.AUDITDATE, 'YYYYMM') AS CHARG,
  1477. --TO_CHAR(SP.AUDITDATE, 'yyyymm') AS CHARG,
  1478. HGDI.WORKSHOP AS HGDIWORKSHOP,
  1479. -- 如果参与了重烧,则判断这个条码是否走过3#卸窑
  1480. (SELECT COUNT(1)
  1481. FROM TP_PM_PRODUCTIONDATA PD2
  1482. WHERE PD2.BARCODE = PD.BARCODE
  1483. AND PD2.PROCEDUREID = 103
  1484. -- 重烧相关的ID
  1485. AND SP.PROCEDUREID IN (14, 16, 57, 58, 59, 60,113)) AS IS3
  1486. FROM TP_PM_SCRAPPRODUCT SP
  1487. INNER JOIN TSAP_HEGII_DATAITEM HGDI
  1488. ON HGDI.DATACODE = '50'
  1489. AND HGDI.ITEMTYPE = 2
  1490. AND HGDI.ITEMID = SP.PROCEDUREID
  1491. INNER JOIN TP_PM_PRODUCTIONDATA PD
  1492. ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  1493. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  1494. ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  1495. INNER JOIN TP_MST_GOODS G
  1496. ON G.GOODSID = PD.GOODSID
  1497. INNER JOIN TP_MST_GOODSTYPE GT
  1498. ON G.GOODSTYPEID = GT.GOODSTYPEID
  1499. INNER JOIN TP_PC_GROUTINGLINE GL ON GDD.GROUTINGLINEID = GL.GROUTINGLINEID
  1500. WHERE SP.AUDITSTATUS = 1
  1501. AND SP.AUDITDATE >= @DATEBEGIN@
  1502. AND SP.AUDITDATE < @DATEEND@
  1503. AND (G.GOODSID IN (0,0) OR '0,0' = '0,0')
  1504. AND (GDD.GROUTINGLINEID IN (0,0) OR '0,0' = '0,0')
  1505. AND (GL.HIGHPRESSUREFLAG = @HIGHPRESSUREFLAG@ OR @HIGHPRESSUREFLAG@ = '-1')
  1506. {TESTMOULDFLAG}
  1507. {TESTFLAG}
  1508. AND PD.ISREFIRE = 6
  1509. AND SP.GOODSLEVELTYPEID in (7)
  1510. --AND SP.SCRAPTYPE = 1
  1511. --AND SP.SCRAPTYPE IN (0, 2, 3)
  1512. ) T)
  1513. GROUP BY GOODSCODE,
  1514. SAPCODE,
  1515. USERCODE,
  1516. WORKSHOP,
  1517. TESTMOULDFLAG,
  1518. GOODS_LINE_CODE,
  1519. CHARG
  1520. ---------------------------------------------------
  1521. UNION ALL
  1522. -- 工序报损撤销
  1523. ---------------------------------------------------
  1524. SELECT GOODSCODE,
  1525. SAPCODE,
  1526. USERCODE,
  1527. 0 OUTPUTNUM,
  1528. 0 - COUNT(*) SCRAPNUM,
  1529. 0 CLEANUPNUM,
  1530. 0 REPAIRNUM,
  1531. WORKSHOP,
  1532. TESTMOULDFLAG,
  1533. GOODS_LINE_CODE,
  1534. CHARG
  1535. FROM (SELECT CASE
  1536. WHEN T.IS3 > 0 THEN
  1537. 3
  1538. WHEN T.HGDIWORKSHOP = 2
  1539. AND INSTR(T.GOODSTYPECODE, '001002') = 1 THEN
  1540. 1
  1541. WHEN T.HGDIWORKSHOP = 2
  1542. AND INSTR(T.GOODSTYPECODE, '001001') = 1 THEN
  1543. 2
  1544. WHEN T.HGDIWORKSHOP = 3 THEN
  1545. 3
  1546. ELSE
  1547. 2
  1548. END AS WORKSHOP,
  1549. T.*
  1550. FROM (SELECT SP.BARCODE,
  1551. SP.GOODSCODE,
  1552. GDD.MATERIALCODE SAPCODE,
  1553. PD.USERCODE,
  1554. GT.GOODSTYPECODE,
  1555. DECODE(GDD.TESTMOULDFLAG, 0, 'C', 1, 'Y', '-') AS TESTMOULDFLAG,
  1556. G.GOODS_LINE_CODE,
  1557. TO_CHAR(SP.BACKOUTTIME, 'YYYYMM') AS CHARG,
  1558. --TO_CHAR(SP.AUDITDATE, 'yyyymm') AS CHARG,
  1559. HGDI.WORKSHOP AS HGDIWORKSHOP,
  1560. -- 如果参与了重烧,则判断这个条码是否走过3#卸窑
  1561. (SELECT COUNT(1)
  1562. FROM TP_PM_PRODUCTIONDATA PD2
  1563. WHERE PD2.BARCODE = PD.BARCODE
  1564. AND PD2.PROCEDUREID = 103
  1565. -- 重烧相关的ID
  1566. AND SP.PROCEDUREID IN (14, 16, 57, 58, 59, 60,113)) AS IS3
  1567. FROM TP_PM_SCRAPPRODUCT SP
  1568. INNER JOIN TSAP_HEGII_DATAITEM HGDI
  1569. ON HGDI.DATACODE = '50'
  1570. AND HGDI.ITEMTYPE = 2
  1571. AND HGDI.ITEMID = SP.PROCEDUREID
  1572. INNER JOIN TP_PM_PRODUCTIONDATA PD
  1573. ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  1574. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  1575. ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  1576. INNER JOIN TP_MST_GOODS G
  1577. ON G.GOODSID = PD.GOODSID
  1578. INNER JOIN TP_MST_GOODSTYPE GT
  1579. ON G.GOODSTYPEID = GT.GOODSTYPEID
  1580. INNER JOIN TP_PC_GROUTINGLINE GL ON GDD.GROUTINGLINEID = GL.GROUTINGLINEID
  1581. WHERE SP.AUDITSTATUS = 1
  1582. AND SP.BACKOUTTIME >= @DATEBEGIN@
  1583. AND SP.BACKOUTTIME < @DATEEND@
  1584. AND (G.GOODSID IN (0,0) OR '0,0' = '0,0')
  1585. AND (GDD.GROUTINGLINEID IN (0,0) OR '0,0' = '0,0')
  1586. AND (GL.HIGHPRESSUREFLAG = @HIGHPRESSUREFLAG@ OR @HIGHPRESSUREFLAG@ = '-1')
  1587. {TESTMOULDFLAG}
  1588. {TESTFLAG}
  1589. AND PD.ISREFIRE = 6
  1590. AND SP.GOODSLEVELTYPEID in (7)
  1591. --AND SP.SCRAPTYPE = 1
  1592. --AND SP.SCRAPTYPE IN (0, 2, 3)
  1593. ) T)
  1594. GROUP BY GOODSCODE,
  1595. SAPCODE,
  1596. USERCODE,
  1597. WORKSHOP,
  1598. TESTMOULDFLAG,
  1599. GOODS_LINE_CODE,
  1600. CHARG
  1601. ---------------------------------------------------
  1602. UNION ALL
  1603. -- 干补报损
  1604. ---------------------------------------------------
  1605. SELECT GOODSCODE,
  1606. SAPCODE,
  1607. USERCODE,
  1608. 0 OUTPUTNUM,
  1609. COUNT(*) SCRAPNUM,
  1610. 0 CLEANUPNUM,
  1611. 0 REPAIRNUM,
  1612. WORKSHOP,
  1613. TESTMOULDFLAG,
  1614. GOODS_LINE_CODE,
  1615. CHARG
  1616. FROM (SELECT SP.GOODSCODE,
  1617. GDD.MATERIALCODE SAPCODE,
  1618. PD.USERCODE,
  1619. CASE
  1620. WHEN HGDI.WORKSHOP = 2
  1621. AND INSTR(GT.GOODSTYPECODE, '001002') = 1 THEN
  1622. 1
  1623. WHEN HGDI.WORKSHOP = 2
  1624. AND INSTR(GT.GOODSTYPECODE, '001001') = 1 THEN
  1625. 2
  1626. WHEN HGDI.WORKSHOP = 3 THEN
  1627. 3
  1628. ELSE
  1629. 4
  1630. END AS WORKSHOP,
  1631. DECODE(GDD.TESTMOULDFLAG, 0, 'C', 1, 'Y', '-') AS TESTMOULDFLAG,
  1632. G.GOODS_LINE_CODE,
  1633. TO_CHAR(SP.AUDITDATE, 'YYYYMM') AS CHARG
  1634. --TO_CHAR(SP.AUDITDATE, 'yyyymm') AS CHARG
  1635. FROM (SELECT T.*
  1636. FROM (SELECT SP.BARCODE,
  1637. SP.GOODSCODE,
  1638. SP.GROUTINGDAILYDETAILID,
  1639. PD.PROCEDUREID,
  1640. PD.PRODUCTIONDATAID,
  1641. SP.AUDITDATE,
  1642. RANK() OVER(PARTITION BY SP.BARCODE ORDER BY PD.PRODUCTIONDATAID DESC) AS RK
  1643. FROM TP_PM_SCRAPPRODUCT SP
  1644. INNER JOIN TP_PM_PRODUCTIONDATA PD ON SP.BARCODE = PD.BARCODE
  1645. -- 不包含干补工序
  1646. AND PD.PROCEDUREID <> 18
  1647. -- 要找干补之前的工序
  1648. AND PD.PRODUCTIONDATAID < SP.PRODUCTIONDATAID
  1649. AND PD.VALUEFLAG = '1'
  1650. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  1651. ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  1652. INNER JOIN TP_MST_GOODS G
  1653. ON G.GOODSID = PD.GOODSID
  1654. INNER JOIN TP_MST_GOODSTYPE GT
  1655. ON G.GOODSTYPEID = GT.GOODSTYPEID
  1656. INNER JOIN TP_PC_GROUTINGLINE GL ON GDD.GROUTINGLINEID = GL.GROUTINGLINEID
  1657. WHERE SP.AUDITSTATUS = 1
  1658. AND SP.PROCEDUREID = 18
  1659. AND PD.ISREFIRE = 6
  1660. AND SP.GOODSLEVELTYPEID in (7)
  1661. --AND SP.SCRAPTYPE = 1
  1662. AND SP.AUDITDATE >= @DATEBEGIN@
  1663. AND SP.AUDITDATE < @DATEEND@
  1664. AND (G.GOODSID IN (0,0) OR '0,0' = '0,0')
  1665. AND (GDD.GROUTINGLINEID IN (0,0) OR '0,0' = '0,0')
  1666. AND (GL.HIGHPRESSUREFLAG = @HIGHPRESSUREFLAG@ OR @HIGHPRESSUREFLAG@ = '-1')
  1667. {TESTMOULDFLAG}
  1668. {TESTFLAG}
  1669. ) T
  1670. WHERE T.RK <= 1) SP
  1671. INNER JOIN TSAP_HEGII_DATAITEM HGDI
  1672. ON HGDI.DATACODE = '50'
  1673. AND HGDI.ITEMTYPE = 2
  1674. AND HGDI.ITEMID = SP.PROCEDUREID
  1675. INNER JOIN TP_PM_PRODUCTIONDATA PD
  1676. ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  1677. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  1678. ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  1679. INNER JOIN TP_MST_GOODS G
  1680. ON G.GOODSID = PD.GOODSID
  1681. INNER JOIN TP_MST_GOODSTYPE GT
  1682. ON G.GOODSTYPEID = GT.GOODSTYPEID)
  1683. GROUP BY GOODSCODE,
  1684. SAPCODE,
  1685. USERCODE,
  1686. WORKSHOP,
  1687. TESTMOULDFLAG,
  1688. GOODS_LINE_CODE,
  1689. CHARG )TT
  1690. GROUP BY TT.CHARG )TT2 GROUP BY GROUPING SETS ( TT2.时间, ( ) )
  1691. ),
  1692. 重烧登记损坯数 AS
  1693. (
  1694. SELECT
  1695. GROUPING_ID (TT2.时间) AS GID,
  1696. NVL(TT2.时间,'合计') AS 时间,
  1697. SUM(TT2.重烧登记损坯数_一部全部) 重烧登记损坯数_一部全部,
  1698. SUM(TT2.重烧登记损坯数_二部全部) 重烧登记损坯数_二部全部,
  1699. SUM(TT2.重烧登记损坯数_三部全部) 重烧登记损坯数_三部全部
  1700. FROM(
  1701. SELECT
  1702. TT.CHARG AS 时间,
  1703. SUM(CASE WHEN TT.WORKSHOP = 1 THEN SCRAPNUM ELSE 0 END) 重烧登记损坯数_一部全部,
  1704. SUM(CASE WHEN TT.WORKSHOP = 2 THEN SCRAPNUM ELSE 0 END) 重烧登记损坯数_二部全部,
  1705. SUM(CASE WHEN TT.WORKSHOP = 3 THEN SCRAPNUM ELSE 0 END) 重烧登记损坯数_三部全部
  1706. FROM(
  1707. SELECT GOODSCODE,
  1708. SAPCODE,
  1709. USERCODE,
  1710. 0 OUTPUTNUM,
  1711. COUNT(*) SCRAPNUM,
  1712. 0 CLEANUPNUM,
  1713. 0 REPAIRNUM,
  1714. WORKSHOP,
  1715. TESTMOULDFLAG,
  1716. GOODS_LINE_CODE,
  1717. CHARG
  1718. FROM (SELECT CASE
  1719. WHEN T.IS3 > 0 THEN
  1720. 3
  1721. WHEN T.HGDIWORKSHOP = 2
  1722. AND INSTR(T.GOODSTYPECODE, '001002') = 1 THEN
  1723. 1
  1724. WHEN T.HGDIWORKSHOP = 2
  1725. AND INSTR(T.GOODSTYPECODE, '001001') = 1 THEN
  1726. 2
  1727. WHEN T.HGDIWORKSHOP = 3 THEN
  1728. 3
  1729. ELSE
  1730. 2
  1731. END AS WORKSHOP,
  1732. T.*
  1733. FROM (SELECT SP.BARCODE,
  1734. SP.GOODSCODE,
  1735. GDD.MATERIALCODE SAPCODE,
  1736. PD.USERCODE,
  1737. GT.GOODSTYPECODE,
  1738. DECODE(GDD.TESTMOULDFLAG, 0, 'C', 1, 'Y', '-') AS TESTMOULDFLAG,
  1739. G.GOODS_LINE_CODE,
  1740. TO_CHAR(SP.AUDITDATE, 'YYYYMM') AS CHARG,
  1741. --TO_CHAR(SP.AUDITDATE, 'yyyymm') AS CHARG,
  1742. HGDI.WORKSHOP AS HGDIWORKSHOP,
  1743. -- 如果参与了重烧,则判断这个条码是否走过3#卸窑
  1744. (SELECT COUNT(1)
  1745. FROM TP_PM_PRODUCTIONDATA PD2
  1746. WHERE PD2.BARCODE = PD.BARCODE
  1747. AND PD2.PROCEDUREID = 103
  1748. -- 重烧相关的ID
  1749. AND SP.PROCEDUREID IN (14, 16, 57, 58, 59, 60,113)) AS IS3
  1750. FROM TP_PM_SCRAPPRODUCT SP
  1751. INNER JOIN TSAP_HEGII_DATAITEM HGDI
  1752. ON HGDI.DATACODE = '50'
  1753. AND HGDI.ITEMTYPE = 2
  1754. AND HGDI.ITEMID = SP.PROCEDUREID
  1755. INNER JOIN TP_PM_PRODUCTIONDATA PD
  1756. ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  1757. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  1758. ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  1759. INNER JOIN TP_MST_GOODS G
  1760. ON G.GOODSID = PD.GOODSID
  1761. INNER JOIN TP_MST_GOODSTYPE GT
  1762. ON G.GOODSTYPEID = GT.GOODSTYPEID
  1763. INNER JOIN TP_PC_GROUTINGLINE GL ON GDD.GROUTINGLINEID = GL.GROUTINGLINEID
  1764. WHERE SP.AUDITSTATUS = 1
  1765. AND SP.AUDITDATE >= @DATEBEGIN@
  1766. AND SP.AUDITDATE < @DATEEND@
  1767. AND (G.GOODSID IN (0,0) OR '0,0' = '0,0')
  1768. AND (GDD.GROUTINGLINEID IN (0,0) OR '0,0' = '0,0')
  1769. AND (GL.HIGHPRESSUREFLAG = @HIGHPRESSUREFLAG@ OR @HIGHPRESSUREFLAG@ = '-1')
  1770. {TESTMOULDFLAG}
  1771. {TESTFLAG}
  1772. AND PD.ISREFIRE = 6
  1773. AND SP.GOODSLEVELTYPEID in (8,9)
  1774. --AND SP.SCRAPTYPE = 1
  1775. --AND SP.SCRAPTYPE IN (0, 2, 3)
  1776. ) T)
  1777. GROUP BY GOODSCODE,
  1778. SAPCODE,
  1779. USERCODE,
  1780. WORKSHOP,
  1781. TESTMOULDFLAG,
  1782. GOODS_LINE_CODE,
  1783. CHARG
  1784. ---------------------------------------------------
  1785. UNION ALL
  1786. -- 工序报损撤销
  1787. ---------------------------------------------------
  1788. SELECT GOODSCODE,
  1789. SAPCODE,
  1790. USERCODE,
  1791. 0 OUTPUTNUM,
  1792. 0 - COUNT(*) SCRAPNUM,
  1793. 0 CLEANUPNUM,
  1794. 0 REPAIRNUM,
  1795. WORKSHOP,
  1796. TESTMOULDFLAG,
  1797. GOODS_LINE_CODE,
  1798. CHARG
  1799. FROM (SELECT CASE
  1800. WHEN T.IS3 > 0 THEN
  1801. 3
  1802. WHEN T.HGDIWORKSHOP = 2
  1803. AND INSTR(T.GOODSTYPECODE, '001002') = 1 THEN
  1804. 1
  1805. WHEN T.HGDIWORKSHOP = 2
  1806. AND INSTR(T.GOODSTYPECODE, '001001') = 1 THEN
  1807. 2
  1808. WHEN T.HGDIWORKSHOP = 3 THEN
  1809. 3
  1810. ELSE
  1811. 2
  1812. END AS WORKSHOP,
  1813. T.*
  1814. FROM (SELECT SP.BARCODE,
  1815. SP.GOODSCODE,
  1816. GDD.MATERIALCODE SAPCODE,
  1817. PD.USERCODE,
  1818. GT.GOODSTYPECODE,
  1819. DECODE(GDD.TESTMOULDFLAG, 0, 'C', 1, 'Y', '-') AS TESTMOULDFLAG,
  1820. G.GOODS_LINE_CODE,
  1821. TO_CHAR(SP.AUDITDATE, 'YYYYMM') AS CHARG,
  1822. --TO_CHAR(SP.AUDITDATE, 'yyyymm') AS CHARG,
  1823. HGDI.WORKSHOP AS HGDIWORKSHOP,
  1824. -- 如果参与了重烧,则判断这个条码是否走过3#卸窑
  1825. (SELECT COUNT(1)
  1826. FROM TP_PM_PRODUCTIONDATA PD2
  1827. WHERE PD2.BARCODE = PD.BARCODE
  1828. AND PD2.PROCEDUREID = 103
  1829. -- 重烧相关的ID
  1830. AND SP.PROCEDUREID IN (14, 16, 57, 58, 59, 60,113)) AS IS3
  1831. FROM TP_PM_SCRAPPRODUCT SP
  1832. INNER JOIN TSAP_HEGII_DATAITEM HGDI
  1833. ON HGDI.DATACODE = '50'
  1834. AND HGDI.ITEMTYPE = 2
  1835. AND HGDI.ITEMID = SP.PROCEDUREID
  1836. INNER JOIN TP_PM_PRODUCTIONDATA PD
  1837. ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  1838. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  1839. ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  1840. INNER JOIN TP_MST_GOODS G
  1841. ON G.GOODSID = PD.GOODSID
  1842. INNER JOIN TP_MST_GOODSTYPE GT
  1843. ON G.GOODSTYPEID = GT.GOODSTYPEID
  1844. INNER JOIN TP_PC_GROUTINGLINE GL ON GDD.GROUTINGLINEID = GL.GROUTINGLINEID
  1845. WHERE SP.AUDITSTATUS = 1
  1846. AND SP.BACKOUTTIME >= @DATEBEGIN@
  1847. AND SP.BACKOUTTIME < @DATEEND@
  1848. AND (G.GOODSID IN (0,0) OR '0,0' = '0,0')
  1849. AND (GDD.GROUTINGLINEID IN (0,0) OR '0,0' = '0,0')
  1850. AND (GL.HIGHPRESSUREFLAG = @HIGHPRESSUREFLAG@ OR @HIGHPRESSUREFLAG@ = '-1')
  1851. {TESTMOULDFLAG}
  1852. {TESTFLAG}
  1853. AND PD.ISREFIRE = 6
  1854. AND SP.GOODSLEVELTYPEID in (8,9)
  1855. --AND SP.SCRAPTYPE = 1
  1856. --AND SP.SCRAPTYPE IN (0, 2, 3)
  1857. ) T)
  1858. GROUP BY GOODSCODE,
  1859. SAPCODE,
  1860. USERCODE,
  1861. WORKSHOP,
  1862. TESTMOULDFLAG,
  1863. GOODS_LINE_CODE,
  1864. CHARG
  1865. ---------------------------------------------------
  1866. UNION ALL
  1867. -- 干补报损
  1868. ---------------------------------------------------
  1869. SELECT GOODSCODE,
  1870. SAPCODE,
  1871. USERCODE,
  1872. 0 OUTPUTNUM,
  1873. COUNT(*) SCRAPNUM,
  1874. 0 CLEANUPNUM,
  1875. 0 REPAIRNUM,
  1876. WORKSHOP,
  1877. TESTMOULDFLAG,
  1878. GOODS_LINE_CODE,
  1879. CHARG
  1880. FROM (SELECT SP.GOODSCODE,
  1881. GDD.MATERIALCODE SAPCODE,
  1882. PD.USERCODE,
  1883. CASE
  1884. WHEN HGDI.WORKSHOP = 2
  1885. AND INSTR(GT.GOODSTYPECODE, '001002') = 1 THEN
  1886. 1
  1887. WHEN HGDI.WORKSHOP = 2
  1888. AND INSTR(GT.GOODSTYPECODE, '001001') = 1 THEN
  1889. 2
  1890. WHEN HGDI.WORKSHOP = 3 THEN
  1891. 3
  1892. ELSE
  1893. 4
  1894. END AS WORKSHOP,
  1895. DECODE(GDD.TESTMOULDFLAG, 0, 'C', 1, 'Y', '-') AS TESTMOULDFLAG,
  1896. G.GOODS_LINE_CODE,
  1897. TO_CHAR(SP.AUDITDATE, 'YYYYMM') AS CHARG
  1898. --TO_CHAR(SP.AUDITDATE, 'yyyymm') AS CHARG
  1899. FROM (SELECT T.*
  1900. FROM (SELECT SP.BARCODE,
  1901. SP.GOODSCODE,
  1902. SP.GROUTINGDAILYDETAILID,
  1903. PD.PROCEDUREID,
  1904. PD.PRODUCTIONDATAID,
  1905. SP.AUDITDATE,
  1906. RANK() OVER(PARTITION BY SP.BARCODE ORDER BY PD.PRODUCTIONDATAID DESC) AS RK
  1907. FROM TP_PM_SCRAPPRODUCT SP
  1908. INNER JOIN TP_PM_PRODUCTIONDATA PD ON SP.BARCODE = PD.BARCODE
  1909. -- 不包含干补工序
  1910. AND PD.PROCEDUREID <> 18
  1911. -- 要找干补之前的工序
  1912. AND PD.PRODUCTIONDATAID < SP.PRODUCTIONDATAID
  1913. AND PD.VALUEFLAG = '1'
  1914. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  1915. ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  1916. INNER JOIN TP_MST_GOODS G
  1917. ON G.GOODSID = PD.GOODSID
  1918. INNER JOIN TP_MST_GOODSTYPE GT
  1919. ON G.GOODSTYPEID = GT.GOODSTYPEID
  1920. INNER JOIN TP_PC_GROUTINGLINE GL ON GDD.GROUTINGLINEID = GL.GROUTINGLINEID
  1921. WHERE SP.AUDITSTATUS = 1
  1922. AND SP.PROCEDUREID = 18
  1923. AND PD.ISREFIRE = 6
  1924. AND SP.GOODSLEVELTYPEID in (8,9)
  1925. --AND SP.SCRAPTYPE = 1
  1926. AND SP.AUDITDATE >= @DATEBEGIN@
  1927. AND SP.AUDITDATE < @DATEEND@
  1928. AND (G.GOODSID IN (0,0) OR '0,0' = '0,0')
  1929. AND (GDD.GROUTINGLINEID IN (0,0) OR '0,0' = '0,0')
  1930. AND (GL.HIGHPRESSUREFLAG = @HIGHPRESSUREFLAG@ OR @HIGHPRESSUREFLAG@ = '-1')
  1931. {TESTMOULDFLAG}
  1932. {TESTFLAG}
  1933. ) T
  1934. WHERE T.RK <= 1) SP
  1935. INNER JOIN TSAP_HEGII_DATAITEM HGDI
  1936. ON HGDI.DATACODE = '50'
  1937. AND HGDI.ITEMTYPE = 2
  1938. AND HGDI.ITEMID = SP.PROCEDUREID
  1939. INNER JOIN TP_PM_PRODUCTIONDATA PD
  1940. ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  1941. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  1942. ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  1943. INNER JOIN TP_MST_GOODS G
  1944. ON G.GOODSID = PD.GOODSID
  1945. INNER JOIN TP_MST_GOODSTYPE GT
  1946. ON G.GOODSTYPEID = GT.GOODSTYPEID)
  1947. GROUP BY GOODSCODE,
  1948. SAPCODE,
  1949. USERCODE,
  1950. WORKSHOP,
  1951. TESTMOULDFLAG,
  1952. GOODS_LINE_CODE,
  1953. CHARG)TT
  1954. GROUP BY TT.CHARG )TT2 GROUP BY GROUPING SETS ( TT2.时间, ( ) )
  1955. )
  1956. SELECT
  1957. 拼接日期.时间,
  1958. NVL(注浆数.注浆数_一部全部,0) 注浆数_一部全部,
  1959. NVL(注浆数.注浆数_二部全部,0) 注浆数_二部全部,
  1960. NVL(注浆数.注浆数_三部全部,0) 注浆数_三部全部,
  1961. NVL(成型报损.成型报损_一部全部,0) 成型报损_一部全部,
  1962. NVL(成型报损.成型报损_二部全部,0) 成型报损_二部全部,
  1963. NVL(成型报损.成型报损_三部全部,0) 成型报损_三部全部,
  1964. NVL(半检不合格.半检不合格_一部全部,0) 半检不合格_一部全部,
  1965. NVL(半检不合格.半检不合格_二部全部,0) 半检不合格_二部全部,
  1966. NVL(半检不合格.半检不合格_三部全部,0) 半检不合格_三部全部,
  1967. NVL(复检不合格.复检不合格_一部全部,0) 复检不合格_一部全部,
  1968. NVL(复检不合格.复检不合格_二部全部,0) 复检不合格_二部全部,
  1969. NVL(复检不合格.复检不合格_三部全部,0) 复检不合格_三部全部,
  1970. NVL(半成品损坯数.半成品损坯数_一部全部,0) 半成品损坯数_一部全部,
  1971. NVL(半成品损坯数.半成品损坯数_二部全部,0) 半成品损坯数_二部全部,
  1972. NVL(半成品损坯数.半成品损坯数_三部全部,0) 半成品损坯数_三部全部,
  1973. NVL(干补回收数.干补回收数_一部全部,0) 干补回收数_一部全部,
  1974. NVL(干补回收数.干补回收数_二部全部,0) 干补回收数_二部全部,
  1975. NVL(干补回收数.干补回收数_三部全部,0) 干补回收数_三部全部,
  1976. NVL(出窑数.出窑数_一部全部,0) 出窑数_一部全部,
  1977. NVL(出窑数.出窑数_二部全部,0) 出窑数_二部全部,
  1978. NVL(出窑数.出窑数_三部全部,0) 出窑数_三部全部,
  1979. NVL(质量登记次品数.质量登记次品数_一部全部,0) 质量登记次品数_一部全部,
  1980. NVL(质量登记次品数.质量登记次品数_二部全部,0) 质量登记次品数_二部全部,
  1981. NVL(质量登记次品数.质量登记次品数_三部全部,0) 质量登记次品数_三部全部,
  1982. NVL(重烧登记次品数.重烧登记次品数_一部全部,0) 重烧登记次品数_一部全部,
  1983. NVL(重烧登记次品数.重烧登记次品数_二部全部,0) 重烧登记次品数_二部全部,
  1984. NVL(重烧登记次品数.重烧登记次品数_三部全部,0) 重烧登记次品数_三部全部,
  1985. NVL(质量登记损坏数.质量登记损坏数_一部全部,0) 质量登记损坏数_一部全部,
  1986. NVL(质量登记损坏数.质量登记损坏数_二部全部,0) 质量登记损坏数_二部全部,
  1987. NVL(质量登记损坏数.质量登记损坏数_三部全部,0) 质量登记损坏数_三部全部,
  1988. NVL(重烧登记损坯数.重烧登记损坯数_一部全部,0) 重烧登记损坯数_一部全部,
  1989. NVL(重烧登记损坯数.重烧登记损坯数_二部全部,0) 重烧登记损坯数_二部全部,
  1990. NVL(重烧登记损坯数.重烧登记损坯数_三部全部,0) 重烧登记损坯数_三部全部,
  1991. NVL(回收数.回收数_一部全部,0) 回收数_一部全部,
  1992. NVL(回收数.回收数_二部全部,0) 回收数_二部全部,
  1993. NVL(回收数.回收数_三部全部,0) 回收数_三部全部,
  1994. NVL(入库数.入库数_一部全部,0) 入库数_一部全部,
  1995. NVL(入库数.入库数_二部全部,0) 入库数_二部全部,
  1996. NVL(入库数.入库数_三部全部,0) 入库数_三部全部
  1997. FROM 拼接日期
  1998. LEFT JOIN 注浆数 ON 拼接日期.时间 = 注浆数.时间
  1999. LEFT JOIN 成型报损 ON 拼接日期.时间 = 成型报损.时间
  2000. LEFT JOIN 半检不合格 ON 拼接日期.时间 = 半检不合格.时间
  2001. LEFT JOIN 复检不合格 ON 拼接日期.时间 = 复检不合格.时间
  2002. LEFT JOIN 半成品损坯数 ON 拼接日期.时间 = 半成品损坯数.时间
  2003. LEFT JOIN 干补回收数 ON 拼接日期.时间 = 干补回收数.时间
  2004. LEFT JOIN 出窑数 ON 拼接日期.时间 = 出窑数.时间
  2005. LEFT JOIN 回收数 ON 拼接日期.时间 = 回收数.时间
  2006. LEFT JOIN 入库数 ON 拼接日期.时间 = 入库数.时间
  2007. LEFT JOIN 质量登记次品数 ON 拼接日期.时间 = 质量登记次品数.时间
  2008. LEFT JOIN 质量登记损坏数 ON 拼接日期.时间 = 质量登记损坏数.时间
  2009. LEFT JOIN 重烧登记次品数 ON 拼接日期.时间 = 重烧登记次品数.时间
  2010. LEFT JOIN 重烧登记损坯数 ON 拼接日期.时间 = 重烧登记损坯数.时间
  2011. ".Replace("YYYYMM",totalMaster)
  2012. .Replace("{GOODSID}",goodsId)
  2013. .Replace("{GROUTINGLINEID}",groutinglineId)
  2014. .Replace("{DATESTR}",datestr)
  2015. .Replace("{TESTMOULDFLAG}", testmouldflag)
  2016. .Replace("{TESTFLAG}",testflagmaster);
  2017. //获取查询条件
  2018. if (context.Request["checke"].ToString()=="false")
  2019. {
  2020. //highFlag ="null";
  2021. testType = "-1";
  2022. testFlagMaster = "-1";
  2023. }
  2024. List<CDAParameter> sqlPara = new List<CDAParameter>();
  2025. sqlPara.Add(new CDAParameter("DATEBEGIN", dateBegin, DataType.DateTime));
  2026. sqlPara.Add(new CDAParameter("DATEEND", dateEnd, DataType.DateTime));
  2027. sqlPara.Add(new CDAParameter("HIGHPRESSUREFLAG",highFlag));
  2028. sqlPara.Add(new CDAParameter("TESTMOULDFLAG",testType));
  2029. sqlPara.Add(new CDAParameter("TESTFLAG",testFlagMaster));
  2030. //sqlPara.Add(new CDAParameter("PROCEDUREID", context.Request["procedureidMaster"]));
  2031. //行列互换
  2032. //===============================================================================
  2033. DataTable dt = conn.ExecuteDatatable(sqlStr, sqlPara.ToArray());
  2034. DataTable dt2 = new DataTable();
  2035. dt2.Columns.Add("部门序号");
  2036. dt2.Columns.Add("部门");
  2037. dt2.Columns.Add("工序");
  2038. for (int i = 0; i < dt.Rows.Count; i++) dt2.Columns.Add("日期" + dt.Rows[i]["时间"].ToString());
  2039. for (int j = 1; j < dt.Columns.Count; j++)
  2040. {
  2041. DataRow dr = dt2.NewRow();
  2042. dr["部门序号"] = dt.Columns[j].ColumnName.Substring(dt.Columns[j].ColumnName.IndexOf("_")+1)
  2043. .Replace("一部全部","1").Replace("二部全部","2").Replace("三部全部","3");
  2044. dr["部门"] = dt.Columns[j].ColumnName.Substring(dt.Columns[j].ColumnName.IndexOf("_")+1);
  2045. dr["工序"] = dt.Columns[j].ColumnName.Substring(0, dt.Columns[j].ColumnName.IndexOf("_"));
  2046. for (int i = 0; i < dt.Rows.Count; i++)
  2047. {
  2048. dr["日期" + dt.Rows[i]["时间"].ToString()] = dt.Rows[i][dt.Columns[j].ColumnName];
  2049. }
  2050. dt2.Rows.Add(dr);
  2051. }
  2052. DataView dv = dt2.DefaultView;
  2053. dv.Sort = "部门序号";
  2054. dt2.Columns.Remove("部门序号");
  2055. dt2 = dv.ToTable();
  2056. context.Response.Write(new JsonResult(dt2) { total = dt.Rows.Count }.ToJson());
  2057. }
  2058. //子表1
  2059. if(context.Request["m"].ToString()=="1")
  2060. {
  2061. //读取报表数据
  2062. string sqlStr = @"
  2063. SELECT
  2064. TT1.BARCODE 条码
  2065. --TT1.车间
  2066. FROM(
  2067. SELECT
  2068. TT.BARCODE,
  2069. CASE WHEN (INSTR(GDD.GROUTINGLINECODE, 'A') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  2070. AND INSTR(GT.GOODSTYPECODE, '001002') = 1 THEN 1
  2071. WHEN (INSTR(GDD.GROUTINGLINECODE, 'B') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  2072. AND INSTR(GT.GOODSTYPECODE, '001001') = 1 THEN 2
  2073. WHEN INSTR(GDD.GROUTINGLINECODE, 'C') = 1 THEN 3 ELSE 0 END 车间
  2074. FROM(
  2075. SELECT GDD.BARCODE,'1' nodetype,GDD.groutingdailydetailid FROM(
  2076. SELECT s.groutingdailydetailid,s.outputnum,NVL(s.counts,0),NVL(s.countt,0)
  2077. FROM (SELECT a.groutingdailydetailid,a.outputnum,a.counts,tt.countt
  2078. FROM (SELECT groutingdailydetailid,outputnum,COUNT(*) counts
  2079. FROM (SELECT decode(gh.datatype, 1, 1, -1) outputnum,gdd.groutingdailydetailid
  2080. FROM tp_pm_goodschangehistory gh
  2081. INNER JOIN tp_pm_groutingdailydetail gdd
  2082. ON gdd.groutingdailydetailid = gh.groutingdailydetailid
  2083. INNER JOIN tp_mst_goods g
  2084. ON g.goodsid = gh.goodsid
  2085. INNER JOIN tp_mst_goodstype gt
  2086. ON g.goodstypeid = gt.goodstypeid
  2087. WHERE gh.createtime >= @DATEBEGIN@
  2088. AND gh.createtime < @DATEEND@
  2089. AND gh.datatype IN (1, 2)
  2090. AND g.scrapsumflag = '1')
  2091. GROUP BY groutingdailydetailid,outputnum) a
  2092. LEFT JOIN (SELECT groutingdailydetailid,outputnum,COUNT(*) countt
  2093. FROM tsap_hegii_datalog_bg_detail THDBD
  2094. LEFT JOIN TSAP_HEGII_DATALOG_BG THDB ON THDBD.LOGID = THDB.LOGID
  2095. WHERE THDBD.outputnum NOT IN (0)
  2096. AND THDB.DATACODE = 20
  2097. AND THDB.YYYYMMDD>=TO_CHAR(@DATEBEGIN@,'YYYYMMDD') AND THDB.YYYYMMDD<TO_CHAR(@DATEEND@,'YYYYMMDD')
  2098. GROUP BY groutingdailydetailid,outputnum) tt
  2099. ON tt.groutingdailydetailid = a.groutingdailydetailid
  2100. AND tt.outputnum = a.outputnum ) s
  2101. WHERE NVL(s.counts,0)!=NVL(s.countt,0))T
  2102. LEFT JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON T.groutingdailydetailid = GDD.groutingdailydetailid
  2103. UNION ALL
  2104. SELECT GDD.BARCODE,'2' nodetype,gdd.groutingdailydetailid FROM(
  2105. SELECT s.groutingdailydetailid,s.SCRAPNUM,NVL(s.counts,0),NVL(s.countt,0)
  2106. FROM (SELECT a.groutingdailydetailid,a.SCRAPNUM,a.counts,tt.countt
  2107. FROM (SELECT
  2108. TT.GROUTINGDAILYDETAILID,
  2109. TT.SCRAPNUM,
  2110. COUNT(*) counts
  2111. FROM(
  2112. SELECT
  2113. gdd.groutingdailydetailid,
  2114. DECODE( GH.DATATYPE, 3, 1, - 1 )SCRAPNUM
  2115. FROM
  2116. TP_PM_GOODSCHANGEHISTORY GH
  2117. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON GDD.GROUTINGDAILYDETAILID = GH.GROUTINGDAILYDETAILID
  2118. INNER JOIN TP_MST_USER U ON U.USERID = GH.USERID
  2119. INNER JOIN TP_MST_GOODS G ON G.GOODSID = GH.GOODSID
  2120. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID
  2121. WHERE
  2122. GH.CREATETIME >= @DATEBEGIN@
  2123. AND GH.CREATETIME < @DATEEND@
  2124. AND GH.DATATYPE IN ( 3, 4 )
  2125. AND G.SCRAPSUMFLAG = '1'
  2126. UNION ALL-- 工序报损
  2127. SELECT
  2128. gdd.groutingdailydetailid,
  2129. 1 SCRAPNUM
  2130. FROM
  2131. TP_PM_SCRAPPRODUCT SP
  2132. INNER JOIN TSAP_HEGII_DATAITEM HGDI ON HGDI.DATACODE IN ( 20,30,40 )
  2133. AND HGDI.ITEMTYPE = 2
  2134. AND HGDI.ITEMID = SP.PROCEDUREID
  2135. INNER JOIN TP_PM_PRODUCTIONDATA PD ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  2136. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  2137. INNER JOIN TP_MST_GOODS G ON G.GOODSID = GDD.GOODSID
  2138. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID
  2139. WHERE
  2140. SP.AUDITSTATUS = 1
  2141. AND SP.AUDITDATE >= @DATEBEGIN@
  2142. AND SP.AUDITDATE < @DATEEND@ -- AND SP.SCRAPTYPE IN (0, 2, 3)
  2143. UNION ALL-- 工序报损撤销
  2144. SELECT
  2145. gdd.groutingdailydetailid,
  2146. -1 SCRAPNUM
  2147. FROM
  2148. TP_PM_SCRAPPRODUCT SP
  2149. INNER JOIN TSAP_HEGII_DATAITEM HGDI ON HGDI.DATACODE IN ( 20,30,40 )
  2150. AND HGDI.ITEMTYPE = 2
  2151. AND HGDI.ITEMID = SP.PROCEDUREID
  2152. INNER JOIN TP_PM_PRODUCTIONDATA PD ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  2153. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  2154. INNER JOIN TP_MST_GOODS G ON G.GOODSID = GDD.GOODSID
  2155. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID
  2156. WHERE
  2157. SP.AUDITSTATUS = 1
  2158. AND SP.VALUEFLAG = '0'
  2159. AND SP.BACKOUTTIME >= @DATEBEGIN@
  2160. AND SP.BACKOUTTIME < @DATEEND@ -- AND SP.SCRAPTYPE IN (0, 2, 3)
  2161. UNION ALL-- 干补报损
  2162. ---------------------------------------------------
  2163. SELECT
  2164. groutingdailydetailid,
  2165. 1
  2166. FROM
  2167. (
  2168. SELECT
  2169. SP.GOODSCODE,
  2170. GDD.MATERIALCODE SAPCODE,
  2171. PD.USERCODE,
  2172. gdd.groutingdailydetailid,
  2173. CASE
  2174. WHEN HGDI.WORKSHOP = 2
  2175. AND INSTR( GT.GOODSTYPECODE, '001002' ) = 1 THEN
  2176. 1
  2177. WHEN HGDI.WORKSHOP = 2
  2178. AND INSTR( GT.GOODSTYPECODE, '001001' ) = 1 THEN
  2179. 2
  2180. WHEN HGDI.WORKSHOP = 3 THEN
  2181. 3 ELSE 4
  2182. END AS WORKSHOP,
  2183. GDD.TESTMOULDFLAG,
  2184. G.GOODS_LINE_CODE,
  2185. TO_CHAR( SP.AUDITDATE, 'yymm' ) || '5000E' AS CHARG --TO_CHAR(SP.AUDITDATE, 'yyyymm') AS CHARG
  2186. FROM
  2187. (
  2188. SELECT
  2189. T.*
  2190. FROM
  2191. (
  2192. SELECT
  2193. SP.BARCODE,
  2194. SP.GOODSCODE,
  2195. SP.GROUTINGDAILYDETAILID,
  2196. PD.PROCEDUREID,
  2197. PD.PRODUCTIONDATAID,
  2198. SP.AUDITDATE,
  2199. RANK ( ) OVER ( PARTITION BY SP.BARCODE ORDER BY PD.PRODUCTIONDATAID DESC ) AS RK
  2200. FROM
  2201. TP_PM_SCRAPPRODUCT SP
  2202. INNER JOIN TP_PM_PRODUCTIONDATA PD ON SP.BARCODE = PD.BARCODE -- 不包含干补工序
  2203. AND PD.PROCEDUREID <> 18 -- 要找干补之前的工序
  2204. AND PD.PRODUCTIONDATAID < SP.PRODUCTIONDATAID
  2205. AND PD.VALUEFLAG = '1'
  2206. WHERE
  2207. SP.AUDITSTATUS = 1
  2208. AND SP.PROCEDUREID = 18
  2209. AND SP.AUDITDATE >= @DATEBEGIN@
  2210. AND SP.AUDITDATE < @DATEEND@
  2211. ) T
  2212. WHERE
  2213. T.RK <= 1
  2214. ) SP
  2215. INNER JOIN TSAP_HEGII_DATAITEM HGDI ON HGDI.DATACODE IN ( 20,30,40 )
  2216. AND HGDI.ITEMTYPE = 2
  2217. AND HGDI.ITEMID = SP.PROCEDUREID
  2218. INNER JOIN TP_PM_PRODUCTIONDATA PD ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  2219. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  2220. INNER JOIN TP_MST_GOODS G ON G.GOODSID = PD.GOODSID
  2221. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID
  2222. ) )TT GROUP BY TT.GROUTINGDAILYDETAILID,TT.SCRAPNUM) a
  2223. LEFT JOIN (SELECT groutingdailydetailid,SCRAPNUM,COUNT(*) countt
  2224. FROM tsap_hegii_datalog_bg_detail THDBD
  2225. LEFT JOIN TSAP_HEGII_DATALOG_BG THDB ON THDBD.LOGID = THDB.LOGID
  2226. WHERE THDBD.SCRAPNUM NOT IN (0)
  2227. AND THDB.DATACODE IN (20,30,40)
  2228. AND THDB.YYYYMMDD>=TO_CHAR(@DATEBEGIN@,'YYYYMMDD') AND THDB.YYYYMMDD<TO_CHAR(@DATEEND@,'YYYYMMDD')
  2229. GROUP BY groutingdailydetailid,SCRAPNUM) tt
  2230. ON tt.groutingdailydetailid = a.groutingdailydetailid
  2231. AND tt.SCRAPNUM = a.SCRAPNUM ) s
  2232. WHERE NVL(s.counts,0)!=NVL(s.countt,0))T
  2233. LEFT JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON T.groutingdailydetailid = GDD.groutingdailydetailid
  2234. UNION ALL
  2235. SELECT GDD.BARCODE,'3' nodetype,gdd.groutingdailydetailid FROM(
  2236. SELECT s.groutingdailydetailid,s.outputnum,NVL(s.counts,0),NVL(s.countt,0)
  2237. FROM (SELECT a.groutingdailydetailid,a.outputnum,a.counts,tt.countt
  2238. FROM (SELECT groutingdailydetailid,outputnum,COUNT(*) counts
  2239. FROM (--20、30、40干补
  2240. SELECT
  2241. 1 outputnum,
  2242. groutingdailydetailid
  2243. FROM
  2244. (
  2245. SELECT
  2246. SP.GOODSCODE,
  2247. GDD.MATERIALCODE SAPCODE,
  2248. SP.SPECIALREPAIRUSERCODE USERCODE,
  2249. gdd.groutingdailydetailid,
  2250. CASE
  2251. WHEN HGDI.WORKSHOP = 2
  2252. AND INSTR( GT.GOODSTYPECODE, '001002' ) = 1 THEN
  2253. 1
  2254. WHEN HGDI.WORKSHOP = 2
  2255. AND INSTR( GT.GOODSTYPECODE, '001001' ) = 1 THEN
  2256. 2
  2257. WHEN HGDI.WORKSHOP = 3 THEN
  2258. 3 ELSE 4
  2259. END AS WORKSHOP,
  2260. DECODE( GDD.TESTMOULDFLAG, 0, 'C', 1, 'Y', '-' ) AS TESTMOULDFLAG,
  2261. G.GOODS_LINE_CODE,
  2262. TO_CHAR( SP.SPECIALREPAIRTIME, 'yymm' ) || '5000E' AS CHARG --TO_CHAR(SP.SPECIALREPAIRTIME, 'yyyymm') AS CHARG
  2263. FROM
  2264. TP_PM_SCRAPPRODUCT SP
  2265. INNER JOIN TSAP_HEGII_DATAITEM HGDI ON HGDI.DATACODE IN ( '20','30','40')
  2266. AND HGDI.ITEMTYPE = 2
  2267. AND HGDI.ITEMID = SP.PROCEDUREID
  2268. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  2269. INNER JOIN TP_MST_GOODS G ON G.GOODSID = GDD.GOODSID
  2270. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID
  2271. WHERE
  2272. SP.AUDITSTATUS = 1
  2273. AND SP.GOODSLEVELTYPEID = 9
  2274. AND SP.SPECIALREPAIRTIME >= @DATEBEGIN@
  2275. AND SP.SPECIALREPAIRTIME < @DATEEND@ ) )
  2276. GROUP BY groutingdailydetailid,outputnum) a
  2277. LEFT JOIN (SELECT groutingdailydetailid,REPAIRNUM outputnum,COUNT(*) countt
  2278. FROM tsap_hegii_datalog_bg_detail THDBD
  2279. LEFT JOIN TSAP_HEGII_DATALOG_BG THDB ON THDBD.LOGID = THDB.LOGID
  2280. WHERE THDBD.REPAIRNUM NOT IN (0)
  2281. AND THDB.DATACODE IN ('20','30','40')
  2282. AND THDB.YYYYMMDD>=TO_CHAR(@DATEBEGIN@,'YYYYMMDD') AND THDB.YYYYMMDD<TO_CHAR(@DATEEND@,'YYYYMMDD')
  2283. GROUP BY groutingdailydetailid,REPAIRNUM) tt
  2284. ON tt.groutingdailydetailid = a.groutingdailydetailid
  2285. AND tt.outputnum = a.outputnum ) s
  2286. WHERE NVL(s.counts,0)!=NVL(s.countt,0))T
  2287. LEFT JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON T.groutingdailydetailid = GDD.groutingdailydetailid
  2288. UNION ALL
  2289. SELECT GDD.BARCODE,'4' nodetype,gdd.groutingdailydetailid FROM(
  2290. SELECT s.groutingdailydetailid,s.outputnum,NVL(s.counts,0),NVL(s.countt,0)
  2291. FROM (SELECT a.groutingdailydetailid,a.outputnum,a.counts,tt.countt
  2292. FROM (SELECT groutingdailydetailid,outputnum,COUNT(*) counts
  2293. FROM (SELECT GROUTINGDAILYDETAILID,
  2294. 1 OUTPUTNUM
  2295. FROM (SELECT CASE
  2296. WHEN T.IS3 > 0 THEN
  2297. 3
  2298. WHEN INSTR(T.GOODSTYPECODE, '001002') = 1 THEN
  2299. 1
  2300. WHEN INSTR(T.GOODSTYPECODE, '001001') = 1 THEN
  2301. 2
  2302. ELSE
  2303. 2
  2304. END AS WORKSHOP,
  2305. T.GROUTINGDAILYDETAILID
  2306. FROM (SELECT DISTINCT PD.BARCODE,
  2307. PD.GOODSCODE,
  2308. GDD.GROUTINGDAILYDETAILID,
  2309. GDD.MATERIALCODE SAPCODE,
  2310. PD.USERCODE,
  2311. DECODE(GDD.TESTMOULDFLAG, 0, 'C', 1, 'Y', '-') AS TESTMOULDFLAG,
  2312. G.GOODS_LINE_CODE,
  2313. TO_CHAR(PD.CREATETIME, 'yymm') || '5000E' AS CHARG,
  2314. --TO_CHAR(PD.CREATETIME, 'yyyymm') AS CHARG,
  2315. HGDI.WORKSHOP AS HGDIWORKSHOP,
  2316. GT.GOODSTYPECODE,
  2317. -- 如果3#卸窑(103),就是3车间的
  2318. (SELECT COUNT(1)
  2319. FROM TP_PM_PRODUCTIONDATA PD2
  2320. WHERE PD2.BARCODE = PD.BARCODE
  2321. AND PD2.PROCEDUREID = 103) AS IS3
  2322. FROM TP_PM_PRODUCTIONDATA PD
  2323. INNER JOIN TSAP_HEGII_DATAITEM HGDI
  2324. ON HGDI.DATACODE = '50'
  2325. AND HGDI.ITEMTYPE = 1
  2326. AND HGDI.ITEMID = PD.PROCEDUREID -- 3#成检交接(本烧重烧共用,且可以改判)
  2327. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  2328. ON GDD.GROUTINGDAILYDETAILID = PD.GROUTINGDAILYDETAILID
  2329. INNER JOIN TP_MST_GOODS G
  2330. ON G.GOODSID = PD.GOODSID
  2331. INNER JOIN TP_MST_GOODSTYPE GT
  2332. ON G.GOODSTYPEID = GT.GOODSTYPEID
  2333. WHERE PD.CREATETIME >= @DATEBEGIN@
  2334. AND PD.CREATETIME < @DATEEND@
  2335. AND PD.ISREFIRE = '0'
  2336. AND PD.Islengbu = '0'
  2337. --AND PD.KILNID IN(1,2,5)-- 取本烧的窑炉
  2338. --AND ((HGDI.ITEMID <> 104 AND PD.VALUEFLAG = '1') OR
  2339. -- (HGDI.ITEMID = 104 AND PD.ISREFIRE = '0' AND
  2340. -- PD.CHECKFLAG = '1'))) T
  2341. AND ((HGDI.ITEMID = 11 AND (PD.CHECKFLAG = '1' OR PD.CHECKFLAG IS NULL))
  2342. OR (HGDI.ITEMID = 104 AND PD.CHECKFLAG = '1')) ) T
  2343. ))
  2344. GROUP BY groutingdailydetailid,outputnum) a
  2345. LEFT JOIN (SELECT groutingdailydetailid,outputnum,COUNT(*) countt
  2346. FROM tsap_hegii_datalog_bg_detail THDBD
  2347. LEFT JOIN TSAP_HEGII_DATALOG_BG THDB ON THDBD.LOGID = THDB.LOGID
  2348. WHERE THDBD.outputnum NOT IN (0)
  2349. AND THDB.DATACODE = 50
  2350. AND THDB.YYYYMMDD>=TO_CHAR(@DATEBEGIN@,'YYYYMMDD') AND THDB.YYYYMMDD<TO_CHAR(@DATEEND@,'YYYYMMDD')
  2351. GROUP BY groutingdailydetailid,outputnum) tt
  2352. ON tt.groutingdailydetailid = a.groutingdailydetailid
  2353. AND tt.outputnum = a.outputnum ) s
  2354. WHERE NVL(s.counts,0)!=NVL(s.countt,0)
  2355. )T
  2356. LEFT JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON T.groutingdailydetailid = GDD.groutingdailydetailid
  2357. UNION ALL
  2358. SELECT GDD.BARCODE,'5' nodetype,gdd.groutingdailydetailid FROM(
  2359. SELECT s.groutingdailydetailid,s.outputnum,NVL(s.counts,0),NVL(s.countt,0)
  2360. FROM (SELECT a.groutingdailydetailid,a.outputnum,a.counts,tt.countt
  2361. FROM (SELECT groutingdailydetailid,outputnum,COUNT(*) counts
  2362. FROM (SELECT groutingdailydetailid,
  2363. 1 outputnum
  2364. FROM (SELECT
  2365. T.groutingdailydetailid
  2366. FROM (SELECT GDD.groutingdailydetailid
  2367. FROM TP_PM_SCRAPPRODUCT SP
  2368. INNER JOIN TSAP_HEGII_DATAITEM HGDI
  2369. ON HGDI.DATACODE = '50'
  2370. AND HGDI.ITEMTYPE = 2
  2371. AND HGDI.ITEMID = SP.PROCEDUREID
  2372. INNER JOIN TP_PM_PRODUCTIONDATA PD
  2373. ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  2374. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  2375. ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  2376. INNER JOIN TP_MST_GOODS G
  2377. ON G.GOODSID = PD.GOODSID
  2378. INNER JOIN TP_MST_GOODSTYPE GT
  2379. ON G.GOODSTYPEID = GT.GOODSTYPEID
  2380. WHERE SP.AUDITSTATUS = 1
  2381. AND SP.AUDITDATE >= @DATEBEGIN@
  2382. AND SP.AUDITDATE < @DATEEND@
  2383. --AND SP.SCRAPTYPE IN (0, 2, 3)
  2384. ) T)
  2385. ---------------------------------------------------
  2386. UNION ALL
  2387. -- 工序报损撤销
  2388. ---------------------------------------------------
  2389. SELECT groutingdailydetailid,
  2390. -1 SCRAPNUM
  2391. FROM (SELECT
  2392. T.groutingdailydetailid
  2393. FROM (SELECT gdd.groutingdailydetailid
  2394. FROM TP_PM_SCRAPPRODUCT SP
  2395. INNER JOIN TSAP_HEGII_DATAITEM HGDI
  2396. ON HGDI.DATACODE = '50'
  2397. AND HGDI.ITEMTYPE = 2
  2398. AND HGDI.ITEMID = SP.PROCEDUREID
  2399. INNER JOIN TP_PM_PRODUCTIONDATA PD
  2400. ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  2401. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  2402. ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  2403. INNER JOIN TP_MST_GOODS G
  2404. ON G.GOODSID = PD.GOODSID
  2405. INNER JOIN TP_MST_GOODSTYPE GT
  2406. ON G.GOODSTYPEID = GT.GOODSTYPEID
  2407. WHERE SP.AUDITSTATUS = 1
  2408. AND SP.BACKOUTTIME >= @DATEBEGIN@
  2409. AND SP.BACKOUTTIME < @DATEEND@
  2410. --AND SP.SCRAPTYPE IN (0, 2, 3)
  2411. ) T)
  2412. ---------------------------------------------------
  2413. UNION ALL
  2414. -- 干补报损
  2415. ---------------------------------------------------
  2416. SELECT groutingdailydetailid,
  2417. 1
  2418. FROM (SELECT SP.groutingdailydetailid
  2419. FROM (SELECT T.*
  2420. FROM (SELECT SP.BARCODE,
  2421. SP.GOODSCODE,
  2422. SP.groutingdailydetailid,
  2423. PD.PROCEDUREID,
  2424. PD.PRODUCTIONDATAID,
  2425. SP.AUDITDATE,
  2426. RANK() OVER(PARTITION BY SP.BARCODE ORDER BY PD.PRODUCTIONDATAID DESC) AS RK
  2427. FROM TP_PM_SCRAPPRODUCT SP
  2428. INNER JOIN TP_PM_PRODUCTIONDATA PD
  2429. ON SP.BARCODE = PD.BARCODE
  2430. -- 不包含干补工序
  2431. AND PD.PROCEDUREID <> 18
  2432. -- 要找干补之前的工序
  2433. AND PD.PRODUCTIONDATAID < SP.PRODUCTIONDATAID
  2434. AND PD.VALUEFLAG = '1'
  2435. WHERE SP.AUDITSTATUS = 1
  2436. AND SP.PROCEDUREID = 18
  2437. AND SP.AUDITDATE >= @DATEBEGIN@
  2438. AND SP.AUDITDATE < @DATEEND@) T
  2439. WHERE T.RK <= 1) SP
  2440. INNER JOIN TSAP_HEGII_DATAITEM HGDI
  2441. ON HGDI.DATACODE = '50'
  2442. AND HGDI.ITEMTYPE = 2
  2443. AND HGDI.ITEMID = SP.PROCEDUREID
  2444. INNER JOIN TP_PM_PRODUCTIONDATA PD
  2445. ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  2446. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  2447. ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  2448. INNER JOIN TP_MST_GOODS G
  2449. ON G.GOODSID = PD.GOODSID
  2450. INNER JOIN TP_MST_GOODSTYPE GT
  2451. ON G.GOODSTYPEID = GT.GOODSTYPEID))
  2452. GROUP BY groutingdailydetailid,outputnum) a
  2453. LEFT JOIN (SELECT groutingdailydetailid,SCRAPNUM outputnum,COUNT(*) countt
  2454. FROM tsap_hegii_datalog_bg_detail THDBD
  2455. LEFT JOIN TSAP_HEGII_DATALOG_BG THDB ON THDBD.LOGID = THDB.LOGID
  2456. WHERE THDBD.SCRAPNUM NOT IN (0)
  2457. AND THDB.DATACODE IN (50)
  2458. AND THDB.YYYYMMDD>=TO_CHAR(@DATEBEGIN@,'YYYYMMDD') AND THDB.YYYYMMDD<TO_CHAR(@DATEEND@,'YYYYMMDD')
  2459. GROUP BY groutingdailydetailid,SCRAPNUM) tt
  2460. ON tt.groutingdailydetailid = a.groutingdailydetailid
  2461. AND tt.outputnum = a.outputnum ) s
  2462. WHERE NVL(s.counts,0)!=NVL(s.countt,0) )T
  2463. LEFT JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON T.groutingdailydetailid = GDD.groutingdailydetailid
  2464. UNION ALL
  2465. SELECT GDD.BARCODE,'6' nodetype,gdd.groutingdailydetailid FROM(
  2466. SELECT s.groutingdailydetailid,s.outputnum,NVL(s.counts,0),NVL(s.countt,0)
  2467. FROM (SELECT a.groutingdailydetailid,a.outputnum,a.counts,tt.countt
  2468. FROM (SELECT groutingdailydetailid,outputnum,COUNT(*) counts
  2469. FROM (SELECT T.GROUTINGDAILYDETAILID,
  2470. DECODE(T.RECYCLINGFLAG, '0', 0, 1) outputnum
  2471. FROM (SELECT
  2472. BAR.RECYCLINGFLAG,
  2473. BAR.GROUTINGDAILYDETAILID,
  2474. TO_CHAR(GH.FHTIME, 'yyyymm') AS CHARG
  2475. FROM TP_PM_GROUTINGDAILYDETAIL BAR
  2476. INNER JOIN TP_PM_FINISHEDPRODUCT GH
  2477. ON BAR.GROUTINGDAILYDETAILID = GH.GROUTINGDAILYDETAILID
  2478. INNER JOIN TP_MST_GOODS G
  2479. ON G.GOODSID = BAR.GOODSID
  2480. INNER JOIN TP_MST_GOODSTYPE GT
  2481. ON GT.GOODSTYPEID = G.GOODSTYPEID
  2482. LEFT JOIN TP_PM_ORDER O
  2483. ON O.ORDERID = GH.FHORDERID
  2484. WHERE GH.FHUSERID IS NOT NULL
  2485. AND GH.FHTIME >= @DATEBEGIN@
  2486. AND GH.FHTIME < @DATEEND@) T)
  2487. GROUP BY groutingdailydetailid,outputnum) a
  2488. LEFT JOIN ( SELECT T1.groutingdailydetailid,T1.OUTPUTNUM,COUNT(*) countt FROM (
  2489. SELECT DISTINCT TPF.groutingdailydetailid,DECODE(BAR.RECYCLINGFLAG, '0', 0, 1) outputnum FROM TSAP_HEGII_WORKDATA_BG TSH
  2490. INNER JOIN TP_PM_FINISHEDPRODUCT TPF ON TSH.LOGID = TPF.BGLOGID
  2491. INNER JOIN TP_PM_GROUTINGDAILYDETAIL BAR ON TPF.groutingdailydetailid = BAR.groutingdailydetailid
  2492. WHERE
  2493. TSH.CREATETIME>=@DATEBEGIN@
  2494. AND TSH.CREATETIME<@DATEEND@
  2495. AND TPF.CREATETIME>=@DATEBEGINONE@
  2496. AND TPF.CREATETIME<@DATEEND@
  2497. AND TPF.VALUEFLAG = 1
  2498. and TSH.DATACODE = 60
  2499. AND TSH.outputnum NOT IN (0))T1 GROUP BY T1.groutingdailydetailid,T1.OUTPUTNUM) tt
  2500. ON tt.groutingdailydetailid = a.groutingdailydetailid
  2501. AND tt.outputnum = a.outputnum ) s
  2502. WHERE NVL(s.counts,0)!=NVL(s.countt,0))T
  2503. LEFT JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON T.groutingdailydetailid = GDD.groutingdailydetailid
  2504. UNION ALL
  2505. SELECT GDD.BARCODE,'7' nodetype,gdd.groutingdailydetailid FROM(
  2506. SELECT s.groutingdailydetailid,s.outputnum,NVL(s.counts,0),NVL(s.countt,0)
  2507. FROM (SELECT a.groutingdailydetailid,a.outputnum,a.counts,tt.countt
  2508. FROM (SELECT groutingdailydetailid,outputnum,COUNT(*) counts
  2509. FROM (SELECT T1.GROUTINGDAILYDETAILID,
  2510. DECODE(T1.RECYCLINGFLAG, '1', 0, 1) OUTPUTNUM
  2511. FROM (SELECT
  2512. BAR.RECYCLINGFLAG,
  2513. BAR.GROUTINGDAILYDETAILID,
  2514. TO_CHAR(GH.FHTIME, 'yyyymm') AS CHARG
  2515. FROM TP_PM_GROUTINGDAILYDETAIL BAR
  2516. INNER JOIN TP_PM_FINISHEDPRODUCT GH
  2517. ON BAR.GROUTINGDAILYDETAILID = GH.GROUTINGDAILYDETAILID
  2518. INNER JOIN TP_MST_GOODS G
  2519. ON G.GOODSID = BAR.GOODSID
  2520. INNER JOIN TP_MST_GOODSTYPE GT
  2521. ON GT.GOODSTYPEID = G.GOODSTYPEID
  2522. LEFT JOIN TP_PM_ORDER O
  2523. ON O.ORDERID = GH.FHORDERID
  2524. WHERE GH.FHUSERID IS NOT NULL
  2525. AND GH.FHTIME >= @DATEBEGIN@
  2526. AND GH.FHTIME < @DATEEND@) T1)
  2527. GROUP BY groutingdailydetailid,outputnum) a
  2528. LEFT JOIN ( SELECT T1.groutingdailydetailid,T1.OUTPUTNUM,COUNT(*) countt FROM (
  2529. SELECT DISTINCT TPF.groutingdailydetailid,DECODE(BAR.RECYCLINGFLAG, '1', 0, 1) OUTPUTNUM FROM TSAP_HEGII_WORKDATA_BG TSH
  2530. INNER JOIN TP_PM_FINISHEDPRODUCT TPF ON TSH.LOGID = TPF.BGLOGID
  2531. INNER JOIN TP_PM_GROUTINGDAILYDETAIL BAR ON TPF.groutingdailydetailid = BAR.groutingdailydetailid
  2532. WHERE
  2533. TSH.CREATETIME>=@DATEBEGIN@
  2534. AND TSH.CREATETIME<@DATEEND@
  2535. AND TPF.CREATETIME>=@DATEBEGINONE@
  2536. AND TPF.CREATETIME<@DATEEND@
  2537. AND TPF.VALUEFLAG = 1
  2538. and TSH.DATACODE = 60
  2539. AND TSH.outputnum NOT IN (0))T1 GROUP BY T1.groutingdailydetailid,T1.OUTPUTNUM) tt
  2540. ON tt.groutingdailydetailid = a.groutingdailydetailid
  2541. AND tt.outputnum = a.outputnum ) s
  2542. WHERE NVL(s.counts,0)!=NVL(s.countt,0))T
  2543. LEFT JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON T.groutingdailydetailid = GDD.groutingdailydetailid) TT
  2544. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON TT.groutingdailydetailid = GDD.groutingdailydetailid
  2545. INNER JOIN tp_mst_goods g ON g.goodsid = GDD.goodsid
  2546. INNER JOIN tp_mst_goodstype gt ON g.goodstypeid = gt.goodstypeid WHERE TT.nodetype = @nodetype@ )TT1
  2547. WHERE TT1.车间 = @WORKSHOP@ and TT1.BARCODE is not null
  2548. ";
  2549. if (context.Request["shorname"].ToString() == "注浆数")
  2550. {
  2551. nodetype1 = 1;
  2552. }
  2553. else if (context.Request["shorname"].ToString() == "损坯数")
  2554. {
  2555. nodetype1 = 2;
  2556. }
  2557. else if (context.Request["shorname"].ToString() == "干补数")
  2558. {
  2559. nodetype1 = 3;
  2560. }
  2561. else if (context.Request["shorname"].ToString() == "出窑数")
  2562. {
  2563. nodetype1 = 4;
  2564. }
  2565. else if (context.Request["shorname"].ToString() == "质量登记数")
  2566. {
  2567. nodetype1 = 5;
  2568. }
  2569. else if (context.Request["shorname"].ToString() == "回收数")
  2570. {
  2571. nodetype1 = 6;
  2572. }
  2573. else
  2574. {
  2575. nodetype1 = 7;
  2576. }
  2577. DateTime dateend = Convert.ToDateTime(context.Request["dateendMaster"]).AddDays(1);
  2578. DateTime datebeginone = Convert.ToDateTime(context.Request["datebeginMaster"]).AddDays(-1);
  2579. List<CDAParameter> sqlPara = new List<CDAParameter>();
  2580. sqlPara.Add(new CDAParameter("nodetype", nodetype1));
  2581. sqlPara.Add(new CDAParameter("WORKSHOP", context.Request["WORKSHOP"].ToString()));
  2582. sqlPara.Add(new CDAParameter("DATEBEGIN", context.Request["datebeginMaster"].ToString(), DataType.DateTime));
  2583. sqlPara.Add(new CDAParameter("DATEBEGINONE", datebeginone, DataType.DateTime));
  2584. sqlPara.Add(new CDAParameter("DATEEND", dateend, DataType.DateTime));
  2585. JsonResult data = Easyui.ExecuteJsonResult(conn, sqlStr, sqlPara);
  2586. context.Response.Write(data.ToJson());
  2587. }
  2588. if (context.Request["m"].ToString() == "cy")
  2589. {
  2590. //读取报表数据
  2591. string sqlStr = @"
  2592. SELECT
  2593. --Q.注浆数_车间 车间,
  2594. Q.注浆数_差异量 差异量
  2595. FROM(
  2596. SELECT O.注浆数_车间,'注浆数_'||NVL(O.注浆数_差异量,0)注浆数_差异量,1 NUM FROM(
  2597. SELECT A.注浆数_车间,B.注浆数_差异量 FROM(
  2598. SELECT 1 注浆数_车间,NULL 注浆数_差异量 FROM dual UNION ALL
  2599. SELECT 2 注浆数_车间,NULL 注浆数_差异量 FROM dual UNION ALL
  2600. SELECT 3 注浆数_车间,NULL 注浆数_差异量 FROM dual )A
  2601. LEFT JOIN(
  2602. SELECT
  2603. TT.注浆数_车间,
  2604. TO_CHAR(NVL(SUM(TT.注浆数_差异量),0)) 注浆数_差异量
  2605. FROM(
  2606. SELECT
  2607. CASE WHEN (INSTR(GDD.GROUTINGLINECODE, 'A') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  2608. AND INSTR(GT.GOODSTYPECODE, '001002') = 1 THEN 1
  2609. WHEN (INSTR(GDD.GROUTINGLINECODE, 'B') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  2610. AND INSTR(GT.GOODSTYPECODE, '001001') = 1 THEN 2
  2611. WHEN INSTR(GDD.GROUTINGLINECODE, 'C') = 1 THEN 3 ELSE 0 END 注浆数_车间,
  2612. CASE WHEN T.outputnum * T.counts = NULL THEN 0 ELSE T.outputnum * T.counts END 注浆数_差异量
  2613. FROM(
  2614. SELECT s.groutingdailydetailid,s.outputnum,NVL(s.counts,0) counts,NVL(s.countt,0) countt
  2615. FROM (SELECT a.groutingdailydetailid,a.outputnum,a.counts,tt.countt
  2616. FROM (SELECT groutingdailydetailid,outputnum,COUNT(*) counts
  2617. FROM (SELECT decode(gh.datatype, 1, 1, -1) outputnum,gdd.groutingdailydetailid
  2618. FROM tp_pm_goodschangehistory gh
  2619. INNER JOIN tp_pm_groutingdailydetail gdd
  2620. ON gdd.groutingdailydetailid = gh.groutingdailydetailid
  2621. INNER JOIN tp_mst_goods g
  2622. ON g.goodsid = gh.goodsid
  2623. INNER JOIN tp_mst_goodstype gt
  2624. ON g.goodstypeid = gt.goodstypeid
  2625. WHERE gh.createtime >= @DATEBEGIN@
  2626. AND gh.createtime < @DATEEND@
  2627. AND gh.datatype IN (1, 2)
  2628. AND g.scrapsumflag = '1')
  2629. GROUP BY groutingdailydetailid,outputnum) a
  2630. LEFT JOIN (SELECT groutingdailydetailid,outputnum,COUNT(*) countt
  2631. FROM tsap_hegii_datalog_bg_detail THDBD
  2632. LEFT JOIN TSAP_HEGII_DATALOG_BG THDB ON THDBD.LOGID = THDB.LOGID
  2633. WHERE THDBD.outputnum NOT IN (0)
  2634. AND THDB.DATACODE = 20
  2635. AND THDB.YYYYMMDD>=TO_CHAR(@DATEBEGIN@,'YYYYMMDD') AND THDB.YYYYMMDD<TO_CHAR(@DATEEND@,'YYYYMMDD')
  2636. GROUP BY groutingdailydetailid,outputnum) tt
  2637. ON tt.groutingdailydetailid = a.groutingdailydetailid
  2638. AND tt.outputnum = a.outputnum ) s
  2639. WHERE NVL(s.counts,0)!=NVL(s.countt,0) )T
  2640. LEFT JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON T.groutingdailydetailid = GDD.groutingdailydetailid
  2641. INNER JOIN TP_MST_GOODS G ON G.GOODSID = GDD.GOODSID
  2642. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID
  2643. )TT GROUP BY TT.注浆数_车间)B ON B.注浆数_车间 = A.注浆数_车间
  2644. )O
  2645. UNION ALL
  2646. SELECT O.出窑数_车间,'出窑数_'||NVL(O.出窑数_差异量,0),4 NUM FROM(
  2647. SELECT A.出窑数_车间,B.出窑数_差异量 FROM(
  2648. SELECT 1 出窑数_车间,NULL 出窑数_差异量 FROM dual UNION ALL
  2649. SELECT 2 出窑数_车间,NULL 出窑数_差异量 FROM dual UNION ALL
  2650. SELECT 3 出窑数_车间,NULL 出窑数_差异量 FROM dual) A
  2651. LEFT JOIN(
  2652. SELECT
  2653. TT.出窑数_车间,
  2654. SUM(TT.出窑数_差异量) 出窑数_差异量
  2655. FROM(
  2656. SELECT
  2657. CASE WHEN (INSTR(GDD.GROUTINGLINECODE, 'A') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  2658. AND INSTR(GT.GOODSTYPECODE, '001002') = 1 THEN 1
  2659. WHEN (INSTR(GDD.GROUTINGLINECODE, 'B') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  2660. AND INSTR(GT.GOODSTYPECODE, '001001') = 1 THEN 2
  2661. WHEN INSTR(GDD.GROUTINGLINECODE, 'C') = 1 THEN 3 ELSE 0 END 出窑数_车间,
  2662. CASE WHEN T.outputnum * T.counts = NULL THEN 0 ELSE T.outputnum * T.counts END 出窑数_差异量
  2663. FROM(
  2664. SELECT s.groutingdailydetailid,s.outputnum,NVL(s.counts,0) counts,NVL(s.countt,0) countt
  2665. FROM (SELECT a.groutingdailydetailid,a.outputnum,a.counts,tt.countt
  2666. FROM (SELECT groutingdailydetailid,outputnum,COUNT(*) counts
  2667. FROM (SELECT GROUTINGDAILYDETAILID,
  2668. 1 OUTPUTNUM
  2669. FROM (SELECT CASE
  2670. WHEN T.IS3 > 0 THEN
  2671. 3
  2672. WHEN INSTR(T.GOODSTYPECODE, '001002') = 1 THEN
  2673. 1
  2674. WHEN INSTR(T.GOODSTYPECODE, '001001') = 1 THEN
  2675. 2
  2676. ELSE
  2677. 2
  2678. END AS WORKSHOP,
  2679. T.GROUTINGDAILYDETAILID
  2680. FROM (SELECT DISTINCT PD.BARCODE,
  2681. PD.GOODSCODE,
  2682. GDD.GROUTINGDAILYDETAILID,
  2683. GDD.MATERIALCODE SAPCODE,
  2684. PD.USERCODE,
  2685. DECODE(GDD.TESTMOULDFLAG, 0, 'C', 1, 'Y', '-') AS TESTMOULDFLAG,
  2686. G.GOODS_LINE_CODE,
  2687. TO_CHAR(PD.CREATETIME, 'yymm') || '5000E' AS CHARG,
  2688. --TO_CHAR(PD.CREATETIME, 'yyyymm') AS CHARG,
  2689. HGDI.WORKSHOP AS HGDIWORKSHOP,
  2690. GT.GOODSTYPECODE,
  2691. -- 如果3#卸窑(103),就是3车间的
  2692. (SELECT COUNT(1)
  2693. FROM TP_PM_PRODUCTIONDATA PD2
  2694. WHERE PD2.BARCODE = PD.BARCODE
  2695. AND PD2.PROCEDUREID = 103) AS IS3
  2696. FROM TP_PM_PRODUCTIONDATA PD
  2697. INNER JOIN TSAP_HEGII_DATAITEM HGDI
  2698. ON HGDI.DATACODE = '50'
  2699. AND HGDI.ITEMTYPE = 1
  2700. AND HGDI.ITEMID = PD.PROCEDUREID -- 3#成检交接(本烧重烧共用,且可以改判)
  2701. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  2702. ON GDD.GROUTINGDAILYDETAILID = PD.GROUTINGDAILYDETAILID
  2703. INNER JOIN TP_MST_GOODS G
  2704. ON G.GOODSID = PD.GOODSID
  2705. INNER JOIN TP_MST_GOODSTYPE GT
  2706. ON G.GOODSTYPEID = GT.GOODSTYPEID
  2707. WHERE PD.CREATETIME >= @DATEBEGIN@
  2708. AND PD.CREATETIME < @DATEEND@
  2709. AND PD.ISREFIRE = '0'
  2710. AND PD.Islengbu = '0'
  2711. --AND PD.KILNID IN(1,2,5)-- 取本烧的窑炉
  2712. --AND ((HGDI.ITEMID <> 104 AND PD.VALUEFLAG = '1') OR
  2713. -- (HGDI.ITEMID = 104 AND PD.ISREFIRE = '0' AND
  2714. -- PD.CHECKFLAG = '1'))) T
  2715. AND ((HGDI.ITEMID = 11 AND (PD.CHECKFLAG = '1' OR PD.CHECKFLAG IS NULL))
  2716. OR (HGDI.ITEMID = 104 AND PD.CHECKFLAG = '1')) ) T
  2717. ))
  2718. GROUP BY groutingdailydetailid,outputnum) a
  2719. LEFT JOIN (SELECT groutingdailydetailid,outputnum,COUNT(*) countt
  2720. FROM tsap_hegii_datalog_bg_detail THDBD
  2721. LEFT JOIN TSAP_HEGII_DATALOG_BG THDB ON THDBD.LOGID = THDB.LOGID
  2722. WHERE THDBD.outputnum NOT IN (0)
  2723. AND THDB.DATACODE = 50
  2724. AND THDB.YYYYMMDD>=TO_CHAR(@DATEBEGIN@,'YYYYMMDD') AND THDB.YYYYMMDD<TO_CHAR(@DATEEND@,'YYYYMMDD')
  2725. GROUP BY groutingdailydetailid,outputnum) tt
  2726. ON tt.groutingdailydetailid = a.groutingdailydetailid
  2727. AND tt.outputnum = a.outputnum ) s
  2728. WHERE NVL(s.counts,0)!=NVL(s.countt,0))T
  2729. LEFT JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON T.groutingdailydetailid = GDD.groutingdailydetailid
  2730. INNER JOIN TP_MST_GOODS G ON G.GOODSID = GDD.GOODSID
  2731. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID)TT GROUP BY TT.出窑数_车间 )B ON A.出窑数_车间 = B.出窑数_车间
  2732. )O
  2733. UNION ALL
  2734. SELECT O.回收数_车间,'回收数_'||NVL(O.回收数_差异量,0),6 NUM FROM(
  2735. SELECT A.回收数_车间,B.回收数_差异量 FROM(
  2736. SELECT 1 回收数_车间,NULL 回收数_差异量 FROM dual UNION ALL
  2737. SELECT 2 回收数_车间,NULL 回收数_差异量 FROM dual UNION ALL
  2738. SELECT 3 回收数_车间,NULL 回收数_差异量 FROM dual) A
  2739. LEFT JOIN(
  2740. SELECT
  2741. TT.回收数_车间,
  2742. SUM(TT.回收数_差异量) 回收数_差异量
  2743. FROM(
  2744. SELECT
  2745. CASE WHEN (INSTR(GDD.GROUTINGLINECODE, 'A') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  2746. AND INSTR(GT.GOODSTYPECODE, '001002') = 1 THEN 1
  2747. WHEN (INSTR(GDD.GROUTINGLINECODE, 'B') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  2748. AND INSTR(GT.GOODSTYPECODE, '001001') = 1 THEN 2
  2749. WHEN INSTR(GDD.GROUTINGLINECODE, 'C') = 1 THEN 3 ELSE 0 END 回收数_车间,
  2750. CASE WHEN T.outputnum * T.counts = NULL THEN 0 ELSE T.outputnum * T.counts END 回收数_差异量
  2751. FROM(
  2752. SELECT s.groutingdailydetailid,s.outputnum,NVL(s.counts,0) counts,NVL(s.countt,0) countt
  2753. FROM (SELECT a.groutingdailydetailid,a.outputnum,a.counts,tt.countt
  2754. FROM (SELECT groutingdailydetailid,outputnum,COUNT(*) counts
  2755. FROM (SELECT T.GROUTINGDAILYDETAILID,
  2756. DECODE(T.RECYCLINGFLAG, '0', 0, 1) outputnum
  2757. FROM (SELECT
  2758. BAR.RECYCLINGFLAG,
  2759. BAR.GROUTINGDAILYDETAILID,
  2760. TO_CHAR(GH.FHTIME, 'yyyymm') AS CHARG
  2761. FROM TP_PM_GROUTINGDAILYDETAIL BAR
  2762. INNER JOIN TP_PM_FINISHEDPRODUCT GH
  2763. ON BAR.GROUTINGDAILYDETAILID = GH.GROUTINGDAILYDETAILID
  2764. INNER JOIN TP_MST_GOODS G
  2765. ON G.GOODSID = BAR.GOODSID
  2766. INNER JOIN TP_MST_GOODSTYPE GT
  2767. ON GT.GOODSTYPEID = G.GOODSTYPEID
  2768. LEFT JOIN TP_PM_ORDER O
  2769. ON O.ORDERID = GH.FHORDERID
  2770. WHERE GH.FHUSERID IS NOT NULL
  2771. AND GH.FHTIME >= @DATEBEGIN@
  2772. AND GH.FHTIME < @DATEEND@) T)
  2773. GROUP BY groutingdailydetailid,outputnum) a
  2774. LEFT JOIN ( SELECT T1.groutingdailydetailid,T1.OUTPUTNUM,COUNT(*) countt FROM (
  2775. SELECT DISTINCT TPF.groutingdailydetailid,CASE WHEN BAR.RECYCLINGFLAG='0' THEN 0 ELSE 1 END outputnum FROM TSAP_HEGII_WORKDATA_BG TSH
  2776. INNER JOIN TP_PM_FINISHEDPRODUCT TPF ON TSH.LOGID = TPF.BGLOGID
  2777. INNER JOIN TP_PM_GROUTINGDAILYDETAIL BAR ON TPF.groutingdailydetailid = BAR.groutingdailydetailid
  2778. WHERE
  2779. TSH.CREATETIME>=@DATEBEGIN@
  2780. AND TSH.CREATETIME<@DATEEND@
  2781. AND TPF.CREATETIME>=@DATEBEGINONE@
  2782. AND TPF.CREATETIME<@DATEEND@
  2783. AND TPF.VALUEFLAG = 1
  2784. and TSH.DATACODE = 60
  2785. AND TSH.outputnum != 0 )T1 GROUP BY T1.groutingdailydetailid,T1.OUTPUTNUM) tt
  2786. ON tt.groutingdailydetailid = a.groutingdailydetailid
  2787. AND tt.outputnum = a.outputnum ) s
  2788. WHERE NVL(s.counts,0)!=NVL(s.countt,0))T
  2789. LEFT JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON T.groutingdailydetailid = GDD.groutingdailydetailid
  2790. INNER JOIN TP_MST_GOODS G ON G.GOODSID = GDD.GOODSID
  2791. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID)TT GROUP BY TT.回收数_车间 )B ON A.回收数_车间 = B.回收数_车间
  2792. )O
  2793. UNION ALL
  2794. SELECT O.入库数_车间,'入库数_'||NVL(O.入库数_差异量,0),7 NUM FROM(
  2795. SELECT A.入库数_车间,B.入库数_差异量 FROM(
  2796. SELECT 1 入库数_车间,NULL 入库数_差异量 FROM dual UNION ALL
  2797. SELECT 2 入库数_车间,NULL 入库数_差异量 FROM dual UNION ALL
  2798. SELECT 3 入库数_车间,NULL 入库数_差异量 FROM dual) A
  2799. LEFT JOIN(
  2800. SELECT
  2801. TT.入库数_车间,
  2802. SUM(TT.入库数_差异量) 入库数_差异量
  2803. FROM(
  2804. SELECT
  2805. CASE WHEN (INSTR(GDD.GROUTINGLINECODE, 'A') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  2806. AND INSTR(GT.GOODSTYPECODE, '001002') = 1 THEN 1
  2807. WHEN (INSTR(GDD.GROUTINGLINECODE, 'B') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  2808. AND INSTR(GT.GOODSTYPECODE, '001001') = 1 THEN 2
  2809. WHEN INSTR(GDD.GROUTINGLINECODE, 'C') = 1 THEN 3 ELSE 0 END 入库数_车间,
  2810. CASE WHEN T.outputnum * T.counts = NULL THEN 0 ELSE T.outputnum * T.counts END 入库数_差异量
  2811. FROM(
  2812. SELECT s.groutingdailydetailid,s.outputnum,NVL(s.counts,0) counts,NVL(s.countt,0) countt
  2813. FROM (SELECT a.groutingdailydetailid,a.outputnum,a.counts,tt.countt
  2814. FROM (SELECT groutingdailydetailid,outputnum,COUNT(*) counts
  2815. FROM (SELECT T1.GROUTINGDAILYDETAILID,
  2816. DECODE(T1.RECYCLINGFLAG, '1', 0, 1) OUTPUTNUM
  2817. FROM (SELECT
  2818. BAR.RECYCLINGFLAG,
  2819. BAR.GROUTINGDAILYDETAILID,
  2820. TO_CHAR(GH.FHTIME, 'yyyymm') AS CHARG
  2821. FROM TP_PM_GROUTINGDAILYDETAIL BAR
  2822. INNER JOIN TP_PM_FINISHEDPRODUCT GH
  2823. ON BAR.GROUTINGDAILYDETAILID = GH.GROUTINGDAILYDETAILID
  2824. INNER JOIN TP_MST_GOODS G
  2825. ON G.GOODSID = BAR.GOODSID
  2826. INNER JOIN TP_MST_GOODSTYPE GT
  2827. ON GT.GOODSTYPEID = G.GOODSTYPEID
  2828. LEFT JOIN TP_PM_ORDER O
  2829. ON O.ORDERID = GH.FHORDERID
  2830. WHERE GH.FHUSERID IS NOT NULL
  2831. AND GH.FHTIME >= @DATEBEGIN@
  2832. AND GH.FHTIME < @DATEEND@) T1)
  2833. GROUP BY groutingdailydetailid,outputnum) a
  2834. LEFT JOIN ( SELECT T1.groutingdailydetailid,T1.OUTPUTNUM,COUNT(*) countt FROM (
  2835. SELECT DISTINCT TPF.groutingdailydetailid,DECODE(BAR.RECYCLINGFLAG, '1', 0, 1) OUTPUTNUM FROM TSAP_HEGII_WORKDATA_BG TSH
  2836. INNER JOIN TP_PM_FINISHEDPRODUCT TPF ON TSH.LOGID = TPF.BGLOGID
  2837. INNER JOIN TP_PM_GROUTINGDAILYDETAIL BAR ON TPF.groutingdailydetailid = BAR.groutingdailydetailid
  2838. WHERE
  2839. TSH.CREATETIME>=@DATEBEGIN@
  2840. AND TSH.CREATETIME<@DATEEND@
  2841. AND TPF.CREATETIME>=@DATEBEGINONE@
  2842. AND TPF.CREATETIME<@DATEEND@
  2843. AND TPF.VALUEFLAG = 1
  2844. and TSH.DATACODE = 60
  2845. AND TSH.outputnum NOT IN (0))T1 GROUP BY T1.groutingdailydetailid,T1.OUTPUTNUM) tt
  2846. ON tt.groutingdailydetailid = a.groutingdailydetailid
  2847. AND tt.outputnum = a.outputnum ) s
  2848. WHERE NVL(s.counts,0)!=NVL(s.countt,0))T
  2849. LEFT JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON T.groutingdailydetailid = GDD.groutingdailydetailid
  2850. INNER JOIN TP_MST_GOODS G ON G.GOODSID = GDD.GOODSID
  2851. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID)TT GROUP BY TT.入库数_车间 )B ON A.入库数_车间 = B.入库数_车间
  2852. )O
  2853. UNION ALL
  2854. SELECT O.干补数_车间,'干补数_'||NVL(O.干补数_差异量,0),3 NUM FROM(
  2855. SELECT A.干补数_车间,B.干补数_差异量 FROM(
  2856. SELECT 1 干补数_车间,NULL 干补数_差异量 FROM dual UNION ALL
  2857. SELECT 2 干补数_车间,NULL 干补数_差异量 FROM dual UNION ALL
  2858. SELECT 3 干补数_车间,NULL 干补数_差异量 FROM dual) A
  2859. LEFT JOIN(
  2860. SELECT
  2861. TT.干补数_车间,
  2862. SUM(TT.干补数_差异量) 干补数_差异量
  2863. FROM(
  2864. SELECT
  2865. CASE WHEN (INSTR(GDD.GROUTINGLINECODE, 'A') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  2866. AND INSTR(GT.GOODSTYPECODE, '001002') = 1 THEN 1
  2867. WHEN (INSTR(GDD.GROUTINGLINECODE, 'B') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  2868. AND INSTR(GT.GOODSTYPECODE, '001001') = 1 THEN 2
  2869. WHEN INSTR(GDD.GROUTINGLINECODE, 'C') = 1 THEN 3 ELSE 0 END 干补数_车间,
  2870. CASE WHEN T.outputnum * T.counts = NULL THEN 0 ELSE T.outputnum * T.counts END 干补数_差异量
  2871. FROM(
  2872. SELECT s.groutingdailydetailid,s.outputnum,NVL(s.counts,0) counts,NVL(s.countt,0) countt
  2873. FROM (SELECT a.groutingdailydetailid,a.outputnum,a.counts,tt.countt
  2874. FROM (SELECT groutingdailydetailid,outputnum,COUNT(*) counts
  2875. FROM (--20、30、40干补
  2876. SELECT
  2877. 1 outputnum,
  2878. groutingdailydetailid
  2879. FROM
  2880. (
  2881. SELECT
  2882. SP.GOODSCODE,
  2883. GDD.MATERIALCODE SAPCODE,
  2884. SP.SPECIALREPAIRUSERCODE USERCODE,
  2885. gdd.groutingdailydetailid,
  2886. CASE
  2887. WHEN HGDI.WORKSHOP = 2
  2888. AND INSTR( GT.GOODSTYPECODE, '001002' ) = 1 THEN
  2889. 1
  2890. WHEN HGDI.WORKSHOP = 2
  2891. AND INSTR( GT.GOODSTYPECODE, '001001' ) = 1 THEN
  2892. 2
  2893. WHEN HGDI.WORKSHOP = 3 THEN
  2894. 3 ELSE 4
  2895. END AS WORKSHOP,
  2896. DECODE( GDD.TESTMOULDFLAG, 0, 'C', 1, 'Y', '-' ) AS TESTMOULDFLAG,
  2897. G.GOODS_LINE_CODE,
  2898. TO_CHAR( SP.SPECIALREPAIRTIME, 'yymm' ) || '5000E' AS CHARG --TO_CHAR(SP.SPECIALREPAIRTIME, 'yyyymm') AS CHARG
  2899. FROM
  2900. TP_PM_SCRAPPRODUCT SP
  2901. INNER JOIN TSAP_HEGII_DATAITEM HGDI ON HGDI.DATACODE IN ( '20','30','40')
  2902. AND HGDI.ITEMTYPE = 2
  2903. AND HGDI.ITEMID = SP.PROCEDUREID
  2904. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  2905. INNER JOIN TP_MST_GOODS G ON G.GOODSID = GDD.GOODSID
  2906. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID
  2907. WHERE
  2908. SP.AUDITSTATUS = 1
  2909. AND SP.GOODSLEVELTYPEID = 9
  2910. AND SP.SPECIALREPAIRTIME >= @DATEBEGIN@
  2911. AND SP.SPECIALREPAIRTIME < @DATEEND@
  2912. ) )
  2913. GROUP BY groutingdailydetailid,outputnum) a
  2914. LEFT JOIN (SELECT groutingdailydetailid,REPAIRNUM outputnum,COUNT(*) countt
  2915. FROM tsap_hegii_datalog_bg_detail THDBD
  2916. LEFT JOIN TSAP_HEGII_DATALOG_BG THDB ON THDBD.LOGID = THDB.LOGID
  2917. WHERE THDBD.REPAIRNUM NOT IN (0)
  2918. AND THDB.DATACODE IN ('20','30','40')
  2919. AND THDB.YYYYMMDD>=TO_CHAR(@DATEBEGIN@,'YYYYMMDD') AND THDB.YYYYMMDD<TO_CHAR(@DATEEND@,'YYYYMMDD')
  2920. GROUP BY groutingdailydetailid,REPAIRNUM) tt
  2921. ON tt.groutingdailydetailid = a.groutingdailydetailid
  2922. AND tt.outputnum = a.outputnum ) s
  2923. WHERE NVL(s.counts,0)!=NVL(s.countt,0))T
  2924. LEFT JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON T.groutingdailydetailid = GDD.groutingdailydetailid
  2925. INNER JOIN TP_MST_GOODS G ON G.GOODSID = GDD.GOODSID
  2926. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID)TT GROUP BY TT.干补数_车间 )B ON A.干补数_车间 = B.干补数_车间
  2927. )O
  2928. UNION ALL
  2929. SELECT O.损坯数_车间,'损坯数_'||NVL(O.损坯数_差异量,0),2 NUM FROM(
  2930. SELECT A.损坯数_车间,B.损坯数_差异量 FROM(
  2931. SELECT 1 损坯数_车间,NULL 损坯数_差异量 FROM dual UNION ALL
  2932. SELECT 1 损坯数_车间,NULL 损坯数_差异量 FROM dual UNION ALL
  2933. SELECT 1 损坯数_车间,NULL 损坯数_差异量 FROM dual UNION ALL
  2934. SELECT 1 损坯数_车间,NULL 损坯数_差异量 FROM dual UNION ALL
  2935. SELECT 2 损坯数_车间,NULL 损坯数_差异量 FROM dual UNION ALL
  2936. SELECT 2 损坯数_车间,NULL 损坯数_差异量 FROM dual UNION ALL
  2937. SELECT 2 损坯数_车间,NULL 损坯数_差异量 FROM dual UNION ALL
  2938. SELECT 2 损坯数_车间,NULL 损坯数_差异量 FROM dual UNION ALL
  2939. SELECT 3 损坯数_车间,NULL 损坯数_差异量 FROM dual UNION ALL
  2940. SELECT 3 损坯数_车间,NULL 损坯数_差异量 FROM dual UNION ALL
  2941. SELECT 3 损坯数_车间,NULL 损坯数_差异量 FROM dual UNION ALL
  2942. SELECT 3 损坯数_车间,NULL 损坯数_差异量 FROM dual) A
  2943. LEFT JOIN(
  2944. SELECT
  2945. TT.损坯数_车间,
  2946. SUM(TT.损坯数_差异量) 损坯数_差异量
  2947. FROM(
  2948. SELECT
  2949. CASE WHEN (INSTR(GDD.GROUTINGLINECODE, 'A') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  2950. AND INSTR(GT.GOODSTYPECODE, '001002') = 1 THEN 1
  2951. WHEN (INSTR(GDD.GROUTINGLINECODE, 'B') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  2952. AND INSTR(GT.GOODSTYPECODE, '001001') = 1 THEN 2
  2953. WHEN INSTR(GDD.GROUTINGLINECODE, 'C') = 1 THEN 3 ELSE 0 END 损坯数_车间,
  2954. CASE WHEN T.outputnum * T.counts = NULL THEN 0 ELSE T.outputnum * T.counts END 损坯数_差异量
  2955. FROM(
  2956. SELECT s.groutingdailydetailid,s.SCRAPNUM outputnum,NVL(s.counts,0) counts,NVL(s.countt,0) countt
  2957. FROM (SELECT a.groutingdailydetailid,a.SCRAPNUM,a.counts,tt.countt
  2958. FROM (SELECT
  2959. TT.GROUTINGDAILYDETAILID,
  2960. TT.SCRAPNUM,
  2961. COUNT(*) counts
  2962. FROM(
  2963. SELECT
  2964. gdd.groutingdailydetailid,
  2965. DECODE( GH.DATATYPE, 3, 1, - 1 )SCRAPNUM
  2966. FROM
  2967. TP_PM_GOODSCHANGEHISTORY GH
  2968. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON GDD.GROUTINGDAILYDETAILID = GH.GROUTINGDAILYDETAILID
  2969. INNER JOIN TP_MST_USER U ON U.USERID = GH.USERID
  2970. INNER JOIN TP_MST_GOODS G ON G.GOODSID = GH.GOODSID
  2971. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID
  2972. WHERE
  2973. GH.CREATETIME >= @DATEBEGIN@
  2974. AND GH.CREATETIME < @DATEEND@
  2975. AND GH.DATATYPE IN ( 3, 4 )
  2976. AND G.SCRAPSUMFLAG = '1'
  2977. UNION ALL-- 工序报损
  2978. SELECT
  2979. gdd.groutingdailydetailid,
  2980. 1 SCRAPNUM
  2981. FROM
  2982. TP_PM_SCRAPPRODUCT SP
  2983. INNER JOIN TSAP_HEGII_DATAITEM HGDI ON HGDI.DATACODE IN ( 20,30,40 )
  2984. AND HGDI.ITEMTYPE = 2
  2985. AND HGDI.ITEMID = SP.PROCEDUREID
  2986. INNER JOIN TP_PM_PRODUCTIONDATA PD ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  2987. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  2988. INNER JOIN TP_MST_GOODS G ON G.GOODSID = GDD.GOODSID
  2989. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID
  2990. WHERE
  2991. SP.AUDITSTATUS = 1
  2992. AND SP.AUDITDATE >= @DATEBEGIN@
  2993. AND SP.AUDITDATE < @DATEEND@ -- AND SP.SCRAPTYPE IN (0, 2, 3)
  2994. UNION ALL-- 工序报损撤销
  2995. SELECT
  2996. gdd.groutingdailydetailid,
  2997. -1 SCRAPNUM
  2998. FROM
  2999. TP_PM_SCRAPPRODUCT SP
  3000. INNER JOIN TSAP_HEGII_DATAITEM HGDI ON HGDI.DATACODE IN ( 20,30,40 )
  3001. AND HGDI.ITEMTYPE = 2
  3002. AND HGDI.ITEMID = SP.PROCEDUREID
  3003. INNER JOIN TP_PM_PRODUCTIONDATA PD ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  3004. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  3005. INNER JOIN TP_MST_GOODS G ON G.GOODSID = GDD.GOODSID
  3006. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID
  3007. WHERE
  3008. SP.AUDITSTATUS = 1
  3009. AND SP.VALUEFLAG = '0'
  3010. AND SP.BACKOUTTIME >= @DATEBEGIN@
  3011. AND SP.BACKOUTTIME < @DATEEND@ -- AND SP.SCRAPTYPE IN (0, 2, 3)
  3012. UNION ALL-- 干补报损
  3013. ---------------------------------------------------
  3014. SELECT
  3015. groutingdailydetailid,
  3016. 1
  3017. FROM
  3018. (
  3019. SELECT
  3020. SP.GOODSCODE,
  3021. GDD.MATERIALCODE SAPCODE,
  3022. PD.USERCODE,
  3023. gdd.groutingdailydetailid,
  3024. CASE
  3025. WHEN HGDI.WORKSHOP = 2
  3026. AND INSTR( GT.GOODSTYPECODE, '001002' ) = 1 THEN
  3027. 1
  3028. WHEN HGDI.WORKSHOP = 2
  3029. AND INSTR( GT.GOODSTYPECODE, '001001' ) = 1 THEN
  3030. 2
  3031. WHEN HGDI.WORKSHOP = 3 THEN
  3032. 3 ELSE 4
  3033. END AS WORKSHOP,
  3034. GDD.TESTMOULDFLAG,
  3035. G.GOODS_LINE_CODE,
  3036. TO_CHAR( SP.AUDITDATE, 'yymm' ) || '5000E' AS CHARG --TO_CHAR(SP.AUDITDATE, 'yyyymm') AS CHARG
  3037. FROM
  3038. (
  3039. SELECT
  3040. T.*
  3041. FROM
  3042. (
  3043. SELECT
  3044. SP.BARCODE,
  3045. SP.GOODSCODE,
  3046. SP.GROUTINGDAILYDETAILID,
  3047. PD.PROCEDUREID,
  3048. PD.PRODUCTIONDATAID,
  3049. SP.AUDITDATE,
  3050. RANK ( ) OVER ( PARTITION BY SP.BARCODE ORDER BY PD.PRODUCTIONDATAID DESC ) AS RK
  3051. FROM
  3052. TP_PM_SCRAPPRODUCT SP
  3053. INNER JOIN TP_PM_PRODUCTIONDATA PD ON SP.BARCODE = PD.BARCODE -- 不包含干补工序
  3054. AND PD.PROCEDUREID <> 18 -- 要找干补之前的工序
  3055. AND PD.PRODUCTIONDATAID < SP.PRODUCTIONDATAID
  3056. AND PD.VALUEFLAG = '1'
  3057. WHERE
  3058. SP.AUDITSTATUS = 1
  3059. AND SP.PROCEDUREID = 18
  3060. AND SP.AUDITDATE >= @DATEBEGIN@
  3061. AND SP.AUDITDATE < @DATEEND@
  3062. ) T
  3063. WHERE
  3064. T.RK <= 1
  3065. ) SP
  3066. INNER JOIN TSAP_HEGII_DATAITEM HGDI ON HGDI.DATACODE IN ( 20,30,40 )
  3067. AND HGDI.ITEMTYPE = 2
  3068. AND HGDI.ITEMID = SP.PROCEDUREID
  3069. INNER JOIN TP_PM_PRODUCTIONDATA PD ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  3070. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  3071. INNER JOIN TP_MST_GOODS G ON G.GOODSID = PD.GOODSID
  3072. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID
  3073. ) )TT GROUP BY TT.GROUTINGDAILYDETAILID,TT.SCRAPNUM) a
  3074. LEFT JOIN (SELECT groutingdailydetailid,SCRAPNUM,COUNT(*) countt
  3075. FROM tsap_hegii_datalog_bg_detail THDBD
  3076. LEFT JOIN TSAP_HEGII_DATALOG_BG THDB ON THDBD.LOGID = THDB.LOGID
  3077. WHERE THDBD.SCRAPNUM NOT IN (0)
  3078. AND THDB.DATACODE IN (20,30,40)
  3079. AND THDB.YYYYMMDD>=TO_CHAR(@DATEBEGIN@,'YYYYMMDD') AND THDB.YYYYMMDD<TO_CHAR(@DATEEND@,'YYYYMMDD')
  3080. GROUP BY groutingdailydetailid,SCRAPNUM) tt
  3081. ON tt.groutingdailydetailid = a.groutingdailydetailid
  3082. AND tt.SCRAPNUM = a.SCRAPNUM ) s
  3083. WHERE NVL(s.counts,0)!=NVL(s.countt,0))T
  3084. LEFT JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON T.groutingdailydetailid = GDD.groutingdailydetailid
  3085. INNER JOIN TP_MST_GOODS G ON G.GOODSID = GDD.GOODSID
  3086. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID)TT GROUP BY TT.损坯数_车间 )B ON A.损坯数_车间 = B.损坯数_车间
  3087. )O
  3088. UNION ALL
  3089. SELECT O.质量登记数_车间,'质量登记数_'||NVL(O.质量登记数_差异量,0),5 NUM FROM(
  3090. SELECT A.质量登记数_车间,B.质量登记数_差异量 FROM(
  3091. SELECT 1 质量登记数_车间,NULL 质量登记数_差异量 FROM dual UNION ALL
  3092. SELECT 1 质量登记数_车间,NULL 质量登记数_差异量 FROM dual UNION ALL
  3093. SELECT 1 质量登记数_车间,NULL 质量登记数_差异量 FROM dual UNION ALL
  3094. SELECT 1 质量登记数_车间,NULL 质量登记数_差异量 FROM dual UNION ALL
  3095. SELECT 2 质量登记数_车间,NULL 质量登记数_差异量 FROM dual UNION ALL
  3096. SELECT 2 质量登记数_车间,NULL 质量登记数_差异量 FROM dual UNION ALL
  3097. SELECT 2 质量登记数_车间,NULL 质量登记数_差异量 FROM dual UNION ALL
  3098. SELECT 2 质量登记数_车间,NULL 质量登记数_差异量 FROM dual UNION ALL
  3099. SELECT 3 质量登记数_车间,NULL 质量登记数_差异量 FROM dual UNION ALL
  3100. SELECT 3 质量登记数_车间,NULL 质量登记数_差异量 FROM dual UNION ALL
  3101. SELECT 3 质量登记数_车间,NULL 质量登记数_差异量 FROM dual UNION ALL
  3102. SELECT 3 质量登记数_车间,NULL 质量登记数_差异量 FROM dual) A
  3103. LEFT JOIN(
  3104. SELECT
  3105. TT.质量登记数_车间,
  3106. SUM(TT.质量登记数_差异量) 质量登记数_差异量
  3107. FROM(
  3108. SELECT
  3109. CASE WHEN (INSTR(GDD.GROUTINGLINECODE, 'A') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  3110. AND INSTR(GT.GOODSTYPECODE, '001002') = 1 THEN 1
  3111. WHEN (INSTR(GDD.GROUTINGLINECODE, 'B') = 1 OR INSTR(GDD.GROUTINGLINECODE, 'D') = 1)
  3112. AND INSTR(GT.GOODSTYPECODE, '001001') = 1 THEN 2
  3113. WHEN INSTR(GDD.GROUTINGLINECODE, 'C') = 1 THEN 3 ELSE 0 END 质量登记数_车间,
  3114. CASE WHEN T.outputnum * T.counts = NULL THEN 0 ELSE T.outputnum * T.counts END 质量登记数_差异量
  3115. FROM(
  3116. SELECT s.groutingdailydetailid,s.outputnum,NVL(s.counts,0) counts,NVL(s.countt,0) countt
  3117. FROM (SELECT a.groutingdailydetailid,a.outputnum,a.counts,tt.countt
  3118. FROM (SELECT groutingdailydetailid,outputnum,COUNT(*) counts
  3119. FROM (SELECT groutingdailydetailid,
  3120. 1 outputnum
  3121. FROM (SELECT
  3122. T.groutingdailydetailid
  3123. FROM (SELECT GDD.groutingdailydetailid
  3124. FROM TP_PM_SCRAPPRODUCT SP
  3125. INNER JOIN TSAP_HEGII_DATAITEM HGDI
  3126. ON HGDI.DATACODE = '50'
  3127. AND HGDI.ITEMTYPE = 2
  3128. AND HGDI.ITEMID = SP.PROCEDUREID
  3129. INNER JOIN TP_PM_PRODUCTIONDATA PD
  3130. ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  3131. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  3132. ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  3133. INNER JOIN TP_MST_GOODS G
  3134. ON G.GOODSID = PD.GOODSID
  3135. INNER JOIN TP_MST_GOODSTYPE GT
  3136. ON G.GOODSTYPEID = GT.GOODSTYPEID
  3137. WHERE SP.AUDITSTATUS = 1
  3138. AND SP.AUDITDATE >= @DATEBEGIN@
  3139. AND SP.AUDITDATE < @DATEEND@
  3140. --AND SP.SCRAPTYPE IN (0, 2, 3)
  3141. ) T)
  3142. ---------------------------------------------------
  3143. UNION ALL
  3144. -- 工序报损撤销
  3145. ---------------------------------------------------
  3146. SELECT groutingdailydetailid,
  3147. -1 SCRAPNUM
  3148. FROM (SELECT
  3149. T.groutingdailydetailid
  3150. FROM (SELECT gdd.groutingdailydetailid
  3151. FROM TP_PM_SCRAPPRODUCT SP
  3152. INNER JOIN TSAP_HEGII_DATAITEM HGDI
  3153. ON HGDI.DATACODE = '50'
  3154. AND HGDI.ITEMTYPE = 2
  3155. AND HGDI.ITEMID = SP.PROCEDUREID
  3156. INNER JOIN TP_PM_PRODUCTIONDATA PD
  3157. ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  3158. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  3159. ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  3160. INNER JOIN TP_MST_GOODS G
  3161. ON G.GOODSID = PD.GOODSID
  3162. INNER JOIN TP_MST_GOODSTYPE GT
  3163. ON G.GOODSTYPEID = GT.GOODSTYPEID
  3164. WHERE SP.AUDITSTATUS = 1
  3165. AND SP.BACKOUTTIME >= @DATEBEGIN@
  3166. AND SP.BACKOUTTIME < @DATEEND@
  3167. --AND SP.SCRAPTYPE IN (0, 2, 3)
  3168. ) T)
  3169. ---------------------------------------------------
  3170. UNION ALL
  3171. -- 干补报损
  3172. ---------------------------------------------------
  3173. SELECT groutingdailydetailid,
  3174. 1
  3175. FROM (SELECT SP.groutingdailydetailid
  3176. FROM (SELECT T.*
  3177. FROM (SELECT SP.BARCODE,
  3178. SP.GOODSCODE,
  3179. SP.groutingdailydetailid,
  3180. PD.PROCEDUREID,
  3181. PD.PRODUCTIONDATAID,
  3182. SP.AUDITDATE,
  3183. RANK() OVER(PARTITION BY SP.BARCODE ORDER BY PD.PRODUCTIONDATAID DESC) AS RK
  3184. FROM TP_PM_SCRAPPRODUCT SP
  3185. INNER JOIN TP_PM_PRODUCTIONDATA PD
  3186. ON SP.BARCODE = PD.BARCODE
  3187. -- 不包含干补工序
  3188. AND PD.PROCEDUREID <> 18
  3189. -- 要找干补之前的工序
  3190. AND PD.PRODUCTIONDATAID < SP.PRODUCTIONDATAID
  3191. AND PD.VALUEFLAG = '1'
  3192. WHERE SP.AUDITSTATUS = 1
  3193. AND SP.PROCEDUREID = 18
  3194. AND SP.AUDITDATE >= @DATEBEGIN@
  3195. AND SP.AUDITDATE < @DATEEND@) T
  3196. WHERE T.RK <= 1) SP
  3197. INNER JOIN TSAP_HEGII_DATAITEM HGDI
  3198. ON HGDI.DATACODE = '50'
  3199. AND HGDI.ITEMTYPE = 2
  3200. AND HGDI.ITEMID = SP.PROCEDUREID
  3201. INNER JOIN TP_PM_PRODUCTIONDATA PD
  3202. ON PD.PRODUCTIONDATAID = SP.PRODUCTIONDATAID
  3203. INNER JOIN TP_PM_GROUTINGDAILYDETAIL GDD
  3204. ON GDD.GROUTINGDAILYDETAILID = SP.GROUTINGDAILYDETAILID
  3205. INNER JOIN TP_MST_GOODS G
  3206. ON G.GOODSID = PD.GOODSID
  3207. INNER JOIN TP_MST_GOODSTYPE GT
  3208. ON G.GOODSTYPEID = GT.GOODSTYPEID))
  3209. GROUP BY groutingdailydetailid,outputnum) a
  3210. LEFT JOIN (SELECT groutingdailydetailid,SCRAPNUM outputnum,COUNT(*) countt
  3211. FROM tsap_hegii_datalog_bg_detail THDBD
  3212. LEFT JOIN TSAP_HEGII_DATALOG_BG THDB ON THDBD.LOGID = THDB.LOGID
  3213. WHERE THDBD.SCRAPNUM NOT IN (0)
  3214. AND THDB.DATACODE IN (50)
  3215. AND THDB.YYYYMMDD>=TO_CHAR(@DATEBEGIN@,'YYYYMMDD') AND THDB.YYYYMMDD<TO_CHAR(@DATEEND@,'YYYYMMDD')
  3216. GROUP BY groutingdailydetailid,SCRAPNUM) tt
  3217. ON tt.groutingdailydetailid = a.groutingdailydetailid
  3218. AND tt.outputnum = a.outputnum ) s
  3219. WHERE NVL(s.counts,0)!=NVL(s.countt,0))T
  3220. LEFT JOIN TP_PM_GROUTINGDAILYDETAIL GDD ON T.groutingdailydetailid = GDD.groutingdailydetailid
  3221. INNER JOIN TP_MST_GOODS G ON G.GOODSID = GDD.GOODSID
  3222. INNER JOIN TP_MST_GOODSTYPE GT ON G.GOODSTYPEID = GT.GOODSTYPEID)TT GROUP BY TT.质量登记数_车间 )B ON A.质量登记数_车间 = B.质量登记数_车间
  3223. )O
  3224. )Q ORDER BY Q.注浆数_车间,Q.NUM
  3225. ";
  3226. DateTime dateend = Convert.ToDateTime(context.Request["dateendMaster"]).AddDays(1);
  3227. DateTime datebeginone = Convert.ToDateTime(context.Request["datebeginMaster"]).AddDays(-1);
  3228. List<CDAParameter> sqlPara = new List<CDAParameter>();
  3229. sqlPara.Add(new CDAParameter("DATEBEGIN", context.Request["datebeginMaster"].ToString(), DataType.DateTime));
  3230. sqlPara.Add(new CDAParameter("DATEBEGINONE", datebeginone, DataType.DateTime));
  3231. sqlPara.Add(new CDAParameter("DATEEND", dateend, DataType.DateTime));
  3232. //sqlPara.Add(new CDAParameter("PROCEDUREID", context.Request["procedureidMaster"]));
  3233. JsonResult data = Easyui.ExecuteJsonResult(conn, sqlStr, sqlPara);
  3234. context.Response.Write(data.ToJson());
  3235. }
  3236. //子表2
  3237. if(context.Request["m"].ToString()=="2")
  3238. {
  3239. //读取报表数据
  3240. string sqlStr = @"
  3241. SELECT
  3242. '测试子表2' AS 测试列1,
  3243. '测试子表2' AS 测试列2,
  3244. '测试子表2' AS 测试列3,
  3245. '测试子表2' AS 测试列4,
  3246. '测试子表2' AS 测试列5
  3247. FROM
  3248. DUAL
  3249. ";
  3250. List<CDAParameter> sqlPara = new List<CDAParameter>();
  3251. //sqlPara.Add(new CDAParameter("PROCEDUREID", context.Request["procedureidMaster"]));
  3252. JsonResult data = Easyui.ExecuteJsonResult(conn, sqlStr, sqlPara);
  3253. context.Response.Write(data.ToJson());
  3254. }
  3255. }
  3256. }
  3257. public bool IsReusable
  3258. {
  3259. get
  3260. {
  3261. return false;
  3262. }
  3263. }
  3264. }