SAPDataLogic.cs 164 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691269226932694269526962697269826992700270127022703270427052706270727082709271027112712271327142715271627172718271927202721272227232724272527262727272827292730273127322733273427352736273727382739274027412742274327442745274627472748274927502751275227532754275527562757275827592760276127622763276427652766276727682769277027712772277327742775277627772778277927802781278227832784278527862787278827892790279127922793279427952796279727982799280028012802280328042805280628072808280928102811281228132814281528162817281828192820282128222823282428252826282728282829283028312832283328342835283628372838283928402841284228432844284528462847284828492850285128522853285428552856285728582859286028612862286328642865286628672868286928702871287228732874287528762877287828792880288128822883288428852886288728882889289028912892289328942895289628972898289929002901290229032904290529062907290829092910291129122913291429152916291729182919292029212922292329242925292629272928292929302931293229332934293529362937293829392940294129422943294429452946294729482949295029512952295329542955295629572958295929602961296229632964296529662967296829692970297129722973297429752976297729782979298029812982298329842985298629872988298929902991299229932994299529962997299829993000300130023003300430053006300730083009301030113012301330143015301630173018301930203021302230233024302530263027302830293030303130323033303430353036303730383039304030413042304330443045304630473048304930503051305230533054305530563057305830593060306130623063306430653066306730683069307030713072307330743075307630773078307930803081308230833084308530863087308830893090309130923093309430953096309730983099310031013102310331043105310631073108310931103111311231133114311531163117311831193120312131223123312431253126312731283129313031313132313331343135313631373138313931403141314231433144314531463147314831493150315131523153315431553156315731583159316031613162316331643165316631673168316931703171317231733174317531763177317831793180318131823183318431853186318731883189319031913192319331943195319631973198319932003201320232033204320532063207320832093210321132123213321432153216321732183219322032213222322332243225322632273228322932303231323232333234323532363237323832393240324132423243324432453246324732483249325032513252325332543255325632573258325932603261326232633264326532663267326832693270327132723273327432753276327732783279328032813282328332843285328632873288328932903291329232933294329532963297329832993300330133023303330433053306330733083309331033113312331333143315331633173318331933203321332233233324332533263327332833293330333133323333333433353336333733383339334033413342334333443345334633473348334933503351335233533354335533563357335833593360336133623363336433653366336733683369337033713372337333743375337633773378337933803381338233833384338533863387338833893390339133923393339433953396339733983399340034013402340334043405340634073408340934103411341234133414341534163417341834193420342134223423342434253426342734283429343034313432343334343435343634373438343934403441344234433444344534463447344834493450345134523453345434553456345734583459346034613462346334643465346634673468346934703471347234733474347534763477347834793480348134823483348434853486348734883489349034913492349334943495349634973498349935003501350235033504350535063507350835093510351135123513351435153516351735183519352035213522352335243525352635273528352935303531353235333534353535363537353835393540354135423543354435453546354735483549355035513552355335543555355635573558355935603561356235633564356535663567356835693570357135723573357435753576357735783579358035813582358335843585358635873588358935903591359235933594359535963597359835993600360136023603360436053606360736083609361036113612361336143615361636173618361936203621362236233624362536263627362836293630363136323633363436353636363736383639364036413642364336443645364636473648364936503651365236533654365536563657365836593660366136623663366436653666366736683669367036713672367336743675367636773678367936803681368236833684368536863687368836893690369136923693369436953696369736983699370037013702370337043705370637073708370937103711371237133714371537163717371837193720372137223723372437253726372737283729373037313732373337343735373637373738373937403741374237433744374537463747374837493750375137523753375437553756375737583759376037613762376337643765376637673768376937703771377237733774377537763777377837793780378137823783378437853786378737883789379037913792379337943795379637973798379938003801380238033804380538063807380838093810381138123813381438153816381738183819382038213822382338243825382638273828382938303831383238333834383538363837383838393840384138423843384438453846384738483849385038513852385338543855385638573858385938603861386238633864386538663867386838693870387138723873387438753876387738783879388038813882388338843885388638873888388938903891389238933894389538963897389838993900390139023903390439053906390739083909391039113912391339143915391639173918391939203921392239233924392539263927392839293930393139323933393439353936393739383939394039413942394339443945394639473948394939503951395239533954395539563957395839593960396139623963396439653966396739683969397039713972397339743975397639773978397939803981398239833984398539863987398839893990399139923993399439953996399739983999400040014002400340044005400640074008400940104011401240134014401540164017401840194020402140224023402440254026402740284029403040314032403340344035403640374038403940404041404240434044404540464047404840494050405140524053405440554056405740584059406040614062406340644065406640674068406940704071407240734074407540764077407840794080408140824083408440854086408740884089409040914092409340944095409640974098409941004101410241034104410541064107410841094110411141124113411441154116411741184119412041214122412341244125412641274128412941304131413241334134413541364137413841394140414141424143414441454146414741484149415041514152415341544155415641574158415941604161416241634164416541664167416841694170417141724173417441754176417741784179418041814182418341844185418641874188418941904191419241934194419541964197419841994200420142024203420442054206420742084209421042114212421342144215421642174218421942204221422242234224422542264227422842294230423142324233423442354236423742384239424042414242424342444245424642474248424942504251425242534254425542564257425842594260426142624263426442654266426742684269427042714272427342744275427642774278427942804281428242834284428542864287428842894290429142924293429442954296429742984299430043014302430343044305430643074308430943104311431243134314431543164317431843194320432143224323432443254326432743284329433043314332433343344335433643374338433943404341434243434344434543464347434843494350435143524353435443554356435743584359436043614362436343644365436643674368436943704371437243734374
  1. 
  2. using System;
  3. using System.Collections.Generic;
  4. using System.Data;
  5. using System.ServiceModel.Security;
  6. using Dongke.IBOSS.PRD.Basics.BaseResources;
  7. using Dongke.IBOSS.PRD.Basics.DataAccess;
  8. using Dongke.IBOSS.PRD.Basics.Library;
  9. using Dongke.IBOSS.PRD.Service.DataModels;
  10. using Dongke.IBOSS.PRD.Service.SAPHegiiDataService.HGSAPDK_ZPPFM008;
  11. using Dongke.IBOSS.PRD.Service.SAPHegiiDataService.HGSAPDK_ZPPFM010;
  12. using Dongke.IBOSS.PRD.WCF.DataModels;
  13. using Oracle.ManagedDataAccess.Client;
  14. using Newtonsoft.Json.Linq;
  15. using Newtonsoft.Json;
  16. namespace Dongke.IBOSS.PRD.Service.SAPHegiiDataService
  17. {
  18. public partial class SAPDataLogic
  19. {
  20. /// <summary>
  21. /// 获取同步最后一次同步成功的日期
  22. /// </summary>
  23. /// <returns></returns>
  24. public static ServiceResultEntity GetLastDateByCode(string dataCode)
  25. {
  26. IDBConnection oracleConn = ClsDbFactory.CreateDBConnection(DataBaseType.ORACLE, DataManager.ConnectionString);
  27. ServiceResultEntity sre = new ServiceResultEntity();
  28. try
  29. {
  30. string sqlString =
  31. "select max(t.yyyymmdd) yyyymmdd\n" +
  32. " from tsap_hegii_datalog t\n" +
  33. " where t.logtype = '2'\n" +
  34. " and t.datastuts = 'S'\n" +
  35. " and t.datacode = :dataCode";
  36. OracleParameter[] oracleParameter = new OracleParameter[]
  37. {
  38. new OracleParameter(":dataCode",OracleDbType.Varchar2, dataCode, ParameterDirection.Input),
  39. };
  40. string lastDate = oracleConn.GetSqlResultToStr(sqlString, oracleParameter);
  41. sre.Result = lastDate;
  42. return sre;
  43. }
  44. catch (Exception ex)
  45. {
  46. throw ex;
  47. }
  48. }
  49. /// <summary>
  50. /// 获取成品交接同步数据
  51. /// </summary>
  52. /// <returns></returns>
  53. public static ServiceResultEntity GetWorkData60(DateTime date)
  54. {
  55. IDBConnection oracleConn = ClsDbFactory.CreateDBConnection(DataBaseType.ORACLE, DataManager.ConnectionString);
  56. ServiceResultEntity sre = new ServiceResultEntity();
  57. try
  58. {
  59. string yyyymmdd = date.ToString("yyyyMMdd");
  60. //string sqlString =
  61. // "select t.logid\n" +
  62. // " from tsap_hegii_datalog t\n" +
  63. // " where t.logtype = '2'\n" +
  64. // " and t.datastuts = 'S'\n" +
  65. // " and t.yyyymmdd = :yyyymmdd\n" +
  66. // " and t.datacode = '60'";
  67. //OracleParameter[] oracleParameter = new OracleParameter[]
  68. //{
  69. // new OracleParameter(":yyyymmdd",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  70. //};
  71. //string logid = oracleConn.GetSqlResultToStr(sqlString, oracleParameter);
  72. //if (!string.IsNullOrEmpty(logid))
  73. //{
  74. // sqlString = "select t.yyyymmdd\n" +
  75. // " ,t.goodscode\n" +
  76. // " ,t.sapcode\n" +
  77. // " ,t.usercode\n" +
  78. // " ,t.ordercode\n" +
  79. // " ,t.orderitem\n" +
  80. // " ,t.outputnum\n" +
  81. // " ,t.recoverynum\n" +
  82. // " ,t.createtime\n" +
  83. // " ,t.ztype\n" +
  84. // " ,t.zmsg\n" +
  85. // " ,t.ZTIME\n" +
  86. // " from tsap_hegii_workdata t\n" +
  87. // //" where t.yyyymmdd = :yyyymmdd\n" +
  88. // //" and t.datacode = '60'\n" +
  89. // " where t.logid = :logid\n" +
  90. // " order by t.goodscode,t.sapcode,t.usercode,t.ordercode,t.orderitem";
  91. // oracleParameter = new OracleParameter[]
  92. // {
  93. // new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  94. // };
  95. // sre.Data = oracleConn.GetSqlResultToDs(sqlString, oracleParameter);
  96. // sre.Result = 1;
  97. // return sre;
  98. //}
  99. string sqlString =
  100. "select :yyyymmdd yyyymmdd, sysdate createtime\n" +
  101. " ,tt.GoodsCode\n" +
  102. " ,tt.SAPCode\n" +
  103. " ,tt.usercode\n" +
  104. " ,tt.ordercode\n" +
  105. " ,tt.orderitem\n" +
  106. " ,to_char(tt.OutputNum) OutputNum\n" +
  107. " ,to_char(tt.RecoveryNum) RecoveryNum\n" +
  108. " from (\n" +
  109. "select t.GoodsCode\n" +
  110. " ,t.SAPCode\n" +
  111. " ,t.usercode\n" +
  112. " ,t.ordercode\n" +
  113. " ,t.orderitem\n" +
  114. " ,sum(decode(t.RecyclingFlag\n" +
  115. " ,'1'\n" +
  116. " ,0\n" +
  117. " ,decode(t.DataType, 51, 1, -1))) OutputNum\n" +
  118. " ,sum(decode(t.RecyclingFlag\n" +
  119. " ,'0'\n" +
  120. " ,0\n" +
  121. " ,decode(t.DataType, 51, 1, -1))) RecoveryNum\n" +
  122. " from ( select gh.GoodsCode,gh.SAPCode,u.usercode,o.orderno,gdd.RecyclingFlag,gh.DataType \n" +
  123. " ,case\n" +
  124. " when o.orderid is null or o.orderno like 'HEGII%' then\n" +
  125. " ' '\n" +
  126. " when instr(o.orderno, '/') = 0 then\n" +
  127. " to_char(o.orderno)\n" +
  128. " else\n" +
  129. " to_char(substr(o.orderno, 1, instr(o.orderno, '/') - 1))\n" +
  130. " end ordercode -- 销售凭证\n" +
  131. " ,case\n" +
  132. " when o.orderid is null or o.orderno like 'HEGII%' or\n" +
  133. " instr(o.orderno, '/') = 0 then\n" +
  134. " '0'\n" +
  135. " when instr(o.orderno, '#') = 0 then\n" +
  136. " to_char(substr(o.orderno, instr(o.orderno, '/') + 1))\n" +
  137. " else\n" +
  138. " to_char(substr(o.orderno, instr(o.orderno, '/') + 1, instr(o.orderno, '#')-instr(o.orderno, '/')-1))\n" +
  139. " end orderitem -- 销售凭证项目\n" +
  140. " from (\n" +
  141. " select gch.GoodsCode,gch.SAPCode,decode(gch.DataType,53,51,gch.DataType) DataType,gch.userid,gch.groutingdailydetailid,gch.OTHERID from tp_pm_goodschangehistory gch\n" +
  142. " where gch.createtime >= :datebegin\n" +
  143. " and gch.createtime < :dateend\n" +
  144. " and gch.DataType in (51, 52, 53)\n" +
  145. " union all\n" +
  146. " select gch.GoodsCode,gch.SAPCode,52 DataType,gch.userid,gch.groutingdailydetailid,gch.GoodsIDAfter from tp_pm_goodschangehistory gch\n" +
  147. " where gch.createtime >= :datebegin\n" +
  148. " and gch.createtime < :dateend\n" +
  149. " and gch.DataType =53\n" +
  150. " ) gh\n" +
  151. " inner join tp_mst_user u\n" +
  152. " on u.userid = gh.userid\n" +
  153. " inner join tp_pm_groutingdailydetail gdd\n" +
  154. " on gdd.groutingdailydetailid = gh.groutingdailydetailid\n" +
  155. " and gdd.issync is null\n" +
  156. //" inner join tp_pm_finishedproduct fp\n" +
  157. //" on fp.barcode = gdd.barcode\n" +
  158. " left join tp_pm_order o\n" +
  159. //" on o.orderid = fp.fhorderid\n" +
  160. " on o.orderid = gh.OTHERID\n" +
  161. //" where gh.createtime >= :datebegin\n" +
  162. //" and gh.createtime < :dateend\n" +
  163. //" and gh.DataType in (51, 52)\n" +
  164. " ) t \n" +
  165. //" group by gh.GoodsCode, gh.SAPCode, u.usercode, o.orderno";
  166. " group by t.GoodsCode, t.SAPCode, t.usercode, t.ordercode, t.orderitem\n" +
  167. " ) tt where tt.OutputNum <> 0 or tt.RecoveryNum <> 0 \n" +
  168. " order by tt.GoodsCode, tt.SAPCode, tt.usercode, tt.ordercode, tt.orderitem\n";
  169. // TODO 订单变更
  170. DateTime datebegin = date.Date;
  171. DateTime dateend = date.Date.AddDays(1);
  172. OracleParameter[] oracleParameter = new OracleParameter[]
  173. {
  174. new OracleParameter(":yyyymmdd",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  175. new OracleParameter(":datebegin",OracleDbType.Date, datebegin, ParameterDirection.Input),
  176. new OracleParameter(":dateend",OracleDbType.Date, dateend, ParameterDirection.Input),
  177. };
  178. sre.Data = oracleConn.GetSqlResultToDs(sqlString, oracleParameter);
  179. sre.Result = 0;
  180. return sre;
  181. }
  182. catch (Exception ex)
  183. {
  184. throw ex;
  185. }
  186. }
  187. /// <summary>
  188. /// 同步成品交接数据(手动)
  189. /// </summary>
  190. /// <returns></returns>
  191. public static ServiceResultEntity SetWorkData60(DateTime date, DataTable workData, int userid)
  192. {
  193. IDBTransaction oracleConn = ClsDbFactory.CreateDBTransaction(DataBaseType.ORACLE, DataManager.ConnectionString);
  194. ServiceResultEntity sre = new ServiceResultEntity();
  195. try
  196. {
  197. string yyyymmdd = date.ToString("yyyyMMdd");
  198. string sqlString =
  199. "select t.logid\n" +
  200. " from tsap_hegii_datalog t\n" +
  201. " where t.logtype = '2'\n" +
  202. " and t.datastuts = 'S'\n" +
  203. " and t.yyyymmdd = :yyyymmdd\n" +
  204. " and t.datacode = '60'";
  205. OracleParameter[] oracleParameter = new OracleParameter[]
  206. {
  207. new OracleParameter(":yyyymmdd",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  208. };
  209. string logid = oracleConn.GetSqlResultToStr(sqlString, oracleParameter);
  210. if (!string.IsNullOrEmpty(logid))
  211. {
  212. sre.Status = Constant.ServiceResultStatus.Other;
  213. sre.Message = "日期【" + yyyymmdd + "】的数据已经同步过,不能重复同步。";
  214. return sre;
  215. }
  216. sqlString = "select workcode from tp_mst_account where rownum = 1";
  217. string workcode = oracleConn.GetSqlResultToStr(sqlString);
  218. DateTime datebegin = date.Date;
  219. DateTime dateend = date.Date.AddDays(1);
  220. logid = oracleConn.GetSqlResultToStr("select SEQ_SAP_HEGII_DataLog_ID.Nextval from dual");
  221. string msg = "data:" + datebegin.ToString("yyyyMMdd-HHmm") + "~" +
  222. dateend.ToString("yyyyMMdd-HHmm");
  223. sqlString = "insert into tsap_hegii_datalog\n" +
  224. " (LogID\n" +
  225. " ,LogType\n" +
  226. " ,BeginTime\n" +
  227. " ,YYYYMMDD\n" +
  228. " ,WorkCode\n" +
  229. " ,DataCode\n" +
  230. " ,DataStuts\n" +
  231. " ,DataMSG\n" +
  232. " ,CreateUserID\n" +
  233. " ,DataLogID)\n" +
  234. "values\n" +
  235. " (:LogID\n" +
  236. " ,'2'\n" +
  237. " ,sysdate\n" +
  238. " ,:YYYYMMDD\n" +
  239. " ,:WorkCode\n" +
  240. " ,'60'\n" +
  241. " ,'S'\n" +
  242. " ,:DataMSG\n" +
  243. " ,:CreateUserID\n" +
  244. " ,:LogID)";
  245. oracleParameter = new OracleParameter[]
  246. {
  247. new OracleParameter(":LogID",OracleDbType.Int32, logid, ParameterDirection.Input),
  248. new OracleParameter(":CreateUserID",OracleDbType.Int32, userid, ParameterDirection.Input),
  249. new OracleParameter(":YYYYMMDD",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  250. new OracleParameter(":WorkCode",OracleDbType.Varchar2, workcode, ParameterDirection.Input),
  251. new OracleParameter(":DataMSG",OracleDbType.Varchar2, msg, ParameterDirection.Input),
  252. };
  253. int r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  254. //r = oracleConn.ExecuteNonQuery("savepoint datalog");
  255. //oracleConn.SavePoint("datalog");
  256. Zppfm008 sapParameter = new Zppfm008();
  257. if (workData != null && workData.Rows.Count > 0)
  258. {
  259. sapParameter.ZSUM = workData.Rows.Count;
  260. sapParameter.TABLE_IN = new ZSPP100[sapParameter.ZSUM];
  261. sqlString = "insert into TSAP_HEGII_WorkData\n" +
  262. " (YYYYMMDD\n" +
  263. " ,WorkCode\n" +
  264. " ,DataCode\n" +
  265. " ,GoodsCode\n" +
  266. " ,SAPCode\n" +
  267. " ,UserCode\n" +
  268. " ,OutputNum\n" +
  269. " ,RECOVERYNUM\n" +
  270. " ,ORDERCODE\n" +
  271. " ,ORDERITEM\n" +
  272. " ,LogID,createtime)\n" +
  273. "values\n" +
  274. " ('" + yyyymmdd + "'\n" +
  275. " ,'" + workcode + "'\n" +
  276. " ,'60'\n" +
  277. " ,:GoodsCode\n" +
  278. " ,:SAPCode\n" +
  279. " ,:UserCode\n" +
  280. " ,:OutputNum\n" +
  281. " ,:RECOVERYNUM\n" +
  282. " ,:ORDERCODE\n" +
  283. " ,:ORDERITEM\n" +
  284. " ," + logid + ",:createtime)";
  285. int index = 0;
  286. foreach (DataRow item in workData.Rows)
  287. {
  288. ZSPP100 info100 = new ZSPP100();
  289. // 工厂
  290. info100.WERKS = workcode;
  291. // 型号
  292. info100.GROES = item["GoodsCode"].ToString();
  293. // 物料编号
  294. info100.MATNR = item["SAPCode"].ToString();
  295. // 生产工号
  296. info100.ZGHNU = item["UserCode"].ToString();
  297. // 数据节点
  298. info100.ZJDNU = "60";
  299. // 时间戳
  300. info100.ZSCNU = yyyymmdd;
  301. // 销售凭证
  302. info100.VBELN = item["ORDERCODE"].ToString().Trim();
  303. // 销售凭证项目
  304. info100.POSNR = item["ORDERITEM"].ToString();
  305. // 产量
  306. info100.ZCLNG = item["OutputNum"].ToString();
  307. // 损坯
  308. info100.ZSPNG = "0";
  309. // 清除
  310. info100.ZQCNG = "0";
  311. // 回收
  312. info100.ZHSNG = item["RECOVERYNUM"].ToString();
  313. // 干补
  314. info100.ZGBNG = "0";
  315. info100.ZKSSJ = "000000";
  316. info100.ZJSRQ = Convert.ToDecimal(yyyymmdd) + 1;
  317. oracleParameter = new OracleParameter[]
  318. {
  319. new OracleParameter(":GoodsCode",OracleDbType.Varchar2, item["GoodsCode"], ParameterDirection.Input),
  320. new OracleParameter(":SAPCode",OracleDbType.Varchar2, item["SAPCode"], ParameterDirection.Input),
  321. new OracleParameter(":UserCode",OracleDbType.Varchar2, item["UserCode"], ParameterDirection.Input),
  322. new OracleParameter(":OutputNum",OracleDbType.Varchar2, item["OutputNum"], ParameterDirection.Input),
  323. new OracleParameter(":RECOVERYNUM",OracleDbType.Varchar2, item["RECOVERYNUM"], ParameterDirection.Input),
  324. new OracleParameter(":ORDERCODE",OracleDbType.Varchar2, item["ORDERCODE"], ParameterDirection.Input),
  325. new OracleParameter(":ORDERITEM",OracleDbType.Varchar2, item["ORDERITEM"], ParameterDirection.Input),
  326. new OracleParameter(":createtime",OracleDbType.Date, item["createtime"], ParameterDirection.Input),
  327. };
  328. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  329. sapParameter.TABLE_IN[index++] = info100;
  330. }
  331. }
  332. else
  333. {
  334. sapParameter.ZSUM = 0;
  335. sapParameter.TABLE_IN = new ZSPP100[sapParameter.ZSUM];
  336. }
  337. ZPPFM008Response result = HGSAPDK_ZPPFM008(sapParameter, yyyymmdd, "60");
  338. //if (result.Ztype == "E")
  339. //{
  340. // sqlString = "update tsap_hegii_datalog t set t.EndTime = sysdate, DataStuts = 'E', DataMSG = DataMSG||:msg where logid = :logid";
  341. // oracleParameter = new OracleParameter[]
  342. // {
  343. // new OracleParameter(":msg",OracleDbType.Varchar2, result.Zmsg, ParameterDirection.Input),
  344. // new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  345. // };
  346. // r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  347. //}
  348. //else
  349. {
  350. if (result.TABLE_OUT != null && result.TABLE_OUT.Length > 0)
  351. {
  352. sqlString = "update TSAP_HEGII_WorkData t set t.ZTime =sysdate, ZTYPE = :ZTYPE, ZMSG = :ZMSG where logid = " + logid +
  353. " \n and YYYYMMDD='" + yyyymmdd + "' and WorkCode='" + workcode +
  354. "' and DataCode='60' and GoodsCode=:GoodsCode and SAPCode=:SAPCode and UserCode=:UserCode \n" +
  355. "and OrderCode=:OrderCode and OrderItem=:OrderItem";
  356. foreach (ZSPP100 item in result.TABLE_OUT)
  357. {
  358. string posnr = item.POSNR.TrimStart('0');
  359. oracleParameter = new OracleParameter[]
  360. {
  361. new OracleParameter(":ZTYPE",OracleDbType.Varchar2, item.ZTYPE, ParameterDirection.Input),
  362. new OracleParameter(":ZMSG",OracleDbType.Varchar2, item.ZMSG, ParameterDirection.Input),
  363. new OracleParameter(":GoodsCode",OracleDbType.Varchar2, item.GROES, ParameterDirection.Input),
  364. new OracleParameter(":SAPCode",OracleDbType.Varchar2, item.MATNR, ParameterDirection.Input),
  365. new OracleParameter(":UserCode",OracleDbType.Varchar2, item.ZGHNU, ParameterDirection.Input),
  366. new OracleParameter(":OrderCode",OracleDbType.Varchar2, (string.IsNullOrEmpty(item.VBELN) ? " " : item.VBELN), ParameterDirection.Input),
  367. new OracleParameter(":OrderItem",OracleDbType.Varchar2, (string.IsNullOrEmpty(posnr) ? "0" : posnr), ParameterDirection.Input),
  368. };
  369. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  370. }
  371. }
  372. //:msg||chr(13)||DataMSG
  373. result.ZMSG = $"{result.ZMSG}({sapParameter.ZSUM})";
  374. sqlString = "update tsap_hegii_datalog t set t.EndTime = sysdate, DataStuts = :DataStuts, DataMSG =nvl2(:msg,:msg||' '||chr(13)||DataMSG,DataMSG) where logid = :logid";
  375. oracleParameter = new OracleParameter[]
  376. {
  377. new OracleParameter(":DataStuts",OracleDbType.Varchar2, result.ZTYPE, ParameterDirection.Input),
  378. new OracleParameter(":msg",OracleDbType.Varchar2, result.ZMSG, ParameterDirection.Input),
  379. new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  380. };
  381. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  382. }
  383. oracleConn.Commit();
  384. sre.Message = result.ZMSG;
  385. sre.Result = result.ZTYPE;
  386. return sre;
  387. }
  388. catch (Exception ex)
  389. {
  390. throw ex;
  391. }
  392. finally
  393. {
  394. if (oracleConn != null &&
  395. oracleConn.ConnState == ConnectionState.Open)
  396. {
  397. oracleConn.Disconnect();
  398. }
  399. }
  400. }
  401. /// <summary>
  402. /// 查询同步日志
  403. /// </summary>
  404. /// <param name="cre"></param>
  405. /// <param name="userInfo"></param>
  406. /// <returns></returns>
  407. public static ServiceResultEntity GetDataLog(ClientRequestEntity cre)
  408. {
  409. IDBConnection oracleConn = ClsDbFactory.CreateDBConnection(DataBaseType.ORACLE, DataManager.ConnectionString);
  410. ServiceResultEntity sre = new ServiceResultEntity();
  411. try
  412. {
  413. string sqlString =
  414. "select dl.logid\n" +
  415. " ,dl.logtype\n" +
  416. " ,dl.begintime\n" +
  417. " ,dl.endtime\n" +
  418. " ,dl.yyyymmdd\n" +
  419. " ,dl.workcode\n" +
  420. " ,dl.datacode\n" +
  421. " ,dc.datacodename\n" +
  422. " ,dl.datastuts\n" +
  423. " ,dl.datamsg\n" +
  424. " ,dl.datalogid\n" +
  425. " ,dl.executedatebegin\n" +
  426. " ,dl.executedateend\n" +
  427. " ,u.usercode synusercode\n" +
  428. " from tsap_hegii_datalog dl\n" +
  429. " inner join tsap_hegii_datacode dc\n" +
  430. " on dc.datacode = dl.datacode\n" +
  431. " left join tp_mst_user u\n" +
  432. " on u.userid = dl.createuserid\n" +
  433. " where dl.logtype IN('2','3')\n" +
  434. " and dl.yyyymmdd >= :datebegin\n" +
  435. " and dl.yyyymmdd <= :dateend\n";
  436. OracleParameter[] oracleParameter = new OracleParameter[]
  437. {
  438. new OracleParameter(":datebegin",OracleDbType.Varchar2, cre.Properties["datebegin"], ParameterDirection.Input),
  439. new OracleParameter(":dateend",OracleDbType.Varchar2, cre.Properties["dateend"], ParameterDirection.Input),
  440. };
  441. string datastuts = cre.Properties["datastuts"] + "";
  442. if (!string.IsNullOrEmpty(datastuts))
  443. {
  444. sqlString += " and dl.datastuts in (" + datastuts + ")\n";
  445. }
  446. string datacode = cre.Properties["datacode"] + "";
  447. if (!string.IsNullOrEmpty(datacode))
  448. {
  449. sqlString += " and dl.datacode = '" + datacode + "'\n";
  450. //sqlString += " and dl.datacode in (" + datacode + ")\n";
  451. }
  452. sqlString += " order by dl.datacode, dl.endtime desc";
  453. sre.Data = oracleConn.GetSqlResultToDs(sqlString, oracleParameter);
  454. return sre;
  455. }
  456. catch (Exception ex)
  457. {
  458. throw ex;
  459. }
  460. }
  461. /// <summary>
  462. /// 查询产量同步明细
  463. /// </summary>
  464. /// <param name="logid"></param>
  465. /// <param name="userInfo"></param>
  466. /// <returns></returns>
  467. public static ServiceResultEntity GetWorkDataByDataLog(int logid)
  468. {
  469. IDBConnection oracleConn = ClsDbFactory.CreateDBConnection(DataBaseType.ORACLE, DataManager.ConnectionString);
  470. ServiceResultEntity sre = new ServiceResultEntity();
  471. try
  472. {
  473. string sqlString = "\n" +
  474. "select wd.yyyymmdd\n" +
  475. " ,wd.workcode\n" +
  476. " ,wd.datacode\n" +
  477. " ,dc.datacodename\n" +
  478. " ,wd.goodscode\n" +
  479. " ,wd.sapcode\n" +
  480. " ,wd.usercode\n" +
  481. " ,wd.ordercode\n" +
  482. " ,wd.orderitem\n" +
  483. " ,to_number(wd.outputnum) outputnum\n" +
  484. " ,to_number(wd.scrapnum) scrapnum\n" +
  485. " ,to_number(wd.cleanupnum) cleanupnum\n" +
  486. " ,to_number(wd.recoverynum) recoverynum\n" +
  487. " ,to_number(wd.repairnum) repairnum\n" +
  488. " ,wd.createtime\n" +
  489. " ,wd.ztype\n" +
  490. " ,wd.zmsg\n" +
  491. " ,wd.ztime\n" +
  492. " ,wd.testmouldflag\n" +
  493. " ,wd.zscs\n" +
  494. " ,wd.logid\n" +
  495. " from tsap_hegii_workdata wd\n" +
  496. " inner join tsap_hegii_datacode dc\n" +
  497. " on dc.datacode = wd.datacode\n" +
  498. " where wd.logid = :logid \n" +
  499. " order by wd.goodscode,wd.sapcode,wd.usercode,wd.ordercode,wd.outputnum \n";
  500. OracleParameter[] oracleParameter = new OracleParameter[]
  501. {
  502. new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  503. };
  504. sre.Data = oracleConn.GetSqlResultToDs(sqlString, oracleParameter);
  505. //sqlString = "\n" +
  506. //"select wd.logid\n" +
  507. //" ,wd.goodscode\n" +
  508. //" ,wd.sapcode\n" +
  509. //" ,wd.procedureName\n" +
  510. //" ,wd.scrapnum\n" +
  511. //" ,wd.unscrapnum\n" +
  512. //" ,wd.scrapnum-wd.unscrapnum num\n" +
  513. //" from TSAP_HEGII_WORKDATA_SNum wd\n" +
  514. ////" inner join tsap_hegii_datacode dc\n" +
  515. ////" on dc.datacode = wd.datacode\n" +
  516. //" where wd.logid = :logid \n" +
  517. //" order by wd.goodscode,wd.sapcode,wd.procedureName \n";
  518. sqlString = "select decode(gid\n" +
  519. " ,3\n" +
  520. " ,'合计'\n" +
  521. " ,1\n" +
  522. " ,'小计[' || procedureName || ']'\n" +
  523. " ,procedureName) procedureName\n" +
  524. " ,decode(gid, 0, goodscode, '--') goodscode\n" +
  525. " ,decode(gid, 0, sapcode, '--') sapcode\n" +
  526. " ,decode(gid, 0, usercode, '--') usercode\n" +
  527. " ,scrapnum\n" +
  528. " ,unscrapnum\n" +
  529. " ,scrapnum - unscrapnum scrapsum\n" +
  530. " ,cleanupnum\n" +
  531. " ,uncleanupnum\n" +
  532. " ,cleanupnum - uncleanupnum cleanupsum\n" +
  533. " ,repairnum\n" +
  534. " ,recoverynum\n" +
  535. " from (select grouping_id(wd.procedureName, wd.goodscode) gid\n" +
  536. " ,wd.procedureName\n" +
  537. " ,wd.goodscode\n" +
  538. " ,wd.sapcode\n" +
  539. " ,wd.usercode\n" +
  540. " ,sum(wd.scrapnum) scrapnum\n" +
  541. " ,sum(wd.unscrapnum) unscrapnum\n" +
  542. " ,sum(wd.cleanupnum) cleanupnum\n" +
  543. " ,sum(wd.uncleanupnum) uncleanupnum\n" +
  544. " ,sum(wd.repairnum) repairnum\n" +
  545. " ,sum(wd.recoverynum) recoverynum\n" +
  546. " from TSAP_HEGII_WORKDATA_SNum wd\n" +
  547. " where wd.logid = :logid \n" +
  548. " group by grouping sets((wd.procedureName, wd.goodscode, wd.sapcode,wd.usercode),(wd.procedureName),())\n" +
  549. " order by wd.procedureName, wd.goodscode, wd.sapcode)";
  550. sre.Data.Tables.Add(oracleConn.GetSqlResultToDt(sqlString, oracleParameter));
  551. return sre;
  552. }
  553. catch (Exception ex)
  554. {
  555. throw ex;
  556. }
  557. }
  558. /// <summary>
  559. /// 查询SAP同步工序损坯明细
  560. /// </summary>
  561. /// <param name="logid"></param>
  562. /// <param name="userInfo"></param>
  563. /// <returns></returns>
  564. public static ServiceResultEntity GetWorkDataSPSumByDate(ClientRequestEntity cre)
  565. {
  566. IDBConnection oracleConn = ClsDbFactory.CreateDBConnection(DataBaseType.ORACLE, DataManager.ConnectionString);
  567. ServiceResultEntity sre = new ServiceResultEntity();
  568. try
  569. {
  570. string sqlString = "select decode(gid\n" +
  571. " ,3\n" +
  572. " ,'合计'\n" +
  573. " ,1\n" +
  574. " ,'小计[' || procedureName || ']'\n" +
  575. " ,procedureName) procedureName\n" +
  576. " ,decode(gid, 0, goodscode, '--') goodscode\n" +
  577. " ,decode(gid, 0, sapcode, '--') sapcode\n" +
  578. " ,decode(gid, 0, usercode, '--') usercode\n" +
  579. " ,scrapnum\n" +
  580. " ,unscrapnum\n" +
  581. " ,scrapnum - unscrapnum scrapsum\n" +
  582. " ,cleanupnum\n" +
  583. " ,uncleanupnum\n" +
  584. " ,cleanupnum - uncleanupnum cleanupsum\n" +
  585. " ,repairnum\n" +
  586. " ,recoverynum\n" +
  587. " from (select grouping_id(wd.procedureName, wd.goodscode) gid\n" +
  588. " ,wd.procedureName\n" +
  589. " ,wd.goodscode\n" +
  590. " ,wd.sapcode\n" +
  591. " ,wd.usercode\n" +
  592. " ,sum(wd.scrapnum) scrapnum\n" +
  593. " ,sum(wd.unscrapnum) unscrapnum\n" +
  594. " ,sum(wd.cleanupnum) cleanupnum\n" +
  595. " ,sum(wd.uncleanupnum) uncleanupnum\n" +
  596. " ,sum(wd.repairnum) repairnum\n" +
  597. " ,sum(wd.recoverynum) recoverynum\n" +
  598. " from TSAP_HEGII_DATALOG dl\n" +
  599. " inner join TSAP_HEGII_WORKDATA_SNum wd\n" +
  600. " on wd.logid = dl.logid \n" +
  601. " where dl.logtype = '1' \n" +
  602. " and dl.yyyymmdd >= :datebegin\n" +
  603. " and dl.yyyymmdd <= :dateend\n" +
  604. " group by grouping sets((wd.procedureName, wd.goodscode, wd.sapcode,wd.usercode),(wd.procedureName),())\n" +
  605. " order by wd.procedureName, wd.goodscode, wd.sapcode)";
  606. OracleParameter[] oracleParameter = new OracleParameter[]
  607. {
  608. new OracleParameter(":datebegin",OracleDbType.Varchar2, cre.Properties["datebegin"], ParameterDirection.Input),
  609. new OracleParameter(":dateend",OracleDbType.Varchar2, cre.Properties["dateend"], ParameterDirection.Input),
  610. };
  611. sre.Data = oracleConn.GetSqlResultToDs(sqlString, oracleParameter);
  612. return sre;
  613. }
  614. catch (Exception ex)
  615. {
  616. throw ex;
  617. }
  618. }
  619. /// <summary>
  620. /// 查询成品条码同步明细
  621. /// </summary>
  622. /// <param name="logid"></param>
  623. /// <param name="userInfo"></param>
  624. /// <returns></returns>
  625. public static ServiceResultEntity GetFinishedProductByDataLog(int logid)
  626. {
  627. IDBConnection oracleConn = ClsDbFactory.CreateDBConnection(DataBaseType.ORACLE, DataManager.ConnectionString);
  628. ServiceResultEntity sre = new ServiceResultEntity();
  629. try
  630. {
  631. string sqlString =
  632. "select fp.yyyymmdd\n" +
  633. " ,fp.workcode\n" +
  634. " ,fp.barcode\n" +
  635. " ,fp.outcode\n" +
  636. " ,fp.goodscode\n" +
  637. " ,fp.sapcode\n" +
  638. " ,fp.sapflbatchno\n" +
  639. " ,fp.sapfhundoflag\n" +
  640. " ,fp.createtime\n" +
  641. " ,fp.ztype\n" +
  642. " ,fp.zmsg\n" +
  643. " ,fp.ztime\n" +
  644. " ,fp.logid\n" +
  645. " ,fp.ordercode\n" +
  646. " ,fp.orderitem\n" +
  647. " ,fp.securitycode\n" + //2021年12月9日10:31:42 by fy modify 增加防伪码
  648. " from tsap_hegii_finishedproduct fp\n" +
  649. " where fp.logid = :logid\n" +
  650. " order by fp.ztime, fp.barcode\n";
  651. OracleParameter[] oracleParameter = new OracleParameter[]
  652. {
  653. new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  654. };
  655. sre.Data = oracleConn.GetSqlResultToDs(sqlString, oracleParameter);
  656. return sre;
  657. }
  658. catch (Exception ex)
  659. {
  660. throw ex;
  661. }
  662. }
  663. /// <summary>
  664. /// 同步产量报工(手动)
  665. /// </summary>
  666. /// <param name="date"></param>
  667. /// <param name="datacode"></param>
  668. /// <param name="userid"></param>
  669. /// <returns></returns>
  670. public static ServiceResultEntity SetWorkData10_50(DateTime date, string datacode, int userid)
  671. {
  672. IDBTransaction oracleConn = ClsDbFactory.CreateDBTransaction(DataBaseType.ORACLE, DataManager.ConnectionString);
  673. ServiceResultEntity sre = new ServiceResultEntity();
  674. try
  675. {
  676. string yyyymmdd = date.ToString("yyyyMMdd");
  677. string sqlString =
  678. "select t.logid\n" +
  679. " from tsap_hegii_datalog t\n" +
  680. " where t.logtype = '2'\n" +
  681. " and t.datastuts = 'S'\n" +
  682. " and t.yyyymmdd = :yyyymmdd\n" +
  683. " and t.datacode = :datacode";
  684. OracleParameter[] oracleParameter = new OracleParameter[]
  685. {
  686. new OracleParameter(":yyyymmdd",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  687. new OracleParameter(":datacode",OracleDbType.Varchar2, datacode, ParameterDirection.Input),
  688. };
  689. string logid = oracleConn.GetSqlResultToStr(sqlString, oracleParameter);
  690. if (!string.IsNullOrEmpty(logid))
  691. {
  692. sre.Status = Constant.ServiceResultStatus.Other;
  693. sre.Message = "日期【" + yyyymmdd + "】的数据已经同步过,不能重复同步。";
  694. return sre;
  695. }
  696. sqlString =
  697. "select t.logid\n" +
  698. " from tsap_hegii_datalog t\n" +
  699. " where t.logtype = '1'\n" +
  700. " and t.datastuts = 'S'\n" +
  701. " and t.yyyymmdd = :yyyymmdd\n" +
  702. " and t.datacode = :datacode" +
  703. " and t.createuserid is null for update";
  704. string datalogid = oracleConn.GetSqlResultToStr(sqlString, oracleParameter);
  705. sqlString = "select workcode from tp_mst_account where rownum = 1";
  706. string workcode = oracleConn.GetSqlResultToStr(sqlString);
  707. //DateTime datebegin = date.Date;
  708. //DateTime dateend = date.Date.AddDays(1);
  709. logid = oracleConn.GetSqlResultToStr("select SEQ_SAP_HEGII_DataLog_ID.Nextval from dual");
  710. string msg = null;
  711. //string msg = "data:" + datebegin.ToString("yyyyMMdd-HHmm") + "~" +
  712. // dateend.ToString("yyyyMMdd-HHmm");
  713. sqlString = "insert into tsap_hegii_datalog\n" +
  714. " (LogID\n" +
  715. " ,LogType\n" +
  716. " ,BeginTime\n" +
  717. " ,YYYYMMDD\n" +
  718. " ,WorkCode\n" +
  719. " ,DataCode\n" +
  720. " ,DataStuts\n" +
  721. " ,DataMSG\n" +
  722. " ,CreateUserID\n" +
  723. " ,DataLogID)\n" +
  724. "values\n" +
  725. " (:LogID\n" +
  726. " ,'2'\n" +
  727. " ,sysdate\n" +
  728. " ,:YYYYMMDD\n" +
  729. " ,:WorkCode\n" +
  730. " ,:DataCode\n" +
  731. " ,:DataStuts\n" +
  732. " ,:DataMSG\n" +
  733. " ,:CreateUserID\n" +
  734. " ,:DataLogID)";
  735. int r = 0;
  736. if (string.IsNullOrEmpty(datalogid))
  737. {
  738. oracleParameter = new OracleParameter[]
  739. {
  740. new OracleParameter(":LogID",OracleDbType.Int32, logid, ParameterDirection.Input),
  741. new OracleParameter(":CreateUserID",OracleDbType.Int32, userid, ParameterDirection.Input),
  742. new OracleParameter(":YYYYMMDD",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  743. new OracleParameter(":WorkCode",OracleDbType.Varchar2, workcode, ParameterDirection.Input),
  744. new OracleParameter(":DataCode",OracleDbType.Varchar2, datacode, ParameterDirection.Input),
  745. new OracleParameter(":DataMSG",OracleDbType.Varchar2, "DKMES-ERROR:NO DATA " + msg, ParameterDirection.Input),
  746. new OracleParameter(":DataStuts",OracleDbType.Varchar2, "E", ParameterDirection.Input),
  747. new OracleParameter(":DataLogID",OracleDbType.Int32, 0, ParameterDirection.Input),
  748. };
  749. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  750. oracleConn.Commit();
  751. sre.Status = Constant.ServiceResultStatus.Other;
  752. sre.Message = "没有同步数据";
  753. sre.Result = "E";
  754. return sre;
  755. }
  756. oracleParameter = new OracleParameter[]
  757. {
  758. new OracleParameter(":LogID",OracleDbType.Int32, logid, ParameterDirection.Input),
  759. new OracleParameter(":CreateUserID",OracleDbType.Int32, userid, ParameterDirection.Input),
  760. new OracleParameter(":YYYYMMDD",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  761. new OracleParameter(":WorkCode",OracleDbType.Varchar2, workcode, ParameterDirection.Input),
  762. new OracleParameter(":DataCode",OracleDbType.Varchar2, datacode, ParameterDirection.Input),
  763. new OracleParameter(":DataMSG",OracleDbType.Varchar2, msg, ParameterDirection.Input),
  764. new OracleParameter(":DataStuts",OracleDbType.Varchar2, "S", ParameterDirection.Input),
  765. new OracleParameter(":DataLogID",OracleDbType.Int32, datalogid, ParameterDirection.Input),
  766. };
  767. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  768. sqlString =
  769. "select wd.yyyymmdd\n" +
  770. " ,wd.workcode\n" +
  771. " ,wd.DataCode\n" +
  772. " ,wd.GoodsCode\n" +
  773. " ,wd.SAPCode\n" +
  774. " ,wd.UserCode\n" +
  775. " ,wd.ORDERCODE\n" +
  776. " ,wd.ORDERITEM\n" +
  777. " ,wd.OutputNum\n" +
  778. " ,wd.ScrapNum\n" +
  779. " ,wd.CleanupNum\n" +
  780. " ,wd.RecoveryNum\n" +
  781. " ,wd.RepairNum\n" +
  782. " from tsap_hegii_workdata wd where wd.logid = :datalogid";
  783. oracleParameter = new OracleParameter[]
  784. {
  785. new OracleParameter(":datalogid",OracleDbType.Int32, datalogid, ParameterDirection.Input),
  786. };
  787. DataTable workData = oracleConn.GetSqlResultToDt(sqlString, oracleParameter);
  788. Zppfm008 sapParameter = new Zppfm008();
  789. if (workData != null && workData.Rows.Count > 0)
  790. {
  791. sapParameter.ZSUM = workData.Rows.Count;
  792. sapParameter.TABLE_IN = new ZSPP100[sapParameter.ZSUM];
  793. int index = 0;
  794. foreach (DataRow item in workData.Rows)
  795. {
  796. ZSPP100 info100 = new ZSPP100();
  797. // 工厂
  798. info100.WERKS = workcode;
  799. // 型号
  800. info100.GROES = item["GoodsCode"].ToString();
  801. // 物料编号
  802. info100.MATNR = item["SAPCode"].ToString();
  803. // 生产工号
  804. info100.ZGHNU = item["UserCode"].ToString();
  805. // 数据节点
  806. info100.ZJDNU = item["DataCode"].ToString();
  807. // 时间戳
  808. info100.ZSCNU = yyyymmdd;
  809. // 销售凭证
  810. info100.VBELN = item["ORDERCODE"].ToString().Trim();
  811. // 销售凭证项目
  812. info100.POSNR = item["ORDERITEM"].ToString();
  813. // 产量
  814. info100.ZCLNG = item["OutputNum"].ToString();
  815. // 损坯
  816. info100.ZSPNG = item["SCRAPNUM"].ToString();
  817. // 清除
  818. info100.ZQCNG = item["CLEANUPNUM"].ToString();
  819. // 回收
  820. info100.ZHSNG = item["RECOVERYNUM"].ToString();
  821. // 干补
  822. info100.ZGBNG = item["REPAIRNUM"].ToString();
  823. info100.ZKSSJ = "000000";
  824. info100.ZJSRQ = Convert.ToDecimal(yyyymmdd)+1;
  825. sapParameter.TABLE_IN[index++] = info100;
  826. }
  827. }
  828. else
  829. {
  830. sapParameter.ZSUM = 0;
  831. sapParameter.TABLE_IN = new ZSPP100[sapParameter.ZSUM];
  832. }
  833. ZPPFM008Response result = HGSAPDK_ZPPFM008(sapParameter, yyyymmdd, datacode);
  834. //if (result.Ztype == "E")
  835. //{
  836. // sqlString = "update tsap_hegii_datalog t set t.EndTime = sysdate, DataStuts = 'E', DataMSG = :msg||chr(13)||DataMSG where logid = :logid";
  837. // oracleParameter = new OracleParameter[]
  838. // {
  839. // new OracleParameter(":msg",OracleDbType.Varchar2, result.Zmsg, ParameterDirection.Input),
  840. // new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  841. // };
  842. // r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  843. //}
  844. //else
  845. {
  846. if (result.TABLE_OUT != null && result.TABLE_OUT.Length > 0)
  847. {
  848. sqlString = "update TSAP_HEGII_WorkData t set t.ZTime =sysdate, ZTYPE = :ZTYPE, ZMSG = :ZMSG where logid = " + datalogid +
  849. " \n and YYYYMMDD='" + yyyymmdd + "' and WorkCode='" + workcode +
  850. "' and DataCode=:DataCode and GoodsCode=:GoodsCode and SAPCode=:SAPCode and UserCode=:UserCode \n" +
  851. "and OrderCode=:OrderCode and OrderItem=:OrderItem";
  852. foreach (ZSPP100 item in result.TABLE_OUT)
  853. {
  854. string posnr = item.POSNR.TrimStart('0');
  855. oracleParameter = new OracleParameter[]
  856. {
  857. new OracleParameter(":ZTYPE",OracleDbType.Varchar2, item.ZTYPE, ParameterDirection.Input),
  858. new OracleParameter(":ZMSG",OracleDbType.Varchar2, item.ZMSG, ParameterDirection.Input),
  859. new OracleParameter(":DataCode",OracleDbType.Varchar2, datacode, ParameterDirection.Input),
  860. new OracleParameter(":GoodsCode",OracleDbType.Varchar2, item.GROES, ParameterDirection.Input),
  861. new OracleParameter(":SAPCode",OracleDbType.Varchar2, item.MATNR, ParameterDirection.Input),
  862. new OracleParameter(":UserCode",OracleDbType.Varchar2, item.ZGHNU, ParameterDirection.Input),
  863. new OracleParameter(":OrderCode",OracleDbType.Varchar2, (string.IsNullOrEmpty(item.VBELN) ? " " : item.VBELN), ParameterDirection.Input),
  864. new OracleParameter(":OrderItem",OracleDbType.Varchar2, ((string.IsNullOrEmpty(posnr)) ? "0" : posnr), ParameterDirection.Input),
  865. };
  866. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  867. }
  868. }
  869. //:msg||chr(13)||DataMSG nvl2(:msg,:msg||chr(13)||DataMS,DataMS)
  870. result.ZMSG = $"{result.ZMSG}({sapParameter.ZSUM})";
  871. sqlString = "update tsap_hegii_datalog t set t.EndTime = sysdate, DataStuts = :DataStuts, DataMSG =:msg where logid = :logid";
  872. oracleParameter = new OracleParameter[]
  873. {
  874. new OracleParameter(":DataStuts",OracleDbType.Varchar2, result.ZTYPE, ParameterDirection.Input),
  875. new OracleParameter(":msg",OracleDbType.Varchar2, result.ZMSG, ParameterDirection.Input),
  876. new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  877. };
  878. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  879. if (result.ZTYPE == "S")
  880. {
  881. sqlString = "update tsap_hegii_datalog t set t.createuserid = :userid where logid = :datalogid";
  882. oracleParameter = new OracleParameter[]
  883. {
  884. new OracleParameter(":datalogid",OracleDbType.Int32, datalogid, ParameterDirection.Input),
  885. new OracleParameter(":userid",OracleDbType.Int32, userid, ParameterDirection.Input),
  886. };
  887. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  888. }
  889. }
  890. oracleConn.Commit();
  891. sre.Message = result.ZMSG;
  892. sre.Result = result.ZTYPE;
  893. return sre;
  894. }
  895. catch (Exception ex)
  896. {
  897. throw ex;
  898. }
  899. finally
  900. {
  901. if (oracleConn != null &&
  902. oracleConn.ConnState == ConnectionState.Open)
  903. {
  904. oracleConn.Disconnect();
  905. }
  906. }
  907. }
  908. /// <summary>
  909. /// 同步产量报工(手动)重载
  910. /// </summary>
  911. /// <param name="date"></param>
  912. /// <param name="datacode"></param>
  913. /// <param name="userid"></param>
  914. /// <param name="ndate"></param>
  915. /// <returns></returns>
  916. public static ServiceResultEntity SetWorkData10_50(string datacode, int userid, DateTime ndate)
  917. {
  918. ServiceResultEntity sre = new ServiceResultEntity();
  919. IDBTransaction oracleConn = null;
  920. try
  921. {
  922. #region 事务1,执行存储过程
  923. OracleParameter[] paras = null;
  924. int logid = 0;
  925. string message = string.Empty;
  926. // 10 模具
  927. if ("10".Equals(datacode))
  928. {
  929. paras = new OracleParameter[]
  930. {
  931. new OracleParameter("in_dateend", OracleDbType.Date, ndate, ParameterDirection.Input),
  932. new OracleParameter("out_logid", OracleDbType.Int32, null, ParameterDirection.Output),
  933. new OracleParameter("out_msg", OracleDbType.NVarchar2, 500, null, ParameterDirection.Output)
  934. };
  935. oracleConn = ClsDbFactory.CreateDBTransaction(DataBaseType.ORACLE, DataManager.ConnectionString);
  936. DataSet ds = oracleConn.ExecStoredProcedure("pro_sap_hegii_workdata_10_1", paras);
  937. int.TryParse(paras[1].Value + "", out logid);
  938. message = paras[2].Value + "";
  939. oracleConn.Commit();
  940. }
  941. // 20 湿坯
  942. else if ("20".Equals(datacode))
  943. {
  944. paras = new OracleParameter[]
  945. {
  946. new OracleParameter("in_dateend", OracleDbType.Date, ndate, ParameterDirection.Input),
  947. new OracleParameter("out_logid", OracleDbType.Int32, null, ParameterDirection.Output),
  948. new OracleParameter("out_msg", OracleDbType.NVarchar2, 500, null, ParameterDirection.Output)
  949. };
  950. oracleConn = ClsDbFactory.CreateDBTransaction(DataBaseType.ORACLE, DataManager.ConnectionString);
  951. DataSet ds = oracleConn.ExecStoredProcedure("pro_sap_hegii_workdata_20_1", paras);
  952. int.TryParse(paras[1].Value + "", out logid);
  953. message = paras[2].Value + "";
  954. oracleConn.Commit();
  955. }
  956. // 30 精坯、40 釉坯、50 烧成
  957. else if ("30".Equals(datacode)|| "40".Equals(datacode)|| "50".Equals(datacode))
  958. {
  959. paras = new OracleParameter[]
  960. {
  961. new OracleParameter("in_dateend", OracleDbType.Date, ndate, ParameterDirection.Input),
  962. new OracleParameter("in_datacode", OracleDbType.Varchar2, datacode, ParameterDirection.Input),
  963. new OracleParameter("out_logid", OracleDbType.Int32, null, ParameterDirection.Output),
  964. new OracleParameter("out_msg", OracleDbType.NVarchar2, 500, null, ParameterDirection.Output)
  965. };
  966. oracleConn = ClsDbFactory.CreateDBTransaction(DataBaseType.ORACLE, DataManager.ConnectionString);
  967. DataSet ds = oracleConn.ExecStoredProcedure("pro_sap_hegii_workdata_30_1", paras);
  968. int.TryParse(paras[2].Value + "", out logid);
  969. message = paras[3].Value + "";
  970. oracleConn.Commit();
  971. }
  972. // 如果logid为0,则数据没有生成
  973. if (logid == 0)
  974. {
  975. sre.Status = Constant.ServiceResultStatus.Other;
  976. sre.Message = message;
  977. return sre;
  978. }
  979. #endregion
  980. // 事物2,同步SAP接口
  981. sre = SyncSap(ndate, datacode, userid, logid);
  982. return sre;
  983. }
  984. catch (Exception ex)
  985. {
  986. throw ex;
  987. }
  988. finally
  989. {
  990. if (oracleConn != null &&
  991. oracleConn.ConnState == ConnectionState.Open)
  992. {
  993. oracleConn.Disconnect();
  994. }
  995. }
  996. }
  997. /// <summary>
  998. /// 同步SAP接口5000端口新
  999. /// </summary>
  1000. /// <param name="date"></param>
  1001. /// <param name="datacode"></param>
  1002. /// <param name="userid"></param>
  1003. /// <param name="logid"></param>
  1004. /// <returns></returns>
  1005. public static ServiceResultEntity SyncSap5000(DateTime date, string datacode, int userid, int logid)
  1006. {
  1007. ServiceResultEntity sre = new ServiceResultEntity();
  1008. IDBTransaction oracleConn = ClsDbFactory.CreateDBTransaction(DataBaseType.ORACLE, DataManager.ConnectionString);
  1009. try
  1010. {
  1011. OracleParameter[] paras = null;
  1012. string workcode = "5000";
  1013. string yyyymmdd = date.ToString("yyyyMMdd");
  1014. string yyyymmddhh24miss = date.ToString("yyyyMMddHH24miss");
  1015. int r = 0;
  1016. // 查询出当前日志外,最新的一次日志
  1017. string sqlString = "SELECT t.executedateend\n" +
  1018. " FROM (SELECT dl.executedateend\n" +
  1019. " FROM tsap_hegii_datalog_bg dl\n" +
  1020. " WHERE dl.logtype = '3'\n" +
  1021. " AND dl.datastuts = 'S'\n" +
  1022. " AND dl.datacode = :datacode\n" +
  1023. " AND dl.logid <> :logid\n" +
  1024. " ORDER BY dl.executedateend DESC) t\n" +
  1025. " WHERE rownum = 1";
  1026. paras = new OracleParameter[]
  1027. {
  1028. new OracleParameter(":datacode", datacode),
  1029. new OracleParameter(":logid", logid)
  1030. };
  1031. object executedateend = oracleConn.GetSqlResultToObj(sqlString, paras);
  1032. //if (executedateend == null || Convert.ToDateTime(executedateend) >= date)
  1033. //{
  1034. // sre.Result = "W";
  1035. // sre.Message = "当前日志的结束时间小于最新日志的结束时间,不能同步";
  1036. // return sre;
  1037. //}
  1038. sqlString = "SELECT TO_CHAR(wd.yyyymmdd) yyyymmdd\n" +
  1039. " ,TO_CHAR(5000) WERKS\n" +
  1040. " ,TO_CHAR(wd.goodscode) GROES\n" +
  1041. " ,TO_CHAR(wd.sapcode) MATNR\n" +
  1042. " ,TO_CHAR(wd.usercode) ZGHNU\n" +
  1043. " ,TO_CHAR(wd.datacode) ZJDNU\n" +
  1044. " ,to_char(DL.EXECUTEDATEBEGIN, 'YYYYMMDD' ) ZSCNU\n" +
  1045. " ,to_char(DL.EXECUTEDATEBEGIN, 'HH24MISS' ) ZKSSJ\n" +
  1046. " ,to_char(DL.EXECUTEDATEEND, 'YYYYMMDDHH24MISS' ) ZJSRQ\n" +
  1047. " ,TO_CHAR(wd.ordercode) VBELN\n" +
  1048. " ,TO_CHAR(wd.orderitem) POSNR\n" +
  1049. " ,TO_CHAR(wd.outputnum) ZCLNG\n" +
  1050. " ,TO_CHAR(wd.scrapnum) ZSPNG\n" +
  1051. " ,TO_CHAR(wd.cleanupnum) ZQCNG\n" +
  1052. " ,TO_CHAR(wd.recoverynum) ZHSNG\n" +
  1053. " ,TO_CHAR(wd.repairnum) ZGBNG\n" +
  1054. " ,TO_CHAR(wd.testmouldflag) ZSCMS\n" +
  1055. " -- ,TO_CHAR(wd.zscs) zscs\n" +
  1056. " ,DECODE( :datacode,20,TO_CHAR(wd.zscs),'T') AS zscs\n" +
  1057. " ,TO_CHAR(wd.WORKSHOP) ZSCCJ\n" +
  1058. " ,TO_CHAR( :yyyymmdd) CHARG\n" +
  1059. " ,TO_CHAR( :datacode) datacode\n" +
  1060. " FROM tsap_hegii_workdata_bg wd\n" +
  1061. " INNER JOIN TSAP_HEGII_DATALOG_BG DL\n" +
  1062. " ON wd.LOGID = DL.LOGID \n" +
  1063. " WHERE wd.logid = :logid";
  1064. paras = new OracleParameter[]
  1065. {
  1066. new OracleParameter(":logid", OracleDbType.Int32, logid, ParameterDirection.Input),
  1067. new OracleParameter(":datacode",datacode),
  1068. new OracleParameter(":yyyymmdd",yyyymmdd),
  1069. };
  1070. DataTable workData = oracleConn.GetSqlResultToDt(sqlString, paras);
  1071. int num = workData.Rows.Count;
  1072. // 调用SAP接口
  1073. string postString = "{\"ZSUM\":" + num.ToString() + ",\"TABLE_IN\":{\"item\":" + JsonHelper.ToJson(ModelConvertHelper<BGToSAP>.ConvertToModel(workData)) + "}}";
  1074. INIUtility ini = INIUtility.Instance(INIUtility.IniFile.SAP_HEGII);
  1075. string url030 = ini.ReadIniData("SAP_NEW_INFO", "Url030");
  1076. //url030 = "http://hgs4podev.hegii.com:50200/RESTAdapter/DKMES/ZPPFM030";
  1077. string result = PostData(url030, postString, "POST");
  1078. if (JObject.Parse(result)["TABLE_OUT"] != null && JObject.Parse(result)["TABLE_OUT"].ToString().Length > 0)
  1079. {
  1080. sqlString = "update TSAP_HEGII_WorkData_bg t set t.ZTime =sysdate, ZTYPE = :ZTYPE, ZMSG = :ZMSG where logid = " + logid +
  1081. " \n and YYYYMMDD='" + yyyymmdd + "' and WorkCode='" + workcode +
  1082. "' and DataCode=:DataCode and GoodsCode=:GoodsCode and SAPCode=:SAPCode and UserCode=:UserCode \n" +
  1083. "and OrderCode=:OrderCode and OrderItem=:OrderItem";
  1084. //object obj = JObject.Parse(result)["TABLE_OUT"];
  1085. Dictionary<string, object> obj = JsonConvert.DeserializeObject<Dictionary<string, object>>(result);
  1086. object TABLE_OUT;
  1087. obj.TryGetValue("TABLE_OUT", out TABLE_OUT);
  1088. obj = JsonConvert.DeserializeObject<Dictionary<string, object>>(TABLE_OUT+"");
  1089. object item1;
  1090. obj.TryGetValue("item", out item1);
  1091. JArray arr = JArray.FromObject(item1);
  1092. foreach (JObject item in arr)
  1093. {
  1094. string posnr = item["POSNR"].ToString().TrimStart('0');
  1095. paras = new OracleParameter[]
  1096. {
  1097. new OracleParameter(":ZTYPE",OracleDbType.Varchar2, item["ZTYPE"].ToString(), ParameterDirection.Input),
  1098. new OracleParameter(":ZMSG",OracleDbType.Varchar2, item["ZMSG"].ToString(), ParameterDirection.Input),
  1099. new OracleParameter(":DataCode",OracleDbType.Varchar2, datacode, ParameterDirection.Input),
  1100. new OracleParameter(":GoodsCode",OracleDbType.Varchar2, item["GROES"].ToString(), ParameterDirection.Input),
  1101. new OracleParameter(":SAPCode",OracleDbType.Varchar2, item["MATNR"].ToString(), ParameterDirection.Input),
  1102. new OracleParameter(":UserCode",OracleDbType.Varchar2, item["ZGHNU"].ToString(), ParameterDirection.Input),
  1103. new OracleParameter(":OrderCode",OracleDbType.Varchar2, (string.IsNullOrEmpty(item["VBELN"].ToString()) ? " " : item["VBELN"].ToString()), ParameterDirection.Input),
  1104. new OracleParameter(":OrderItem",OracleDbType.Varchar2, ((string.IsNullOrEmpty(posnr)) ? "0" : posnr), ParameterDirection.Input),
  1105. };
  1106. //r = oracleConn.ExecuteNonQuery(sqlString, paras);
  1107. }
  1108. }
  1109. sqlString = "update tsap_hegii_datalog_bg t set t.EndTime = sysdate, DataStuts = :DataStuts, DataMSG =:msg where logid = :logid";
  1110. paras = new OracleParameter[]
  1111. {
  1112. new OracleParameter(":DataStuts",OracleDbType.Varchar2, JObject.Parse(result)["ZTYPE"].ToString(), ParameterDirection.Input),
  1113. new OracleParameter(":msg",OracleDbType.Varchar2, JObject.Parse(result)["ZMSG"].ToString(), ParameterDirection.Input),
  1114. new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  1115. };
  1116. r = oracleConn.ExecuteNonQuery(sqlString, paras);
  1117. if (JObject.Parse(result)["ZTYPE"].ToString() == "S")
  1118. {
  1119. sqlString = "update tsap_hegii_datalog_bg t set t.createuserid = :userid where logid = :logid";
  1120. paras = new OracleParameter[]
  1121. {
  1122. new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  1123. new OracleParameter(":userid",OracleDbType.Int32, userid, ParameterDirection.Input),
  1124. };
  1125. r = oracleConn.ExecuteNonQuery(sqlString, paras);
  1126. }
  1127. oracleConn.Commit();
  1128. sre.Message = JObject.Parse(result)["ZMSG"].ToString();
  1129. sre.Result = JObject.Parse(result)["ZTYPE"].ToString();
  1130. return sre;
  1131. }
  1132. catch (Exception ex)
  1133. {
  1134. OutputLog.TraceLog(LogPriority.Error,
  1135. "BGToSAP",
  1136. "报工" + date.ToString("yyyy-MM-dd HH:mm:ss"),
  1137. ex.ToString(),
  1138. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  1139. throw ex;
  1140. }
  1141. finally
  1142. {
  1143. if (oracleConn != null &&
  1144. oracleConn.ConnState == ConnectionState.Open)
  1145. {
  1146. oracleConn.Disconnect();
  1147. }
  1148. }
  1149. }
  1150. /// <summary>
  1151. /// 同步SAP接口
  1152. /// </summary>
  1153. /// <param name="date"></param>
  1154. /// <param name="datacode"></param>
  1155. /// <param name="userid"></param>
  1156. /// <param name="logid"></param>
  1157. /// <returns></returns>
  1158. public static ServiceResultEntity SyncSap(DateTime date, string datacode, int userid, int logid)
  1159. {
  1160. ServiceResultEntity sre = new ServiceResultEntity();
  1161. IDBTransaction oracleConn = ClsDbFactory.CreateDBTransaction(DataBaseType.ORACLE, DataManager.ConnectionString);
  1162. try
  1163. {
  1164. OracleParameter[] paras = null;
  1165. string sqlString = string.Empty;
  1166. sqlString = "select workcode from tp_mst_account where rownum = 1";
  1167. string workcode = oracleConn.GetSqlResultToStr(sqlString);
  1168. string yyyymmdd = date.ToString("yyyyMMdd");
  1169. int r = 0;
  1170. // 查询出当前日志外,最新的一次日志
  1171. sqlString = "SELECT t.executedateend\n" +
  1172. " FROM (SELECT dl.executedateend\n" +
  1173. " FROM tsap_hegii_datalog dl\n" +
  1174. " WHERE dl.logtype = '3'\n" +
  1175. " AND dl.datastuts = 'S'\n" +
  1176. " AND dl.datacode = :datacode\n" +
  1177. " AND dl.logid <> :logid\n" +
  1178. " ORDER BY dl.executedateend DESC) t\n" +
  1179. " WHERE rownum = 1";
  1180. paras = new OracleParameter[]
  1181. {
  1182. new OracleParameter(":datacode", datacode),
  1183. new OracleParameter(":logid", logid)
  1184. };
  1185. object executedateend = oracleConn.GetSqlResultToObj(sqlString, paras);
  1186. if (executedateend == null || Convert.ToDateTime(executedateend) >= date)
  1187. {
  1188. sre.Result = "W";
  1189. sre.Message = "当前日志的结束时间小于最新日志的结束时间,不能同步";
  1190. return sre;
  1191. }
  1192. sqlString = "SELECT wd.yyyymmdd\n" +
  1193. " ,wd.workcode\n" +
  1194. " ,wd.datacode\n" +
  1195. " ,wd.goodscode\n" +
  1196. " ,wd.sapcode\n" +
  1197. " ,wd.usercode\n" +
  1198. " ,wd.ordercode\n" +
  1199. " ,wd.orderitem\n" +
  1200. " ,wd.outputnum\n" +
  1201. " ,wd.scrapnum\n" +
  1202. " ,wd.cleanupnum\n" +
  1203. " ,wd.recoverynum\n" +
  1204. " ,wd.repairnum\n" +
  1205. " ,wd.testmouldflag\n" +
  1206. " ,wd.zscs\n" +
  1207. " FROM tsap_hegii_workdata wd\n" +
  1208. " WHERE wd.logid = :logid";
  1209. paras = new OracleParameter[]
  1210. {
  1211. new OracleParameter(":logid", OracleDbType.Int32, logid, ParameterDirection.Input),
  1212. };
  1213. DataTable workData = oracleConn.GetSqlResultToDt(sqlString, paras);
  1214. Zppfm008 sapParameter = new Zppfm008();
  1215. if (workData != null && workData.Rows.Count > 0)
  1216. {
  1217. sapParameter.ZSUM = workData.Rows.Count;
  1218. sapParameter.TABLE_IN = new ZSPP100[sapParameter.ZSUM];
  1219. int index = 0;
  1220. foreach (DataRow item in workData.Rows)
  1221. {
  1222. ZSPP100 info100 = new ZSPP100();
  1223. // 工厂
  1224. info100.WERKS = workcode;
  1225. // 型号
  1226. info100.GROES = item["GoodsCode"].ToString();
  1227. // 物料编号
  1228. info100.MATNR = item["SAPCode"].ToString();
  1229. // 生产工号
  1230. info100.ZGHNU = item["UserCode"].ToString();
  1231. // 数据节点
  1232. info100.ZJDNU = item["DataCode"].ToString();
  1233. // 时间戳
  1234. info100.ZSCNU = yyyymmdd;
  1235. // 销售凭证
  1236. info100.VBELN = item["ORDERCODE"].ToString().Trim();
  1237. // 销售凭证项目
  1238. info100.POSNR = item["ORDERITEM"].ToString();
  1239. // 产量
  1240. info100.ZCLNG = item["OutputNum"].ToString();
  1241. // 损坯
  1242. info100.ZSPNG = item["SCRAPNUM"].ToString();
  1243. // 清除
  1244. info100.ZQCNG = item["CLEANUPNUM"].ToString();
  1245. // 回收
  1246. info100.ZHSNG = item["RECOVERYNUM"].ToString();
  1247. // 干补
  1248. info100.ZGBNG = item["REPAIRNUM"].ToString();
  1249. // 注浆类型 G高压 L普通
  1250. info100.ZSCS = item["ZSCS"].ToString();
  1251. info100.ZKSSJ = Convert.ToDateTime(executedateend).ToString("HHmmss");
  1252. info100.ZJSRQ = Convert.ToDecimal(date.ToString("yyyyMMddHHmmss"));
  1253. sapParameter.TABLE_IN[index++] = info100;
  1254. }
  1255. }
  1256. else
  1257. {
  1258. sapParameter.ZSUM = 0;
  1259. sapParameter.TABLE_IN = new ZSPP100[sapParameter.ZSUM];
  1260. }
  1261. // 调用SAP接口
  1262. ZPPFM008Response result = HGSAPDK_ZPPFM008(sapParameter, yyyymmdd, datacode);
  1263. if (result.TABLE_OUT != null && result.TABLE_OUT.Length > 0)
  1264. {
  1265. sqlString = "update TSAP_HEGII_WorkData t set t.ZTime =sysdate, ZTYPE = :ZTYPE, ZMSG = :ZMSG where logid = " + logid +
  1266. " \n and YYYYMMDD='" + yyyymmdd + "' and WorkCode='" + workcode +
  1267. "' and DataCode=:DataCode and GoodsCode=:GoodsCode and SAPCode=:SAPCode and UserCode=:UserCode \n" +
  1268. "and OrderCode=:OrderCode and OrderItem=:OrderItem";
  1269. foreach (ZSPP100 item in result.TABLE_OUT)
  1270. {
  1271. string posnr = item.POSNR.TrimStart('0');
  1272. paras = new OracleParameter[]
  1273. {
  1274. new OracleParameter(":ZTYPE",OracleDbType.Varchar2, item.ZTYPE, ParameterDirection.Input),
  1275. new OracleParameter(":ZMSG",OracleDbType.Varchar2, item.ZMSG, ParameterDirection.Input),
  1276. new OracleParameter(":DataCode",OracleDbType.Varchar2, datacode, ParameterDirection.Input),
  1277. new OracleParameter(":GoodsCode",OracleDbType.Varchar2, item.GROES, ParameterDirection.Input),
  1278. new OracleParameter(":SAPCode",OracleDbType.Varchar2, item.MATNR, ParameterDirection.Input),
  1279. new OracleParameter(":UserCode",OracleDbType.Varchar2, item.ZGHNU, ParameterDirection.Input),
  1280. new OracleParameter(":OrderCode",OracleDbType.Varchar2, (string.IsNullOrEmpty(item.VBELN) ? " " : item.VBELN), ParameterDirection.Input),
  1281. new OracleParameter(":OrderItem",OracleDbType.Varchar2, ((string.IsNullOrEmpty(posnr)) ? "0" : posnr), ParameterDirection.Input),
  1282. };
  1283. r = oracleConn.ExecuteNonQuery(sqlString, paras);
  1284. }
  1285. }
  1286. result.ZMSG = $"{result.ZMSG}({sapParameter.ZSUM})";
  1287. sqlString = "update tsap_hegii_datalog t set t.EndTime = sysdate, DataStuts = :DataStuts, DataMSG =:msg where logid = :logid";
  1288. paras = new OracleParameter[]
  1289. {
  1290. new OracleParameter(":DataStuts",OracleDbType.Varchar2, result.ZTYPE, ParameterDirection.Input),
  1291. new OracleParameter(":msg",OracleDbType.Varchar2, result.ZMSG, ParameterDirection.Input),
  1292. new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  1293. };
  1294. r = oracleConn.ExecuteNonQuery(sqlString, paras);
  1295. if (result.ZTYPE == "S")
  1296. {
  1297. sqlString = "update tsap_hegii_datalog t set t.createuserid = :userid where logid = :logid";
  1298. paras = new OracleParameter[]
  1299. {
  1300. new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  1301. new OracleParameter(":userid",OracleDbType.Int32, userid, ParameterDirection.Input),
  1302. };
  1303. r = oracleConn.ExecuteNonQuery(sqlString, paras);
  1304. }
  1305. oracleConn.Commit();
  1306. sre.Message = result.ZMSG;
  1307. sre.Result = result.ZTYPE;
  1308. return sre;
  1309. }
  1310. catch (Exception ex)
  1311. {
  1312. throw ex;
  1313. }
  1314. finally
  1315. {
  1316. if (oracleConn != null &&
  1317. oracleConn.ConnState == ConnectionState.Open)
  1318. {
  1319. oracleConn.Disconnect();
  1320. }
  1321. }
  1322. }
  1323. /// <summary>
  1324. /// 同步成品条码(手动)
  1325. /// </summary>
  1326. /// <param name="date"></param>
  1327. /// <param name="userid"></param>
  1328. /// <returns></returns>
  1329. public static ServiceResultEntity SetFP6001(DateTime date, int userid)
  1330. {
  1331. IDBTransaction oracleConn = ClsDbFactory.CreateDBTransaction(DataBaseType.ORACLE, DataManager.ConnectionString);
  1332. ServiceResultEntity sre = new ServiceResultEntity();
  1333. try
  1334. {
  1335. string yyyymmdd = date.ToString("yyyyMMdd");
  1336. string sqlString =
  1337. "select t.logid\n" +
  1338. " from tsap_hegii_datalog t\n" +
  1339. " where t.logtype = '2'\n" +
  1340. " and t.datastuts = 'S'\n" +
  1341. " and t.yyyymmdd = :yyyymmdd\n" +
  1342. " and t.datacode = :datacode";
  1343. OracleParameter[] oracleParameter = new OracleParameter[]
  1344. {
  1345. new OracleParameter(":yyyymmdd",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  1346. new OracleParameter(":datacode",OracleDbType.Varchar2, "6001", ParameterDirection.Input),
  1347. };
  1348. string logid = oracleConn.GetSqlResultToStr(sqlString, oracleParameter);
  1349. if (!string.IsNullOrEmpty(logid))
  1350. {
  1351. sre.Status = Constant.ServiceResultStatus.Other;
  1352. sre.Message = "日期【" + yyyymmdd + "】的数据已经同步过,不能重复同步。";
  1353. return sre;
  1354. }
  1355. sqlString =
  1356. "select t.logid\n" +
  1357. " from tsap_hegii_datalog t\n" +
  1358. " where t.logtype = '1'\n" +
  1359. " and t.datastuts = 'S'\n" +
  1360. " and t.yyyymmdd = :yyyymmdd\n" +
  1361. " and t.datacode = :datacode" +
  1362. " and t.createuserid is null for update";
  1363. string datalogid = oracleConn.GetSqlResultToStr(sqlString, oracleParameter);
  1364. sqlString = "select workcode from tp_mst_account where rownum = 1";
  1365. string workcode = oracleConn.GetSqlResultToStr(sqlString);
  1366. //DateTime datebegin = date.Date;
  1367. //DateTime dateend = date.Date.AddDays(1);
  1368. logid = oracleConn.GetSqlResultToStr("select SEQ_SAP_HEGII_DataLog_ID.Nextval from dual");
  1369. string msg = null;
  1370. //string msg = "data:" + datebegin.ToString("yyyyMMdd-HHmm") + "~" +
  1371. // dateend.ToString("yyyyMMdd-HHmm");
  1372. sqlString = "insert into tsap_hegii_datalog\n" +
  1373. " (LogID\n" +
  1374. " ,LogType\n" +
  1375. " ,BeginTime\n" +
  1376. " ,YYYYMMDD\n" +
  1377. " ,WorkCode\n" +
  1378. " ,DataCode\n" +
  1379. " ,DataStuts\n" +
  1380. " ,DataMSG\n" +
  1381. " ,CreateUserID\n" +
  1382. " ,DataLogID)\n" +
  1383. "values\n" +
  1384. " (:LogID\n" +
  1385. " ,'2'\n" +
  1386. " ,sysdate\n" +
  1387. " ,:YYYYMMDD\n" +
  1388. " ,:WorkCode\n" +
  1389. " ,:DataCode\n" +
  1390. " ,:DataStuts\n" +
  1391. " ,:DataMSG\n" +
  1392. " ,:CreateUserID\n" +
  1393. " ,:DataLogID)";
  1394. int r = 0;
  1395. if (string.IsNullOrEmpty(datalogid))
  1396. {
  1397. oracleParameter = new OracleParameter[]
  1398. {
  1399. new OracleParameter(":LogID",OracleDbType.Int32, logid, ParameterDirection.Input),
  1400. new OracleParameter(":CreateUserID",OracleDbType.Int32, userid, ParameterDirection.Input),
  1401. new OracleParameter(":YYYYMMDD",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  1402. new OracleParameter(":WorkCode",OracleDbType.Varchar2, workcode, ParameterDirection.Input),
  1403. new OracleParameter(":DataCode",OracleDbType.Varchar2, "6001", ParameterDirection.Input),
  1404. new OracleParameter(":DataMSG",OracleDbType.Varchar2, "DKMES-ERROR:NO DATA " + msg, ParameterDirection.Input),
  1405. new OracleParameter(":DataStuts",OracleDbType.Varchar2, "E", ParameterDirection.Input),
  1406. new OracleParameter(":DataLogID",OracleDbType.Int32, 0, ParameterDirection.Input),
  1407. };
  1408. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  1409. oracleConn.Commit();
  1410. sre.Status = Constant.ServiceResultStatus.Other;
  1411. sre.Message = "没有同步数据";
  1412. sre.Result = "E";
  1413. return sre;
  1414. }
  1415. oracleParameter = new OracleParameter[]
  1416. {
  1417. new OracleParameter(":LogID",OracleDbType.Int32, logid, ParameterDirection.Input),
  1418. new OracleParameter(":CreateUserID",OracleDbType.Int32, userid, ParameterDirection.Input),
  1419. new OracleParameter(":YYYYMMDD",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  1420. new OracleParameter(":WorkCode",OracleDbType.Varchar2, workcode, ParameterDirection.Input),
  1421. new OracleParameter(":DataCode",OracleDbType.Varchar2, "6001", ParameterDirection.Input),
  1422. new OracleParameter(":DataMSG",OracleDbType.Varchar2, msg, ParameterDirection.Input),
  1423. new OracleParameter(":DataStuts",OracleDbType.Varchar2, "S", ParameterDirection.Input),
  1424. new OracleParameter(":DataLogID",OracleDbType.Int32, datalogid, ParameterDirection.Input),
  1425. };
  1426. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  1427. sqlString =
  1428. "select fp.yyyymmdd\n" +
  1429. " ,fp.workcode\n" +
  1430. " ,fp.barcode\n" +
  1431. " ,fp.outcode\n" +
  1432. " ,fp.goodscode\n" +
  1433. " ,fp.sapcode\n" +
  1434. " ,fp.sapflbatchno\n" +
  1435. " ,fp.sapfhundoflag\n" +
  1436. " ,fp.ordercode\n" +
  1437. " ,fp.orderitem\n" +
  1438. " from tsap_hegii_finishedproduct fp where fp.logid = :datalogid\n" +
  1439. " order by fp.sapflbatchno, fp.barcode";
  1440. oracleParameter = new OracleParameter[]
  1441. {
  1442. new OracleParameter(":datalogid",OracleDbType.Int32, datalogid, ParameterDirection.Input),
  1443. };
  1444. DataTable fpData = oracleConn.GetSqlResultToDt(sqlString, oracleParameter);
  1445. // 单次传输最大条数
  1446. int maxCount = 100000;
  1447. List<Zppfm010> sapParameterList = new List<Zppfm010>();
  1448. if (fpData != null && fpData.Rows.Count > 0)
  1449. {
  1450. int index = 0;
  1451. //Zppfm010 sapParameter = new Zppfm010();
  1452. //sapParameter.Zsum = maxCount;
  1453. //sapParameter.TableIn = new Zspp110[sapParameter.Zsum];
  1454. List<ZSPP110> tableInList = new List<ZSPP110>();
  1455. foreach (DataRow item in fpData.Rows)
  1456. {
  1457. if (index >= maxCount)
  1458. {
  1459. Zppfm010 sapItem = new Zppfm010();
  1460. sapItem.ZSUM = tableInList.Count;
  1461. sapItem.TABLE_IN = tableInList.ToArray();
  1462. sapParameterList.Add(sapItem);
  1463. index = 0;
  1464. tableInList.Clear();
  1465. }
  1466. ZSPP110 info110 = new ZSPP110();
  1467. // 时间戳
  1468. info110.ZSCNU = yyyymmdd;
  1469. // 工厂
  1470. info110.WERKS = workcode;
  1471. // 生产条码
  1472. info110.ZSCTM = item["barcode"].ToString();
  1473. // 包装条码
  1474. info110.ZBZTM = item["outcode"].ToString();
  1475. // 产品编码
  1476. info110.ZCPBM = item["goodscode"].ToString();
  1477. // 物料编号
  1478. info110.MATNR = item["sapcode"].ToString();
  1479. // 包装整板标识
  1480. info110.ZBZBS = item["sapflbatchno"].ToString();
  1481. // 重新绑定标识
  1482. info110.ZCXBD = item["sapfhundoflag"].ToString();
  1483. // 销售凭证
  1484. info110.KDAUF = item["ordercode"].ToString();
  1485. // 销售凭证项目
  1486. info110.KDPOS = item["orderitem"].ToString();
  1487. info110.ZCODEN = "";
  1488. info110.ZCODEYZM = "";
  1489. if (info110.WERKS == "5011" && info110.ZCPBM == "K047L")
  1490. {
  1491. continue;
  1492. }
  1493. tableInList.Add(info110);
  1494. index++;
  1495. }
  1496. Zppfm010 sapParameter = new Zppfm010();
  1497. sapParameter.ZSUM = tableInList.Count;
  1498. sapParameter.TABLE_IN = tableInList.ToArray();
  1499. sapParameterList.Add(sapParameter);
  1500. index = 0;
  1501. tableInList.Clear();
  1502. }
  1503. else
  1504. {
  1505. Zppfm010 sapParameter = new Zppfm010();
  1506. sapParameter.ZSUM = 0;
  1507. sapParameter.TABLE_IN = new ZSPP110[sapParameter.ZSUM];
  1508. sapParameterList.Add(sapParameter);
  1509. }
  1510. foreach (Zppfm010 sapParameter in sapParameterList)
  1511. {
  1512. ZPPFM010Response result = HGSAPDK_ZPPFM010(sapParameter, yyyymmdd);
  1513. //sre.Message = result.ZMSG;
  1514. sre.Message = $"{result.ZMSG}({sapParameter.ZSUM})";
  1515. sre.Result = result.ZTYPE;
  1516. sqlString = "update tsap_hegii_datalog t set t.EndTime = sysdate, DataStuts = :DataStuts, DataMSG =:msg where logid = :logid";
  1517. oracleParameter = new OracleParameter[]
  1518. {
  1519. new OracleParameter(":DataStuts",OracleDbType.Varchar2, result.ZTYPE, ParameterDirection.Input),
  1520. //new OracleParameter(":msg",OracleDbType.Varchar2, result.ZMSG, ParameterDirection.Input),
  1521. new OracleParameter(":msg",OracleDbType.Varchar2, sre.Message, ParameterDirection.Input),
  1522. new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  1523. };
  1524. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  1525. if (result.TABLE_OUT != null && result.TABLE_OUT.Length > 0)
  1526. {
  1527. sqlString = "update tsap_hegii_finishedproduct t set t.ZTime =sysdate, ZTYPE = :ZTYPE, ZMSG = :ZMSG where logid = " + datalogid +
  1528. " \n and YYYYMMDD='" + yyyymmdd + "' and WorkCode='" + workcode + "' and barcode=:barcode";
  1529. foreach (ZSPP110 item in result.TABLE_OUT)
  1530. {
  1531. oracleParameter = new OracleParameter[]
  1532. {
  1533. new OracleParameter(":ZTYPE",OracleDbType.Varchar2, item.ZTYPE, ParameterDirection.Input),
  1534. new OracleParameter(":ZMSG",OracleDbType.Varchar2, item.ZMSG, ParameterDirection.Input),
  1535. new OracleParameter(":barcode",OracleDbType.Varchar2, item.ZSCTM, ParameterDirection.Input),
  1536. };
  1537. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  1538. }
  1539. }
  1540. if (result.ZTYPE != "S")
  1541. {
  1542. oracleConn.Commit();
  1543. //sre.Message = result.Zmsg;
  1544. //sre.Result = result.Ztype;
  1545. return sre;
  1546. }
  1547. }
  1548. //if (result.Ztype == "S")
  1549. {
  1550. sqlString = "update tsap_hegii_datalog t set t.createuserid = :userid where logid = :datalogid";
  1551. oracleParameter = new OracleParameter[]
  1552. {
  1553. new OracleParameter(":datalogid",OracleDbType.Int32, datalogid, ParameterDirection.Input),
  1554. new OracleParameter(":userid",OracleDbType.Int32, userid, ParameterDirection.Input),
  1555. };
  1556. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  1557. }
  1558. oracleConn.Commit();
  1559. //sre.Message = result.Zmsg;
  1560. //sre.Result = result.Ztype;
  1561. return sre;
  1562. }
  1563. catch (Exception ex)
  1564. {
  1565. throw ex;
  1566. }
  1567. finally
  1568. {
  1569. if (oracleConn != null &&
  1570. oracleConn.ConnState == ConnectionState.Open)
  1571. {
  1572. oracleConn.Disconnect();
  1573. }
  1574. }
  1575. }
  1576. /// <summary>
  1577. /// 同步成品条码(手动)
  1578. /// </summary>
  1579. /// <param name="date"></param>
  1580. /// <param name="userid"></param>
  1581. /// <returns></returns>
  1582. public static ServiceResultEntity SetFP60_T(DateTime date, int userid)
  1583. {
  1584. IDBTransaction oracleConn = ClsDbFactory.CreateDBTransaction(DataBaseType.ORACLE, DataManager.ConnectionString);
  1585. ServiceResultEntity sre = new ServiceResultEntity();
  1586. try
  1587. {
  1588. string yyyymmdd = date.ToString("yyyyMMdd");
  1589. string sqlString = null;
  1590. sqlString =
  1591. "select fp.yyyymmdd\n" +
  1592. " ,fp.workcode\n" +
  1593. " ,fp.barcode\n" +
  1594. " ,fp.outcode\n" +
  1595. " ,fp.goodscode\n" +
  1596. " ,fp.sapcode\n" +
  1597. " ,fp.sapflbatchno\n" +
  1598. " ,fp.sapfhundoflag\n" +
  1599. " ,fp.ordercode\n" +
  1600. " ,fp.orderitem\n" +
  1601. " from tsap_hegii_finishedproduct fp where fp.logid=10339 and fp.sapflbatchno <> '575bd97d-5e3a-496f-8703-9e63be8016f0'\n" +
  1602. @" and fp.sapflbatchno <> '191204091310-46e7be7a-ea51-43a0-bd46-cb0866cef296'
  1603. and fp.sapflbatchno <> '191203234110-093d2c42-1842-4532-b7d6-39fe768ff35a'
  1604. and fp.sapflbatchno <> '191203234607-b242c5ef-2a42-4e4b-b02f-9a03798ee662'
  1605. and fp.sapflbatchno <> '191203234854-6218b6d8-4f14-4ab8-9be8-b86ce35f9a62'
  1606. and fp.sapflbatchno <> '191203234912-bfa6843d-767d-4ca7-8477-7b7242b7f900'
  1607. and fp.sapflbatchno <> '191204000111-18741887-f47b-4da7-9f0a-a970a30f79cc'
  1608. " +
  1609. " order by fp.sapflbatchno, fp.barcode";
  1610. OracleParameter[] oracleParameter = new OracleParameter[]
  1611. {
  1612. new OracleParameter(":sapflbatchno",OracleDbType.Varchar2, "191204091310-46e7be7a-ea51-43a0-bd46-cb0866cef296", ParameterDirection.Input),
  1613. };
  1614. DataTable fpData = oracleConn.GetSqlResultToDt(sqlString, oracleParameter);
  1615. // 单次传输最大条数
  1616. int maxCount = 100000;
  1617. List<Zppfm010> sapParameterList = new List<Zppfm010>();
  1618. if (fpData != null && fpData.Rows.Count > 0)
  1619. {
  1620. int index = 0;
  1621. //Zppfm010 sapParameter = new Zppfm010();
  1622. //sapParameter.Zsum = maxCount;
  1623. //sapParameter.TableIn = new Zspp110[sapParameter.Zsum];
  1624. List<ZSPP110> tableInList = new List<ZSPP110>();
  1625. foreach (DataRow item in fpData.Rows)
  1626. {
  1627. if (index >= maxCount)
  1628. {
  1629. Zppfm010 sapItem = new Zppfm010();
  1630. sapItem.ZSUM = tableInList.Count;
  1631. sapItem.TABLE_IN = tableInList.ToArray();
  1632. sapParameterList.Add(sapItem);
  1633. index = 0;
  1634. tableInList.Clear();
  1635. }
  1636. ZSPP110 info110 = new ZSPP110();
  1637. // 时间戳
  1638. info110.ZSCNU = yyyymmdd;
  1639. // 工厂
  1640. info110.WERKS = "5020";
  1641. // 生产条码
  1642. info110.ZSCTM = item["barcode"].ToString();
  1643. // 包装条码
  1644. info110.ZBZTM = item["outcode"].ToString();
  1645. // 产品编码
  1646. info110.ZCPBM = item["goodscode"].ToString();
  1647. // 物料编号
  1648. info110.MATNR = item["sapcode"].ToString();
  1649. // 包装整板标识
  1650. info110.ZBZBS = item["sapflbatchno"].ToString();
  1651. // 重新绑定标识
  1652. info110.ZCXBD = item["sapfhundoflag"].ToString();
  1653. // 销售凭证
  1654. info110.KDAUF = item["ordercode"].ToString();
  1655. // 销售凭证项目
  1656. info110.KDPOS = item["orderitem"].ToString();
  1657. info110.ZCODEN = "";
  1658. info110.ZCODEYZM = "";
  1659. tableInList.Add(info110);
  1660. index++;
  1661. }
  1662. Zppfm010 sapParameter = new Zppfm010();
  1663. sapParameter.ZSUM = tableInList.Count;
  1664. sapParameter.TABLE_IN = tableInList.ToArray();
  1665. sapParameterList.Add(sapParameter);
  1666. index = 0;
  1667. tableInList.Clear();
  1668. }
  1669. else
  1670. {
  1671. Zppfm010 sapParameter = new Zppfm010();
  1672. sapParameter.ZSUM = 0;
  1673. sapParameter.TABLE_IN = new ZSPP110[sapParameter.ZSUM];
  1674. sapParameterList.Add(sapParameter);
  1675. }
  1676. foreach (Zppfm010 sapParameter in sapParameterList)
  1677. {
  1678. ZPPFM010Response result = HGSAPDK_ZPPFM010(sapParameter, yyyymmdd);
  1679. //sre.Message = result.ZMSG;
  1680. sre.Message = $"{result.ZMSG}({sapParameter.ZSUM})";
  1681. sre.Result = result.ZTYPE;
  1682. }
  1683. return sre;
  1684. }
  1685. catch (Exception ex)
  1686. {
  1687. throw ex;
  1688. }
  1689. finally
  1690. {
  1691. if (oracleConn != null &&
  1692. oracleConn.ConnState == ConnectionState.Open)
  1693. {
  1694. oracleConn.Disconnect();
  1695. }
  1696. }
  1697. }
  1698. /// <summary>
  1699. /// 同步成品条码(手动)
  1700. /// </summary>
  1701. /// <param name="date"></param>
  1702. /// <param name="userid"></param>
  1703. /// <returns></returns>
  1704. public static ServiceResultEntity SetFP6002(DateTime date, int userid)
  1705. {
  1706. IDBTransaction oracleConn = ClsDbFactory.CreateDBTransaction(DataBaseType.ORACLE, DataManager.ConnectionString);
  1707. ServiceResultEntity sre = new ServiceResultEntity();
  1708. try
  1709. {
  1710. string yyyymmdd = date.ToString("yyyyMMdd");
  1711. string sqlString =
  1712. "select t.logid\n" +
  1713. " from tsap_hegii_datalog t\n" +
  1714. " where t.logtype = '2'\n" +
  1715. " and t.datastuts = 'S'\n" +
  1716. " and t.yyyymmdd = :yyyymmdd\n" +
  1717. " and t.datacode = :datacode";
  1718. OracleParameter[] oracleParameter = new OracleParameter[]
  1719. {
  1720. new OracleParameter(":yyyymmdd",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  1721. new OracleParameter(":datacode",OracleDbType.Varchar2, "6002", ParameterDirection.Input),
  1722. };
  1723. string logid = oracleConn.GetSqlResultToStr(sqlString, oracleParameter);
  1724. if (!string.IsNullOrEmpty(logid))
  1725. {
  1726. sre.Status = Constant.ServiceResultStatus.Other;
  1727. sre.Message = "日期【" + yyyymmdd + "】的数据已经同步过,不能重复同步。";
  1728. return sre;
  1729. }
  1730. sqlString =
  1731. "select t.logid, t.begintime, t.endtime\n" +
  1732. " from tsap_hegii_datalog t\n" +
  1733. " where t.logtype = '1'\n" +
  1734. " and t.datastuts = 'S'\n" +
  1735. " and t.yyyymmdd = :yyyymmdd\n" +
  1736. " and t.datacode = :datacode" +
  1737. " and t.createuserid is null for update";
  1738. //string datalogid = oracleConn.GetSqlResultToStr(sqlString, oracleParameter);
  1739. DataTable dt = oracleConn.GetSqlResultToDt(sqlString, oracleParameter);
  1740. string datalogid = null;
  1741. string msg = null;
  1742. if (dt.Rows.Count > 0)
  1743. {
  1744. datalogid = dt.Rows[0]["logid"] + "";
  1745. msg = Convert.ToDateTime(dt.Rows[0]["endtime"]).ToString("HH:mm ");
  1746. }
  1747. sqlString = "select workcode from tp_mst_account where rownum = 1";
  1748. string workcode = oracleConn.GetSqlResultToStr(sqlString);
  1749. //DateTime datebegin = date.Date;
  1750. //DateTime dateend = date.Date.AddDays(1);
  1751. logid = oracleConn.GetSqlResultToStr("select SEQ_SAP_HEGII_DataLog_ID.Nextval from dual");
  1752. //string msg = "data:" + datebegin.ToString("yyyyMMdd-HHmm") + "~" +
  1753. // dateend.ToString("yyyyMMdd-HHmm");
  1754. sqlString = "insert into tsap_hegii_datalog\n" +
  1755. " (LogID\n" +
  1756. " ,LogType\n" +
  1757. " ,BeginTime\n" +
  1758. " ,YYYYMMDD\n" +
  1759. " ,WorkCode\n" +
  1760. " ,DataCode\n" +
  1761. " ,DataStuts\n" +
  1762. " ,DataMSG\n" +
  1763. " ,CreateUserID\n" +
  1764. " ,DataLogID)\n" +
  1765. "values\n" +
  1766. " (:LogID\n" +
  1767. " ,'2'\n" +
  1768. " ,sysdate\n" +
  1769. " ,:YYYYMMDD\n" +
  1770. " ,:WorkCode\n" +
  1771. " ,:DataCode\n" +
  1772. " ,:DataStuts\n" +
  1773. " ,:DataMSG\n" +
  1774. " ,:CreateUserID\n" +
  1775. " ,:DataLogID)";
  1776. int r = 0;
  1777. if (string.IsNullOrEmpty(datalogid))
  1778. {
  1779. oracleParameter = new OracleParameter[]
  1780. {
  1781. new OracleParameter(":LogID",OracleDbType.Int32, logid, ParameterDirection.Input),
  1782. new OracleParameter(":CreateUserID",OracleDbType.Int32, userid, ParameterDirection.Input),
  1783. new OracleParameter(":YYYYMMDD",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  1784. new OracleParameter(":WorkCode",OracleDbType.Varchar2, workcode, ParameterDirection.Input),
  1785. new OracleParameter(":DataCode",OracleDbType.Varchar2, "6002", ParameterDirection.Input),
  1786. new OracleParameter(":DataMSG",OracleDbType.Varchar2, msg + "DKMES-ERROR:NO DATA " , ParameterDirection.Input),
  1787. new OracleParameter(":DataStuts",OracleDbType.Varchar2, "E", ParameterDirection.Input),
  1788. new OracleParameter(":DataLogID",OracleDbType.Int32, 0, ParameterDirection.Input),
  1789. };
  1790. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  1791. oracleConn.Commit();
  1792. sre.Status = Constant.ServiceResultStatus.Other;
  1793. sre.Message = "没有同步数据";
  1794. sre.Result = "E";
  1795. return sre;
  1796. }
  1797. oracleParameter = new OracleParameter[]
  1798. {
  1799. new OracleParameter(":LogID",OracleDbType.Int32, logid, ParameterDirection.Input),
  1800. new OracleParameter(":CreateUserID",OracleDbType.Int32, userid, ParameterDirection.Input),
  1801. new OracleParameter(":YYYYMMDD",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  1802. new OracleParameter(":WorkCode",OracleDbType.Varchar2, workcode, ParameterDirection.Input),
  1803. new OracleParameter(":DataCode",OracleDbType.Varchar2, "6002", ParameterDirection.Input),
  1804. new OracleParameter(":DataMSG",OracleDbType.Varchar2, msg, ParameterDirection.Input),
  1805. new OracleParameter(":DataStuts",OracleDbType.Varchar2, "S", ParameterDirection.Input),
  1806. new OracleParameter(":DataLogID",OracleDbType.Int32, datalogid, ParameterDirection.Input),
  1807. };
  1808. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  1809. sqlString =
  1810. "select fp.yyyymmdd\n" +
  1811. " ,fp.workcode\n" +
  1812. " ,fp.barcode\n" +
  1813. " ,fp.outcode\n" +
  1814. " ,fp.goodscode\n" +
  1815. " ,fp.sapcode\n" +
  1816. " ,fp.sapflbatchno\n" +
  1817. " ,fp.sapfhundoflag\n" +
  1818. " ,fp.ordercode\n" +
  1819. " ,fp.orderitem\n" +
  1820. //" from tsap_hegii_finishedproduct fp where fp.logid = :datalogid and (ZTYPE is null or ZTYPE <> 'S')\n" +
  1821. " from tsap_hegii_finishedproduct fp where fp.logid = :datalogid and (ZTYPE is null)\n" +
  1822. " order by fp.sapflbatchno, fp.barcode";
  1823. oracleParameter = new OracleParameter[]
  1824. {
  1825. new OracleParameter(":datalogid",OracleDbType.Int32, datalogid, ParameterDirection.Input),
  1826. };
  1827. DataTable fpData = oracleConn.GetSqlResultToDt(sqlString, oracleParameter);
  1828. // 单次传输最大条数
  1829. int maxCount = 100000;
  1830. List<Zppfm010> sapParameterList = new List<Zppfm010>();
  1831. if (fpData != null && fpData.Rows.Count > 0)
  1832. {
  1833. int index = 0;
  1834. //Zppfm010 sapParameter = new Zppfm010();
  1835. //sapParameter.Zsum = maxCount;
  1836. //sapParameter.TableIn = new Zspp110[sapParameter.Zsum];
  1837. List<ZSPP110> tableInList = new List<ZSPP110>();
  1838. foreach (DataRow item in fpData.Rows)
  1839. {
  1840. if (index >= maxCount)
  1841. {
  1842. Zppfm010 sapItem = new Zppfm010();
  1843. sapItem.ZSUM = tableInList.Count;
  1844. sapItem.TABLE_IN = tableInList.ToArray();
  1845. sapParameterList.Add(sapItem);
  1846. index = 0;
  1847. tableInList.Clear();
  1848. }
  1849. ZSPP110 info110 = new ZSPP110();
  1850. // 时间戳
  1851. info110.ZSCNU = yyyymmdd;
  1852. // 工厂
  1853. info110.WERKS = workcode;
  1854. // 生产条码
  1855. info110.ZSCTM = item["barcode"].ToString();
  1856. // 包装条码
  1857. info110.ZBZTM = item["outcode"].ToString();
  1858. // 产品编码
  1859. info110.ZCPBM = item["goodscode"].ToString();
  1860. // 物料编号
  1861. info110.MATNR = item["sapcode"].ToString();
  1862. // 包装整板标识
  1863. info110.ZBZBS = item["sapflbatchno"].ToString();
  1864. // 重新绑定标识
  1865. info110.ZCXBD = item["sapfhundoflag"].ToString();
  1866. // 销售凭证
  1867. info110.KDAUF = item["ordercode"].ToString();
  1868. // 销售凭证项目
  1869. info110.KDPOS = item["orderitem"].ToString();
  1870. info110.ZCODEN = "";
  1871. info110.ZCODEYZM = "";
  1872. tableInList.Add(info110);
  1873. index++;
  1874. }
  1875. Zppfm010 sapParameter = new Zppfm010();
  1876. sapParameter.ZSUM = tableInList.Count;
  1877. sapParameter.TABLE_IN = tableInList.ToArray();
  1878. sapParameterList.Add(sapParameter);
  1879. index = 0;
  1880. tableInList.Clear();
  1881. }
  1882. else
  1883. {
  1884. Zppfm010 sapParameter = new Zppfm010();
  1885. sapParameter.ZSUM = 0;
  1886. sapParameter.TABLE_IN = new ZSPP110[sapParameter.ZSUM];
  1887. sapParameterList.Add(sapParameter);
  1888. }
  1889. foreach (Zppfm010 sapParameter in sapParameterList)
  1890. {
  1891. ZPPFM010Response result = HGSAPDK_ZPPFM010(sapParameter, yyyymmdd);
  1892. //sre.Message = result.ZMSG;
  1893. sre.Message = $"{result.ZMSG}({sapParameter.ZSUM})";
  1894. sre.Result = result.ZTYPE;
  1895. sqlString = "update tsap_hegii_datalog t set t.EndTime = sysdate, DataStuts = :DataStuts, DataMSG =DataMSG||:msg where logid = :logid";
  1896. oracleParameter = new OracleParameter[]
  1897. {
  1898. new OracleParameter(":DataStuts",OracleDbType.Varchar2, result.ZTYPE, ParameterDirection.Input),
  1899. //new OracleParameter(":msg",OracleDbType.Varchar2, result.ZMSG, ParameterDirection.Input),
  1900. new OracleParameter(":msg",OracleDbType.Varchar2, sre.Message, ParameterDirection.Input),
  1901. new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  1902. };
  1903. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  1904. if (result.TABLE_OUT != null && result.TABLE_OUT.Length > 0)
  1905. {
  1906. sqlString = "update tsap_hegii_finishedproduct t set t.ZTime =sysdate, ZTYPE = nvl(:ZTYPE,'S'), ZMSG = :ZMSG where logid = " + datalogid +
  1907. " \n and YYYYMMDD='" + yyyymmdd + "' and WorkCode='" + workcode + "' and barcode=:barcode and sapflbatchno=:sapflbatchno";
  1908. foreach (ZSPP110 item in result.TABLE_OUT)
  1909. {
  1910. oracleParameter = new OracleParameter[]
  1911. {
  1912. new OracleParameter(":ZTYPE",OracleDbType.Varchar2, item.ZTYPE, ParameterDirection.Input),
  1913. new OracleParameter(":ZMSG",OracleDbType.Varchar2, item.ZMSG, ParameterDirection.Input),
  1914. new OracleParameter(":barcode",OracleDbType.Varchar2, item.ZSCTM, ParameterDirection.Input),
  1915. new OracleParameter(":sapflbatchno",OracleDbType.Varchar2, item.ZBZBS, ParameterDirection.Input),
  1916. };
  1917. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  1918. }
  1919. }
  1920. if (result.ZTYPE != "S")
  1921. {
  1922. oracleConn.Commit();
  1923. //sre.Message = result.Zmsg;
  1924. //sre.Result = result.Ztype;
  1925. return sre;
  1926. }
  1927. }
  1928. //if (result.Ztype == "S")
  1929. {
  1930. sqlString = "update tsap_hegii_datalog t set t.createuserid = :userid where logid = :datalogid";
  1931. oracleParameter = new OracleParameter[]
  1932. {
  1933. new OracleParameter(":datalogid",OracleDbType.Int32, datalogid, ParameterDirection.Input),
  1934. new OracleParameter(":userid",OracleDbType.Int32, userid, ParameterDirection.Input),
  1935. };
  1936. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  1937. }
  1938. oracleConn.Commit();
  1939. //sre.Message = result.Zmsg;
  1940. //sre.Result = result.Ztype;
  1941. return sre;
  1942. }
  1943. catch (Exception ex)
  1944. {
  1945. throw ex;
  1946. }
  1947. finally
  1948. {
  1949. if (oracleConn != null &&
  1950. oracleConn.ConnState == ConnectionState.Open)
  1951. {
  1952. oracleConn.Disconnect();
  1953. }
  1954. }
  1955. }
  1956. /// <summary>
  1957. /// 产量接口
  1958. /// </summary>
  1959. /// <param name="sapParameter"></param>
  1960. /// <returns></returns>
  1961. public static ZPPFM008Response HGSAPDK_ZPPFM008(Zppfm008 sapParameter, string yyyymmdd, string datacode, string SPANAME = "")
  1962. {
  1963. ZPPFM008Response sapResult = null;
  1964. try
  1965. {
  1966. using (ZPPFM008Client sapClient = new ZPPFM008Client("ZPPFM008_BIND" + SPANAME))
  1967. {
  1968. // 登录
  1969. UserNamePasswordClientCredential credential =
  1970. sapClient.ClientCredentials.UserName;
  1971. //credential.UserName = "hgsapdk";
  1972. //credential.Password = "Sapdk#240";
  1973. INIUtility ini = INIUtility.Instance(INIUtility.IniFile.SAP_HEGII);
  1974. credential.UserName = ini.ReadIniData("SAP_HEGII", "UserName");
  1975. credential.Password = ini.ReadIniData("SAP_HEGII", "Password");
  1976. // 参数
  1977. sapParameter.ZSUMSpecified = true;
  1978. sapParameter.TABLE_OUT = new ZSPP100[0];
  1979. // 接口
  1980. sapResult = sapClient.ZPPFM008(sapParameter);
  1981. if (sapResult.ZTYPE == "S")
  1982. {
  1983. // 结果
  1984. OutputLog.TraceLog(LogPriority.Information,
  1985. "HGSAPDK_ZPPFM008",
  1986. "yyyymmdd:" + yyyymmdd + " datacode:" + datacode + " Zsum:" + sapParameter.ZSUM,
  1987. " Ztype:" + sapResult.ZTYPE + " Zmsg:" + sapResult.ZMSG,
  1988. LocalPath.LogExePath + "SAP_HEGII\\Info_");
  1989. }
  1990. else
  1991. {
  1992. foreach (ZSPP100 item in sapResult.TABLE_OUT)
  1993. {
  1994. if (!string.IsNullOrWhiteSpace(item.ZMSG))
  1995. {
  1996. sapResult.ZMSG += $"[{item.ZMSG}]";
  1997. break;
  1998. }
  1999. }
  2000. // 结果
  2001. OutputLog.TraceLog(LogPriority.Information,
  2002. "HGSAPDK_ZPPFM008",
  2003. "yyyymmdd:" + yyyymmdd + " datacode:" + datacode + " Zsum:" + sapParameter.ZSUM + " Ztype:" + sapResult.ZTYPE + " Zmsg:" + sapResult.ZMSG,
  2004. JsonHelper.ToJson(sapResult),
  2005. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  2006. }
  2007. }
  2008. }
  2009. catch (Exception ex)
  2010. {
  2011. sapResult = new ZPPFM008Response();
  2012. sapResult.ZTYPE = "E";
  2013. sapResult.ZMSG = ex.Message;
  2014. //if (ex is System.ServiceModel.FaultException)
  2015. //{
  2016. // sapResult.ZMSG = ex.Message;
  2017. //}
  2018. //else
  2019. //{
  2020. // sapResult.ZMSG = "DKMES-ERROR:" + Guid.NewGuid();
  2021. //}
  2022. OutputLog.TraceLog(LogPriority.Error,
  2023. "HGSAPDK_ZPPFM008",
  2024. sapResult.ZMSG,
  2025. ex.ToString(),
  2026. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  2027. }
  2028. return sapResult;
  2029. }
  2030. /// <summary>
  2031. /// 成品明细(条码接口)
  2032. /// </summary>
  2033. /// <param name="user"></param>
  2034. public static ZPPFM010Response HGSAPDK_ZPPFM010(Zppfm010 sapParameter, string yyyymmdd, string SPANAME = "")
  2035. {
  2036. ZPPFM010Response sapResult = null;
  2037. try
  2038. {
  2039. using (ZPPFM010Client sapClient = new ZPPFM010Client("ZPPFM010_BIND" + SPANAME))
  2040. {
  2041. // 登录
  2042. UserNamePasswordClientCredential credential =
  2043. sapClient.ClientCredentials.UserName;
  2044. //credential.UserName = "hgsapdk";
  2045. //credential.Password = "Sapdk#240";
  2046. INIUtility ini = INIUtility.Instance(INIUtility.IniFile.SAP_HEGII);
  2047. credential.UserName = ini.ReadIniData("SAP_HEGII", "UserName");
  2048. credential.Password = ini.ReadIniData("SAP_HEGII", "Password");
  2049. // 参数
  2050. sapParameter.ZSUMSpecified = true;
  2051. sapParameter.TABLE_OUT = new ZSPP110[0];
  2052. // 接口
  2053. sapResult = sapClient.ZPPFM010(sapParameter);
  2054. if (sapResult.ZTYPE == "S")
  2055. {
  2056. // 结果
  2057. OutputLog.TraceLog(LogPriority.Information,
  2058. "HGSAPDK_ZPPFM010",
  2059. "yyyymmdd:" + yyyymmdd + " Zsum:" + sapParameter.ZSUM,
  2060. " Ztype:" + sapResult.ZTYPE + " Zmsg:" + sapResult.ZMSG,
  2061. LocalPath.LogExePath + "SAP_HEGII\\Info_");
  2062. }
  2063. else
  2064. {
  2065. foreach (ZSPP110 item in sapResult.TABLE_OUT)
  2066. {
  2067. if (!string.IsNullOrWhiteSpace(item.ZMSG))
  2068. {
  2069. sapResult.ZMSG += $"[{item.ZMSG}]";
  2070. break;
  2071. }
  2072. }
  2073. // 结果
  2074. OutputLog.TraceLog(LogPriority.Information,
  2075. "HGSAPDK_ZPPFM010",
  2076. "yyyymmdd:" + yyyymmdd + " Zsum:" + sapParameter.ZSUM + " Ztype:" + sapResult.ZTYPE + " Zmsg:" + sapResult.ZMSG,
  2077. JsonHelper.ToJson(sapResult),
  2078. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  2079. }
  2080. }
  2081. }
  2082. catch (Exception ex)
  2083. {
  2084. sapResult = new ZPPFM010Response();
  2085. sapResult.ZTYPE = "E";
  2086. sapResult.ZMSG = ex.Message;
  2087. //if (ex is System.ServiceModel.FaultException)
  2088. //{
  2089. // sapResult.ZMSG = ex.Message;
  2090. //}
  2091. //else
  2092. //{
  2093. // sapResult.ZMSG = "DKMES-ERROR:" + Guid.NewGuid();
  2094. //}
  2095. OutputLog.TraceLog(LogPriority.Error,
  2096. "HGSAPDK_ZPPFM010",
  2097. sapResult.ZMSG,
  2098. ex.ToString(),
  2099. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  2100. }
  2101. return sapResult;
  2102. }
  2103. #region 测试240
  2104. /// <summary>
  2105. /// 同步成品条码(手动)-测试
  2106. /// </summary>
  2107. /// <param name="date"></param>
  2108. /// <param name="userid"></param>
  2109. /// <returns></returns>
  2110. public static ServiceResultEntity SetFP60_240(DateTime date, int userid)
  2111. {
  2112. /*
  2113. Zppfm008 sapParameter1 = new Zppfm008();
  2114. sapParameter1.Zsum = 0;
  2115. sapParameter1.TableIn = new Zspp100[0];
  2116. Zppfm010 sapParameter2 = new Zppfm010();
  2117. sapParameter2.ZSUM = 30;
  2118. sapParameter2.TABLE_IN = new ZSPP110[30];
  2119. for (int i = 0; i < 10; i++)
  2120. {
  2121. ZSPP110 info110 = new ZSPP110();
  2122. // 时间戳
  2123. info110.ZSCNU = "20170101";
  2124. // 工厂
  2125. info110.WERKS = "5020";
  2126. // 生产条码
  2127. info110.ZSCTM = "20170101" + i.ToString().PadLeft(3, '0');
  2128. // 包装条码
  2129. info110.ZBZTM = "CT127PD2110B0150" + info110.ZSCTM + "1";
  2130. // 产品编码
  2131. info110.ZCPBM = "H0112L";
  2132. // 物料编号
  2133. info110.MATNR = "CT127PD2110B01";
  2134. // 包装整板标识
  2135. info110.ZBZBS = "1-1-1";
  2136. // 重新绑定标识
  2137. info110.ZCXBD = "X";
  2138. // 销售凭证
  2139. info110.KDAUF = "1200032630";
  2140. // 销售凭证项目
  2141. info110.KDPOS = "10";
  2142. sapParameter2.TABLE_IN[i] = info110;
  2143. }
  2144. for (int i = 10; i < 20; i++)
  2145. {
  2146. ZSPP110 info110 = new ZSPP110();
  2147. // 时间戳
  2148. info110.ZSCNU = "20170101";
  2149. // 工厂
  2150. info110.WERKS = "5020";
  2151. // 生产条码
  2152. info110.ZSCTM = "20170101" + i.ToString().PadLeft(3, '0');
  2153. // 包装条码
  2154. info110.ZBZTM = "CT127PD2110B0150" + info110.ZSCTM + "1";
  2155. // 产品编码
  2156. info110.ZCPBM = "H0112L";
  2157. // 物料编号
  2158. info110.MATNR = "CT127PD2110B01";
  2159. // 包装整板标识
  2160. info110.ZBZBS = "1-1-1";
  2161. // 重新绑定标识
  2162. info110.ZCXBD = "";
  2163. // 销售凭证
  2164. info110.KDAUF = "1200030151";
  2165. // 销售凭证项目
  2166. info110.KDPOS = "10";
  2167. sapParameter2.TABLE_IN[i] = info110;
  2168. }
  2169. for (int i = 20; i < 30; i++)
  2170. {
  2171. ZSPP110 info110 = new ZSPP110();
  2172. // 时间戳
  2173. info110.ZSCNU = "20170101";
  2174. // 工厂
  2175. info110.WERKS = "5020";
  2176. // 生产条码
  2177. info110.ZSCTM = "20170101" + i.ToString().PadLeft(3, '0');
  2178. // 包装条码
  2179. info110.ZBZTM = "CT967ES2210N0150" + info110.ZSCTM + "1";
  2180. // 产品编码
  2181. info110.ZCPBM = "H0112L";
  2182. // 物料编号
  2183. info110.MATNR = "CT967ES2210N01";
  2184. // 包装整板标识
  2185. info110.ZBZBS = "1-1-1";
  2186. // 重新绑定标识
  2187. info110.ZCXBD = "";
  2188. // 销售凭证
  2189. info110.KDAUF = "1200032678";
  2190. // 销售凭证项目
  2191. info110.KDPOS = "10";
  2192. sapParameter2.TABLE_IN[i] = info110;
  2193. }
  2194. */
  2195. //HGSAPDK_ZPPFM008(sapParameter1, date.ToString("yyyyMMdd"), "800");
  2196. //HGSAPDK_ZPPFM008_240(sapParameter1, date.ToString("yyyyMMdd"), "240");
  2197. //HGSAPDK_ZPPFM010(sapParameter2, date.ToString("yyyyMMdd"));
  2198. //ZPPFM010Response result1 = HGSAPDK_ZPPFM010_240(sapParameter2, date.ToString("yyyyMMdd"));
  2199. //foreach (ZSPP110 item in result1.TABLE_OUT)
  2200. //{
  2201. // if (item.ZTYPE != "S" && !string.IsNullOrWhiteSpace(item.ZMSG))
  2202. // {
  2203. // OutputLog.TraceLog(LogPriority.Information,
  2204. // "HGSAPDK_ZPPFM010_240", JsonHelper.ToJson(item),
  2205. // "Ztype:" + item.ZTYPE + " Zmsg:" + item.ZMSG,
  2206. // LocalPath.LogExePath + "SAP_HEGII\\Info_");
  2207. // }
  2208. //}
  2209. //return new ServiceResultEntity();
  2210. IDBTransaction oracleConn = ClsDbFactory.CreateDBTransaction(DataBaseType.ORACLE, DataManager.ConnectionString);
  2211. ServiceResultEntity sre = new ServiceResultEntity();
  2212. date = new DateTime(2021, 12, 8);
  2213. DateTime dateend = date;
  2214. INIUtility ini = INIUtility.Instance(INIUtility.IniFile.Config);
  2215. string EndDate6001 = ini.ReadIniData("SAP_HEGII", "EndDate6001");
  2216. DateTime end = DateTime.Now.Date.AddDays(-1);
  2217. if (!string.IsNullOrWhiteSpace(EndDate6001))
  2218. {
  2219. end = DateTime.ParseExact(EndDate6001, "yyyy-MM-dd", null);
  2220. }
  2221. try
  2222. {
  2223. //string sqlString =
  2224. // "select fp.yyyymmdd\n" +
  2225. // " ,fp.workcode\n" +
  2226. // " ,fp.barcode\n" +
  2227. // " ,fp.outcode\n" +
  2228. // " ,fp.goodscode\n" +
  2229. // " ,fp.sapcode\n" +
  2230. // " ,fp.sapflbatchno\n" +
  2231. // " ,fp.sapfhundoflag\n" +
  2232. // " from tsap_hegii_finishedproduct fp where fp.logid = :datalogid";
  2233. string sqlString = "select to_char(fp.fhtime, 'yyyymmdd') yyyymmdd\n" +
  2234. " ,aa.workcode workcode\n" +
  2235. " ,fp.barcode\n" +
  2236. " ,case when length(gdd.onlycode) = 7 then gdd.materialcode || 'FF' || gdd.onlycode else nvl(gdd.outlabelcode\n" +
  2237. " ,(gdd.materialcode || aa.workcode || gdd.onlycode)) end outcode\n" +
  2238. " ,gdd.goodscode\n" +
  2239. " ,nvl(gdd.materialcode, nvl(g.materialcode, g.goodscode)) sapcode\n" +
  2240. " ,nvl(fp.finishedloadbatchno, fp.fhbatchno) sapflbatchno\n" +
  2241. " ,' ' sapfhundoflag\n" +
  2242. " ,gdd.securitycode\n" +
  2243. " from tp_pm_finishedproduct fp\n" +
  2244. " inner join tp_pm_groutingdailydetail gdd\n" +
  2245. " on gdd.barcode = fp.barcode\n" +
  2246. " inner join tp_mst_goods g\n" +
  2247. " on g.goodsid = gdd.goodsid\n" +
  2248. " inner join tp_mst_account aa\n" +
  2249. " on aa.accountid = gdd.accountid\n" +
  2250. " where fp.fhtime >= :v_datebegin\n" +
  2251. " and fp.fhtime < :v_dateend\n" +
  2252. " and gdd.securitycode is not null\n" +
  2253. " and rownum < 101\n" +
  2254. " order by fp.fhtime,fp.barcode";
  2255. while (date <= end)
  2256. {
  2257. dateend = date.AddDays(1);
  2258. OracleParameter[] oracleParameter = new OracleParameter[]
  2259. {
  2260. new OracleParameter(":v_datebegin",OracleDbType.Date, date, ParameterDirection.Input),
  2261. new OracleParameter(":v_dateend",OracleDbType.Date, dateend, ParameterDirection.Input),
  2262. };
  2263. DataTable fpData = oracleConn.GetSqlResultToDt(sqlString, oracleParameter);
  2264. // 单次传输最大条数
  2265. int maxCount = 10000;
  2266. List<Zppfm010> sapParameterList = new List<Zppfm010>();
  2267. if (fpData != null && fpData.Rows.Count > 0)
  2268. {
  2269. int index = 0;
  2270. List<ZSPP110> tableInList = new List<ZSPP110>();
  2271. foreach (DataRow item in fpData.Rows)
  2272. {
  2273. if (index >= maxCount)
  2274. {
  2275. Zppfm010 sapItem = new Zppfm010();
  2276. sapItem.ZSUM = tableInList.Count;
  2277. sapItem.TABLE_IN = tableInList.ToArray();
  2278. sapParameterList.Add(sapItem);
  2279. index = 0;
  2280. tableInList.Clear();
  2281. }
  2282. ZSPP110 info110 = new ZSPP110();
  2283. // 时间戳
  2284. info110.ZSCNU = item["yyyymmdd"].ToString();
  2285. // 工厂
  2286. info110.WERKS = item["workcode"].ToString();
  2287. // 生产条码
  2288. info110.ZSCTM = item["barcode"].ToString();
  2289. // 包装条码
  2290. info110.ZBZTM = item["outcode"].ToString();
  2291. //生产防伪码 xuwei add 2021-12-09
  2292. info110.SECURITYCODE = item["securitycode"].ToString();
  2293. // 产品编码
  2294. info110.ZCPBM = item["goodscode"].ToString();
  2295. // 物料编号
  2296. info110.MATNR = item["sapcode"].ToString();
  2297. // 包装整板标识
  2298. info110.ZBZBS = item["sapflbatchno"].ToString();
  2299. // 重新绑定标识
  2300. info110.ZCXBD = item["sapfhundoflag"].ToString();
  2301. if (info110.WERKS == "5011" && info110.ZCPBM == "K047L")
  2302. {
  2303. continue;
  2304. }
  2305. tableInList.Add(info110);
  2306. index++;
  2307. }
  2308. Zppfm010 sapParameter = new Zppfm010();
  2309. sapParameter.ZSUM = tableInList.Count;
  2310. sapParameter.TABLE_IN = tableInList.ToArray();
  2311. sapParameterList.Add(sapParameter);
  2312. index = 0;
  2313. tableInList.Clear();
  2314. }
  2315. else
  2316. {
  2317. Zppfm010 sapParameter = new Zppfm010();
  2318. sapParameter.ZSUM = 0;
  2319. sapParameter.TABLE_IN = new ZSPP110[sapParameter.ZSUM];
  2320. sapParameterList.Add(sapParameter);
  2321. }
  2322. int indexP = 0;
  2323. int ccc = sapParameterList.Count;
  2324. foreach (Zppfm010 sapParameter in sapParameterList)
  2325. //for (int i = 80; i < ccc; i++)
  2326. {
  2327. //Zppfm010 sapParameter = sapParameterList[i];
  2328. ZPPFM010Response result = HGSAPDK_ZPPFM010_240(sapParameter, date.ToString("yyyyMMdd") + " " + (++indexP) + "/" + ccc);
  2329. //Zppfm010Response result = HGSAPDK_ZPPFM010(sapParameter, "2018 " + (i) + "/" + ccc);
  2330. sre.Message = result.ZMSG;
  2331. sre.Result = result.ZTYPE;
  2332. if (result.ZTYPE != "S")
  2333. {
  2334. foreach (ZSPP110 item in result.TABLE_OUT)
  2335. {
  2336. if (item.ZTYPE != "S" && !string.IsNullOrWhiteSpace(item.ZMSG))
  2337. {
  2338. OutputLog.TraceLog(LogPriority.Information,
  2339. "HGSAPDK_ZPPFM010", JsonHelper.ToJson(item),
  2340. "Ztype:" + item.ZTYPE + " Zmsg:" + item.ZMSG,
  2341. LocalPath.LogExePath + "SAP_HEGII\\Info_");
  2342. }
  2343. }
  2344. return sre;
  2345. }
  2346. }
  2347. date = dateend;
  2348. }
  2349. oracleConn.Commit();
  2350. //sre.Message = result.Zmsg;
  2351. //sre.Result = result.Ztype;
  2352. return sre;
  2353. }
  2354. catch (Exception ex)
  2355. {
  2356. throw ex;
  2357. }
  2358. finally
  2359. {
  2360. if (oracleConn != null &&
  2361. oracleConn.ConnState == ConnectionState.Open)
  2362. {
  2363. oracleConn.Disconnect();
  2364. }
  2365. }
  2366. }
  2367. /// <summary>
  2368. /// 产量接口-测试
  2369. /// </summary>
  2370. /// <param name="sapParameter"></param>
  2371. /// <returns></returns>
  2372. public static ZPPFM008Response HGSAPDK_ZPPFM008_240(Zppfm008 sapParameter, string yyyymmdd, string datacode, string SPANAME = "")
  2373. {
  2374. ZPPFM008Response sapResult = null;
  2375. try
  2376. {
  2377. using (ZPPFM008Client sapClient = new ZPPFM008Client("ZPPFM008_BIND_240" + SPANAME))
  2378. {
  2379. // 登录
  2380. UserNamePasswordClientCredential credential =
  2381. sapClient.ClientCredentials.UserName;
  2382. credential.UserName = "hgsapdk";
  2383. credential.Password = "Sapdk#240";
  2384. // 参数
  2385. sapParameter.ZSUMSpecified = true;
  2386. sapParameter.TABLE_OUT = new ZSPP100[0];
  2387. // 接口
  2388. sapResult = sapClient.ZPPFM008(sapParameter);
  2389. // 结果
  2390. OutputLog.TraceLog(LogPriority.Information,
  2391. "HGSAPDK_ZPPFM008_240",
  2392. "yyyymmdd:" + yyyymmdd + " datacode:" + datacode + " Zsum:" + sapParameter.ZSUM,
  2393. "Ztype:" + sapResult.ZTYPE + " Zmsg:" + sapResult.ZMSG,
  2394. LocalPath.LogExePath + "SAP_HEGII\\Info_");
  2395. }
  2396. }
  2397. catch (Exception ex)
  2398. {
  2399. sapResult = new ZPPFM008Response();
  2400. sapResult.ZTYPE = "E";
  2401. if (ex is System.ServiceModel.FaultException)
  2402. {
  2403. sapResult.ZMSG = ex.Message;
  2404. }
  2405. else
  2406. {
  2407. sapResult.ZMSG = "DKMES-ERROR:" + Guid.NewGuid();
  2408. }
  2409. OutputLog.TraceLog(LogPriority.Error,
  2410. "HGSAPDK_ZPPFM008_240",
  2411. sapResult.ZMSG,
  2412. ex.ToString(),
  2413. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  2414. }
  2415. return sapResult;
  2416. }
  2417. /// <summary>
  2418. /// 成品明细(条码接口)-测试
  2419. /// </summary>
  2420. /// <param name="user"></param>
  2421. public static ZPPFM010Response HGSAPDK_ZPPFM010_240(Zppfm010 sapParameter, string yyyymmdd, string SPANAME = "")
  2422. {
  2423. ZPPFM010Response sapResult = null;
  2424. try
  2425. {
  2426. using (ZPPFM010Client sapClient = new ZPPFM010Client("ZPPFM010_BIND_240" + SPANAME))
  2427. {
  2428. // 登录
  2429. UserNamePasswordClientCredential credential =
  2430. sapClient.ClientCredentials.UserName;
  2431. credential.UserName = "hgsapdk";
  2432. credential.Password = "Sapdk#240";
  2433. // 参数
  2434. sapParameter.ZSUMSpecified = true;
  2435. sapParameter.TABLE_OUT = new ZSPP110[0];
  2436. // 接口
  2437. sapResult = sapClient.ZPPFM010(sapParameter);
  2438. // 结果
  2439. OutputLog.TraceLog(LogPriority.Information,
  2440. "HGSAPDK_ZPPFM010_240",
  2441. "yyyymmdd:" + yyyymmdd + " Zsum:" + sapParameter.ZSUM,
  2442. "Ztype:" + sapResult.ZTYPE + " Zmsg:" + sapResult.ZMSG,
  2443. LocalPath.LogExePath + "SAP_HEGII\\Info_");
  2444. }
  2445. }
  2446. catch (Exception ex)
  2447. {
  2448. sapResult = new ZPPFM010Response();
  2449. sapResult.ZTYPE = "E";
  2450. if (ex is System.ServiceModel.FaultException)
  2451. {
  2452. sapResult.ZMSG = ex.Message;
  2453. }
  2454. else
  2455. {
  2456. sapResult.ZMSG = "DKMES-ERROR:" + Guid.NewGuid();
  2457. }
  2458. OutputLog.TraceLog(LogPriority.Error,
  2459. "HGSAPDK_ZPPFM010_240",
  2460. sapResult.ZMSG,
  2461. ex.ToString(),
  2462. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  2463. }
  2464. return sapResult;
  2465. }
  2466. #endregion
  2467. #region 测试800
  2468. /// <summary>
  2469. /// 同步成品条码(手动)-测试
  2470. /// </summary>
  2471. /// <param name="date"></param>
  2472. /// <param name="userid"></param>
  2473. /// <returns></returns>
  2474. public static ServiceResultEntity SetFP60_800(DateTime date, int userid)
  2475. {
  2476. IDBTransaction oracleConn = ClsDbFactory.CreateDBTransaction(DataBaseType.ORACLE, DataManager.ConnectionString);
  2477. ServiceResultEntity sre = new ServiceResultEntity();
  2478. date = new DateTime(2018, 7, 1);
  2479. DateTime dateend = date;
  2480. //INIUtility ini = INIUtility.Instance(INIUtility.IniFile.Config);
  2481. //string EndDate6001 = ini.ReadIniData("SAP_HEGII", "EndDate6001");
  2482. DateTime end = new DateTime(2018, 12, 10);
  2483. //if (!string.IsNullOrWhiteSpace(EndDate6001))
  2484. //{
  2485. // end = DateTime.ParseExact(EndDate6001, "yyyy-MM-dd", null);
  2486. //}
  2487. try
  2488. {
  2489. string sqlString =
  2490. //"INSERT INTO tsap_hegii_finishedproduct\n" +
  2491. //" (yyyymmdd\n" +
  2492. //" ,workcode\n" +
  2493. //" ,barcode\n" +
  2494. //" ,outcode\n" +
  2495. //" ,goodscode\n" +
  2496. //" ,sapcode\n" +
  2497. //" ,sapflbatchno\n" +
  2498. //" ,sapfhundoflag\n" +
  2499. //" ,ordercode\n" +
  2500. //" ,orderitem, LOGID)\n" +
  2501. " SELECT :yyyymmdd yyyymmdd\n" +
  2502. " ,:workcode workcode\n" +
  2503. " ,bar.barcode\n" +
  2504. " ,case when length(gdd.onlycode) = 7 then gdd.materialcode || 'FF' || gdd.onlycode else nvl(gdd.outlabelcode\n" +
  2505. " ,(gdd.materialcode || :workcode || gdd.onlycode)) end outcode\n" +
  2506. //" ,nvl(gdd.outlabelcode, (g.materialcode || :workcode || gdd.onlycode)) outcode\n" +
  2507. " ,gdd.goodscode\n" +
  2508. " ,nvl(gdd.materialcode, nvl(g.materialcode, g.goodscode)) sapcode\n" +
  2509. " ,nvl(bar.finishedloadbatchno, bar.fhbatchno) sapflbatchno\n" +
  2510. " ,' ' sapfhundoflag\n" +
  2511. " ,CASE\n" +
  2512. " WHEN o.orderid IS NULL\n" +
  2513. " OR o.orderno LIKE 'HEGII%' THEN\n" +
  2514. " NULL\n" +
  2515. " WHEN instr(o.orderno, '/') = 0 THEN\n" +
  2516. " to_char(o.orderno)\n" +
  2517. " ELSE\n" +
  2518. " to_char(substr(o.orderno, 1, instr(o.orderno, '/') - 1))\n" +
  2519. " END ordercode -- 销售凭证\n" +
  2520. " ,CASE\n" +
  2521. " WHEN o.orderid IS NULL\n" +
  2522. " OR o.orderno LIKE 'HEGII%'\n" +
  2523. " OR instr(o.orderno, '/') = 0 THEN\n" +
  2524. " '0'\n" +
  2525. " WHEN instr(o.orderno, '#') = 0 THEN\n" +
  2526. " to_char(substr(o.orderno, instr(o.orderno, '/') + 1))\n" +
  2527. " ELSE\n" +
  2528. " to_char(substr(o.orderno\n" +
  2529. " ,instr(o.orderno, '/') + 1\n" +
  2530. " ,instr(o.orderno, '#') - instr(o.orderno, '/') - 1))\n" +
  2531. " END orderitem -- 销售凭证项目\n" +
  2532. " ,:LOGID\n" +
  2533. " FROM tp_pm_finishedproduct bar\n" +
  2534. " INNER JOIN tp_pm_groutingdailydetail gdd\n" +
  2535. " ON gdd.barcode = bar.barcode\n" +
  2536. " INNER JOIN tp_mst_goods g\n" +
  2537. " ON g.goodsid = gdd.goodsid\n" +
  2538. " LEFT JOIN tp_pm_order o\n" +
  2539. " ON o.orderid = bar.fhorderid\n" +
  2540. " where bar.fhtime >= :v_datebegin\n" +
  2541. " and bar.fhtime < :v_dateend\n" +
  2542. " and nvl(gdd.materialcode, g.materialcode) in ( 'CT968EN4100B01','CT968EN2100B01')" +
  2543. " order by bar.fhtime,bar.finishedloadbatchno, bar.fhbatchno,bar.barcode";
  2544. //OracleParameter [] oracleParameter = new OracleParameter[]
  2545. //{
  2546. // new OracleParameter(":yyyymmdd", date.ToString("yyyyMMdd")),
  2547. // new OracleParameter(":workcode", "5020"),
  2548. // new OracleParameter(":v_datebegin", date),
  2549. // new OracleParameter(":v_dateend", end),
  2550. // new OracleParameter(":LOGID", 0)
  2551. //};
  2552. //DataTable fhData = oracleConn.GetSqlResultToDt(sqlString, oracleParameter);
  2553. while (date < end)
  2554. {
  2555. dateend = date.AddMonths(1);
  2556. if (dateend > end)
  2557. {
  2558. dateend = end;
  2559. }
  2560. OracleParameter[] oracleParameter = new OracleParameter[]
  2561. {
  2562. new OracleParameter(":yyyymmdd",OracleDbType.Varchar2, date.ToString("yyyyMMdd"), ParameterDirection.Input),
  2563. new OracleParameter(":workcode",OracleDbType.Varchar2, "5020", ParameterDirection.Input),
  2564. new OracleParameter(":LOGID",OracleDbType.Int32, 0, ParameterDirection.Input),
  2565. new OracleParameter(":v_datebegin",OracleDbType.Date, date, ParameterDirection.Input),
  2566. new OracleParameter(":v_dateend",OracleDbType.Date, dateend, ParameterDirection.Input),
  2567. };
  2568. DataTable fpData = oracleConn.GetSqlResultToDt(sqlString, oracleParameter);
  2569. // 单次传输最大条数
  2570. int maxCount = 10000;
  2571. List<Zppfm010> sapParameterList = new List<Zppfm010>();
  2572. if (fpData != null && fpData.Rows.Count > 0)
  2573. {
  2574. int index = 0;
  2575. List<ZSPP110> tableInList = new List<ZSPP110>();
  2576. foreach (DataRow item in fpData.Rows)
  2577. {
  2578. if (index >= maxCount)
  2579. {
  2580. Zppfm010 sapItem = new Zppfm010();
  2581. sapItem.ZSUM = tableInList.Count;
  2582. sapItem.TABLE_IN = tableInList.ToArray();
  2583. sapParameterList.Add(sapItem);
  2584. index = 0;
  2585. tableInList.Clear();
  2586. }
  2587. ZSPP110 info110 = new ZSPP110();
  2588. // 时间戳
  2589. info110.ZSCNU = item["yyyymmdd"].ToString();
  2590. // 工厂
  2591. info110.WERKS = item["workcode"].ToString();
  2592. // 生产条码
  2593. info110.ZSCTM = item["barcode"].ToString();
  2594. // 包装条码
  2595. info110.ZBZTM = item["outcode"].ToString();
  2596. // 产品编码
  2597. info110.ZCPBM = item["goodscode"].ToString();
  2598. // 物料编号
  2599. info110.MATNR = item["sapcode"].ToString();
  2600. // 包装整板标识
  2601. info110.ZBZBS = item["sapflbatchno"].ToString();
  2602. // 重新绑定标识
  2603. info110.ZCXBD = item["sapfhundoflag"].ToString();
  2604. // 销售凭证
  2605. //info110.KDAUF = item["ordercode"].ToString();
  2606. // 销售凭证项目
  2607. info110.KDPOS = "0";//item["orderitem"].ToString();
  2608. info110.UZEIT = "00:00:00";//date.ToString("HH:mm:ss");
  2609. //info110.ZCODEN = "";
  2610. //info110.ZCODEYZM = "";
  2611. tableInList.Add(info110);
  2612. index++;
  2613. }
  2614. Zppfm010 sapParameter = new Zppfm010();
  2615. sapParameter.ZSUM = tableInList.Count;
  2616. sapParameter.TABLE_IN = tableInList.ToArray();
  2617. sapParameterList.Add(sapParameter);
  2618. index = 0;
  2619. tableInList.Clear();
  2620. }
  2621. else
  2622. {
  2623. Zppfm010 sapParameter = new Zppfm010();
  2624. sapParameter.ZSUM = 0;
  2625. sapParameter.TABLE_IN = new ZSPP110[sapParameter.ZSUM];
  2626. sapParameterList.Add(sapParameter);
  2627. }
  2628. int indexP = 0;
  2629. int ccc = sapParameterList.Count;
  2630. foreach (Zppfm010 sapParameter in sapParameterList)
  2631. //for (int i = 80; i < ccc; i++)
  2632. {
  2633. //Zppfm010 sapParameter = sapParameterList[i];
  2634. ZPPFM010Response result = HGSAPDK_ZPPFM010_800(sapParameter, date.ToString("yyyyMMdd") + " " + (++indexP) + "/" + ccc);
  2635. //Zppfm010Response result = HGSAPDK_ZPPFM010(sapParameter, "2018 " + (i) + "/" + ccc);
  2636. sre.Message = result.ZMSG;
  2637. sre.Result = result.ZTYPE;
  2638. if (result.ZTYPE != "S")
  2639. {
  2640. //foreach (ZSPP110 item in result.TABLE_OUT)
  2641. //{
  2642. // if (item.ZTYPE != "S" && !string.IsNullOrWhiteSpace(item.ZMSG))
  2643. // {
  2644. // OutputLog.TraceLog(LogPriority.Information,
  2645. // "HGSAPDK_ZPPFM010", JsonHelper.ToJson(item),
  2646. // "Ztype:" + item.ZTYPE + " Zmsg:" + item.ZMSG,
  2647. // LocalPath.LogExePath + "SAP_HEGII\\Info_");
  2648. // }
  2649. //}
  2650. return sre;
  2651. }
  2652. }
  2653. date = dateend;
  2654. }
  2655. oracleConn.Commit();
  2656. //sre.Message = result.Zmsg;
  2657. //sre.Result = result.Ztype;
  2658. return sre;
  2659. }
  2660. catch (Exception ex)
  2661. {
  2662. throw ex;
  2663. }
  2664. finally
  2665. {
  2666. if (oracleConn != null &&
  2667. oracleConn.ConnState == ConnectionState.Open)
  2668. {
  2669. oracleConn.Disconnect();
  2670. }
  2671. }
  2672. }
  2673. /// <summary>
  2674. /// 产量接口-测试
  2675. /// </summary>
  2676. /// <param name="sapParameter"></param>
  2677. /// <returns></returns>
  2678. private static ZPPFM008Response HGSAPDK_ZPPFM008_800(Zppfm008 sapParameter, string yyyymmdd, string datacode)
  2679. {
  2680. ZPPFM008Response sapResult = null;
  2681. try
  2682. {
  2683. using (ZPPFM008Client sapClient = new ZPPFM008Client("ZPPFM008_BIND_800"))
  2684. {
  2685. // 登录
  2686. UserNamePasswordClientCredential credential =
  2687. sapClient.ClientCredentials.UserName;
  2688. credential.UserName = "hgsapdk";
  2689. credential.Password = "Prddk209";
  2690. // 参数
  2691. sapParameter.ZSUMSpecified = true;
  2692. sapParameter.TABLE_OUT = new ZSPP100[0];
  2693. // 接口
  2694. sapResult = sapClient.ZPPFM008(sapParameter);
  2695. // 结果
  2696. OutputLog.TraceLog(LogPriority.Information,
  2697. "HGSAPDK_ZPPFM008_800",
  2698. "yyyymmdd:" + yyyymmdd + " datacode:" + datacode + " Zsum:" + sapParameter.ZSUM,
  2699. "Ztype:" + sapResult.ZTYPE + " Zmsg:" + sapResult.ZMSG,
  2700. LocalPath.LogExePath + "SAP_HEGII\\Info_");
  2701. }
  2702. }
  2703. catch (Exception ex)
  2704. {
  2705. sapResult = new ZPPFM008Response();
  2706. sapResult.ZTYPE = "E";
  2707. if (ex is System.ServiceModel.FaultException)
  2708. {
  2709. sapResult.ZMSG = ex.Message;
  2710. }
  2711. else
  2712. {
  2713. sapResult.ZMSG = "DKMES-ERROR:" + Guid.NewGuid();
  2714. }
  2715. OutputLog.TraceLog(LogPriority.Error,
  2716. "HGSAPDK_ZPPFM008_800",
  2717. sapResult.ZMSG,
  2718. ex.ToString(),
  2719. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  2720. }
  2721. return sapResult;
  2722. }
  2723. /// <summary>
  2724. /// 成品明细(条码接口)-测试
  2725. /// </summary>
  2726. /// <param name="user"></param>
  2727. private static ZPPFM010Response HGSAPDK_ZPPFM010_800(Zppfm010 sapParameter, string yyyymmdd)
  2728. {
  2729. ZPPFM010Response sapResult = null;
  2730. try
  2731. {
  2732. using (ZPPFM010Client sapClient = new ZPPFM010Client("ZPPFM010_BIND_800"))
  2733. {
  2734. // 登录
  2735. UserNamePasswordClientCredential credential =
  2736. sapClient.ClientCredentials.UserName;
  2737. credential.UserName = "hgsapdk";
  2738. credential.Password = "Prddk209";
  2739. // 参数
  2740. sapParameter.ZSUMSpecified = true;
  2741. sapParameter.TABLE_OUT = new ZSPP110[0];
  2742. // 接口
  2743. sapResult = sapClient.ZPPFM010(sapParameter);
  2744. // 结果
  2745. OutputLog.TraceLog(LogPriority.Information,
  2746. "HGSAPDK_ZPPFM010_800",
  2747. "yyyymmdd:" + yyyymmdd + " Zsum:" + sapParameter.ZSUM,
  2748. "Ztype:" + sapResult.ZTYPE + " Zmsg:" + sapResult.ZMSG,
  2749. LocalPath.LogExePath + "SAP_HEGII\\Info_");
  2750. if (sapResult.ZTYPE == "S")
  2751. {
  2752. // 结果
  2753. //OutputLog.TraceLog(LogPriority.Information,
  2754. // "HGSAPDK_ZPPFM010_800",
  2755. // "yyyymmdd:" + yyyymmdd + " Zsum:" + sapParameter.ZSUM,
  2756. // " Ztype:" + sapResult.ZTYPE + " Zmsg:" + sapResult.ZMSG,
  2757. // LocalPath.LogExePath + "SAP_HEGII\\Info_");
  2758. }
  2759. else
  2760. {
  2761. // 结果
  2762. OutputLog.TraceLog(LogPriority.Information,
  2763. "HGSAPDK_ZPPFM010_800",
  2764. "yyyymmdd:" + yyyymmdd + " Zsum:" + sapParameter.ZSUM + " Ztype:" + sapResult.ZTYPE + " Zmsg:" + sapResult.ZMSG,
  2765. JsonHelper.ToJson(sapResult),
  2766. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  2767. }
  2768. }
  2769. }
  2770. catch (Exception ex)
  2771. {
  2772. sapResult = new ZPPFM010Response();
  2773. sapResult.ZTYPE = "E";
  2774. if (ex is System.ServiceModel.FaultException)
  2775. {
  2776. sapResult.ZMSG = ex.Message;
  2777. }
  2778. else
  2779. {
  2780. sapResult.ZMSG = "DKMES-ERROR:" + Guid.NewGuid();
  2781. }
  2782. OutputLog.TraceLog(LogPriority.Error,
  2783. "HGSAPDK_ZPPFM010_800",
  2784. sapResult.ZMSG,
  2785. ex.ToString(),
  2786. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  2787. }
  2788. return sapResult;
  2789. }
  2790. /// <summary>
  2791. /// 产量接口
  2792. /// </summary>
  2793. /// <param name="sapParameter"></param>
  2794. /// <returns></returns>
  2795. public static ZPPFM008Response HGSAPDK_HGSAPDK_ZPPFM008(Zppfm008 sapParameter, string yyyymmdd, string datacode)
  2796. {
  2797. ZPPFM008Response sapResult = null;
  2798. try
  2799. {
  2800. using (ZPPFM008Client sapClient = new ZPPFM008Client("ZPPFM008_BIND"))
  2801. {
  2802. // 登录
  2803. UserNamePasswordClientCredential credential =
  2804. sapClient.ClientCredentials.UserName;
  2805. credential.UserName = "hgsapdk";
  2806. credential.Password = "Prddk209";
  2807. // INIUtility ini = INIUtility.Instance(INIUtility.IniFile.SAP_HEGII);
  2808. //credential.UserName = ini.ReadIniData("SAP_HEGII", "UserName");
  2809. //credential.Password = ini.ReadIniData("SAP_HEGII", "Password");
  2810. // 参数
  2811. sapParameter.ZSUMSpecified = true;
  2812. sapParameter.TABLE_OUT = new ZSPP100[0];
  2813. // 接口
  2814. sapResult = sapClient.ZPPFM008(sapParameter);
  2815. if (sapResult.ZTYPE == "S")
  2816. {
  2817. // 结果
  2818. OutputLog.TraceLog(LogPriority.Information,
  2819. "HGSAPDK_ZPPFM008",
  2820. "yyyymmdd:" + yyyymmdd + " datacode:" + datacode + " Zsum:" + sapParameter.ZSUM,
  2821. " Ztype:" + sapResult.ZTYPE + " Zmsg:" + sapResult.ZMSG,
  2822. LocalPath.LogExePath + "SAP_HEGII\\Info_");
  2823. }
  2824. else
  2825. {
  2826. foreach (ZSPP100 item in sapResult.TABLE_OUT)
  2827. {
  2828. if (!string.IsNullOrWhiteSpace(item.ZMSG))
  2829. {
  2830. sapResult.ZMSG += $"[{item.ZMSG}]";
  2831. break;
  2832. }
  2833. }
  2834. // 结果
  2835. OutputLog.TraceLog(LogPriority.Information,
  2836. "HGSAPDK_ZPPFM008",
  2837. "yyyymmdd:" + yyyymmdd + " datacode:" + datacode + " Zsum:" + sapParameter.ZSUM + " Ztype:" + sapResult.ZTYPE + " Zmsg:" + sapResult.ZMSG,
  2838. JsonHelper.ToJson(sapResult),
  2839. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  2840. }
  2841. }
  2842. }
  2843. catch (Exception ex)
  2844. {
  2845. sapResult = new ZPPFM008Response();
  2846. sapResult.ZTYPE = "E";
  2847. if (ex is System.ServiceModel.FaultException)
  2848. {
  2849. sapResult.ZMSG = ex.Message;
  2850. }
  2851. else
  2852. {
  2853. sapResult.ZMSG = "DKMES-ERROR:" + Guid.NewGuid();
  2854. }
  2855. OutputLog.TraceLog(LogPriority.Error,
  2856. "HGSAPDK_ZPPFM008",
  2857. sapResult.ZMSG,
  2858. ex.ToString(),
  2859. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  2860. }
  2861. return sapResult;
  2862. }
  2863. /// <summary>
  2864. /// 同步SAP接口
  2865. /// </summary>
  2866. /// <param name="date"></param>
  2867. /// <param name="datacode"></param>
  2868. /// <param name="userid"></param>
  2869. /// <param name="logid"></param>
  2870. /// <returns></returns>
  2871. public static ServiceResultEntity HGSAPDK_SyncSap(DateTime date, string datacode, int userid, int logid)
  2872. {
  2873. ServiceResultEntity sre = new ServiceResultEntity();
  2874. IDBTransaction oracleConn = ClsDbFactory.CreateDBTransaction(DataBaseType.ORACLE, DataManager.ConnectionString);
  2875. try
  2876. {
  2877. OracleParameter[] paras = null;
  2878. string sqlString = string.Empty;
  2879. sqlString = "select workcode from tp_mst_account where rownum = 1";
  2880. string workcode = oracleConn.GetSqlResultToStr(sqlString);
  2881. string yyyymmdd = "20211130";//date.ToString("yyyyMMdd");
  2882. int r = 0;
  2883. //// 查询出当前日志外,最新的一次日志
  2884. //sqlString = "SELECT t.executedateend\n" +
  2885. // " FROM (SELECT dl.executedateend\n" +
  2886. // " FROM tsap_hegii_datalog dl\n" +
  2887. // " WHERE dl.logtype = '3'\n" +
  2888. // " AND dl.datastuts = 'S'\n" +
  2889. // " AND dl.datacode = :datacode\n" +
  2890. // " AND dl.logid <> :logid\n" +
  2891. // " ORDER BY dl.executedateend DESC) t\n" +
  2892. // " WHERE rownum = 1";
  2893. //paras = new OracleParameter[]
  2894. //{
  2895. // new OracleParameter(":datacode", datacode),
  2896. // new OracleParameter(":logid", logid)
  2897. //};
  2898. //object executedateend = oracleConn.GetSqlResultToObj(sqlString, paras);
  2899. //if (executedateend == null || Convert.ToDateTime(executedateend) >= date)
  2900. //{
  2901. // sre.Result = "W";
  2902. // sre.Message = "当前日志的结束时间小于最新日志的结束时间,不能同步";
  2903. // return sre;
  2904. //}
  2905. sqlString = "SELECT wd.yyyymmdd\n" +
  2906. " ,wd.workcode\n" +
  2907. " ,wd.datacode\n" +
  2908. " ,wd.goodscode\n" +
  2909. " ,wd.sapcode\n" +
  2910. " ,wd.usercode\n" +
  2911. " ,wd.ordercode\n" +
  2912. " ,wd.orderitem\n" +
  2913. " ,wd.outputnum\n" +
  2914. " ,wd.scrapnum\n" +
  2915. " ,wd.cleanupnum\n" +
  2916. " ,wd.recoverynum\n" +
  2917. " ,wd.repairnum\n" +
  2918. " ,wd.testmouldflag\n" +
  2919. " ,wd.zscs\n" +
  2920. " FROM tsap_hegii_workdata wd\n" +
  2921. " WHERE wd.logid = :logid";
  2922. paras = new OracleParameter[]
  2923. {
  2924. new OracleParameter(":logid", OracleDbType.Int32, logid, ParameterDirection.Input),
  2925. };
  2926. DataTable workData = oracleConn.GetSqlResultToDt(sqlString, paras);
  2927. Zppfm008 sapParameter = new Zppfm008();
  2928. if (workData != null && workData.Rows.Count > 0)
  2929. {
  2930. sapParameter.ZSUM = workData.Rows.Count;
  2931. sapParameter.TABLE_IN = new ZSPP100[sapParameter.ZSUM];
  2932. int index = 0;
  2933. foreach (DataRow item in workData.Rows)
  2934. {
  2935. ZSPP100 info100 = new ZSPP100();
  2936. // 工厂
  2937. info100.WERKS = workcode;
  2938. // 型号
  2939. info100.GROES = item["GoodsCode"].ToString();
  2940. // 物料编号
  2941. info100.MATNR = item["SAPCode"].ToString();
  2942. // 生产工号
  2943. info100.ZGHNU = item["UserCode"].ToString();
  2944. // 数据节点
  2945. info100.ZJDNU = item["DataCode"].ToString();
  2946. // 时间戳
  2947. info100.ZSCNU = yyyymmdd;
  2948. // 销售凭证
  2949. info100.VBELN = item["ORDERCODE"].ToString().Trim();
  2950. // 销售凭证项目
  2951. info100.POSNR = item["ORDERITEM"].ToString();
  2952. // 产量
  2953. info100.ZCLNG = item["OutputNum"].ToString();
  2954. // 损坯
  2955. info100.ZSPNG = item["SCRAPNUM"].ToString();
  2956. // 清除
  2957. info100.ZQCNG = item["CLEANUPNUM"].ToString();
  2958. // 回收
  2959. info100.ZHSNG = item["RECOVERYNUM"].ToString();
  2960. // 干补
  2961. info100.ZGBNG = item["REPAIRNUM"].ToString();
  2962. // 注浆类型 G高压 L普通
  2963. info100.ZSCS = item["ZSCS"].ToString();
  2964. info100.ZKSSJ = Convert.ToDateTime("2021-12-01 08:00:00").ToString("HHmmss");
  2965. info100.ZJSRQ = Convert.ToDecimal("20211201080000");
  2966. sapParameter.TABLE_IN[index++] = info100;
  2967. }
  2968. }
  2969. else
  2970. {
  2971. sapParameter.ZSUM = 0;
  2972. sapParameter.TABLE_IN = new ZSPP100[sapParameter.ZSUM];
  2973. }
  2974. // 调用SAP接口(调试用)
  2975. ZPPFM008Response result = HGSAPDK_HGSAPDK_ZPPFM008(sapParameter, yyyymmdd, datacode);
  2976. if (result.TABLE_OUT != null && result.TABLE_OUT.Length > 0)
  2977. {
  2978. sqlString = "update TSAP_HEGII_WorkData t set t.ZTime =sysdate, ZTYPE = :ZTYPE, ZMSG = :ZMSG where logid = " + logid +
  2979. " \n and YYYYMMDD='" + yyyymmdd + "' and WorkCode='" + workcode +
  2980. "' and DataCode=:DataCode and GoodsCode=:GoodsCode and SAPCode=:SAPCode and UserCode=:UserCode \n" +
  2981. "and OrderCode=:OrderCode and OrderItem=:OrderItem";
  2982. foreach (ZSPP100 item in result.TABLE_OUT)
  2983. {
  2984. string posnr = item.POSNR.TrimStart('0');
  2985. paras = new OracleParameter[]
  2986. {
  2987. new OracleParameter(":ZTYPE",OracleDbType.Varchar2, item.ZTYPE, ParameterDirection.Input),
  2988. new OracleParameter(":ZMSG",OracleDbType.Varchar2, item.ZMSG, ParameterDirection.Input),
  2989. new OracleParameter(":DataCode",OracleDbType.Varchar2, datacode, ParameterDirection.Input),
  2990. new OracleParameter(":GoodsCode",OracleDbType.Varchar2, item.GROES, ParameterDirection.Input),
  2991. new OracleParameter(":SAPCode",OracleDbType.Varchar2, item.MATNR, ParameterDirection.Input),
  2992. new OracleParameter(":UserCode",OracleDbType.Varchar2, item.ZGHNU, ParameterDirection.Input),
  2993. new OracleParameter(":OrderCode",OracleDbType.Varchar2, (string.IsNullOrEmpty(item.VBELN) ? " " : item.VBELN), ParameterDirection.Input),
  2994. new OracleParameter(":OrderItem",OracleDbType.Varchar2, ((string.IsNullOrEmpty(posnr)) ? "0" : posnr), ParameterDirection.Input),
  2995. };
  2996. r = oracleConn.ExecuteNonQuery(sqlString, paras);
  2997. }
  2998. }
  2999. result.ZMSG = $"{result.ZMSG}({sapParameter.ZSUM})";
  3000. sqlString = "update tsap_hegii_datalog t set t.EndTime = sysdate, DataStuts = :DataStuts, DataMSG =:msg where logid = :logid";
  3001. paras = new OracleParameter[]
  3002. {
  3003. new OracleParameter(":DataStuts",OracleDbType.Varchar2, result.ZTYPE, ParameterDirection.Input),
  3004. new OracleParameter(":msg",OracleDbType.Varchar2, result.ZMSG, ParameterDirection.Input),
  3005. new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  3006. };
  3007. r = oracleConn.ExecuteNonQuery(sqlString, paras);
  3008. if (result.ZTYPE == "S")
  3009. {
  3010. sqlString = "update tsap_hegii_datalog t set t.createuserid = :userid where logid = :logid";
  3011. paras = new OracleParameter[]
  3012. {
  3013. new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  3014. new OracleParameter(":userid",OracleDbType.Int32, userid, ParameterDirection.Input),
  3015. };
  3016. r = oracleConn.ExecuteNonQuery(sqlString, paras);
  3017. }
  3018. oracleConn.Commit();
  3019. sre.Message = result.ZMSG;
  3020. sre.Result = result.ZTYPE;
  3021. return sre;
  3022. }
  3023. catch (Exception ex)
  3024. {
  3025. throw ex;
  3026. }
  3027. finally
  3028. {
  3029. if (oracleConn != null &&
  3030. oracleConn.ConnState == ConnectionState.Open)
  3031. {
  3032. oracleConn.Disconnect();
  3033. }
  3034. }
  3035. }
  3036. #endregion
  3037. /// <summary>
  3038. /// 同步SAP数据(自动)
  3039. /// </summary>
  3040. /// <param name="date"></param>
  3041. public static void AutoWorkDataToSAP(DateTime date, string funCode)
  3042. {
  3043. if (string.IsNullOrWhiteSpace(funCode))
  3044. {
  3045. //return;
  3046. funCode = "ALL";
  3047. }
  3048. funCode = "," + funCode + ",";
  3049. ServiceResultEntity sre = null;
  3050. // 10 模具
  3051. if (funCode == ",ALL," || funCode.Contains(",10,"))
  3052. {
  3053. try
  3054. {
  3055. sre = SetWorkData10_50(date, "10", 0);
  3056. if (sre.Status != Constant.ServiceResultStatus.Success ||
  3057. "S" != sre.Result + "")
  3058. {
  3059. OutputLog.TraceLog(LogPriority.Warning,
  3060. "AutoWorkDataToSAP",
  3061. "10 模具 " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  3062. JsonHelper.ToJson(sre),
  3063. LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  3064. }
  3065. }
  3066. catch (Exception ex)
  3067. {
  3068. OutputLog.TraceLog(LogPriority.Error,
  3069. "AutoWorkDataToSAP",
  3070. "10 模具 " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  3071. ex.ToString(),
  3072. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  3073. }
  3074. }
  3075. // 20 湿坯
  3076. if (funCode == ",ALL," || funCode.Contains(",20,"))
  3077. {
  3078. try
  3079. {
  3080. sre = SetWorkData10_50(date, "20", 0);
  3081. if (sre.Status != Constant.ServiceResultStatus.Success ||
  3082. "S" != sre.Result + "")
  3083. {
  3084. OutputLog.TraceLog(LogPriority.Warning,
  3085. "AutoWorkDataToSAP",
  3086. "20 湿坯 " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  3087. JsonHelper.ToJson(sre),
  3088. LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  3089. }
  3090. }
  3091. catch (Exception ex)
  3092. {
  3093. OutputLog.TraceLog(LogPriority.Error,
  3094. "AutoWorkDataToSAP",
  3095. "20 湿坯 " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  3096. ex.ToString(),
  3097. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  3098. }
  3099. }
  3100. // 30 精坯
  3101. if (funCode == ",ALL," || funCode.Contains(",30,"))
  3102. {
  3103. try
  3104. {
  3105. sre = SetWorkData10_50(date, "30", 0);
  3106. if (sre.Status != Constant.ServiceResultStatus.Success ||
  3107. "S" != sre.Result + "")
  3108. {
  3109. OutputLog.TraceLog(LogPriority.Warning,
  3110. "AutoWorkDataToSAP",
  3111. "30 精坯 " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  3112. JsonHelper.ToJson(sre),
  3113. LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  3114. }
  3115. }
  3116. catch (Exception ex)
  3117. {
  3118. OutputLog.TraceLog(LogPriority.Error,
  3119. "AutoWorkDataToSAP",
  3120. "30 精坯 " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  3121. ex.ToString(),
  3122. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  3123. }
  3124. }
  3125. // 40 釉坯
  3126. if (funCode == ",ALL," || funCode.Contains(",40,"))
  3127. {
  3128. try
  3129. {
  3130. sre = SetWorkData10_50(date, "40", 0);
  3131. if (sre.Status != Constant.ServiceResultStatus.Success ||
  3132. "S" != sre.Result + "")
  3133. {
  3134. OutputLog.TraceLog(LogPriority.Warning,
  3135. "AutoWorkDataToSAP",
  3136. "40 釉坯 " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  3137. JsonHelper.ToJson(sre),
  3138. LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  3139. }
  3140. }
  3141. catch (Exception ex)
  3142. {
  3143. OutputLog.TraceLog(LogPriority.Error,
  3144. "AutoWorkDataToSAP",
  3145. "40 釉坯 " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  3146. ex.ToString(),
  3147. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  3148. }
  3149. }
  3150. // 50 烧成
  3151. if (funCode == ",ALL," || funCode.Contains(",50,"))
  3152. {
  3153. try
  3154. {
  3155. sre = SetWorkData10_50(date, "50", 0);
  3156. if (sre.Status != Constant.ServiceResultStatus.Success ||
  3157. "S" != sre.Result + "")
  3158. {
  3159. OutputLog.TraceLog(LogPriority.Warning,
  3160. "AutoWorkDataToSAP",
  3161. "50 烧成 " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  3162. JsonHelper.ToJson(sre),
  3163. LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  3164. }
  3165. }
  3166. catch (Exception ex)
  3167. {
  3168. OutputLog.TraceLog(LogPriority.Error,
  3169. "AutoWorkDataToSAP",
  3170. "50 烧成 " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  3171. ex.ToString(),
  3172. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  3173. }
  3174. }
  3175. // 6001 成品明细
  3176. if (funCode == ",ALL," || funCode.Contains(",6001,"))
  3177. {
  3178. try
  3179. {
  3180. sre = SetFP6001(date, 0);
  3181. if (sre.Status != Constant.ServiceResultStatus.Success ||
  3182. "S" != sre.Result + "")
  3183. {
  3184. OutputLog.TraceLog(LogPriority.Warning,
  3185. "AutoWorkDataToSAP",
  3186. "6001 成品明细 " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  3187. JsonHelper.ToJson(sre),
  3188. LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  3189. }
  3190. }
  3191. catch (Exception ex)
  3192. {
  3193. OutputLog.TraceLog(LogPriority.Error,
  3194. "AutoWorkDataToSAP",
  3195. "6001 成品明细 " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  3196. ex.ToString(),
  3197. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  3198. }
  3199. }
  3200. // 6001 成品明细(小时)-20分钟
  3201. if (funCode == ",6002,")
  3202. {
  3203. try
  3204. {
  3205. sre = SetFP6002(date, 0);
  3206. if (sre.Status != Constant.ServiceResultStatus.Success ||
  3207. "S" != sre.Result + "")
  3208. {
  3209. OutputLog.TraceLog(LogPriority.Warning,
  3210. "AutoWorkDataToSAP",
  3211. "6002 成品明细(小时) " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  3212. JsonHelper.ToJson(sre),
  3213. LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  3214. }
  3215. }
  3216. catch (Exception ex)
  3217. {
  3218. OutputLog.TraceLog(LogPriority.Error,
  3219. "AutoWorkDataToSAP",
  3220. "6002 成品明细(小时) " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  3221. ex.ToString(),
  3222. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  3223. }
  3224. }
  3225. }
  3226. /// <summary>
  3227. /// 同步SAP数据(自动)(重载)
  3228. /// </summary>
  3229. /// <param name="date">当前时间</param>
  3230. /// <param name="funCode">工序码</param>
  3231. /// <param name="ndate">本次要执行到的时间</param>
  3232. public static void AutoWorkDataToSAP(DateTime date, string funCode, DateTime ndate)
  3233. {
  3234. if (string.IsNullOrWhiteSpace(funCode))
  3235. {
  3236. //return;
  3237. funCode = "ALL";
  3238. }
  3239. funCode = "," + funCode + ",";
  3240. ServiceResultEntity sre = null;
  3241. // 10 模具
  3242. if (funCode == ",ALL," || funCode.Contains(",10,"))
  3243. {
  3244. try
  3245. {
  3246. sre = SetWorkData10_50("10", 0, ndate);
  3247. if (sre.Status != Constant.ServiceResultStatus.Success ||
  3248. "S" != sre.Result + "")
  3249. {
  3250. OutputLog.TraceLog(LogPriority.Warning,
  3251. "AutoWorkDataToSAP",
  3252. "10 模具 " + ndate.ToString("yyyy-MM-dd HH:mm:ss"),
  3253. JsonHelper.ToJson(sre),
  3254. LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  3255. }
  3256. }
  3257. catch (Exception ex)
  3258. {
  3259. OutputLog.TraceLog(LogPriority.Error,
  3260. "AutoWorkDataToSAP",
  3261. "10 模具 " + ndate.ToString("yyyy-MM-dd HH:mm:ss"),
  3262. ex.ToString(),
  3263. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  3264. }
  3265. }
  3266. // 20 湿坯
  3267. if (funCode == ",ALL," || funCode.Contains(",20,"))
  3268. {
  3269. try
  3270. {
  3271. sre = SetWorkData10_50("20", 0, ndate);
  3272. if (sre.Status != Constant.ServiceResultStatus.Success ||
  3273. "S" != sre.Result + "")
  3274. {
  3275. OutputLog.TraceLog(LogPriority.Warning,
  3276. "AutoWorkDataToSAP",
  3277. "20 湿坯 " + ndate.ToString("yyyy-MM-dd HH:mm:ss"),
  3278. JsonHelper.ToJson(sre),
  3279. LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  3280. }
  3281. }
  3282. catch (Exception ex)
  3283. {
  3284. OutputLog.TraceLog(LogPriority.Error,
  3285. "AutoWorkDataToSAP",
  3286. "20 湿坯 " + ndate.ToString("yyyy-MM-dd HH:mm:ss"),
  3287. ex.ToString(),
  3288. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  3289. }
  3290. }
  3291. // 30 精坯
  3292. if (funCode == ",ALL," || funCode.Contains(",30,"))
  3293. {
  3294. try
  3295. {
  3296. sre = SetWorkData10_50("30", 0, ndate);
  3297. if (sre.Status != Constant.ServiceResultStatus.Success ||
  3298. "S" != sre.Result + "")
  3299. {
  3300. OutputLog.TraceLog(LogPriority.Warning,
  3301. "AutoWorkDataToSAP",
  3302. "30 精坯 " + ndate.ToString("yyyy-MM-dd HH:mm:ss"),
  3303. JsonHelper.ToJson(sre),
  3304. LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  3305. }
  3306. }
  3307. catch (Exception ex)
  3308. {
  3309. OutputLog.TraceLog(LogPriority.Error,
  3310. "AutoWorkDataToSAP",
  3311. "30 精坯 " + ndate.ToString("yyyy-MM-dd HH:mm:ss"),
  3312. ex.ToString(),
  3313. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  3314. }
  3315. }
  3316. // 40 釉坯
  3317. if (funCode == ",ALL," || funCode.Contains(",40,"))
  3318. {
  3319. try
  3320. {
  3321. sre = SetWorkData10_50( "40", 0, ndate);
  3322. if (sre.Status != Constant.ServiceResultStatus.Success ||
  3323. "S" != sre.Result + "")
  3324. {
  3325. OutputLog.TraceLog(LogPriority.Warning,
  3326. "AutoWorkDataToSAP",
  3327. "40 釉坯 " + ndate.ToString("yyyy-MM-dd HH:mm:ss"),
  3328. JsonHelper.ToJson(sre),
  3329. LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  3330. }
  3331. }
  3332. catch (Exception ex)
  3333. {
  3334. OutputLog.TraceLog(LogPriority.Error,
  3335. "AutoWorkDataToSAP",
  3336. "40 釉坯 " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  3337. ex.ToString(),
  3338. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  3339. }
  3340. }
  3341. // 50 烧成
  3342. if (funCode == ",ALL," || funCode.Contains(",50,"))
  3343. {
  3344. try
  3345. {
  3346. sre = SetWorkData10_50("50", 0, ndate);
  3347. if (sre.Status != Constant.ServiceResultStatus.Success ||
  3348. "S" != sre.Result + "")
  3349. {
  3350. OutputLog.TraceLog(LogPriority.Warning,
  3351. "AutoWorkDataToSAP",
  3352. "50 烧成 " + ndate.ToString("yyyy-MM-dd HH:mm:ss"),
  3353. JsonHelper.ToJson(sre),
  3354. LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  3355. }
  3356. }
  3357. catch (Exception ex)
  3358. {
  3359. OutputLog.TraceLog(LogPriority.Error,
  3360. "AutoWorkDataToSAP",
  3361. "50 烧成 " + ndate.ToString("yyyy-MM-dd HH:mm:ss"),
  3362. ex.ToString(),
  3363. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  3364. }
  3365. }
  3366. // 6001 成品明细
  3367. if (funCode == ",ALL," || funCode.Contains(",6001,"))
  3368. {
  3369. try
  3370. {
  3371. sre = SetFP6001(date, 0);
  3372. if (sre.Status != Constant.ServiceResultStatus.Success ||
  3373. "S" != sre.Result + "")
  3374. {
  3375. OutputLog.TraceLog(LogPriority.Warning,
  3376. "AutoWorkDataToSAP",
  3377. "6001 成品明细 " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  3378. JsonHelper.ToJson(sre),
  3379. LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  3380. }
  3381. }
  3382. catch (Exception ex)
  3383. {
  3384. OutputLog.TraceLog(LogPriority.Error,
  3385. "AutoWorkDataToSAP",
  3386. "6001 成品明细 " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  3387. ex.ToString(),
  3388. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  3389. }
  3390. }
  3391. // 6001 成品明细(小时)-20分钟
  3392. if (funCode == ",6002,")
  3393. {
  3394. try
  3395. {
  3396. sre = SetFP6002(date, 0);
  3397. if (sre.Status != Constant.ServiceResultStatus.Success ||
  3398. "S" != sre.Result + "")
  3399. {
  3400. OutputLog.TraceLog(LogPriority.Warning,
  3401. "AutoWorkDataToSAP",
  3402. "6002 成品明细(小时) " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  3403. JsonHelper.ToJson(sre),
  3404. LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  3405. }
  3406. }
  3407. catch (Exception ex)
  3408. {
  3409. OutputLog.TraceLog(LogPriority.Error,
  3410. "AutoWorkDataToSAP",
  3411. "6002 成品明细(小时) " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  3412. ex.ToString(),
  3413. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  3414. }
  3415. }
  3416. }
  3417. public static void AutoWorkDataToSAP_Test(string funCode, DateTime ndate)
  3418. {
  3419. if (string.IsNullOrWhiteSpace(funCode))
  3420. {
  3421. //return;
  3422. funCode = "ALL";
  3423. }
  3424. funCode = "," + funCode + ",";
  3425. ServiceResultEntity sre = null;
  3426. // 10 模具
  3427. //if (funCode == ",ALL," || funCode.Contains(",10,"))
  3428. //{
  3429. // try
  3430. // {
  3431. // sre = SetWorkData10_50_test("10", 0, ndate);
  3432. // if (sre.Status != Constant.ServiceResultStatus.Success ||
  3433. // "S" != sre.Result + "")
  3434. // {
  3435. // OutputLog.TraceLog(LogPriority.Warning,
  3436. // "AutoWorkDataToSAP",
  3437. // "10 模具 " + ndate.ToString("yyyy-MM-dd HH:mm:ss"),
  3438. // JsonHelper.ToJson(sre),
  3439. // LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  3440. // }
  3441. // }
  3442. // catch (Exception ex)
  3443. // {
  3444. // OutputLog.TraceLog(LogPriority.Error,
  3445. // "AutoWorkDataToSAP",
  3446. // "10 模具 " + ndate.ToString("yyyy-MM-dd HH:mm:ss"),
  3447. // ex.ToString(),
  3448. // LocalPath.LogExePath + "SAP_HEGII\\Error_");
  3449. // }
  3450. //}
  3451. // 20 湿坯
  3452. if (funCode == ",ALL," || funCode.Contains(",20,"))
  3453. {
  3454. try
  3455. {
  3456. sre = SetWorkData10_50_test("20", 0, ndate);
  3457. if (sre.Status != Constant.ServiceResultStatus.Success ||
  3458. "S" != sre.Result + "")
  3459. {
  3460. OutputLog.TraceLog(LogPriority.Warning,
  3461. "AutoWorkDataToSAP",
  3462. "20 湿坯 " + ndate.ToString("yyyy-MM-dd HH:mm:ss"),
  3463. JsonHelper.ToJson(sre),
  3464. LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  3465. }
  3466. }
  3467. catch (Exception ex)
  3468. {
  3469. OutputLog.TraceLog(LogPriority.Error,
  3470. "AutoWorkDataToSAP",
  3471. "20 湿坯 " + ndate.ToString("yyyy-MM-dd HH:mm:ss"),
  3472. ex.ToString(),
  3473. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  3474. }
  3475. }
  3476. // 30 精坯
  3477. if (funCode == ",ALL," || funCode.Contains(",30,"))
  3478. {
  3479. try
  3480. {
  3481. sre = SetWorkData10_50_test("30", 0, ndate);
  3482. if (sre.Status != Constant.ServiceResultStatus.Success ||
  3483. "S" != sre.Result + "")
  3484. {
  3485. OutputLog.TraceLog(LogPriority.Warning,
  3486. "AutoWorkDataToSAP",
  3487. "30 精坯 " + ndate.ToString("yyyy-MM-dd HH:mm:ss"),
  3488. JsonHelper.ToJson(sre),
  3489. LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  3490. }
  3491. }
  3492. catch (Exception ex)
  3493. {
  3494. OutputLog.TraceLog(LogPriority.Error,
  3495. "AutoWorkDataToSAP",
  3496. "30 精坯 " + ndate.ToString("yyyy-MM-dd HH:mm:ss"),
  3497. ex.ToString(),
  3498. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  3499. }
  3500. }
  3501. // 40 釉坯
  3502. if (funCode == ",ALL," || funCode.Contains(",40,"))
  3503. {
  3504. try
  3505. {
  3506. sre = SetWorkData10_50_test("40", 0, ndate);
  3507. if (sre.Status != Constant.ServiceResultStatus.Success ||
  3508. "S" != sre.Result + "")
  3509. {
  3510. OutputLog.TraceLog(LogPriority.Warning,
  3511. "AutoWorkDataToSAP",
  3512. "40 釉坯 " + ndate.ToString("yyyy-MM-dd HH:mm:ss"),
  3513. JsonHelper.ToJson(sre),
  3514. LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  3515. }
  3516. }
  3517. catch (Exception ex)
  3518. {
  3519. OutputLog.TraceLog(LogPriority.Error,
  3520. "AutoWorkDataToSAP",
  3521. "40 釉坯 " + ndate.ToString("yyyy-MM-dd HH:mm:ss"),
  3522. ex.ToString(),
  3523. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  3524. }
  3525. }
  3526. // 50 烧成
  3527. if (funCode == ",ALL," || funCode.Contains(",50,"))
  3528. {
  3529. try
  3530. {
  3531. sre = SetWorkData10_50_test("50", 0, ndate);
  3532. if (sre.Status != Constant.ServiceResultStatus.Success ||
  3533. "S" != sre.Result + "")
  3534. {
  3535. OutputLog.TraceLog(LogPriority.Warning,
  3536. "AutoWorkDataToSAP",
  3537. "50 烧成 " + ndate.ToString("yyyy-MM-dd HH:mm:ss"),
  3538. JsonHelper.ToJson(sre),
  3539. LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  3540. }
  3541. }
  3542. catch (Exception ex)
  3543. {
  3544. OutputLog.TraceLog(LogPriority.Error,
  3545. "AutoWorkDataToSAP",
  3546. "50 烧成 " + ndate.ToString("yyyy-MM-dd HH:mm:ss"),
  3547. ex.ToString(),
  3548. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  3549. }
  3550. }
  3551. // 6001 成品明细
  3552. //if (funCode == ",ALL," || funCode.Contains(",6001,"))
  3553. //{
  3554. // try
  3555. // {
  3556. // sre = SetFP6001(ndate, 0);
  3557. // if (sre.Status != Constant.ServiceResultStatus.Success ||
  3558. // "S" != sre.Result + "")
  3559. // {
  3560. // OutputLog.TraceLog(LogPriority.Warning,
  3561. // "AutoWorkDataToSAP",
  3562. // "6001 成品明细 " + ndate.ToString("yyyy-MM-dd HH:mm:ss"),
  3563. // JsonHelper.ToJson(sre),
  3564. // LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  3565. // }
  3566. // }
  3567. // catch (Exception ex)
  3568. // {
  3569. // OutputLog.TraceLog(LogPriority.Error,
  3570. // "AutoWorkDataToSAP",
  3571. // "6001 成品明细 " + ndate.ToString("yyyy-MM-dd HH:mm:ss"),
  3572. // ex.ToString(),
  3573. // LocalPath.LogExePath + "SAP_HEGII\\Error_");
  3574. // }
  3575. //}
  3576. // 6001 成品明细(小时)-20分钟
  3577. //if (funCode == ",6002,")
  3578. //{
  3579. // try
  3580. // {
  3581. // sre = SetFP6002(ndate, 0);
  3582. // if (sre.Status != Constant.ServiceResultStatus.Success ||
  3583. // "S" != sre.Result + "")
  3584. // {
  3585. // OutputLog.TraceLog(LogPriority.Warning,
  3586. // "AutoWorkDataToSAP",
  3587. // "6002 成品明细(小时) " + ndate.ToString("yyyy-MM-dd HH:mm:ss"),
  3588. // JsonHelper.ToJson(sre),
  3589. // LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  3590. // }
  3591. // }
  3592. // catch (Exception ex)
  3593. // {
  3594. // OutputLog.TraceLog(LogPriority.Error,
  3595. // "AutoWorkDataToSAP",
  3596. // "6002 成品明细(小时) " + ndate.ToString("yyyy-MM-dd HH:mm:ss"),
  3597. // ex.ToString(),
  3598. // LocalPath.LogExePath + "SAP_HEGII\\Error_");
  3599. // }
  3600. //}
  3601. }
  3602. public static ServiceResultEntity SetWorkData10_50_test(string datacode, int userid, DateTime ndate)
  3603. {
  3604. ServiceResultEntity sre = new ServiceResultEntity();
  3605. IDBTransaction oracleConn = null;
  3606. try
  3607. {
  3608. #region 事务1,执行存储过程
  3609. OracleParameter[] paras = null;
  3610. int logid = 0;
  3611. string message = string.Empty;
  3612. // 10 模具
  3613. //if ("10".Equals(datacode))
  3614. //{
  3615. // paras = new OracleParameter[]
  3616. // {
  3617. // new OracleParameter("in_dateend", OracleDbType.Date, ndate, ParameterDirection.Input),
  3618. // new OracleParameter("out_logid", OracleDbType.Int32, null, ParameterDirection.Output),
  3619. // new OracleParameter("out_msg", OracleDbType.NVarchar2, 500, null, ParameterDirection.Output)
  3620. // };
  3621. // oracleConn = ClsDbFactory.CreateDBTransaction(DataBaseType.ORACLE, DataManager.ConnectionString);
  3622. // DataSet ds = oracleConn.ExecStoredProcedure("pro_sap_hegii_workdata_10_1", paras);
  3623. // int.TryParse(paras[1].Value + "", out logid);
  3624. // message = paras[2].Value + "";
  3625. // oracleConn.Commit();
  3626. //}
  3627. // 20 湿坯
  3628. if ("20".Equals(datacode))
  3629. {
  3630. paras = new OracleParameter[]
  3631. {
  3632. new OracleParameter("in_dateend", OracleDbType.Date, ndate, ParameterDirection.Input),
  3633. new OracleParameter("out_logid", OracleDbType.Int32, null, ParameterDirection.Output),
  3634. new OracleParameter("out_msg", OracleDbType.NVarchar2, 500, null, ParameterDirection.Output)
  3635. };
  3636. oracleConn = ClsDbFactory.CreateDBTransaction(DataBaseType.ORACLE, DataManager.ConnectionString);
  3637. DataSet ds = oracleConn.ExecStoredProcedure("pro_sap_hegii_workdata_20_1_test", paras);
  3638. int.TryParse(paras[1].Value + "", out logid);
  3639. message = paras[2].Value + "";
  3640. oracleConn.Commit();
  3641. }
  3642. // 30 精坯、40 釉坯、50 烧成
  3643. else if ("30".Equals(datacode) || "40".Equals(datacode) || "50".Equals(datacode))
  3644. {
  3645. paras = new OracleParameter[]
  3646. {
  3647. new OracleParameter("in_dateend", OracleDbType.Date, ndate, ParameterDirection.Input),
  3648. new OracleParameter("in_datacode", OracleDbType.Varchar2, datacode, ParameterDirection.Input),
  3649. new OracleParameter("out_logid", OracleDbType.Int32, null, ParameterDirection.Output),
  3650. new OracleParameter("out_msg", OracleDbType.NVarchar2, 500, null, ParameterDirection.Output)
  3651. };
  3652. oracleConn = ClsDbFactory.CreateDBTransaction(DataBaseType.ORACLE, DataManager.ConnectionString);
  3653. DataSet ds = oracleConn.ExecStoredProcedure("pro_sap_hegii_workdata_30_1_test", paras);
  3654. int.TryParse(paras[2].Value + "", out logid);
  3655. message = paras[3].Value + "";
  3656. oracleConn.Commit();
  3657. }
  3658. // 如果logid为0,则数据没有生成
  3659. if (logid == 0)
  3660. {
  3661. sre.Status = Constant.ServiceResultStatus.Other;
  3662. sre.Message = message;
  3663. return sre;
  3664. }
  3665. #endregion
  3666. // 事物2,同步SAP接口
  3667. sre = SyncSap_test(ndate, datacode, userid, logid);
  3668. return sre;
  3669. }
  3670. catch (Exception ex)
  3671. {
  3672. throw ex;
  3673. }
  3674. finally
  3675. {
  3676. if (oracleConn != null &&
  3677. oracleConn.ConnState == ConnectionState.Open)
  3678. {
  3679. oracleConn.Disconnect();
  3680. }
  3681. }
  3682. }
  3683. public static ServiceResultEntity SyncSap_test(DateTime date, string datacode, int userid, int logid)
  3684. {
  3685. ServiceResultEntity sre = new ServiceResultEntity();
  3686. IDBTransaction oracleConn = ClsDbFactory.CreateDBTransaction(DataBaseType.ORACLE, DataManager.ConnectionString);
  3687. try
  3688. {
  3689. OracleParameter[] paras = null;
  3690. string sqlString = string.Empty;
  3691. sqlString = "select workcode from tp_mst_account where rownum = 1";
  3692. string workcode = oracleConn.GetSqlResultToStr(sqlString);
  3693. string yyyymmdd = date.ToString("yyyyMMdd");
  3694. int r = 0;
  3695. // 查询出当前日志外,最新的一次日志
  3696. sqlString = "SELECT t.executedateend\n" +
  3697. " FROM (SELECT dl.executedateend\n" +
  3698. " FROM tsap_hegii_datalog dl\n" +
  3699. " WHERE dl.logtype = '3'\n" +
  3700. " AND dl.datastuts = 'S'\n" +
  3701. " AND dl.datacode = :datacode\n" +
  3702. " AND dl.logid <> :logid\n" +
  3703. " ORDER BY dl.executedateend DESC) t\n" +
  3704. " WHERE rownum = 1";
  3705. paras = new OracleParameter[]
  3706. {
  3707. new OracleParameter(":datacode", datacode),
  3708. new OracleParameter(":logid", logid)
  3709. };
  3710. object executedateend = oracleConn.GetSqlResultToObj(sqlString, paras);
  3711. //if (executedateend == null || Convert.ToDateTime(executedateend) >= date)
  3712. //{
  3713. // sre.Result = "W";
  3714. // sre.Message = "当前日志的结束时间小于最新日志的结束时间,不能同步";
  3715. // return sre;
  3716. //}
  3717. sqlString = "SELECT wd.yyyymmdd\n" +
  3718. " ,wd.workcode\n" +
  3719. " ,wd.datacode\n" +
  3720. " ,wd.goodscode\n" +
  3721. " ,wd.sapcode\n" +
  3722. " ,wd.usercode\n" +
  3723. " ,wd.ordercode\n" +
  3724. " ,wd.orderitem\n" +
  3725. " ,wd.outputnum\n" +
  3726. " ,wd.scrapnum\n" +
  3727. " ,wd.cleanupnum\n" +
  3728. " ,wd.recoverynum\n" +
  3729. " ,wd.repairnum\n" +
  3730. " ,wd.testmouldflag\n" +
  3731. " ,wd.zscs\n" +
  3732. " FROM tsap_hegii_workdata wd\n" +
  3733. " WHERE wd.logid = :logid";
  3734. paras = new OracleParameter[]
  3735. {
  3736. new OracleParameter(":logid", OracleDbType.Int32, logid, ParameterDirection.Input),
  3737. };
  3738. DataTable workData = oracleConn.GetSqlResultToDt(sqlString, paras);
  3739. Zppfm008 sapParameter = new Zppfm008();
  3740. if (workData != null && workData.Rows.Count > 0)
  3741. {
  3742. sapParameter.ZSUM = workData.Rows.Count;
  3743. sapParameter.TABLE_IN = new ZSPP100[sapParameter.ZSUM];
  3744. int index = 0;
  3745. foreach (DataRow item in workData.Rows)
  3746. {
  3747. ZSPP100 info100 = new ZSPP100();
  3748. // 工厂
  3749. info100.WERKS = workcode;
  3750. // 型号
  3751. info100.GROES = item["GoodsCode"].ToString();
  3752. // 物料编号
  3753. info100.MATNR = item["SAPCode"].ToString();
  3754. // 生产工号
  3755. info100.ZGHNU = item["UserCode"].ToString();
  3756. // 数据节点
  3757. info100.ZJDNU = item["DataCode"].ToString();
  3758. // 时间戳
  3759. info100.ZSCNU = yyyymmdd;
  3760. // 销售凭证
  3761. info100.VBELN = item["ORDERCODE"].ToString().Trim();
  3762. // 销售凭证项目
  3763. info100.POSNR = item["ORDERITEM"].ToString();
  3764. // 产量
  3765. info100.ZCLNG = item["OutputNum"].ToString();
  3766. // 损坯
  3767. info100.ZSPNG = item["SCRAPNUM"].ToString();
  3768. // 清除
  3769. info100.ZQCNG = item["CLEANUPNUM"].ToString();
  3770. // 回收
  3771. info100.ZHSNG = item["RECOVERYNUM"].ToString();
  3772. // 干补
  3773. info100.ZGBNG = item["REPAIRNUM"].ToString();
  3774. // 注浆类型 G高压 L普通
  3775. info100.ZSCS = item["ZSCS"].ToString();
  3776. //info100.ZKSSJ = Convert.ToDateTime(executedateend).ToString("HHmmss");
  3777. info100.ZKSSJ = Convert.ToDateTime("2022-06-24 12:00:00").ToString("HHmmss");
  3778. info100.ZJSRQ = Convert.ToDecimal(date.ToString("yyyyMMddHHmmss"));
  3779. sapParameter.TABLE_IN[index++] = info100;
  3780. }
  3781. }
  3782. else
  3783. {
  3784. sapParameter.ZSUM = 0;
  3785. sapParameter.TABLE_IN = new ZSPP100[sapParameter.ZSUM];
  3786. }
  3787. // 调用SAP接口
  3788. ZPPFM008Response result = HGSAPDK_ZPPFM008(sapParameter, yyyymmdd, datacode);
  3789. if (result.TABLE_OUT != null && result.TABLE_OUT.Length > 0)
  3790. {
  3791. sqlString = "update TSAP_HEGII_WorkData t set t.ZTime =sysdate, ZTYPE = :ZTYPE, ZMSG = :ZMSG where logid = " + logid +
  3792. " \n and YYYYMMDD='" + yyyymmdd + "' and WorkCode='" + workcode +
  3793. "' and DataCode=:DataCode and GoodsCode=:GoodsCode and SAPCode=:SAPCode and UserCode=:UserCode \n" +
  3794. "and OrderCode=:OrderCode and OrderItem=:OrderItem";
  3795. foreach (ZSPP100 item in result.TABLE_OUT)
  3796. {
  3797. string posnr = item.POSNR.TrimStart('0');
  3798. paras = new OracleParameter[]
  3799. {
  3800. new OracleParameter(":ZTYPE",OracleDbType.Varchar2, item.ZTYPE, ParameterDirection.Input),
  3801. new OracleParameter(":ZMSG",OracleDbType.Varchar2, item.ZMSG, ParameterDirection.Input),
  3802. new OracleParameter(":DataCode",OracleDbType.Varchar2, datacode, ParameterDirection.Input),
  3803. new OracleParameter(":GoodsCode",OracleDbType.Varchar2, item.GROES, ParameterDirection.Input),
  3804. new OracleParameter(":SAPCode",OracleDbType.Varchar2, item.MATNR, ParameterDirection.Input),
  3805. new OracleParameter(":UserCode",OracleDbType.Varchar2, item.ZGHNU, ParameterDirection.Input),
  3806. new OracleParameter(":OrderCode",OracleDbType.Varchar2, (string.IsNullOrEmpty(item.VBELN) ? " " : item.VBELN), ParameterDirection.Input),
  3807. new OracleParameter(":OrderItem",OracleDbType.Varchar2, ((string.IsNullOrEmpty(posnr)) ? "0" : posnr), ParameterDirection.Input),
  3808. };
  3809. r = oracleConn.ExecuteNonQuery(sqlString, paras);
  3810. }
  3811. }
  3812. result.ZMSG = $"{result.ZMSG}({sapParameter.ZSUM})";
  3813. sqlString = "update tsap_hegii_datalog t set t.EndTime = sysdate, DataStuts = :DataStuts, DataMSG =:msg where logid = :logid";
  3814. paras = new OracleParameter[]
  3815. {
  3816. new OracleParameter(":DataStuts",OracleDbType.Varchar2, result.ZTYPE, ParameterDirection.Input),
  3817. new OracleParameter(":msg",OracleDbType.Varchar2, result.ZMSG, ParameterDirection.Input),
  3818. new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  3819. };
  3820. r = oracleConn.ExecuteNonQuery(sqlString, paras);
  3821. if (result.ZTYPE == "S")
  3822. {
  3823. sqlString = "update tsap_hegii_datalog t set t.createuserid = :userid where logid = :logid";
  3824. paras = new OracleParameter[]
  3825. {
  3826. new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  3827. new OracleParameter(":userid",OracleDbType.Int32, userid, ParameterDirection.Input),
  3828. };
  3829. r = oracleConn.ExecuteNonQuery(sqlString, paras);
  3830. }
  3831. oracleConn.Commit();
  3832. sre.Message = result.ZMSG;
  3833. sre.Result = result.ZTYPE;
  3834. return sre;
  3835. }
  3836. catch (Exception ex)
  3837. {
  3838. throw ex;
  3839. }
  3840. finally
  3841. {
  3842. if (oracleConn != null &&
  3843. oracleConn.ConnState == ConnectionState.Open)
  3844. {
  3845. oracleConn.Disconnect();
  3846. }
  3847. }
  3848. }
  3849. public static ServiceResultEntity SetWorkData10_50_5000(string datacode, int userid, DateTime ndate)
  3850. {
  3851. ServiceResultEntity sre = new ServiceResultEntity();
  3852. IDBTransaction oracleConn = null;
  3853. try
  3854. {
  3855. #region 事务1,执行存储过程
  3856. OracleParameter[] paras = null;
  3857. int logid = 0;
  3858. string message = string.Empty;
  3859. // 10 模具
  3860. if ("10".Equals(datacode))
  3861. {
  3862. paras = new OracleParameter[]
  3863. {
  3864. new OracleParameter("in_dateend", OracleDbType.Date, ndate, ParameterDirection.Input),
  3865. new OracleParameter("out_logid", OracleDbType.Int32, null, ParameterDirection.Output),
  3866. new OracleParameter("out_msg", OracleDbType.NVarchar2, 500, null, ParameterDirection.Output)
  3867. };
  3868. oracleConn = ClsDbFactory.CreateDBTransaction(DataBaseType.ORACLE, DataManager.ConnectionString);
  3869. DataSet ds = oracleConn.ExecStoredProcedure("PRO_SAP_HEGII_WORKDATA_BG10", paras);
  3870. int.TryParse(paras[1].Value + "", out logid);
  3871. message = paras[2].Value + "";
  3872. oracleConn.Commit();
  3873. }
  3874. // 20 湿坯
  3875. else if ("20".Equals(datacode))
  3876. {
  3877. paras = new OracleParameter[]
  3878. {
  3879. new OracleParameter("in_dateend", OracleDbType.Date, ndate, ParameterDirection.Input),
  3880. new OracleParameter("out_logid", OracleDbType.Int32, null, ParameterDirection.Output),
  3881. new OracleParameter("out_msg", OracleDbType.NVarchar2, 500, null, ParameterDirection.Output)
  3882. };
  3883. oracleConn = ClsDbFactory.CreateDBTransaction(DataBaseType.ORACLE, DataManager.ConnectionString);
  3884. DataSet ds = oracleConn.ExecStoredProcedure("PRO_SAP_HEGII_WORKDATA_BG20", paras);
  3885. int.TryParse(paras[1].Value + "", out logid);
  3886. message = paras[2].Value + "";
  3887. oracleConn.Commit();
  3888. }
  3889. // 30 精坯、40 釉坯、50 烧成
  3890. else if ("30".Equals(datacode) || "40".Equals(datacode) || "50".Equals(datacode))
  3891. {
  3892. paras = new OracleParameter[]
  3893. {
  3894. new OracleParameter("in_dateend", OracleDbType.Date, ndate, ParameterDirection.Input),
  3895. new OracleParameter("in_datacode", OracleDbType.Varchar2, datacode, ParameterDirection.Input),
  3896. new OracleParameter("out_logid", OracleDbType.Int32, null, ParameterDirection.Output),
  3897. new OracleParameter("out_msg", OracleDbType.NVarchar2, 500, null, ParameterDirection.Output)
  3898. };
  3899. oracleConn = ClsDbFactory.CreateDBTransaction(DataBaseType.ORACLE, DataManager.ConnectionString);
  3900. DataSet ds = oracleConn.ExecStoredProcedure("PRO_SAP_HEGII_WORKDATA_BG", paras);
  3901. int.TryParse(paras[2].Value + "", out logid);
  3902. message = paras[3].Value + "";
  3903. oracleConn.Commit();
  3904. }
  3905. // 如果logid为0,则数据没有生成
  3906. if (logid == 0)
  3907. {
  3908. sre.Status = Constant.ServiceResultStatus.Other;
  3909. sre.Message = message;
  3910. return sre;
  3911. }
  3912. #endregion
  3913. // 事物2,同步SAP接口
  3914. string sqlString = "select SAP_INI_BG from TP_SYS_SAPCONFIG";
  3915. string SAP_ING_NEW = oracleConn.GetSqlResultToStr(sqlString);
  3916. if (SAP_ING_NEW == "1") {
  3917. sre = SyncSap5000(ndate, datacode, userid, logid);
  3918. }
  3919. return sre;
  3920. }
  3921. catch (Exception ex)
  3922. {
  3923. throw ex;
  3924. }
  3925. finally
  3926. {
  3927. if (oracleConn != null &&
  3928. oracleConn.ConnState == ConnectionState.Open)
  3929. {
  3930. oracleConn.Disconnect();
  3931. }
  3932. }
  3933. }
  3934. /*
  3935. public static ServiceResultEntity AutoWorkData(DateTime date)
  3936. {
  3937. IDBTransaction oracleConn = ClsDbFactory.CreateDBTransaction(DataBaseType.ORACLE, DataManager.ConnectionString);
  3938. ServiceResultEntity sre = new ServiceResultEntity();
  3939. try
  3940. {
  3941. string yyyymmdd = date.ToString("yyyyMMdd");
  3942. string sqlString =
  3943. "select t.logid, t.datacode\n" +
  3944. " from tsap_hegii_datalog t\n" +
  3945. " where t.logtype = '1'\n" +
  3946. " and t.datastuts = 'S'\n" +
  3947. " and t.yyyymmdd = :yyyymmdd\n" +
  3948. " and t.createuserid is null for update";
  3949. OracleParameter[] oracleParameter = new OracleParameter[]
  3950. {
  3951. new OracleParameter(":yyyymmdd",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  3952. };
  3953. DataTable datalog = oracleConn.GetSqlResultToDt(sqlString, oracleParameter);
  3954. if (datalog == null || datalog.Rows.Count == 0)
  3955. {
  3956. sre.Result = 0;
  3957. return sre;
  3958. }
  3959. sqlString = "select workcode from tp_mst_account where rownum = 1";
  3960. string workcode = oracleConn.GetSqlResultToStr(sqlString);
  3961. Zppfm008 sapParameter = new Zppfm008();
  3962. List<Zspp100> info = new List<Zspp100>();
  3963. foreach (DataRow item in datalog.Rows)
  3964. {
  3965. string datacode = item["datacode"].ToString();
  3966. logid = oracleConn.GetSqlResultToStr("select SEQ_SAP_HEGII_DataLog_ID.Nextval from dual");
  3967. string msg = null;
  3968. //string msg = "data:" + datebegin.ToString("yyyyMMdd-HHm") + "~" +
  3969. // dateend.ToString("yyyyMMdd-HHmm");
  3970. sqlString = "insert into tsap_hegii_datalog\n" +
  3971. " (LogID\n" +
  3972. " ,LogType\n" +
  3973. " ,BeginTime\n" +
  3974. " ,YYYYMMDD\n" +
  3975. " ,WorkCode\n" +
  3976. " ,DataCode\n" +
  3977. " ,DataStuts\n" +
  3978. " ,DataMSG\n" +
  3979. " ,CreateUserID\n" +
  3980. " ,DataLogID)\n" +
  3981. "values\n" +
  3982. " (:LogID\n" +
  3983. " ,'2'\n" +
  3984. " ,sysdate\n" +
  3985. " ,:YYYYMMDD\n" +
  3986. " ,:WorkCode\n" +
  3987. " ,:DataCode\n" +
  3988. " ,:DataStuts\n" +
  3989. " ,:DataMSG\n" +
  3990. " ,:CreateUserID\n" +
  3991. " ,:DataLogID)";
  3992. int r = 0;
  3993. if (string.IsNullOrEmpty(datalogid))
  3994. {
  3995. oracleParameter = new OracleParameter[]
  3996. {
  3997. new OracleParameter(":LogID",OracleDbType.Int32, logid, ParameterDirection.Input),
  3998. new OracleParameter(":CreateUserID",OracleDbType.Int32, userid, ParameterDirection.Input),
  3999. new OracleParameter(":YYYYMMDD",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  4000. new OracleParameter(":WorkCode",OracleDbType.Varchar2, workcode, ParameterDirection.Input),
  4001. new OracleParameter(":DataCode",OracleDbType.Varchar2, datacode, ParameterDirection.Input),
  4002. new OracleParameter(":DataMSG",OracleDbType.Varchar2, msg + " DKMES-ERROR:NO DATA", ParameterDirection.Input),
  4003. new OracleParameter(":DataStuts",OracleDbType.Varchar2, "E", ParameterDirection.Input),
  4004. new OracleParameter(":DataLogID",OracleDbType.Int32, 0, ParameterDirection.Input),
  4005. };
  4006. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  4007. sre.Status = Constant.ServiceResultStatus.Other;
  4008. sre.Message = "没有同步数据";
  4009. sre.Result = "E";
  4010. return sre;
  4011. }
  4012. oracleParameter = new OracleParameter[]
  4013. {
  4014. new OracleParameter(":LogID",OracleDbType.Int32, logid, ParameterDirection.Input),
  4015. new OracleParameter(":CreateUserID",OracleDbType.Int32, userid, ParameterDirection.Input),
  4016. new OracleParameter(":YYYYMMDD",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  4017. new OracleParameter(":WorkCode",OracleDbType.Varchar2, workcode, ParameterDirection.Input),
  4018. new OracleParameter(":DataCode",OracleDbType.Varchar2, datacode, ParameterDirection.Input),
  4019. new OracleParameter(":DataMSG",OracleDbType.Varchar2, msg, ParameterDirection.Input),
  4020. new OracleParameter(":DataStuts",OracleDbType.Varchar2, "S", ParameterDirection.Input),
  4021. new OracleParameter(":DataLogID",OracleDbType.Int32, datalogid, ParameterDirection.Input),
  4022. };
  4023. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  4024. sqlString =
  4025. "select fp.yyyymmdd\n" +
  4026. " ,fp.workcode\n" +
  4027. " ,fp.DataCode\n" +
  4028. " ,fp.GoodsCode\n" +
  4029. " ,fp.SAPCode\n" +
  4030. " ,fp.UserCode\n" +
  4031. " ,fp.ORDERCODE\n" +
  4032. " ,fp.ORDERITEM\n" +
  4033. " ,fp.OutputNum\n" +
  4034. " ,fp.ScrapNum\n" +
  4035. " ,fp.CleanupNum\n" +
  4036. " ,fp.RecoveryNum\n" +
  4037. " ,fp.RepairNum\n" +
  4038. " from tsap_hegii_workdata wd where wd.logid = :datalogid";
  4039. oracleParameter = new OracleParameter[]
  4040. {
  4041. new OracleParameter(":datalogid",OracleDbType.Int32, datalogid, ParameterDirection.Input),
  4042. };
  4043. DataTable workData = oracleConn.GetSqlResultToDt(sqlString, oracleParameter);
  4044. if (workData != null && workData.Rows.Count > 0)
  4045. {
  4046. sapParameter.Zsum = workData.Rows.Count;
  4047. sapParameter.TableIn = new Zspp100[sapParameter.Zsum];
  4048. int index = 0;
  4049. foreach (DataRow item in workData.Rows)
  4050. {
  4051. Zspp100 info100 = new Zspp100();
  4052. // 工厂
  4053. info100.Werks = workcode;
  4054. // 型号
  4055. info100.Groes = item["GoodsCode"].ToString();
  4056. // 物料编号
  4057. info100.Matnr = item["SAPCode"].ToString();
  4058. // 生产工号
  4059. info100.Zghnu = item["UserCode"].ToString();
  4060. // 数据节点
  4061. info100.Zjdnu = item["DataCode"].ToString();
  4062. // 时间戳
  4063. info100.Zscnu = yyyymmdd;
  4064. // 销售凭证
  4065. info100.Vbeln = item["ORDERCODE"].ToString();
  4066. // 销售凭证项目
  4067. info100.Posnr = item["ORDERITEM"].ToString();
  4068. // 产量
  4069. info100.Zclng = item["OutputNum"].ToString();
  4070. // 损坯
  4071. info100.Zspng = item["SCRAPNUM"].ToString();
  4072. // 清除
  4073. info100.Zqcng = item["CLEANUPNUM"].ToString();
  4074. // 回收
  4075. info100.Zhsng = item["RECOVERYNUM"].ToString();
  4076. // 干补
  4077. info100.Zgbng = item["REPAIRNUM"].ToString();
  4078. sapParameter.TableIn[index++] = info100;
  4079. }
  4080. }
  4081. else
  4082. {
  4083. sapParameter.Zsum = 0;
  4084. sapParameter.TableIn = new Zspp100[sapParameter.Zsum];
  4085. }
  4086. Zppfm008Response result = HGSAPDK_ZPPFM008(sapParameter, yyyymmdd, datacode);
  4087. //if (result.Ztype == "E")
  4088. //{
  4089. // sqlString = "update tsap_hegii_datalog t set t.EndTime = sysdate, DataStuts = 'E', DataMSG = DataMSG||:msg where logid = :logid";
  4090. // oracleParameter = new OracleParameter[]
  4091. // {
  4092. // new OracleParameter(":msg",OracleDbType.Varchar2, result.Zmsg, ParameterDirection.Input),
  4093. // new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  4094. // };
  4095. // r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  4096. //}
  4097. //else
  4098. {
  4099. sqlString = "update tsap_hegii_datalog t set t.EndTime = sysdate, DataStuts = :DataStuts, DataMSG = DataMSG||:msg where logid = :logid";
  4100. oracleParameter = new OracleParameter[]
  4101. {
  4102. new OracleParameter(":DataStuts",OracleDbType.Varchar2, result.Ztype, ParameterDirection.Input),
  4103. new OracleParameter(":msg",OracleDbType.Varchar2, result.Zmsg, ParameterDirection.Input),
  4104. new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  4105. };
  4106. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  4107. if (result.Ztype == "S")
  4108. {
  4109. sqlString = "update tsap_hegii_datalog t set t.createtime = :userid where logid = :datalogid";
  4110. oracleParameter = new OracleParameter[]
  4111. {
  4112. new OracleParameter(":datalogid",OracleDbType.Int32, datalogid, ParameterDirection.Input),
  4113. new OracleParameter(":userid",OracleDbType.Int32, userid, ParameterDirection.Input),
  4114. };
  4115. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  4116. }
  4117. if (result.TableOut != null && result.TableOut.Length > 0)
  4118. {
  4119. sqlString = "update TSAP_HEGII_WorkData t set t.ZTime =sysdate, ZTYPE = :ZTYPE, ZMSG = :ZMSG where logid = " + logid +
  4120. " \n and YYYYMMDD='" + yyyymmdd + "' and WorkCode='" + workcode +
  4121. "' and DataCode=:DataCode and GoodsCode=:GoodsCode and SAPCode=:SAPCode and UserCode=:UserCode \n" +
  4122. "and OrderCode=:OrderCode and OrderItem=:OrderItem";
  4123. foreach (Zspp100 item in result.TableOut)
  4124. {
  4125. oracleParameter = new OracleParameter[]
  4126. {
  4127. new OracleParameter(":ZTYPE",OracleDbType.Varchar2, item.Ztype, ParameterDirection.Input),
  4128. new OracleParameter(":ZMSG",OracleDbType.Varchar2, item.Zmsg, ParameterDirection.Input),
  4129. new OracleParameter(":DataCode",OracleDbType.Varchar2, datacode, ParameterDirection.Input),
  4130. new OracleParameter(":GoodsCode",OracleDbType.Varchar2, item.Groes, ParameterDirection.Input),
  4131. new OracleParameter(":SAPCode",OracleDbType.Varchar2, item.Matnr, ParameterDirection.Input),
  4132. new OracleParameter(":UserCode",OracleDbType.Varchar2, item.Zghnu, ParameterDirection.Input),
  4133. new OracleParameter(":OrderCode",OracleDbType.Varchar2, (string.IsNullOrEmpty(item.Vbeln)? " " : item.Vbeln), ParameterDirection.Input),
  4134. new OracleParameter(":OrderItem",OracleDbType.Varchar2, (string.IsNullOrEmpty(item.Posnr)? " " : item.Posnr), ParameterDirection.Input),
  4135. };
  4136. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  4137. }
  4138. }
  4139. }
  4140. oracleConn.Commit();
  4141. sre.Message = result.Zmsg;
  4142. sre.Result = result.Ztype;
  4143. return sre;
  4144. }
  4145. catch (Exception ex)
  4146. {
  4147. throw ex;
  4148. }
  4149. }
  4150. */
  4151. }
  4152. }